00000000: 00 20 54 4F 20 53 45 54 55 50 0D 20 43 53 20 50 |. TO SETUP. CS P|
00000010: 55 20 53 45 54 58 20 2D 20 38 35 20 53 45 54 59 |U SETX - 85 SETY|
00000020: 20 30 0D 20 53 45 54 48 20 39 30 20 50 44 0D 45 | 0. SETH 90 PD.E|
00000030: 4E 44 0D 0D 54 4F 20 46 20 3A 53 49 20 3A 4C 49 |ND..TO F :SI :LI|
00000040: 0D 20 49 46 20 3A 53 49 20 3C 20 3A 4C 49 20 54 |. IF :SI < :LI T|
00000050: 48 45 4E 20 46 44 20 3A 53 49 20 53 54 4F 50 0D |HEN FD :SI STOP.|
00000060: 20 46 20 3A 53 49 20 2F 20 35 20 3A 4C 49 20 4C | F :SI / 5 :LI L|
00000070: 54 20 39 30 0D 20 52 45 50 45 41 54 20 35 20 5B |T 90. REPEAT 5 [|
00000080: 46 20 3A 53 49 2F 35 20 3A 4C 49 5D 0D 20 52 54 |F :SI/5 :LI]. RT|
00000090: 20 39 30 0D 20 52 45 50 45 41 54 20 33 20 5B 46 | 90. REPEAT 3 [F|
000000A0: 20 3A 53 49 2F 35 20 3A 4C 49 5D 0D 20 52 54 20 | :SI/5 :LI]. RT |
000000B0: 39 30 0D 20 52 45 50 45 41 54 20 32 20 5B 46 20 |90. REPEAT 2 [F |
000000C0: 3A 53 49 2F 35 20 3A 4C 49 5D 0D 20 4C 54 20 39 |:SI/5 :LI]. LT 9|
000000D0: 30 0D 20 46 20 3A 53 49 20 2F 20 35 20 3A 4C 49 |0. F :SI / 5 :LI|
000000E0: 20 4C 54 20 39 30 0D 20 46 20 3A 53 49 20 2F 20 | LT 90. F :SI / |
000000F0: 35 20 3A 4C 49 20 52 54 20 39 30 0D 20 46 20 3A |5 :LI RT 90. F :|
00000100: 53 49 20 2F 20 35 20 3A 4C 49 20 52 54 20 39 30 |SI / 5 :LI RT 90|
00000110: 0D 20 46 20 3A 53 49 20 2F 20 35 20 3A 4C 49 20 |. F :SI / 5 :LI |
00000120: 4C 54 20 39 30 0D 20 52 45 50 45 41 54 20 32 20 |LT 90. REPEAT 2 |
00000130: 5B 46 20 3A 53 49 2F 35 20 3A 4C 49 5D 0D 20 4C |[F :SI/5 :LI]. L|
00000140: 54 20 39 30 0D 20 52 45 50 45 41 54 20 33 20 5B |T 90. REPEAT 3 [|
00000150: 46 20 3A 53 49 2F 35 20 3A 4C 49 5D 0D 45 4E 44 |F :SI/5 :LI].END|
00000160: 0D 0D |.. |
. TO SETUP. CS PU SETX - 85 SETY 0. SETH
90 PD.END..TO F :SI :LI. IF :SI < :LI T
HEN FD :SI STOP. F :SI / 5 :LI LT 90. RE
PEAT 5 [F :SI/5 :LI]. RT 90. REPEAT 3 [F
:SI/5 :LI]. RT 90. REPEAT 2 [F :SI/5 :L
I]. LT 90. F :SI / 5 :LI LT 90. F :SI /
5 :LI RT 90. F :SI / 5 :LI RT 90. F :SI
/ 5 :LI LT 90. REPEAT 2 [F :SI/5 :LI]. L
T 90. REPEAT 3 [F :SI/5 :LI].END..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL