00000000: 39 30 30 30 20 50 52 4F 43 20 52 45 43 54 28 4C |9000 PROC RECT(L|
00000010: 2C 57 29 20 43 4C 4F 53 45 44 0D 39 30 31 30 20 |,W) CLOSED.9010 |
00000020: 46 4F 52 20 4A 3A 3D 31 20 54 4F 20 32 20 44 4F |FOR J:=1 TO 2 DO|
00000030: 0D 39 30 32 30 20 46 4F 52 57 41 52 44 20 4C 0D |.9020 FORWARD L.|
00000040: 39 30 33 30 20 52 49 47 48 54 20 39 30 0D 39 30 |9030 RIGHT 90.90|
00000050: 34 30 20 46 4F 52 57 41 52 44 20 57 0D 39 30 35 |40 FORWARD W.905|
00000060: 30 20 52 49 47 48 54 20 39 30 0D 39 30 36 30 20 |0 RIGHT 90.9060 |
00000070: 45 4E 44 46 4F 52 20 4A 0D 39 30 37 30 20 45 4E |ENDFOR J.9070 EN|
00000080: 44 50 52 4F 43 20 52 45 43 54 0D |DPROC RECT. |
9000 PROC RECT(L,W) CLOSED.9010 FOR J:=1
TO 2 DO.9020 FORWARD L.9030 RIGHT 90.90
40 FORWARD W.9050 RIGHT 90.9060 ENDFOR J
.9070 ENDPROC RECT.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL