1 ' Who Dares Wins 2
2 ' by E. REID
3 '
5 ' LINES 10-130 CAN BE MISSED OUT
6 ' BUT GAME WILL HAVE NO SOUND
10 ENV 1,1,12,1,1,0,5,12,-1,2
20 ENV 2,1,13,1,1,0,15,13,-1,5
30 ENV 3,1,13,1,12,-1,3
40 ENV 4,11,1,5,2,0,120,11,-1,14
50 ENV 5,1,14,1,15,-1,12
60 ENV 6,1,12,1,12,-1,9
70 ENV 7,15,-1,2
80 ENV 8,10,1,1,20,0,1,10,-1,2
90 ENV 9,11,-1,2,1,10,1,10,-1,2,1,10,1,10,-1,2
100 ENT 3,5,40,1,5,20,1,10,25,1
110 ENT -5,14,-10,1,1,120,1
120 ENT -8,1,1,1
130 SOUND 129,250,0,0,5,5
140 BORDER 0:INK 0,0
150 INK 1,26:MODE 1
160 LOCATE 15,10:PRINT "PLEASE WAIT"
180 LOCATE 15,12:PRINT "LOADING...."
200 READ A$:IF A$="EJR" THEN GOTO 230
210 POKE &C000+K,VAL("&"+a$)
220 K=K+1:GOTO 200
230 CALL &C000
240 DATA CD,65,BC,3E
250 DATA FF,CD,6B,BC
260 DATA 06,00,11,00
270 DATA 50,CD,77,BC
280 DATA 21,00,50,CD
290 DATA 83,BC,CD,7A,BC
300 DATA 06,00,11,00
310 DATA 50,CD,77,BC
320 DATA 21,00,50,CD
330 DATA 83,BC,CD,7A,BC
340 DATA 06,00,11,00
350 DATA 50,CD,77,BC
360 DATA 21,00,50,CD
370 DATA 83,BC,CD,7A,BC
380 DATA 21,40,00,11
390 DATA 30,60,3E,63
400 DATA CD,A1,BC,21
410 DATA 70,60,11,90,50
420 DATA 3E,11,CD,A1
430 DATA BC,3E,00,32,1A
440 DATA 63,32,C1,60
450 DATA C3,10,A0,EJR
460 END

10 :'PROGRAMM: Who dares wins II
20 :'VORAUSSETZUNGEN:Das Binaerprogramm von "Who dares wins II" auf Diskette unter dem Namen 'WDW2.BIN'.
30 :'VORGEHEN:Binaerteil laden  - Poke&4851,&0 eingeben - Programm wieder auf Diskette speichern (Anfang:18432, Laenge:17931