' +JJJJ ?\>m0M='+l> /+l  H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō 鷎귭෍ᷩ췩緈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)*++`NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./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(#*!!.<,$94>94="4; +,E!r ; $ Hh Լ ռ ռ ռ`HJ>݌h Hh݌`DF DF /L\HIHHHHhHH݌hHhHh݌H6 VDP (FD Z $0x8x D- ܸDD#LHH`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  LӜsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\ IOÌȌ`W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( 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̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl^\8  ş Lȟ`fhjõĵ@OAP`u@`@&`QR`F Ls  @DAF@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@ ,\Z[PRN,XɄOɊRQF(0Bhhhw4h/ ^0(p ߩRP1Q ɿ, P\L˵B̵C8pB߮Z\  յյ\BIR Z-^ Jp\IZLL- (  Ϡ-@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B ߼ / ]ƴS0Jȴ ȴ)  紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8` ܫ 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˵̵ֵ׵`LzĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` Bl şL/Ơĵµ`ڿ8.ڿ.ۿ`êL`õĵ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 x(`  d£àĠz# u` ҭ̠̠ԍӠӠҍҭԠРԍӠӠҍԭ̠ԍӠӠҍҭ̠àԍӠӠҍ̠ǠԍӠӠҍҭ̠̠ԍӠӠҍҍ̠ǠԍӠӠҍҍ ԭ̠ԍӠӠҍҍ z#??      ЮӠԠϠҠҮԠ̠Ԯ̠ҮԠĮԠ% ~68I::9:15:%INP$"">VS(106)256(105)_VS2,240:VS3,14:VS4,150169,3,160,9,32,217,3,96,0,1,96,1,0,17,15,251,183,0,150,0,0,1,0,254,96,1I768793 X:I,X I BL$"" I140 BL$BL$(160):I v(A$,1)"B"1245w(A$,4)"LOCK"L$(JPLK)"*"Xx(A$,4)"UNLO"L$(JPLK)" "y(A$,4)"DELE"N$(JPLK)"1":FF(S$(JPLK)):66z(A$,4)"RENA"N$(JPLK)(R$,30){68|K6PP1:PL%P1}K7PP1:P1PL%~68I"OR ANY OTHER KEY TO CANCEL.";2oR$:R$"D"76ep(A$"RUN"A$"LOAD")T$(JPLK)"B"A$"B"A$~qA$A$" "N$(JPLK)r19:1:958s(A$,4)"RENA"ĺA$:20:8:(R$,30):A$A$","(R$,30)t(A$,4)"RENA"ĺA$uD$;A$;",S";S;",D";DINVALID NAME";::101gR$""/hI1(RR$)QiR$R$(((RR$,I,1))128):IkjR$R$(BL$,30(R$))kZ1L%PL:N$(Z)R$Ģ20:1:868::B$;"DUPLICATE NAME";::101lZmA$"DELETE"112n19:1:868:"PRESS 'D' TO DELETE FILE ";K$:"Ģ19:1:868::B$;"FILE ";K$;" IS TEXT"::80c(A$"DELETE"A$"RENAME")L$(JPLK)"*"Ģ19:1:868::B$;"FILE ";K$;" LOCKED"::80dA$"RENAME"109e19:1:868:"RENAME ";K$;:RR$:RR$""76f(RR$)65(RR$)90Ģ20:1:868::B$;"TTER' YOU WISH TO ";'YK1A$"LOAD":ZK2A$"LOCK"O[K3A$"UNLOCK"f\K4A$"DELETE":{]K5A$"RENAME"^A$;::K$:K(K$)48_K17K3176`KK16:(JPLK)C76aN$(JPLK)"1"760b(A$"RUN"A$"LOAD")T$(JPLK)"T958MA$"RUN":19:1MNM1$:"---------------------------------------"aOM2$:M3$:M4$;gPwQK(16384)RK12881S16368,0:19:1:958TK$(K):KK176:K0K995UK0Ģ23:VK6K7124WK8K926X"PRESS 'LE FI1PLG(JPLI)C76_HN$(JPLI)"1"ĺ11);"-=";(TI);"=- ";::"DELETED FILE":IN$(JPLI)"1"ĺL$(JPLI);" :";S$(JPLI);":";T$(JPLI);": -=";(TI);"=- ";N$(JPLI)JIK"---------------------------------------"L19:1:L%PLL%L%1?V$((VOL))7@(V$)1V$"00"V$NA(V$)2V$"0"V$nBF$(F):(F$)1F$"00"F$C(F$)2F$"0"F$D:"SL:";S;" DR:";D;" VOL:";V$;" FREE:";F$;" PAGE";P;" OF ";L%:JP1E"---------------------------------------"2S$(C)(Z)- 3(S$(C))1S$(C)"00"S$(C)M 4(S$(C))2S$(C)"0"S$(C)d 5Z(Y2):L$(C)" " 6Z4L$(C)"*":ZZ128 7Z0T$(C)"T" 8Z1T$(C)"I" 9Z2T$(C)"A" :Z4T$(C)"B" ;N$(C)(INP$,ZZ,23) <Y =X>L%CPL:C"PRESS RETURN OR ENTER DRIVE #";:I$:I$(13)41V &I$"1"I$"2"Ģ5:1:958:36f 'I$:D(I$)p (CD,D )X1511 *SEC,X:768 +ZZ34 ,YF1F735 -ZZZZ35 .Z(Y33):Z062 /CC1 0(Y)255N$(C)"1":60 1FFZ DISK IN SLOT:";S;", DRIVE:";D:"AND PRESS RETURN.";:R$:41V "CURRENT SLOT IS ";S "PRESS RETURN OR ENTER SLOT #";:I$:I$(13)ĺ:36 !I$"0"I$"7"Ģ3:1:28 "I$:S(I$) #OS,(CS):OD,(CD):CS,S16 $:"CURRENT DRIVE IS ";D1 %D 4=DELETE 7=PAGE BACK"N M3$"2=LOCK 5=RENAME 8=NEW DISK" M4$"3=UNLOCK 6=PAGE AHEAD 9=RESET DRIVE" S(18455)16:D(18454):K0 CS,S16:CD,D TRK,17 F496:P1:C0 K041 ::5< K8ĺ"INSERT NEWN$(105),S$(105),T$(105),L$(105)4 D$(4):B$(7)K IOB777:T64:PL15g RB27136: READ BUFFER CSIOB1:CDIOB2:TRKIOB4:SECIOB5 VOLIOB14:OSIOB15:ODIOB16:F1RB11:F7RB221 M1$"TYPE 'LETTER' TO RUN, OR 0=EXIT" M2$"1=LOA 2::9:15:%INP$"">VS(106)256(105)_VS2,240:VS3,14:VS4,150169,3,160,9,32,217,3,96,0,1,96,1,0,17,15,251,183,0,150,0,0,1,0,254,96,1I768793 X:I,X I BL$"" I140 BL$BL$(160):I      ҭԠРԍӠӠҍԭ̠ԍӠӠҍҭ̠àԍӠӠҍ̠ǠԍӠӠҍ `0 @`ҭ̠̠ԍӠӠҍ  0 @`ҭԠРԍӠӠҍԭ̠ԍӠӠҍҭ̠àԍӠӠҍ̠ǠԍӠӠҍA154545:ҭ̠̠ԍӠӠҍFA11000>"XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"DCA07A&B02795B,0B,191;AA:A(A$);::"YOU HAVE ENTERED ";A;" IS THIS CORRECT?"MA$:A$"Y"lTN$" ASL COUNTING TEST"vOT27NTA1700''A768850:(A);", ";:A:ȯ 768,21,169,0,133,253,133,254,133,255,230,253,208,252,230,254,208,248(p"STARTING THE HGR-FILL ASL TEST"Uz:"THIS TEST TAKES 27 SECONDS ON A //E"{"PRESS THE TO BEGIN"A$A:B:CAAB:D:A,D"STARTING"768(7);"FINISHED!"::"HOW MANY SECONDS DID THAT TAKE?"A$CAAB:D:A,D "STARTING")768?(7);"FINISHED!"j::"HOW MANY SECONDS DID THAT TAKE?"zA$:A(A$)::"YOU HAVE ENTERED ";A;" IS THIS CORRECT?"A$:A$"Y" TN$" ASL COUNTING TEST"OT134NTA(17002TERED ";A;" IS THIS CORRECT?"/A$:A$"Y"P"TN$" HGR-FILL BASIC TEST"Z,OT56c6NTAm@1700sJ"STARTING THE ASL COUNTING TEST":"THIS TEST TAKES 134 SECONDS ON A //E""PRESS THE TO BEGIN"A$A:B:TAKES 56 SECONDS ON A //E"@"PRESS THE TO BEGIN"HA$_24:"STARTING!":jA07qA~B0279B,0B,191(7);"FINISHED!"::"HOW MANY SECONDS DID THAT TAKE?"A$:A(A$)::"YOU HAVE ENHOW MANY SECONDS DID THAT TAKE?"0 A$:A(A$)c& ::"YOU HAVE ENTERED ";A;" IS THIS CORRECT?"0 A$:A$"Y"A$"y"ī3090: TN$" TEXT-SCROLL TEST"D OT41.5N NTAX 1700b "STARTING THE HGR-FILL BASIC TEST":"THIS TEST 700  . "STARTING THE TEXT-SCROLL TEST"] :"THIS TEST TAKES 41.5 SECONDS ON A //E" "PRESS THE TO BEGIN" A$ "STARTING!" A11000 "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"  (7);"FINISHED!"  ::":"STARTING!"!A154545:7 (7);"FINISHED!"b::"HOW MANY SECONDS DID THAT TAKE?"r A$:A(A$)*::"YOU HAVE TYPED ";A;" IS THIS CORRECT?"4A$>A$"Y"A$"y"ī2070TN$" FOR-NEXT LOOP TEST"OT60NTA1o(4);"OPEN";F$+p"CHR$(5);"CLOSE";F$1qEv(4);"OPEN";F$K_(4);"WRITE;F$ez(4);"CLOSE";F$"STARTING THE FOR-NEXT TEST":"THIS TEST TAKES 60 SECONDS ON A //E""PRESS THE TO BEGIN"A$RE$(OTNT)- RE$RE$" ":RE$(RE$,4)N A$" ";NT;" SECONDS"u B$" ";RE$;" TIMES FASTER" TR$(A$,15)(B$,25) 1910:1920 :TN$:TR$ 1930  l(4);"OPEN";F$ m(4);"CLOSE";F$ n(4);"DELETE";F$LEASE PICK A VALID DOS 3.3 FILENAME", F$^ :"YOU HAVE ENTERED ";F$;" IS THIS CORRECT?"f A$ A$"Y"A$"y"ī1000 $1900 .:::"STARTING TESTS." 8Z15 B LA2000,3000,4000,5000,6000 V j"TESTING FINISHED"  "RESULTS WILL BE RECORDED ON DISK"N "WITH THE NUMBER OF SECONDS EACH TEST"y "TOOK AND A NUMBER RELATIVE TO A //E" "PERFORMING THE SAME TEST." :"PRESS ANY KEY TO CONTINUE" A$ 10 "WHAT DO YOU WISH TO CALL THIS TEST?"$ "PEQUIREMENT IS THAT THE MACHINE"I "SUPPORTS HIGH RESOLUTION GRAPHICS."r "AS MANY OF THE MACHINES THAT THIS" "PROGRAM WILL BE RUN ON DO NOT SUPPORT" "AN INTERNAL CLOCK, IT WILL BE UP TO YOU" "TO TIME THE TESTS WITH A STOPWATCH"" :INSTRUCTIONS"; Z"THIS PROGRAM WILL RUN THROUGH A SERIES"h d"OF BASIC AND ASSEMBLEY LANGUAGE TESTS" n"TO SEE HOW FAST YOUR COMPUTER OR" x"EMULATOR IS." :"THIS PROGRAM WILL RUN IN DOS 3.3 ON A" "40 COLUMN APPLE ][+. THE ONLY" "R NOMCIO# (4)"NOMONC,I,O",255T"WELCOME TO THE SPEED TESTER V1.0"(:"PRESS B TO BEGIN, Q TO QUIT, OR ANY"2"OTHER KEY TO READ THE INSTRUCTIONS."<A$AA$"q"A$"Q"ĀFA$"b"A$"B"ī1000 P:::"INTRODUCTION AND      ,230,255,208,244,96ү 768,38,169,0,133,253,133,254,169,32,133,255,165,253,160,0,145,254,200,192,0,208,249,230,255,166,255,224,64,208,241,230,253,166,253,224,0,208,225,96A$AA$"q"A$"Q"ĀFA$"b"A$"B"ī1000 P:::"INTRODUCTION AND E ENTERED ";A;" IS THIS CORRECT?"3A$:A$"Y"RTN$" ASL COUNTING TEST"\OT27eNTAo1700u{''A768850:(A);", ";:A:ȯ 768,21,169,0,133,253,133,254,133,255,230,253,208,252,230,254,208,248,230,255,208,244,96ү FILL ASL TEST";z:"THIS TEST TAKES 27 SECONDS ON A //E"a"PRESS THE TO BEGIN"iA$A:B:CAAB:D:A,D"STARTING"768(7);"FINISHED!"::"HOW MANY SECONDS DID THAT TAKE?"A$:A(A$)!::"YOU HAVRTING"768%(7);"FINISHED!"P::"HOW MANY SECONDS DID THAT TAKE?"`A$:A(A$)::"YOU HAVE ENTERED ";A;" IS THIS CORRECT?"A$:A$"Y" TN$" ASL COUNTING TEST"OT134NTA(17002p"STARTING THE HGR-T?"A$:A$"Y"6"TN$" HGR-FILL BASIC TEST"@,OT56I6NTAS@1700YJ"STARTING THE ASL COUNTING TEST":"THIS TEST TAKES 134 SECONDS ON A //E""PRESS THE TO BEGIN"A$A:B:CAAB:D:A,D"STA&"PRESS THE TO BEGIN".A$E24:"STARTING!":PA07WAdB0279sB,0B,191y(7);"FINISHED!"::"HOW MANY SECONDS DID THAT TAKE?"A$:A(A$)::"YOU HAVE ENTERED ";A;" IS THIS CORRECTAKE?" A$:A(A$)I& ::"YOU HAVE ENTERED ";A;" IS THIS CORRECT?"h0 A$:A$"Y"A$"y"ī3090: TN$" TEXT-SCROLL TEST"D OT41.5N NTAX 1700b "STARTING THE HGR-FILL BASIC TEST":"THIS TEST TAKES 56 SECONDS ON A //E"HE TEXT-SCROLL TEST"C :"THIS TEST TAKES 41.5 SECONDS ON A //E"i "PRESS THE TO BEGIN"q A$ "STARTING!" A11000 "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"  (7);"FINISHED!" ::"HOW MANY SECONDS DID THAT 54545: (7);"FINISHED!"H::"HOW MANY SECONDS DID THAT TAKE?"X A$:A(A$)*::"YOU HAVE TYPED ";A;" IS THIS CORRECT?"4A$>A$"Y"A$"y"ī2070TN$" FOR-NEXT LOOP TEST"OT60NTA1700  "STARTING THR$(5);"CLOSE";F$q+v(4);"OPEN";F$1E(4);"WRITE;F$K`(4);"CLOSE";F$f"STARTING THE FOR-NEXT TEST":"THIS TEST TAKES 60 SECONDS ON A //E""PRESS THE TO BEGIN"A$:"STARTING!"A1" ":RE$(RE$,4)4 A$" ";NT;" SECONDS"[ B$" ";RE$;" TIMES FASTER"u TR$(A$,15)(B$,25) 1910:1920 :TN$:TR$ 1930  l(4);"OPEN";F$ m(4);"CLOSE";F$ n(4);"DELETE";F$ o(4);"OPEN";F$p"C FILENAME" F$D :"YOU HAVE ENTERED ";F$;" IS THIS CORRECT?"L A$g A$"Y"A$"y"ī1000q $1900 .:::"STARTING TESTS." 8Z15 B LA2000,3000,4000,5000,6000 V j"TESTING FINISHED"  RE$(OTNT) RE$RE$ON DISK"4 "WITH THE NUMBER OF SECONDS EACH TEST"_ "TOOK AND A NUMBER RELATIVE TO A //E" "PERFORMING THE SAME TEST." :"PRESS ANY KEY TO CONTINUE" A$ 10 "WHAT DO YOU WISH TO CALL THIS TEST?" "PLEASE PICK A VALID DOS 3.3HINE"/ "SUPPORTS HIGH RESOLUTION GRAPHICS."X "AS MANY OF THE MACHINES THAT THIS" "PROGRAM WILL BE RUN ON DO NOT SUPPORT" "AN INTERNAL CLOCK, IT WILL BE UP TO YOU" "TO TIME THE TESTS WITH A STOPWATCH" :"RESULTS WILL BE RECORDED ROGRAM WILL RUN THROUGH A SERIES"N d"OF BASIC AND ASSEMBLEY LANGUAGE TESTS"v n"TO SEE HOW FAST YOUR COMPUTER OR" x"EMULATOR IS." :"THIS PROGRAM WILL RUN IN DOS 3.3 ON A" "40 COLUMN APPLE ][+. THE ONLY" "REQUIREMENT IS THAT THE MAC  :255:"WELCOME TO THE SPEED TESTER V1.0"g(:"PRESS B TO BEGIN, Q TO QUIT, OR ANY"2"OTHER KEY TO READ THE INSTRUCTIONS."<A$AA$"q"A$"Q"ĀFA$"b"A$"B"ī1000P:::"INTRODUCTION AND INSTRUCTIONS"! Z"THIS P     768,38,169,0,133,253,133,254,169,32,133,255,165,253,160,0,145,254,200,192,0,208,249,230,255,166,255,224,64,208,241,230,253,166,253,224,0,208,225,96AA$AA$"q"A$"Q"ĀFA$"b"A$"B"ī1000P:::"INTRODUCTION AND INSTRUCTIONS"! Z"THIS PCONDS DID THAT TAKE?"%A$:A(A$)X::"YOU HAVE ENTERED ";A;" IS THIS CORRECT?"vA$:A$"Y"A$"y"6090TN$" HGR-FILL ASL TEST"OT27NTA1700''A768850:(A);", ";:A:<ȯ 768,21,169,0,133,253,133,25 (170025p"STARTING THE HGR-FILL ASL TEST"bz:"THIS TEST TAKES 27 SECONDS ON A //E""PRESS THE TO BEGIN"A$A:B:C1B:D:AC1,D:"STARTING"768(7);"FINISHED!"::"HOW MANY SE1B:D:AC1,D:!"STARTING"*768@(7);"FINISHED!"k::"HOW MANY SECONDS DID THAT TAKE?"{A$:A(A$)::"YOU HAVE ENTERED ";A;" IS THIS CORRECT?"A$:A$"Y"A$"y"5090 TN$" ASL COUNTING TEST"OT134NTATHIS CORRECT?",A$:A$"Y"A$"y"4090M"TN$" HGR-FILL BASIC TEST"W,OT56`6NTAj@1700pJ"STARTING THE ASL COUNTING TEST":"THIS TEST TAKES 134 SECONDS ON A //E""PRESS THE TO BEGIN"A$A:B:C //E"+"PRESS THE TO BEGIN"3A$J24:"STARTING!":UA07\AiB0279xB,0B,191~(7);"FINISHED!"::"HOW MANY SECONDS DID THAT TAKE?"A$:A(A$)::"YOU HAVE ENTERED ";A;" IS THAT TAKE?" A$:A(A$)N& ::"YOU HAVE ENTERED ";A;" IS THIS CORRECT?"m0 A$:A$"Y"A$"y"ī3090: TN$" TEXT-SCROLL TEST"D OT41.5N NTAX 1700b "STARTING THE HGR-FILL BASIC TEST":"THIS TEST TAKES 56 SECONDS ON AING THE TEXT-SCROLL TEST"H :"THIS TEST TAKES 41.5 SECONDS ON A //E"n "PRESS THE TO BEGIN"v A$ "STARTING!" A11000 "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"  (7);"FINISHED!"  ::"HOW MANY SECONDS DID A154545:" (7);"FINISHED!"M::"HOW MANY SECONDS DID THAT TAKE?"] A$:A(A$)*::"YOU HAVE TYPED ";A;" IS THIS CORRECT?"4A$>A$"Y"A$"y"ī2070TN$" FOR-NEXT LOOP TEST"OT60NTA1700  "STARTpD$;"CLOSE ";F$q1vD$:D$;"APPEND ";F$7KD$;"WRITE ";F$QeD$;"CLOSE ";F$k"STARTING THE FOR-NEXT TEST":"THIS TEST TAKES 60 SECONDS ON A //E""PRESS THE TO BEGIN"A$:"STARTING!" RE$" ":RE$(RE$,4); A$" "(NT)" SECONDS"b B$" "RE$" TIMES FASTER"| TR$(A$,15)(B$,25) 1910:1920 :TN$:TR$ 1930  lD$:D$"OPEN ";F$ mD$;"CLOSE ";F$ nD$;"DELETE ";F$ oD$;"OPEN ";F$+ "PLEASE PICK A VALID DOS 3.3 FILENAME"3 F$e :"YOU HAVE ENTERED ";F$;" IS THIS CORRECT?"m A$ A$"Y"A$"y"ī1000 $1900 8Z15 B LZ2000,3000,4000,5000,6000 V j"TESTING FINISHED"  RE$(OTNT) RE$:"RESULTS WILL BE RECORDED ON DISK"Q "WITH THE NUMBER OF SECONDS EACH TEST"| "TOOK AND A NUMBER RELATIVE TO A //E" "PERFORMING THE SAME TEST." :"PRESS ANY KEY TO CONTINUE" A$ 10 ::"WHAT DO YOU WISH TO CALL THIS TEST?""REQUIREMENT IS THAT THE MACHINE"L "SUPPORTS HIGH RESOLUTION GRAPHICS."u "AS MANY OF THE MACHINES THAT THIS" "PROGRAM WILL BE RUN ON DO NOT SUPPORT" "AN INTERNAL CLOCK, IT WILL BE UP TO YOU" "TO TIME THE TESTS WITH A STOPWATCH"% ND INSTRUCTIONS"> Z"THIS PROGRAM WILL RUN THROUGH A SERIES"k d"OF BASIC AND ASSEMBLEY LANGUAGE TESTS" n"TO SEE HOW FAST YOUR COMPUTER OR" x"EMULATOR IS." :"THIS PROGRAM WILL RUN IN DOS 3.3 ON A" "40 COLUMN APPLE ][+. THE ONLY""  D$(4)" D$"NOMON C,I,O"/255::W"WELCOME TO THE SPEED TESTER V1.0"(:"PRESS B TO BEGIN, Q TO QUIT, OR ANY"2"OTHER KEY TO READ THE INSTRUCTIONS."<A$AA$"q"A$"Q"ĀFA$"b"A$"B"ī1000 P:::"INTRODUCTION A     4,133,255,230,253,208,252,230,254,208,248,230,255,208,244,96ү 768,38,169,0,133,253,133,254,169,32,133,255,165,253,160,0,145,254,200,192,0,208,249,230,255,166,255,224,64,208,241,230,253,166,253,224,0,208,225,96"B"ī1000 P:::"INTRODUCTION A