00000000: 00 30 54 4F 20 4C 55 43 48 54 48 55 4C 50 0D 20 |.0TO LUCHTHULP. |
00000010: 53 45 54 48 20 31 35 30 0D 20 52 45 50 45 41 54 |SETH 150. REPEAT|
00000020: 20 32 34 20 5B 46 44 20 32 20 4C 54 20 35 5D 0D | 24 [FD 2 LT 5].|
00000030: 20 53 45 54 48 20 31 33 35 0D 20 52 45 50 45 41 | SETH 135. REPEA|
00000040: 54 20 31 38 20 5B 46 44 20 32 20 4C 54 20 35 5D |T 18 [FD 2 LT 5]|
00000050: 0D 45 4E 44 0D 0D 54 4F 20 4C 55 43 48 54 0D 20 |.END..TO LUCHT. |
00000060: 50 55 20 53 45 54 58 59 20 30 20 30 20 53 45 54 |PU SETXY 0 0 SET|
00000070: 48 20 30 20 46 44 20 31 30 30 20 4C 54 20 39 30 |H 0 FD 100 LT 90|
00000080: 0D 20 46 44 20 31 35 35 20 50 44 0D 20 52 45 50 |. FD 155 PD. REP|
00000090: 45 41 54 20 34 20 5B 4C 55 43 48 54 48 55 4C 50 |EAT 4 [LUCHTHULP|
000000A0: 5D 0D 45 4E 44 0D 0D 54 4F 20 57 4F 4E 49 4E 47 |].END..TO WONING|
000000B0: 0D 20 48 55 49 53 0D 20 53 43 48 55 55 52 0D 20 |. HUIS. SCHUUR. |
000000C0: 42 4F 4F 4D 31 0D 20 4C 55 43 48 54 0D 20 48 49 |BOOM1. LUCHT. HI|
000000D0: 44 45 54 55 52 54 4C 45 0D 45 4E 44 0D 0D 54 4F |DETURTLE.END..TO|
000000E0: 20 42 4F 4F 4D 31 0D 20 50 55 20 53 45 54 58 59 | BOOM1. PU SETXY|
000000F0: 20 30 20 30 20 53 45 54 48 20 30 0D 20 52 54 20 | 0 0 SETH 0. RT |
00000100: 31 38 30 20 46 44 20 31 30 30 20 4C 54 20 39 30 |180 FD 100 LT 90|
00000110: 20 46 44 20 31 30 30 20 50 44 20 42 4F 4F 4D 0D | FD 100 PD BOOM.|
00000120: 20 50 55 20 53 45 54 58 59 20 30 20 30 20 53 45 | PU SETXY 0 0 SE|
00000130: 54 48 20 30 0D 20 52 54 20 31 38 30 20 46 44 20 |TH 0. RT 180 FD |
00000140: 31 30 30 20 52 54 20 39 30 20 46 44 20 31 34 30 |100 RT 90 FD 140|
00000150: 20 50 44 20 42 4F 4F 4D 0D 45 4E 44 0D 0D 54 4F | PD BOOM.END..TO|
00000160: 20 42 4F 4F 4D 0D 20 53 45 54 48 20 30 0D 20 46 | BOOM. SETH 0. F|
00000170: 44 20 34 30 20 52 54 20 39 30 20 46 44 20 31 30 |D 40 RT 90 FD 10|
00000180: 20 52 54 20 39 30 20 46 44 20 34 30 20 52 54 20 | RT 90 FD 40 RT |
00000190: 39 30 0D 20 46 44 20 31 30 20 52 54 20 39 30 20 |90. FD 10 RT 90 |
000001A0: 46 44 20 34 30 20 52 54 20 39 30 20 46 44 20 35 |FD 40 RT 90 FD 5|
000001B0: 0D 20 52 45 50 45 41 54 20 37 32 20 5B 46 44 20 |. REPEAT 72 [FD |
000001C0: 32 20 4C 54 20 35 5D 0D 45 4E 44 0D 0D 54 4F 20 |2 LT 5].END..TO |
000001D0: 53 43 48 55 55 52 0D 20 50 55 20 53 45 54 58 59 |SCHUUR. PU SETXY|
000001E0: 20 30 20 30 20 53 45 54 48 20 30 20 50 44 0D 20 | 0 0 SETH 0 PD. |
000001F0: 52 54 20 31 38 30 20 46 44 20 35 30 20 4C 54 20 |RT 180 FD 50 LT |
00000200: 39 30 20 46 44 20 36 30 20 52 54 20 39 30 20 46 |90 FD 60 RT 90 F|
00000210: 44 20 35 30 0D 20 52 54 20 39 30 20 46 44 20 36 |D 50. RT 90 FD 6|
00000220: 30 20 52 54 20 31 38 30 20 46 44 20 33 30 20 4C |0 RT 180 FD 30 L|
00000230: 54 20 39 30 20 46 44 20 35 30 0D 20 52 54 20 31 |T 90 FD 50. RT 1|
00000240: 38 30 20 46 44 20 32 35 20 50 55 20 52 54 20 39 |80 FD 25 PU RT 9|
00000250: 30 20 46 44 20 31 30 20 50 44 20 46 44 20 31 30 |0 FD 10 PD FD 10|
00000260: 0D 20 4C 54 20 39 30 20 46 44 20 31 30 20 52 54 |. LT 90 FD 10 RT|
00000270: 20 31 38 30 20 46 44 20 31 30 20 52 54 20 39 30 | 180 FD 10 RT 90|
00000280: 20 50 55 0D 20 46 44 20 33 30 20 50 44 20 46 44 | PU. FD 30 PD FD|
00000290: 20 31 30 20 52 54 20 39 30 20 46 44 20 31 30 0D | 10 RT 90 FD 10.|
000002A0: 45 4E 44 0D 0D 54 4F 20 43 49 52 43 4C 45 0D 20 |END..TO CIRCLE. |
000002B0: 52 45 50 45 41 54 20 37 32 20 5B 46 44 20 32 20 |REPEAT 72 [FD 2 |
000002C0: 52 54 20 35 5D 0D 45 4E 44 0D 0D 54 4F 20 48 41 |RT 5].END..TO HA|
000002D0: 4E 53 0D 20 52 45 50 45 41 54 20 31 36 20 5B 52 |NS. REPEAT 16 [R|
000002E0: 54 20 32 32 2E 35 20 43 49 52 43 4C 45 5D 0D 45 |T 22.5 CIRCLE].E|
000002F0: 4E 44 0D 0D 54 4F 20 52 45 53 45 54 0D 20 53 45 |ND..TO RESET. SE|
00000300: 54 58 59 20 30 20 30 0D 20 43 4C 45 41 52 53 43 |TXY 0 0. CLEARSC|
00000310: 52 45 45 4E 0D 45 4E 44 0D 0D 54 4F 20 48 55 49 |REEN.END..TO HUI|
00000320: 53 0D 20 52 45 53 45 54 0D 20 52 54 20 31 38 30 |S. RESET. RT 180|
00000330: 0D 20 46 44 20 31 30 30 20 52 54 20 39 30 20 46 |. FD 100 RT 90 F|
00000340: 44 20 31 30 30 20 52 54 20 39 30 20 46 44 20 31 |D 100 RT 90 FD 1|
00000350: 30 30 0D 20 52 54 20 39 30 20 46 44 20 31 30 30 |00. RT 90 FD 100|
00000360: 20 4C 54 20 31 33 35 20 46 44 20 37 30 20 4C 54 | LT 135 FD 70 LT|
00000370: 20 39 30 20 46 44 20 37 30 0D 20 50 55 20 4C 54 | 90 FD 70. PU LT|
00000380: 20 34 35 20 46 44 20 31 30 30 20 50 44 0D 20 4C | 45 FD 100 PD. L|
00000390: 54 20 39 30 20 46 44 20 31 30 20 4C 54 20 39 30 |T 90 FD 10 LT 90|
000003A0: 20 46 44 20 34 30 20 52 54 20 39 30 20 46 44 20 | FD 40 RT 90 FD |
000003B0: 32 30 0D 20 52 54 20 39 30 20 46 44 20 34 30 20 |20. RT 90 FD 40 |
000003C0: 4C 54 20 39 30 20 46 44 20 32 30 0D 20 50 55 20 |LT 90 FD 20. PU |
000003D0: 4C 54 20 39 30 20 46 44 20 32 30 20 50 44 0D 20 |LT 90 FD 20 PD. |
000003E0: 46 44 20 32 30 20 52 54 20 39 30 20 46 44 20 34 |FD 20 RT 90 FD 4|
000003F0: 30 20 52 54 20 39 30 20 46 44 20 32 30 20 52 54 |0 RT 90 FD 20 RT|
00000400: 20 39 30 0D 20 46 44 20 34 30 0D 20 50 55 20 46 | 90. FD 40. PU F|
00000410: 44 20 34 30 20 52 54 20 39 30 20 46 44 20 34 30 |D 40 RT 90 FD 40|
00000420: 20 50 44 0D 20 46 44 20 32 30 20 52 54 20 39 30 | PD. FD 20 RT 90|
00000430: 20 46 44 20 33 30 20 52 54 20 39 30 20 46 44 20 | FD 30 RT 90 FD |
00000440: 32 30 20 52 54 20 39 30 0D 20 46 44 20 33 30 20 |20 RT 90. FD 30 |
00000450: 52 54 20 31 38 30 0D 20 50 55 20 46 44 20 35 30 |RT 180. PU FD 50|
00000460: 20 50 44 0D 20 46 44 20 33 30 20 4C 54 20 39 30 | PD. FD 30 LT 90|
00000470: 20 46 44 20 32 30 20 4C 54 20 39 30 20 46 44 20 | FD 20 LT 90 FD |
00000480: 33 30 20 4C 54 20 39 30 0D 20 46 44 20 32 30 0D |30 LT 90. FD 20.|
00000490: 20 50 55 20 4C 54 20 31 38 30 20 46 44 20 36 30 | PU LT 180 FD 60|
000004A0: 20 52 54 20 39 30 20 46 44 20 32 30 20 4C 54 20 | RT 90 FD 20 LT |
000004B0: 39 30 20 50 44 0D 20 46 44 20 33 30 20 4C 54 20 |90 PD. FD 30 LT |
000004C0: 39 30 20 46 44 20 31 30 20 4C 54 20 39 30 20 46 |90 FD 10 LT 90 F|
000004D0: 44 20 32 32 0D 20 50 55 20 46 44 20 32 30 20 52 |D 22. PU FD 20 R|
000004E0: 54 20 39 30 20 46 44 20 31 39 20 50 44 0D 20 52 |T 90 FD 19 PD. R|
000004F0: 45 50 45 41 54 20 33 36 20 5B 46 44 20 32 20 52 |EPEAT 36 [FD 2 R|
00000500: 54 20 31 30 5D 0D 20 52 54 20 39 30 20 46 44 20 |T 10]. RT 90 FD |
00000510: 32 32 20 52 54 20 31 38 30 20 46 44 20 31 31 20 |22 RT 180 FD 11 |
00000520: 52 54 20 39 30 20 46 44 20 31 31 0D 20 52 54 20 |RT 90 FD 11. RT |
00000530: 31 38 30 20 46 44 20 32 32 0D 45 4E 44 0D 0D |180 FD 22.END.. |
.0TO LUCHTHULP. SETH 150. REPEAT 24 [FD
2 LT 5]. SETH 135. REPEAT 18 [FD 2 LT 5]
.END..TO LUCHT. PU SETXY 0 0 SETH 0 FD 1
00 LT 90. FD 155 PD. REPEAT 4 [LUCHTHULP
].END..TO WONING. HUIS. SCHUUR. BOOM1. L
UCHT. HIDETURTLE.END..TO BOOM1. PU SETXY
0 0 SETH 0. RT 180 FD 100 LT 90 FD 100
PD BOOM. PU SETXY 0 0 SETH 0. RT 180 FD
100 RT 90 FD 140 PD BOOM.END..TO BOOM. S
ETH 0. FD 40 RT 90 FD 10 RT 90 FD 40 RT
90. FD 10 RT 90 FD 40 RT 90 FD 5. REPEAT
72 [FD 2 LT 5].END..TO SCHUUR. PU SETXY
0 0 SETH 0 PD. RT 180 FD 50 LT 90 FD 60
RT 90 FD 50. RT 90 FD 60 RT 180 FD 30 L
T 90 FD 50. RT 180 FD 25 PU RT 90 FD 10
PD FD 10. LT 90 FD 10 RT 180 FD 10 RT 90
PU. FD 30 PD FD 10 RT 90 FD 10.END..TO
CIRCLE. REPEAT 72 [FD 2 RT 5].END..TO HA
NS. REPEAT 16 [RT 22.5 CIRCLE].END..TO R
ESET. SETXY 0 0. CLEARSCREEN.END..TO HUI
S. RESET. RT 180. FD 100 RT 90 FD 100 RT
90 FD 100. RT 90 FD 100 LT 135 FD 70 LT
90 FD 70. PU LT 45 FD 100 PD. LT 90 FD
10 LT 90 FD 40 RT 90 FD 20. RT 90 FD 40
LT 90 FD 20. PU LT 90 FD 20 PD. FD 20 RT
90 FD 40 RT 90 FD 20 RT 90. FD 40. PU F
D 40 RT 90 FD 40 PD. FD 20 RT 90 FD 30 R
T 90 FD 20 RT 90. FD 30 RT 180. PU FD 50
PD. FD 30 LT 90 FD 20 LT 90 FD 30 LT 90
. FD 20. PU LT 180 FD 60 RT 90 FD 20 LT
90 PD. FD 30 LT 90 FD 10 LT 90 FD 22. PU
FD 20 RT 90 FD 19 PD. REPEAT 36 [FD 2 R
T 10]. RT 90 FD 22 RT 180 FD 11 RT 90 FD
11. RT 180 FD 22.END..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL