00000000: 3B 20 57 41 49 54 0D 53 59 4A 46 32 3D 24 41 32 |; WAIT.SYJF2=$A2|
00000010: 0D 20 44 45 46 20 57 41 49 54 20 53 59 54 4D 50 |. DEF WAIT SYTMP|
00000020: 0D 20 20 46 4F 52 20 53 59 54 4D 50 2B 31 20 3D |. FOR SYTMP+1 =|
00000030: 20 31 20 54 4F 20 53 59 54 4D 50 0D 20 20 20 4C | 1 TO SYTMP. L|
00000040: 45 54 20 53 59 54 4D 50 31 20 3D 20 53 59 4A 46 |ET SYTMP1 = SYJF|
00000050: 32 0D 20 20 20 57 48 49 4C 45 20 53 59 54 4D 50 |2. WHILE SYTMP|
00000060: 31 20 3D 20 53 59 4A 46 32 20 3A 20 45 4E 44 57 |1 = SYJF2 : ENDW|
00000070: 48 49 4C 45 0D 20 20 4E 45 58 54 20 53 59 54 4D |HILE. NEXT SYTM|
00000080: 50 2B 31 0D 20 20 52 45 54 55 52 4E 0D 20 45 4E |P+1. RETURN. EN|
00000090: 44 44 45 46 20 57 41 49 54 0D 00 00 00 FF |DDEF WAIT..... |
; WAIT.SYJF2=$A2. DEF WAIT SYTMP. FOR S
YTMP+1 = 1 TO SYTMP. LET SYTMP1 = SYJF
2. WHILE SYTMP1 = SYJF2 : ENDWHILE. N
EXT SYTMP+1. RETURN. ENDDEF WAIT.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL