Home » CEEFAX disks » telesoftware9.adl » 02-09-88/PIPLINE
02-09-88/PIPLINE
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
| Tape/disk: | Home » CEEFAX disks » telesoftware9.adl |
| Filename: | 02-09-88/PIPLINE |
| Read OK: | ✔ |
| File size: | 27DE bytes |
| Load address: | FFFF1900 |
| Exec address: | FFFF8023 |
Duplicates
There are 2 duplicate copies of this file in the archive:
- AEW website » mu » mu_5_25_discs_Micro_User_06_01_D-MU06_01.ssd » PIPLINE
- CEEFAX disks » telesoftware6.adl » 09-04-88/PIPLINE
- CEEFAX disks » telesoftware9.adl » 02-09-88/PIPLINE
File contents
10REM Pipeline
20REM By James Bee
30REM (c) The Micro User
40IF PAGE<&1900 THEN PAGE=&1900:CHAIN"PIPLINE" ELSE GOTO 1970
50MODE2
60left=&1100:right=&1112:up=&1124:down=&1136:display=&114F
70sp=&1222:dht=&11B5:set1=&1148:check=&78:compare=&120C
80DIM SC%(6),N$(6):*FX213,1
90area=&B00:time=1000:*FX9,1
100memL=&70:memH=&71:*FX10,1
110FOR I%=0 TO 5:N$(I%)="Micro User":SC%(I%)=(6-I%)*20:NEXT
120PROCtitle:zs$="0000"
130PROCdh("Keys",7,6,6)
140COLOUR5:PRINT''''SPC4"Z - Left"''SPC4"X - Right"''SPC4": - Up"''SPC4"/ - Down"''SPC4"H - Help"''SPC4"Q - End Game"''SPC4"RET - Pick"''SPC4"SFT - Drop"
150PROCdh("Press SPACE to start",0,28,1)
160T%=TIME:REPEAT:G$=INKEY$(0):UNTIL G$=" " OR TIME>T%+700
170IF G$=" " THEN 220
180PROCdis:PROCdh("by James Bee",5,29,9)
190T%=TIME:REPEAT:G$=INKEY$(0):UNTIL G$=" " OR TIME>T%+700
200IF G$=" " THEN 220
210GOTO120
220RESTORE 1960:scr=0
230level=1:H%=0:Q=0
240VDU12,19,2,0,0,0,0,23;8202;0;0;0;
250PROCdh("Pipeline",6,1,3)
260A$=STR$scr
270PROCdh(RIGHT$(zs$+A$,3),12,29,2)
280REPEAT
290L%=&7887:?check=199
300nx=18:ny=1:piece=0
310nastmem=area+ny*20+nx
320mem=area+201
330READ M%
340PROCcopy(M%)
350PROCdisp(M%)
360FOR I%=&7880 TO &7980 STEP 32
370PROCsp(I%,2)
380SOUND 2,-9,(I%-&7880)/32+200,1
390NEXT
400PROCsp(I%,8)
410VDU20:PROCbox
420PROCd(200)
430FOR I%=0 TO &F0
440IF ?(M%+I%)<2 OR ?(M%+I%)>7 THEN 480
450R%=RND(235)
460IF ?(area+R%)<>0 OR area+R%=mem OR R%=38 THEN 450
470?(area+R%)=?(M%+I%):SOUND1,-2,R%,1
480NEXT:PROCdisp(area)
490PROCsetst
500TIME=0
510REPEAT
520T%=TIME
530REPEAT
540PROCnasty
550IF INKEY-17 Q=1
560IF INKEY-98 PROCleft:GOTO600
570IF INKEY-67 PROCright:GOTO600
580IF INKEY-73 PROCup:GOTO600
590IF INKEY-105 PROCdown
600IF INKEY-74 IF piece=0 PROCpick
610IF INKEY-1 IF piece>0 PROCput
620IF INKEY-85 IF H%<3 PROChlp
630PROCd(7)
640UNTIL TIME>T%+time OR ?check=0 OR Q=1
650?L%=48:L%?633=48:L%=L%+8
660VDU7
670IF TIME>38*time Q=1
680UNTIL ?check=0 OR Q=1
690S%=TIME
700VDU28,1,25,18,6,12,26
710PROCdh("Pipe "+STR$level,7,8,6)
720IF ?check=0 PROCdh("Complete",6,11,6):PROCdh("Well done!",5,15,5):GOTO740
730PROCdh("Incomplete",5,11,6):PROCdh("Bad luck",6,15,5)
740PROCscr:PROCdh("Press any key!",3,22,7)
750*FX15
760G=GET:level=level+1:UNTIL level=5 OR ?check<>0
770PROChi:GOTO180
780DEF PROCdisp(D%)
790X%=D%MOD256:Y%=D%DIV256
800CALLdisplay:ENDPROC
810DEF PROCleft:B%=14
820IF mem?-1 A%=14:CALLset1:ENDPROC
830mem=mem-1:A%=0:CALLset1
840CALLleft:ENDPROC
850DEF PROCright:B%=13
860IF mem?1 A%=13:CALLset1:ENDPROC
870mem=mem+1:A%=0:CALLset1
880CALLright:ENDPROC
890DEF PROCup:B%=11
900IF mem?-20 A%=11:CALLset1:ENDPROC
910mem=mem-20:A%=0:CALLset1
920CALLup:ENDPROC
930DEF PROCdown:B%=12
940IF mem?20 A%=12:CALLset1:ENDPROC
950mem=mem+20:A%=0:CALLset1
960CALLdown:ENDPROC
970DEF PROCpick:PROCudlr
980IF ?pmem<2 OR ?pmem>7 ENDPROC
990piece=?pmem:?pmem=0:PROCdisp(&B00):PROCsp(&7AB0,piece):A%=B%:CALLset1
1000ENDPROC
1010DEF PROCput:PROCudlr
1020IF ?pmem>0 OR pmem=nastmem OR pmem=&BC9 ENDPROC
1030?pmem=piece:PROCdisp(&B00):PROCsp(&7AB0,0):A%=B%:CALLset1
1040IF ?(M%+pmem-&B00)=piece VDU19,0,4,0,0,0:PROCd(20):VDU20:SOUND 1,-9,255,2
1050piece=0
1060X%=M%MOD256:Y%=M%DIV256
1070CALLcompare:ENDPROC
1080DEF PROCcopy(Q%)
1090FOR I%=0 TO &F0
1100IF I%?Q%<2 OR I%?Q%>7 I%?&B00=I%?Q% ELSE I%?&B00=0
1110NEXT:ENDPROC
1120DEF PROCd(U%)
1130E%=TIME:REPEATUNTIL TIME>E%+U%
1140ENDPROC
1150DEF PROChlp:ZZ%=TIME
1160PROCdisp(M%):PROCd(200)
1170H%=H%+1:PROCdisp(area)
1180A%=B%:CALLset1:TIME=ZZ%:ENDPROC
1190DEF PROCdh(S$,X,Y,C):COLOUR C
1200LOCAL J%:PRINTTAB(X,Y);
1210FOR J%=1 TO LENS$
1220A%=ASCMID$(S$,J%):CALLdht:NEXT
1230ENDPROC
1240DEF PROCsp(loc,F%):A%=F%
1250X%=loc MOD 256:Y%=loc DIV 256
1260CALLsp:ENDPROC
1270DEF PROCudlr
1280IF B%=11 pmem=mem-20
1290IF B%=12 pmem=mem+20
1300IF B%=13 pmem=mem+1
1310IF B%=14 pmem=mem-1
1320ENDPROC
1330DEF PROCnasty
1340IF nastmem=mem GOTO 1410
1350PROCsp(&3A00+nx*32+ny*1280,0)
1360D%=RND(4)
1370IF D%=1 IF nastmem?-20=0 ny=ny-1:nastmem=nastmem-20
1380IF D%=2 IF nastmem?20=0 ny=ny+1:nastmem=nastmem+20
1390IF D%=3 IF nastmem?1=0 nx=nx+1:nastmem=nastmem+1
1400IF D%=4 IF nastmem?-1=0 nx=nx-1:nastmem=nastmem-1
1410PROCsp(&3A00+nx*32+ny*1280,10)
1420IF nastmem=mem FOR I%=128 TO 0 STEP-2:SOUND 2,-9,I%,1:NEXT:A%=0:CALLset1:PROCsetst
1430ENDPROC
1440DEF PROCsetst
1450memloc=&3A00+(10*1280)+32
1460?memL=memloc MOD 256
1470?memH=memloc DIV 256
1480PROCsp(memloc,11):B%=11
1490mem=area+20*10+1:ENDPROC
1500DEF PROCbox
1510MOVE 1098,104:DRAW1098+104,104:DRAW1098+104,20:DRAW1098,20:DRAW1098,104
1520ENDPROC
1530DEF PROCscr
1540*FX213,255
1550*FX214,1
1560FOR I%=0 TO &F0
1570IF M%?I%<2 OR M%?I%>7 THEN 1630
1580IF M%?I%<>area?I% THEN 1630
1590IF area?I%<4 scr=scr+1
1600IF area?I%>3 scr=scr+5
1610A$=STR$scr:PROCdh(RIGHT$(zs$+A$,3),12,29,2)
1620VDU7
1630NEXT
1640*FX213,1
1650IF Q=1 ENDPROC
1660PROCdh("Bonus!",7,18,3)
1670FOR I%=S% TO 37*time STEP time:?L%=48:?(L%+633)=48:L%=L%+8:SOUND 2,-2,I%,1
1680scr=scr+5:A$=STR$scr:PROCdh(RIGHT$(zs$+A$,3),12,29,2):NEXT
1690ENDPROC
1700DEF PROCinput:PROCtitle
1710PROCdh("You are in the",2,7,6)
1720PROCdh("High Score table!",1,10,6)
1730PROCdh("Enter Your Name",2,16,5)
1740PROCdh(STRING$(12," "),4,21,132)
1750PROCdh(STRING$(12," "),4,23,132)
1760N$="":PRINTTAB(5,23);
1770REPEAT:VDU23,1,1;0;0;0;:K%=GET
1780IF K%=127 N$=LEFT$(N$,LENN$-1):GOTO1810
1790IF K%=13 THEN1820
1800IF LENN$<10 N$=N$+CHR$K%
1810PROCdh(N$+" ",5,22,7):VDU8,10
1820UNTIL K%=13:COLOUR128:ENDPROC
1830DEF PROChi:SC%=scr:*FX21
1840IFSC%<SC%(5) THEN1870
1850FORI%=0 TO 5:IFSC%<SC%(I%) NEXT ELSE FOR J%=5 TO I%+1 STEP-1:SC%(J%)=SC%(J%-1):N$(J%)=N$(J%-1):NEXT:SC%(I%)=SC%:N$(I%)="":N%=I%:SC%=0:I%=5:NEXT
1860PROCinput:N$(N%)=N$
1870ENDPROC
1880DEF PROCdis:PROCtitle
1890PROCdh("Top Plumbers",3,6,6)
1900FORJ%=0 TO 5:PROCdh(N$(J%)+STRING$(14-LENN$(J%),"."),2,10+J%*3,5)
1910PROCdh(STR$(SC%(J%)),16,10+J%*3,7)
1920NEXT:ENDPROC
1930DEF PROCtitle:VDU12,23;8202;0;0;0;
1940PROCdh("Pipeline!",5,3,3)
1950ENDPROC
1960DATA &900,&A00,&E00,&F00
1970MODE7:RESTORE2150:REM Cut here
1980PRINT"Assembling...":*TAPE
1990PROCread(&1100,"Code")
2000PROCread(&0900,"Pipe 1")
2010PROCread(&0A00,"Pipe 2")
2020PROCread(&0E00,"Pipe 3")
2030PROCread(&0F00,"Pipe 4")
2040PROCread(&1320,"Sprite"):*FX18
2050FOR I%=0 TO 31:?(&1300+I%)=0:NEXT
2060PRINT"Please wait some more...";
2070VDU21:*K.0RESTORE2190:I%=(2+!&1C)AND&FFFF:REPEATI%=I%-1:U.?I%=13:I%?1=&FF|MOLD|MFOR I%=0 TO TOP STEP 4:I%!&1500=I%!PAGE:NEXT|MPAGE=&1500|MOLD|M40|MRUN|F|M
2080*FX138,0,128
2090END
2100DEF PROCread(M%,B$):PRINT B$
2110READ Q%:FOR J%=1 TO Q%:READ C$
2120!M%=EVAL("&"+C$):M%=M%+4
2130NEXT:ENDPROC
2140REM Code
2150DATA 97
2160DATA E970A538,A5708520,8500E971
2170DATA 4C0EA971,A5181148,85206970
2180DATA 6971A570,A9718500,11484C0D
2190DATA E970A538,A5708500,8505E971
2200DATA 4C0BA971,A5181148,85006970
2210DATA 6971A570,A9718505,11484C0C
2220DATA 71A470A6,8E12224C,698C1168
2230DATA 8500A911,853AA974,850BA975
2240DATA 8500A98B,BD8CA68C,74A69999
2250DATA 222075A4,74A51812,74852069
2260DATA 006975A5,8CE67585,14C98CA5
2270DATA AD18DFD0,14691168,AD11688D
2280DATA 00691169,1811698D,806974A5
2290DATA 75A57485,75850269,03308BC6
2300DATA 6011614C,81A9FFA0,8AFFF420
2310DATA 12798D60,79A20AA9,F12012A0
2320DATA 2017A9FF,FEA9FFEE,A2FFEE20
2330DATA 127ABD00,20FFEE20,E0E8FFEE
2340DATA A9F2D004,FFEE2017,EE20FFA9
2350DATA 127ABDFF,20FFEE20,E0E8FFEE
2360DATA A9F2D008,FFEE20FE,EE200AA9
2370DATA 2008A9FF,FFA9FFEE,A9FFEE20
2380DATA FFEE4C0B,8C12158E,EBA21216
2390DATA DD9999BD,03D00B00,86F5D0CA
2400DATA 76866078,00A27784,0A0A8F86
2410DATA 0A8F260A,260A8F26,0069188F
2420DATA A912458D,8D8F6513,00A01246
2430DATA 919999BD,7691C876,20E0E8C8
2440DATA 29981EF0,E8EDD007,E0E8E8E8
2450DATA 18E5D020,806976A5,77A57685
2460DATA 77850269,D2D004A2,1D041F60
2470DATA 00000611,00000000,00000000
2480DATA 00000000
2490REM Pipe 1 Data
2500DATA 60
2510DATA 01010101,01010101,01010101
2520DATA 01010101,01010101,00000001
2530DATA 00000000,00000001,00010000
2540DATA 01000000,02040101,00000005
2550DATA 00000001,00010100,01000000
2560DATA 01030901,01000506,00010101
2570DATA 05040000,01000000,01070601
2580DATA 01000301,00000000,03030000
2590DATA 01000000,00000001,00000300
2600DATA 00000000,03030100,01000000
2610DATA 00000001,01010300,01010000
2620DATA 06030101,01000008,00000001
2630DATA 04010300,02020202,00070202
2640DATA 01000000,00000001,07020600
2650DATA 01000101,00000000,01010101
2660DATA 00000001,00000000,01000000
2670DATA 00010101,01000000,00010001
2680DATA 00000000,01000000,00000000
2690DATA 01000000,01010101,01010101
2700DATA 01010101,01010101,01010101
2710REM Pipe 2 data
2720DATA 60
2730DATA 01010101,01010101,01010101
2740DATA 01010101,01010101,00000001
2750DATA 09000000,01010000,00000000
2760DATA 01000000,00010001,07020204
2770DATA 04010100,08020202,01000000
2780DATA 00000101,00000003,07040100
2790DATA 00010000,01010100,00000001
2800DATA 04000103,00070202,00010000
2810DATA 01000100,00000001,03000103
2820DATA 00000000,00000000,01000000
2830DATA 00000101,03020403,05020202
2840DATA 00000001,01000001,00010001
2850DATA 03010706,03000000,01000000
2860DATA 01000001,00000001,03010000
2870DATA 03000101,00000000,01010000
2880DATA 00000001,06000000,07020202
2890DATA 00010101,01000000,00010001
2900DATA 00000000,01000000,00000000
2910DATA 01000000,01010101,01010101
2920DATA 01010101,01010101,01010101
2930REM Pipe 3 data
2940DATA 60
2950DATA 01010101,01010101,01010101
2960DATA 01010101,01010101,00000001
2970DATA 00000001,00000000,00000000
2980DATA 01000001,00000001,02040000
2990DATA 02020202,00000005,01000001
3000DATA 00010101,01030000,01010101
3010DATA 00000103,01000000,00000001
3020DATA 02060000,02020202,02020203
3030DATA 01000502,04000001,00000502
3040DATA 01000000,00000103,01000300
3050DATA 03000001,02020601,01000008
3060DATA 01000103,01090300,03000001
3070DATA 00000001,01000000,01000103
3080DATA 01070600,06000001,02020202
3090DATA 02020202,01000007,01000000
3100DATA 00000001,01010000,00000101
3110DATA 00000100,01000100,00010001
3120DATA 00000000,00000000,00000000
3130DATA 01000000,01010101,01010101
3140DATA 01010101,01010101,01010101
3150REM Pipe 4 data
3160DATA 60
3170DATA 01010101,01010101,01010101
3180DATA 01010101,01010101,00000001
3190DATA 00000001,00000100,09000000
3200DATA 01000000,00000001,02040001
3210DATA 00000105,03000804,01000100
3220DATA 00000001,00030101,01010103
3230DATA 06000003,01000005,00000001
3240DATA 02030204,00000007,04000003
3250DATA 01000007,00000001,02060103
3260DATA 02020202,03000007,01000000
3270DATA 00010101,00000103,01010101
3280DATA 03010101,01010000,00000001
3290DATA 02040103,01050202,07020204
3300DATA 01000000,00000001,00070206
3310DATA 01030000,00000003,01000000
3320DATA 00000001,00000000,02060001
3330DATA 00010007,01000100,00010001
3340DATA 00000000,00000000,00000000
3350DATA 01000000,01010101,01010101
3360DATA 01010101,01010101,01010101
3370REM Sprite data
3380DATA 112
3390DATA 13031303,03130313,13031303
3400DATA 03130313,23032303,03230323
3410DATA 23032303,03230323,3C3F0000
3420DATA 00003033,3C3F0000,00003033
3430DATA 3C3F0000,00003033,3C3F0000
3440DATA 00003033,00000000,00000000
3450DATA 31313131,31313131,3D3D3D3D
3460DATA 3D3D3D3D,00000000,00000000
3470DATA 00000000,00000000,35000000
3480DATA 31313131,3F3F0000,3D3D3F3F
3490DATA 3E3F0000,00003033,3C3F0000
3500DATA 00003033,3C3F0000,31313336
3510DATA 3F2A0000,3D3D3D3D,00000000
3520DATA 00000000,00000000,00000000
3530DATA 31313131,00001030,363C3D3D
3540DATA 00003033,3C3F0000,00003033
3550DATA 3C3F0000,00003033,3D3F3131
3560DATA 00003033,3F3D3D3D,0000203F
3570DATA 00000000,00000000,3C3F003A
3580DATA 00002033,3C3F3730,00313133
3590DATA 2A000035,003D3D3D,00000000
3600DATA 00000000,13031303,00000001
3610DATA 13031303,31313103,23032303
3620DATA 3D3D3D03,23032303,00000002
3630DATA 004545A2,00000000,0E0E0406
3640DATA 0404040E,0D0D0809,0808080D
3650DATA 008A8A51,00000000,00000000
3660DATA 00000400,0E0A0A00,00030703
3670DATA 0D050500,00030B03,00000000
3680DATA 00000800,00040000,00000000
3690DATA 03070300,000A0A0E,030B0300
3700DATA 0005050D,00080000,00000000
3710DATA 01010000,00000101,0B030800
3720DATA 0008030B,080F0000,00000F08
3730DATA 000A0000,00000A00,00050000
3740DATA 00000500,040F0000,00000F04
3750DATA 07030400,00040307,02020000
3760DATA 00000202
� Pipeline
� By James Bee
� (c) The Micro User
(+� �<&1900 � �=&1900:�"PIPLINE" � � �trG
2�2
<<left=&1100:right=&1112:up=&1124:down=&1136:display=&114F
F9sp=&1222:dht=&11B5:set1=&1148:check=&78:compare=&120C
P� SC%(6),N$(6):*FX213,1
Z area=&B00:time=1000:*FX9,1
d memL=&70:memH=&71:*FX10,1
n6� I%=0 � 5:N$(I%)="Micro User":SC%(I%)=(6-I%)*20:�
x�title:zs$="0000"
��dh("Keys",7,6,6)
���5:�''''�4"Z - Left"''�4"X - Right"''�4": - Up"''�4"/ - Down"''�4"H - Help"''�4"Q - End Game"''�4"RET - Pick"''�4"SFT - Drop"
�&�dh("Press SPACE to start",0,28,1)
�&T%=�:�:G$=�(0):� G$=" " � �>T%+700
�� G$=" " � �d\@
�#�dis:�dh("by James Bee",5,29,9)
�&T%=�:�:G$=�(0):� G$=" " � �>T%+700
�� G$=" " � �d\@
� �Dx@
�� �thG:scr=0
�level=1:H%=0:Q=0
�#�12,19,2,0,0,0,0,23;8202;0;0;0;
��dh("Pipeline",6,1,3)
A$=�scr
�dh(�zs$+A$,3),12,29,2)
�
"L%=&7887:?check=199
,nx=18:ny=1:piece=0
6nastmem=area+ny*20+nx
@mem=area+201
J� M%
T
�copy(M%)
^
�disp(M%)
h� I%=&7880 � &7980 � 32
r
�sp(I%,2)
| � 2,-9,(I%-&7880)/32+200,1
��
�
�sp(I%,8)
� �20:�box
� �d(200)
�� I%=0 � &F0
�$� ?(M%+I%)<2 � ?(M%+I%)>7 � �d`A
�
R%=�(235)
�0� ?(area+R%)<>0 � area+R%=mem � R%=38 � �dBA
�"?(area+R%)=?(M%+I%):�1,-2,R%,1
��:�disp(area)
�
�setst
��=0
��
T%=�
�
�nasty
&� �-17 Q=1
0� �-98 �left:�DXB
:� �-67 �right:�DXB
D� �-73 �up:�DXB
N� �-105 �down
X� �-74 � piece=0 �pick
b� �-1 � piece>0 �put
l� �-85 � H%<3 �hlp
v �d(7)
� � �>T%+time � ?check=0 � Q=1
� ?L%=48:L%?633=48:L%=L%+8
��7
�� �>38*time Q=1
�� ?check=0 � Q=1
�S%=�
��28,1,25,18,6,12,26
� �dh("Pipe "+�level,7,8,6)
�D� ?check=0 �dh("Complete",6,11,6):�dh("Well done!",5,15,5):�ddB
�3�dh("Incomplete",5,11,6):�dh("Bad luck",6,15,5)
�%�scr:�dh("Press any key!",3,22,7)
� *FX15
�+G=�:level=level+1:� level=5 � ?check<>0
�hi:�tt@
� �disp(D%)
X%=D%�256:Y%=D%�256
�display:�
*� �left:B%=14
4� mem?-1 A%=14:�set1:�
>mem=mem-1:A%=0:�set1
H �left:�
R� �right:B%=13
\� mem?1 A%=13:�set1:�
fmem=mem+1:A%=0:�set1
p �right:�
z� �up:B%=11
�� mem?-20 A%=11:�set1:�
�mem=mem-20:A%=0:�set1
� �up:�
�� �down:B%=12
�� mem?20 A%=12:�set1:�
�mem=mem+20:A%=0:�set1
� �down:�
�� �pick:�udlr
�� ?pmem<2 � ?pmem>7 �
�@piece=?pmem:?pmem=0:�disp(&B00):�sp(&7AB0,piece):A%=B%:�set1
��
�� �put:�udlr
�*� ?pmem>0 � pmem=nastmem � pmem=&BC9 �
4?pmem=piece:�disp(&B00):�sp(&7AB0,0):A%=B%:�set1
A� ?(M%+pmem-&B00)=piece �19,0,4,0,0,0:�d(20):�20:� 1,-9,255,2
piece=0
$X%=M%�256:Y%=M%�256
.�compare:�
8� �copy(Q%)
B� I%=0 � &F0
L1� I%?Q%<2 � I%?Q%>7 I%?&B00=I%?Q% � I%?&B00=0
V�:�
` � �d(U%)
jE%=�:�� �>E%+U%
t�
~� �hlp:ZZ%=�
��disp(M%):�d(200)
�H%=H%+1:�disp(area)
�A%=B%:�set1:�=ZZ%:�
�� �dh(S$,X,Y,C):� C
�� J%:�X,Y);
�� J%=1 � �S$
�A%=��S$,J%):�dht:�
��
�� �sp(loc,F%):A%=F%
� X%=loc � 256:Y%=loc � 256
� �sp:�
� � �udlr
� B%=11 pmem=mem-20
� B%=12 pmem=mem+20
� B%=13 pmem=mem+1
� B%=14 pmem=mem-1
(�
2 � �nasty
<� nastmem=mem � �tBE
F �sp(&3A00+nx*32+ny*1280,0)
P D%=�(4)
Z5� D%=1 � nastmem?-20=0 ny=ny-1:nastmem=nastmem-20
d4� D%=2 � nastmem?20=0 ny=ny+1:nastmem=nastmem+20
n2� D%=3 � nastmem?1=0 nx=nx+1:nastmem=nastmem+1
x3� D%=4 � nastmem?-1=0 nx=nx-1:nastmem=nastmem-1
� �sp(&3A00+nx*32+ny*1280,10)
�B� nastmem=mem � I%=128 � 0 �-2:� 2,-9,I%,1:�:A%=0:�set1:�setst
��
� � �setst
� memloc=&3A00+(10*1280)+32
�?memL=memloc � 256
�?memH=memloc � 256
��sp(memloc,11):B%=11
�mem=area+20*10+1:�
�
� �box
�<� 1098,104:�1098+104,104:�1098+104,20:�1098,20:�1098,104
��
�
� �scr
*FX213,255
*FX214,1
� I%=0 � &F0
" � M%?I%<2 � M%?I%>7 � �D^F
,� M%?I%<>area?I% � �D^F
6� area?I%<4 scr=scr+1
@� area?I%>3 scr=scr+5
J#A$=�scr:�dh(�zs$+A$,3),12,29,2)
T�7
^�
h *FX213,1
r � Q=1 �
|�dh("Bonus!",7,18,3)
�D� I%=S% � 37*time � time:?L%=48:?(L%+633)=48:L%=L%+8:� 2,-2,I%,1
�/scr=scr+5:A$=�scr:�dh(�zs$+A$,3),12,29,2):�
��
�� �input:�title
� �dh("You are in the",2,7,6)
�#�dh("High Score table!",1,10,6)
�!�dh("Enter Your Name",2,16,5)
��dh(�12," "),4,21,132)
��dh(�12," "),4,23,132)
�N$="":�5,23);
��:�23,1,1;0;0;0;:K%=�
� � K%=127 N$=�N$,�N$-1):�TRG
�� K%=13 ��T\G
� �N$<10 N$=N$+�K%
�dh(N$+" ",5,22,7):�8,10
� K%=13:�128:�
&� �hi:SC%=scr:*FX21
0�SC%<SC%(5) ��DNG
:}�I%=0 � 5:�SC%<SC%(I%) � � � J%=5 � I%+1 �-1:SC%(J%)=SC%(J%-1):N$(J%)=N$(J%-1):�:SC%(I%)=SC%:N$(I%)="":N%=I%:SC%=0:I%=5:�
D�input:N$(N%)=N$
N�
X� �dis:�title
b �dh("Top Plumbers",3,6,6)
l6�J%=0 � 5:�dh(N$(J%)+�14-�N$(J%),"."),2,10+J%*3,5)
v �dh(�(SC%(J%)),16,10+J%*3,7)
��:�
� � �title:�12,23;8202;0;0;0;
��dh("Pipeline!",5,3,3)
��
�� &900,&A00,&E00,&F00
��7:��DfH:� Cut here
��"Assembling...":*TAPE
��read(&1100,"Code")
��read(&0900,"Pipe 1")
��read(&0A00,"Pipe 2")
��read(&0E00,"Pipe 3")
��read(&0F00,"Pipe 4")
� �read(&1320,"Sprite"):*FX18
� I%=0 � 31:?(&1300+I%)=0:�
�"Please wait some more...";
��21:*K.0RESTORE2190:I%=(2+!&1C)AND&FFFF:REPEATI%=I%-1:U.?I%=13:I%?1=&FF|MOLD|MFOR I%=0 TO TOP STEP 4:I%!&1500=I%!PAGE:NEXT|MPAGE=&1500|MOLD|M40|MRUN|F|M
*FX138,0,128
*�
4� �read(M%,B$):� B$
>� Q%:� J%=1 � Q%:� C$
H!M%=�("&"+C$):M%=M%+4
R�:�
\
� Code
f� 97
p � E970A538,A5708520,8500E971
z � 4C0EA971,A5181148,85206970
� � 6971A570,A9718500,11484C0D
� � E970A538,A5708500,8505E971
� � 4C0BA971,A5181148,85006970
� � 6971A570,A9718505,11484C0C
� � 71A470A6,8E12224C,698C1168
� � 8500A911,853AA974,850BA975
� � 8500A98B,BD8CA68C,74A69999
� � 222075A4,74A51812,74852069
� � 006975A5,8CE67585,14C98CA5
� � AD18DFD0,14691168,AD11688D
� � 00691169,1811698D,806974A5
� � 75A57485,75850269,03308BC6
� � 6011614C,81A9FFA0,8AFFF420
� 12798D60,79A20AA9,F12012A0
� 2017A9FF,FEA9FFEE,A2FFEE20
� 127ABD00,20FFEE20,E0E8FFEE
$ � A9F2D004,FFEE2017,EE20FFA9
. � 127ABDFF,20FFEE20,E0E8FFEE
8 � A9F2D008,FFEE20FE,EE200AA9
B � 2008A9FF,FFA9FFEE,A9FFEE20
L � FFEE4C0B,8C12158E,EBA21216
V � DD9999BD,03D00B00,86F5D0CA
` � 76866078,00A27784,0A0A8F86
j � 0A8F260A,260A8F26,0069188F
t � A912458D,8D8F6513,00A01246
~ � 919999BD,7691C876,20E0E8C8
� � 29981EF0,E8EDD007,E0E8E8E8
� � 18E5D020,806976A5,77A57685
� � 77850269,D2D004A2,1D041F60
� � 00000611,00000000,00000000
�� 00000000
�� Pipe 1 Data
�� 60
� � 01010101,01010101,01010101
� � 01010101,01010101,00000001
� � 00000000,00000001,00010000
� � 01000000,02040101,00000005
� � 00000001,00010100,01000000
� 01030901,01000506,00010101
� 05040000,01000000,01070601
� 01000301,00000000,03030000
� 01000000,00000001,00000300
( � 00000000,03030100,01000000
2 � 00000001,01010300,01010000
< � 06030101,01000008,00000001
F � 04010300,02020202,00070202
P � 01000000,00000001,07020600
Z � 01000101,00000000,01010101
d � 00000001,00000000,01000000
n � 00010101,01000000,00010001
x � 00000000,01000000,00000000
� � 01000000,01010101,01010101
� � 01010101,01010101,01010101
�� Pipe 2 data
�� 60
� � 01010101,01010101,01010101
� � 01010101,01010101,00000001
� � 09000000,01010000,00000000
� � 01000000,00010001,07020204
� � 04010100,08020202,01000000
� � 00000101,00000003,07040100
� � 00010000,01010100,00000001
� � 04000103,00070202,00010000
� � 01000100,00000001,03000103
� 00000000,00000000,01000000
� 00000101,03020403,05020202
� 00000001,01000001,00010001
" � 03010706,03000000,01000000
, � 01000001,00000001,03010000
6 � 03000101,00000000,01010000
@ � 00000001,06000000,07020202
J � 00010101,01000000,00010001
T � 00000000,01000000,00000000
^ � 01000000,01010101,01010101
h � 01010101,01010101,01010101
r� Pipe 3 data
|� 60
� � 01010101,01010101,01010101
� � 01010101,01010101,00000001
� � 00000001,00000000,00000000
� � 01000001,00000001,02040000
� � 02020202,00000005,01000001
� � 00010101,01030000,01010101
� � 00000103,01000000,00000001
� � 02060000,02020202,02020203
� � 01000502,04000001,00000502
� � 01000000,00000103,01000300
� � 03000001,02020601,01000008
� � 01000103,01090300,03000001
� � 00000001,01000000,01000103
� 01070600,06000001,02020202
� 02020202,01000007,01000000
� 00000001,01010000,00000101
& � 00000100,01000100,00010001
0 � 00000000,00000000,00000000
: � 01000000,01010101,01010101
D � 01010101,01010101,01010101
N� Pipe 4 data
X� 60
b � 01010101,01010101,01010101
l � 01010101,01010101,00000001
v � 00000001,00000100,09000000
� � 01000000,00000001,02040001
� � 00000105,03000804,01000100
� � 00000001,00030101,01010103
� � 06000003,01000005,00000001
� � 02030204,00000007,04000003
� � 01000007,00000001,02060103
� � 02020202,03000007,01000000
� � 00010101,00000103,01010101
� � 03010101,01010000,00000001
� � 02040103,01050202,07020204
� � 01000000,00000001,00070206
� � 01030000,00000003,01000000
� � 00000001,00000000,02060001
� 00010007,01000100,00010001
� 00000000,00000000,00000000
� 01000000,01010101,01010101
� 01010101,01010101,01010101
*� Sprite data
4 � 112
> � 13031303,03130313,13031303
H � 03130313,23032303,03230323
R � 23032303,03230323,3C3F0000
\ � 00003033,3C3F0000,00003033
f � 3C3F0000,00003033,3C3F0000
p � 00003033,00000000,00000000
z � 31313131,31313131,3D3D3D3D
� � 3D3D3D3D,00000000,00000000
� � 00000000,00000000,35000000
� � 31313131,3F3F0000,3D3D3F3F
� � 3E3F0000,00003033,3C3F0000
� � 00003033,3C3F0000,31313336
� � 3F2A0000,3D3D3D3D,00000000
� � 00000000,00000000,00000000
� � 31313131,00001030,363C3D3D
� � 00003033,3C3F0000,00003033
� � 3C3F0000,00003033,3D3F3131
� � 00003033,3F3D3D3D,0000203F
� � 00000000,00000000,3C3F003A
� � 00002033,3C3F3730,00313133
� 2A000035,003D3D3D,00000000
� 00000000,13031303,00000001
� 13031303,31313103,23032303
$ � 3D3D3D03,23032303,00000002
. � 004545A2,00000000,0E0E0406
8 � 0404040E,0D0D0809,0808080D
B � 008A8A51,00000000,00000000
L � 00000400,0E0A0A00,00030703
V � 0D050500,00030B03,00000000
` � 00000800,00040000,00000000
j � 03070300,000A0A0E,030B0300
t � 0005050D,00080000,00000000
~ � 01010000,00000101,0B030800
� � 0008030B,080F0000,00000F08
� � 000A0000,00000A00,00050000
� � 00000500,040F0000,00000F04
� � 07030400,00040307,02020000
�� 00000202
� 00000000 0d 00 0a 0e f4 20 50 69 70 65 6c 69 6e 65 0d 00 |..... Pipeline..|
00000010 14 12 f4 20 42 79 20 4a 61 6d 65 73 20 42 65 65 |... By James Bee|
00000020 0d 00 1e 18 f4 20 28 63 29 20 54 68 65 20 4d 69 |..... (c) The Mi|
00000030 63 72 6f 20 55 73 65 72 0d 00 28 2b e7 20 90 3c |cro User..(+. .<|
00000040 26 31 39 30 30 20 8c 20 d0 3d 26 31 39 30 30 3a |&1900 . .=&1900:|
00000050 d7 22 50 49 50 4c 49 4e 45 22 20 8b 20 e5 20 8d |."PIPLINE" . . .|
00000060 74 72 47 0d 00 32 06 eb 32 0d 00 3c 3c 6c 65 66 |trG..2..2..<<lef|
00000070 74 3d 26 31 31 30 30 3a 72 69 67 68 74 3d 26 31 |t=&1100:right=&1|
00000080 31 31 32 3a 75 70 3d 26 31 31 32 34 3a 64 6f 77 |112:up=&1124:dow|
00000090 6e 3d 26 31 31 33 36 3a 64 69 73 70 6c 61 79 3d |n=&1136:display=|
000000a0 26 31 31 34 46 0d 00 46 39 73 70 3d 26 31 32 32 |&114F..F9sp=&122|
000000b0 32 3a 64 68 74 3d 26 31 31 42 35 3a 73 65 74 31 |2:dht=&11B5:set1|
000000c0 3d 26 31 31 34 38 3a 63 68 65 63 6b 3d 26 37 38 |=&1148:check=&78|
000000d0 3a 63 6f 6d 70 61 72 65 3d 26 31 32 30 43 0d 00 |:compare=&120C..|
000000e0 50 1b de 20 53 43 25 28 36 29 2c 4e 24 28 36 29 |P.. SC%(6),N$(6)|
000000f0 3a 2a 46 58 32 31 33 2c 31 0d 00 5a 1e 61 72 65 |:*FX213,1..Z.are|
00000100 61 3d 26 42 30 30 3a 74 69 6d 65 3d 31 30 30 30 |a=&B00:time=1000|
00000110 3a 2a 46 58 39 2c 31 0d 00 64 1d 6d 65 6d 4c 3d |:*FX9,1..d.memL=|
00000120 26 37 30 3a 6d 65 6d 48 3d 26 37 31 3a 2a 46 58 |&70:memH=&71:*FX|
00000130 31 30 2c 31 0d 00 6e 36 e3 20 49 25 3d 30 20 b8 |10,1..n6. I%=0 .|
00000140 20 35 3a 4e 24 28 49 25 29 3d 22 4d 69 63 72 6f | 5:N$(I%)="Micro|
00000150 20 55 73 65 72 22 3a 53 43 25 28 49 25 29 3d 28 | User":SC%(I%)=(|
00000160 36 2d 49 25 29 2a 32 30 3a ed 0d 00 78 15 f2 74 |6-I%)*20:...x..t|
00000170 69 74 6c 65 3a 7a 73 24 3d 22 30 30 30 30 22 0d |itle:zs$="0000".|
00000180 00 82 15 f2 64 68 28 22 4b 65 79 73 22 2c 37 2c |....dh("Keys",7,|
00000190 36 2c 36 29 0d 00 8c 81 fb 35 3a f1 27 27 27 27 |6,6).....5:.''''|
000001a0 89 34 22 5a 20 2d 20 4c 65 66 74 22 27 27 89 34 |.4"Z - Left"''.4|
000001b0 22 58 20 2d 20 52 69 67 68 74 22 27 27 89 34 22 |"X - Right"''.4"|
000001c0 3a 20 2d 20 55 70 22 27 27 89 34 22 2f 20 2d 20 |: - Up"''.4"/ - |
000001d0 44 6f 77 6e 22 27 27 89 34 22 48 20 2d 20 48 65 |Down"''.4"H - He|
000001e0 6c 70 22 27 27 89 34 22 51 20 2d 20 45 6e 64 20 |lp"''.4"Q - End |
000001f0 47 61 6d 65 22 27 27 89 34 22 52 45 54 20 2d 20 |Game"''.4"RET - |
00000200 50 69 63 6b 22 27 27 89 34 22 53 46 54 20 2d 20 |Pick"''.4"SFT - |
00000210 44 72 6f 70 22 0d 00 96 26 f2 64 68 28 22 50 72 |Drop"...&.dh("Pr|
00000220 65 73 73 20 53 50 41 43 45 20 74 6f 20 73 74 61 |ess SPACE to sta|
00000230 72 74 22 2c 30 2c 32 38 2c 31 29 0d 00 a0 26 54 |rt",0,28,1)...&T|
00000240 25 3d 91 3a f5 3a 47 24 3d bf 28 30 29 3a fd 20 |%=.:.:G$=.(0):. |
00000250 47 24 3d 22 20 22 20 84 20 91 3e 54 25 2b 37 30 |G$=" " . .>T%+70|
00000260 30 0d 00 aa 13 e7 20 47 24 3d 22 20 22 20 8c 20 |0..... G$=" " . |
00000270 8d 64 5c 40 0d 00 b4 23 f2 64 69 73 3a f2 64 68 |.d\@...#.dis:.dh|
00000280 28 22 62 79 20 4a 61 6d 65 73 20 42 65 65 22 2c |("by James Bee",|
00000290 35 2c 32 39 2c 39 29 0d 00 be 26 54 25 3d 91 3a |5,29,9)...&T%=.:|
000002a0 f5 3a 47 24 3d bf 28 30 29 3a fd 20 47 24 3d 22 |.:G$=.(0):. G$="|
000002b0 20 22 20 84 20 91 3e 54 25 2b 37 30 30 0d 00 c8 | " . .>T%+700...|
000002c0 13 e7 20 47 24 3d 22 20 22 20 8c 20 8d 64 5c 40 |.. G$=" " . .d\@|
000002d0 0d 00 d2 09 e5 8d 44 78 40 0d 00 dc 10 f7 20 8d |......Dx@..... .|
000002e0 74 68 47 3a 73 63 72 3d 30 0d 00 e6 14 6c 65 76 |thG:scr=0....lev|
000002f0 65 6c 3d 31 3a 48 25 3d 30 3a 51 3d 30 0d 00 f0 |el=1:H%=0:Q=0...|
00000300 23 ef 31 32 2c 31 39 2c 32 2c 30 2c 30 2c 30 2c |#.12,19,2,0,0,0,|
00000310 30 2c 32 33 3b 38 32 30 32 3b 30 3b 30 3b 30 3b |0,23;8202;0;0;0;|
00000320 0d 00 fa 19 f2 64 68 28 22 50 69 70 65 6c 69 6e |.....dh("Pipelin|
00000330 65 22 2c 36 2c 31 2c 33 29 0d 01 04 0b 41 24 3d |e",6,1,3)....A$=|
00000340 c3 73 63 72 0d 01 0e 1b f2 64 68 28 c2 7a 73 24 |.scr.....dh(.zs$|
00000350 2b 41 24 2c 33 29 2c 31 32 2c 32 39 2c 32 29 0d |+A$,3),12,29,2).|
00000360 01 18 05 f5 0d 01 22 17 4c 25 3d 26 37 38 38 37 |......".L%=&7887|
00000370 3a 3f 63 68 65 63 6b 3d 31 39 39 0d 01 2c 16 6e |:?check=199..,.n|
00000380 78 3d 31 38 3a 6e 79 3d 31 3a 70 69 65 63 65 3d |x=18:ny=1:piece=|
00000390 30 0d 01 36 19 6e 61 73 74 6d 65 6d 3d 61 72 65 |0..6.nastmem=are|
000003a0 61 2b 6e 79 2a 32 30 2b 6e 78 0d 01 40 10 6d 65 |a+ny*20+nx..@.me|
000003b0 6d 3d 61 72 65 61 2b 32 30 31 0d 01 4a 08 f3 20 |m=area+201..J.. |
000003c0 4d 25 0d 01 54 0d f2 63 6f 70 79 28 4d 25 29 0d |M%..T..copy(M%).|
000003d0 01 5e 0d f2 64 69 73 70 28 4d 25 29 0d 01 68 1b |.^..disp(M%)..h.|
000003e0 e3 20 49 25 3d 26 37 38 38 30 20 b8 20 26 37 39 |. I%=&7880 . &79|
000003f0 38 30 20 88 20 33 32 0d 01 72 0d f2 73 70 28 49 |80 . 32..r..sp(I|
00000400 25 2c 32 29 0d 01 7c 1e d4 20 32 2c 2d 39 2c 28 |%,2)..|.. 2,-9,(|
00000410 49 25 2d 26 37 38 38 30 29 2f 33 32 2b 32 30 30 |I%-&7880)/32+200|
00000420 2c 31 0d 01 86 05 ed 0d 01 90 0d f2 73 70 28 49 |,1..........sp(I|
00000430 25 2c 38 29 0d 01 9a 0c ef 32 30 3a f2 62 6f 78 |%,8).....20:.box|
00000440 0d 01 a4 0b f2 64 28 32 30 30 29 0d 01 ae 10 e3 |.....d(200).....|
00000450 20 49 25 3d 30 20 b8 20 26 46 30 0d 01 b8 24 e7 | I%=0 . &F0...$.|
00000460 20 3f 28 4d 25 2b 49 25 29 3c 32 20 84 20 3f 28 | ?(M%+I%)<2 . ?(|
00000470 4d 25 2b 49 25 29 3e 37 20 8c 20 8d 64 60 41 0d |M%+I%)>7 . .d`A.|
00000480 01 c2 0d 52 25 3d b3 28 32 33 35 29 0d 01 cc 30 |...R%=.(235)...0|
00000490 e7 20 3f 28 61 72 65 61 2b 52 25 29 3c 3e 30 20 |. ?(area+R%)<>0 |
000004a0 84 20 61 72 65 61 2b 52 25 3d 6d 65 6d 20 84 20 |. area+R%=mem . |
000004b0 52 25 3d 33 38 20 8c 20 8d 64 42 41 0d 01 d6 22 |R%=38 . .dBA..."|
000004c0 3f 28 61 72 65 61 2b 52 25 29 3d 3f 28 4d 25 2b |?(area+R%)=?(M%+|
000004d0 49 25 29 3a d4 31 2c 2d 32 2c 52 25 2c 31 0d 01 |I%):.1,-2,R%,1..|
000004e0 e0 11 ed 3a f2 64 69 73 70 28 61 72 65 61 29 0d |...:.disp(area).|
000004f0 01 ea 0a f2 73 65 74 73 74 0d 01 f4 07 d1 3d 30 |....setst.....=0|
00000500 0d 01 fe 05 f5 0d 02 08 08 54 25 3d 91 0d 02 12 |.........T%=....|
00000510 05 f5 0d 02 1c 0a f2 6e 61 73 74 79 0d 02 26 0e |.......nasty..&.|
00000520 e7 20 a6 2d 31 37 20 51 3d 31 0d 02 30 16 e7 20 |. .-17 Q=1..0.. |
00000530 a6 2d 39 38 20 f2 6c 65 66 74 3a e5 8d 44 58 42 |.-98 .left:..DXB|
00000540 0d 02 3a 17 e7 20 a6 2d 36 37 20 f2 72 69 67 68 |..:.. .-67 .righ|
00000550 74 3a e5 8d 44 58 42 0d 02 44 14 e7 20 a6 2d 37 |t:..DXB..D.. .-7|
00000560 33 20 f2 75 70 3a e5 8d 44 58 42 0d 02 4e 11 e7 |3 .up:..DXB..N..|
00000570 20 a6 2d 31 30 35 20 f2 64 6f 77 6e 0d 02 58 1a | .-105 .down..X.|
00000580 e7 20 a6 2d 37 34 20 e7 20 70 69 65 63 65 3d 30 |. .-74 . piece=0|
00000590 20 f2 70 69 63 6b 0d 02 62 18 e7 20 a6 2d 31 20 | .pick..b.. .-1 |
000005a0 e7 20 70 69 65 63 65 3e 30 20 f2 70 75 74 0d 02 |. piece>0 .put..|
000005b0 6c 16 e7 20 a6 2d 38 35 20 e7 20 48 25 3c 33 20 |l.. .-85 . H%<3 |
000005c0 f2 68 6c 70 0d 02 76 09 f2 64 28 37 29 0d 02 80 |.hlp..v..d(7)...|
000005d0 20 fd 20 91 3e 54 25 2b 74 69 6d 65 20 84 20 3f | . .>T%+time . ?|
000005e0 63 68 65 63 6b 3d 30 20 84 20 51 3d 31 0d 02 8a |check=0 . Q=1...|
000005f0 1c 3f 4c 25 3d 34 38 3a 4c 25 3f 36 33 33 3d 34 |.?L%=48:L%?633=4|
00000600 38 3a 4c 25 3d 4c 25 2b 38 0d 02 94 06 ef 37 0d |8:L%=L%+8.....7.|
00000610 02 9e 13 e7 20 91 3e 33 38 2a 74 69 6d 65 20 51 |.... .>38*time Q|
00000620 3d 31 0d 02 a8 14 fd 20 3f 63 68 65 63 6b 3d 30 |=1..... ?check=0|
00000630 20 84 20 51 3d 31 0d 02 b2 08 53 25 3d 91 0d 02 | . Q=1....S%=...|
00000640 bc 17 ef 32 38 2c 31 2c 32 35 2c 31 38 2c 36 2c |...28,1,25,18,6,|
00000650 31 32 2c 32 36 0d 02 c6 1d f2 64 68 28 22 50 69 |12,26.....dh("Pi|
00000660 70 65 20 22 2b c3 6c 65 76 65 6c 2c 37 2c 38 2c |pe "+.level,7,8,|
00000670 36 29 0d 02 d0 44 e7 20 3f 63 68 65 63 6b 3d 30 |6)...D. ?check=0|
00000680 20 f2 64 68 28 22 43 6f 6d 70 6c 65 74 65 22 2c | .dh("Complete",|
00000690 36 2c 31 31 2c 36 29 3a f2 64 68 28 22 57 65 6c |6,11,6):.dh("Wel|
000006a0 6c 20 64 6f 6e 65 21 22 2c 35 2c 31 35 2c 35 29 |l done!",5,15,5)|
000006b0 3a e5 8d 64 64 42 0d 02 da 33 f2 64 68 28 22 49 |:..ddB...3.dh("I|
000006c0 6e 63 6f 6d 70 6c 65 74 65 22 2c 35 2c 31 31 2c |ncomplete",5,11,|
000006d0 36 29 3a f2 64 68 28 22 42 61 64 20 6c 75 63 6b |6):.dh("Bad luck|
000006e0 22 2c 36 2c 31 35 2c 35 29 0d 02 e4 25 f2 73 63 |",6,15,5)...%.sc|
000006f0 72 3a f2 64 68 28 22 50 72 65 73 73 20 61 6e 79 |r:.dh("Press any|
00000700 20 6b 65 79 21 22 2c 33 2c 32 32 2c 37 29 0d 02 | key!",3,22,7)..|
00000710 ee 09 2a 46 58 31 35 0d 02 f8 2b 47 3d a5 3a 6c |..*FX15...+G=.:l|
00000720 65 76 65 6c 3d 6c 65 76 65 6c 2b 31 3a fd 20 6c |evel=level+1:. l|
00000730 65 76 65 6c 3d 35 20 84 20 3f 63 68 65 63 6b 3c |evel=5 . ?check<|
00000740 3e 30 0d 03 02 0d f2 68 69 3a e5 8d 74 74 40 0d |>0.....hi:..tt@.|
00000750 03 0c 0f dd 20 f2 64 69 73 70 28 44 25 29 0d 03 |.... .disp(D%)..|
00000760 16 17 58 25 3d 44 25 83 32 35 36 3a 59 25 3d 44 |..X%=D%.256:Y%=D|
00000770 25 81 32 35 36 0d 03 20 0e d6 64 69 73 70 6c 61 |%.256.. ..displa|
00000780 79 3a e1 0d 03 2a 11 dd 20 f2 6c 65 66 74 3a 42 |y:...*.. .left:B|
00000790 25 3d 31 34 0d 03 34 1a e7 20 6d 65 6d 3f 2d 31 |%=14..4.. mem?-1|
000007a0 20 41 25 3d 31 34 3a d6 73 65 74 31 3a e1 0d 03 | A%=14:.set1:...|
000007b0 3e 18 6d 65 6d 3d 6d 65 6d 2d 31 3a 41 25 3d 30 |>.mem=mem-1:A%=0|
000007c0 3a d6 73 65 74 31 0d 03 48 0b d6 6c 65 66 74 3a |:.set1..H..left:|
000007d0 e1 0d 03 52 12 dd 20 f2 72 69 67 68 74 3a 42 25 |...R.. .right:B%|
000007e0 3d 31 33 0d 03 5c 19 e7 20 6d 65 6d 3f 31 20 41 |=13..\.. mem?1 A|
000007f0 25 3d 31 33 3a d6 73 65 74 31 3a e1 0d 03 66 18 |%=13:.set1:...f.|
00000800 6d 65 6d 3d 6d 65 6d 2b 31 3a 41 25 3d 30 3a d6 |mem=mem+1:A%=0:.|
00000810 73 65 74 31 0d 03 70 0c d6 72 69 67 68 74 3a e1 |set1..p..right:.|
00000820 0d 03 7a 0f dd 20 f2 75 70 3a 42 25 3d 31 31 0d |..z.. .up:B%=11.|
00000830 03 84 1b e7 20 6d 65 6d 3f 2d 32 30 20 41 25 3d |.... mem?-20 A%=|
00000840 31 31 3a d6 73 65 74 31 3a e1 0d 03 8e 19 6d 65 |11:.set1:.....me|
00000850 6d 3d 6d 65 6d 2d 32 30 3a 41 25 3d 30 3a d6 73 |m=mem-20:A%=0:.s|
00000860 65 74 31 0d 03 98 09 d6 75 70 3a e1 0d 03 a2 11 |et1.....up:.....|
00000870 dd 20 f2 64 6f 77 6e 3a 42 25 3d 31 32 0d 03 ac |. .down:B%=12...|
00000880 1a e7 20 6d 65 6d 3f 32 30 20 41 25 3d 31 32 3a |.. mem?20 A%=12:|
00000890 d6 73 65 74 31 3a e1 0d 03 b6 19 6d 65 6d 3d 6d |.set1:.....mem=m|
000008a0 65 6d 2b 32 30 3a 41 25 3d 30 3a d6 73 65 74 31 |em+20:A%=0:.set1|
000008b0 0d 03 c0 0b d6 64 6f 77 6e 3a e1 0d 03 ca 11 dd |.....down:......|
000008c0 20 f2 70 69 63 6b 3a f2 75 64 6c 72 0d 03 d4 19 | .pick:.udlr....|
000008d0 e7 20 3f 70 6d 65 6d 3c 32 20 84 20 3f 70 6d 65 |. ?pmem<2 . ?pme|
000008e0 6d 3e 37 20 e1 0d 03 de 40 70 69 65 63 65 3d 3f |m>7 ....@piece=?|
000008f0 70 6d 65 6d 3a 3f 70 6d 65 6d 3d 30 3a f2 64 69 |pmem:?pmem=0:.di|
00000900 73 70 28 26 42 30 30 29 3a f2 73 70 28 26 37 41 |sp(&B00):.sp(&7A|
00000910 42 30 2c 70 69 65 63 65 29 3a 41 25 3d 42 25 3a |B0,piece):A%=B%:|
00000920 d6 73 65 74 31 0d 03 e8 05 e1 0d 03 f2 10 dd 20 |.set1.......... |
00000930 f2 70 75 74 3a f2 75 64 6c 72 0d 03 fc 2a e7 20 |.put:.udlr...*. |
00000940 3f 70 6d 65 6d 3e 30 20 84 20 70 6d 65 6d 3d 6e |?pmem>0 . pmem=n|
00000950 61 73 74 6d 65 6d 20 84 20 70 6d 65 6d 3d 26 42 |astmem . pmem=&B|
00000960 43 39 20 e1 0d 04 06 34 3f 70 6d 65 6d 3d 70 69 |C9 ....4?pmem=pi|
00000970 65 63 65 3a f2 64 69 73 70 28 26 42 30 30 29 3a |ece:.disp(&B00):|
00000980 f2 73 70 28 26 37 41 42 30 2c 30 29 3a 41 25 3d |.sp(&7AB0,0):A%=|
00000990 42 25 3a d6 73 65 74 31 0d 04 10 41 e7 20 3f 28 |B%:.set1...A. ?(|
000009a0 4d 25 2b 70 6d 65 6d 2d 26 42 30 30 29 3d 70 69 |M%+pmem-&B00)=pi|
000009b0 65 63 65 20 ef 31 39 2c 30 2c 34 2c 30 2c 30 2c |ece .19,0,4,0,0,|
000009c0 30 3a f2 64 28 32 30 29 3a ef 32 30 3a d4 20 31 |0:.d(20):.20:. 1|
000009d0 2c 2d 39 2c 32 35 35 2c 32 0d 04 1a 0b 70 69 65 |,-9,255,2....pie|
000009e0 63 65 3d 30 0d 04 24 17 58 25 3d 4d 25 83 32 35 |ce=0..$.X%=M%.25|
000009f0 36 3a 59 25 3d 4d 25 81 32 35 36 0d 04 2e 0e d6 |6:Y%=M%.256.....|
00000a00 63 6f 6d 70 61 72 65 3a e1 0d 04 38 0f dd 20 f2 |compare:...8.. .|
00000a10 63 6f 70 79 28 51 25 29 0d 04 42 10 e3 20 49 25 |copy(Q%)..B.. I%|
00000a20 3d 30 20 b8 20 26 46 30 0d 04 4c 31 e7 20 49 25 |=0 . &F0..L1. I%|
00000a30 3f 51 25 3c 32 20 84 20 49 25 3f 51 25 3e 37 20 |?Q%<2 . I%?Q%>7 |
00000a40 49 25 3f 26 42 30 30 3d 49 25 3f 51 25 20 8b 20 |I%?&B00=I%?Q% . |
00000a50 49 25 3f 26 42 30 30 3d 30 0d 04 56 07 ed 3a e1 |I%?&B00=0..V..:.|
00000a60 0d 04 60 0c dd 20 f2 64 28 55 25 29 0d 04 6a 13 |..`.. .d(U%)..j.|
00000a70 45 25 3d 91 3a f5 fd 20 91 3e 45 25 2b 55 25 0d |E%=.:.. .>E%+U%.|
00000a80 04 74 05 e1 0d 04 7e 10 dd 20 f2 68 6c 70 3a 5a |.t....~.. .hlp:Z|
00000a90 5a 25 3d 91 0d 04 88 15 f2 64 69 73 70 28 4d 25 |Z%=......disp(M%|
00000aa0 29 3a f2 64 28 32 30 30 29 0d 04 92 17 48 25 3d |):.d(200)....H%=|
00000ab0 48 25 2b 31 3a f2 64 69 73 70 28 61 72 65 61 29 |H%+1:.disp(area)|
00000ac0 0d 04 9c 17 41 25 3d 42 25 3a d6 73 65 74 31 3a |....A%=B%:.set1:|
00000ad0 d1 3d 5a 5a 25 3a e1 0d 04 a6 17 dd 20 f2 64 68 |.=ZZ%:...... .dh|
00000ae0 28 53 24 2c 58 2c 59 2c 43 29 3a fb 20 43 0d 04 |(S$,X,Y,C):. C..|
00000af0 b0 10 ea 20 4a 25 3a f1 8a 58 2c 59 29 3b 0d 04 |... J%:..X,Y);..|
00000b00 ba 10 e3 20 4a 25 3d 31 20 b8 20 a9 53 24 0d 04 |... J%=1 . .S$..|
00000b10 c4 16 41 25 3d 97 c1 53 24 2c 4a 25 29 3a d6 64 |..A%=..S$,J%):.d|
00000b20 68 74 3a ed 0d 04 ce 05 e1 0d 04 d8 17 dd 20 f2 |ht:........... .|
00000b30 73 70 28 6c 6f 63 2c 46 25 29 3a 41 25 3d 46 25 |sp(loc,F%):A%=F%|
00000b40 0d 04 e2 1d 58 25 3d 6c 6f 63 20 83 20 32 35 36 |....X%=loc . 256|
00000b50 3a 59 25 3d 6c 6f 63 20 81 20 32 35 36 0d 04 ec |:Y%=loc . 256...|
00000b60 09 d6 73 70 3a e1 0d 04 f6 0b dd 20 f2 75 64 6c |..sp:...... .udl|
00000b70 72 0d 05 00 17 e7 20 42 25 3d 31 31 20 70 6d 65 |r..... B%=11 pme|
00000b80 6d 3d 6d 65 6d 2d 32 30 0d 05 0a 17 e7 20 42 25 |m=mem-20..... B%|
00000b90 3d 31 32 20 70 6d 65 6d 3d 6d 65 6d 2b 32 30 0d |=12 pmem=mem+20.|
00000ba0 05 14 16 e7 20 42 25 3d 31 33 20 70 6d 65 6d 3d |.... B%=13 pmem=|
00000bb0 6d 65 6d 2b 31 0d 05 1e 16 e7 20 42 25 3d 31 34 |mem+1..... B%=14|
00000bc0 20 70 6d 65 6d 3d 6d 65 6d 2d 31 0d 05 28 05 e1 | pmem=mem-1..(..|
00000bd0 0d 05 32 0c dd 20 f2 6e 61 73 74 79 0d 05 3c 18 |..2.. .nasty..<.|
00000be0 e7 20 6e 61 73 74 6d 65 6d 3d 6d 65 6d 20 e5 20 |. nastmem=mem . |
00000bf0 8d 74 42 45 0d 05 46 1e f2 73 70 28 26 33 41 30 |.tBE..F..sp(&3A0|
00000c00 30 2b 6e 78 2a 33 32 2b 6e 79 2a 31 32 38 30 2c |0+nx*32+ny*1280,|
00000c10 30 29 0d 05 50 0b 44 25 3d b3 28 34 29 0d 05 5a |0)..P.D%=.(4)..Z|
00000c20 35 e7 20 44 25 3d 31 20 e7 20 6e 61 73 74 6d 65 |5. D%=1 . nastme|
00000c30 6d 3f 2d 32 30 3d 30 20 6e 79 3d 6e 79 2d 31 3a |m?-20=0 ny=ny-1:|
00000c40 6e 61 73 74 6d 65 6d 3d 6e 61 73 74 6d 65 6d 2d |nastmem=nastmem-|
00000c50 32 30 0d 05 64 34 e7 20 44 25 3d 32 20 e7 20 6e |20..d4. D%=2 . n|
00000c60 61 73 74 6d 65 6d 3f 32 30 3d 30 20 6e 79 3d 6e |astmem?20=0 ny=n|
00000c70 79 2b 31 3a 6e 61 73 74 6d 65 6d 3d 6e 61 73 74 |y+1:nastmem=nast|
00000c80 6d 65 6d 2b 32 30 0d 05 6e 32 e7 20 44 25 3d 33 |mem+20..n2. D%=3|
00000c90 20 e7 20 6e 61 73 74 6d 65 6d 3f 31 3d 30 20 6e | . nastmem?1=0 n|
00000ca0 78 3d 6e 78 2b 31 3a 6e 61 73 74 6d 65 6d 3d 6e |x=nx+1:nastmem=n|
00000cb0 61 73 74 6d 65 6d 2b 31 0d 05 78 33 e7 20 44 25 |astmem+1..x3. D%|
00000cc0 3d 34 20 e7 20 6e 61 73 74 6d 65 6d 3f 2d 31 3d |=4 . nastmem?-1=|
00000cd0 30 20 6e 78 3d 6e 78 2d 31 3a 6e 61 73 74 6d 65 |0 nx=nx-1:nastme|
00000ce0 6d 3d 6e 61 73 74 6d 65 6d 2d 31 0d 05 82 1f f2 |m=nastmem-1.....|
00000cf0 73 70 28 26 33 41 30 30 2b 6e 78 2a 33 32 2b 6e |sp(&3A00+nx*32+n|
00000d00 79 2a 31 32 38 30 2c 31 30 29 0d 05 8c 42 e7 20 |y*1280,10)...B. |
00000d10 6e 61 73 74 6d 65 6d 3d 6d 65 6d 20 e3 20 49 25 |nastmem=mem . I%|
00000d20 3d 31 32 38 20 b8 20 30 20 88 2d 32 3a d4 20 32 |=128 . 0 .-2:. 2|
00000d30 2c 2d 39 2c 49 25 2c 31 3a ed 3a 41 25 3d 30 3a |,-9,I%,1:.:A%=0:|
00000d40 d6 73 65 74 31 3a f2 73 65 74 73 74 0d 05 96 05 |.set1:.setst....|
00000d50 e1 0d 05 a0 0c dd 20 f2 73 65 74 73 74 0d 05 aa |...... .setst...|
00000d60 1d 6d 65 6d 6c 6f 63 3d 26 33 41 30 30 2b 28 31 |.memloc=&3A00+(1|
00000d70 30 2a 31 32 38 30 29 2b 33 32 0d 05 b4 16 3f 6d |0*1280)+32....?m|
00000d80 65 6d 4c 3d 6d 65 6d 6c 6f 63 20 83 20 32 35 36 |emL=memloc . 256|
00000d90 0d 05 be 16 3f 6d 65 6d 48 3d 6d 65 6d 6c 6f 63 |....?memH=memloc|
00000da0 20 81 20 32 35 36 0d 05 c8 18 f2 73 70 28 6d 65 | . 256.....sp(me|
00000db0 6d 6c 6f 63 2c 31 31 29 3a 42 25 3d 31 31 0d 05 |mloc,11):B%=11..|
00000dc0 d2 16 6d 65 6d 3d 61 72 65 61 2b 32 30 2a 31 30 |..mem=area+20*10|
00000dd0 2b 31 3a e1 0d 05 dc 0a dd 20 f2 62 6f 78 0d 05 |+1:...... .box..|
00000de0 e6 3c ec 20 31 30 39 38 2c 31 30 34 3a df 31 30 |.<. 1098,104:.10|
00000df0 39 38 2b 31 30 34 2c 31 30 34 3a df 31 30 39 38 |98+104,104:.1098|
00000e00 2b 31 30 34 2c 32 30 3a df 31 30 39 38 2c 32 30 |+104,20:.1098,20|
00000e10 3a df 31 30 39 38 2c 31 30 34 0d 05 f0 05 e1 0d |:.1098,104......|
00000e20 05 fa 0a dd 20 f2 73 63 72 0d 06 04 0e 2a 46 58 |.... .scr....*FX|
00000e30 32 31 33 2c 32 35 35 0d 06 0e 0c 2a 46 58 32 31 |213,255....*FX21|
00000e40 34 2c 31 0d 06 18 11 e3 20 49 25 3d 30 20 b8 20 |4,1..... I%=0 . |
00000e50 26 46 30 20 0d 06 22 1e e7 20 4d 25 3f 49 25 3c |&F0 ..".. M%?I%<|
00000e60 32 20 84 20 4d 25 3f 49 25 3e 37 20 8c 20 8d 44 |2 . M%?I%>7 . .D|
00000e70 5e 46 0d 06 2c 1b e7 20 4d 25 3f 49 25 3c 3e 61 |^F..,.. M%?I%<>a|
00000e80 72 65 61 3f 49 25 20 8c 20 8d 44 5e 46 0d 06 36 |rea?I% . .D^F..6|
00000e90 19 e7 20 61 72 65 61 3f 49 25 3c 34 20 73 63 72 |.. area?I%<4 scr|
00000ea0 3d 73 63 72 2b 31 0d 06 40 19 e7 20 61 72 65 61 |=scr+1..@.. area|
00000eb0 3f 49 25 3e 33 20 73 63 72 3d 73 63 72 2b 35 0d |?I%>3 scr=scr+5.|
00000ec0 06 4a 23 41 24 3d c3 73 63 72 3a f2 64 68 28 c2 |.J#A$=.scr:.dh(.|
00000ed0 7a 73 24 2b 41 24 2c 33 29 2c 31 32 2c 32 39 2c |zs$+A$,3),12,29,|
00000ee0 32 29 0d 06 54 06 ef 37 0d 06 5e 05 ed 0d 06 68 |2)..T..7..^....h|
00000ef0 0c 2a 46 58 32 31 33 2c 31 0d 06 72 0b e7 20 51 |.*FX213,1..r.. Q|
00000f00 3d 31 20 e1 0d 06 7c 18 f2 64 68 28 22 42 6f 6e |=1 ...|..dh("Bon|
00000f10 75 73 21 22 2c 37 2c 31 38 2c 33 29 0d 06 86 44 |us!",7,18,3)...D|
00000f20 e3 20 49 25 3d 53 25 20 b8 20 33 37 2a 74 69 6d |. I%=S% . 37*tim|
00000f30 65 20 88 20 74 69 6d 65 3a 3f 4c 25 3d 34 38 3a |e . time:?L%=48:|
00000f40 3f 28 4c 25 2b 36 33 33 29 3d 34 38 3a 4c 25 3d |?(L%+633)=48:L%=|
00000f50 4c 25 2b 38 3a d4 20 32 2c 2d 32 2c 49 25 2c 31 |L%+8:. 2,-2,I%,1|
00000f60 0d 06 90 2f 73 63 72 3d 73 63 72 2b 35 3a 41 24 |.../scr=scr+5:A$|
00000f70 3d c3 73 63 72 3a f2 64 68 28 c2 7a 73 24 2b 41 |=.scr:.dh(.zs$+A|
00000f80 24 2c 33 29 2c 31 32 2c 32 39 2c 32 29 3a ed 0d |$,3),12,29,2):..|
00000f90 06 9a 07 e1 20 20 0d 06 a4 13 dd 20 f2 69 6e 70 |.... ..... .inp|
00000fa0 75 74 3a f2 74 69 74 6c 65 0d 06 ae 1f f2 64 68 |ut:.title.....dh|
00000fb0 28 22 59 6f 75 20 61 72 65 20 69 6e 20 74 68 65 |("You are in the|
00000fc0 22 2c 32 2c 37 2c 36 29 0d 06 b8 23 f2 64 68 28 |",2,7,6)...#.dh(|
00000fd0 22 48 69 67 68 20 53 63 6f 72 65 20 74 61 62 6c |"High Score tabl|
00000fe0 65 21 22 2c 31 2c 31 30 2c 36 29 0d 06 c2 21 f2 |e!",1,10,6)...!.|
00000ff0 64 68 28 22 45 6e 74 65 72 20 59 6f 75 72 20 4e |dh("Enter Your N|
00001000 61 6d 65 22 2c 32 2c 31 36 2c 35 29 0d 06 cc 1a |ame",2,16,5)....|
00001010 f2 64 68 28 c4 31 32 2c 22 20 22 29 2c 34 2c 32 |.dh(.12," "),4,2|
00001020 31 2c 31 33 32 29 0d 06 d6 1a f2 64 68 28 c4 31 |1,132).....dh(.1|
00001030 32 2c 22 20 22 29 2c 34 2c 32 33 2c 31 33 32 29 |2," "),4,23,132)|
00001040 0d 06 e0 12 4e 24 3d 22 22 3a f1 8a 35 2c 32 33 |....N$="":..5,23|
00001050 29 3b 0d 06 ea 19 f5 3a ef 32 33 2c 31 2c 31 3b |);.....:.23,1,1;|
00001060 30 3b 30 3b 30 3b 3a 4b 25 3d a5 0d 06 f4 20 e7 |0;0;0;:K%=.... .|
00001070 20 4b 25 3d 31 32 37 20 4e 24 3d c0 4e 24 2c a9 | K%=127 N$=.N$,.|
00001080 4e 24 2d 31 29 3a e5 8d 54 52 47 0d 06 fe 11 e7 |N$-1):..TRG.....|
00001090 20 4b 25 3d 31 33 20 8c 8d 54 5c 47 0d 07 08 16 | K%=13 ..T\G....|
000010a0 e7 20 a9 4e 24 3c 31 30 20 4e 24 3d 4e 24 2b bd |. .N$<10 N$=N$+.|
000010b0 4b 25 0d 07 12 1c f2 64 68 28 4e 24 2b 22 20 22 |K%.....dh(N$+" "|
000010c0 2c 35 2c 32 32 2c 37 29 3a ef 38 2c 31 30 0d 07 |,5,22,7):.8,10..|
000010d0 1c 12 fd 20 4b 25 3d 31 33 3a fb 31 32 38 3a e1 |... K%=13:.128:.|
000010e0 0d 07 26 17 dd 20 f2 68 69 3a 53 43 25 3d 73 63 |..&.. .hi:SC%=sc|
000010f0 72 3a 2a 46 58 32 31 0d 07 30 15 e7 53 43 25 3c |r:*FX21..0..SC%<|
00001100 53 43 25 28 35 29 20 8c 8d 44 4e 47 0d 07 3a 7d |SC%(5) ..DNG..:}|
00001110 e3 49 25 3d 30 20 b8 20 35 3a e7 53 43 25 3c 53 |.I%=0 . 5:.SC%<S|
00001120 43 25 28 49 25 29 20 ed 20 8b 20 e3 20 4a 25 3d |C%(I%) . . . J%=|
00001130 35 20 b8 20 49 25 2b 31 20 88 2d 31 3a 53 43 25 |5 . I%+1 .-1:SC%|
00001140 28 4a 25 29 3d 53 43 25 28 4a 25 2d 31 29 3a 4e |(J%)=SC%(J%-1):N|
00001150 24 28 4a 25 29 3d 4e 24 28 4a 25 2d 31 29 3a ed |$(J%)=N$(J%-1):.|
00001160 3a 53 43 25 28 49 25 29 3d 53 43 25 3a 4e 24 28 |:SC%(I%)=SC%:N$(|
00001170 49 25 29 3d 22 22 3a 4e 25 3d 49 25 3a 53 43 25 |I%)="":N%=I%:SC%|
00001180 3d 30 3a 49 25 3d 35 3a ed 0d 07 44 14 f2 69 6e |=0:I%=5:...D..in|
00001190 70 75 74 3a 4e 24 28 4e 25 29 3d 4e 24 0d 07 4e |put:N$(N%)=N$..N|
000011a0 05 e1 0d 07 58 11 dd 20 f2 64 69 73 3a f2 74 69 |....X.. .dis:.ti|
000011b0 74 6c 65 0d 07 62 1e f2 64 68 28 22 54 6f 70 20 |tle..b..dh("Top |
000011c0 20 50 6c 75 6d 62 65 72 73 22 2c 33 2c 36 2c 36 | Plumbers",3,6,6|
000011d0 29 0d 07 6c 36 e3 4a 25 3d 30 20 b8 20 35 3a f2 |)..l6.J%=0 . 5:.|
000011e0 64 68 28 4e 24 28 4a 25 29 2b c4 31 34 2d a9 4e |dh(N$(J%)+.14-.N|
000011f0 24 28 4a 25 29 2c 22 2e 22 29 2c 32 2c 31 30 2b |$(J%),"."),2,10+|
00001200 4a 25 2a 33 2c 35 29 0d 07 76 20 f2 64 68 28 c3 |J%*3,5)..v .dh(.|
00001210 28 53 43 25 28 4a 25 29 29 2c 31 36 2c 31 30 2b |(SC%(J%)),16,10+|
00001220 4a 25 2a 33 2c 37 29 0d 07 80 07 ed 3a e1 0d 07 |J%*3,7).....:...|
00001230 8a 1f dd 20 f2 74 69 74 6c 65 3a ef 31 32 2c 32 |... .title:.12,2|
00001240 33 3b 38 32 30 32 3b 30 3b 30 3b 30 3b 0d 07 94 |3;8202;0;0;0;...|
00001250 1a f2 64 68 28 22 50 69 70 65 6c 69 6e 65 21 22 |..dh("Pipeline!"|
00001260 2c 35 2c 33 2c 33 29 0d 07 9e 05 e1 0d 07 a8 19 |,5,3,3).........|
00001270 dc 20 26 39 30 30 2c 26 41 30 30 2c 26 45 30 30 |. &900,&A00,&E00|
00001280 2c 26 46 30 30 0d 07 b2 17 eb 37 3a f7 8d 44 66 |,&F00.....7:..Df|
00001290 48 3a f4 20 43 75 74 20 68 65 72 65 0d 07 bc 1a |H:. Cut here....|
000012a0 f1 22 41 73 73 65 6d 62 6c 69 6e 67 2e 2e 2e 22 |."Assembling..."|
000012b0 3a 2a 54 41 50 45 0d 07 c6 17 f2 72 65 61 64 28 |:*TAPE.....read(|
000012c0 26 31 31 30 30 2c 22 43 6f 64 65 22 29 0d 07 d0 |&1100,"Code")...|
000012d0 19 f2 72 65 61 64 28 26 30 39 30 30 2c 22 50 69 |..read(&0900,"Pi|
000012e0 70 65 20 31 22 29 0d 07 da 19 f2 72 65 61 64 28 |pe 1").....read(|
000012f0 26 30 41 30 30 2c 22 50 69 70 65 20 32 22 29 0d |&0A00,"Pipe 2").|
00001300 07 e4 19 f2 72 65 61 64 28 26 30 45 30 30 2c 22 |....read(&0E00,"|
00001310 50 69 70 65 20 33 22 29 0d 07 ee 19 f2 72 65 61 |Pipe 3").....rea|
00001320 64 28 26 30 46 30 30 2c 22 50 69 70 65 20 34 22 |d(&0F00,"Pipe 4"|
00001330 29 0d 07 f8 1f f2 72 65 61 64 28 26 31 33 32 30 |).....read(&1320|
00001340 2c 22 53 70 72 69 74 65 22 29 3a 2a 46 58 31 38 |,"Sprite"):*FX18|
00001350 0d 08 02 1f e3 20 49 25 3d 30 20 b8 20 33 31 3a |..... I%=0 . 31:|
00001360 3f 28 26 31 33 30 30 2b 49 25 29 3d 30 3a ed 0d |?(&1300+I%)=0:..|
00001370 08 0c 20 f1 22 50 6c 65 61 73 65 20 77 61 69 74 |.. ."Please wait|
00001380 20 73 6f 6d 65 20 6d 6f 72 65 2e 2e 2e 22 3b 0d | some more...";.|
00001390 08 16 9c ef 32 31 3a 2a 4b 2e 30 52 45 53 54 4f |....21:*K.0RESTO|
000013a0 52 45 32 31 39 30 3a 49 25 3d 28 32 2b 21 26 31 |RE2190:I%=(2+!&1|
000013b0 43 29 41 4e 44 26 46 46 46 46 3a 52 45 50 45 41 |C)AND&FFFF:REPEA|
000013c0 54 49 25 3d 49 25 2d 31 3a 55 2e 3f 49 25 3d 31 |TI%=I%-1:U.?I%=1|
000013d0 33 3a 49 25 3f 31 3d 26 46 46 7c 4d 4f 4c 44 7c |3:I%?1=&FF|MOLD||
000013e0 4d 46 4f 52 20 49 25 3d 30 20 54 4f 20 54 4f 50 |MFOR I%=0 TO TOP|
000013f0 20 53 54 45 50 20 34 3a 49 25 21 26 31 35 30 30 | STEP 4:I%!&1500|
00001400 3d 49 25 21 50 41 47 45 3a 4e 45 58 54 7c 4d 50 |=I%!PAGE:NEXT|MP|
00001410 41 47 45 3d 26 31 35 30 30 7c 4d 4f 4c 44 7c 4d |AGE=&1500|MOLD|M|
00001420 34 30 7c 4d 52 55 4e 7c 46 7c 4d 0d 08 20 10 2a |40|MRUN|F|M.. .*|
00001430 46 58 31 33 38 2c 30 2c 31 32 38 0d 08 2a 05 e0 |FX138,0,128..*..|
00001440 0d 08 34 17 dd 20 f2 72 65 61 64 28 4d 25 2c 42 |..4.. .read(M%,B|
00001450 24 29 3a f1 20 42 24 0d 08 3e 19 f3 20 51 25 3a |$):. B$..>.. Q%:|
00001460 e3 20 4a 25 3d 31 20 b8 20 51 25 3a f3 20 43 24 |. J%=1 . Q%:. C$|
00001470 0d 08 48 19 21 4d 25 3d a0 28 22 26 22 2b 43 24 |..H.!M%=.("&"+C$|
00001480 29 3a 4d 25 3d 4d 25 2b 34 0d 08 52 07 ed 3a e1 |):M%=M%+4..R..:.|
00001490 0d 08 5c 0a f4 20 43 6f 64 65 0d 08 66 08 dc 20 |..\.. Code..f.. |
000014a0 39 37 0d 08 70 20 dc 20 45 39 37 30 41 35 33 38 |97..p . E970A538|
000014b0 2c 41 35 37 30 38 35 32 30 2c 38 35 30 30 45 39 |,A5708520,8500E9|
000014c0 37 31 0d 08 7a 20 dc 20 34 43 30 45 41 39 37 31 |71..z . 4C0EA971|
000014d0 2c 41 35 31 38 31 31 34 38 2c 38 35 32 30 36 39 |,A5181148,852069|
000014e0 37 30 0d 08 84 20 dc 20 36 39 37 31 41 35 37 30 |70... . 6971A570|
000014f0 2c 41 39 37 31 38 35 30 30 2c 31 31 34 38 34 43 |,A9718500,11484C|
00001500 30 44 0d 08 8e 20 dc 20 45 39 37 30 41 35 33 38 |0D... . E970A538|
00001510 2c 41 35 37 30 38 35 30 30 2c 38 35 30 35 45 39 |,A5708500,8505E9|
00001520 37 31 0d 08 98 20 dc 20 34 43 30 42 41 39 37 31 |71... . 4C0BA971|
00001530 2c 41 35 31 38 31 31 34 38 2c 38 35 30 30 36 39 |,A5181148,850069|
00001540 37 30 0d 08 a2 20 dc 20 36 39 37 31 41 35 37 30 |70... . 6971A570|
00001550 2c 41 39 37 31 38 35 30 35 2c 31 31 34 38 34 43 |,A9718505,11484C|
00001560 30 43 0d 08 ac 20 dc 20 37 31 41 34 37 30 41 36 |0C... . 71A470A6|
00001570 2c 38 45 31 32 32 32 34 43 2c 36 39 38 43 31 31 |,8E12224C,698C11|
00001580 36 38 0d 08 b6 20 dc 20 38 35 30 30 41 39 31 31 |68... . 8500A911|
00001590 2c 38 35 33 41 41 39 37 34 2c 38 35 30 42 41 39 |,853AA974,850BA9|
000015a0 37 35 0d 08 c0 20 dc 20 38 35 30 30 41 39 38 42 |75... . 8500A98B|
000015b0 2c 42 44 38 43 41 36 38 43 2c 37 34 41 36 39 39 |,BD8CA68C,74A699|
000015c0 39 39 0d 08 ca 20 dc 20 32 32 32 30 37 35 41 34 |99... . 222075A4|
000015d0 2c 37 34 41 35 31 38 31 32 2c 37 34 38 35 32 30 |,74A51812,748520|
000015e0 36 39 0d 08 d4 20 dc 20 30 30 36 39 37 35 41 35 |69... . 006975A5|
000015f0 2c 38 43 45 36 37 35 38 35 2c 31 34 43 39 38 43 |,8CE67585,14C98C|
00001600 41 35 0d 08 de 20 dc 20 41 44 31 38 44 46 44 30 |A5... . AD18DFD0|
00001610 2c 31 34 36 39 31 31 36 38 2c 41 44 31 31 36 38 |,14691168,AD1168|
00001620 38 44 0d 08 e8 20 dc 20 30 30 36 39 31 31 36 39 |8D... . 00691169|
00001630 2c 31 38 31 31 36 39 38 44 2c 38 30 36 39 37 34 |,1811698D,806974|
00001640 41 35 0d 08 f2 20 dc 20 37 35 41 35 37 34 38 35 |A5... . 75A57485|
00001650 2c 37 35 38 35 30 32 36 39 2c 30 33 33 30 38 42 |,75850269,03308B|
00001660 43 36 0d 08 fc 20 dc 20 36 30 31 31 36 31 34 43 |C6... . 6011614C|
00001670 2c 38 31 41 39 46 46 41 30 2c 38 41 46 46 46 34 |,81A9FFA0,8AFFF4|
00001680 32 30 0d 09 06 20 dc 20 31 32 37 39 38 44 36 30 |20... . 12798D60|
00001690 2c 37 39 41 32 30 41 41 39 2c 46 31 32 30 31 32 |,79A20AA9,F12012|
000016a0 41 30 0d 09 10 20 dc 20 32 30 31 37 41 39 46 46 |A0... . 2017A9FF|
000016b0 2c 46 45 41 39 46 46 45 45 2c 41 32 46 46 45 45 |,FEA9FFEE,A2FFEE|
000016c0 32 30 0d 09 1a 20 dc 20 31 32 37 41 42 44 30 30 |20... . 127ABD00|
000016d0 2c 32 30 46 46 45 45 32 30 2c 45 30 45 38 46 46 |,20FFEE20,E0E8FF|
000016e0 45 45 0d 09 24 20 dc 20 41 39 46 32 44 30 30 34 |EE..$ . A9F2D004|
000016f0 2c 46 46 45 45 32 30 31 37 2c 45 45 32 30 46 46 |,FFEE2017,EE20FF|
00001700 41 39 0d 09 2e 20 dc 20 31 32 37 41 42 44 46 46 |A9... . 127ABDFF|
00001710 2c 32 30 46 46 45 45 32 30 2c 45 30 45 38 46 46 |,20FFEE20,E0E8FF|
00001720 45 45 0d 09 38 20 dc 20 41 39 46 32 44 30 30 38 |EE..8 . A9F2D008|
00001730 2c 46 46 45 45 32 30 46 45 2c 45 45 32 30 30 41 |,FFEE20FE,EE200A|
00001740 41 39 0d 09 42 20 dc 20 32 30 30 38 41 39 46 46 |A9..B . 2008A9FF|
00001750 2c 46 46 41 39 46 46 45 45 2c 41 39 46 46 45 45 |,FFA9FFEE,A9FFEE|
00001760 32 30 0d 09 4c 20 dc 20 46 46 45 45 34 43 30 42 |20..L . FFEE4C0B|
00001770 2c 38 43 31 32 31 35 38 45 2c 45 42 41 32 31 32 |,8C12158E,EBA212|
00001780 31 36 0d 09 56 20 dc 20 44 44 39 39 39 39 42 44 |16..V . DD9999BD|
00001790 2c 30 33 44 30 30 42 30 30 2c 38 36 46 35 44 30 |,03D00B00,86F5D0|
000017a0 43 41 0d 09 60 20 dc 20 37 36 38 36 36 30 37 38 |CA..` . 76866078|
000017b0 2c 30 30 41 32 37 37 38 34 2c 30 41 30 41 38 46 |,00A27784,0A0A8F|
000017c0 38 36 0d 09 6a 20 dc 20 30 41 38 46 32 36 30 41 |86..j . 0A8F260A|
000017d0 2c 32 36 30 41 38 46 32 36 2c 30 30 36 39 31 38 |,260A8F26,006918|
000017e0 38 46 0d 09 74 20 dc 20 41 39 31 32 34 35 38 44 |8F..t . A912458D|
000017f0 2c 38 44 38 46 36 35 31 33 2c 30 30 41 30 31 32 |,8D8F6513,00A012|
00001800 34 36 0d 09 7e 20 dc 20 39 31 39 39 39 39 42 44 |46..~ . 919999BD|
00001810 2c 37 36 39 31 43 38 37 36 2c 32 30 45 30 45 38 |,7691C876,20E0E8|
00001820 43 38 0d 09 88 20 dc 20 32 39 39 38 31 45 46 30 |C8... . 29981EF0|
00001830 2c 45 38 45 44 44 30 30 37 2c 45 30 45 38 45 38 |,E8EDD007,E0E8E8|
00001840 45 38 0d 09 92 20 dc 20 31 38 45 35 44 30 32 30 |E8... . 18E5D020|
00001850 2c 38 30 36 39 37 36 41 35 2c 37 37 41 35 37 36 |,806976A5,77A576|
00001860 38 35 0d 09 9c 20 dc 20 37 37 38 35 30 32 36 39 |85... . 77850269|
00001870 2c 44 32 44 30 30 34 41 32 2c 31 44 30 34 31 46 |,D2D004A2,1D041F|
00001880 36 30 0d 09 a6 20 dc 20 30 30 30 30 30 36 31 31 |60... . 00000611|
00001890 2c 30 30 30 30 30 30 30 30 2c 30 30 30 30 30 30 |,00000000,000000|
000018a0 30 30 0d 09 b0 0e dc 20 30 30 30 30 30 30 30 30 |00..... 00000000|
000018b0 0d 09 ba 11 f4 20 50 69 70 65 20 31 20 44 61 74 |..... Pipe 1 Dat|
000018c0 61 0d 09 c4 08 dc 20 36 30 0d 09 ce 20 dc 20 30 |a..... 60... . 0|
000018d0 31 30 31 30 31 30 31 2c 30 31 30 31 30 31 30 31 |1010101,01010101|
000018e0 2c 30 31 30 31 30 31 30 31 0d 09 d8 20 dc 20 30 |,01010101... . 0|
000018f0 31 30 31 30 31 30 31 2c 30 31 30 31 30 31 30 31 |1010101,01010101|
00001900 2c 30 30 30 30 30 30 30 31 0d 09 e2 20 dc 20 30 |,00000001... . 0|
00001910 30 30 30 30 30 30 30 2c 30 30 30 30 30 30 30 31 |0000000,00000001|
00001920 2c 30 30 30 31 30 30 30 30 0d 09 ec 20 dc 20 30 |,00010000... . 0|
00001930 31 30 30 30 30 30 30 2c 30 32 30 34 30 31 30 31 |1000000,02040101|
00001940 2c 30 30 30 30 30 30 30 35 0d 09 f6 20 dc 20 30 |,00000005... . 0|
00001950 30 30 30 30 30 30 31 2c 30 30 30 31 30 31 30 30 |0000001,00010100|
00001960 2c 30 31 30 30 30 30 30 30 0d 0a 00 20 dc 20 30 |,01000000... . 0|
00001970 31 30 33 30 39 30 31 2c 30 31 30 30 30 35 30 36 |1030901,01000506|
00001980 2c 30 30 30 31 30 31 30 31 0d 0a 0a 20 dc 20 30 |,00010101... . 0|
00001990 35 30 34 30 30 30 30 2c 30 31 30 30 30 30 30 30 |5040000,01000000|
000019a0 2c 30 31 30 37 30 36 30 31 0d 0a 14 20 dc 20 30 |,01070601... . 0|
000019b0 31 30 30 30 33 30 31 2c 30 30 30 30 30 30 30 30 |1000301,00000000|
000019c0 2c 30 33 30 33 30 30 30 30 0d 0a 1e 20 dc 20 30 |,03030000... . 0|
000019d0 31 30 30 30 30 30 30 2c 30 30 30 30 30 30 30 31 |1000000,00000001|
000019e0 2c 30 30 30 30 30 33 30 30 0d 0a 28 20 dc 20 30 |,00000300..( . 0|
000019f0 30 30 30 30 30 30 30 2c 30 33 30 33 30 31 30 30 |0000000,03030100|
00001a00 2c 30 31 30 30 30 30 30 30 0d 0a 32 20 dc 20 30 |,01000000..2 . 0|
00001a10 30 30 30 30 30 30 31 2c 30 31 30 31 30 33 30 30 |0000001,01010300|
00001a20 2c 30 31 30 31 30 30 30 30 0d 0a 3c 20 dc 20 30 |,01010000..< . 0|
00001a30 36 30 33 30 31 30 31 2c 30 31 30 30 30 30 30 38 |6030101,01000008|
00001a40 2c 30 30 30 30 30 30 30 31 0d 0a 46 20 dc 20 30 |,00000001..F . 0|
00001a50 34 30 31 30 33 30 30 2c 30 32 30 32 30 32 30 32 |4010300,02020202|
00001a60 2c 30 30 30 37 30 32 30 32 0d 0a 50 20 dc 20 30 |,00070202..P . 0|
00001a70 31 30 30 30 30 30 30 2c 30 30 30 30 30 30 30 31 |1000000,00000001|
00001a80 2c 30 37 30 32 30 36 30 30 0d 0a 5a 20 dc 20 30 |,07020600..Z . 0|
00001a90 31 30 30 30 31 30 31 2c 30 30 30 30 30 30 30 30 |1000101,00000000|
00001aa0 2c 30 31 30 31 30 31 30 31 0d 0a 64 20 dc 20 30 |,01010101..d . 0|
00001ab0 30 30 30 30 30 30 31 2c 30 30 30 30 30 30 30 30 |0000001,00000000|
00001ac0 2c 30 31 30 30 30 30 30 30 0d 0a 6e 20 dc 20 30 |,01000000..n . 0|
00001ad0 30 30 31 30 31 30 31 2c 30 31 30 30 30 30 30 30 |0010101,01000000|
00001ae0 2c 30 30 30 31 30 30 30 31 0d 0a 78 20 dc 20 30 |,00010001..x . 0|
00001af0 30 30 30 30 30 30 30 2c 30 31 30 30 30 30 30 30 |0000000,01000000|
00001b00 2c 30 30 30 30 30 30 30 30 0d 0a 82 20 dc 20 30 |,00000000... . 0|
00001b10 31 30 30 30 30 30 30 2c 30 31 30 31 30 31 30 31 |1000000,01010101|
00001b20 2c 30 31 30 31 30 31 30 31 0d 0a 8c 20 dc 20 30 |,01010101... . 0|
00001b30 31 30 31 30 31 30 31 2c 30 31 30 31 30 31 30 31 |1010101,01010101|
00001b40 2c 30 31 30 31 30 31 30 31 0d 0a 96 11 f4 20 50 |,01010101..... P|
00001b50 69 70 65 20 32 20 64 61 74 61 0d 0a a0 08 dc 20 |ipe 2 data..... |
00001b60 36 30 0d 0a aa 20 dc 20 30 31 30 31 30 31 30 31 |60... . 01010101|
00001b70 2c 30 31 30 31 30 31 30 31 2c 30 31 30 31 30 31 |,01010101,010101|
00001b80 30 31 0d 0a b4 20 dc 20 30 31 30 31 30 31 30 31 |01... . 01010101|
00001b90 2c 30 31 30 31 30 31 30 31 2c 30 30 30 30 30 30 |,01010101,000000|
00001ba0 30 31 0d 0a be 20 dc 20 30 39 30 30 30 30 30 30 |01... . 09000000|
00001bb0 2c 30 31 30 31 30 30 30 30 2c 30 30 30 30 30 30 |,01010000,000000|
00001bc0 30 30 0d 0a c8 20 dc 20 30 31 30 30 30 30 30 30 |00... . 01000000|
00001bd0 2c 30 30 30 31 30 30 30 31 2c 30 37 30 32 30 32 |,00010001,070202|
00001be0 30 34 0d 0a d2 20 dc 20 30 34 30 31 30 31 30 30 |04... . 04010100|
00001bf0 2c 30 38 30 32 30 32 30 32 2c 30 31 30 30 30 30 |,08020202,010000|
00001c00 30 30 0d 0a dc 20 dc 20 30 30 30 30 30 31 30 31 |00... . 00000101|
00001c10 2c 30 30 30 30 30 30 30 33 2c 30 37 30 34 30 31 |,00000003,070401|
00001c20 30 30 0d 0a e6 20 dc 20 30 30 30 31 30 30 30 30 |00... . 00010000|
00001c30 2c 30 31 30 31 30 31 30 30 2c 30 30 30 30 30 30 |,01010100,000000|
00001c40 30 31 0d 0a f0 20 dc 20 30 34 30 30 30 31 30 33 |01... . 04000103|
00001c50 2c 30 30 30 37 30 32 30 32 2c 30 30 30 31 30 30 |,00070202,000100|
00001c60 30 30 0d 0a fa 20 dc 20 30 31 30 30 30 31 30 30 |00... . 01000100|
00001c70 2c 30 30 30 30 30 30 30 31 2c 30 33 30 30 30 31 |,00000001,030001|
00001c80 30 33 0d 0b 04 20 dc 20 30 30 30 30 30 30 30 30 |03... . 00000000|
00001c90 2c 30 30 30 30 30 30 30 30 2c 30 31 30 30 30 30 |,00000000,010000|
00001ca0 30 30 0d 0b 0e 20 dc 20 30 30 30 30 30 31 30 31 |00... . 00000101|
00001cb0 2c 30 33 30 32 30 34 30 33 2c 30 35 30 32 30 32 |,03020403,050202|
00001cc0 30 32 0d 0b 18 20 dc 20 30 30 30 30 30 30 30 31 |02... . 00000001|
00001cd0 2c 30 31 30 30 30 30 30 31 2c 30 30 30 31 30 30 |,01000001,000100|
00001ce0 30 31 0d 0b 22 20 dc 20 30 33 30 31 30 37 30 36 |01.." . 03010706|
00001cf0 2c 30 33 30 30 30 30 30 30 2c 30 31 30 30 30 30 |,03000000,010000|
00001d00 30 30 0d 0b 2c 20 dc 20 30 31 30 30 30 30 30 31 |00.., . 01000001|
00001d10 2c 30 30 30 30 30 30 30 31 2c 30 33 30 31 30 30 |,00000001,030100|
00001d20 30 30 0d 0b 36 20 dc 20 30 33 30 30 30 31 30 31 |00..6 . 03000101|
00001d30 2c 30 30 30 30 30 30 30 30 2c 30 31 30 31 30 30 |,00000000,010100|
00001d40 30 30 0d 0b 40 20 dc 20 30 30 30 30 30 30 30 31 |00..@ . 00000001|
00001d50 2c 30 36 30 30 30 30 30 30 2c 30 37 30 32 30 32 |,06000000,070202|
00001d60 30 32 0d 0b 4a 20 dc 20 30 30 30 31 30 31 30 31 |02..J . 00010101|
00001d70 2c 30 31 30 30 30 30 30 30 2c 30 30 30 31 30 30 |,01000000,000100|
00001d80 30 31 0d 0b 54 20 dc 20 30 30 30 30 30 30 30 30 |01..T . 00000000|
00001d90 2c 30 31 30 30 30 30 30 30 2c 30 30 30 30 30 30 |,01000000,000000|
00001da0 30 30 0d 0b 5e 20 dc 20 30 31 30 30 30 30 30 30 |00..^ . 01000000|
00001db0 2c 30 31 30 31 30 31 30 31 2c 30 31 30 31 30 31 |,01010101,010101|
00001dc0 30 31 0d 0b 68 20 dc 20 30 31 30 31 30 31 30 31 |01..h . 01010101|
00001dd0 2c 30 31 30 31 30 31 30 31 2c 30 31 30 31 30 31 |,01010101,010101|
00001de0 30 31 0d 0b 72 11 f4 20 50 69 70 65 20 33 20 64 |01..r.. Pipe 3 d|
00001df0 61 74 61 0d 0b 7c 08 dc 20 36 30 0d 0b 86 20 dc |ata..|.. 60... .|
00001e00 20 30 31 30 31 30 31 30 31 2c 30 31 30 31 30 31 | 01010101,010101|
00001e10 30 31 2c 30 31 30 31 30 31 30 31 0d 0b 90 20 dc |01,01010101... .|
00001e20 20 30 31 30 31 30 31 30 31 2c 30 31 30 31 30 31 | 01010101,010101|
00001e30 30 31 2c 30 30 30 30 30 30 30 31 0d 0b 9a 20 dc |01,00000001... .|
00001e40 20 30 30 30 30 30 30 30 31 2c 30 30 30 30 30 30 | 00000001,000000|
00001e50 30 30 2c 30 30 30 30 30 30 30 30 0d 0b a4 20 dc |00,00000000... .|
00001e60 20 30 31 30 30 30 30 30 31 2c 30 30 30 30 30 30 | 01000001,000000|
00001e70 30 31 2c 30 32 30 34 30 30 30 30 0d 0b ae 20 dc |01,02040000... .|
00001e80 20 30 32 30 32 30 32 30 32 2c 30 30 30 30 30 30 | 02020202,000000|
00001e90 30 35 2c 30 31 30 30 30 30 30 31 0d 0b b8 20 dc |05,01000001... .|
00001ea0 20 30 30 30 31 30 31 30 31 2c 30 31 30 33 30 30 | 00010101,010300|
00001eb0 30 30 2c 30 31 30 31 30 31 30 31 0d 0b c2 20 dc |00,01010101... .|
00001ec0 20 30 30 30 30 30 31 30 33 2c 30 31 30 30 30 30 | 00000103,010000|
00001ed0 30 30 2c 30 30 30 30 30 30 30 31 0d 0b cc 20 dc |00,00000001... .|
00001ee0 20 30 32 30 36 30 30 30 30 2c 30 32 30 32 30 32 | 02060000,020202|
00001ef0 30 32 2c 30 32 30 32 30 32 30 33 0d 0b d6 20 dc |02,02020203... .|
00001f00 20 30 31 30 30 30 35 30 32 2c 30 34 30 30 30 30 | 01000502,040000|
00001f10 30 31 2c 30 30 30 30 30 35 30 32 0d 0b e0 20 dc |01,00000502... .|
00001f20 20 30 31 30 30 30 30 30 30 2c 30 30 30 30 30 31 | 01000000,000001|
00001f30 30 33 2c 30 31 30 30 30 33 30 30 0d 0b ea 20 dc |03,01000300... .|
00001f40 20 30 33 30 30 30 30 30 31 2c 30 32 30 32 30 36 | 03000001,020206|
00001f50 30 31 2c 30 31 30 30 30 30 30 38 0d 0b f4 20 dc |01,01000008... .|
00001f60 20 30 31 30 30 30 31 30 33 2c 30 31 30 39 30 33 | 01000103,010903|
00001f70 30 30 2c 30 33 30 30 30 30 30 31 0d 0b fe 20 dc |00,03000001... .|
00001f80 20 30 30 30 30 30 30 30 31 2c 30 31 30 30 30 30 | 00000001,010000|
00001f90 30 30 2c 30 31 30 30 30 31 30 33 0d 0c 08 20 dc |00,01000103... .|
00001fa0 20 30 31 30 37 30 36 30 30 2c 30 36 30 30 30 30 | 01070600,060000|
00001fb0 30 31 2c 30 32 30 32 30 32 30 32 0d 0c 12 20 dc |01,02020202... .|
00001fc0 20 30 32 30 32 30 32 30 32 2c 30 31 30 30 30 30 | 02020202,010000|
00001fd0 30 37 2c 30 31 30 30 30 30 30 30 0d 0c 1c 20 dc |07,01000000... .|
00001fe0 20 30 30 30 30 30 30 30 31 2c 30 31 30 31 30 30 | 00000001,010100|
00001ff0 30 30 2c 30 30 30 30 30 31 30 31 0d 0c 26 20 dc |00,00000101..& .|
00002000 20 30 30 30 30 30 31 30 30 2c 30 31 30 30 30 31 | 00000100,010001|
00002010 30 30 2c 30 30 30 31 30 30 30 31 0d 0c 30 20 dc |00,00010001..0 .|
00002020 20 30 30 30 30 30 30 30 30 2c 30 30 30 30 30 30 | 00000000,000000|
00002030 30 30 2c 30 30 30 30 30 30 30 30 0d 0c 3a 20 dc |00,00000000..: .|
00002040 20 30 31 30 30 30 30 30 30 2c 30 31 30 31 30 31 | 01000000,010101|
00002050 30 31 2c 30 31 30 31 30 31 30 31 0d 0c 44 20 dc |01,01010101..D .|
00002060 20 30 31 30 31 30 31 30 31 2c 30 31 30 31 30 31 | 01010101,010101|
00002070 30 31 2c 30 31 30 31 30 31 30 31 0d 0c 4e 11 f4 |01,01010101..N..|
00002080 20 50 69 70 65 20 34 20 64 61 74 61 0d 0c 58 08 | Pipe 4 data..X.|
00002090 dc 20 36 30 0d 0c 62 20 dc 20 30 31 30 31 30 31 |. 60..b . 010101|
000020a0 30 31 2c 30 31 30 31 30 31 30 31 2c 30 31 30 31 |01,01010101,0101|
000020b0 30 31 30 31 0d 0c 6c 20 dc 20 30 31 30 31 30 31 |0101..l . 010101|
000020c0 30 31 2c 30 31 30 31 30 31 30 31 2c 30 30 30 30 |01,01010101,0000|
000020d0 30 30 30 31 0d 0c 76 20 dc 20 30 30 30 30 30 30 |0001..v . 000000|
000020e0 30 31 2c 30 30 30 30 30 31 30 30 2c 30 39 30 30 |01,00000100,0900|
000020f0 30 30 30 30 0d 0c 80 20 dc 20 30 31 30 30 30 30 |0000... . 010000|
00002100 30 30 2c 30 30 30 30 30 30 30 31 2c 30 32 30 34 |00,00000001,0204|
00002110 30 30 30 31 0d 0c 8a 20 dc 20 30 30 30 30 30 31 |0001... . 000001|
00002120 30 35 2c 30 33 30 30 30 38 30 34 2c 30 31 30 30 |05,03000804,0100|
00002130 30 31 30 30 0d 0c 94 20 dc 20 30 30 30 30 30 30 |0100... . 000000|
00002140 30 31 2c 30 30 30 33 30 31 30 31 2c 30 31 30 31 |01,00030101,0101|
00002150 30 31 30 33 0d 0c 9e 20 dc 20 30 36 30 30 30 30 |0103... . 060000|
00002160 30 33 2c 30 31 30 30 30 30 30 35 2c 30 30 30 30 |03,01000005,0000|
00002170 30 30 30 31 0d 0c a8 20 dc 20 30 32 30 33 30 32 |0001... . 020302|
00002180 30 34 2c 30 30 30 30 30 30 30 37 2c 30 34 30 30 |04,00000007,0400|
00002190 30 30 30 33 0d 0c b2 20 dc 20 30 31 30 30 30 30 |0003... . 010000|
000021a0 30 37 2c 30 30 30 30 30 30 30 31 2c 30 32 30 36 |07,00000001,0206|
000021b0 30 31 30 33 0d 0c bc 20 dc 20 30 32 30 32 30 32 |0103... . 020202|
000021c0 30 32 2c 30 33 30 30 30 30 30 37 2c 30 31 30 30 |02,03000007,0100|
000021d0 30 30 30 30 0d 0c c6 20 dc 20 30 30 30 31 30 31 |0000... . 000101|
000021e0 30 31 2c 30 30 30 30 30 31 30 33 2c 30 31 30 31 |01,00000103,0101|
000021f0 30 31 30 31 0d 0c d0 20 dc 20 30 33 30 31 30 31 |0101... . 030101|
00002200 30 31 2c 30 31 30 31 30 30 30 30 2c 30 30 30 30 |01,01010000,0000|
00002210 30 30 30 31 0d 0c da 20 dc 20 30 32 30 34 30 31 |0001... . 020401|
00002220 30 33 2c 30 31 30 35 30 32 30 32 2c 30 37 30 32 |03,01050202,0702|
00002230 30 32 30 34 0d 0c e4 20 dc 20 30 31 30 30 30 30 |0204... . 010000|
00002240 30 30 2c 30 30 30 30 30 30 30 31 2c 30 30 30 37 |00,00000001,0007|
00002250 30 32 30 36 0d 0c ee 20 dc 20 30 31 30 33 30 30 |0206... . 010300|
00002260 30 30 2c 30 30 30 30 30 30 30 33 2c 30 31 30 30 |00,00000003,0100|
00002270 30 30 30 30 0d 0c f8 20 dc 20 30 30 30 30 30 30 |0000... . 000000|
00002280 30 31 2c 30 30 30 30 30 30 30 30 2c 30 32 30 36 |01,00000000,0206|
00002290 30 30 30 31 0d 0d 02 20 dc 20 30 30 30 31 30 30 |0001... . 000100|
000022a0 30 37 2c 30 31 30 30 30 31 30 30 2c 30 30 30 31 |07,01000100,0001|
000022b0 30 30 30 31 0d 0d 0c 20 dc 20 30 30 30 30 30 30 |0001... . 000000|
000022c0 30 30 2c 30 30 30 30 30 30 30 30 2c 30 30 30 30 |00,00000000,0000|
000022d0 30 30 30 30 0d 0d 16 20 dc 20 30 31 30 30 30 30 |0000... . 010000|
000022e0 30 30 2c 30 31 30 31 30 31 30 31 2c 30 31 30 31 |00,01010101,0101|
000022f0 30 31 30 31 0d 0d 20 20 dc 20 30 31 30 31 30 31 |0101.. . 010101|
00002300 30 31 2c 30 31 30 31 30 31 30 31 2c 30 31 30 31 |01,01010101,0101|
00002310 30 31 30 31 0d 0d 2a 11 f4 20 53 70 72 69 74 65 |0101..*.. Sprite|
00002320 20 64 61 74 61 0d 0d 34 09 dc 20 31 31 32 0d 0d | data..4.. 112..|
00002330 3e 20 dc 20 31 33 30 33 31 33 30 33 2c 30 33 31 |> . 13031303,031|
00002340 33 30 33 31 33 2c 31 33 30 33 31 33 30 33 0d 0d |30313,13031303..|
00002350 48 20 dc 20 30 33 31 33 30 33 31 33 2c 32 33 30 |H . 03130313,230|
00002360 33 32 33 30 33 2c 30 33 32 33 30 33 32 33 0d 0d |32303,03230323..|
00002370 52 20 dc 20 32 33 30 33 32 33 30 33 2c 30 33 32 |R . 23032303,032|
00002380 33 30 33 32 33 2c 33 43 33 46 30 30 30 30 0d 0d |30323,3C3F0000..|
00002390 5c 20 dc 20 30 30 30 30 33 30 33 33 2c 33 43 33 |\ . 00003033,3C3|
000023a0 46 30 30 30 30 2c 30 30 30 30 33 30 33 33 0d 0d |F0000,00003033..|
000023b0 66 20 dc 20 33 43 33 46 30 30 30 30 2c 30 30 30 |f . 3C3F0000,000|
000023c0 30 33 30 33 33 2c 33 43 33 46 30 30 30 30 0d 0d |03033,3C3F0000..|
000023d0 70 20 dc 20 30 30 30 30 33 30 33 33 2c 30 30 30 |p . 00003033,000|
000023e0 30 30 30 30 30 2c 30 30 30 30 30 30 30 30 0d 0d |00000,00000000..|
000023f0 7a 20 dc 20 33 31 33 31 33 31 33 31 2c 33 31 33 |z . 31313131,313|
00002400 31 33 31 33 31 2c 33 44 33 44 33 44 33 44 0d 0d |13131,3D3D3D3D..|
00002410 84 20 dc 20 33 44 33 44 33 44 33 44 2c 30 30 30 |. . 3D3D3D3D,000|
00002420 30 30 30 30 30 2c 30 30 30 30 30 30 30 30 0d 0d |00000,00000000..|
00002430 8e 20 dc 20 30 30 30 30 30 30 30 30 2c 30 30 30 |. . 00000000,000|
00002440 30 30 30 30 30 2c 33 35 30 30 30 30 30 30 0d 0d |00000,35000000..|
00002450 98 20 dc 20 33 31 33 31 33 31 33 31 2c 33 46 33 |. . 31313131,3F3|
00002460 46 30 30 30 30 2c 33 44 33 44 33 46 33 46 0d 0d |F0000,3D3D3F3F..|
00002470 a2 20 dc 20 33 45 33 46 30 30 30 30 2c 30 30 30 |. . 3E3F0000,000|
00002480 30 33 30 33 33 2c 33 43 33 46 30 30 30 30 0d 0d |03033,3C3F0000..|
00002490 ac 20 dc 20 30 30 30 30 33 30 33 33 2c 33 43 33 |. . 00003033,3C3|
000024a0 46 30 30 30 30 2c 33 31 33 31 33 33 33 36 0d 0d |F0000,31313336..|
000024b0 b6 20 dc 20 33 46 32 41 30 30 30 30 2c 33 44 33 |. . 3F2A0000,3D3|
000024c0 44 33 44 33 44 2c 30 30 30 30 30 30 30 30 0d 0d |D3D3D,00000000..|
000024d0 c0 20 dc 20 30 30 30 30 30 30 30 30 2c 30 30 30 |. . 00000000,000|
000024e0 30 30 30 30 30 2c 30 30 30 30 30 30 30 30 0d 0d |00000,00000000..|
000024f0 ca 20 dc 20 33 31 33 31 33 31 33 31 2c 30 30 30 |. . 31313131,000|
00002500 30 31 30 33 30 2c 33 36 33 43 33 44 33 44 0d 0d |01030,363C3D3D..|
00002510 d4 20 dc 20 30 30 30 30 33 30 33 33 2c 33 43 33 |. . 00003033,3C3|
00002520 46 30 30 30 30 2c 30 30 30 30 33 30 33 33 0d 0d |F0000,00003033..|
00002530 de 20 dc 20 33 43 33 46 30 30 30 30 2c 30 30 30 |. . 3C3F0000,000|
00002540 30 33 30 33 33 2c 33 44 33 46 33 31 33 31 0d 0d |03033,3D3F3131..|
00002550 e8 20 dc 20 30 30 30 30 33 30 33 33 2c 33 46 33 |. . 00003033,3F3|
00002560 44 33 44 33 44 2c 30 30 30 30 32 30 33 46 0d 0d |D3D3D,0000203F..|
00002570 f2 20 dc 20 30 30 30 30 30 30 30 30 2c 30 30 30 |. . 00000000,000|
00002580 30 30 30 30 30 2c 33 43 33 46 30 30 33 41 0d 0d |00000,3C3F003A..|
00002590 fc 20 dc 20 30 30 30 30 32 30 33 33 2c 33 43 33 |. . 00002033,3C3|
000025a0 46 33 37 33 30 2c 30 30 33 31 33 31 33 33 0d 0e |F3730,00313133..|
000025b0 06 20 dc 20 32 41 30 30 30 30 33 35 2c 30 30 33 |. . 2A000035,003|
000025c0 44 33 44 33 44 2c 30 30 30 30 30 30 30 30 0d 0e |D3D3D,00000000..|
000025d0 10 20 dc 20 30 30 30 30 30 30 30 30 2c 31 33 30 |. . 00000000,130|
000025e0 33 31 33 30 33 2c 30 30 30 30 30 30 30 31 0d 0e |31303,00000001..|
000025f0 1a 20 dc 20 31 33 30 33 31 33 30 33 2c 33 31 33 |. . 13031303,313|
00002600 31 33 31 30 33 2c 32 33 30 33 32 33 30 33 0d 0e |13103,23032303..|
00002610 24 20 dc 20 33 44 33 44 33 44 30 33 2c 32 33 30 |$ . 3D3D3D03,230|
00002620 33 32 33 30 33 2c 30 30 30 30 30 30 30 32 0d 0e |32303,00000002..|
00002630 2e 20 dc 20 30 30 34 35 34 35 41 32 2c 30 30 30 |. . 004545A2,000|
00002640 30 30 30 30 30 2c 30 45 30 45 30 34 30 36 0d 0e |00000,0E0E0406..|
00002650 38 20 dc 20 30 34 30 34 30 34 30 45 2c 30 44 30 |8 . 0404040E,0D0|
00002660 44 30 38 30 39 2c 30 38 30 38 30 38 30 44 0d 0e |D0809,0808080D..|
00002670 42 20 dc 20 30 30 38 41 38 41 35 31 2c 30 30 30 |B . 008A8A51,000|
00002680 30 30 30 30 30 2c 30 30 30 30 30 30 30 30 0d 0e |00000,00000000..|
00002690 4c 20 dc 20 30 30 30 30 30 34 30 30 2c 30 45 30 |L . 00000400,0E0|
000026a0 41 30 41 30 30 2c 30 30 30 33 30 37 30 33 0d 0e |A0A00,00030703..|
000026b0 56 20 dc 20 30 44 30 35 30 35 30 30 2c 30 30 30 |V . 0D050500,000|
000026c0 33 30 42 30 33 2c 30 30 30 30 30 30 30 30 0d 0e |30B03,00000000..|
000026d0 60 20 dc 20 30 30 30 30 30 38 30 30 2c 30 30 30 |` . 00000800,000|
000026e0 34 30 30 30 30 2c 30 30 30 30 30 30 30 30 0d 0e |40000,00000000..|
000026f0 6a 20 dc 20 30 33 30 37 30 33 30 30 2c 30 30 30 |j . 03070300,000|
00002700 41 30 41 30 45 2c 30 33 30 42 30 33 30 30 0d 0e |A0A0E,030B0300..|
00002710 74 20 dc 20 30 30 30 35 30 35 30 44 2c 30 30 30 |t . 0005050D,000|
00002720 38 30 30 30 30 2c 30 30 30 30 30 30 30 30 0d 0e |80000,00000000..|
00002730 7e 20 dc 20 30 31 30 31 30 30 30 30 2c 30 30 30 |~ . 01010000,000|
00002740 30 30 31 30 31 2c 30 42 30 33 30 38 30 30 0d 0e |00101,0B030800..|
00002750 88 20 dc 20 30 30 30 38 30 33 30 42 2c 30 38 30 |. . 0008030B,080|
00002760 46 30 30 30 30 2c 30 30 30 30 30 46 30 38 0d 0e |F0000,00000F08..|
00002770 92 20 dc 20 30 30 30 41 30 30 30 30 2c 30 30 30 |. . 000A0000,000|
00002780 30 30 41 30 30 2c 30 30 30 35 30 30 30 30 0d 0e |00A00,00050000..|
00002790 9c 20 dc 20 30 30 30 30 30 35 30 30 2c 30 34 30 |. . 00000500,040|
000027a0 46 30 30 30 30 2c 30 30 30 30 30 46 30 34 0d 0e |F0000,00000F04..|
000027b0 a6 20 dc 20 30 37 30 33 30 34 30 30 2c 30 30 30 |. . 07030400,000|
000027c0 34 30 33 30 37 2c 30 32 30 32 30 30 30 30 0d 0e |40307,02020000..|
000027d0 b0 0e dc 20 30 30 30 30 30 32 30 32 0d ff |... 00000202..|
000027de 
02-09-88/PIPLINE.m0
02-09-88/PIPLINE.m1
02-09-88/PIPLINE.m2
02-09-88/PIPLINE.m4
02-09-88/PIPLINE.m5
.