' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈JJJJx Lȿ 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,&"ųųೳŪŪųųij  !"#$%&'()*+,-./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#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 ˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭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`NFORLOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUERIF!pppp 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- ( / Ϡ@跻~!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 H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH 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뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(`# d ֠z# u`AAA1:24320,A:B24320(243212A)256((243222A))1:1000tvM(24321(V1)2)256((24322(V1)2))24320O(24321(V)2)256((24322(V)2))24320ZOMIMBI,(IZ):II24321(V1)224321((24320)1)2225SBLE NAME? ";A$3D$;"BLOAD";A$;".SST,A$6000,";C$_A(64096):BB1(43616)256(43617)lD:1000p"TABLE NAME? ";A$:E:D$;"BSAVE ";A$;".SST,A$5F00,L$";B640961;",";C$:F:1000X11000gVAA1B640961:HB:24320,0:1000@lV :164009 :21:"HIT ANY KEY TO CONTINUE":A$:1000M"FILENAME ";A$aBB1:JBG:HBD$;"BLOAD";A$;".SS,A";B;",";C$243212A,J(J256)256:243212A1,(J256):BB1(43616)256(43617):AA1:24320,A:253,A:V255:8022"TA  254,95+ Y(A$):Y191Y0ė:3030V "SPEED? (1-255) ";A$:V(A$):V1V1g V255V255x V256V:4,V "ROT OFFSET? ";A$:V(A$):V0V255ė:3045 252,V "SCALE OFFSET? ";A$:V(A$):V0V255ė:3047 5,V 251,Y A$",A";B;",";C$:BB1(43616)256(43617):253,A:V255:8022kA$"W"Ĺ253,A:254,95:4,1::16384:50u2010 :11000 253,V "X COORDINATE? ";A$ X(A$):X279X0ė:3010 249,X(X255)256:250,X255 "Y COORDINATE? ";A$10000KA$"E"đ:1000+LA$"V"8000:VA$"W"40K`A$"A"2000Uj1000A0ĺ"NO FILES IN MEMORY":I11000:I:1000:10:"APPEND FROM":"DISK FILE":"OR BY":"WRITING ON SCREEN"A$>A$"D"Ą"FILE NAME?";A$::D$;"BLOAD "; DISK":" (G) GET DISK CATALOG":" (D) DELETE SHAPE":" (Q) QUIT":A$:^/A$"L"5000o0A$"P"30001A$"D"70008A$"Q"ĺ"RUNN,";B$BA$"R"4000CA$"G"ĺ:D$;"CATALOG,";C$:"HIT ANY KEY":A$:1000GA$"S"6000HA$"C"SEE A SHAPE":" (R) RECALL A SHAPE FROM DISK":" (A) APPEND TO CURRENT SHAPE"H24320(A0)((243212(A1))256((243222(A1))))M" (E) ERASE SCREEN":" (C) CHANGE SHAPE LOCATION":" (L) LOAD SHAPE TABLE":" (S) SAVE SHAPE TABLE TO@@T T @PUU  ( cl@r:T*T*( @@PT*T*PPP (P*P* ( @PP P PP@P   (( ( @@@ՂԀ@**T U  EE U T (*    *(& ::"THE GRAPHICS MAGICIAN - PENGUIN SOFTWARE":"WRITTEN BY MARK PELCZARSKI, DAVID LUBAR, AND CHRIS JOCHUMSON "6 "PART 1 - THE ANIMATION SYSTEM (S) SHAPE EDITOR (P) PATH EDITOR (A) ANIMATION EDITOR PART (2) - THE PIC  " cl@r:P*T***  T*P* U(U(((((((P(P(U @*P*P PPPP(P(PPP*@*U U A    Q Q A A UU*@*@@@@@@"@"@ 64):V2((LMV164)16):V3((LM(LM16)16)4):V4LM(LM4)4:DYV2V1:DXV4V3:4:X,Y:XXDX:YYDY:MM1:DX0:DY0:7:22:1:M;" MOVES": XԂՊՊՊՊժԪՀՀՁ݃؊((( >nઅ𪕀ւƂƂƂƂƂǂǞǟtD!"""""""""""""" ((((((((      (%/(DZǁLJǁ΃"߇Tσ/,0:255,0::16400:OMN:O255O255W.62923:A%(224)256(225):B%(226):O:5302::10::"DISK ERROR";::A$:1000B:1000+ .S1K176:TA,255:253,SN:4,1:5,S11:254,95:249,(OT5):250,(OT6):251,(OT7):252,0:255,0::1640A$:n(D$;"BSAVE ";A$;".SS,A";A1;",L";IA11;",";C$:1000*"SHAPE NUMBER? ";A$:V(A$):V1VAĺ"INVALID SHAPE NUMBER":"HIT ANY KEY TO CONTINUE":A$::1000+%.MK176:B,255:253,A:4,1:5,M1:254,95:249,(H5):250,(H6):251,(H7):2520D1280D1"'D1279D1D12806'E10E1192E1L'E1191E1E1192y'I1,D1256(D1255):I2,D1255:I3,E1'I'1000<("SAVE THIS SHAPE TO DISK? ";:A$F(A$"Y"A$"N"ė:21:10300P(A$"N"1000d(A$"Y"ĺ:"FILENAME? "; ";A$%~'E1(A$):E10E119110070C' THIS MIGHT TAKE A WHILEY'F1D1B1:G1E1C1r'IA14940965256'(I)255ĺ"RELOCATED"::253,V:4,1:5,0:254,95:44096:10300'(I)128ĂI:1000'D1(I1)256(I2)F1:E1(I3)G1 'D1 '11000.'253,V58'4,1:5,0:254,95::44096jB'A1(24321(V1)2)256((24322(V1)2))24320L'B1(A15)256(A16):C1(A17)V':21:1:"CURRENT START X=";B1;" Y=";C1`'"NEW X? ";A$j'D1(A$):D10D127910070t'"NEW Y?#BH9530+2#(B2)128(B4)1289100<<#BB1:B,255F#253,A:4,1:5,M1:249,(H5):250,(H6):251,(H7):252,0:255,0:254,95::16400P#62923:A%(224)256(225):B%(226):530#(B4)128BB4:B,255:9030#BB2:B,255:9030(I2)256(I3):SSZ:I,S256(S255):I1,S255:IZBBZ:HHZ:AA1:24320,A:1000e@11000pJ253,VT"SPEED? (1-255) ";A$:V(A$):V1ė:8020UV255V255VV256V:4,V:254,95::44096::21:"HIT RETURN TO CONTINUE";A$:1000 (@@~~>>>>>>cl@r:|?|?||xx8xxxxxxppppppppppp``````````@@@@@?@?@@  "U0烸߇ *-&T*5 5 (%/(DZǁLJǁ΃",灌񀜀ㄘTσ؀̙āσ܁σσīǫćÇħã *0ƱÁ́ÁP -&P*ÃÁD*-F@ '菼(<(DZǁσǏǁ΃σ/(π1 ÃÃ〘 ǁ΃΃ǁ/(܈܂ÃÃ〘΃΃΃΃΃ǁ䂁A(0ƱÁ「ţA(0ƱÁ「ÃÁT*-F-0&.(΃ǁ.P.(΃/(ÃÃ〘߇ǃħƱ܁灌〜〘 䤂ࣄ䤠䤄䄡䄀00ƱÁ「ÃÁ U P -F.ăǣçāÇçǂ0 T0灜「UP -3.- A.( /(-ȉƑ i( /(χ؁ lj΃΃ぢÁ 0 U χ灿T"-.*U-` 'U ΃΃΃đ (E"-.("-/ȉƑ N ( /(ñ΃lj·   @*@*UU   U U U*******cl@r:TT (    (T T((U(UPP(U(U(U(P*P*  P*P*P* U U U @   @ U U U@*@*@*@@@@@* (((((((((((((((((((((((((((""""""""""""""""""""""@r:(T(T(T*T*T****(((@ @"@ ((((((((((""""""""""""""""""""""(((((((((((((((((((((((("""""""""""" ՂՂ՚򁀜ࣁࣁ࣏"""""""""((((((((਀਀胀ЪԪ֪תתêǪǪꝀՀрррррччՀՂЊԪժժժժЪѪкՀՀՀՆ՞ռհՀ઀$0#8~$8'6|$ /Bc|6^  ;|@@ |q6^  #x|@@L|pv> # @@L x6x #B @ @ xBu|~<=><8#1c1;  0 WU> 1c1;  0@VU> 1`1;  1@VTU  3`1;1@VD@ ?`1<1@,Dupp`@`|p<@<@ |p;x@x|xx@x@ xx;<@<@p`@`@ p~ ; @ @ :. A$"S"ĺ"BLOADTSANIM":"RUNSHAPEDIT"J A$"P"ĺ"RUNPATHEDIT"t (A$"A"ĺ"BLOADMOVE":"RUNANIMEDIT" -A$"2"ĺ"BLOADPALETTE":"BLOADFBEDIT":"BLOADMOVE":"BLOADPICDRAW":"RUNPICEDIT" 2A$"3"ĺ"BLOADSST/ML":"BLOADSST/ML2":"TURE/OBJECT EDITOR PART (3) - THE SUPER SHAPE EDITOR" " ALSO (B) BINARY TRANSFER UTILITY (D) DEMO (L) LETTER DEMO (C) CHANGE DRIVE (Q) QUIT " " COPYRIGHT 1982, MARK PELCZARSKI CHOICES IN PARENTHESES":"V6.82.1";:A$T U UUU T (** (cl@r:P*T*TTTT*P* ((((U U@*P*PPP P PP@*U      UU*@*@@*@*@*  7(^FxF; < <  W^FxF; | |x| W  >FG;Ll lp|FLW ( `NC;L L FLW @p<A; F -DAO >  03@6>1@_;  0  ? 7>1`9;  0  > 7U>`D``@0:ȡHe` hhл`Ie`҈@  @8A8| p|  N 7 ^xFC;| x| x | < 7 ^xFG;    p | 8  ~~~~vvvvppppppp~~~~^@r:P*T*T P*(((T*T      @ @@@@ *(((@*@ 0<<|?|?|?|?L3L3L3L3 0 0@@@@@@@xxxxx```q`````n`n`n`n``p`Ac``w`cF~~~~~~~@@o@G8:4409616@249,111:250,0:251,110:5,4:252,0:4409616J:12 :12 ,4:252,0:4409616x:12 40:INh:21::"SCALE AND ROTATION CAN BE CHANGED UNDER":"PROGRAM CONTROL"{r253,4:249,11:250,0:251,20:4409616|249,31:250,0:251,20:252,8:4409616249,11:250,0:251,60:252,0:5,1:4409616 249,51:250,0:251,80:5,2:252,254,669 :21:"SHAPES CAN BE DRAWN AT VARIOUS SPEEDS"L "253,2:44096_ ,I11000:I:w 6253,3:4,1:44096 @I12500:I J::21:"INTERNAL CHANGES OF SCALE ALLOW LARGE ":"SCENES TO BE STORED COMPACTLY" T:253,1:44096^I1300000:J Iz :21:"AND OF COURSE MULTICOLORED OBJECTS CAN BE PLACED ANYWHERE ON ANY PICTURE...":36405:I13500: ::4:"AND HERE ARE SOME OF THE SHAPES THAT":"CAN BE MADE WITH SUPER SHAPE TABLES" "BLOADSSTSTUFF" 4,150:5,0 "BLOADPICDRAWF"$ A36352:B364005 A,0:A1,64 ::21:"HERE ARE SOME SAMPLES OF PICTURES, SOME OF WHICH WILL BE SEEN IN NEW ADVENTURE GAMES ABOUT TO BE RELEASED. (ARTWORK BY ANTONIO ANTIOCHIA AND DAVID LUBAR)"; I17 B J111100:36928: ::"WITH THE PICTURE/OBJECT EDITOR YOU CAN CREATE PICTURES SO THAT HUNDREDS WILL FIT ON A SINGLE DISK... PERFECT FOR ADVENTURE GAMES AND OTHER PROGRAMS USING A LARGE NUMBER OF GRAPHIC IMAGES." "BLOAD PICSAMPLES" I3788837906:I,(I)128::I1432:36928:@ #"BLOADBLOCK"m (I3788837906:I,(I)128::I,255:768 d"BLOADABACK.PAK" g24595,64:24633,96:24698,96:24576 i24595,32:24633,64:24698,64:24576 s49232,0 t"BLOADD2.ANM" xI1L' COPYRIGHT 1982, MARK PELCZARSKI/ :x I768781:J:I,J::160,164,140,14,3,32,64,144,206,14,3,208,248,96"BLOADPAKNEW":24576:"BLOADTEXT.PAK":16302,0:24595,32:24633,64:24698,64:24576"BLOADGMDEMO"- :16302,0: ;S;",L";L:216,0:20. ,"DISK ERROR":A$:20k A$"":I301:J(X(16I)):A$A$H$(J):XXJ16I:: ԂՊՊՀՀՂՊԂЊԪԪԪԪԪԀԪԪԪԪЊcPXՀЪЪЪЪЪЂЪЪЪЪՀՂՂՂՀ  "@*@*@*@(@(@(@ @ @ "*****""""""TTTDDD           @r:TUUPP((   (( ((P T TP@@@UU (((( PX*******PXՀЪЪЪЪЪЂЪЪЪЪՀՂՂՂՀ((U(UPP(U(U(U(P*P*  P*P*P* U U U @   @ U U U@*@*@*@@@@@*@*@*UU   U U UU      UU*@*@@*@*@*T U UUU T (** (@r:TT (    (T T~~>>>>>>@r:P*T*TTTT*P* ((((U U@*P*PPP P PP@*|?|?||xx8xxxxxxppppppppppp``````````@@@@@?@?@@@@P*P PPPP(P(PPP*@*U U A    Q Q A A UU*@*@@@@@@"@"@@**T U  EE U T (*    *(@r:*@*@*@*@*@*@*@*@ PQQQQUUQQQQP ********** @r:P*T***  T*P* U(U(((((((P(P(U @*x|@r:(((((T*T*((((( (((((((((( PP"P"P"P"P*P*P"P"P"P"P          @ @*@*@ DISK CATALOG."::"FILE NAME : ";A$:300H 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 "BSAVE";A$;",A":LSĺ"CURRENT FILE : ";N$:"STARTS AT ";S" ($";S$;")":"LENGTH ";L;" ($";L$;")"p A$::A$"Q"ģHM:"RUNN" A$"L"100 #A$"S"200 (A$"C"20 -300 2"CATALOG":A$:216,0:20* d:"YOU MUST USE THE FULL NAME AS IT APPEARSIN THEm$ BINARY FILE TRANSFER UTILITY? 1982 MARK PELCZARSKIcLS0:HM(115)(116)256:7679H$(15):S015:H$(S)::0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,FQ ::"PENGUIN SOFTWARE":"BINARY FILE TRANSFER UTILITY":"(L)OAD (S)AVE (C)ATALOG (Q)UIT":    @@*UEEU*          *cl@r:T     T T     T ((@(@(P(P(((D(D(@(@(P*PPPPP(P(PPPPP* U   A A       U@*@@@ @ @"@"@@@ <xxp`888888<@pppppppppp`@``````pppp@@@@@@@@@@@@@@`ЊЊՂՂՊՊ\F  ****     TT*T*T**@r:ԪԪԊԊЪЪPPP P*P*PPPPP   A Q U     Q Q @@@@"@*@*@ @*@"@@@ EUUU U E EԀЀЂЂԀЀЀЀЊPX(@(P(T(((((((T(P(PPPppppppp~~~~^@r:ЂЂՀЀ0@@@@@@@xxxxx```q`````n`n`n`n``p`Ac``w`cF~~~~~~~@@o@G~~~~vvvv"*****""""""TTTDDD           @r:0<<|?|?|?|?L3L3L3L3 0 PTU U      TP (*"**""( @r:(T(T(T*T*T****(((@ @"@"@*@*@*@(@(@(@ @ @ @P ((((((((P @ (UE(U(UE@@@  @*P*P*P P P P P @* U U  U U A A  U(*@*@(@*@*@*@@@*(P` `_`_ i8__e_Ȑ _i_`ɔ`_ i8__8_Ȱ _8__`ɕ`^LP F~px ~~ `pxx~cl@r:@`0 0 0 0|?|? 0 0 0@````````p=x@1``````````````@1>cccccss8|FFFFF~~F  ՂՊՂՂՀԊԪԊԊԊԊ@r:"* *(PXЪЪРРРЪЪЪЪՀՂՀU(T(( @ P*P((  *(P(P(P @ U Q P @ D T T Q Q *@*@"@ @@@(@(@"@"@* TUEAQ A E EU(* TT@*@*@@@@***(((UU     U U TT **  ((((@r:PT   DDD  **T"P ((U (((( @r:T T*((((T*T*T ( ((U(P(P P P U U P*P*P P P P P*P*@ @*@"@ U U A A A AUU(T*T      @ @@@@ *(((@*@ TUUPP((   (( ((P T TP@@@U``>@@8888888|~pppppppppx~~`````px|@r:P*T*T P*((ՂԀCxL|?|?@@@@@@@@@@@xx@`p?ppԪЊŀŀŀŀŀŀŀՀpa``@`````?@ @@@@~~~|xp|~?~?~?<8@r: O8q琱`@ F Hȱeh8 iiȥ8i HȱehOeeJ8ee@ 0e  8ɀ#Jͱ ):7555,ZI:7556,0:7632:BYBYZI:15107551,L(L256)256:7552,(L256):7553,BY(BY256)256:7554,(BY256):RL36096(BYL):IRLL:7555,I(I256)256:7556,(I256):7557:BYL:ED1:1XO,YO:M1:40o1150:7551,RL(RL256)256:7552,(RL2SH AT ";(L1)256BT;", ";(L2);:CI3:|M2:24577,BT:24578,(L1):24579,(L2):25146:"FILL AT ";(L1)256BT;", ";(L2);:CI3:'SLL:LLCI:ZICI:L,0:1100:1105:7551,SL(SL256)256:7552,(SL256):7553,BY(BY256)256:7554,(BY256576,CF:"FILL COLOR = ";CF;:CI2:q@X(L1)256BT:Y(L2):XOX:YOY:X,Y:"START LINE AT ";X;", ";Y;:CI3:TM1:X(L1)256BT:Y(L2):X,Y:XOX:YOY:"DRAW LINE TO ";X;", ";Y;:CI3:)h24577,BT:24578,(L1):24579,(L2):25631:"PLOT BRULCI,OC:1510(A$" "LLCI:1510`:22:FB(L):CM(FB32):BTFBCM32:CM0İ1150:CM1540,1560,1580,1600,1620,1640,16601510BT:CDBT:"LINE COLOR = ";CD;:CI1:M3:25621,BT:NBBT:"BRUSH = ";NB;:CI1:",CF(L1):24:24576,CF:25622,1:25621,NB,BN0:1518LLCI:21:1:"<- I D F SP":23:"BRUSH:";NB;" FCOLOR:";CF;" LCOLOR:";CD;" ":A$:A$"F"CI0:1100:1150:A$"D"L266241700A$"I"2000A$(8)L26624LLCI:OC(L):L,0:1100:1105:(225)256:YO(226):CM(36703)32:CIL%(CM):24576,CF:25621,NB:UQL26625ė:VLLCI:BT(L)CM32:1:22:CM1540,1560,1580,1600,1620,1640,1660`868:~M1ĕ1XO,YOBY,0::L26624:CD4:CF0:NB5:7:X140:Y96:X,Y:62454:4PC,A$6800,L";BY26623;",";DT$,216,0:40\"DISK ERROR - MAY BE FULL?":A$:216,0:40g1030$:21:"NAME : ";A$:"BSAVE";A$;".PIC,A8192,L8192,";DT$:216,0:40DL36352,0:36353,104:36400:CD((228)32):CF(36704):NB(37736):XO(224)"A$"S"1000 ,A$"R"310:1BY,0:1100:1150:40L6A$"E"İ1500\;A$"Q"400d@40:21:"(S)TART OVER, OR (M)ENU":A$::A$"S"Ľ:15A$"M"ģ38400:"RUNN,";MR$40BY,0:1030:21:"NAME : ";A$:"BSAVE";A$;".SBY,32CD:BYBY1:CI1:40-A$(27)280HESES0:16301,0:40_ES1:16302,0:40uA$"J"J1J:40A$"Z"A$"":ZXX:ZYY:ZCZC:40EDA$"E"2008ED40A$"D"BY26625290 A$"":BYBYCI:BY,0:1100:1150:40:25621,BN1:BY,63BN:BYBY1+CI1:40<A$"C"260q16302,0:16299,0:A$:16300,0:16301,0:ES0:21:"COLOR : ";C:C0C10740CFC:BY,96:BY1,CF:BYBY2:CI2:40A$"K"270 :21:"COLOR : ";C:C0C740 CDC:255)256:BY2,Y:BYBY3:35bA$:A$"P"Ĺ16302,0:16299,0:A$:16300,0:16301,0:ES0:40sA$"I"1050A$"L"M1:1XO,YO:40(A$"F"A$"0"A$"9")M1ĕ1XO,YOA$"F"M2:40A$"1"A$"8"250M3:(A$)BNBN(A$),160(X255):BY1,X(X255)256:BY2,Y:BYBY3:3524577,(X255):24578,X(X255)256:24579,Y:25146:BY,224(X255):BY1,X(X255)256:BY2,Y:BYBY3:3524577,(X255):24578,X(X255)256:24579,Y:25622,1:25631:BY,192(X255):BY1,X(X,Y:I1100::1X,Y+ Z(16384)127200B _(16287)127120\ d(16286)128M155 i1XO,YO:XOX:YOY:BY,128(X255):BY1,X(X255)256:BY2,Y:BYBY3:1XO,YO:CI3:35 xCI3:M125,150,1754}1XO,YO:XO,YOX,Y:XOX:YOY:1XO,YO:BYXQW:X250XS24 >X5XS0@ ?3000:XXXS:Y(QA256192)Q @X279X279s A24:20:"X:";X;" Y:";Y;" "; CM380 DX266X266 EY176Y176 F24577,X255:24578,X(X255)256:24579,Y:25622,0:25631:I1100::25631:90 P1XLL":50 /"BRUSH ";BN= 2"COLOR:";CF;" LINE COLOR:";CDp 3OXX:OYY:"BYTES USED : ";BY26623;:EDĺ"*"; 4CD:24576,CF 7ZC60 83000:XZX(QW256ZR2)ZR:YZY(QA2562ZR)ZR:X0X0 9Y191Y191 :Y0Y0 ;64 <3000:30X ""BLOAD";A$;".SPC,A$6800,";DT$:1100:BY(36352)(36353)2561:216,0:1XO,YO| #(16287)127(16286)12735 (:21:"L F 1-8 C K Z D P J ESC I Q ";:ED0ĺ"R E S":44 )"E ";::"INSERT": ,M45,46,47 -"LINE":50 ."FIJ0:M1:NB5:25621,NB:CF0:CD4:XO1:YO191:232,0:233,3:1:0:1XO,YO:BY26624 :21:"(L)OAD PICTURE (N)EW PICTURE (C)ATALOG";:A$::A$"N"35 A$"C"DT$"D1":16303,0:"CATALOG,";DT$:A$:16304,0:30 A$"L"30 !:"NAME : ";A$:' COPYRIGHT 1982, MARK PELCZARSKI\ "OPENDISK":"READDISK":MR$,DT$:"CLOSEDISK"7550:ZR20:L%(7):I07:L%(I)::1,1,1,2,3,3,3,3I768780:V:I,V:: 1,0,4,0,36,31,18,45,45,22,27,36,0:232,0:233,3R :7:0,0:62454:ES0:ED0:             "FILENAME? ";A$::D$;"BSAVE ";A$;".SS,A";H;",L";BH1;",";C$v:21:"ADD TO TABLE? ";:A$:A$"Y"A$"N"960A$"N"BH1:AA1:24320,AQ::6:"DO YOU WANT TO":" (W) WRITE ON THE SCREEN":" (V) VIEW A SHAPE":" (P) POSITION AND 2(N1):UW(UW)623:1:"ROTATION = ";U;" "=UII120 (16287)127TČ62923:A%(224)256(225):B%(226):520I 720*70B,255:21:"SAVE THIS SHAPE TO DISK? ";A$A$"N"960A$"Y"920@24:1:"BASE POINT IS ";:RCA%:((C1C2C5C6)R(R2)2)C0C4ĺ"IN";|="VISIBLE ";:I1100:I:1A%,B%:530(16287)1277001A%,B%:7301B,U:BB1U(0):U(U3):U63U0(16287)127T780N5W16 K195P1:85% K211P1:80[ !K207TT:23:20:"ONESTEP ";::E$(T);::" "j "K198900z #K1949000 $K176K18612000 &U(0):U(U3):U63U0 'N5W162(N1):UW(UW)P+23:1:"ROTATION = ";U;" ":U:1A%,B%:55)256:B2,A%255:B3,B%:BB4:1A%,B%A (16287)127520 :21:"SCALE, COLOR, LOCATION, FINISH":"BACKUP, ONESTEP OR 1-9":23:20:"ONESTEP ";::E$(T);::" " (16287)127ė:700 K(16384):K128550 16368,0 K204120256175):I120:I:B%(1):B%190B%190 1A%,B%:21:1:"BASE POINT IS ";:RCA%:((C1C2C5C6)R(R2)2)C0C4ĺ"IN"; "VISIBLE ":"X=";A%;" ","Y=";B%;" ":(16287)127500 I1100:I:1A%,B%:130* B,128:B1,A%(A%2NM:O255O255: RB,130:B1,N:BB2:O:P1P0:528r U:21:"COLOR? ";:A$:C(A$):(A$)48(A$)5585 VB,129:B1,A(C):C:BB2:P1P0:528 xC:OMN:O255O255 yO:0: A%(0):A%250L10 A%5L0+ A%A%L:Q((1)0:232,0:233,3:1000j (:BB1:JBG:243212A,J(J256)256:243212A1,(J256):AA1:HB:24320,A 249232,0:49239,0:A(0)0:A(1)42:A(2)85:A(3)127:A(4)128:A(5)170:A(6)213:A(7)255:L0:M1 P:21:"SCALE? ";A$:N(A$):N1N25580 QO7 COPYRIGHT 1982, DAVID LUBAR AND MARK PELCZARSKIj "OPENDISK":"READDISK":B$,C$:"CLOSEDISK" 20992:D$"":A0:B640961:D20480:E20572:F20649:G64096256:HB:13000 E$(0)"OFF":E$(1)"ON":768,1:769,0:770,8:771,0:776,4:777,             88888|~pppppppppx~~`````px|cCxL|?|?@@@@@@@@@@@xx@`p?pp``>@@88 ((((((((((((((((((((((((((((((((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[_   ```ppppx|<xxp`888888<@pppppppppp`@```c0\F@@@@@@@@@@@@@@`   @*@"@"@AAAUEE"""*  @r: ` ``p088<xp``@@pxxxxp`pppp@  @r:DDDT           (((@ @ @   """P*P(P(          U Q Q @"""@@@@@   P"P"@"@*@* @*@*@(@(@(QQQQUUEEE   **((**"""  TPPPP          ՊԂЀԪԪԪԪ@r:((P P @@P P ((  РРЪЪЪЪՂՂՀՊՊPP@P   (( ( @@@@@T T @PUU  ( PXeN$e+NeN2e9NNNN  ȥȥLGLze{| @ z{|` !$'*-0369cccccss8|FFFFF~~FF~px ~~ `pՂՂՀԊԪԊԊԊԊ@r:@`0 0 0 0|?|? 0 0 0@```ЪЪРРРЪЪЪЪՀՂՀՂՊ8888<@pppppppppp`@``````ppppx|PX2P%(I,N)NP5000!PL%(I,0)NM"STARTING LOC. IN PATH : ";N:N05100^PL%(I,1)N:dPATH #";N:N0N2P%(I,N)NP50001PL%(I,0)N]"STARTING LOC. IN PATH : ";N:N05100nPL%(I,1)N:@00*P%(I,2)N:NNPı"255 REPEAT, 254 F/DRAW, 253 F/ERASE :";N:N253N2554750P%(I,3)N:"STARTING PATH #";N:N0NP%(I,0)N<b"PATH #1 : ";N:(N0NNP)(N253N255)4450RP%(I,1)N:NNPı"PATH #2 : ";N:(N0NNP)(N253N255)4600*P%(I,2)N:NNPı"255 REPEAT, 254 F/DRAW, 253 F/ERASE :";N:N253N2554750P%(I,3)N:""STARTING "N"ıA$"Y"ĺ"PR#1":'2000O"SHAPE NUMBER : ";N:N0NNS4050]O%(I)N:6"STARTING LOC., X : ";N:N0N17914150hOL%(I,0)N"STARTING LOC., Y : ";N:N0N2554250OL%(I,1)N:"PATH #0 : ";N:N0NNP4350 0P%(I,J):::"CLOSE":2101400:380:"BLOAD";A$;".ANM,";DT$:"OPEN";A$;".TXT":"READ";A$;".TXT":TA:BA:NO:NS:NP:I0NP:PA(I):"I0NO:O%(I):J01:OL%(I,J):PL%(I,J)::J03:P%(I,J):::"CLOSE":210:"TO PRINTER?":A$::A$@`<xxp`88ՊՊՊԂЀԪԪԪԪcPXРРЪЪЪЪՂՂՀ NNNNNNNUUUUUUUUUUUUUUUUUUUUUUUOOOOOOOOOOJJJJJJJJJJJANXXXp pppppppxJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJ{zzz{z{qzzz{qz{zzz{z{qzz{zzz{z{zKz{zzzK{z{qzKzz{qzzK{qz{zKzz{zzK{z{zztMONDSO,,,,,,,,,,,,,,,,,,,,,,NNNNNNNNNNNNNNNNNNNNUARESMMMMMMMMMMMMMMMMJJJJJJJJJJJJJJJJIIIIIIIIIIIIIIIIKKKKKKKKKKKKKKKKSJJ  ,NNNNNNNNNNJJJJJJJJJJJJUUUUUUUUUUOOOOOOOOOO{zq{z{zq{{z{{Kzq{zKz{zKz{t,,,,,,NNNNNNUUUUUUNNNNNNUUUUUUNNNNNN@@@X XXXX#'+/37;?((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP;χcW{}7|uKLLL,,,KKKOOOKKKLLOOOKKKKSYCSQz{|` $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?ș@ȥ@L}$P@LLe@LȌNeN$e+NeN2e9NNNN  ȥȥLGLze{| @   i (  ʥ ` !$'*-0369@@8888888|~pppppp          @ @*@*@*@*@*@*@*@*@*@*@ PQQQQUUQQQQP ********** CxL|?|?@@@@@@@@@@T U UUU T (** (@r:(((((T*T*((((( (((((((((( PP"P"P"P"P*P*P"P"P"P"PP*T*TTTT*P* ((((U U@*P*PPP P PP@*U      UU*@*@@*@*@*@r:T*T*( @@PT*T*PPP (P*P* ( @PP P ""  TPPPP            cl@r:((P P @@P P ((     P"P"@"@*@* @*@*@(@(@(QQQQUUEEE   **((**" OUR PROGRAM IS NOW BEING LOADED.TOO MANY LINESCANNOT COMPRESS RUNUT0002,D1,S6,V254 evVȁ`tL"O3. SAVE THE COMPRESSED PROGRAM 4. CALL 3640d ZTO PROGRAMMING AIDS 3.3 MENU INSERT THE DISKETTE MARKED UTS003 SLO DRI1 x PRESS 'RETURN' KEY TO CONTINUE. ** PROGRAMMING AIDS 3.3 MENU ** YPPPP . p p pij`镕`畅s蕅t" X% 3 j݅3" X  ` t(C) 1979 BY DAKIN5 CORPORATION 1. LOAD THE PROGRAM TOxED 2. CALL 36361 TO RUN THE CRUNCHER 37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPȥLGٕLɑ L*hhLp p LؕŁٕł` ;ᕭޕߕޕ ;ᕑߕԕ $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/ȹ@@@@U@@ mme0ȹș@ȥ@Lz$P@ L|Le@LȌNeN$e+NeN2e9NNNN ȥ䠀ᠤ䤄 ԀЃԁဠ䆅䀠䠤䤠ᄀ#""PQAQ "*"***"*"* @A5Àç ǧLJăÀ ԀЃԁħãDŽãç#  PQ@Q "*"***"*"* @A9 䡄 (***3 @A9      PQ@P @A9 ЃԀ "*"*"**"*"*#   @A9 @PEP  Д   " AAN@PEQ%烄 ЃԀÄħǃЀ燣ÀㄠƢǃģ£À(*"*"**("*"(*ħà * * * @AN@PEQ% f/ &,2                               @"@AAAUEE"""*  cl@r:DDDT           (((@ @ @   """P*P(P(          U Q Q @"""@@@@@@*@" Πz#خȠٮȠ ڮȠƠ ԮȠ Ԯˠ ͠ ծȠ"֮Ƞ׮ȠӮȠ"ŠԠ Ԡ ԠΠ Ԡ ԯ̠ ԯ̲ Ԡ נ  Ơ Ԡ Ӡ+ ѮȠҮȠ  ήȠϮȠ ЮȠ!б̠ в̠נŠ"  ̮ȠҠΠ Ӯ͠1"ӮԠͮȠŠ Π  ǮȠϠ# ȮȠϠ ɮȠ ʮȠˮȠ  IJ͠ Ϡ ˠ ŮȠҠƮȠԠ   Π Ġˠ ˠîȠΠԠĮȠ Ƞˮˠˠ ˠ! Ԡ Ҡ®Ƞ"*(*(* AA "*"***"*"*4@A%䀃 ԀЄԀЀĠ ĀĤ*"* ** *"*ࠧ# "Є䤄䤄@A@@@A@A!*" PUQQA@UQE7@A%ǡǀġ 㤧Ѐć ԆԁǁĀĤŁǃѕՕ ăǁЄǃÄÁ@A@@@A@A!* PUEQQA@UAEQE <䠄 䠤ŕ ᠃ᣤ  ЕЅՕ Є@A@@ADA * @A@@DADA *<ǧÆÀ ǃÁĤçЕP@QQE@PEU@E@A@@@ADA = *"   Е Ą@A@@ADA/@A@@DADA <£ħńˢÄPQQE@PQAǀDŽ@A@@@ADA R "*"&  Ą ࠧ PQQE@PQAĠ@A@@@AEA O "*"&Ê䃫 ` ((䃤䃠Ā Ł〄Đ 凡áЄ@A@@@A@A! PUQQ@@UPA3 (  ԪЊ@r:T     T T     T ((@(@(P(P(((D(D(@(@(P*PPPPP(P(PPPPP* U   A A       U@*@@@ @ @"ԂՊՊՀՀՂՊԂЊԪԪԪԪԪԀԪԪԪ@*@ PQQQQUUQQQQP ********** cl@r:(((((T*T*((((( (((((((((( PP"P"P"P"P*P*P"P"P"P"P          @ @*@*@*@*@*@*@*@*@*  "RUNN"dd1 ƥ ` iȹ    i (  ʥ `h  !$'*-0369|@ @  @xx POPOHT  p x!?| x? H!x  0 `T(` D@ D` D@@D}}0@D` D@DDp(P@!@A#@!  j ja? A @" P(  @* @@  j"~6|*A8   xA\*`````````````@1>cccccss8|FFFFF~~FF~px ~~ `pxx~ ȹ  @"@@@@@*UEEU*          *@r:@`0 0 0 0|?|? 0 0 0@````````p=x@1`ՊՊcl@r:ԪԪԊԊЪЪЊЊՂՂ   +He @  x (((((((   i;dd<__;ZZ;U_UUU)d!d3d n2n x3x _2_!i3i s3s!  %$ (( ,+!0. 21 3313&44)031}1F>tDDDuIDJwQAQsX?Zc^S$j'Q'i$`YFcGe`RHH GF`M   !(! "((%%'"!-%*#*%' '-,(! *//'(,/.!#5" 'JaUawWpW}((&@Yl`) @Wio|01Ah`H8:FFDOc`E\[WXT_YT^QaTX ] [ `bRU X ^ 'O(l(N,m,M0m0J5o5H9r9F>r>DDtDBJvJ@QwQ=ZmY;bO(m,N+m0L0n5I5p9G9r=`S .'%%%% %%%%%%$$!!##&++,-11 `d    8II`u-+++--40@84G-9!     !-0EB-G*J%*D+B1G/C/D-6.30909043736173-!8-((%(+*02CB0@1B5+1`K4)-'+-H(A(4'H&J@'-H*@ E (G*-J*B0+ - /20*-0@)y p1kAcLdc`pYWTMJE;740463&'-,*/2:ELEKMNQOPNOMKJIFDBJJ$$"" #(-/365::?EFLQY_fimsqwwzl9j8j6f4u1v4u6x8z6}2x3u1q3m1i3}2~31zA|CBb3f4i3iNmMnKnCkEgFdD^BZCXA[?WDHMKMLyB|GI~KM3[5a3e0j.l+k'l#qwzy{~ B3=092010.-+(-%0"- ,/102 33139? BE JS Z^dhkAELQT49 ;79521559< 61!.97 5'/*3(4+7/90645335:+H+N)Y,^0c*Lll   53 5366WW06:>@JR]evz܀݅ՉԍҏX]gs-:<8!" $'+-05353543686B3B3E5I1K2R0Tc`WNIDB;62!ÐГҖՔߕ摠 ob\ PNKxs t qrpq9><7'$ !%',-$! "$% " ! !" ?=;643`QE`P )8F'};;};li figd!f i#l%h)f)e+c-d1c3d5g7f9h=k;m>o:AHFECAW >]u|}v4.#$# l6!!d@x@@@BQQBBwBwQfQfBwBf>f.w.w>f>>..>>`5o7oHH'>n62277< <<<AAAFFFKKP PPPUUZZ<<^__dWU`AAoooo2277<dRRRRH41-,,-`\ZXXTRRH40-,duuddcbb`\ ZXT RRBB;;40-,, , ,##*%%%**''*%*% -aa,A!%)-159="&*.26:>"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?((((((((((((((((+NeN2e9NNNN ȥȥLG $(,048< $(,048@71./*%,i, 2,))-i4r$u'p)u,q2t!}{y ~ | yxz.32/69>ERVhmded pz{wolcmecin`kXnUlِӖՙЛϞhopto{hd~[{m}ux`xA%E"I$M"S&[ _d in Y8_6b8f6k8l*q'v*z(|')np ڟ!    ( #".33x-{#~YTuU aQRW| u    ȁb8*~| n lhErыzzЄ{w{x{ `co{kzzoGGGG0V`H0V0V0V0VW_x{`F)) F`Q຃`H``F'J/R+V.Z+a/2c:SSTC  *r,--+,)*((()((("('""("'"'""@'"#!`TNMUUE')''(('(((' ~~~דّ܍tM/YVujuWuKqA]>HI1V-]0_6Y?SLUHZQe[]Rt) !.8}Zr\kWr=|Z|`ea:+$%ZacG70]ZI<:VTgr||`:G KKCH8P9U;Y<]?_@'`W* }^241%-%-- 4h2`YQ@j^c`T')<6$?96:6KIIIIIIIIIIIKKKKKKKKKKKKKKKKKKKKKKKKKbgXgNgDg:g0g&ggggfffffffffffff|frfhf^fTfMMMMMMMMMMMM"6J^nnnnnn n nnlXD0         JJJJJJJJJJJJfTJJJJfTJJJJfTSKKKfT((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPД(Lt0}L|ztyx,vtTsqgpnm#ljhogfԪԊԊԊԊYQLPATHSIIIIIIIIIII @o@G~~~~vvvvppppppp~~~~^"  cl@r:0<<|?|?|?|?L3L3L3L3 0 0@@@@@@@xxxxx```q`````n`n`n`n``p`Ac``w`cF~~~~~~~@ KKKK@KTSPATHSJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK(((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPc,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?(((N$e+NeN2e9NNNN  ȥȥLGLze{| @ z{|` $( !$'*-0369Jyyxz{a  --N LMt0k0Z0E0W(><.'"ڟnn u u b coo]e efU Uu-i- $${x     { y 4x4!<""TTTDDD           cl@r:(T(T(T*T*T****(((@ @"@"@*@*@*@(@(@(@ @ @ "*****"""" +3/%#%.59AHUHCIC<  O8q琱`=mm- xm 88 0Q!!!P////**$$"""''---11333**$$$$$$###   "&%%,-32286> @`F Hȱeh8 iiȥ8i HȱehOeeJ8ee@ 0e  8ɀ#Jͱˆ€woc[ST`mxyod\Sf}}kn9;6666=8`IBHKJMEDC`HMJHEEEEDCBBAAAAFDDC????=S]ijIHG--*//)0-,00ՂՊՂՂՀԊԪԊԊԊԊcPXЪЪРРРЪЪЪЪՀՂՀ eN$e+NeN2e9NNNN ȥȥLG !$'*-0369 / Z D F S C Q"e (16384)128İ1000:210 A$:A$"F"FSĹ16301,0:FS0:210 A$"F"Ĺ16302,0:FS1:210 A$"U"DX2:DY2:300 A$"I"DX0:DY2:300 A$"O"DX2:DY2:3000:130. A$:A$"F"FSĹ16301,0:FS0:130N A$"F"Ĺ16302,0:FS1:130^ 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 ' COPYRIGHT 1982, MARK PELCZARSKI\2"OPENDISK":"READDISK":MR$,DT$:"CLOSEDISK"Z0:1:I768773:V:I,V::232,0:233,3: 1,0,4,0,4,0dL16384:M0n::DX0:DY0:FS0:X140:Y96x21:"MOVE CURSOR TO START" (16384)128İ10  eN$e+NeN2e9NNNN  ȥȥLGLze{| @ z{|` !$'*-0369% $*39CIMTTJJSKE@@DKD>=BOQĖ˖ϕ΃uj]QLH:2&0TNKTTPϔN4::4P]ip ((UU     U U TT **  ((((cl@r:T 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@*@*@@@@***(DY16@DY0VVDY64dEL,V:LL1:MM1:22:1:M;" MOVES":XXDX:YYDY:X,Y:DX0:DY0:210:21:"LOSE PATH?":A$:A$"Y"205::"RUNN,";MR$1XDX,YDY:23:1:"X:";XDX;" Y:";YDY;" ":1XDX,YDY:LL1:LM(L):V1(LM0 A$"C"210) FSFS0:16301,0s :21:"CLEAR PATH - START OVER - ARE YOU SURE?";:A$:A$"Y"ė:205| 100 ,XDX0XDX279YDY0YDY191DX0:DY0:210 1V0:DX0DY0V255:325 3DX0VVDX 6DX0VVDX4;DY0VVXDX1:2102 A$"/"YDY191DY3DYDY1:210B A$"Z"300S A$"S"260j FSFS0:16301,0 :21:"NAME:";A$:258 L,0:"BSAVE";A$;".PTH,A16384,L";M1;",";DT$:205 "DISK ERROR":A$:205 A$"D"Mİ2000:210 A$"Q"400 A$"J"DX2:DY0:3008 A$"K"DX2:DY0:300T A$"N"DX2:DY2:300o A$"M"DX0:DY2:300 A$","DX2:DY2:300 A$(13)YDY0DY3DYDY1:210 A$(8)XDX0DX3DXDX1:210 (A$" "A$(21))XDX279DX3D`< q  ȹ  ȱee @e ~    (p1) qp н` i@  ꏥ 돢  (p `  mm 8 ``88 L8 8 ``iii i LITEDISK":MR$:DT$:"CLOSEDISK":10AĠԍΠ37916,255( d36928:(16384)1271004 nA$:20 6 26139* (4);"BLOAD LETTERS.ANM"2:c"TYPE SOMETHING 28 CHARACTERS OR LESS.":A$t((A$)28302::16302,0<I1(A$)AA((A$,I,1))65FA0A25Ĺ37888I1,26:80K37888I1,API ZJI28:37888J1,26::KKKKfTKKKKfTKKKKfTKKKKfTKKKKfTKKKKfTKKKKfTKKKKfTKKKKfTKKKKfTKKKKfTKKKKfTKKKKfTKKKKfTKKKKfTKKKKfTKKKKfTKKJJfTJJJJfTJJJJfTJJJJfTJJJJfTJJJJfTJJJJfTJJJIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIAK56):7553,246:7554,149:IRLBY:7555,I(I256)256:7556,(I256):7632:LBY:BYBY36096RL:CI0:ED0::1510x TT$ TT$"X"QAQA1 TT$"W"QAQA1 TT$"D"QWQW1 TT$"A"QWQW1 Mq@* TUEAQ A E EU(* "* *(cl@r:PT   DDD  **T"P ((U(T(( @ P*P((  *(P(P(P @ U Q P @ D T T Q Q *@*@"@ @@@(@(@"@"    ȹ  ȱee  rg sh  (p1) pQ ¥ ` *LHmh*l eLekL/e 8ei8fgjk80L;ig iȩLLjiL` qȹragbfch h mp mimiHiih8h mimhihih mimiiih8;*0jLȌfj0LjjjjL"Ȉ*L*g*lJ*m,lPnik enLki(Lkmdei p)jfjHnhjl eLZkeikmLk8Lkmdei p)!**ʐLg((P T TP@@@UU (((( cl@r:P*T*T P*(((T*T      @ @@@@ *(((@*@ TUUPP((   ((  ȹ  ȱee  ] ^  (p ϥ `#/092)'(4-!2+0%,#:!2+ iȹ    ( ѥ `fg 8 Ȱiij` ސdmiei pjjjLTj``pMl)pk) ol 9f p`` qȹragbfch hh 4hi h 4`gfhJqLꑭr o8jp)        U*U**U*Uժժժ3fL̙L3f̙"DĈD"Ĉ"DĈ"Dɤ$I$wn];ݻ];wnݻn];wݻ;wn]ݬheed`bca L-ɠcba :L- qL- iiLZii`@@           p)ȱȱL:   `hL-))  A`_ ALZ@ h ALZ`ȱ` A ALZ aȱbȱc48bbaabmbama8cmcɀ((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?                             " " "" 0:S2S1SC:S2255S2255L .62923:X%(224)256(225):Y%(226):S2:530u 2::10::"DISK ERROR";::A$:1000cl@r:ԪЊŀŀŀŀŀŀŀՀ0::"COMPILING":uBY((W12)7):LNBYH2:L25344:I06:OF14ILN:L,(OF256):L1,OF(L)256:LL2:I06:L,BY:L1,H:LL2J0H1:YLA%(J)(I(I2)2)40SBYI51:KSBSBBY1:L,(K):LL1::::SLLN714:1300: CLEAR BELOW CURSOR323:1:958:23:1:X1300:"WIDTH:";W:W1W502000~1300:"HEIGHT:";H:H1H5520021300:BY((W12)7):LNBYH2:"WIDTH:";BY;" BYTES, HEIGHT:";H:"SHAPE LENGTH:";LN2:LN256ĺ"TOO LONG (254 MAX).":A$:130YXS%(I)49,Y:)K FLASH CURSORSfLJ12:I06:MD%(I)XXS%(I)XC:Y(I3)648YC:1X,YpM::} PLOT A DOT (Z OR X)~I06:MD%(I)XXS%(I)XC:Y(I3)648YC:X,Y: PRINT LOC.22:20:"X:";XC1;" Y:";YC1;" ":NSHAPEDIT,";MR$:A$"M"İ350:Iĉ:38400:"RUNN,";MR$C235]1200:SS150,282,284sHBCS:1150:150HB:1150:150^"LOSE CURRENT SHAPE?":A$:::I(A$"Y"): FLAG SHAPES IN EDIT MODE I06:Y(I3)643:4MD%(I):XS%(I),300,";DT$:216,0::1000:CM0:2,8:I03:258::2,72:I46:258::235v 0,(XS%(I)7):1,XS%(I)(0)7:36608: A$"A"270 16302,0:37284 36928:I1510(0)2::(16384)128262 36608:16301,0:235A$"N"İ350:Iĺ"RUA$"S"250 CM2356 1300:"NAME:";A$:249n "BSAVE";A$;".SSH,A$6300,L";SL;",";DT$:216,0:235 1300:"DISK ERROR. DOS CODE= ";(222);:A$:216,0:235 A$"L"260 1300:"NAME:";A$:249 3,0:4,0I "BLOAD";A$;".SSH,A$6"Q"SS2:282# A$"W"SS3:284I A$"A"CS3:22:13:"ALL ":150o A$"E"CS2:22:13:"EVEN":150 A$"O"CS1:22:13:"ODD ":150 A$"D"150 23:1:"E C A S L N M :";:A$:A$:A$"E"İ1300:145 A$"C"İ2000:CM1:235 280" A$"J"XC0XCXC1:280A A$"K"XC49XCXC1:280W A$"Z"SS1:282m A$"X"SS1:284~ A$"H"200 HB4HB:22:1:HB0ĺ"HBIT OFF":150 "HBIT ON ":150 A$"0"A$"8"MD%((A$)1)1MD%((A$)1):1000:150 A$128(IY8)1024:0 7,79,151,223,43,115,187\ FR(0):1000:CM0:SS1:XC3:YC3:1200 CS3:HB0::21:"I J K M Z X Q W H E O A 1-7 D":"HBIT OFF ALL " (16384)128İ1100:150 A$:A$"I"YC0YCYC1:280 A$"M"YC55YCYC1: ' COPYRIGHT 1982, MARK PELCZARSKI-b"OPENDISK":"READDISK":MR$,DT$:"CLOSEDISK"md24676i0:1:I768773:V:I,V::232,0:233,3: 1,0,4,0,4,0nMD%(6),LA%(55),XS%(6) xI06:MD%(I)1:XS%(I)::I055:Y(I8):LA%(I)8320Y          `< q ȹ  ȱee  o{ p|  i (p1 )p  к ` iȹ    i (  ʥ   :2104x:"DELETE CURRENT SET-UP?":A$:A$"Y"ı?}:210380:600:"BSAVE";A$;".ANM,A";BA;",L";38400BA;",";DT$:"OPEN";A$;".TXT":"WRITE";A$;".TXT":TA:BA:NO:NS:NP:I0NP:PA(I):I0NO:O%(I):J01:OL%(I,J):PL%(I,J)::J03:A$"S"İ4050:805(\A$"C"İ4150:805?aA$"P"İ4350:805VfA$"L"İ5000:805fkA$"R"210op855600:(37888)25521016304,0:16302,0:16297,0:16301PG,0:TA2Č3728436928:I0510(0)2::(16384)1281220A$:LP%(I,J):LNPĺL:850.>L255ĺ"REPEAT"FCL254ĺ"END/DRAWN"_HL253ĺ"END/ERASED"gMN1R::"STARTING PATH : ";PL%(I,0):"LOCATION IN PATH : ";PL%(I,1)::"PR#0":"(S)HAPE (C)OORDINATE (P)ATHS (L)OCATION (R)ETURN TO OPTIONS"WA$:(N256)256:LL2:JJ1:630BL,N:38368I,0::37888I,255:l :"OBJECT NUMBER : ";I:INOI0210v"2000%:"OBJECT NUMBER : ";I*N0::"SHAPE : ";O%(I)::"START AT ";OL%(I,0);", ";OL%(I,1)::"PATHS : ":J03:J;") ";:Nĺ:85040NO:37888I,O%(I):37952I3,PL%(I,0):NPA(P%(I,PL%(I,0)))PL%(I,1):37953I3,N(N256)256:37954I3,(N256)lNOL%(I,0):38048I3,(N7):38049I3,N(N7)7:38050I3,OL%(I,1):L38144I7:J0vNP%(I,J):NNPNPA(N):L,(N256):L1,N:ISL8192:J8191L:7551,0:7552,32:7553,J(J256)256:7554,(J256):7555,I(I256)256:7556,(I256):7557:NS1NP1NO30210:NONO1:"OBJECT #";NO::INO:4050:4150:4350:5000:210XNO0ĺ"NO OBJECTS":A$:37888,255:tbIA$;".SSH,A8192,";DT$:390:NSNS1:37761NS2,(SL256):37760NS2,SL(SL256)256:210 ^380:"BLOAD";A$;".PTH,A8192,";DT$:390:NPNP1:PA(NP)SL:210 |"NAME:";A$:385 ~ "DISK ERROR":A$:210tL(21920)(21919)256:SLBAL:BASLRES SCREEN, OR (A)NIMATION TABLES":A$9 1A$"S"330I 6A$"P"350Z ;A$"A"1550k @A$"H"210 B380:"BLOAD";A$;".PIC,A$2000,";DT$:TA2PG2ĺ"BLOAD";A$;".PIC,A$4000" D210 JNS62ĺ"SHAPE TABLES FULL":A$:210Y T380:"BLOAD";S: ";BA:A$:A$5 A$"D"ĺ"CATALOG,";DT$:A$:210E A$"H"150U A$"L"300e A$"N"400u A$"E"800 A$"A"1200 A$"S"1500 A$"C"İ1400::20 "A$"M"210 '1400:38400::"RUNN,";MR$) ,:"(S)HAPE, (P)ATH, (H)I-TA2TA3A$"1":140H "PAGE (1) OR PAGE (2)":A$:A$"1"A$"2"135i :"BLOADP";A$;"L":PG(A$)z TA2PG2Đ : 216,0::"(L)OAD (N)EW OBJECT (E)DIT OBJECT (A)NIMATE (S)AVE (D)ISK CATALOG (H)I-RES CLEAR (C)LEAR (M)ENU BOTTOM ADDRESXDRAW":A$:A$"1"A$"4"100@ i:TA(A$):TA110,115,120,125p n"BLOADBLOCK,";MR$:"BLOADANIMBLOCK":130 s"BLOADBLOCKBACK,";MR$:"BLOADANIMBLOCK":130 x"BLOADBKGND,";MR$:"BLOADANIMBACK":130 }"BLOADEOR,";MR$:"BLOADANIMEOR" p' COPYRIGHT 1982, MARK PELCZARSKI1 7550aO%(31),P%(31,3),PA(49),OL%(31,1),PL%(31,1)"OPENDISK":"READDISK":MR$,DT$:"CLOSEDISK"NO1:NS1:NP1:BA36608 d:"(1) BLOCK (2) BLOCK WITH BACKGROUND (3) DRAW, SAVE BACKGROUND (4) ! ! ! !!!!!!!!!   ((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?!! "EXEC SHAPEDIT RUN,";MR$! R I0B:7I,8I250,8I:7I,8I7I,150::| I06:NXS%(I)XC,(I3)648YC:: ORDER (0,1,2,3)? ";B% KXCB1:YCXC1 P3:450: Z500Y d:21:"I J K M S N":A$:k nA$"N"đ:60 xA$"I"İ500:YCYC1:90 A$"J"İ500:XCXC1:90 A$"K"İ500:XCXC1:90 A$"M"İ500:YCYC1:90 A$"S"100 0:450 ~6"OPENDISK":"READDISK":MR$,DT$:"CLOSEDISK"B ::21qI06:XS%(I):: 7,79,151,223,43,115,187"YOUR SHAPE TABLE NAME? ";A$"BLOAD";A$;",A$4000,";DT$(232,0:233,64-1:02NS(16384)<"SHAPE NUMBER? ";N F"B"""""" @@@``@`pppp``xx||||xx``|~~~???~~~|`???@  ( $@h`+'bH"(@ "h `o ސdmiei mponȌojikn j*.k.j.iLE8jl.k8nklk8nj.i8nihJqLr oLHmi) of -llL-kkhɀ M lLɀ M ko hihL``RUNSST"" 7A$"B"ĺ"RUNBINTRAN": 9A$"D"ĺ"RUNDEMO"^ <A$"L"ĺ"RUNLETTER ANIMATION"n ?A$"C"100~ FA$"Q"10 P d:"PRESS RETURN TO CANCEL ":"MASTER DISK : ";MR$:MR$""10 n"DATA DISK : ";DT$:DT$""10$ x"OPENDISK":"WR~~|xp|~?~?~?<8cl@r: ` ``p088<xp``@@pxxxxp`pppp@pa``@`````?@ @@@@~""