' +JJJJ ?\>m0M='+l> /+l  P˵B̵CõDĵEµµBD ĵ ⵭µ ۰ µL` B H@Aﳈ  @A ਦ@A LL$ 鷎귭෍ᷩ췩緈JJJJx i L8ᷭ緍췩 i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&" ʎ L/  !"#$%&'()*+,-./0123456789:;<=>?  1#"""  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0EB H  @H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   d@ŵLҦL [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<ԍ L}JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\8õ浍õĵBD` L[W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& $`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLLz L^ ۰L^  ȟ QlXJ̥KlV  ȟ QlV eօ3L׮ʊHLQ &RL &QL d L4 Ne)n `@-eff LL f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵLȿõ` F`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIFApppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx-U@Ϡ@跻~!Wo*9~~ɬƬ~~~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL ꝍ ŤL{ BH [ h`Lo õ ڬL ꝍ ŤL~H hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭  ˤLª 뷰` Lk ݵܵߵ޵ ^`8ܵ i B8` 9L%ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵BֵO G굎뵎쵬 뵎쵌`` ַ յյ`@ +õm浍õĵL õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(` F d֠ĭz# 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` d ֠͠z# u` 00>3>3333300>333>3633>03333 00003333 ?[[[[333333333>33>003063333>333 mmmm~3 3333>0? ? 8( ?3??33?33??33??333????????;3?333??33?? ??3;;3??cwkcccc337?;33?333??3??##+.?3?;3?0??? 33333?33333 ccckkwc33 33333 ?? ??8p` ? 66$6???? ??0? '<:9 *.  88888*>* ??  >>`p833333<630000?38???0>0?8<63?00??0?33??0 ?33??3>0> p88p>>>>8?3@@@``@`pppp``xx||||xx``|~~~???~~~|`???@  ( $@h`+'bH"(@ "   U*U**U*Uժժժ3fL̙L3f̙"DĈD"Ĉ"DĈ"Dɤ$I$wn];ݻ];wnݻn];wݻ;wn]@@@``@                ((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? =/I1L" QȥQ L `                         . .8eeNj  L `   i H 8 ih i 8 ` @ e   &L JA ) =/I1ȥ i) 8Ȱ8  i ` 0`  1 `E))/%`  WȹW`)0  5 `)0 J. ` @  L  5 Q  .  h % ( 0  Q ( L Ȅ (  h ( L em m 8 m  ɀ  Lu ɠ  :Lu  C Lu  ~ Lu  iLr`` JJJJJm  i` < e  JL  `54.85714291598112661079.42857141598125.1428576710111.4285711588141.1428576710141.1428571578157.7142866710159.428571818567610159.42857176846.85714298810159.42857188833.714285710610158.857143106817.142857113010 L:L?L)ȱȱLD    Lu ))  `  L @  L `ȱ  L 0LPȱ  L ȱȱ 28"END OF DATA IN FILE"1F#ER6ĺ"FILE NOT FOUND"[P#ER8ĺ"I/O ERROR - CHECK DISK DRIVE"Z#ER9ĺ"DISK FULL - TRY ANOTHER"d#ER10ĺ"FILE IS LOCKED"n#"PLEASE PRESS (RETURN)":E$:x#16304,0:16301,0#E140,150,2350,145,150,235"DRAW LINE TO ";X;", ";Y:Ah1690:"PLOT BRUSH AT ";X;", ";Y:b|1690:"FILL AT ";X;", ";Y:X(BY2)256((BY3)CM16):Y(BY1):EDİ1750:39249BYBYCI:BEBECI:1100:.39168,BY(BY256)256:39169,(BY256):39170,BE(BEqCM:XM:YM:610'vCM:X:610CCM:"CLOSE":P$A$:30e"DISK ERROR ";(222):A$:30"PRINTER SLOT #";:A$:A$"1"A$"7"30:"PR#"A$:BYSB:I0:"PICTURE LISTING : ";P$:II1:800:I;") ";:1500:BYBYL%(CM):CM0720  00>3>3333300>333>3633>03333 00003333 ?[[[[333333333>33>003063333>333 mmmm~3 3333>0? ? 8( ?3??33?33??33??333????????;3?333??33?? ??3;;3??cwkcccc337?;33?333??3??##+.?3?;3?0??? 33333?33333 ccckkwc33 33333 ?? ??8p` ? 66$6???? ??0? '<:9 *.  88888*>* ??  >>`p833333<630000?38???0>0?8<63?00??0?33??0 ?33??3>0> p88p>>>>8?3@@@``@`pppp``xx||||xx``|~~~???~~~|`???@  ( $@h`+'bH"(@ "   U*U**U*Uժժժ3fL̙L3f̙"DĈD"Ĉ"DĈ"Dɤ$I$wn];ݻ];wnݻn];wݻ;wn]@@@``@                ((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? =/I1L"QȥQ L`                         . .8eeNj ӎ L`   i H 8 ih i 8 ` @ ӎe   &LJA ) =/I1ȥ i) 8Ȱ8  i ` 0`  1`E))/%` WȹW`)0  5`)0 J.` @ ӎ  L ӎ  5 Q . h% (0  Q (LȄ (  h (Lޏem m 8 m ɀ  Luɠ  :Lu CLu ~Lu iLr`` JJJJJm  i` <e  JL ` L:L?L)ȱȱLD    Lu))  ` L@  L`ȱ L0L̍Pȱ  L ȱȱ 28! ER5ĺ"END OF DATA IN FILE"F"PLEASE PRESS (RETURN)":A$::10,1640,1510,1660:A1690:"TEXT CURSOR TO ";X;", ";Y:["LINE COLOR = ";CD:}"REVERSE TEXT ";((BY1)):"BRUSH = ";BN:""NORMAL TEXT ";((BY1)):,"FILL COLOR = ";CF:@1690:"START LINE AT ";X;", ";Y:T1690:226):XOP4P5256:YOP6:CM(SP12)16:CIL%(CM):BY,BS:0,BY(BY256)256:1,(BY256):BYSBCM0:XO0:YO0:CI0M1İ450x1305:BYBYL%((BY)16):1200:BYBEED023:1:CM1530,1540,1550,1560,1570,1580,1510,1600,1510,1620,15";DT$:216,0:40(LBKĹ0,0:1,120:SPhV0,0:1,99:BS(BY):BY,0:SPBK:BY(0)(1)2561:1300:~0,BY(BY256)256:1,(BY256):450:450:BS(BY):BY,0:CL:1300:sCD((228)32):CF(SP13):BN(SP14)1:P4(224):P5(225):P6(6095:1100:216,0:-BS(BY):BY,0:1025s:21:"NAME : ";A$:"BSAVE";A$;".SPC,A";SB;",L";BYSB1;",";DT$BY,BS:216,0:40BY,BS"DISK ERROR ";(222):A$:216,0:401030$:21:"NAME : ";A$:"BSAVE";A$;".PIC,A8192,L8192,BNCI1:2000:BY,63X:2020'7902X770cYY1:YCDİ1305:CI1:2000:BY,32Y:2020l790CX10Y11:C108CCFİ1305:CI2:2000:BY,96:BY1,C:2020650:610:"NAME : ";A$:30"BLOAD";A$;".SPC,A";SB;",";DT$:BY3670:2XP,YP:XN0:YNCD1:670:2XP,YP:XN(CF10)1:YNCFXN1011:670:2XP,YP:YNYP32:XPXN2032(XN1)20(XN1)40:YPYN1445:XPXN2143:XNXP30:YPYP14650:Y7501305:X2MX1:1305:790XX1:M3:XB0700,lYN(Y17.4):YNXN(X28):624LnXN(X23.3):XNYN8YN8^p670:2XP,YPvI(16384):16368,0:I218ZCZC:ZXX:ZYY{2XP,YP:I160610650:230,32:16300,0:16301,0:ES0:35XXN:YYN:YN0:XNM1:M3XNBN1XA31590+A18CR0'0A14CR32:5A12KY32KYI:A27İ480d?(A4A8)BYSBİ1700sDA13510IM1:450:40NAAKY:A127510SCI2:2000:BY,48CR:BY1,A:2020:510X16302,0:16299,0:230,64:650b2:B3640gC <- RET"."KEYBOARD: ";:KYĺ"LOWER":525>"STANDARD"h 22:20:"TYPE: ";:CRĺ"NORMAL":535w"REVERSE"1500:470:X(SP19)256(SP18):Y(SP20):460:X273ĺ"":585455:A(16384)128:A0540!A127A4&16368,0:"RUNN,";MR$40<I(230):230,32:1XO,YO:230,I:Z1X,Y:I120::1X,Y:~24:20:"X:";X;" Y:";Y;" ";:"BYTES USED : ";BYSB1;:16302ES,0:ESES:X273Y18440V16:190 :21:"TEXT MODE ^L ^R ^N ES@ED1:BYSB:1100EED403JA$(21)İ1400TOA$">"A$"."(A$)940pTK110:1400:EDK11z:40:21:"(S)TART OVER, OR (M)ENU":A$::A$"S"ĺ"INSERT MASTER DISK AND PRESS A KEY":A$::"RUNPICEDIT,"MR$ A$"M"ģ39590:(A$"D"(A$)127)BYSBİ17000A$(4)290_:21:"DELETE HOW MANY STEPS? ";D:D140w K1D:BYSBİ1700}!"A$"S"1000,A$"R"310.EDED0:BYBE111006A$"Q"4008A$(8)ED1:BYBYCI:1100;A$"E"325A$"T"İ1305:M4:5005 A$(20)İ1305:M4:510L A$"1"A$"8"270 1305:M3:(A$)BNCI1:2000:BY,63(A$):2020 A$(27)İ480 A$"J"JJ (A$"X"A$(13))M1105 A$"Z"ZXX:ZYY:ZCZC A$(26)ZR25ZR8:190:35 xM125,150,1755 }450:V160:190:35H V224:190:35[ V192:190:35 CI3:2000:BY,V(X255):BY1,X(X255)256:BY2,Y:2020: A$:A$"I"1050 A$"H"3000 A$" "600 A$"L"M1:450 A$"F"İ1305:M2 D:1500:470:CD:SP13,CF. 72:460:B3600; <M380L DX266X266] EY176Y176 FSP17,1:K12:SP15,X255:SP16,X(X255)256:10,Y:BR:I150:::SP17,0:90 P455 Z(16384)127200 _B0120 dB1M155 i450:V12: 20:BK3:30720,0:BY,0:900:SB25344:CM0:30= !A$"L"30L "900:BEBY] #2:B0B135 (:21:"T Z SP ESC R D E S I Q (H)ELP";:EDĞ:"<>";: ,:M45,46,47 -"LINE";:50 ."FILL";:50 /"BRUSH ";BN; 2" FCOLOR:";CF;" LCOLOR:";C114:KY0:CR0:BK0:ES0:ED0:J0:M1:232,0:233,3:1:0:BYSB:BESB:1100 :21:"(L) LOAD PICTURE (N) NEW PICTURE (B) LOAD BACKGROUND (D) DISK CATALOG";:A$::A$"N"35 A$"D"Ĺ16303,0:"CATALOG,";DT$:A$:16304,0:30- A$"B"SB307%&COPYRIGHT 1983, MARK PELCZARSKIa"OPENINPUT":"READINPUT":A$:"CLOSE":"EXEC"A$:"OPENDISK":"READDISK":MR$,DT$:"CLOSEDISK":L%(15):I015:L%(I):: 1,3,1,2,1,2,2,0,3,0,3,0,3,0,3,0J :ZR20:SP36096:SB25344:BRSP835:CLSP       ͍̍ԍβBY2:510@"UNIDENTIFIED COMMAND, ";CM;". LOC.";BY:A$:510 I(CM12):X:Y:X(XMX):Y(YMY):X279I13X279I13Y191I15Y191I15BY,CM16(X255):BY1,X(X255)256:BY2,Y:BYBY3:510X:BY,CM16X:BYBY1:510X"X SCALING FACTOR (10 IS NORMAL) : ";MX:MX0502j "Y SCALING FACTOR (10 IS NORMAL) : ";MY:MY0503 "OPEN";A$;",";DT$:"READ";A$:BYSB CM:BY,CM16:CM1540,525,530,535,530,535,515,520,525,520,525,520,525,520,525 X:BY1,(CTX):BY  JJJJJe ) e)` 00>3>3333300>333>3633>03333 00003333 ?[[[[333333333>33>003063333>333 mmmm~3 3333>0? ? 8( ?3??33?33??33??333????????;3?333??33?? ??3;;3??cwkcccc337?;33?333??3??##+.?3?;3?0??? 33333?33333 ccckkwc33 33333 ?? ??8p` ?J66$6???? ??0? '<:9 *.  88888*>* ??  >>`p833333<630000?38???0>0?8<63?00??0?33??0 ?33??3>0> p88p>>>>8?3    ROUTINE) ER(222):"DISK ERROR #";ERN ER4ĺ"DISK IS WRITE-PROTECTED"x ER8ĺ"I/O ERROR - CHECK DISK DRIVE" ER6ĺ"FILE NOT FOUND" ER9ĺ"DISK FULL - TRY ANOTHER" ER10ĺ"FILE IS LOCKED" "PLEASE PRESS (RETURN)":A$::   VE";A$;",A";S;",L";L:216,0:20@ ,"DISK ERROR "(222):A$:20} A$"":I301:J(X(16I)):A$A$H$(J):XXJ16I:: U 10,#";(222):"PLEASE PRESS (RETURN)":A$::E1ī140; 320<M(X80)160(X160)32(Y80)10(Y160)2:M0M8F FP,M:36864T P(38368)l Z(38368)ĺ(7):A$t d50u 36055E LINE 5 SETS HIMEM TO PROTECT THE ANIMATION ROUTINEd (4);"BLOAD JOYSTICK.ANM"l:(4);"BLOAD MAZE.PIC,A$2000"(4);"BLOAD MAZE.PIC,A$4000"N0(T(38144N4):P(38272T2)(38273T2)2562X(0):Y(1)6 P,M:36864# P(38368),(38369)D Z(38368)(38369)ĺ(7):A$L d50M 35365E LINE 5 SETS HIMEM TO PROTECT THE ANIMATION ROUTINEc (4);"BLOAD COLLIDE.ANM"k:sN0(T(38144N4):P(38272T2)(38273T2)256-370732X(0):Y(1)<M(X80)160(X160)32(Y80)10(Y160)2:M0M8 FPEARSIN THE DISK CATALOG."::"FILE NAME : ";A$:300S n"BLOAD";A$:N$A$:216,0 xS(21902)(21901)256:L(21920)(21919)256 }XS:400:S$A$:XL:400:L$A$ LS1:20 LSĺ"NO FILE":A$:20 :"FILE NAME : ";A$:300 "BSAT"::LSĺ"CURRENT FILE : ";N$:"STARTS AT ";S" ($";S$;")":"LENGTH ";L;" ($";L$;")"s A$::A$"Q"ģHM:"RUNN" A$"L"100 #A$"S"200 (A$"C"A$"D"20 -300 2"CATALOG":A$:216,0:205 d:"YOU MUST USE THE FULL NAME AS IT AP# BINARY FILE TRANSFER UTILITY=1982 MARK PELCZARSKIaLS0:HM(115)(116)256:7679H$(15):S015:H$(S)::0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,FT ::"PENGUIN SOFTWARE":"BINARY FILE TRANSFER UTILITY":"(L)OAD (S)AVE (D)ISK CATALOG (Q)UI    K":"OPENDISK":"READDISK":MR$,DT$:"CLOSEDISK"R "EXEC SHAPEDIT RUN,";MR$X } "DISK ERROR #";(222):A$::10 BYBYL%(CM):CM0720'"PR#0":30> GET NEXT COMMAND CM((BY)16):CM1820,805,810,815,810,815,815,820,805,820,805,820,805,820,805%X(BY1)256((BY)CM16):Y(BY2):*X(BY)CM16:/X(BY1)4+990:"BLOAD";A$;".CM:2000:TVAC(X):2000:610]TVCM:2000:LTTLST:"BSAVE"A$",A"ST",L"LT","DT$:P$A$:30"DISK ERROR ";(222):A$:30"PRINTER SLOT #";:A$:A$"1"A$"7"30:"PR#"A$:BYSB:I0:"PICTURE LISTING : ";P$:II1:800:I;") ";:1500:PTX":690]BYSB:TLSTzb800:23:BY:BYBYL%(CM):CM1640,625,637,630,630,630,635,620,625,620,625,620,625,620,625l610qTVCM:2000:TVXM:2000:TVYM:2000:610vTVCM:2000:TVX:2000:610{TVCM:2000:TV(CTX):2000:610}TV13X279I13)Y191I15Y191I15hBY,CM16(X255):BY1,X(X255)256:BY2,Y:BYBY3:5102100:XTV:BY,CM16X:BYBY1:5102100:XTV:BY1,X:BYBY2:510LNBYSB1:LS1:P$A$:216,0:1100:30 XM100:"NAME : ";A$:A$A$".2100:23:BY:CMTV:BY,CM16:CM1540,525,530,535,530,535,515,520,525,520,525,520,525,520,5252100:XTV:BY1,(CTX):BYBY2:510"UNIDENTIFIED COMMAND, ";CM;". LOC.";BY:A$:510 I(CM12):2100:XTV:2100:YTV:X(XMX):Y(YMY):X279IBLE : "C$:I0255:I"-->"(CTI)::"PR#0":100V "NAME : ";A$:A$A$".PTX":690 "X SCALING FACTOR (100 IS NORMAL) : ";MX:MX0502 "Y SCALING FACTOR (100 IS NORMAL) : ";MY:MY0503 "BLOAD"A$",A"ST","DT$:BYSB:TLST 216,0_ER4ĺ"DISK IS WRITE-PROTECTED"A<#ER5ĺ"END OF DATA IN FILE"]F#ER6ĺ"FILE NOT FOUND"P#ER8ĺ"I/O ERROR - CHECK DISK DRIVE"Z#ER9ĺ"DISK FULL - TRY ANOTHER"d#ER10ĺ"FILE IS LOCKED"n#"PLEASE PRESS (RETURN)":E$::210T T @PUU  ( `@p0T*T*( @@PT*T*PPP (P*P* ( @PP P PP@P   (( ( @@@@@  ՊՊՊԂЀԪԪԪԪPPРРЪЪЪЪՂՂՀ=LŐ`@LŐ``?@ }@0 `ȹL6 @< LŐ@LG) e)J)) 0L L)) 0Lߐ L ȹ  ȱeUeV  (p ѥ ` ȹ   ( ӥ ` ʥ ` 1 LuLopQ Q    TPPPP            `@p0((P P @@P P ((     P"P"@"@*@* @*@*@(@(@(QQQQUUEEE   **((**"""  AAAUEE"""*  `@p0DDDT           (((@ @ @   """P*P(P(         U Q Q @"""@@@@@@*@"@"@  ~~|xp|~?~?~?<8`@p0 ` ``p088<xp``@@pxxxxp`pppp@pa``@`````?@ @@@@~  ՂԀ` x`*`1` `L`` @ HHH p ` ``  ` 8` I`) @"` 1 q` I1 b``"` b`` I` ` q`` 8` `` "CLOSE"::2000:1002 ERROR SUBROUTINESER(222):"DISK ERROR #";ERxER4ĺ"DISK IS WRITE-PROTECTED"ER8ĺ"I/O ERROR - CHECK DISK DRIVE"ER6ĺ"FILE NOT FOUND"ER9ĺ"DISK FULL - TRY ANOTHER"ER10ĺ"FILE IS LOCKED"$$ ?? $--?7--;?7 )5;- `@p0ԪЊŀŀŀŀŀŀŀՀ 88|~pppppppppx~~`````px|uCvB|?|?@@@@@@@@@@@xx@`p?pp``>@@88888  P T TP@@@UU (((( => =>`"BLOADAPCOL`@L  h 菙hLX동o``?@ }@0 `ȹLd @< L@Lu) e)J)) 0Lߐ L  ȹ  ȱemfeng  i (p pQ Q) й ` ȹ   i (  ʥ ` 1 LuLopQ Q   `@p0P*T*T P*(((T*T     @ @@@@ *(((@*@ TUUPP((   (( (( UU     U U TT **  ((((`@p0T T*((((T*T*T ( ((U(P(P P P U U P*P*P P P P P*P*@ @*@"@ U U A A A AUUTT@*@*@@@@***((( TUEAQ A E EU(* "* *(`@p0PT   DDD  **T"P ((U(T(( @ P*P((  *(P(P(P @ U Q P @ D T T Q Q *@*@"@ @@@(@(@"@"@* " sLܐ`@Lܐ``K@ }@0 `ȹL<@H ԏ Lܐ@LM) e)J)) 0LÐ L-.` ȹ  ȱefqegr  i (p1 )p  н ` ȹ   i (  ʥ `   ՂՊՂՂՀԊԪԊԊԊԊPPЪЪРРРЪЪЪЪՀՂՀ  PTU U      TP (*"**""( `@p0@P ((((((((P @ (UE(U(UE@@@  @*P*P*P P P P P @* U U  U U A A  U(*@*@(@*@*@*@@@*( TTTDDD           ((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP@DHLPTX\@DHLPTX\AEIMQUY]AEIMQUY]BFJNRVZ^BFJNRVZ^CGKOSW[_CGKOSW[_@DHLPTX\@DHLPTX\AEIMQUY]AEIMQUY]BFJNRVZ^BFJNRVZ^CGKOSW[_CGKOSW[_@DHLPTX\@DHLPTX\AEIMQUY]AEIMQUY]BFJNRVZ^BFJNRVZ^CGKOSW[_CGKOSW[_  `@p0(T(T(T*T*T****(((@ @"@"@*@*@*@(@(@(@ @ @ "*****"""""" ~~~~vvvvppppppp~~~~^`@p00<<|?|?|?|?L3L3L3L3 0 0@@@@@@@xxxxx```q`````n`n`n`n``p`Ac``w`cF~~~~~~~@@o@G  ԀЀЀЀЊ`@p0ЂЂԀЀЂЂ  @@@ EUUU U E E  ****     TT*T*T**PP(@(P(T(((((((T(P(PPPPPP P*P*PPPPP   A Q U     Q Q @@@@"@*@*@ @*@" ՊՊ"L̐`@L̐ ``<@ }@0 `ȹL; @9L̐@LL) e)J)) 0L  L-. -.`  ȹ  ȱej_ek`  (p1) pQ ĥ ` ȹ   ( ӥ `  `@p0ԪԪԊԊЪЪЊЊՂՂ ppppx|<xxp`888888<@pppppppppp`@``````$\@@@@@@@@@@@@@@@`PQQQQUUQQQQP ********** `@p0(((((T*T*((((( (((((((((( PP"P"P"P"P*P*P"P"P"P"P          @ @*@*@*@*@*@*@*@*@*@*@ T U  EE U T (*    *(`@p0P*T***  T*P* U(U(((((((P(P(U @*P*P PPPP(P(PPP*@*U U A    Q Q A A UU*@*@@@@@@"@"@@**770::9z"PATH POINTER (A,B,C) : ";:A37952I:770:{"PATH START ADDRESS : ";:A37984I:770:A38016I:770::"PATH LIST : ":J0N1:A381444IJ:(J65);") ";:770::::"CURRENT REPEAT FLAG : ";:AA1:770::"COLLISION FLAG  ~~>>>>>>`@p0|?|?||xx8xxxxxxppppppppppp``````````@@@@@?@?@@@@ T U UUU T (** (`@p0P*T*TTTT*P* ((((U U@*P*PPP P PP@*U      UU*@*@@*@*@*UU   U U U*******`@p0TT (    (T T((U(UPP(U(U(U(P*P*  P*P*P* U U U @   @ U U U@*@*@*@@@@@*@*@*ԂՊՊՀՀՂՊԂЊԪԪԪԪԪԀԪԪԪԪЊPPՀЪЪЪЪЪЂЪЪЪЪՀՂՂՂՀPATH : ";PL%(I):T2T4ĺ" PAGE 2 FLAG: ";(37920I)20`WDS1780,750:"ACCESS LOCATIONS :"\:"SHAPE POINTER AT : ";:A37888I:770::f"X COORDINATE AT : ";:A38048I:770:A38080I:770:p"Y COORDINATE AT : ";:A38112I:"START AT ";OL%(I,0);", ";OL%(I,1)::"PATHS : ":J03:(J65);") ";:Nĺ:850{4LP%(I,J):LNPĺL,(P$,3L1,3):850>L255ĺ"REPEAT"CL254ĺ"DRAWN END"HL253ĺ"ERASED END"MNJ8R:" STARTING PATH : ";(PN%(I)65);" LOCATION IN C$:::^XA:H$"":H301:G(X(16H)):H$H$X$(G):XXG16H::A;" ($";H$;") ";: :"**************************************************************":: "OBJECT NUMBER : ";I:DSİ780P*N0::"SHAPE : ";O%(I),(S$,3O%(I)1,3)::UEEU*          *`@p0T     T T     T ((@(@(P(P(((D(D(@(@(P*PPPPP(P(PPPPP* U   A A       U@*@@@ @ @"@"@@@@@*   :16303,0:"UIOJKNM, MOVE AND REGISTER RETURN <- -> / SINGLE STEP MOVES Z - REGISTER MOVE OR PAUSE D - DELETE MOVE X - CHANGE X INCREMENT Y - CHANGE Y INCREMENT S - SAVE C - CLEAR ESC - FULL SCREEN Q - QUIT" A$::16304,0:205 ERRpx ~~ `pxx~`@p0@`0 0 0 0|?|? 0 0 0@````````p=x@1``````````````@1>cccccss8|FFFFF~~FF~@ҍ΍RS A - ANIMATE"["1-7 : TOGGLE EDITING ON FRAMES O - DISK OPTIONS":A$::16304,0:150ZZ1:16303,0:"CATALOG,"DT$:A$:16304,0:'# ERROR ROUTINE(#:23:ER(222):"DISK ERROR #";ER:7802#ER4ĺ"DISK IS WRITE-PROTECTED"<#ER5ĺ2I,A(A256)256:382732I,(A256):bI0NO:37888I,O%(I):37952I,PN%(I):N4000PA%(P%(I,PN%(I)))PL%(I):37984I,N(N256)256:38016I,(N256):J0vNP%(I,J):381444IJ,N:JJ1:NNP630:37888I,255::"";:K,"MR$:""BLOADBLBACK,"MR$:9"BLOADEOR,"MR$:T"BLOADBLBACKE,"MR$:nT2T4A$"1":6040"PAGE (1) OR PAGE (2)":A$:A$"1"A$"2"6035:"BLOADP";A$;"L":PG(A$):'# ERROR ROUTINE(#ER(222):"DISK ERROR #";ER 2#ING PATH (A/B/C): ";A$:A$"A"A$"C"5005JN(A$)65:P%(I,N)NP5000WPN%(I)N"STARTING LOC. IN PATH : ";N:N05100PL%(I)N:p:I14:I") "T$(I1)::A$:A$"1"A$"4"ıu:T(A$):T6010,6015,6020,6025:6030z"BLOADBLOC4600*P%(I,2)N:NNPıD"R/D/E :";A$:4900:N253N2554750TP%(I,3)N:h$A$"R"N255:|%A$"D"N254:&A$"E"N253:'A$""J0:NNP:500:N1:(A$"0"A$"9"N1:)N(A$)::P%(I,1)NPN0:5050*"START LOC., Y : ";N:N0N2554250/OL%(I,1)N:X"PATH A : ";A$:4900:N0NNP4350f0P%(I,0)Nb"PATH B (OR R/D/E) : ";A$:4900:(N0NNP)(N253N255)4450P%(I,1)N:NNPı"PATH C (OR R/D/E) : ";A$:4900:(N0NNP)(N253N255)" ";:APA%(I)4000:770:PU%(I)ĺ"UNUSED";K+DS(16384)127ľC$:C$a0::DS1780,750:I0NO:800:DS1780,750:D"PR#0":100XI0NS:ASA%(I)4000:377602I,A(A256)256:377612I,(A256):(]I0NP:APA%(I)4000:38272DS1780,750:"SHAPE DATA"::"# NAME ADDRESS":I0NS:I;" ";(S$,3I1,3);" ";:ASA%(I)4000:770:SU%(I)ĺ"UNUSED";DS(16384)127ľC$:C$::DS1780,750-&:"PATH DATA"::"# NAME ADDRESS":I0NP:I;" ";(P$,3I1,3);20 C$"P"100F "PRINTER SLOT : ";:C$:C$:C$"1"C$"7"510Y "PR#"C$:780 "ANIMATION FILE : "A$::"ANIMATION TYPE : ";T$(T1):"HI-RES PAGE : ";PG:"BOTTOM ADDRESS (SET HIMEM TO) : ";BA::NO1" OBJECTS":NS1" SHAPES":NP1" PATHS":àz#7?oPATHJJJJJJJJJJJJJJJJJJJJJJJJJoJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKdKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK ֮Ƞ ׮Ƞ خȠ ٮȠ ڮȠԠ͠ ϮȠ ЮȠ ѮȠ ҮȠ ӮȠ ԮȠ ծȠȮȠɮȠʮȠ ˮȠ ̮Ƞ ͮȠ ήȠȠ®ȠîȠĮȠŮȠƮȠ ǮȠŮؠ!Ӯ͠1ӮؠŮ͠  ŮؠŮà"ŠŮȠ  Ǡ ǠԮ͠ Ԯؠˮ͠ ˮؠŮ͠  űǠ Ǡ Ǡ ǠǠǠ ΠԠŠŠ"ŠԠ!ŠΠԠ ŠҠ ȠҠˠ Š ˠ ˠ Ҡ Š Ӡ Π ͠Ԡ Ԡ"à Š!б̠ в̠       Ϡ Π Ԡ! ̠ ͠ ԠΠPPPPPPPPPPPPPPPPPPPPPPPPPK@IJJJJ< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?((((((((((((((((((((((((((((((((PPPPPPPNNN@@A@AB@ABC@ABCD@ABCDE@ABCDEF $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048 }@0 `ȹL6 @< LŐ@LG) e)J)) 0L L)) 0Lߐ L 456` !$'*-0369@`>0>>>6c@A888|||~|88llō͍ WESUDOWGETAKBUPURCHASFILLOOCLIMSWITALASATTACFIGHHISTASLAKJJJJJJJJJJJJJJJJJJKKKKKKKKKKKKKKKKKKKKKKKKKKZd(dx2KKKKKKKKKKKKKKKKKKKKKKKKKKKK  +0 whhLuv`) 0*H , . H L`Hʩ .Hȩ`NORTSOUTEAS@JJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJ  JJJJJJJJ"RUNN"dd1:>#'+/37;?#'+/37;?((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPFYDISK,";MR$:10,:B(222)51"DISK ERROR #";BY6B4ĺ"DISK IS WRITE-PROTECTED"@B8ĺ"I/O ERROR - CHECK DISK DRIVE"JB6ĺ"FILE NOT FOUND"TB9ĺ"DISK FULL-TRY ANOTHER"^B10ĺ"FILE IS LOCKED""PLEASE PRESS (RETURN)":B$:: ::"PRESS (ESCAPE) TO CANCEL"::o "INSERT A BLANK OR RE-USABLE DISK":"IN ";DT$;" AND PRESS (RETURN)" B$::B$(13)ī10 :(4);"INIT";DT$ DT$MR$ĺ"PLEASE INSERT THE MASTER DISK":"IN ";MR$;" AND PRESS (RETURN)":A$:"VERITHE FORM 'S5' OR 'V20' FOR SELECTING SLOT OR VOLUME. "t i"PRESS RETURN TO CANCEL ":"MASTER DISK : ";A$:A$""10 n"DATA DISK : ";B$:B$""10 xMR$A$:DT$B$:"UNLOCKDISK,"MR$:"OPENDISK":"WRITEDISK":MR$:DT$:"CLOSEDISK":"LOCKDISK":10&OC"1 (A$"A"ĺ"BLOADMOVE,"MR$:"RUNANIMEDIT"P 7A$"B"ĺ"RUNBINTRAN,"MR$` <A$"I"150p ?A$"M"100 AA$"C"ĺ"CATALOG,"DT$:A$::10 FA$"Q"10 P"MAXFILES3":6 d:"DISK SELECT: TYPE 'D1' FOR DRIVE 1, 'D2' FOR DRIVE 2,OR USE D@ABCDE@ABCDEF $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26L  L-. -.` 456` !$'*-0369"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? L@@A@AB@ABC@ABCD@ABCDE@ABCDEF` ʥ ` 1 LuLopQ QLŐ`@LŐ``?@ }@0 `ȹL6 @< LŐ@LG) e)J)) 0L L)) 0L  ȹ  ȱeUeV  ("g ѥ ` ȹ   ( ӥ ~ ````p=x@1``````````````@1>cccccss8|FFFFF~~FF~px ~~ `pxx      U@*@@@ @ @"@"@@@@@*UEEU*          *@p0@`0 0 0 0|?|? 0 0 0@````ЊԪԪԪԪԪԀԪԪԪԪЊ@p0T     T T     T ((@(@(P(P(((D(D(@(@(P*PPPPP(P(PPPPP* U   A A ՀՂՂՂՀԂՊՊՀՀՂՊԂ@@@@*@*@*UU   U U U*******PPՀЪЪЪЪЪЂЪЪЪЪ (@p0TT (    (T T((U(UPP(U(U(U(P*P*  P*P*P* U U U @   @ U U U@*@*@*@ ((((U U@*P*PPP P PP@*U      UU*@*@@*@*@*T U UUU T (**`@@A@AB@ABC@ABCD@ABCDE@ABCDEFKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK KTSPATHSJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK@KTSPATHSJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?LL4̍56 456` !$'*-0369>>>>>@p0P*T*TTTT*P*T U  EE U T (*    *(@p0|?|?||xx8xxxxxxppppppppppp0P*T***  T*P* U(U(((((((P(P(U @*P*P PPPP(P(PPP*@*U U A    Q Q A A UU*@*@@@@@@"@"@@** PP"P"P"P"P*P*P"P"P"P"P          @ @*@*@*@*@*@*@*@*@*@*@ PQQQQUUQQQQP ********** @ppppppppppp`@``````ppppx|@p0(((((T*T*((((( ((((((((((@`<xxp`888888<@ՊՊ\@@@@@@@@@@@@@@@p0ԪԪԊԊЪЪЊЊՂՂ Q Q @@@@"@*@*@ @*@"@@@ EUUU U E E  ****     TT*T*T**ԀЀЀЀЊPP(@(P(T(((((((T(P(PPPPPP P*P*PPPPP   A Q U    ЂЂԀЀЂЂ`````n`n`n`n``p`Ac``w`cF~~~~~~~@@o@G~~~~vvvvppppppp~~~~^@p0****""""""TTTDDD           @p00<<|?|?|?|?L3L3L3L3 0 0@@@@@@@xxxxx```q*"**""( @p0(T(T(T*T*T****(((@ @"@"@*@*@*@(@(@(@ @ @ "* (UE(U(UE@@@  @*P*P*P P P P P @* U U  U U A A  U(*@*@(@*@*@*@@@*(PTU U      TP (ՂՊՂՂՀԊԪԊԊԊԊ@p0@P ((((((((P @PЪЪРРРЪЪЪЪՀՂՀ@ P*P((  *(P(P(P @ U Q P @ D T T Q Q *@*@"@ @@@(@(@"@"@* TUEAQ A E EU(* "* *(P@*@*@@@@***(((UU     U U TT **  ((((@p0PT   DDD  **T"P ((U(T((  (((( @p0T T*((((T*T*T ( ((U(P(P P P U U P*P*P P P P P*P*@ @*@"@ U U A A A AUUTT(((T*T     @ @@@@ *(((@*@ TUUPP((   (( ((P T TP@@@UU``>@@8888888|~pppppppppx~~`````px|@p0P*T*T P*9 26336* (4);"BLOAD LETTERS.ANM"08:i"TYPE SOMETHING 28 CHARACTERS OR LESS.":A$z((A$)28302:16302,0<I1(A$)AA((A$,I,1))65FA0A25Ĺ37888I1,26:80K37888I1,API ZJI28:37888J1,2 FP,M:36864 P(38368)3 Z(38368)ĺ(7):A$; d50< 36055+ (4);"BLOAD JOYSTICK.ANM"3:U(4);"BLOAD MAZE.PIC,A$2000"w(4);"BLOAD MAZE.PIC,A$4000"N0(T(38144N4):P(38272T2)(38273T2)2562X(0):Y(1)<M(X80)160(X160)32(Y80)10(Y160)2:M0M8 )ĺ(7):A$ d50 35365* (4);"BLOAD COLLIDE.ANM"2::N0m(T(38144N4):P(38272T2)(38273T2)256x-370732X(0):Y(1)<M(X80)160(X160)32(Y80)10(Y160)2:M0M8FP,M:36864P(38368),(38369) Z(38368)(38369  (4);"BLOAD JOYSTICK.ANM"2::16302,0:N0m(T(38144N4):P(38272T2)(38273T2)2562X(0):Y(1)<M(X80)160(X160)32(Y80)10(Y160)2:M0M8FP,M:36864P50N1)M32:110 nP,M$ x36864:50N% 36055+ (4);"BLOAD JOYSTICK.ANM"=::16302,0EN0x(T(38144N4):P(38272T2)(38273T2)256-P,82(16384)128120<A$:A$" "M8:110FA$"A"M10:110PA$"Z"M2:110ZA$(8)M160:110 dA$(2  B :16302,0-(4);"BLOAD FIRST.ANM"836864@(30D 8I:7I,8I7I,150::B I06:NXS%(I)XC,(I3)648YC::c X"DISK ERROR #";(222):A$:q bE10,100 ((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPڌ $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?L-.` 456` !$'*-0369@`>0>>>6c@A888|||~|88ll  26336*(4);"BLOAD LETTERS.ANM"0?(37889,255O2:16302,0[<L025hF37888,LtPI150Z36864dI:Ln6038 dM(Y80)14(Y160)6(X80)224(X150)96:M0M8K nP(0),M:36864l x769:C(768):C0C255150} 37888C,128 38368C,0:(7) 120 I 60R 36018+ (4);"BLOAD COLLGAME.ANM"N(4);"BLOAD COLLISION DETECT"^:16302,0iN05(T(38144N4):P(N)(38272T2)(38273T2)256-2770,5:37073<I15FP(I),((1)255)1KIPI115ZX(0):Y(1)  6::37916,255, d36864:(16384)1271008 nA$:20mm 8 ``88 L8 8 ``iii i Lh@p?XoLO@@@ `00************""""""""""""""""""""********""""""""""*****"""""************  ȹ  8llppp xx|~xxXX ```@ppx|pp00@@@```p`@@``LO@@@ `00\@>@`>0>>>6c@A888|||~|8ppp xx|~xxXX ```@ppx|pp00@@@```p`@@``@p?Xo% \@>@`>0>>>6c@A888|||~|88ll     ō΍P$PT$:100):"NAME : ";C$:C$""ı3A$C$600::"BSAVE";A$;".ANM,A";BA;",L";38400BA;",";DT$:"OPEN";A$;".ATX":"WRITE";A$;".ATX":T:PG:BA:NO:NS:NP:P$ S$:I0NO:O%(I):PN%(I):PL%(I):OL%(I,0):OL%(I,1):J03:P%(I,J):::"":N0ST$(S$,3N)9$NNSST$ST$(S$,(NSN1)3)I)S$ST$:100.NPNP1:I0NO:J03:P%(I,J)NP%(I,J)50P%(I,J)P%(I,J)13::INNP:PA%(I)PA%(I1):PU%(I)PU%(I1)::PT$"":N0PT$(P$,3N)8NNPPT$PT$(P$,(NPN1)3) =J256):39172,L(L256)256:39173,(L256):39174aBABAL:I0NS:ASA%(I)SA%(I)SA%(I)L:I0NP:APA%(I)PA%(I)PA%(I)LC$"P"1070NSNS1:I0NO:O%(I)NO%(I)O%(I)1:INNS:SA%(I)SA%(I1):SU%(I)SU%(I1)::ST$USED.":C$:100*C$"S"ASA%(N):10307APA%(N)gJ32608:I0NS:SA%(I)ASA%(I)JJSA%(I) :I0NP:PA%(I)APA%(I)JJPA%(I):LJA:(BAA)10423JA3999:39168,BA(BA256)256:39169,(BA256):39170,J(J256)256:39171,( : ";:A38368I:770::OT2T4ĺ"PAGE 2 FLAG : ";:A37920I:770:U:"DELETE (S)HAPE OR (P)ATH?";:C$:C$:C$"S"C$"P"100"WHICH NUMBER : ";N:C$"S"NNSC$"P"NNPN0100C$"S"SU%(N)C$"P"PU%(N)ĺ"THAT ONE IS PATHKKKKKKKKKKdKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK@JJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJKKKKKKKKKKKKKKKKKKKK @ @ @  @@  @@ @ @ @ @ |?x@ @@`|?x@  @ @ @  @@  @@               ԍ΍@@@``@`pppp`mxx||||xx``|~~~???~~~|`???@  ($@h`+'bH"(@ " JJJJJJJJJJJJJJJJJJJJJJJJJJJJJmJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKnKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK(((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPI%@&*.26:>"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?(((((((((((((((((369L255ĺ"REPEAT"CL254ĺ"DRAWN END"HL253ĺ"ERASED END"0):38048I,(N7):38080I,N(N7)7:38112I,OL%(I,1):J0jvNP%(I,J):381444IJ,N:JJ1:NNP63038368I,0::37888I,255:A$(A$,3):(A$)3A$A$" ":700 600::"OBJECT NUMBER (0-"NO;:") : ";I:INOI0ı %:"OBJECT 1:S;" ";:Jĺ(S$,3S1,3);:5305(P$,3S1,3);A:::aXNO0ĺ"NO OBJECTS":A$::bI0NO:37888I,O%(I):37952I,PN%(I):N(38272P%(I,PN%(I))2)(38273P%(I,PN%(I))2)256PL%(I):37984I,N(N256)256:38016I,(N256)<lNOL%(I,:38400,0:38401,32:38402,J(J256)256:38403,(J256):38404,I(I256)256:38405,(I256):38406|:T2T4PG2Đ:NS1NP1NO30210:NONO1:"OBJECT #";NO::INO:4050:4150:4350:5000:210!:L(37)1:S0N:L:8S(S256)256:2108 ^NP46ĺ"PATH TABLES FULL":A$:210 h380:"BLOAD";A$;".PTH,A8192,";DT$:390:NPNP1:700:P$P$A$:38273NP2,(S256):38272NP2,S(S256)256:210 |"NAME:";A$ ~fL(43616)(43617)256:SBAL:BAS:IS8192:J8191L550 @A$"H"210f B380:"BLOAD";A$;".PIC,A$2000,";DT$:T2T4PG2ĺ"BLOAD";A$;".PIC,A$4000"o D210 JNS62ĺ"SHAPE TABLES FULL":A$:210 T380:"BLOAD";A$;".SSH,A8192,";DT$:390:NSNS1:700:S$S$A$:37761NS2,(S256):37760NS2,S0 A$"A"İ1200:210/ A$"S"İ1500:210X A$"C"İ1400::"RUN ANIMEDIT,"MR$i "A$"Q"210 '1400:39590::"RUNN,";MR$ ,:"(S)HAPE, (P)ATH, (H)I-RES SCREEN, OR (A)NIMATION TABLES":A$ 1A$"S"330 6A$"P"350 ;A$"A"1S1:"PATHS: ";NP1:"OBJECTS: ";NO1:"ANIMATION TYPE: ";T$(T1):"PAGE: ";PG:"BOTTOM ADDRESS: ";BA:A$:A$ A$"D"ĺ"CATALOG,";DT$:A$:210 A$"H"İ395 A$"L"300 A$"T"İ6000:210 A$"O"400 A$"N"900 A$"E"İ800:21TABLE":"BLOADP1L"::::T1:6010:PG1:NO1:NS1:NP1:BA36608:I3792037951:I,17:e #9000 :"(L)OAD (O)BJECT CREATE (E)DIT OBJECT (A)NIMATE (S)AVE (D)ISK CATALOG (N)AMES (H)I-RES CLEAR (T)YPE OF ANIMATION (C)LEAR (Q)UIT "m "SHAPES: ";N SHAPE CONVERTER!200;:"SHAPE NAME : ";A$["BLOAD ";A$;".SSH,A$8500"|(L(21920)(21919)25612234049,16<I4122:OF(34048I)256(34049I)I2:34048I,(OF256):34049I,OF(OF256)256: FSL(34062)(34063 (C)1983,MARK PELCZARSKI8192:O%(31),P%(31,3),OL%(31,1),PL%(31),PN%(31),T$(3):T$(0)"BLOCK":T$(1)"BLOCK/BACKGROUND":T$(2)"XDRAW":T$(3)"BLOCK/XDRAW":S$"":P$"""VERIFYDISK":"OPENDISK":"READDISK":MR$,DT$:"CLOSEDISK"Z "BLOADP       ıı @ @ @  @@  @@ @ @ @ @` "RUNN,";MR$O1XDX,YDY:23:1:"X:";XDX;" Y:";YDY;" ":1XDX,YDY:LL1:LM(L):V1(LM8):DYLMV18:DX(V12):V1V1DX2:V2(DX8):DXDXV28:V2DXDXV1DYDY4:X,Y:XXDX:YYDY:MM1:DX0:DY0:7:22:1:M;" MOVES":A$:A$"Y"ė:205100P,XDX0XDX279YDY0YDY191DX0:DY0:2106V128(DX0)16(DX)8(DY0)(DY):V0V128EL,V:LL1:MM1:22:1:M;" MOVES":XXDX:YYDY:X,Y:DX0:DY0:210:21:"LOSE PATH?":A$:A$"Y"205 ::SFS0:16301,0&:21:"NAME:";A$]L,0:"BSAVE";A$;".PTH,A16384,L";M1;",";DT$:205l3500:205(A$"D"A$(127))Mİ2000:210 A$"Q"400A$"C"210FSFS0:16301,0:21:"CLEAR PATH - START OVER - ARE YOU SURE?";:I:300# A$","DXXI:DYYI:300V (A$(13)A$(11))YDY0DY7DYDY1:210} A$(8)XDX0DX7DXDX1:210 A$(21)XDX279DX7DXDX1:210 (A$"/"A$(10))YDY191DY7DYDY1:210 A$"Z"300 A$"S"260F@ @@ @ A$"U"DXXI:DYYI:300X A$"Y"Ģ24:6:"DY:";:B$:B$"0"B$"8"YI(B$):206u A$"I"DX0:DYYI:300 A$"O"DXXI:DYYI:300 A$"J"DXXI:DY0:300 A$"K"DXXI:DY0:300 A$"N"DXXI:DYYI:300 A$"M"DX0:DYY7:X,Y@ :21:1:"UIOJKNM, RET<>/ Z D X Y S C ESC Q (H)ELP";` 24:1:"DX:";XI;" DY:";YI;j 258 (16384)128İ1000:210 A$:A$(27)Ĺ16302FS,0:FSFS:210 A$"H"3000 A$"X"Ģ24:"DX:";:B$:B$"0"B$"8"XI(B$):206 (16384)128İ1000:130E A$:A$(27)Ĺ16302FS,0:FSFS:130U A$"S"200{ (A$"I"A$"U"A$"O")Y0YY1 (A$"M"A$"N"A$",")Y191YY1 (A$"J"A$"U"A$"N")X0XX1 (A$"K"A$"O"A$",")X279XX1 130 A$"N"1108 iA$"D"A$"C"ĉ:"CATALOG,"DT$:A$:102I jA$"Y"102c k"PICTURE NAME : ";A$ l"BLOAD";A$;".PIC,A$2000,"DT$:110 m3500:100 n:DX0:DY0:FS0:X140:Y96 x21:"MOVE CURSOR TO START, THEN PRESS 'S' [UIOJKNM,] ESC S"  (C)1983, MARK PELCZARSKI(70p2"VERIFYDISK":"OPENDISK":"READDISK":MR$,DT$:"CLOSEDISK":90|F3500:Z0:1:I768773:V:I,V::232,0:233,3: 1,0,4,0,4,0dL16384:M0:XI2:YI2e109 f::21:"LOAD SCREEN?";:A$::    @ @ @ @  @@  @ I),PL%(I),OL%(I,0),OL%(I,1):J03:P%(I,J):::"CLOSE":210s"SHAPE NUMBER : ";A$:A$""J1:NNS:500:4050A$"0"A$"9"4050N(A$):N0NNS4050O%(I)N:6"STARTING LOC., X : ";N:N0N17914150hOL%(I,0)N"STARTING";A$;".ATX":T:PG:BA:NO:NS:NP:P$S$:I0NO:O%(I):PN%(I):PL%(I):OL%(I,0):OL%(I,1):J03:P%(I,J):::"CLOSE":1400:380:"BLOAD";A$;".ANM,";DT$:"OPEN";A$;".ATX":"READ";A$;".ATX":T,PG,BA,NO,NS,NP,P$>"S$:I0NO:O%(I),PN%() PI167 ZJ134064I(SL2):J234063I(SL2)SLR dJJ1J2:JI2,(J):X n x"DONE. PRESS A KEY TO SAVE.":B$: "BSAVE";A$;".SSH,A$8500,L";L "ANOTHER?";:B$:B$"Y"10 "DISK ERROR #";(222):B$::20 @ @ @`xxx@ @ @`xxx@ @ @ @ @ @  @@  @@ p@ @ 6@ @ @ @@ @  p@ @ @  @@  @@ @ @ @ @ " @ @@ @ (DX)8(DY0)(DY) FB x"DONE. PRESS A KEY TO SAVE.":B$:e "BSAVE";A$;".PTH,A$8500,L";L "ANOTHER?";:B$:B$"Y"10 "DISK ERROR #";(222):B$::20 :@ @ @@ @ @ @ @ @ @ @ @  @@  @ @ @ @@ @ @ @ @ @ @ @ @  @@  @ @ @ @@ @ @ @ @  PATH CONVERTER 2009:"PATH NAME : ";A$Y"BLOAD ";A$;".PTH,A$8500"w(L(21920)(21919)2562I3404834048L2 <J(I):V1(J64):V2((JV164)16):V3((J(J16)16)4):V4J(J4)4:DYV2V1:DXV4V3:I,128(DX0)16 mm 8 ``88 L8 8 ``iii i Lh             @p0DDDT           (((@ @ @   """P*P(P(         U P @@P P ((     P"P"@"@*@* @*@*@(@(@(QQQQUUEEE   **((**"""  TPPPPՊՊՊԂЀԪԪԪԪ@p0((P:"MAXFILES1"200c"VERIFYDISK":"OPENDISK":"READDISK":MR$,DT$:"CLOSEDISK"o ::21"SCREEN NAME: ";A$"BLOAD";A$;".PIC,A$2000,";DT$#"INSERT MASTER DISK AND PRESS ";A$(:"MAXFILES3"3 2"VERIFYDISPPРРЪЪЪЪՂՂՀ (P*P* ( @PP P PP@P   (( ( @@@@@T T @PUU  ( f /$.8BL$.8BL@p0T*T*( @@PT*T*PPP!!!!!!" """                ! 1A 1A` @ @ @ A @ p ` JELXBE@`@@ 1 @ I1 @`@ @` @ A @` @ @ @ A @` @ @e 1A` @ @ @ A A @ @` @ @ @ A A @` @ @e 1A 1A` @ @@g ee L@   i  @e ȹ@e Hh С`H HH @ p ` ``  ` e  ` @ @! ! ! ((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?!! 0:XCXC1:90* A$"K"İ500:XCXC1:90G A$"M"İ500:YCYC1:90X A$"S"100d 0:450 (4);"MAXFILES3":"VERIFYDISK":(4);"OPENDISK":(4);"READDISK":MR$,DT$:(4);"CLOSE" "EXEC SHAPEDIT RUN,";MR$  I0B:7I,8I250, -1:0 2NS(16384)> <"SHAPE NUMBER : ";N:N1NNS60g F"BORDER SIZE (0-7): ";B:B0B770x KXCB1:YCXC P3:450 Z500 dE2::21:"I J K M (S)HAPE EDITOR (N)EW":A$: nA$"N"đ:60 xA$"I"İ500:YCYC1:90 A$"J"İ50s:"MAXFILES1"600c"VERIFYDISK":"OPENDISK":"READDISK":MR$,DT$:"CLOSEDISK"s E1:::21I06:XS%(I):: 7,79,151,223,43,115,187"YOUR SHAPE TABLE NAME: ";A$"BLOAD";A$;",A$4000,";DT$(232,0:233,64"""ՂԀCvB|?|?@@@@@@@@@@@xx@`p?pp@p0ԪЊŀŀŀŀŀŀŀՀxp`pppp@pa``@`````?@ @@@@~~~|xp|~?~?~?<83)648BR:2,Y1:0,(X17):1,X1(0)7:8,H:9,W:N1::16303,0:"I J K M - CURSOR MOVEMENT Z - PLOT A POINT X - ERASE A POINT Q - LOCK PLOTTING W - LOCK ERASING C - COLOR B - BORDERS AND BOUNDARIES F - FLIP R - ROTATE S - SHIFT E - EXCHANGE COLOANIMATION REPORT (D) DELETE UNUSED PATHS OR SHAPES (S) SAVE MODIFIED FILE (Q) QUIT":C$:C$"S"İ1500:100z nC$"R"500 xC$"D"1000 C$"Q"100 :"RUNN,"MR$ DS0::"REPORT"::"(P) TO PRINTER, OR (S) TO SCREEN":C$:C$"S"ė:DS1:5564000:SU%(I)0::I0NP:PA%(I)(382722I)(382732I)2564000:PU%(I)0::I0NO:SU%((37888I))1:J02:P%(I,J)NPJ3:90 UPU%(P%(I,J))1 Z: _1520j d:"ANIMATION FILE : ";A$::NO1" OBJECTS":NS1" SHAPES":NP1" PATHS"::"(R) 30 (A$"Q"140j <"BLOAD";A$;".ANM,";DT$:"OPEN";A$;".ATX":"READ";A$;".ATX":T,PG,BA,NO,NS,NP,P$ FS$:I0NO:O%(I),PN%(I),PL%(I),OL%(I,0),OL%(I,1):J03:P%(I,J):::"CLOSE":80 K2000:30 PI0NS:SA%(I)(377602I)(377612I)2` Q Q @"""@@@@@@*@"@"@AAAUEE"""*  @p0 ` ``p088<xp``@@pxxxDISK":MR$,DT$:"CLOSEDISK":270 ::2000:n X$(15):I015:X$(I)::0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,Fw 75 :"ANIMATION REPORT PROGRAM"::"'D' FOR DISK CATALOG, 'Q' TO QUIT":::"ANIMATION FILE NAME : ";A$:A$"D"ĺ"CATALOG,";DT$:A$:H(C)1983,MARK PELCZARSKI' 2616384:O%(31),P%(31,3),PA%(47),PU%(47),SA%(63),SU%(63),OL%(31,1),PL%(31),PN%(31),T$(3):T$(0)"BLOCK":T$(1)"BLOCK/BACKGROUND":T$(2)"XDRAW":T$(3)"BLOCK/XDRAW":S$"":P$"" "VERIFYDISK":"OPENDISK":"READ"" " " "