L%hh LHH` X% " ӠӠΠǠ ˮԠˠǠӬĠӠ٠٠ϠŮ+JJJJ ,,,L Lک ٥ҥ>ӥ? ( ㆭ  ؆` | A""""""QQQYV <"<Q '(h((QQQ`@GHOHO $"!$q}T@` `@@``p0 8p@@`00 |0@` `pppPox`D3 < p?|@@@|@`f ppn|>0p  qcs6<, 3['Nxxxpp0` ```@vl  ?`@:3q  AcqcCyO@  0p`@@q @p?|`3cC ? ?>|xp`p`@Acwsssssss__????????~^^ ?~~~~~~~?>~||xpp`@~| xyy{~|@`pp xpp`@yyyyyyyx~ ~x`|xpxqa` cqx|||||||cCC?>>>??<<|||~?`ppxx||<||xxpp`|||||||| |?|p`@@@@`p|? OOGgccqpxsssssssppxxx|<<~?>~||xxxxppp```@@@`?~|x|~|||||||p@@p|~><|xp`@>|x|xpx}yyyyyyyAA?~|xpp`ppx|~? ?? 33@``@@glloLL LlOgloloG @`@glolo@@gLLL GaamGGlg`GGlg`G  xL| x@@xMLLxMyyM MyxAxMx|Yq @lllLglllgG LlL`@GLOLo033366m~0>3>33~G<`G}rccb``acccq{{{{8008????~ |lL COoooog CgoooocCFFLLXXPpqa88`}}}}>????~ | ~FCCFL ____|GG|GGccp{{{{ ;1q``qp`aas{{{{8008 0y| |}}}}AAQg((h' $C@0j ed`y < I1@@q q s8EE9EE8> ` `$DC0ANPQN@'h(' WPG((H@stq q8AyEx:NPQ@GhHHG#$p# @ (*Y9AyEy: QQQO~C%%C~_DDD qAAAaq9`ppxxx|xxx|AsGN8088 Ccˆʎõĵ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 iõ`  \ 濭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`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!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- ( t Ϡ@跻~!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䵍䵐`"L ŵ8ŵH ~(` d ֠z# u`(U*T բ`A#?@`@@@ @! 0p@@@@¨Հ`@ < @@B@BB@@@H@H@@@H@O@BD@ ~@|S@@H@J@I@ "pբՂ@ p@@ pV`` p@x@ @ҨԪW 0`` @GG@BG@O@GH@OG@@H@H@AD@ @@ @@H@M@H 0 D#0IK214C2:460'JK215C3:460;KK216C4:460OLK194C6:460cMK207C5:460$16368,0:16304,0:16297,0:16300,0: D8,0:16304,0:16297,0:16300,0: D2PG%0:60040&q /PAGE 1 TO PAGE 2GtA$"4000<2000.3FFFM N D823G"R60070j PAGE 2 TO PAGE 1A$"2000<4000.5FFFM N D823G"I1(A$)511I,((A$,I,1))12872,0:144LZ1LZ0:4010(4020HK199C1:4601X,Y:XX7:1X,Y:3:1X,Y:5030T(TY$)13Y275Ē4:1X,Y:YY10:XXS:5025r(TY$)32Ē4:1X,Y:430X275YY11:X1X275YY11:X1Y155Y1554:1X,Y:3:((TY$)30)X,Y:XX7:1X,Y:5030` LAM UTILITYoPG%Ы60000?I11050::VWVW1:VW1100,100:VW(32768)4090WVW$"":PG%2:60000fSA15020SA1:ST0:D$"BLOAD LETTERS,A32768"232,0:233,128XSX::"PRESS KEY TO QUIT"3:1X,YTY$:D$#(TY$)8X7Ē4: CYCLING (A RETURN AT ANY TIME GOES BACK TO WHERE YOU LEFT OFF)";VW$\VW$""İ62500:100z(VW$)47(VW$)584010(VW$)1(VW$)6040103:0:3VW(VW$)VW100,100:22:"SHAPE NO: ";VW:KE(16384):KE141VW$"":PG%2:RAWINSTRUCT' ON THIS DISK"X :"PRESS ANY KEY TO RETURN TO MENU"::W$:W$:62500:15j VIEW SHAPESD$"BLOAD";SN$;",A32768":SA0:ST1232,0:233,128LZ1:60000DAS(32768):::" AT WHAT SHAPE WOULD YOU LIKE TO START (1-";AS;:")TRAIGHT LINES (USE X-Y COORDINATES AT BOTTOM OF SCREEN)" " D)PAINT WITH G)REEN O)RANGE B)LUE V)IOLET W)HITE (THESE LETTERS ALSO WORK IN THE SKETCH OR LINE MODE)" :"MORE COMPLETE INSTRUCTIONS ARE FOUND IN THE PROGRAM 'D PREVIOUSLY DEFINED SHAPE TABLE (YOU CAN NOT CREATE 'APPLESOFT SHAPES'). THERE IS A SHAPE TABLE NAMED SHAPE ON THIS DISK FOR A FEW SAMPLE SHAPES" " B)SKETCH (LIKE ETCH-A SKETCH)"C " C)DRAW SINE SUBTRACT VALUES21900V2%V1%ī2310I SWITCH V2% AND V1%eTT%V1%:V1%V2%:V2%TT%u VV%V1%V2%{  DETERMINE MULTIPLY VALUES$ B$"E"2380. EASY8 VV%(1)82B V2%(1)91L B$"H"2430V HARD` VV%3100 fX33JpB2%12560,2620,2670,2740,2800,2850,2920,2990,3030,3100Tz1860Zu DETERMINE ADD VALUESB$"E"V1%(1)10B$"E"V1%(1)9010B$"V"V2%(1)10B$"V"V2%(1)9010VV%V1%V2% DETERM620,2670,2740,2800,2850,2920,2990,3030,3100> DISPLAY SIGNP A$"A"İ1670bA$"S"İ1710t A$"M"İ1740*A$"D"İ18204 SECOND NUMBER >X25:Y12HB1%V2%10RB2%V2%B1%10\B1%2620,2670,2740,2800,2850,2920,2990,3030,510A0%V1%100,A1%(V1%100A0%)10GA2%V1%10A1%100A0%Mc DISPLAY PROBLEMpX17:Y0A0%2620,2670,2740,2800,2850,2920,2990,3030,3100X25A1%2620,2670,2740,2800,2850,2920,2990,3030,3100X33+A2%12560,2ST BE SURE TO POSITION THE NON DESTRUCTIVE CURSOR BEFORE YOU PRESS BUTTON#0."h::"PRESS RETURN TO RUN SUPERDRAW OR SPACEBAR TO QUIT":A$:A$:(A$)13ĝ::(4)"RUNSUPERDRAW" H MODE: BUTTON#0 ALWAYS STARTS (WITH A BELL)."~ "EXITIN:"EDIT MODE INSTRUCTIONS:":"FOR THOSE OF US WHO AREN'T PERFECT, THIS IS A LIFE-SAVER!!"T:"THIS MODE IS SELF-EXPLANATORY. FIRST, SELECT A FINE OR GROSS ERASER. THE FINE HAS A RELATIVE SIZE (SCALE) OF 1 WHILE THE GROSS USES A SCALE=10."X^:"JU@|(U*U "p $a@ @ @@ըתՌ@ @  ŢՀ@  $ @@HBH@@G@HOOG@H@Hx@~`@  |@@H@H@L @ [4(U*U բ D!@ @@p@ՠ? `@@ ꠞՀ@@ 0?$ @@D@H@BD@@@H@H@@@H@H@DD@ @H V@GH@HGJVE";:16:"<::";:23:"(*)";:30:"/==":230:200P:14:39):15:1:39):zI139:I%(1)31:I%1Q13QQ1I%3Q15QQ1Q:I:"^":Q15Ģ14:I:" "*MAIN PART* C1:2:Y:"]";::" ";::">":20:291:P(163815:" USE ";::"I";::" KEY TO MOVE UP."^ d17:10:" USE ";::"M";::" TO MOVE DOWN."e h7 p19:" USE THE ";::"SPACE BAR";::" TO SHOOT." qI14000: r:3:10:"SCORE";:22:"SHIPS":6::39):16:1:39): w8118:5:"WA_|_o?~_|oA|ayqy}ps?pworsp~{p}~`{o_`ww@oi_wyw{__;?f(saaqx `@~8|?|q?|g_|oCOCw~{|}x~qob?t{|~ywo[{3~({qqqp?@ng @sp?y(?~z}nx>8~}A@@A @` )DCC )DDC )DEC 5D` )D )D` `FC GC`FCGC `" R  (ކ@p )D )D e먱 e Hȱ e h )D?C )D@Cɀ LC )DAC C D D@AC C?C` )Dɀ )D LcC D CLcC )D )D )D )D` D C?C`CC @DDCEC CLC C` D C` @` D )D )Dee                       ΆޞƞގΞ֖ޞƜކΞƆޞ      2#773,NT:774,DU:778K 'I778798:P:I,P::775,141:776,32:777,192: ' 173,48,192,136,208,5,206,6,3,240,9,202,208,245,174,5,3,76,10,3,96,0,232,208,192,174,15,6,137 X,X4Y9 Y,Y9X+ Y,Y9X41 J DISPLAY "9" AT X,YW& X,X4Yf0 X,X4Y4u: X,X4Y9D Y,Y4XN Y,Y9X4X b CLEAR ANSWER AREAl X17:1610v X25:1610 X33:1610 (#773,NT:774,DU:778: J Y4,Y9X4 T X,X4Y9&^ Ah DISPLAY "6" AT X,Y Nr X,X4Y]| X,X4Y4l X,X4Y9y Y,Y9X Y4,Y9X4  DISPLAY "7" AT X,Y X,X4Y Y,Y9X4  DISPLAY "8" AT X,Y X,X4Y X,X4Y4X X,X4Y9 2 DISPLAY "3" AT X,Y ? X,X4YN Y,Y9X4_ X1,X4Y4n X,X4Y9t  DISPLAY "4" AT X,Y Y,Y4X Y,Y9X3 X,X4Y4 " DISPLAY "5" AT X,Y, X,X4Y6 Y,Y4X@ X,X4Y4%  DISPLAY "0" AT X,Y- X,X4Y: Y,Y9XI X,X4Y9X( Y,Y9X4^2 w< DISPLAY "1" AT X,YF X1,X2YP Y,Y9X2Z X1,X3Y9d n DISPLAY "2" AT X,Y x X,X4Y Y,Y4X4 X,X4Y4 Y4,Y9(1)500j V2%(1)91-t VV%V2%992400=~ VERY HARDO B$"V"2480a VV%(1)1000s V2%(1)311 VV%V2%9992450 V1%VV%V2% VV%V1%V2%  DIVIDE VALUE 2330 SWITCH MULT VALUES TT%V1%:V1%VV%:VV%TTB$",00((00,"::)BRACKET48B$" @0*&. "::::\BB$" J"(117)" "::WAVYLINEtLB$"(((((((("::,IVB$"((^(( ^ "::`B$(159)" "::.jB$" "Q$"$(0@ "::OTHERDIRECTItB$"\SC::20:5:"HIT RETURN TO RUN.";A$:YP(16336):J15::I:" ";:TI733:I:"-";:P(16336):J15::I:" ";:]370q :23:4:"0":*I13:J1750:J:(7):I:46:10:"YOU LOST ALL YOUR SHIPS.":8:13:"G A M E O V E R"H15:"YOUR FINAL SCORE WAS ";:SC2502:41I:(SH$,I):P(16336):W7:16:"WAVE ";W;" COMPLETE.":WW1:SC100SC:23013:17:L;:24:PA;:31:O:"PLEASE PRESS RETURN";A$13:80)2:12:"]";::" ";::">";:I719:I:"-";:P(16336):I:" ";:I726:I:"-";:2)128:P4Ā!P73P77İ120/P32İ60EL0PA0O0600s&C1:20:291:2:Y:"]";::" ";::">"0P1P11:P13(P13)İ180::250:510X*BONUS SUBROUTINE*b:SH$" <:: (*) /== "lI1(SH$):1LL L$ "(?~|||?|?p`@<~@~`~@~~ ~p~>p~>p}>p}~p{~`{~`w~aw~ao~Ao>@_{m?v(swccc9s|}~w?_?`aOaoa_gCw{^}|~~x??po?|y?~O??f({qqqA{s?p`o`_Oa?oa~ga}sA{}Aw?~o~o_|_'~_w?o??~?~go(}?~~/w@{~}~~~?~?`|?pyxs}xw|w|w{G|w~wLoqoGxo7|_{7~]?o_vy(~~~]A?o~{~|A|{`y?`spspwxwxo_|oGHYʝ轀ʝ(ʝ(轨ʝ(ʝ(轨ʝ(ʝ(轨ʝ(ʝ('а`"P"l(0100110)="R")v(0010110)="T"<(0110110)="V"O(0001110)="X"b(0101110)="Z"z(0011110)=CHR$(92)(0111110)="^"110100)="6"(0001100)="8"1(0101100)=":"D(0011100)="<"X(0111100)=">" k(0000010)="@"~(0100010)="B"&(0010010)="D"0(0110010)="F":(0001010)="H"D(0101010)="J"N(0011010)="L"X(0111010)="N"b(0000110)=CATES A LIGHTED DOT A ZERO A BLACK ONE.9r(0100000)=Q$L|(0010000)="$"_(0110000)="&"r(0001000)="("(0101000)="*"(0011000)=")"(0011000)="."(0000100)="0"(0100100)="2"(0010100)="4"(0010100)="4" (0(NA),:(NA)'6B$"^&&&&&^ "::]=@B$" (4B "::mJX1X39:I18:Y(YA)YP(I)X1C,0:I,X1:TX1X39:I18:Y(YA)YP(I)X1C,0:I,X1:^*********************** TO DESIGN YOUR OWN LETTERS **************************'hA 1 INDI:P B$" "::SlB$"((<(((( "::TB$" BBBB< "::UB$" BB44( "::VB$" BJJJ4 "::WB$" B4(4B "::XB$" BBB"(92)"B< "::YB$" ^0($^ "::Z":((<((( "::F2ZB$" "(92)"BBB"(92)"B<"::GLdB$Q$Q$">BBBB "::HbnB$" ( (((( "::IxxB$" 0 0002&"::JB$Q$"B2*.2B "::KB$",(((((< "::LB$" 5JJJJ "::MB$" :DDDD "::NB$" "Q$Q$:($(0@ ":"B$" 0^(^$ "::?B$Q$"$(0($"Q$" "::W B$"@@B< "::5B$"BB< "::6B$"^@0($$$ "::7B$""Q$(21)yRQ$"<"Q$(8){RQ$"E"ı ~RQ$"A"İ230R::B$::h5RTI$(1)"END"ĺ::"NO RECIPES AVAILABLE IN CATEGORY:"::B$:I11500:I:20:21102u:RIN1NLDRTSIĞNR5:TI$(I)XRbRIlR20::"-->";::" DOWN LIST ";::"<--";::" UP LIST" mR:"S";::"CREEN DISPLAY F$ INTO ARRAY TI$4:D$;"OPEN ";F$G:D$;"READ ";F$T:I1100`:TI$(I)x:TI$(I)"END"15040:I:D$;"CLOSE ";F$:ITI:U0:R * TITLE SELECTION * RN11RTTIT1:NLTT:NLN114NLN114&RTSN1."::"R - RESET AND REENTER"::"T - TERMINATE STRING AT CURRENT LENGTH":16368,0:Q$:Q$"T"Q$"R"11220+Q$"T"11240+Q$"R"ĺ:"REENTER:"::11120+: * STRING IS IN >>> IN$ <<<!: READ TITLES FROM FILE iX(0): nD$"PR#1":+ xD$"PR#0":F D$"OPEN";NF$;",L40":c D$"READ";NF$;",R";RS%: D$"WRITE";NF$",R";RS%: D$"CLOSE": D$"LOCK";NF$: D$"UNLOCK";NF$:G OF$NF$:NF$"AUCTION.NAMES":130:RS%2:140:GS$:SS$(((GS$))0 <RS%RF%:130:140:LS$:MS$LS$:LS$"-"LS$: FNN$NF$:NF$"AUCTION.NAMES":SS$(((GS$))((LS$)))" ":130:RS%AN%:150:"* "NA$" (CLOSED)":RS%1:150:PS$:RS%2:150:SS$:160: PD$"BLOAD RESET":768 Z220 d"ADDING RECORD NO:";RU: (< ORCHARD SCHOOL AUCTION BY STEPHEN SILVERMAN 1/30/83HD$(4)Y:34,1:ZZ1NF$"AUCTION.NAMES":RS%1:130:140:PS$:RS%2:140:SS$:160:ZZ0ı21:"PAID SUM=$";PS$;:" ";:1:19:"UNPAID SUM=$";SS$;:" ":ZZ0ı7ZZ0:80                      ``hๅ ɣ L! ('`ɠ(ޝL  - REMOVE DUPLICATES FROM TITLES/!oJ2IT1S!oTI$(J):TI$(J1):WW1500:WWv!oTI$(J)TI$(J1)TSJ1:28045}!oJ!o!Hq - HELP!Mq::!Rq:" *** INSTRUCTIONS ***"::T"\q"RECEIPE TO BE SELECTED IS HIGHLIGHTED"::"USE THE B$" - "RE$Z tm:"DELETE ";:TI$(TS):"FILENAME ";:F$:"? (Y/N) ";:16368,0:Q$:Q$n ~mQ$"Y"ī28500 mD$;"DELETE ";F$ mITIT1:TTTT1:NLNL1 mITSIT1 mTI$(I)TI$(I1) mI mTI$(I)"END" mU1: - REWRITE TITLES To!!o FILE" i1iI11000:I:27199: RETURN DiF$B$" - "R$WiD$;"OPEN ";F$jiD$;"READ ";F$wiI1100jRE$(I)jRE$(I)"END"ī27170jI"jD$;"CLOSE ";F$?j`m - DELETE RECIPEjm:2:10:"*** DELETE RECIPE ***" omF$";F$eD$;"WRITE ";F$%eI11001eTI$(I)IeTI$(I)"END"26080PeIdeD$;"CLOSE ";F$jexi - READ RECIPEiR$RE$i * DOES RECIPE EXIST IN "TITLES"?i25000: * SEARCH TITLESiX127100ii::"*** RECIPE NOT IN TITLESa - SEARCH LIST2aX0: * NOT FOUND?aI1100WaTI$(I)"END"25300laTI$(I)R$25200s bIpbX1: * ALREADY IN "TITLES"be * REWRITE TITLES FILEeF$B$".TITLES"eD$;"OPEN ";F$eD$;"DELETE ";F$eD$;"OPEN ^RE$(I)^I.^D$;"PR#0": SELECT SCREEN4^~^::"RETURN TO RE-PRINT RECIPE":"SPACE BAR TO RETURN TO SELECTIONS"^16368,0:Q$^(Q$)13ī24175^(Q$)13(Q$)32ī24280^D$;"PR#0": SELECT SCREEN^_a - SEARCHZD$,"CLOSE ",F$]+] PRINT RECIPEP]RE$""İ21000: DISPLAY TITLES ]::::" *** RECIPE DISPLAY ***"::" *** ";B$:::o^D$;"PR#1": SELECT PRINTERt^:"*** ";F$;" ***"~^I1100^RE$(I)"END"ī24270 ONE MORE RECIPE $7ZF$B$" - "R$I TO RETURN TO TITLES" ZV1 ":12:" @ @ ":12:" @ @ ":12:" @ @ ":12:" @@@@@ ":12:" @ @ ":12:" @ @ ":12:" " 17:"PRESS A KEY TO GO ON.";:A$:A$& ::" THEN MAKE A 7*8 CHART ON PAPER LIKE YOUR GRAPH. PLACE A '0' WHEREVER YOU HAVE A SPACE ANO TELL WHATNUMBERS TO USE."G :::"PRESS A KEY TO GO ON.";:A$:A$ ::" TO DESIGN YOUR LETTERS MAKE A 5*8 BOX ON GRAPH PAPER AND DRAW A LETTER ON IT." "AN EXAMPLE IS: FOR THE LETTER 'A'": :I110::11:9);"":I:l 7:12:" @ N IS THAT IT IS bPOKEDb ON."Z :" THE VALUE IS GOTTEN FROM THE ASC ][ VALUE OF B$." :" THE MID$ OF B$ TELLS WHAT TO DISPLAY ON THE SCREEN. A CERTAIN PATTERN OF VALUES WILL DISPLAY A LETTER OR A NUMBER" " THIS PROGRAM WILL HELP YOU T )::"CHARACTER CODE DESIGNER....."S::" TO BE USED WITH ALPHANUMERICS":"PLEASE LOOK AT ALPHANUMERICS BEFORE GOING FURTHER."::"DO YOU WANT TO GO ON ?";:A$:A$:A$"N"Ā ::" THE WAY A CHARACTER IS PUT ON THE SCREE          :C1840:C2768:W1:SH2:Q14( ?PE(15)a @I714:PE(I)::1792,1920,1064,1192,1320,1448,1576 JI14:CR(I):: 160,168,175,188,222 T*INTRO. SCREEN* ^:10:4:"WELCOME TO DEFENSE SQUAD LEADER."::7:"BY NORBERT G. VOGL III." b10, cA%(1)57:36:A%:"(*)":< A%3O0Ė36:12:"/==":D :i #P%((1)3)1:P%1Q13QQ1 $P%3Q15QQ1 %:39:14:" ":39:15:" "::39:13:" " &Q:39:"^":Q15Ģ14:39:" " ' ,*STARTING VARIABLES* 6Y11:YO11PA0 O0O0K 19:6:W;" ";:15:L;" ";:23:PA;" ";:30:O;" ":b *HOW MANY SHIPS?* VA25((W1)5):L(VA.4):PA(VA.4):O(VA.2): *PUT OUT SHIPS* K110:A%(1)31:A%1L0A%(1)57:36:A%:"<::": A%2PA0ŠԍčĠҍǠٻ̠ӍŠԠһԠӮҠΠŠĠҠ̍ŠӮŠٮӠčƠŻΠԠȠƠϠӮŠӻλčΠҠΠҠҠԠӠҠ̠ӠōĮŠӠҠЮĠԻӠĠҮҠĠǍϠ̮ŠԍӠҠҠō ӍŠΠĩΠҠĩӠĠӠکРԍڠӠӍРҍРĠΠōԠҠΠȠήԠӠ   ŠĠĠؠ٠̮̮ŠΠӠĠȠĠӮŢ٠ĠȠĠӠĠĠԮӠĢŠԠĠҠԠӬҠ̠ŠӠҠĠҠӠĮ̮ŠĠŬάĠĠנӠĠӮŠŬ͠Ġ٠һ̠ĮҠҠ@yI$Jy31070$TyX1$^y1($@yI3$Jy31070;$TyX1A$^yq"ENTER >E< TO EXIT TO CATEGORY SELECTIONS"]#q"ENTER >H< TO DISPLAY THESE INSTRUCTIONS."#q:"HIT ANY KEY TO CONTINUE:";:16368,0:Q$#q#.u::#/u#y DOES RECIPE EXIST IN TITLES?#"yX0#,yI1II#6yF$TI$(I)31060$RIGHT ARROW KEY TO MOVE DOWN THELIST. USE THE LEFT ARROW KEY TO MOVE UPTHE LIST.":"fq"ENTER >S< TO DISPLAY SELECTED RECIPE.":"pq"ENTER >P< TO PRINT RECIPE ON PRINTER.":"zq"ENTER >D< TO DELETE RECIPE.":"q"ENTER >A< TO ADD NEW RECIPE.":-#8SCSC50:X:Y:" ":PAPA1:L ZP175SCSC10:X:Y:" ":OO1:m dX:Y:" ":XX1:X40ČC2:u n70 xP73YY1:Y6Y7 P77YY1:Y16Y15 16368,0: *PRINT SCORES* 4:11:SC;" ";:23:SH;" ":L0L0 PA0? H(4);"BLOAD MOUNTAIN FALL":(4);"BLOAD DEFENDER SUBROUTINE":300b *DID PLAYER CRASH?*(PE(Y)6)160SHSH1:Y11:SH800(2*SHOOT*<X7:16368,0FP(PE(Y)X):X:Y:"-";:P188SCSC100:X:Y:" ":LL1:" PP16      ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ(ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժQ$:D~~~~~~~~~~~~~~~~~(?p@~|~~~~~~~~~~~~~~~~|~~@?p~ @~`~>p~>p~>p~>p~>p~>p~>p~>p~>p~>p~>p~>p~>p~>p~>p~>p~(?p@~|~~~~~~~~~~~~~(?p@~|~~~~~~~~~~~~~~~~~~~|~~@?p(?`p@~_(_}{_w;_~|w`?Xx}_,-?'$--)- /? $d-$$$6.-%$666-H)=$$$/- v- $$$$$$6.((r$$$666---$$$`6666$$$V$$$ )- $?66)d$$$-??7* $d-66>?-($$$-?'- ? -< $$$?---d $$66v- $$-` $$M16'$$$$66-5&$$$?d l )=$$$> --?' ?- / ?I$$$6.??$$- ?'$--)- ?7&$ (-!d --'466&,??L(-?`-3666II%` ;.)) c݃ )  $` $``L666 `( $4>/-- ) ?(--;` I $d-66? -((22::"11"::D$"RUNRECIPE FILE X"X"5810:15:22::"12"::D$"RUNSPELLING BEE III"5810:18:15::"13"::D$"RUNSTOP III"5810:20:15::"14"::D$"RUNDISK COMMAND EDITOR":22:958:10::"LOADING #";AA::" ":118: PJCTER CODE">r5810:15::"6"::D$"RUNDEFENSE SQUAD LEADER"e:5810:5:22::"7"::D$"RUNDICE"5810:7:22::"8"::D$"RUNMISTER MATH 3"5810:9:22::"9"::D$"RUNSOFTWARS"5810:11:22::"10"::D$"RUNDRAWINSTRUCT"#Z5810:13:4410,4610,4810,5010,5210,5410,5510,5610S 5810:5::"1"::D$"RUNALPHANUMERICS" R 5810:7::"2"::D$"RUNAUCTION.DESCRIBE" 5810:9::"3"::D$"RUNSCREEN2 INTRO" 5810:11::"4"::D$"RUNCAPE'CANAPPLE'" 5810:13::"5"::D$"RUNCHARA12. ";::"SPELLING BEE") j 4:"LEADER"S 2 :15::"13. ";::"REACTION TIME": :15::"14. ";::"DISK COMMAND EDITOR": :"SELECT A NUMBER FROM 1 T0 14 (0 QUITS) :";A$:AA(A$):AA141010 AA0Ā' AA3210,3410,3610,3810,4010,4210,!NF$NA$:VV$NF$:BR1BR0:<A$"5"A$"3"NF$NA$q180:130:RS%0:140:RF%:RS%RF%:140:PV$:160((PV$,1))80ī1900A$"5"P$"Y":"CHECK PRINTER FOR FILE OUPUT":110:570%A$"5"MF$NF$:20::"DO YOU WANT TO CLOSE FILE, NF$IN$:VV$NF$:940$\AN%(IN$)<fNF$"AUCTION.NAMES"~p130:RS%AN%:140:NA$:(NA$,1)"?"NA$(NA$,(NA$)1):460zRS%1:140:HS$:RS%2:140:GS$:160A$"6"A$"4"ĺ"SEARCHING FOR FILE ";IN$(NA$,1)"*"NA$(NA$,3,((NA$)11))TION :";:1700:(BN$(1))58ğ:"DO NOT BEGIN DESCRIPTION WITH NUMBERS"::I13000::81041770:AN%(ZN$):FI%1: NF$ = "ITEMSFILE40": GOSUB 1850:ZN$ = AN$: GOSUB 1770>ST$VA$SP$ZN$HA$"5"ė:5::10:"CLOSE FILE"::1560R(AN$(1))5810:1560VA$""<1:13:I1:"ENTER AMOUNT BID $";vAM$(I):((AM$(I))47(AM$(I))58)(AM$(I))46800(AM$(1))13750 (AM$(I))13810:740 II1:AM$(I1);:VA$VA$AM$(I1):760Z*LS$VA$:15:958::"ENTER DESCRIPLE---RETURN=MENU":W$:D$::24:38)::CV2:JJ5:(W$)13Ĺ34,1:35,24:230UD$:120::A$"5"ĺ"END OF FILE--PRESS ANY KEY TO RETURN TO MENU":K$:D$:34,1:35,24:23034,1:35,24: ADD ITEMS:5:10::"ENTER NEW BIDS": ӠˍРȠčӍԠԠҠΠŠǍŠҠӠ̠ԍȠԠӠԠΠΠ͍ԠԠ̠ԮčŠؠήΠȠӠƠĠĠĠȠˠƠĠϮ ŠĠŠĠРҩӠĠ͍ڠĠӠ̩ҠҠĠӍԠҠҠĠō  40"İ1110:690tNF$"ITEMSFILE40"Ĺ34,2:35,22:J10::2::"ITEM#-NAME---VALUE-BID AMT":::I1RE:R$(I):67034,2:35,22:J10::2::"RECORD N0. NAME":::I1RE:" ";I;" ";R$(I)OCV(37):IJP$"Y"Ğ:24:" ANY KEY CONTINUES FI 10:1560NF$IN$@&(AN$(1))58AN%(IN$):BR1:870z0"HARD-COPY PRINTOUT (Y OR N)?";P$:868:P$"Y"İ110:130:RS%0:140:REDA$"3"ıNI0REXRS%I:140bR$(I)lIv160NF$"AUCTION.NAMES"NF$"ITEMSFILE0:RS%0:150:1:RS%1:150:"0":160:170:900K READS AND OUTPUTS FILEyA$"6"ė:5:10::"READ BIDDERS FILE":A$"7"ė:5:5::"READ ITEMS FILE"::NF$"ITEMSFILE40":560A$"2"ė:5:5::"READ NAMES FILE"::NF$"AUCTION.NAMES":560"::10:"JANUARY 22, 1983":10:"WELCOME TO THE":"ORCHARD SCHOOL AUCTION, ";NA$::"YOUR BIDDING (ACCOUNT) NUMBER IS: ";RU:::D$" PR# 0":130150:"?"NA$:RS%0:150:RX:160:380150:NA$:160"CREATING FILE: ";NA$.NF$NA$:13|:5:10::"ADD NAMES"::1560y(AN$(1))58Ģ15::"YOU MUST USE ONLY LETTERS FOR FILE NAMES":J12000:::380NA$IN$FS0NF$"AUCTION.NAMES":RS%0:180:130:140:RN:160:RURN1:RXRUFS1RXRX1:RURX100:RS%RU:D$"PR#1? "INPUT ITEM NUMBER (1-7)";:A$:A$:(A$)49(A$)56230U A$"7"İ105:230 "A$"8"ė:10:"ENTER RUN 220 TO CONTINUE":1016: 6A$"6"500 @A$"4"1220 JA$"3"710 TA$"5"840 ^A$"2"520 hFS0 r ADD TO NAMES FILE"AD NAMES" 1050 20:2::"BIDDERS FILE"::20:"----------":20:5:"3-ENTER NEW BIDS":20:10:"4-EDIT BIDS":20:14:"5-CLOSE(PAY) BIDDER" 20:17:"6-READ BIDDERS FILE":10:19:"7-CLEAR OLD VARIABLES": 9:"8-END": X = FRE (0)((LS$))):130:RS%2:150:SS$:160:1:19:"UNPAID SUM=$";SS$;:" ":\ 18:1:NF$OF$: D$(4):ER0:R$(500):QN$(40):CA$(40):AN$(40):BN$(40):ZN$(40):NB$(500):XR$(500) :2:1::"NAME FILE"::"----------":5:"1-ADD NAMES":10::"2-REESS ANY KEY TO CONTINUE":ZQ$:D$:230SAN%((XV$,2,4))İ160::22:1:"ITEM ";:(XV$,2,4);:" ALREADY SOLD"::K124:K::230e&b1860&l:22:1:"FILE CLOSED...(IT CANNOT BE EDITED)"::"PRESS ANY KEY TO CONTINUE":ZQ$:D$:230'':22:1:"YOU CANNOT EDIT THAT RECORD NUMBER"::"PR" ":%0SP$" ":A%:180:RS%0:130:140:QR%:I1:RS%1%D140:XR$(I):XV$(XR$(I),4):AN%(XV$)İ160:AN$XR$(I):SR%I:FT$NF$:NA$AN$:RB1:%NII1:RS%I:IQR%ğ::22:1:"NO SUCH ITEM NUMBER"::K124:K::160:230[&X(XV$,1)"X"0$(BN$(I))131750@$BN$(I);:ZN$ZN$BN$(I):II1:1720S$ZN$""ĺ:230[$:|$ ADDS SPACES FOR FORMATTING$LK9(VA$)$LK8SP$" ":$LK6SP$" ":$LK7SP$" ":$LK5SP$" ": %&LK4SP$(AN$(I))8ĺ:1570,#r(AN$(I))131670T#|AN$(I);:IN$IN$AN$(I):II1:1620q#A$"1"IN$""ĺ::230#IN$""ĺ::160:230#:# NUMBEROR NAME ENTRY FOR ADD FILE#16:20:I1:ZN$""$BN$(I):(BN$(I))32(BN$(I))13ĺ:171 NUMBER ":"(BLANK RETURN GETS BACK TO MENU) ":"J7:20w"TAN$(I):(AN$(I))32(AN$(I))13(AN$(I))8ĺ:1570"^CV(36):(AN$(I))8CV20Ĺ36,CV1:15):7:36,CV1:II1:NL(IN$)1:IN$(IN$,NL):1620"c(AN$(I))8CV20Č868:1570#h0:170!2306! NUMBEROR NAME ENTRY FOR ADD FILEH!"I1:IN$"":1!,A$"5"Ģ7:"ENTER ACCT. NUMBER":3:" (BLANK RETURN GETS BACK TO MENU) ":1610!6A$"1"Ģ7:"ENTER NEW NAME: ":" (BLANK RETURN GETS BACK TO MENU) ":1610/"@7:"ENTER ACCT.1390 S39ĺ(7);:1390- 36,S1:1390 CB$"":I16:CA$(I)((((CF$,I,1))128)):CB$CB$CA$(I)::CC((CB$))ND:CC$(CC) LS$(((LS$))((CC$))):190 :15:"EDITING FILE ";NF$:!180:130:RS%LR%:150:CC$:RS%CN%:150:CF$:16(36):S39ĺ(7);:S1:1390(CF$""tQT$(13)Ģ15::16:I132:QN$(I)((1191I)):CF$CF$QN$(I)::1510QT$(8)1470QT$(21)1490(QT$)32ĺ(7);:1390S1192,(QT$)128:36,S1:1390S0ĺ(7);:1390 36,S1:RS%CN%:140:ED$:160.-CN%0CN%LR%1930F2(TD$,1)"P"ī1900t<EV((ED$,6)):ND((TD$))EV:LS$"-"TD$F:5::"ENTER CHANGES-PRESS RETURN WHEN COMPLETE":P:8:"$";:"BID";::6);::"ITEM":Z10:ED$d10:1nQT$xSBER TO EDIT: ";CN$:CN$""12403(CN$)581240BCN%(CN$)b(AN$(1))64NF$IN$:1310NF$"AUCTION.NAMES":RS%(IN$) 130:140:NF$:160"SEARCHING FOR FILE ";NF$(NF$,1)"*"ī1900(130:RS%0:140:LR%:RS%LR%:140:TD$:TH FILE":W$:D$::24:38)::CV2:JJ5b:R$(I1)"0"Ğ:"NO ITEMS IN THIS FILE"::34,0:::"TOTAL BID: $";:R$(I);:I0::20)::35,24:R$(I):: CHANGE ITEMS FILE:5:10::"EDIT MODE"::156013:"ENTER RECORD NUM"AMT. ";:"ITEM"R`"# ";:"BID ";:" # DESC. VALUE":j"-------------------------------------"tJ10~I1RE1I10ĺ" ";I;:" ";:"$";:R$(I)*CV(37):IJP$"Y"Ğ:24:"PRESS ANY KEY TO CONINUE WIX":460K8ER%6(222)5Ĺ216,0:21:1::"NO SUCH FILE OR RECORD NO.":BER%10ER%6ER%5Ģ21:1::"ERROR OCCURED...TRY AGAIN.":L216,0:160:"PRESS ANY KEY TO RETURN TO MENU":BV$:D$:230V:35,22:34,2::"FILE: ";NF$:"REC. ";::170'VA(VA$)(PV$):VA$(VA):190aNF$VV$::22:"NEW TOTAL FOR FILE ";NF$;:": $";VA:RS%RF%:180:130:150:ST$RF%RF%1:RS%RF%:150:VA$:RS%0:150:RF%:170:160230(7):ER%(222)$34,1.ER%10Ĺ216,0:NA$NA$"";NF$;:"?(Y OR N)";Z$::Z$"Y"230A$"5"İ60:PS$(((HS$))((MS$)))" ":NF$MF$:NP$"P"PV$:130:RS%RF%:150:NP$:RS%0:150:RF%:NF$MF$:70:NF$MF$:50:170:230RB1RB0:NF$FT$:NA$AN$:RS%SR%:180:130:150:"X"NA$" $"VA$:160: 2";::" ";:2);:"9. ";::"SOFTWARS"s ::"4. ";::"CAPE CANAPPLE";::5);:"10. ";::"SUPERDRAW" ::"5. ";::"CHARACTER CODE";::4);:"11. ";::"RECIPE": HTAB 26: PRINT "INSTRUCT" ::"6. ";::"DEFENSE SQUAD";::5);:":"TO MODIFY THE AUCTION NAME FOR YOUR PARTICULAR USE, MODIFY LINE #440.":"PRESS TO RUN AUCTION, ANY OTHER KEY TO CONINUE":K$:K$:(K$)13ĺ"RUNAUCTION"K :"THE PROGRAM 'AUCTION' IS A FUNCTIONAL ONE: IT PERFORMS LIKE AN AUCD AND PAID SUMS WHICH ARE SEEN AT THE TOP OF THE SCREEN WHEN 'AUCTION' IS BEING RUN."\" THIS PROGRAM REQUIRES A PRINTER IN SLOT #1 (THIS CAN BE CHANGED BY MODIFYING LINES 110 AND 430 IN 'AUCTION')":"PRESS ANY KEY TO CONTINUE":K$:K$:MPROGRAM IS TO BE USED WITH ";::"CAUTION";::" AS IT INITIATES THE AUCTION PROGRAM";" BY CREATING A FILE (OR DELETING ONE WHICH ALREADY EXISTS) CALLED AUCTION.NAMESFILE, WHICH ";V"IN ADDITION TO KEEPING TRACK OF NAMES IT ALSO STORES THE UNPAIN': NAMESFILE40, ITEMSFILE40, AND RESET."}"THE PROGRAM OF COURSE WILL ALSO CREATE A NEW TEXT FILE AS EACH NEW BIDDER IS ADDED SO DON'T USE PROGRAMS WITH A FULL DISK."V"THERE IS ONE OTHER FILE ON THE DISK: 'AUCTION.STARTOVER'.":" THIS s:"#7: EXECUTES FRE(0) FOR GARBAGE COLLECTION (PROGRAM WILL START TO SLOW DOWN WITH TOO MANY VARIABLES STORED. USE IT EVERY 5-10 MINUTES)."u"PRESS ANY KEY TO CONINUE":K$:K$:)x:"THERE ARE 3 FILES THAT ARE USED IN CONJUCTION WITH 'AUCTIOBIDDER. LETS YOU AND THE BIDDER LOOK AT THE PRINTOUT OF THE ITEMS BEFORE THE FILE IS CLOSED. IF THERE IS AN ERROR, YOU CAN ABORT AND EDIT"i"NOTE: YOU CANNOT REOPEN OR EDIT A CLOSED FILE"n:"#6: READ BIDDER'S FILE. AUTOMATICALLY COMES UP IN #5"N CLOSED (IT CANNOT BE REOPENED OR EDITED)"W K:"PRESS ANY KEY TO CONINUE":K$:K$: P:"#3: ENTER NEW BIDS IS, OF COURSE, THE MOST USEFUL. IT IS ALSO SELF PROMPTING. Z:"#4: EDIT BIDS. ALLOWS YOU TO CORRCT BAD ENTRIES."d:"#5: CLOSE (PAY) ASSIGN A BIDDERS NUMBER." <:"#2: READ NAMES WILL LET YOU LOOK AT (OR PRINT) ALL THE FILE NAMES; NOTE THAT A '?' BEFORE ANY NAME INDICATES THAT THE BIDDER HAS A NUMBER, BUT HAS NOT MADE A BID";+ F". A '*' BEFORE ANY NAME INDICATES THAT FILE HAS BEEESS ANY KEY TO CONTINUE":K$:K$: -:"IT ALSO HAS ALOT OF ERROR CHECKING SO THAT YOU WON'T BOMB THE PROGRAM; EVEN RESET IS VECTORED PROPERLY" 2:"UPON STARTING FOR THE FIRST TIME THE ONLY VALID ENTRY IS #1: ADD NAMES. IT IS SELF PROMPTING. IT WILL`"```      (222)         ժժժժժժժժժժժT*UzժժժժժժժժժժժU*UzժժժժժժժժժժՊ*U*u~ժժժժժժժժժժ*U*uժժժժժժժժժժT*U*ժժժժժժժժժժU*U*}ժժժժժժժժժ(U~ժժժժժժժժժժժժՊ*UժժժժժժժժժժժժP*uժժժժժժժժժժժժU*uժժժժժժժժժժժժU*}ժժժժժժժժժժժՊ*U*ժժժժժժժժժժժ*U:ժժժժժժժժժժժժժTժժժժժժժժժժժժժժuժժժժժժժժժժժժժժ(}ժժժժժժժժժժժժժ*ժժժժժժժժժժժժժPjժժժժժժժժժժժժժUzժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժՊժժժժժժժժժժժժժժՒժӠӍҠǠȍōč6?U $dI2-U--??d XHYR16300,0: ........SAVE AS B-FILİ3000:20 A$"F"İ4000:906A$"I"İ5000:20E(7);:90b.......CATALOG DISKETTE~A$::D$;"CATALOG":A$........LOAD APPLEWRITER FILEA$::::"ENTER FILE NAME AND PRESS ""(TRY.PAGE 4)":"TEXT.";NAM$  AS B-FILE"- 2:" C-CATALOG DISKETTE"] <:" F-FLIP BETWEEN TEXT SCREEN 1 & 2" F:" I-INSTRUCTIONAL INFORMATION" P:" Q-QUIT" Z16:1:"ENTER:";:A$ dA$"Q"ĺ: nA$"C"İ1000:20 xA$"L"İ2000:20 A$"S" 6000 D$(4)4 (3072)0(104)1220N D$"RUNSCREEN2 INTRO"` ::16368,0 :"HOW TO USE TEXT SCREEN 2 WITH B-FILES"::" PLEASE SELECT FROM THE FOLLOWING" (:" L-LOAD AN APPLEWRITER FILE" -:" S-SAVE SCREEN 2 3072,0:104,12 (4);"RUN SCREEN 2" 2  RUNNING SCREEN2 INTRO7  PUSHES THE PROGRAMS  POINTER DOWN PAST THEp  SECONDARY TEXT SCREEN.  IT THEN WILL RUN SCREEN 2,  THE MAIN PROGRAM.  BY BERNIE FOX  0" 'D$"WRITE";NF$;",R0"$ '"6"3 'D$"CLOSE"CCTION DATA":'"CAUTION.. THIS PROGRAM DESTROYS SPECSUM, AND NONUMBFILE, AND ELIMINATES EXTRA FILES (PAGE 2). TYPE C TO CONTINUE, ANY OTHER KEY TO END.":A$:A$:A$"C"Ā $' "SPECSUM","NONUMBFILE" )'X12 .'NF$% 3'D$(4)2 8'RN$(0)K B'D$"OPEN";NF$;",L40"_ V'D$"UNLOCK";NF$s `'D$"DELETE";NF$ j'D$"OPEN";NF$;",L40" t'D$"WRITE";NF$;",R1" ~'RN$ 'D$"WRITE";NF$;",R0" '"1" 'X 'NF$"CATFILE" 'D$"OPEN";NF$;",L4 u16300,0Lz:::"ERROR (";(222);") OCCURED":" TO CONTINUE"a(16384)155Ĭk6020X 1024,1152,1280,1408,1536,1664,1792,1920,1064,1192,1320,1448,1576,1704,1832,1960,1104,1232,1360,1488,1616,1744,1872,2000 1872,2000 0*(16384)198Ĺ16300,0:16368,0:44020K ....INSTRUCTIONSY16299,0dX15lA$D$;"BLOAD B-";X16368,0Y12000(16384)155Y2000:X5(16384)160Y2000Y:Xp.......ERROR HANDELERE= A$::"TYPE NAME TO SAVE IT UNDER":"THEN PRESS .O :"-> ";NAM$^ NAM$""ı NAM$"A"NAM$"Z"ĺ:"NAME MUST BEGIN WITH A LETTER":X11000:: D$;"BSAVE ";NAM$;",A$800,L$400" ........TEXT SCREEN FLIPA$:16299,`hๅ ɣ LLL L$ "Ƞλ٠ԠΠǠӍԠΠˠΠȮРǠҠ٠ӍϠǠȮ˻ĻӠҮӠčΠ̠ȍϠŻŠԠ͠ӮŠĠĠƠŠΠӻ̠ΠϠӮčˠĠҮ٠ĠŠԠĠϠ˻ΠҍˠϠǠԠĠč˻Ǡ̠ĮԠΠΠŠҠȠ΍ĠҠȠǠҮĠԻһٻλӻٻ٠ƠčΠӮǠϠ̻ҍĠҠӻҠ̍ΠӠҮŠΠ͠ĠĻȍӠĠҠһԠЍРԍРҍ٠ӍΠĩӠ٠ĩǠٍ٠ƍΠΠӍРˍРҍǠӠΩ٠Ӎ      ' L     GMA  (222)     Ƀ z#Xǰ  ӠŠҠӠ ՠ  ŠϠ ΠӠ­ŠӮӠӮӠӮӠӮӠ ӠŠ Ӡ Π "ԠӮӠ ԠӠΠ Ӡ ӠҠǠȠӮӠ ӠӠӠ ӠϠƠ  ŠŠؠŠӮӠӠĠΠĠ ӠҧӠĠӮӠ ԠӠƠŠ!ԠӠƠΠ Ԡ­ ­"­­βϠԮŠ ҠȠ!Рɠ ŠĠҠ ҠŠΠ̠ҠŠ ŧŧ  ήŠ Š ήӠήӠǠŠɠ­ŠΠĠîʠ6Ӡ נҠ"Ԡ Π!ˠĠҠ TRY AGAIN (Y/N) ";:A$:A$*A$"Y"Ĭ0@@@@@@@@@@" A100)100;" (M/SEC)"E17:" GRAVITATIONAL PULL:";(G10000)10000aER((VV1)V11000)10ER5ER5ĺ"YOU WERE OFF BY ";ER;"%":500:20:12);" VERY GOOD!! ":"YOU'VE OBTAINED THE CORRECT VELOCITY!!!"" ;:21:(92) hI6:19:" "= rI50ĢI5:20::"W":Q |:1:19:" "_ 11:958 G(6370000(6370000H))29.8:R6370000H:V1(RG) 12:"HEIGHT VELOCITY" 13:" ";H;:15:V;"(M/SEC)"15:" VELOCITY FOR ORBIT:";(V1I 9:16:"I=I":10:15:"_"H I841:17:I1:"=":I:17:"U"h P(P1)(P1):JI100:J,I 4:17:"=":3:18:(92);" /" I441 ,I0ĢI:20:"^" 1 6K14:IK0ĢIK:20:NA$(K) @K Y ^I40ĢI4:19:"/"T (KM)"( 16:6:H$:H(H$):H01805 HH1000Y 17:4:"WHAT VELOCITY (M/SEC)"z 18:6:V$:V(V$):V0200 20:5:"THANK YOU.":21:7:"YOU MAY NOW BOARD THE ROCKET.":P116336 I215:10:I1:"_U": P(P1)(P1):JI100:J,9:I:16:LA$: n4:20:"^"1 x8:19:"/ \"j 10:1:"________________________________________": I14:I4:20:NA$(I):: 12:2:"WELCOME TO CAPE CANAPPLE." 13:7:"YOUR ROCKET IS READY." 15:4:"WHAT HEIGHT WILL YOU ORBIT ARETURN TO BEGIN.";A$ 9 " PLEASE TYPE YOUR NAME."^ "LIKE THIS bFIRST MIDDLE LASTb"k (NA$:J2 -NA$(1)(NA$,1) 2I1(NA$) <(NA$,I,1)" "NA$(J)(NA$,I1,1):JJ1 F:NA$(4)" " P:LA$"I=I I=I" Z3:19:"/=\" dI4 AS B-FILE"- 2:" C-CATALOG DISKETTE"] <:" F-FLIP BETWEEN TEXT SCREEN 1 & 2" F:" I-INSTRUCTIONAL INFORMATION" P:" Q-QUIT" Z16:1:"ENTER:";:A$ dA$"Q"ĺ: nA$"C"İ1000:20 xA$"L"İ2000:20 A$"S" 6000 D$(4)4 (3072)0(104)1220N D$"RUNSCREEN2 INTRO"` ::16368,0 :"HOW TO USE TEXT SCREEN 2 WITH B-FILES"::" PLEASE SELECT FROM THE FOLLOWING" (:" L-LOAD AN APPLEWRITER FILE" -:" S-SAVE SCREEN 2DNA$(500)h:8:2:"THIS IS A PROGRAM DESIGNED TO DEMONSTRATE SOME PHYSICS FORMULAS.":" THE COMPUTER WILL ASK FOR A HEIGHT AND VELOCITY. PLEASE ENTER THE VELOCITY THATWILL OBTAIN AN ORBIT ABOVE THE EARTH." ::" PLEASE PRESS   ************************=* GREEN MOUNTAIN APPLE *[* CLUB *y* THE SKIERS *(*ANIMATION &BACKGROUND *2* BY PHIL PEERY*<*PROGRAMMING *F* BY ANN PEERY* P********* ONS." (:"ONE OF ITS KEY FEATURES THAT THE DATA IS SAVED TO DISK ALMOST IMMEDIATELY AFTER IT IS ENTERED; CONSEQUENTLY, ANY MAJOR FAILURE (POWER OUTAGE, ETC) WILL NOT DESTROY THE DATA (EVEN THE RUNNING "; )" TOTALS). JUST REBOOT."" *:"PRϠƍҠōɠĠӍŠԠɧӠōŠōčTION MANAGER AT A LOW-MEDIUM SIZE AUCTION (<$10,000) AS IT KEEPS TRACK OF ALL THE RECORDS AND BIDDERS; AS WELL AS MAINTAINING A RUNNING TOTAL." :"IT HAS BEEN USED FOR PTO AUCTIONS IN THE SO. BURLINGTON, VT SCHOOL DISTRICT. AS WELL AS CHURCH AUCTI D$(4)X:"PRESS RETURN FOR AUCTION PROGRAM":"ANY OTHER KEY FOR DESCRIPTION"rK$:D$:(K$)1310 D$"RUNAUCTION" AUCTION.DESCRIBE BY STEPHEN SILVERMAN :"THE PROGRAM 'AUCTION' IS A FUNCTIONAL ONE: IT PERFORMS LIKE AN AUC FTWARS'''''$ ''BY ANDRE MEHTA''> '''''''''''''''''' THE FOLLOWING: (LINENUMBER) POKE 768,A:POKE 769,B:CALL C.A IS THE SOUND (255=LOW, AND 1=HIGH) 0 IS THE SAME AS 255. B IS THE SPEED (255=SLOW, AND 1=FAST) AGAIN 0";" IS THE SAME AS255. C=770." ''''''''''''''''''  '''''SO96,0+" HIT A KEY";:WE$:"THIS 'MUSIC' WAS MADE BY POKING CERTAIN MEMORY LOCATIONS. BUT FIRST YOU NEED TO INITIALIZE THE SOUND ROUTINE BY USING A SHORT SUBROUTINE:"60:730 "THEN IT IS QUITE EASY, ALL YOU HAVE TO DO IS P0:P150:PB,114:A0P0:P170:PbI0:I13:B,86:769,10:A:P0:P150:P:I}I0:I12:B,63:A:II0:I13:B,64:769,10:A:P0:P150:P:IB,0:A 173,48,192,136,208,5,206,1,3,240,9,202,208,245,174,0,3,76,2,3,AB,86:A"B,94:C,10:A5P0:P150:PI&B,101:C,10:A\0P0:P150:Pp:B,114:C,10:ADP0:P150:PNB,63:AXB,86:AbB,94:C,10:AlP0:P150:PvB,101:C,10:AP0:P150:B,94:C,10:A0:P150:P|B,114:A-P0:P150:P<I0:I13PB,171:C,10:AfP0:P150:P:ItB,129:AB,86:AB,94:C,10:AP0:P150:PB,101:C,10:AP0:P150:PB,114:C,10:AP0:P150:PB,63:B,171:AB,94:C,10:A1P0:P150:PEB,101:C,10:AXP0:P150:PlB,114:C,10:A"P0:P150:P,B,63:A6B,86:A@B,94:C,10:AJP0:P150:PTB,101:C,10:A^P0:P150:PhB,94:C,10:A rP:AA1:Q F90 P- ZA770:B768:C7698 dI13J nB,0:C,10:AY xP150:P` Il B,0:Az B,171:A B,201:C,10:A P0:P150:P B,211:C,10:A P0:P150:P B,241:C,10:A P0:P150:P B,128:A ? ''''''''''''''''''3  '''''SOFTWARS'''''L  ''BY ANDRE MEHTA''e  '''''''''''''''''' ::80:::255::: :15 9:"<<<<<<< SOFTWARS >>>>>>>" ("<<<<<<<<<<<< BY ANDRE MEHTA >>>>>>>>>>>>" 222 <A770:Q122:D:A,D     32,2:233,64:0:1:  ERASEb23:"FINE OR GROSS ERASE(F OR G)? ":SZ$:SZ$:SZ$"G"ę10:1X,Y:1X1,Y:I110:I:1X,Y:1X1,Y:16287,0:16286,0:16368,0:  ::"SUPERDRAW ALLOWS YOU TO:" " A)MOVE SHAPES FROM AACE SHAPE ON SCREEN AT PADDLE POSITION -SPACEBAR ENDS"USHX,Y:I1100::SHX,YpK(16384):K127400S0(16287):S0127Č1052:2000:C:SHX,Y:XX10:YY10:710360:71016386,1:16387,0:16388,4:16389,0:16390,32:16391,0:2):K127400l580&v MOVE SHAPE4ST1680QD$"BLOAD";SN$;",A32768"o232,0:233,128:ST1:SA0"SHAPE NUMBER";SHAS(32768):SHASĺ"ONLY ";AS;" SHAPES IN YOUR TABLE, ";SN$:683C:RT5.625:SC622:"PRESS BUTTON#0 TO PLAINT/MOVEC3;&"SCALE(1-10),ROTATION(0-360) ";SC,RTS0SC:C:(RT5.625):912:912: IF (ST = 1) AND B$ = "P" THEN SH = 61: GOTO 680?B$"M"660D360:22::"PAINT MODE";::" SPACEBAR RETURNS TO MENU"NC:1X,Y XK(16384E ";NF$)D$"BSAVE";NF$;",A8192,L8192"82000:100h16368,0:B$"L"((B$"P")(B$"M"))210xB$"M"740B$"P"590520360:C:X1,Y1X,YS1(16286):S1127Ē3:210K(16384):K127400X1X:Y1Y:490  PL")(B$"E"))İ2000:1006K175K183CK176:460P(K202)(B$"P")120aB$"L"430vK204PLK:460K211PL200:46016368,0:912:912:912:"SAVE TO DISK?(Y/N)";:A$:A$:A$"Y"Č912:912:100"NAME OF FILE TO SAV SPACE BAR RETURNS TO MENU".rX279X278?|Y159Y158Eg GOES HERE TOCHECK ON INPUT(K199)(K214)(K215)(K216)(K207)(K194)61000(K156)((B$"S")(B$"E")(B$"L"))İ2000:210K27210K155((B$"S")(B$"1,Y1G@Q127B$"E"(PL128)"L"ēX0,Y01X1,Y11:X0,Y02X1,Y12SJ3:210hX(0).913:W110::Y(1)1.6:B$"E"Ģ21:"COLOR=";MA$(C);:" ";:(X);:" ";:(Y);:" "m(B$"S")(B$"L")ĺ"BUTTON#0 STARTS, BUTTON#1 ENDS LINE":"$"S"B$"P"210J"(Z127)(B$"E")Č1052:2000:1052:X0X:Y0Y:210Z,Q(16286)1((Q127)(Z127)(NE1))B$"E"İ360:1000:912:21::"ERASE MODE";::"SPACEBAR RETURNS TO MENU":NE1:2000:2406(Q127)(B$"E")Ĺ16286,0:C:X0,Y0X";:B$"P"ĺ"-SPACEBAR ENDS"* B$"T"ĺU I150:K(16384)::2000:K127400o X1X:Y1Y:Z(16287) Z127((B$"P")(B$"M"))Č1052:2000:530 B$"T"Z127Č1052:2000:5000 B$"T"210 Z127B$"S"İ2000:1052:490BB$"T"B$"S"B$"L"B$"P"100? :35,24:C3:PL150:3H 360w 1X,Y:1X1,Y:I110:I:1X,Y:1X1,Y B$"E"Ģ23:"PRESS BUTTON #0 TO BEGIN ERASE MODE" B$"T"B$"P"Ģ22:"POSITION START POINT WITH PADDLES THEN PRESS BUTTON #0104,8:::W h((B$"V")(B$"M"))ST0Ą"WHAT IS THE NAME OF YOUR SHAPE TABLE? ";SN$o iB$"C"đ:912:60~ k2000:750 l430 mB$"D"İ2000:430 oFR(0) p(B$)83005 qB$"E"İ990:2000:150 sB$"M"530 uB$"V"ī4000$ v Z912:912u dNE0:21:"SKETCH =S";:" ";:"LINES = L";:" ";:"MOVESHAPE = M ":22:"ERASE=E";:" "; e"CLEAR=C";:" ";:"PAINT=P";:" ";:"QUIT=Q" f23:"VIEWSHAPES=V";:" ";:"TYPE=T";:" ";:"DISKSAVE=D":B$:D$ gB$"Q"ĹWHITE":MA$(4)"BLACK":MA$(5)"ORANGE":MA$(6)"BLUE"= 22000z <230,32:16301,0:16304,0:11297,0:16300,0:ST0:21 F"WOULD YOU LIKE TO LOAD A SCREEN?(Y OR N) ":C$:C$:C$"Y"100 K430 P"NAME OF SCREEN";S$:D$"BLOAD";S$;",A8192" 32767% BY STEVE SILVERMAN9 2000::D$(4)X :::D$"BLOADHEADER,A16384"u :::W$:D$:(W$)830052109,178:2140,178: TO PUT REMS INTO LINES 12,13 AFTER IT IS RUN THE FIRST TIME3 (:::MA$(1)"GREEN":MA$(2)"VIOLET":MA$(3)"           Ԣ@ p@|@ @@` ըժՎ@@@ @HH@@@BH@@@H@H@@@H@H@BD@ @@1   @G@HOH? !@`0բŊբՂ @ @p;@ @@0ȢըժՎp?~@@ @HH@H@BH@@@H@H@@@HEH@D@HD@ 0 x` x?  `!`@ `ժՊբ`(T*U  @`@~@G@HO@ @@0@ըժՎ `@`@GGG_G@@G@HO@GBH@HOH|@0`?0 $ X`#! @ @ ժՊբՂ@(U*U  @C`@ 8@@H@H@H@0@` @ըժՎ 0@H@0 $            SO IT HAS VERY FEW SPECIAL FEATURES. YOU CANNOT, FOR EXAMPLE USE ITTOO NEAR THE EDGE OF THE SCREEN, NOR CAN YOU EDIT EASILY (EXCEPT OF COURSE WITH THE ERASE MODE)."@::"PRESS ANY KEY TO CONTINUE OR SPACEBAR TO QUIT":A$:A$:(A$)32ĝ:YJ:E OR SPACEBAR TO QUIT":A$:A$:(A$)32ĝ:O"::"TYPE MODE INSTRUCTIONS",:"THIS IS THE EASIEST MODE TO USE: JUST POSITION THE CURSOR WHERE YOU WANT TO START AND THEN PRESS BUTTON#0"6:"THIS MODE IS NOT INTENTED TO BE A WORD- PROCESSOR3) SIZE AND WORK UP."THE J-KEY (FOR JUMP) CAN BE USED TO MOVE THE CURSOR AROUND WITHOUT GOING ALL THE WAY BACK TO THE MENU.""NOTE THAT THE COLOR KEYS, W,V,G,B, AND O WORK JUST LIKE IN THE SKETCH AND LINE MODE.-::"PRESS ANY KEY TO CONTINUO::"PRESS ANY KEY TO CONTINUE OR SPACEBAR TO QUIT":A$:A$:(A$)32ĝ:s::"PAINT MODE INSTRUCTIONS:":"THE PAINT MODE IS THE MOST DIFFICULT TO USE PRECISELY. I RECOMMEND SAVING OFTEN BECAUSE IT'S EASY TO MESS UP; START WITH A SMALL (1-THER THAN WHITE WILL PROBABLY BE SPOTTY (THIS CAN BE AVOIDED BY DRAWING SHAPES WITH HORIZONTAL LINES ONLY).":"NOTE THAT THERE ARE IDIOSYNCHROSIES IN THE APPLESOFT SHAPE GENERATION SUCH THAT ALL COMBINATIONS OF SIZE AND ROTATION ARE NOT AVAILABLE"R CONSULT YOUR APPLESOFT MANUAL) AND ALLOWS YOU TO PUT THEM ANYWHERE ON THE HIRES SCREEN.""PRESSING BUTTON#0 WILL PLACE THE SHAPE WITH THE DESIRED COLOR AT THE LOCATION DEFINED BY THE PADDLES."l"AS IN THE SKETCH AND LINE MODES, A COLORO' RETURNS TO THE SMALL (REGULAR)."s::"PRESS ANY KEY TO CONTINUE OR SPACEBAR TO QUIT":A$:A$:(A$)32ĝ:::"MOVESHAPE MODE INSTRUCTIONS"a:"THIS MODE USES A PREDEFIND SHAPE TABLE (THERE ARE MANY PROGRAMS AVAILABLE TO DRAW SHAPES ONS"" 1)THE LINE IS ONLY DRAWN AFTER BUTTON#1 IS PRESSED (USE THE X/Y COORDINATES AT THE BOTTOM OF THE SCREEN TO HELP YOU DRAW A STRAIGHT LINE)."#" 2)ENTERING 'L' AT ANY TIME DURING THIS MODE RESULTS IN A LARGE (WIDE) LINE BEING DRAWN. 'SWING."0d"AND, OF COURSE, THE SPACE BAR ENDS"x::"PRESS ANY KEY TO CONTINUE OR SPACEBAR TO QUIT":A$:A$:(A$)32ĝ:::"LINE MODE INSTRUCTIONS:"::"THIS IS ESSENTIALLY THE SAME AS THE SKETCH MODE INSTRUCTIONS WITH TWO MAJOR EXCEPTIOE COLORS ON THE SCREEN. HORIZONTAL LINES WILL ALWAYS BE CONTINUOUS ON A COLOR MONITOR. HOWEVER, A GOOD MONOCHROME MONITOR "; U" IS NOT SO FORGIVING."Z:"BUTTON#1 RETURNS TO THE NON-DESTRUCTIVE CURSOR SO YOU CAN MOVE THE CURSOR WITHOUT DRAH THE PADDLES/JOYSTICK" F:"THE COLORS GREEN, VIOLET, BLUE, ORANGE OR WHITE CAN BE ACTIVATED BY ENTERING THE FIRST LETTER OF THE COLOR NAME." P"COLORS OTHER THAN WHITE MAY SHOW MISSING SPOTS BECAUSE OF PECULIARITIES IN THE WAY THE APPLE PUTS THNLY. ALSO NOTE HIMEM: 32767 (LINE#1) IS USED TO PROTECT A SHAPE TABLE. 2::"PRESS ANY KEY TO CONTINUE OR SPACEBAR TO QUIT":A$:A$:(A$)32ĝ: <::"SKETCH MODE INSTRUCTIONS:"::"AS USUAL, BUTTON#0 STARTS AND A LINE CAN BE DRAWN WITYOU INPUT SOMETHING ERRONEOUS." -"THE ERASE MODE IS A BIG HELP.":"ALSO, RESTARTING THE PROGRAM WILL NOT ERASE YOUR PICTURE (AS LONG AS YOU DON'T RELOAD SUPERDRAW FROM DISK)."N /:"SUPERDRAW USES BOTH HIRES SCREENS BUT SAVES YOUR PICTURE ON #1 OG: SPACE BAR ALWAYS RETURNS TO MENU VIA DISKSAVE QUERY ";::"EXCEPT IN 'TYPE'";::" WHERE THE KEY IS USED TO EXIT." ("YOU CANNOT MAKE A IRREVOCABLE MISTAKE:":"THERE IS AN ONERR GOTO WHICH IS USED TO ROUTE YOU TO THE MENU (VIA DISK SAVE),IF  DRAWINSTRUCTo::"PRESS ANY KEY FOR INSTRUCTIONS, RETURN TO RUN SUPERDRAW":A$:A$:(A$)13ī20(4)"RUNSUPERDRAW"::"GENERAL INSTRUCTIONS:"::"INITIATING ACTION IN EACH MODE: BUTTON#0 ALWAYS STARTS (WITH A BELL)."~ "EXITIN     *U*U*U*U*Uo_?U~?U~*U*U*U*U*U*]~W>U~?U~*U*U*U*U*U*}~W>U~?U~*U*U*U*U*U*]zU:U~/Uz*U*U*U*U*Uj]zU*Uz/Uz*U*U*U*U*UjWjW.Uz/Uz*U*U*U*U*U*_j_/Uz*U*U*U*U*U*U*UoWzw*U*U*U*U*U*U*Unw~w*U*U*U*U*U*U*Uww*U*U*U*U*U*U*wUU*U*U*U*U*U*U*wUU*U*U*U*U*U*Un_UU*U*U*U*U;Uj*U*U*U*U*U*U*U*U?Uj*U*U*U*U*U*U*U*U>Uj*U*U*U*U*U*U*U*}~Uz*U*U*U*U*U*U*U*]z_*U*U*U*U*U*U*U*]z_*U*U*U*U*U*U*U*Wj U*U*U*U*U*Uo+u*U*U*U*U*U*U*U*U*U~*U*U*U*U*U*U*U*U*U*U~*U*U*U*U*U*U*U*U*UjW~+u*U*U*U*U*U*U*U*UjUz?*U*U*U*U*U*U*U*UzUz*U*U*U*U*U*UjժժժժժU*U*U*U*Ujժժժժժ(U*U*U*U*U:ժժժժ*U*U*U*U*w>ժժժժ@*U*U*U*U*.}ժժժՊT*U*U*U*U*}/}ժժժ*U*U*U*U*U++uժժժժժՊ*U*U*U*ujժժժժժժP*U*U*U*U*ժժժժժժT*U*U*U*]*ժժժժժժU*U*U*U*}jժժժժժժ*U*U*U*U:{ժժժժժ*U*U*U*UzժժժժժT*U*U*UժժժժժժժժT*U*U*Uzժժժժժժժժ(U*U*U*U~ժժժժժժժՊ*U*U*Uj]ժժժժժժժP*U*U*Uz_ժժժժժժժU*U*U*Uzժժժժժժժ U*U*U*Ujժčժժժժժ(U*U*}ժժժժժժժժժ*U*U*ժժժժժժժժժT*U*UnժժժժժժժժժU*U*Uoժժժժժժժժժ(U*U*Uժժժժժժժժ*U*U*U~ժժժժժժժժP*U*U*U~***************; d(768)1ĺ(4)"BLOAD GMAC.OBJ":768,1K n:16302,0[ x3,0:17152k I12000:s : 7:9:"GREETINGS FROM THE":10:5:" GREEN MOUNTAIN APPLE CLUB" D$(4) D$"RUN MENU" U LO" O" D  MENU BY STEVE SILVERMAN,D$(4)2N1$"GREEN":N2$"MOUNTAIN":N3$"APPLE":N4$"CLUB":O1$N1$:O2$N2$:O3$N3$:O4$N4$(120:2N1$" ":118<J911:J:5:O1$:K150:K:J:868:J:5:O1$FN2$" ":1188 PJ9@KA0UW_hz#/<JScoty&0;KWes#-6?GI  ̠͍  A(L@`5AA``?~|xp`@((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP @v4T H ,L h0`D Lm@8'A A i H e he Ae A A8).A('A) &Je               """768,32:769,227:770,3:771,76:772,217:773,3:774,96-768A$"2000.20FF N D832G":X1(A49:511X,(MED$(A$,X,1))128::72,0:144:11K774,96768X A$"00.FF N D823G":X1(A$):511X,((A$,X,1))128::72,0:144"HIT ANY KEY TO CONTINUE....";:A$:11SAL47083,0:47091,0SC47091,0PP10000:47088,LOC(LOC256)256:47089,(LOC256)$ ":::::::"TRACK:";:" ";T::"SECTOR:";:" ";Sf"OUTPUT TO PRINTER ?";:A$:A$"Y"ĺ"PR#1"47084,T:47085,S:47092,1: CHANGE TO 2 TO WRITE 47083,0:47091,047088,0:44089,0768,32:769,227:770,3:771,76:772,217:773,3:((L));:(L)127LL1:1903B15LL1::U1:B1528:20:"<";B;".> ";x((L));:(L)127LL1:205B28LL1:::(4);"PR#0":"HIT ANY KEY TO CONTINUE ....";:A$:115::" READ SECTOR "ĹBLOC,BA$"A"ĹALOC,B1A$"I"ĹILOC,BEA$"T"ĹTLOC,BYA$"U"ĹULOC,BmA$"L"ĹLLOC,Bv115L43140:"OUTPUT TO PRINTER ?";:A$A$"Y"A$"N"180A$"N"185:(4);"PR#1":B114:"<";B;".> ";LOC)):"APPLESOFT = ";((ALOC))[ }:"INTEGER = ";((ILOC)):"TEXT = ";((TLOC)) :"LOCKED = ";((LLOC)):"UNLOCKED = ";((ULOC)) :"CHANGE B,A,I,T,L,U OR Q";:A$ A$"Q"ė:11 "NEW CODE --->";:B$:B(B$)128 A$"B,234:44481,234:44482,234:100B _44480,32:44481,66:44482,174 d1:15:A46011459991:((A));::(44480)32ĺ(46017) i:"CORRECT ?";:A$:A$"N"55 n:11 s::" CUSTOMIZE DOS FILE TYPES ":" x:"BINARY = ";((B(A));::(44480)32ĺ(46017)L A6:1:"NEW HEADING --->";:"";A$:A(A$)l FA12āB112A:A$A$" ": K(A$)12ī65 PB112:4599912B,((A$,B,1))128: U9:1:"PRINT VOLUME NUMBER (Y/N) ?";:A$:A$"Y"A$"N"ī85 ZA$"N"Ĺ44480ILE TYPE CODES". "<3.> PRINT DOS COMMANDS"G ("<4.> EXIT PROGRAM" -1:13:"ENTER CHOICE --->";:A$:A(A$):A55,115,180 /A4ė: 245 7::" CUSTOMIZE CATALOG HEADING ": <:"CURRENT HEADING: ";:A46011459991:(2,208,248,169,160,162,4,205,80,192,208,249,202,208,248,141,81,192,96 BLOC45994:ALOC45993:ILOC45992:TLOC45991:ULOC41508:LLOC44515 ::" DISK COMMAND EDITOR "::6 "<1.> CUSTOMIZE CATALOG HEADING" "<2.> CUSTOMIZE F :82K039:1448K,1416:2000K,1016B2:25,45KIKP5t" DISK COMMAND EDITOR"" BY ANDRE MEHTA"I1175:768:::10K768798:D:K,D::D 141,82,192,169,224,162,4,205,81,192,208,249,20     ::"*** PROCESSING TERMINATED BY CTRL-C"::" TYPE >RUN< TO RESTART":+(CH$)13āB(36)39:" ";:B:11240: * RETURN+(CH$)3211130: * CTRL CHAR+IN$IN$CH$:CH$;+(IN$)25511130n+::"*** MAXIMUM LENGTH STRING REACHED(IN$)0(CH$)811130N+(CH$)34CH$"'": - CONVERT QUOTE TO APOSTROPHE+(CH$)8ĺ"";:IN$(IN$,1,(IN$)1): * BACKSPACE (CTRL-H IN QUOTES)+(CH$)21ĺ"": * FORWARD SPACE (CTRL-U IN QUOTES)+(CH$)3ī11190J++ * KEYBOARD, DISPLAYS2 + * ON SCREEN, PERMITSM*+ * CURSOR CONTROL ANDf4+ * ENTRY OF COMMAS ~>+ * AND SEMICOLONS.H+ ********************R+ * STRING IS RETURNED\+ * IN >>> IN$ <<<f+ ********************p+IN$""z+CH$+" 7 SNACKS/HORS D'OUVRES "0 " 8 DRINKS "K " 9 MISCELLANEOUS "\ " 0 END "d : " ENTER SELECTION ===> ";  16368,0:A$:A$  * * <<< INPUT ROUTINE >>> + ******************** + * READS INPUT FROM ****"5 l"***** RECIPE FILE *****"e v"****************************************"k  " 1 MEAT DISHES " " 2 CASSEROLES " " 3 VEGETABLE DISHES " " 4 SALADS " " 5 BREADS " " 6 DESSERTS " ITLES - NO UPDATES.*  * REWRITE TITLES5 26000S 25: * BACK TO MAIN MENU[ N *| P ****** END OF MAIN ROUTINE Q * * X:: ] *** MAIN MENU DISPLAY *** b"************************************B$"DESSERTS"3 A$"7"B$"SNACKS/HORS D'OUVRES"K A$"8"B$"DRINKS"j A$"9"B$"MISCELLANEOUS" A$"0"A$"9"25 * READ TITLES * F$B$".TITLES" 15000 * DISPLAY TITLES 21000 U0500: * NO REWRITE OF T) TI$(200)'  DISPLAY MAIN MENU0 600A #A$"0"ī50M (:::h 2 SET FILE QUALIFIER FA$"1"B$"MEAT DISHES" PA$"2"B$"CASSEROLES" ZA$"3"B$"VEGETABLE DISHES" dA$"4"B$"SALADS" nA$"5"B$"BREADS" xA$"6"  ***********************? * RECIPE FILE *^ *** VERSION X ***} * BY M. E. GRIFFITH * *********************** MOD(A)((AB(AB))B.05)(AB)D$(13)(4): + CTRL "D" RE$(100         j?u*U*U*uzUzU*?u*U*U*u:UjU*?u*U*U*U?UjU*/U*U*U*_?U*U*}/U*U*U:_U:U*}/U*U*U:W~_?U*}/U*U*U*U*U+u.]*u*U*U*U*U+}>_*u*U*U*U*U;_z*}*U*U*U*U>_zo}*U*U*U*W~Wjo}*U*U*U:W~Wj}*U*U*UzUzW?U~*U*U*U*U*U>n+Ujw*U*U*U*U*u.}++Ujw*U*U*U*U*w.}+/Uz*U*U*U*U*w+u*}w*U*U*U*U*}+u*}w*U*U*U*U*}*U*uw11:J:11:O2$:K150:K:J:868:J:5:O1$" "O2$M ZN3$" ":118 dJ911:J:20:O3$:K150:K:J:868:J:5:O1$" "O2$" "O3$ gN4$" ":118 iJ911:J:26:O4$:K150:K:J:868:J:5:O1$" "O2$" "O3$" "O4$ kŠĩ  ' L       GMA Ƀ  č"Y"Y$"YES"600N610$X:130Ob::" OK THANKS FOR USING DICE, BYE!"UlE^2<::" JIM'S DICE";F4:9:"*******************"P5:9:" BY JIM SILVEMAN"U" MADE AVAILABLE BY JIM CO. SOFTWARE" V" SPECIAL THA "; EE1I1500:%4602D1570p:::" WOULD YOU LIKE YOUR NUMBERS ADDED UP? ";:Z$:Z$Z$"Y"Z$"YES"560&5700:" ";::X;" IS TOTAL THAT I ROLLED !":::" WOULD YOU LIKE TO ROLL SOME MORE? ";:Y$:Y$DY$!" CC1W::" WHEN YOU THINK YOU UNDERSTAND THIS, THEN TYPE A KEY! ";:D$_30:"I DON'T THINK YOU UNDERDSTAND THIS SO I AM GOING TO GIVE YOU THE INSTRUCTIONS":I13000:390ED520X0(A(1))1XXX0X0;" BUT IT CAN BE USED WHEN YOU LOSE YOUR DICE, OR SOMETHING SIMILAR.";:" THE WAY THIS PROGRAM IS DESIGNED IS THAT I WILL GIVE YOU A LIST OF DICE THAT YOU CAN ROLL, AND YOU WILL CHOOSE ONE AND TYPE IT IN, AND I WILL GIVE YOU THE NUMBER I ROLLEDDICE ROLLED? ";DD Y:" ";::"THESE ARE THE NUMBERS I ROLLED:";:M ^460S h r:::" I HAVE TO ROLL ONE OF THE DICE IN THE PARENTHESES!"::I14000: |170D :" THIS PROGRAM WAS DESIGNED FOR USE WITH THE GAME DUNGEONS AND DRAGONS,1)"8"A8:340- (A$,1,2)"10"A10:340K (A$,1,2)"12"A12:340U BB1b B2310o B4370| "B5440 ,170 6::"I CAN'T ROLL THAT ONE":I12000: @BB1 J170 T::" HOW MANY TIMES WOULD YOU LIKE THE "A$:" SIDED ED) (100 SIDED)"] :::" WHAT DICE WOULD YOU LIKE ROLLED ? (2,4,6,8,10,12,20,100): ";A$i E0:X0 (A$,1,3)"100"A100:340 (A$,1,2)"20"A20:340 (A$,1)"2"A2:340 (A$,1)"4"A4:340 (A$,1)"6"A6:340 (A$,NKS TO STEVE SILVERMAN!";:( ZC11101 d130f n:" DO YOU WANT INSTRUCTIONS (Y/N)? ";:C$:C$ xC$"Y"C$"YES"390 ::" (2 SIDED) (4 SIDED)" " (6 SIDED) (8 SIDED)" " (10 SIDED) (12 SIDED)" " (20 SIDV X(50) E0C1P JIM'S DICE, BY JIM SILVERMAN SEPT 12, 1982X(B1^2<::" JIM'S DICE";F4:9:"*******************"P5:9:" BY JIM SILVEMAN"U" MADE AVAILABLE BY JIM CO. SOFTWARE" V" SPECIAL THA     ĠΠҢРӢӠŢРԠ͢Р٠ҢĠӢĠӠĠԢŠŬԬҬĠҠ٠ήǠϠ̬ΠҠȠˮҍӠǠΠŢРԢӠĠҢРĠȠҠԢРĠĠ΢РĠӠҠΠӢРĠ٢РĠӢРĠ٢Р /U*U*/U_*U*}+U~_*U*}+U~_*U*}+U~W*U*u*UzW*U*u+Uj}+Uj?u+Uj?u+Uj?u*U*?u*U*/U*U*?U~/Uz/Uz/Uz/Uz}/Uz}U?U~?U~?U~?U~?U~wwUUUUUww}}/Uz~_*Uj:u_~_*Uj?u_W*U*W*U*W*U*_*Uj+U~*U*UzW~_/U*u+U~*U*W~Uz/U*u+U~*U*_Uz+U*U+U~*U*_Uz+U*U*Uz*U*?Uj/U*u*Uz*U.?UjU**Uz:u8:"BURLINGTON, VERMONT"# n1010- v(7)\ x10:5:958:N1$" "N2$" "N3$" "N4$:i 5:958 "1. ";::"ALPHANUMERICS";::5);:"7. ";::"DICE": :"2. ";::"AUCTION";::10);:" 8. ";::"MISTER MATH 3/ J::"3. ";::"SCREENI`hhߚHH LUY[]_acegijkmprtvvvx|~~*UzW*U*u*UzW*U*u "$&(*,,0468:<>@ADFHLNQSS4'CT1: STARTOVERD'::"CAUTION...DESTROYS AUCTION DATA":'"CAUTION.. THIS PROGRAM DESTROYS SPECSUM, AND NONUMBFILE, AND ELIMINATES EXTRA FILES (PAGE 2). TYPE C TO CONTINUE, ANY OTHER KEY TO END.":A$:A$:A$"C"Ā $' "SPECSUM","NONUMB`hๅ ɣ L  (103)+ (104)*256=   LL L$ "  3072,0  ' LҠ͠ԻǠٻԠήŠȠΠԠƠӍĠȠˠҠͮӠčĠԠ٠ˍӠĭĠĠӍӍĠĠӍӍԍԠҍĠӍԠ͍Ԡ̩͠ԠӠˠĠŠӠΠ٠ΠĠˠ٠Ġ ŠϠӠĮҠϠȠҠĮΠŠ͠ŠȠˮؠΠŠӠĠ͠Ϡ̍ӮРϠŠϠؠčŠ̠ͮčӠŠŠƠ٠ύӠԠҍϮΠƠĠōŠŠƠΠӍРΠōڠӠƠ͠ōРĠӍؠŠԠŠӠ̍   GMA  104,12 ɃOU MAY:"::" --- REVIEW WORDS MISSED."::" --- REVIEW THE ENTIRE LIST."::" --- SAVE THE LIST TO DISKETTE."::"THE FILE NAME ASSIGNED WILL BE:"::"'SPELLFILE - ' PLUS YOUR ASSIGNED NAME."2000::"RETURN TO CONTINUE:";::"";:"YOU THE OPPORTUNITY TO RE-TRY MISSED "::"WORDS."`:"IF YOU HAPPEN TO MISS SEEING A WORD AS "::"IT IS FLASHED ON THE SCREEN, YOU "::"MAY HIT >RETURN< TO HAVE THE SAME WORD"::"DISPLAYED AGAIN."2000q:::"AT THE END OF THE QUIZ, Y:"THEM FOR SPELLING PRACTICE. IT WILL "::"THEN FLASH EACH WORD ON THE SCREEN AND"::"PROVIDE TWO OPPORTUNITIES TO SPELL IT"::"CORRECTLY."B2000L:6V:"EACH WORD MISSPELLED ON BOTH ATTEMPTS"::"WILL BE RECORDED AS AN ERROR PROVIDING": SPELLING WORDS OR RETRIEVED A SAVED"::"LIST FROM A FILE."F$2000.:::"YOU MAY GENERATE LISTS OF UP TO 100 "::"SPELLING WORDS (LIMIT MAY BE CHANGED IN"::"LINE 70). THE PROGRAM WILL OPTIONALLY "::"SHUFFLE YOUR WORDS BEFORE PRESENTING"8 ***"::;:13:"DOCUMENTATION":13:"-------------":"SPELLING BEE IS A PROGRAM DESIGNED TO "::"TEACH SPELLING AND PROVIDE PRACTICE."::"IT IS NOT INTENDED TO TEST SPELLING"::"SKILLS."<:"THE PROGRAM ALLOWS YOU TO ENTER A LIST"::"OF/*"770 NNNN1(*D$;"CLOSE "SF$.44>::H:@R:S * SCRAMBLE *_S1NNsIX((1)NN)1TEMP$WW$(S):WW$(S)WW$(IX):WW$(IX)TEMP$S:::: * DOCUMENTATION * ::::9:"*** SPELLING BEE(TRY 'OFTEN MISSPELLED'?)":16E:"ENTER NAME OF SPELLFILE: ";SF$p(SF$)12SF$"SPELLFILE - "SF$:740(SF$,12)"SPELLFILE - "SF$"SPELLFILE - "SF$D$;"OPEN "SF$D$;"READ "SF$NN0NNNN1 WW$(NN)WW$(NN)")12SF$"SPELLFILE - "SF$:560V&(SF$,12)"SPELLFILE - "SF$"SPELLFILE - "SF$j0D$;"OPEN "SF$:D$;"WRITE "SF$DI1NNNWW$(I)XIb"/*"lD$;"CLOSE "SF$v:::: * READ SPELLFILE * 22:" AGAIN? (Y/N) ";:16368,0:Q$.Q$"Y"ī220@Q$"N"ī460YWW$(NN1)"/*"ī630:::"WOULD YOU LIKE TO SAVE YOUR"::"SPELLING LIST? (Y/N) ";:16368,0:Q$Q$"N"ī630Q$"Y"ī500::"ENTER SPELLFILE NAME: ";SF$ (SF$;" WORDS."_ RTNNĺ:"* * * C O N G R A T U L A T I O N S !"::"YOU GOT THEM ALL!":460 :"WOULD YOU LIKE TO REVIEW THE WORDS YOU GOT WRONG? ";:16368,0:Q$ Q$"Y"230 Q$"N"430:"WOULD YOU LIKE TO GO THROUGH"::"THE LIST C O R R E C T ! ! !":ER(J)1:380; TXX0ī370D ^XX1c h"SORRY - TRY AGAIN.":300 r"SORRY, THE CORRECT SPELLING IS: "::" >>> ";:WW$(J) |I12000:I XX0 J ::"YOU GOT ";RT;" WORDS RIGHT"::"OUT OF ";NN"ī200" I1NN:ER(I)0:I:RT0. J1NN? ER(J)1400X :10:10:"WORD ";J :::10:">>> ";:I11000:I:WW$(J) I1200:I :11 "16368,0 ,:::10:">>> ";W$ 6:: @W$" "(W$)0ī250+ JW$WW$(J)RTRT1:"I1NN- :"ENTER WORD ";I;:": ";WW$(I)B (WW$(I))0160I I :"OK, ALL WORDS ARE ENTERED."::"NOW LETS SEE IF YOU CAN SPELL THEM." :"WOULD YOU LIKE THE WORD LIST SCRAMBLED? (Y/N): ";:16368,0:Q$:Q$:Q$"Y"İ900:220 Q$"NLLING LIST"::5::"R";::" - RETRIEVE ONE ON FILE."::5::"I";::" - REVIEW INSTRUCTIONS."~ i:5::"Q";::" - QUIT" n:16368,0:Q$ sQ$"I"İ1000:80 xQ$"R"İ700:200 }Q$"Q"Ā Q$"E"ī80 ::"HOW MANY WORDS? ";NN  * SPELLING EXERCISE *:* PUBLIC DOMAIN SOFTWAREW* BY M. E. GRIFFITH JR.](:o2D$(13)(4)w<:FLIM100:WW$(LIM):ER(LIM)P:9::"*** SPELLING BEE ***":Z:::"DO YOU WISH TO:"::5::"E";:` d" - ENTER A NEW SPE      OL P WILL HOME THE SCREEN.8 A16C0Đ:YA1:X0:150l A8B$" ":D1:280: YOU BACK SPACED.z A32150 B0A64ĴA31340,350,360,370,380,390,400,410,420,430,440,450,460,470,480,490,500,510,520,530,540,550,560,570,580,590,600,610,6X0:3105 A$:A(A$):A$:A27B1B0:(7):150N A27B1:(7):150v A9M255:150: SET INVERSE MODE A14M0: SET NORMAL MODE A13İ1610:YAYA1:X0:YA25YA1:310: YOU PRESSED RETURN. A16C0đ:YA1:X0:150:CONTR8192,8320,8448,8576,8704,8832,8960,9088,8232,8360,8488,8618,8744,8872,9000,9128,8272,8400,8528,8656,8784,8912,9040,9168 dI18:YP(I):: READ IN DATA TO ADD TO POKE NUMBERS. n 0,1024,2048,3072,4096,5120,6144,7168 xCĐ Cđ:16302,0 ESIGN PROGRAM (CHARACTER CODE)?Y/N";:Z$:Z$:Z$"Y"60S 9D$"RUNCHARACTER CODE" <:"DO YOU WISH TO USE PAGE 1 OR PAGE 2 OF GRAPHICS ?";C:C1C240 FC(C1):C1C8192 PI124:Y(I):I: READ IN VALUES TO POKE THE SCREEN WITH.w Z <  8192Y(24):Q$(34)+D$(4)4YA1(::3:" WELCOME TO NORBERT VOGL'S ALPHANUMERICS DISPLAY PROGRAM."2:"TO CHANGE THE UPPER OR LOWER CASE PRESS THE ESCAPE KEY."::8 7"DO YOU WISH TO RUN THE CHARACTERSET D  " " " " " "`hๅ ɣ LLL L$ "  '  -16300,0L GMA -16299,0 Ƀ   m'2<_m???'$$$,---6666d?'$,-66-Dܿ666??'$$$$?76666??'$$$$?76666?'$<7< V. ĠΠĠŠčč!B$"XPH$"Q$" "::$::;B$" 0^0 "::%::ZB$" "Q$"$HPX "::::;|B$" ((((^( "::'(DOWNARROW)$B$"8$$(($$8"::(BRACKET.B$",00((00,"::)BRACKET8B$" @0*&. "::::BB$" J"(117)" "::WAVYLINELB^ "::]B$" (4B "::: ************************* THAT WAS THE NORMAL CHARACTER SET.*****************************************B$" "::" "" "B$" "Q$(95)Q$" "::!::B$" .&*0@ "::" TO /::B$" (<(((( "::#)" "::QHB$">BB>2BB "::R:RB$"BB>"Q$Q$Q$" "::P >B$"BB>BB> "::BB$"BBBBB> "::DB$"^"Q$Q$"."Q$Q$"^ "::EB$"^"Q$Q$"."Q$Q$Q$" "::FB$"@@B< "::5T0B$"BB< "::6j:B$"^@0($$$ "::7DB$" TO QUIT" :"IF YOU MAKE A TYPING ERROR," "HIT 'C' TO CLEAR BEFORE HITTING RETURN."! ::"HOW M10:"V - VERY HARD" ,B$< 6B$"E"B$"H"B$"V"ī360\ @" I DO NOT UNDERSTAND ";B$v J:" TYPE E, H, OR V" TI11000:I ^210 h1890: DETERMINE PROBLEM r:: |" *** INSTRUCTIONS ***"::: " YOU WILL BE G "D - DIVIDE" A$$ ::J A$"A"A$"S"A$"M"A$"D"ī210j " I DO NOT UNDERSTAND ";A$ :" TYPE A, S, M, OR D" I13000:I 20 :: " CHOOSE:" 10:"E - EASY"  10:"H - HARDER"  "$ *** MATHEMATICS PRACTICE ***A INITIALIZE MUSIC MAKERL10000Y NUM%(3)e:::" *** MATH EXERCISE ***"(:2" CHOOSE:"<:10F"A - ADD"P:10Z"S - SUBTRACT"d:10n"M - MULTIPLY" x:10              ΠӠ͠͠ƍΠ̠٠ĠԮΠȠԠĠҮҠҠƠӮčŠΠŠΠǍΠҠӠҠ̠ƠӍŠӠՠŠԮŠϠһР͠ŠǠٮҠ̠Ӡ͠ԻΠҠРĠˠϠήԠٻǠ٠čǠƠ٠ȠԠčŠӠΠŠ̠ŠϠҠӠԍȠˮРȠȠōӠĠƠ̠͠РٍήԠӠȠҠРԠӍɠΠϠĠӻǠ̮ӠӠĠƍРĠŠӍРԍӠӠōӠΠ΍Ҡ͍ӍРĠĠӍΠΠ͠ЍРҍРōРˍؠĠ!!!!SP%0ı0019,11:19,12:19,13> 25,2719K A1424c. SL1(108SP%):SLmB 19,AzV 19,A14j 15~ 19,A3 19,A11 0 A 15 36,3819 22,2419 B"AND DISTANCE TO STOP CALCULATED."(L:"PRESS SPACEBAR WHEN READY";W*BLUE$]>rR PAVEMENT LINESzf15z11,3819C19:D2I1138CD,I:CD,III1CD,I:CD,III1CD,I:CD,IDD1IN A GREEN LIGHT"9v:"AND BE ASKED TO SET YOUR SPEED."_:"AFTER YOUR SPEED IS SET AND "~:"YOU ARE MOVING OUT, :"WHEN THE RED LIGHT COMES ON":"PRESS PADDLE BUTTON 0 TO STOP.":"YOUR REACTION TIME WILL BE MEASURED""::"GO AGAIN?";BLUE$2BLUE$"Y"310GBLUE$"N"1490M"n6"SO LONG - DRIVE CAREFULLY"tJz^rX1721Y59X,YYX:10&::"INSTRUCTIONS"N:b"YOU WILL BE GIVEINCLUDING BRAKING DISTANCE,"? :"YOU WOULD HAVE TRAVELLED:"g S%0.08267SP%22.520SP%37.82S%q D%S%w 2 FD%;" FEET ON DRY PAVEMENT." ZW%1.6D% n W%;" FEET ON WET PAVEMENT." I%3D% I%;" FEET ON ICY PAVEMENT."290 BTI0.0125 V:K j"* * * * * COMPUTER ANALYSIS * * * * *"S ~:w "* YOUR REACTION TIME WAS ---" :">>>>> ";T;" SECONDS." :"IN THAT TIME YOU WOULD HAVE TRAVELLED" S%1.47SP%T :S%;" FEET AT ";SP%;" MPH" :" *910- >:"SORRY - YOU JUMPED THE GUN."G R" TRY AGAIN."X fI11500:Ia z290p 11: REDz 1650 I1100 (16287)1271090 I "*** SORRY SLOW POKE - " " YOU DIDN'T MAKE IT!!!" " TRY AGAIN." .DLE 0 BUTTON WHEN SPEED IS SET.";- I150D (16287)127590K &IT :410] N255f b:7p v2130 "*** BE READY TO STOP ***" 11,1319 HOLD(1)(SPEED20)1 2250:2250 I1HOLD 2250 (16287)127830 I1770 :1 " LET'S GO!!!!!!!!!!!!!!!"B "I11000:IH 6N J^ ^12: GREENx r1650: DISPLAY LIGHT 255 21 SP%(0)2 "SET YOUR SPEED WITH PADDLE 0" "* * * SPEED = ";::SP%;::" MILES PER HOUR"! "PRESS PAD  - "STOP" 1- - REACTION TIME PROGRAM K2 - BY AARON GRIFFITHSF:ZZ5n" * * * REACTION TIME TEST * * * ":" BY AARON GRIFFITH"::" WOULD YOU LIKE INSTRUCTIONS?";BLUE$ BLUE$"N"!! ! ! ! ! !!!!hๅ ɣ LLL L$ "   ' L       (222)     """" ^22JLNRTVXZ\^`bbfhjlnprtvxz|~r H h B d (6 (6 V6 V6~< "$&(*.02468:<@BDFHC,0:I,X1:;TX1X39:I18:Y(YA)YP(I)X1C,0:I,X1:Q(((( "::T B$" BBBB< "::U6B$" BB44( "::VLB$" BJJJ4 "::WbB$" B4(4B "::XB$" BBB"(92)"B< "::YB$" ^0($^ "::Z":(NA),:(NA)6B$"^&&&&&^ "::]@B$" (4B ":: JX1X39:I18:Y(YA)YP(I)X1xB$" 0 0002&"::J.B$Q$"B2*.2B "::KDB$",(((((< "::LZB$" 5JJJJ "::MpB$" :DDDD "::NB$" "Q$Q$::PB$" "::S B$"((BBBB "::HnB$" ( (((( "::I:5B$"BB< "::63B$"^@0($$$ "::7IB$"@@B< ":ƠōΠӍƠΠՍč"