00000000: 00 20 54 4F 20 55 4E 54 49 4C 20 3A 43 4F 4E 44 |. TO UNTIL :COND|
00000010: 20 3A 41 43 54 49 4F 4E 0D 20 49 46 20 52 55 4E | :ACTION. IF RUN|
00000020: 20 3A 43 4F 4E 44 20 53 54 4F 50 0D 20 52 55 4E | :COND STOP. RUN|
00000030: 20 3A 41 43 54 49 4F 4E 0D 20 55 4E 54 49 4C 20 | :ACTION. UNTIL |
00000040: 3A 43 4F 4E 44 20 3A 41 43 54 49 4F 4E 0D 45 4E |:COND :ACTION.EN|
00000050: 44 0D 0D 54 4F 20 48 45 4C 50 0D 20 50 52 20 5B |D..TO HELP. PR [|
00000060: 45 58 41 4D 50 4C 45 53 20 28 54 4F 20 42 45 20 |EXAMPLES (TO BE |
00000070: 4C 4F 4F 50 45 44 20 49 4E 20 50 52 4F 43 45 44 |LOOPED IN PROCED|
00000080: 55 52 45 53 29 5D 0D 20 50 52 20 5B 5D 0D 20 50 |URES)]. PR []. P|
00000090: 52 20 5B 55 4E 54 49 4C 20 5B 52 43 3F 5D 20 5B |R [UNTIL [RC?] [|
000000A0: 50 52 49 4E 54 20 5B 50 52 45 53 53 20 41 4E 59 |PRINT [PRESS ANY|
000000B0: 20 4B 45 59 21 5D 5D 5D 0D 20 50 52 20 5B 5D 0D | KEY!]]]. PR [].|
000000C0: 20 50 52 20 5B 57 48 49 4C 45 20 5B 4A 4F 59 42 | PR [WHILE [JOYB|
000000D0: 55 54 54 4F 4E 20 31 5D 20 5B 46 44 20 31 5D 5D |UTTON 1] [FD 1]]|
000000E0: 0D 45 4E 44 0D 0D 54 4F 20 57 48 49 4C 45 20 3A |.END..TO WHILE :|
000000F0: 43 4F 4E 44 20 3A 41 43 54 49 4F 4E 0D 20 49 46 |COND :ACTION. IF|
00000100: 20 4E 4F 54 20 52 55 4E 20 3A 43 4F 4E 44 20 53 | NOT RUN :COND S|
00000110: 54 4F 50 0D 20 52 55 4E 20 3A 41 43 54 49 4F 4E |TOP. RUN :ACTION|
00000120: 0D 20 57 48 49 4C 45 20 3A 43 4F 4E 44 20 3A 41 |. WHILE :COND :A|
00000130: 43 54 49 4F 4E 0D 45 4E 44 0D 0D FF FF |CTION.END.... |
. TO UNTIL :COND :ACTION. IF RUN :COND S
TOP. RUN :ACTION. UNTIL :COND :ACTION.EN
D..TO HELP. PR [EXAMPLES (TO BE LOOPED I
N PROCEDURES)]. PR []. PR [UNTIL [RC?] [
PRINT [PRESS ANY KEY!]]]. PR []. PR [WHI
LE [JOYBUTTON 1] [FD 1]].END..TO WHILE :
COND :ACTION. IF NOT RUN :COND STOP. RUN
:ACTION. WHILE :COND :ACTION.END....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL