' +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 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_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`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- ( 0 Ϡ@跻~!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 ~(` i d ֠z# u`gwpp8 Bp|p@l\0p|| @ 3 @oy`8`~y@~xdpfFxp@ppp`w@ 608@88`=@08}ōҍ΍ō̍΍ҍ΍ōōٍ͍΍ōɍԍ΍ԍōԍԍՍӍҍԍԍҍōԍٍōٍ̍΍̍ō΍ōԍȍˍōǍō΍ǍЍҍԍčԍԍԍԍҍҍ΍ōٍԍ̍̍Í΍΍ٍčōōԍ̍΍΍ōōčҍ׍č΍ٍҍٍ͍΍čōٍ̍ԍӍԍōӍٍ׍čōÍˍҍ͍ōÍǍč΍΍ȍōȍҍōǍōō͍Ǎˍٍō̍ōӍō΍ԍ̍ōǍōԍԍӍԍčōōҍ΍ҍōԍčҍ΍ˍōōԍӍˍōƍōٍ΍ˍ̍ҍӍō΍ҍЍҍ΍ōō̍ԍȍ΍ōٍٍōԍ΍ˍԍҍԍōˍƍōԍ΍čȍٍӍčӍ΍͍׍ҍōˍٍ͍΍΍ҍ΍ōō̍ҍƍčٍˍ΍ٍҍōԍԍٍҍҍōōōԍԍōҍҍčԍōō΍ččˍҍ΍ҍԍĠԍč΍؍ԍ΍ԍҍԍҍ΍Ѝҍč΍ōčЍύӍōōčԍōҍ͍ҍԍȍō΍ōÍōȍƍōԍ΍͍̍Ѝčōҍōƍ̍ōӍԍččōō׍ҍЍǍ͍ˍ΍ٍˍȍЍ΍΍΍ҍԍˍ΍̍ōЍҍ̍Ӎٍˍҍ̍ōˍԍҍҍԍōҍōōȍōЍԍٍ΍ҍҍǍҍč̍ōٍ͍̍΍ԍҍЍōɵٍٍ ߅ ei` 꺽  ' 8 uvL׊i , {$8$0`LԦƹƸ$HH `ީ 8ϐ*IEʼna Lݦ,{iweLi^ e^hٲаg jH hV_F*ƹƸٲаHٹ $P )0 Z ۆ $1$P 膸 ": ,i = {LrH0h J c ,Lqۥ 3 LۥL Ȫ*ȱ_ȱ{ȱȅ| L+ܥLSؠߠL:`?EXTRA IGNORED ?REENTER I`$ !i)$ )L(ʊ$ L W 檠^ \ LD۩ ,? ɠ )H h`0{|uvLh$L :ۥyz` @ `" ީ; =L Z , ,խLc ZL,զ}~, ߅ ,h`PQ/ Q^ԥP &^ &^ePP^eQQP&QPe PQ L ߅ ޥHH {h* mh r ȥ`L'hpoj iLڠ 㥌 婝 5ȱȱ` = $)94,;D {$0 4 Lک \`gh<=ij>?`v(Le lL5٩ ӥHHvHuHH >L ٥vQ 8egh ֐` eӚɰ ,ZLLhhB;uhvhh ٘e`:,  "hhh` { ɫ ޥ L>L( HɰɫЉơhL*$v# \ۦuv $ W (Lb-逐@ HHLLF:L8gh}~`Ƀ` Sբ$L? ׅLԱJHȱJh`LNפ0`L,׈L20`LF׈LL ׅJF8ȹe8ИL`Lø{{ttmnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# ! ֥ h ߦ>  E֥ E & > ` E  E  H ֥ hL  ֥ -L L -EF# =Pi  ֤Lְ ׅ! ׅ  ׅ/ ) ) "&6 B /`TLՆ8M˕  Tբ , Tզ`  . $ ; E.. 4L& >H 34 Lh856!;<79)F:&8J9j*0v 婭   +<; LhLk'cg=%;!,<+k,w(gG gG]$ t < N8i| (|`ܠLդ4ɪ 4<`<  H h .Ю#` L}Э%J u ӊH Өh dѮ#` L Q ;Ү#` Q Ү#`#2 Ӎ'( H() 91 eȱm)h`JJ`#JȱJLh `#  <(eΨ=)eϰ%Hh>?iJK̅  #`Lk')*& "'JJ) ""% m% ʥ0)J!m%! `JJJJS)фPIȄR%*QTU'T8ePT UeRU QJJJ`JJJJS)фPIȄR%*QTU'T8ePT UeRU QJJJ` Ӎ$"&,i8i#H&ii&hif&i'`'i,&i,.&iPII&&if&H !"hH8 H!S hIiHSQUhPTh !"IiR"fS8PQ% 8TeRTUU&E%0Q&&kS TePTUeQPفŴxaI1& &WSP& )`" !H)&JJ&&h' &' &' f&') &'#i%Ѕ0J$)` .ХQ&%0Q&&`$0JI0`'0% I`0 I0ܩ(ߠQ)'%01&*%0Q)&E%0*Q&&QeS)j00',"SCORE:";:30:"SPEED:"L50,63:24:2:"*** LIT'L RED BUG ***";:50,255X4K039k>FIELD:0,39KHBUSH:K(K2)2č(40(1)),KRROAD:16K8,24K8K\K 936:10::"THE OBJECT OF THIS GAME IS TO DRIVE YOUR"! "LITTLE_ %(4);"BLOAD LOGO,A$4000"0X(0)<D$(4)D(D$W2D$;"RUN MENU"]c U84)13(16384)27820<>(16384)27ĺ(4);"RUN MENU"TR38144,127:38145,0b2050:60n:93610:10:"*** LIT'L RED BUG ***":19:"BY":15:"BISH BOBHOP"K11500:K3000:16298,0 22:" TIME:";:15:T0T15000T0T19000ĺ"ABOUT AVERAGE."Q T0T19000T0T22000ĺ"VERY GOOD!"n T0T22000ĺ"EXCELLENT!" T0T20000Č37120 K11000:K *20:"PUSH 'RETURN' KEY TO PLAY AGAIN OR":"PUSH 'ESC' KEY FOR A DIFFERENT GAME"416368,0:(163T);" ";:37:(N90SPD)' XTIMEO1006 :936:5Q 12:"---GAME OVER---"| 12:" YOUR SCORE OF ";(T0T);" IS "; T0T10000750 "TERRIBLE!"::T0T5000ĺ"(YOU SHOULD BE ASHAMED OF YOU SELF!)" T0T10000T0T15000ĺ"PRETTY BAD!") C1))DR(C3(C1)C1)+ LC1DLC1:430= LN33DLC1R RC1DRC1:450d RN33DRC1v LLDL:RRDR SPD(N255(P1))C5 KOSPDC5: T0TT0TC60SPD BACKFIELD1 Z(CZ):Z(CZ) &22:9:(TIMEN6);" ";:22:(T0zD(X$)0STRT(X$):17550s5D17370:STRT0İ17680:X$" NOT FOUND"::"PRESS ANY KEY TO CONTINUE":17450:174805D17680:" - NO CHANGE":"! - ENDS EDIT":"OTHER ENTRIES CHANGE WORD":CV:8686DJSTRT(STRT6.01)6:"WORD ";STRT;": ";:IF|!p`@ x@~#@~!0@p`lXpG?#@~'8G@~c?`}w?@_gx/@~'p@8`?pO@~!@@<~phOX>"@@N@`0|@!_p@~!pw@~ @~!|\|!p@px}@~#@~#p`p`0LLxpqG?!@l!xG@>!`p@:&`x/@>'8`3po@~!@@x~}hOL"@\? p@!_x@~!0p@~ @!pp~!pppxy@~#@~#p p `0L1x2xp{C?!ōҍȍō̍΍ԍōԍƍԍٍōčǍ׍ҍōٍԍԍ̍čōٍčōٍōԍˍčōÍčō΍ƍƍٍččҍύōÍN:Z(CZ):Z(CZ):CR:PSCPS(P0):TIMETIMEC1:YTIMETWC3:XPSS5:BACKX,Y):CAR:YC1,YX ,FIELD:O,C9C1:O,C9O:BUSH:C40(C1),C1:ROAD:L,LN4C1:R,RN4C1:L,LN4O:R,RN4O:Z(CZ):Z(CZ) (C5(C1))DL(C3(C1)C1) (C5(4 (2000* <T0T0:TIME425:YTIME123H FPS1500:XPS75:BACKROAD` PL16:DL0:R20:DR0 ZC11:CZ16336:CPS11.76:P038144:C33:TW12:S575:O0:C939:CR38146:C4040:N44:C55:P138145:N3333:N255255:C6060:N66:N9090^ dBACK:YC1,YX:DOWōٍӍōǍ΍č΍ˍ׍ˍčōٍҍٍӍ̍čٍčٍ͍ōӍ΍ٍٍ΍ōˍҍ΍čǍ΍ٍčōōčٍčٍٍ΍ٍčٍǍٍ΍ӍӍ̍ԍӍҍččǍččҍӍӍӍԍٍ΍ȍčٍٍ׍ōٍčӍٍԍӍōҍҍčԍ؍ٍōٍٍƍԍԍٍٍōԍǍٍčǍčٍٍǍǍٍǍٍҍōٍōčōčٍٍҍٍԍǍǍƍЍٍٍčٍ΍čӍҍčҍٍٍԍˍٍōˍٍӍԍ΍ٍٍٍӍōٍٍčٍǍčԍčٍˍԍˍӍӍӍčٍٍ̍ō̍čٍٍٍčٍǍčٍٍٍҍčӍ׍ÍǍԍǍԍōԍōčٍЍҍ΍ٍԍčٍύōčԍǍԍӍЍٍƍȍǍōӍԍˍٍٍˍčٍǍٍ׍Ѝԍ΍ō΍ҍčٍ΍ԍٍōōٍčٍӍٍٍ΍ٍōٍō׍͍ԍٍٍٍٍōٍҍٍōǍčٍč̍΍΍ԍōٍōōٍԍˍƍǍōčōōٍҍٍ̍׍ōٍ΍ٍ͍ˍٍҍ׍ٍˍٍӍō΍ҍ΍ٍٍٍٍ̍ҍčōԍōٍˍčǍ׍Ѝ΍ōύčˍ̍ԍčҍōٍȍ΍ȍōԍčˍԍٍōˍٍٍٍٍ΍͍ō׍ٍҍҍōҍ΍ˍčЍٍٍҍčԍЍÍčԍčččٍԍ͍ōٍōҍٍԍ̍ōō̍č΍̍ЍٍٍٍҍǍٍč΍ٍԍ   0);"PRE";24);"PST";30);"1";34);"2";38);"3+"E):I139:"=";::P):15500\):16100d);X0);D$"OPEN"QPT$:D$"READ"QPT$);15600:15630).;XX1:X1115130)3;18:"PRESS ANY KEY TO CONTINUE")8;(16384)12815160*B;16368,0:X0::. STORE RESULTS(&.D$(4): CTRL-D4&.12100W&.D$"APPEND"QNM$:D$"WRITE"QNM$m&/QDT$:A$:B$:C$& /I132:B$(I,1)"N/A"B$(I,1)(B$(I,1),(B$(I,1))1)&/B$(I,1):&/B(2,5):B(2,6):B(2,7)&0/D$"CLOSE"&:/19000:17&D/190003)U:E(3)0E(4)0ī11035-%M+UE(3)ī11035@%N+C$"4"ī11092i%O+E(4)0E(4)U:E(4)0E(5)0ī11035|%P+UE(4)ī11035%Q+C$"5"ī11094%R+E(3)U%S+11095%T+E(4)U%U+11095%V+E(5)U%W+ZZ1%\+NXE(Z)ī11095%a+NXE(Z)NXZ%f+&A'p>8 @? @3xpOO~# @~ 0@x@@<xc1;`Gn#@^/p@v"|@|"pg?`h?@~&|<`CpG@| 0@|Cs?~hO@n#p?x`|@|a@!|@p@~ @~!x?C~ p@p 0p@~#@^!0@ 8p`|LC ~G#@~'x_@v"x}@'p?h?@~%x{@8`pG@~!`@^?~|hOp^#p@~p`8@!@~!p@~ @~!`81745044D16368,0:&4>DCV(37)14HD17680:"ENTER WORD OR WORD NUMBER":" WILL BEGIN EDITING AT 1":"'!' WILL RETURN TO MENU4RDCV:868:"START EDITING AT :";X$:177004\DX$"!"ĢCV:176204fDX$""STRT1:175504pD(X$)N1749051Ğ)3CFS$((I6.011),I(I6.01)6):/3C>3CMIDSEARCHW3CJN2:KJ:I0:17420a3CKJI3CX$FS$((K6.011),K(K6.01)6)174403DKJI:K0174403 DX$FS$((K6.011),K(K6.01)6)174403DII1:173903 DSTRTK:4*D(16384)1202bCISTRTN(2lCI;5);:JJ1:1736272vCJ6ĺ:J0[2C(16384)127Ĺ16368,0:17310c2C:}2CCV(37):17690:CV:2C(16384)13ĺ::173002C(16384)128173202C(16384)160173602C16368,02C(16384)13173102C3CJND"::"PRESS ANY KEY TO CONTINUE":17450:171501DC17680:"SPACE BAR LISTS SINGLE WORDS":" ENDS LISTING":"OTHER KEYS START/STOP LISTING":CV:8681NCJSTRT(STRT6.01)6:STRT;5);:ISTRT:17362:17320:STRTSTRT1:J6ĺ2XCSTRTNĺ:1730 OR WORD NUMBER":" WILL BEGIN LISTING AT 1":"'!' WILL RETURN TO MENU|0CCV:868:"START LISTING AT :";X$:177000CX$"!"173000CX$""STRT1:172200&C(X$)N1716000C(X$)0STRT(X$):1722001:C17370:STRT0İ17680:X$" NOT FOU|B17690(/B868:"CHOOSE FUNCTION :";4/BX$:C0D/BX$"L"C1T/BX$"E"C2d/BX$"S"C3y/BX$"Q"ĉ::771/BC017040/B1:958:CV(37)1/BC17140,17470,17630/B17030/BLIST SUBROUTINE/BCV(37)1N0B17680:"ENTER WORD.>D$"CLOSE"G.>18:1:"END OF DATA":868:"PRINT DATA (Y/N)? :";j.>X$:X$;:Y$::Y$(13)16110.>X$"Y"X$"N"16110.>X$"Y"15200.>:771.H?19000.R?D$"CLOSE".W?D$"PR#0".\?::771.gBEDIT ROUTINE.hB:.rB:34,4/X$(I)));-=X$(I);::-=$->:->10:QPT$" DATA FILE NOT ON THIS DISK.":"INSERT CORRECT DISK THEN PRESS ":"OR PRESS ANY OTHER KEY FOR MENU."->X(16384):X12816020->16368,0:XX128->X13Ħ->19000:771.>19000:15500 B @HBHH@$bBD:"HDHB@:D\"TT"\GB"DD\DBB B"F:DbbbDH"D@THHbD"D\DTBBB@@BbB<DBBDb><<~FbFDBbDbF D DD`@{!pp|LcC0p@v @~ 8f`s|@~"@~'x=@z'|?@< p`{pxs@~"~@xGA~ @wx[xG@n!@||8@~ @>`N@!@@p@@ @~`~@Aw!p 88x| `yA`p|~!@~ 0``gq{@F^#@~+p=@~'t@| p@px?@~"|>@xG@| @c~hG@n# x<8@~ @|a@!p@p @ @~ax17  >LhH0`@ tW ]a M ]a M ML պƠŨĠŨΠϠƠՠŨΠϠƠäΠϠŨՍϠŨՍϠŨՍڠڠƠؠŨکΠϠϠƠՠŨΠϠƠäΠϠƠŨΠŨպƠŨĠŨΠϠƠՠŨΠϠƠäΠϠƠŨΠŨԠĠϠѠԠĠՠэƠ٠ΠŨՍƠ٠ΠϠƠՠŨΠϠƠŨΠŨպƠŨĠŨΠ< < |x<<< ~<< p?@< ;<<< <<<~~~<~B8~~B~<<B888@B0>8D<8\\8D@0\D>8\088D|x<8@8@B0|< <888<@<B888<>>8D<l800>88D80B<\:88>B<@?8:@\D@T<\D><8<<08D8<T<<l80B8\088; ~< |>0<0<<0<><<\B8\080B8>8@\TT\@<\D>8<@8T800<\8D\D@8TBBBB"BBB\BH@DbbD\H"D@"HDD|xBD:\\BH B BD\B@@DTHHD:T@@DDDHB:bF@BDF\"D\T"D@HDDTB"D"`DbD\DDHBT@THBDbH:D"WORD FILE WILL BE PERMANENTLY CHANGED.":"ENTER 'SAVE' TO CONTINUE, ANYTHING":"ELSE TO RETURN TO MENU. ";X$:X$"SAVE"176707DD$:D$"UNLOCK"F$:D$"DELETE"F$:D$"OPEN"F$:D$"WRITE"F$7DI1N:FS$((I6.011),I(I6.01)6):8DD$"CLOSE":D$"LOCΠ ƠؠĠ Π Ơ ĠؠΠ  ƠؠĠȤ٢Π̠ԠԠȠŠŠԠŠҢ̠ԠϠ  ӲӲԍ̠ΤƠ̠äҠΠԠΤФΤƠؠΠ ƠؠĠˠΠϠƠؠΠ ƠؠĠ  ԠӤԬéƠäΠϠԠ ԠӤԬѩԠƠäΠϠ ԠӤԬĩ  ӲФ ōҍȍō̍΍ԍōԍƍԍٍōčǍ׍ҍōٍԍԍ̍čōٍčōٍōԍˍčōÍčō΍ƍƍٍččҍύōÍōٍӍōǍ΍č΍ˍ׍ˍčōٍҍٍӍ̍čٍčٍ͍ōӍ΍ٍٍ΍ōˍҍ΍čǍ΍ٍčōōčٍčٍٍ΍ٍčٍǍٍ΍ӍӍ̍ԍӍҍččǍččҍӍӍӍԍٍ΍ȍčٍٍ׍ōٍčӍٍԍӍōҍҍčԍ؍ٍōٍٍƍԍԍٍٍōԍǍٍčǍčٍٍǍǍٍǍٍҍōٍōčōčٍٍҍٍԍǍǍƍЍٍٍčٍ΍čӍҍčҍٍٍԍˍٍōˍٍӍԍ΍ٍٍٍӍōٍٍčٍǍčԍčٍˍԍˍӍӍӍčٍٍ̍ō̍čٍٍٍčٍǍčٍٍٍҍčӍ׍ÍǍԍǍԍōԍōčٍЍҍ΍ٍԍčٍύōčԍǍԍӍЍٍƍȍǍōӍԍˍٍٍˍčٍǍٍ׍Ѝԍ΍ō΍ҍčٍ΍ԍٍōōٍčٍӍٍٍ΍ٍōٍō׍͍ԍٍٍٍٍōٍҍٍōǍčٍč̍΍΍ԍōٍōōٍԍˍƍǍōčōōٍҍٍ̍׍ōٍ΍ٍ͍ˍٍҍ׍ٍˍٍӍō΍ҍ΍ٍٍٍٍ̍ҍčōԍōٍˍčǍ׍Ѝ΍ōύčˍ̍ԍčҍōٍȍ΍ȍōԍčˍԍٍōˍٍٍٍٍ΍͍ō׍ٍҍҍōҍ΍ˍčЍٍٍҍčԍЍÍčԍčččٍԍ͍ōٍōҍٍԍ̍ōō̍č΍̍ЍٍٍٍҍǍٍč΍ٍԍ       ŠέŭƭōԠԠӠ̠ҠԠϠӍԠԠԨԩԠԍԠԠӍΠĤҤ̭͠č͠ǠӍŠؠ ԠԠ ԠӠŠԠŠҢ̠ԠϠΠϠՠ  ؠˠƠؠΠŠƠؠΠϠ͠ԠήԠԠӠŠˠנ٠ϠԠŠҠҮԠԠӠŠԠŠҢ̠ԠϠŮԠԠԍōҍ΍ō̍΍ҍ΍ōōٍ͍΍ōɍԍ΍ҍōԍōԍԍՍӍҍԍԍҍōԍٍōٍ̍΍̍ō΍ōԍȍˍōǍō΍ǍЍҍԍčӍˍԍԍԍҍҍ΍ōٍԍ̍̍Í΍΍ٍčōōԍ̍΍΍ōōčҍ׍č΍ٍˍٍ͍΍čōٍ̍ԍӍԍōӍٍ׍čōÍˍҍ͍ōÍǍč΍΍ȍōȍҍōǍōō͍Ǎٍٍō̍ōӍō΍ԍ̍ōǍōԍԍӍԍčōōҍ΍ҍōԍčҍ΍ˍōōԍӍɍčōčٍٍҍٍԍǍǍƍЍٍЍҍ΍ōō̍ԍȍ΍ōٍٍōԍ΍ˍԍҍԍōˍƍōԍ΍čٍčٍǍčԍčٍˍԍˍӍӍӍčٍٍ̍ō̍čٍٍٍčٍǍčٍٍٍҍčӍ׍ÍǍԍǍԍōԍōčٍЍҍ΍ٍԍčٍύōčԍǍԍӍЍٍƍȍǍōӍԍˍٍٍˍčٍǍٍ׍Ѝԍ΍ō΍ҍčٍ΍ԍٍōōٍčٍӍٍٍ΍ٍōٍō׍͍ԍٍٍٍٍōٍҍٍōǍčٍč̍΍΍ԍōٍōōٍԍˍƍǍōčōōٍҍٍ̍׍ōٍ΍ٍ͍ˍٍҍ׍ٍˍٍӍō΍ҍ΍ٍٍٍٍ̍ҍčōԍōٍˍčǍ׍Ѝ΍ōύčˍ̍ԍčҍōٍȍ΍ȍōԍčˍԍٍōˍٍٍٍٍ΍͍ō׍ٍҍҍōҍ΍ˍčЍٍٍҍčԍЍÍčԍčččٍԍ͍ōٍōҍٍԍ̍ōō̍č΍̍ЍٍٍٍҍǍٍč΍ٍԍ       E(4)U:E(4)0E(5)0ī110350&P+UE(4)ī11035C&Q+C$"5"ī11094N&R+E(3)UY&S+11095d&T+E(4)Uo&U+11095z&V+E(5)U&W+ZZ1&\+NE(Z)ī11095&a+NE(Z)NZ&f+&p+ ASSIGNMENT TO ARRAY&u+NFDFD1&z+XZ175&+ZX16&+TT1'+F%#+11050%$+Q((1)5)1#%*+UQ3%/+Y1E(1)UC%4+Y1ī11035V%9+UE(1)ī11035%>+E(2)0E(2)U:E(2)0E(3)0ī11035%C+UE(2)ī11035%D+C$"3"ī11090%H+E(3)0E(3)U:E(3)0E(4)0ī11035%M+UE(3)ī11035%N+C$"4"ī11092&O+E(4)0E(1)0:E(2)0:E(3)0$ +11025?$ +E(1)0:E(2)0:E(3)0:E(4)0J$+11025q$+E(1)0:E(2)0:E(3)0:E(4)0:E(5)0|$+11025$+Y0$+Z0$+YY1$+C$"3"ī11040$+C$"4"ī11042$+C$"5"ī11044$ +Q((1)3)1$!+11050$"+Q((1)4)1 ҍ΍ōōٍ͍΍ōɍԍ΍Ӎҍԍԍҍōԍٍōٍ̍΍̍ō΍ōԍȍˍōǍō΍ǍЍҍԍčԍōҍ΍ō̍΍΍ōٍԍ̍̍Í΍΍ٍčōōԍ̍΍΍ōōčҍ׍č΍ٍҍōԍōԍԍՍ̍ԍӍԍōӍٍ׍čōÍˍҍ͍ōÍǍč΍΍ȍōȍҍōǍōō͍Ǎˍԍԍԍҍҍ΍ԍ̍ōǍōԍԍӍԍčōōҍ΍ҍōԍčҍ΍ˍōōԍӍˍٍ͍΍čōٍҍӍō΍ҍЍҍ΍ōō̍ԍȍ΍ōٍٍōԍ΍ˍԍҍԍōˍƍōԍ΍čȍٍٍō̍ōӍōҍōˍٍ͍΍΍ҍ΍ōō̍ҍƍčٍˍ΍ٍҍōԍԍٍҍҍōōōԍԍōҍҍčԍōōƍōٍ΍ˍ̍΍ҍԍĠԍč΍؍ԍ΍ԍҍԍҍ΍Ѝҍč΍ōčЍύӍōōčԍōҍ͍ҍԍȍō΍ōӍčӍ΍͍׍ō΍ҍčٍ΍ԍٍōōٍčٍӍٍٍ΍ٍōٍō׍͍ԍٍٍЍ΍΍΍ҍԍˍ΍̍ō΍ččˍҍōٍōōٍԍˍƍǍōčōōٍҍٍ̍׍ōٍ΍ٍ͍ˍٍҍ׍ٍˍٍӍō΍ҍ΍ٍٍٍٍ̍ҍčōԍōٍˍčǍ׍Ѝ΍ōύčˍ̍ԍčҍōٍȍ΍ȍōԍčˍԍٍōˍٍٍٍٍ΍͍ō׍ٍҍҍōҍ΍ˍčЍٍٍҍčԍЍÍčԍčččٍԍ͍ōٍōҍٍԍ̍ōō̍č΍̍ЍٍٍٍҍǍٍč΍ٍԍ       35:13:"";E$(TE$"Y"E$"N"ī41702Y4000E^36:15:"";G$`hG$"Y"G$"N"ī4190jm4000}r32:17:"";H$|H$"Y"H$"N"ī42104000D$(4): CTRL-DD$;"OPEN DATA"D$;"DELETE DATA"D$;"OPEN DATA" D$;4160'FG$"4"ī4170+(FG$"5"ī4190>)FG$"6"ī4210Q*FG$"7"ī4139[+4230,37:7:" ";A$:(A$)1(A$)75ī414014000631:9:" ";B$:(B$)1(B$)75ī4150;4000@33:11:" ";C$:(C$)5(C$)3ī4160E4000 J3:"4) PRE-TREATMENT BASERATE?(Y/N) ";E$.]3:"5) POST-TREATMENT BASERATE?(Y/N) ";G$c3:"6) CLOCK/CALENDER USED?(Y/N) ";H$3:"7) NO CHANGES ""14:22:"SELECT(1-7)";FG$$FG$"1"ī4140%FG$"2"ī4150&FG$"3" D$;"CLOSE DATA" 40007 LEARNING PARAMETERS=_2:10:"LEARNING PARAMETERS"7:3:"1) NUMBER OF PRESENTATIONS(1-75): ";A$3:"2) BEGIN WITH NUMBER(1-75): ";B$3:"3) NUMBER OF SELECTIONS(3-5): ";C$(TD86400H3600M60SH CALCULATE THE MEAN-TIME-OF-RESPONSEV TT0:BT0c PS(A$)o T1PS TTTTYT(T) BTTTBA T BTTTPS  D$(4): CTRL-D D$;"OPEN DATA" D$;"READ DATA" A$,B$,C$,E$,G$,H$$,7,2))*M((T$,10,2))/4S((T$,13,6))Z>Z(1)0:Z(2)31:Z(3)28:Z(4)31:Z(5)30HZ(6)31:Z(7)30:Z(8)31:Z(9)31:Z(10)30:Z(11)31:Z(12)30:Z(13)31RDTD0\I1MTfDTDDTDZ(I)pIzDTDDTDDMT2L1DTDDTD1STDD" 4) PRESS ";::"SPACE BAR";::" TO CONTINUE.":@F5:"PRESS ";::"SPACE BAR";::" TO RETURN TO MENU ":38:18:R$:R$""ī1777" ";T$00 MT((T$,1,2))D((T$,4,2)) H((T(14:"INSTRUCTIONS"A25:" 1) MATCH THE TARGET WORD WITH"b<" THE BEST SELECTION."hFP" 2) TYPE THE NUMBER OF THAT"Z" SELECTION."dn" 3) PRESS THE BACK ARROW KEY TO "x" CHANGE YOUR ANSWER."41):F4(1012)+8ZF1010,3:1011,3:1012,16618dF=88J19010C8=JX8BJ(222)255Č771e8LJ216,0:k8PÀ8BY B. SHON 5/15/83:958:17690:CV:57E1:1:868::868::868:1:7E17680:"L=LIST WORDS";21);"E=EDIT WORDS":"S=SAVE CHANGES";21);"Q=QUIT":::7$ECV24CV237.E78E21(X$)2);X$:7OFALTER RESET ROUTINE7PF(4)"BLOAD RESET" 8UFF2(1010):F3(10168:17680:"WORD FILE WILL BE PERMANENTLY CHANGED.":"ENTER 'CONT' TO CONTINUE, ANYTHING":"ELSE TO RETURN TO MENU. ";X$:X$"CONT"176706DD$:D$"DELETE"F$:D$"OPEN"F$:D$"WRITE"F$6DI1N:FS$((I6.011),I(I6.01)6):6DD$"CLOSE"7ECV:T;": ";:ISTRT:17362:"CHANGE TO: ";X$K5DX$"!"Ģ(37)1:958:17620\5DX$""17600v5DFS$((I6.011),J)X$5D(37)1:868:STRT;5);:ISTRT:17362:STRTSTRT1:868:J6ĺ5DSTRTN175605DCV(37)1:17690:CV:6DCV(37)1:1:8N17490'4zD(X$)0STRT(X$):17550~4D17370:STRT0İ17680:X$" NOT FOUND"::"PRESS ANY KEY TO CONTINUE":17450:174804D17680:" - NO CHANGE":"! - ENDS EDIT":"OTHER ENTRIES CHANGE WORD":CV:868)5DJSTRT(STRT6.01)6:"WORD ";STR(16384)12817450"34D16368,0:13>DCV(37)13HD17680:"ENTER WORD OR WORD NUMBER":" WILL BEGIN EDITING AT 1":"'!' WILL RETURN TO MENU3RDCV:868:"START EDITING AT :";X$:177003\DX$"!"ĢCV:176203fDX$""STRT1:175504pD(X$)C2CJ1Ğ42CFS$((I6.011),I(I6.01)6)::2CI2CMIDSEARCHb2CJN2:KJ:I0:17420l2CKJI2CX$FS$((K6.011),K(K6.01)6)174402DKJI:K0174402 DX$FS$((K6.011),K(K6.01)6)174402DII1:173902 DSTRTK:3*Dҍ΍ō̍΍ҍ΍ōōٍ͍΍ōɍԍ΍ԍōԍԍՍӍҍԍԍҍōԍٍōٍ̍΍̍ō΍ōԍȍˍōǍō΍ǍЍҍԍčԍōԍԍҍҍ΍ōٍԍ̍̍Í΍΍ٍčōōԍ̍΍΍ōōčҍ׍č΍ٍҍōٍ΍čōٍ̍ԍӍԍōӍٍ׍čōÍˍҍ͍ōÍǍč΍΍ȍōȍҍōǍōō͍Ǎˍԍō̍ōӍō΍ԍ̍ōǍōԍԍӍԍčōōҍ΍ҍōԍčҍ΍ˍōōԍӍˍ͍ōٍ΍ˍ̍ҍӍō΍ҍЍҍ΍ōō̍ԍȍ΍ōٍٍōԍ΍ˍԍҍԍōˍƍōԍ΍čȍٍٍӍčӍ΍͍׍ҍōˍٍ͍΍΍ҍ΍ōō̍ҍƍčٍˍ΍ٍҍōԍԍٍҍҍōōōԍԍōҍҍčԍōōƍ΍ččˍҍ΍ҍԍĠԍč΍؍ԍ΍ԍҍԍҍ΍Ѝҍč΍ōčЍύӍōōčԍōҍ͍ҍԍȍō΍ōҍȍƍōԍ΍͍̍Ѝčōҍōƍ̍ōӍԍččōō׍ҍЍǍ͍ˍ΍ٍˍȍЍ΍΍΍ҍԍˍ΍̍ōҍ̍Ӎٍˍҍ̍ōˍԍҍҍԍōҍōōȍōЍԍٍ΍ҍҍǍҍč̍ōٍ͍̍΍ԍҍЍōÍōԍōٍōčǍ׍Ѝ΍ōōԍ؍ō΍ҍҍˍȍԍ׍ōӍӍō΍Ǎōҍ׍ōōӍٍҍҍ׍ōōЍc )(4);"BLOAD PIC.LOGO,A$4000"4X(0)@D$(4)H(D$[2D$;"RUN MENU"ac  ΍ˍčЍٍٍҍčԍЍÍčԍčččٍԍ͍ōٍōҍٍԍ̍ōō̍č΍̍ЍٍٍٍҍǍٍč΍ٍԍ   ERATE":LP$(3)"B=BEGINNING NUMBER":LP$(4)"PST=POST-BASERATE":LP$(5)"S=# OF SELECTIONS"x(:::I139:"=";:::34,5(:I152:LP$(I);23);LP$(I1)::35,19:2:(:"DATE"12)"PARMS"20)"BASERATE"30)"TREATMENT"/):12);"P";15);"B";17);"S";2`@{!p~ xp@v @~ 8|@~"@C@ 8`1p8DCcc@~'@x=@z'|?|?@?xps~ ~x@< px 0@An@xs@~"xGA~ @wx@[xG@n!@||xA@N@>`N@!a`@ Tp7@w@@ @~`~@Aw!p {?pxp|~!@~ 0@F^#@CA 8`1psLc7@~+pp=@~'tx`XGy|W c3<|@| px `A|~@x?@~"|xG@| @cG@~hG@n# x`x@|a@!Aa@t0@ @ @~axA'p`o?`@Ax1pOO~# @~ 0@`Gn#`CA!x` @cx~@^/8p@v"|paa|9| 38@|"pg< paH~6ph?@~&|8pG@| 0@|Cs?@~hO@n#p?p|@|a@!AaGd0@@~ @~!x?C~ p`~0@alq p@~#@^!0@ ~G#pCyx @@p~@~'xx_@v"x}`a@xcp @'p? 88v40h?@~%x{0pG@~!`@^?~>`|hOp^#p@~x@!8@~!Gd p<@@~ @~!`F|!p`x@#p!0x@~#@~!0@ pG?#p|wx`pp@~'x8G@~c?`}w?@c@x@n}`p @_g xtg< x/@~'p0pO@~!@@<~8phOX>"@@N `@!_x@~!CD\|!p@@x0c@!x}@~#@~#p` pqG?!x@`p~@l!pxG@>!`pc38`|ga` @:&`7X08`x/@>'@} >~po@~!@@x~}hOL"@\?L @!_`@~!BxD`C?@~ @!p<@~ p~!ppx 8c@#xy@~#@~#p @ p{C?!`@@@}!xC@> |`?c3p`> Gc?` @?'`p`@x/@>/z@A> @#P@p/@~!@@>p{hGF_ @y?>|@`{@~#CxF`?c@^`@ ~@;Xp|?< ``~!ph 0A@cxy@v"0@#p0p p@v!@}0xC@~ @`?C#`0`18GC`@?'@@h-@~.~?@c @ \`c`?@? @@~`hGC~ @s~@|@~`~@~# ClC@^`@!          z#?????3   ԠӠ ΠŠŠ ԠҠ ԠŠ Բ ĠӮ! ծ $ծР1 ծԠԮנ ׮Ԡ O ԠεԠαԮ Ϡՠ3Ԡ Ӡ  Ϡ"A$B$C$ E$(G$0H$ED$;"CLOSE DATA"YD$;"LOCK DATA"a17 COUNTING WRONG RESPONSES WW1ABAB1XX1:X$"INCORRECT,TRY AGAIN"::;20(X$)2);X$;XX1ī5035XX1K1H$""Y"E$"N"ī4170Y41300^37:15:"";G$KhG$"Y"G$"N"ī4190Um4130hr36:17:"";H$wH$"Y"H$"N"4210|4130X17D$;"UNLOCK DATA"D$;"OPEN DATA"D$;"DELETE DATA"D$;"OPEN DATA"D$;"WRITE DATA"170(FG$"5"4190')FG$"6"42109*FG$"7"4230C+4130l,37:7:"";A$:(A$)1(A$)754140y19:4045636:9:"";B$:(B$)1(B$)76(A$)4150;4130@33:11:"";C$:(C$)5(C$)34160E4130J36:13:"";E$TE$POST-TREATMENT BASERATE?(Y/N): ";G$)X3:"6) AUDITORY REINFORCEMENT?(Y/N): ";H$^ z!3:"7) RETURN TO MENU""14:22:868:"SELECT(1-7):";FG$#(FG$)0(FG$)7X1$FG$"1"4140%FG$"2"4150&FG$"3"4160'FG$"4"4ESENTATIONS(1-75): ";A$@(B$)76(A$)B$(76(A$))3:"2) BEGINNING PRESENTATION(1-";76(A$);"):";36);B$;:868:3:"3) NUMBER OF SELECTIONS(3-5): ";C$3:"4) PRE-TREATMENT BASERATE?(Y/N): ";E$#3:"5) 174 CALCULATE THE MEAN-TIME-OF-RESPONSEB TT0:BT0O PS(A$)[ T1PSk TTTTYT(T)r T BTTTPS  D$(4): CTRL-D LEARNING PARAMETERS:X02:10:"LEARNING PARAMETERS"7:3:"1) NUMBER OF PRO "$x" CHANGE YOUR ANSWER."*b" 4) PRESS ";::"SPACE BAR";::" TO CONTINUE."hntz5:"PRESS ";::"SPACE BAR";::" TO RETURN TO MENU ":38:18X(16384):X128146016368,0:X1601460$(QDT$,8)& INSTRUCTIONS,D(14:"INSTRUCTIONS"o25:" 1) MATCH THE TARGET WORD WITH"<" THE BEST SELECTION."FP" 2) TYPE THE NUMBER OF THAT"Z" SELECTION."dn" 3) PRESS THE BACK ARROW KEY TXZ175ZX16 NN10FS$(XZ,ZX)6<OD$;"CLOSE";F$UkI140:"*";::"*";40);"*";: USERS NAME9:"TYPE YOUR NAME:""TODAY'S DATE (XX/XX/XX):"16:9:"";QNM$ 25:11:"";QDT$:QDT:"*";21(X$)2);X$;40);"*";7 ~1210:1210:1200:S  ASSIGNMENT TO ARRAYj D$(4): CTRL-D~ D$;"OPEN DATA" D$;"READ DATA" A$,B$,C$,E$,G$,H$ D$;"CLOSE DATA" F$"MODIFIERS" D$;"OPEN";F$ D$;"READ";F$ N0 1210:1210> 8X$"MODIFIERS":"*";21(X$)2);X$;40);"*";Q =I13:1210:[ ?1210k A1210:1210 LX$" (C) COPYRIGHT 1984":"*";20(X$)2);X$;40);"*"; VX$"ALL RIGHTS RESERVED":"*";21(X$)2);X$;40);"*"; `X$"COLLEGE-HILL PRESS"17# 5:14:"SEE YOU NEXT TIME"W 1010,F2:1011,F3:1012,F4:I040:768I,0::k  TITLE FRAMEq x 2 1200:1210 $X$"COMPUTERIZED READING":"*";21(X$)2);X$;40);"*"; .X$"FOR APHASICS:":"*";21(X$)2);X$;40);"*"; 30 BD$"5"ī15000' BD$"6"ī9009 BD$"2"197E 6:1230a T0:XXT:ROT:OCT:TCT X$"N/A":I14:B$(1,I)X$:B$(3,I)X$: 7000 :10 5:"EXIT PROGRAM (Y/N)"; 10:24:958:P$:P$"Y"P$"N"907 P$"Y"ī925 . " (4) CHANGE LEARNING PARAMETERS"4 ] " (5) REVIEW PREVIOUS RESULTS"c " (6) EXIT PROGRAM" 21:11:"SELECT (1-6):";:868:"";BD$:X(BD$):X1X6197 BD$"1"1300 BD$"3"17000 BD$"4"ī3501  : 245763YT(75),FS$(75,6),C(75,10)D1000:18000`:D$:D$"CLOSE":19000f-y<4:18:"MENU"K::P" (1) REVIEW INSTRUCTIONS"Zd" (2) RUN COMPUTERIZED READING"" (3) EDIT STIMULI"             "     "  @}!xC@> |`?@?'`x/@>/z<`0p/@~!@@>p{p>hGF_ @y?>@`{x@~#8p@^`@ ~`~!pp!xy@v"0@#p0p `L3"8 p@v!}0xC@~ @`?@?'@h-@~.~?>@p`?@? @@~`|@hGC~ @s~@@~`~X@~#F8r@^`@!          (XX1E$"N")(XX3G$"N")XX29535K0%B$(XX,1)(((RPS)100.5))"%"Y9%B(XX,2)Wz:%B$(XX,3)((BT100.5)100)>%B$(XX,4)((TT100.5)100)?%XX1XX3ī9540@%B(XX,5)((ROPS)100.5)A%B(XX,6)((OCPS)100.5) B%B(XX,7)((TCP0>!16368,0:T0::AP$;:@H!X(16384):X127TT1:8520UR!16368,0:(36)fW!AN$(X128)w\!TRD2(T35)}f!(#:Z#3000:9500d#XX310500n#XX3ī9090x#E$"Y"G$"Y"İ10500#7000% ACCUMULATE DATA&%XXXX1&+%X1288162&16368,0:X16081624YT(BA)S2>7050^ COUNTING ONE WRONG ANSWERj RORO1p l COUNTING FOR TWO WRONG ANSWERSv OCOC1  COUNTING MORE THAN TWO WRONG ANSWERS TCTC1 4!RD2(X)(X100.5)10(C$)A18115AN$:AP$AN$0ANXİ5000EANXK1ī8115UANXİ6000jXX1AB1İ8300XX1AB2İ8400AB0XX1İ8200AB0XX1H$"Y"Č818:" PUSH THE ";::"SPACE BAR";::" TO CONTINUE"; X(16384):0:10:"1) ";FS$(CT,A)710:"2) ";FS$(CT,B)=W10:"3) ";FS$(CT,C)iC$"3"ī8090o10:"4) ";FS$(CT,Q):C$"4"ī809010:"5) ";FS$(CT,PD)20:40S20:AP$" "20:19:8500:S2S2TA(AN$):A:XX0E$"N"XX15LXX0ĺ"PRE-BASERATE #";OVXX1ĺ"TREATMENT #";f[XX2G$"N"10500`XX2ĺ"POST-BASERATE #";eBAj34,1:XX1@::rAE(1)1:BE(2)1:CE(3)1:QE(4)1:PDE(5)16:17:FS$(CT,1)1050 7100BABA1!K02BAPSī9000<7400G11000Q8000 USED TO MAKE SURE NO TWO PRESENTATIONS ARE THE SAMEBAPSġ:9000C(BA,1)SBBA07136TB1BACTC(TB,1)ġ:7050TBSBCTY"āHN150:A(16336):#5025Fp COUNTING CORRECT RESPONSESUzK1ī6030_RR1XX1ĺ:X$"CORRECT":;20(X$)2);X$;" "X:PS(A$)TE(B$)SEPSTEBA0CT((1)SE)CT(TE)CT(SE)ī7ύԠҬҬϺϠĠ@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ԠźԤԠƠӺЍԠƠӺԍԠԠŠŠԠԢԠߢԠһһҤ̭͠čԠĤΠӢԠĤĠӢԠҬҬύԠĤŠӢŠؤ٠ƠӢԠ¨ΠؤؤԠԠƠŠԺ  ԠԤԠԠŠΠŠҠƠӺ  ԠЍԠԠŠΠŠҠƠӺ  ԠԍĤߢԠһһύԠҬҬϺϠĠԠƠӺԍԠԠŠŠԠԢԠ߻¨ΠؤؤԠԠԠźԤԠƠӺЍԠƠӺԍԠԠŠŠԠԢԠߠ٠ƠӍŠԠŠΠŠŠƠŠԺ  ԠԤԠԠŠΠŠҠƠӺ  ԠЍԠԠŠΠŠҠƠäĤҤ̭͠čԠĤΠӢԠĤŠӢԠԤЬԍԠҍԠύԠҍԠԠĤŠӢҠϠōҍ΍ō̍΍ҍ΍ōōٍ͍΍ōɍԍ΍ٍٍٍ 'N/D$"OPEN"QNM$'X/D$"CLOSE"%'b/@': SUMMARY OF RESULTSF':`':D$(4):BLNK$" "'::"TYPE IN THE NAME OF THE PATIENT.":':"NAME: ";QPT$':16000':D$"VERIFY"QPT$':19000X(:LP$(1)"P=# OF PRESENTATIONS":LP$(2)"PRE=PRE-BASS)100.5)2C%B(XX,8)(((ROOCTC)(PS))100.5)LD%R0:W0:B0:BT0:TC0RN%h) PRINT RESULTSp )M0x):)X$"SESSION RESULTS":;21(X$)2);X$))"NAME: "QNM$")"DATE: "QDT$')"PROGRAM: "F$ ():"NUMBER OF PRESENTATI1!STDDTD86400H3600M60S'R CALCULATE THE MEAN-TIME-OF-RESPONSE` TT0:BT0m PS(A$)y T1PS TTTTYT(T) BTTTCT T BTTTPS  D$(4): CTRL-D D$;"OPEN DATA" D$;"READ DATA" A$,B$,C$,E$, H((T$,7,2))&*M((T$,10,2)):4S((T$,13,6))e>Z(1)0:Z(2)31:Z(3)28:Z(4)31:Z(5)30HZ(6)31:Z(7)30:Z(8)31:Z(9)31:Z(10)30:Z(11)31:Z(12)30:Z(13)31RDTD0\I1MTfDTDDTDZ(I)pIzDTDDTDDMT2L1DTDDTD"?" 4) PRESS ";::"SPACE BAR";::" TO CONTINUE."EKQ5:"PRESS ";::"SPACE BAR";::" TO RETURN TO MENU ":38:18:R$:R$""ī1777" ";T$00 MT((T$,1,2))D((T$,4,2))ōҍ΍ō̍΍ҍ΍ōōٍ͍΍ōɍԍ΍ԍōԍԍՍӍҍԍԍҍōԍٍōٍ̍΍̍ō΍ōԍȍˍōǍō΍ǍЍҍԍčԍԍԍԍҍҍ΍ōٍԍ̍̍Í΍΍ٍčōōԍ̍΍΍ōōčҍ׍č΍ٍҍٍ͍΍čōٍ̍ԍӍԍōӍٍ׍čōÍˍҍ͍ōÍǍč΍΍ȍōȍҍōǍōō͍Ǎˍٍō̍ōӍō΍ԍ̍ōǍōԍԍӍԍčōōҍ΍ҍōԍčҍ΍ˍōōԍӍˍōƍōٍ΍ˍ̍ҍӍō΍ҍЍҍ΍ōō̍ԍȍ΍ōٍٍōԍ΍ˍԍҍԍōˍƍōԍ΍čȍٍČ̌ČČȌЌ̌ЌԌĠԌČ̌،׌̌ԌЌԌЌ̌ЌЌČ̌ČČЌ̌ЌČČČԌČЌ̌ЌԌȌČ̌Čō΍ččˍҍ΍ҍԍĠԍč΍؍ԍ΍ԍҍԍҍ΍Ѝҍč΍ōčЍύӍōōčԍōҍ͍ҍԍȍō΍ōÍōȍƍōԍ΍͍̍Ѝčōҍōƍ̍ōӍԍččōō׍ҍЍǍ͍ˍ΍ٍˍȍЍ΍΍΍ҍԍˍ΍̍ōЍҍ̍Ӎٍˍҍ̍ōˍԍҍҍԍōҍōōȍōЍԍٍ΍ҍҍǍҍč̍ōٍ͍̍΍ԍҍЍō΍ٍҍٍȍōύ΍΍ҍ΍ōōԍ؍ō΍ҍҍˍȍԍ׍ōӍӍō΍Ǎōҍ׍ōōӍٍҍҍ׍ōóٍٍٍ "+YY1"+C$"3"ī11040/"+C$"4"ī11042B"+C$"5"ī11044T" +Q((1)3)1_"!+11050q""+Q((1)4)1|"#+11050"$+Q((1)5)1"*+UQ"/+Y1E(1)U"4+Y1ī11035"9+UE(1)ī11035">+E(2)0E(2)U:E(2)0E(3)0ī11035#C+UE(2)ī !):17-!* RANDOM ASSIGNMENTS OF ITEMS5!+N1H!+C$"3"ī11019[!+C$"4"ī11021n!+C$"5"ī11023! +E(1)0:E(2)0:E(3)0! +11025! +E(1)0:E(2)0:E(3)0:E(4)0!+11025!+E(1)0:E(2)0:E(3)0:E(4)0:E(5)0!+11025!+Y0!+Z0NT" )F )" % CORRECT:FIRST TRIAL.....";(B(2,1)(A$))100;"%"L )p )" % CORRECT:SECOND TRIAL....v ) )M1ī10685 )8:"PRINT RESULTS?(Y/N):";PA$ )PA$"Y"MM1:1:10510 )0:8:"STORE RESULTS?(Y/N):";FD$!)FD$"Y"ī12000 POST" 3)j6)" % CORRECT.................";(B(1,1)(A$))100;"%";" ";(B(3,1)(A$))100;"%"p@)J)" MEAN-RESPONSE-TIME........";B(1,3);" ";B(3,3)Y)^)" TOTAL TIME................";B(1,4);" ";B(3,4)r) )"TREATME PRINT RESULTS )M0)@)X$"RESULTS":;20(X$)2);X$;F)X)"NAME:";QNM$j")"DATE:";QDT$}')"PROGRAM:";F$():"# OF PRESENTATIONS:";A$))"BEGINNING #:";B$*)"# OF SELECTIONS:";C$,):1)"BASERATE PRE 2STDF#PTP2P1P#3000&Z#95007d#XX3İ10500Gn#XX3ī9090ax#E$"Y"G$"Y"İ10500k#7000% ACCUMULATE DATA&%XXXX10%B(XX,1)R9%B(XX,2)W:%B(XX,3)(BT100).01?%B(XX,4)(PT100).01D%R0:W0:B0:BT0N%) 115 AH$"N"ī8140:2000:T2$T$:2060:S2STDJANİ5000^ANK1ī8115mANİ6000w8160:" PUSH THE ";::"SPACE BAR";::" TO CONTINUE";:R$YT(CT)S2S17050(#H$"N"ī90502#2000<#P2$T$:2060:P10:"2) ";FS$(CT,B)510:"3) ";FS$(CT,C)GC$"3"ī8090Mg10:"4) ";FS$(CT,Q){:C$"4"ī809010:"5) ";FS$(CT,PD)20:40H$"N"ī81152000:T1$T$:2060:S1STD20:19:AN$A(AN$):A(C$)A1ī8NT #";CT2ZXX1E$"Y"G$"Y"ĺ"TREATMENT #";CTI[G$"N"XX2ī9000p`XX2G$"Y"ĺ"POST-BASERATE #";CTvjXX1@::rAE(1)1:BE(2)1:CE(3)1:QE(4)1:PDE(5)16:17:FS$(CT,1)10:10:"1) ";FS$(CT,A)Sī9000710011000&8000,FE$"N"İ7600:ASAS1eE$"N"AS(A$)1XXXX1LXX0E$"Y"ĺ"PRE-BASERATE #";CTVXX1E$"Y"G$"N"ĺ"TREATMENT #";CTXX1E$"N"G$"Y"ĺ"TREATMENT #";CTYXX1E$"N"G$"N"ĺ"TREATME0:A(16336):HN5025=p COUNTING CORRECT RESPONSESLzK1ī6030VRR1XX1ĺ:X$"CORRECT":;20(X$)2);X$;" "XH$"N"ī7040l2000vP1$T$:2060:P1STDCT0CTCT1K0PS(A$)CTPD$;"WRITE DATA"A$#B$+C$3E$;G$CH$XD$;"CLOSE DATA"`17 COUNTING WRONG RESPONSES WW1ABAB1XX1:X$"INCORRECT,TRY AGAIN"::;20(X$)2);X$;XX1ī5035XX1K1HN15;"CLOSE";F$ FNX16 ADAD1( NX:4:XT$(AD)0 NX< NX16O (NX:4:"";FD$[ 2XCXC1k <XT$(XC)FD$s FNX PNN75ī90 U10 ZXCXC1 dXT$(XC)"-1" xD$(4) D$;"OPEN";F$ D$;"WRITE";F$ N1451 XT$(N) N D$΍΍΍ٍ͍΍ōɍԍ΍ԍٍōٍ̍΍̍ō΍ōԍȍˍōǍō΍ǍЍҍԍčԍōҍ΍ō̍΍ҍ΍ōōԍ̍̍Í΍΍ٍčōōԍ̍΍΍ōōčҍ׍č΍ٍҍōԍōԍԍՍӍҍԍԍҍōӍٍ׍čōÍˍҍ͍ōÍǍč΍΍ȍōȍҍōǍōō͍Ǎˍԍԍԍҍҍ΍ōٍԍōԍԍӍԍčōōҍ΍ҍōԍčҍ΍ˍōōԍӍˍٍ͍΍čōٍ̍ԍӍԍōҍ΍ōō̍ԍȍ΍ōٍٍōԍ΍ˍԍҍԍōˍƍōԍ΍čȍٍٍō̍ōӍō΍ԍ̍ōǍҍ΍ōō̍ҍƍčٍˍ΍ٍҍōԍԍٍҍҍōōōԍԍōҍҍčԍōōƍōٍ΍ˍ̍ҍӍō΍ҍЍ؍ԍ΍ԍҍԍҍ΍Ѝҍč΍ōčЍύӍōōčԍōҍ͍ҍԍȍō΍ōӍčӍ΍͍׍ҍōˍٍ͍΍΍ōƍ̍ōӍԍččōō׍ҍЍǍ͍ˍ΍ٍˍȍЍ΍΍΍ҍԍˍ΍̍ō΍ččˍҍ΍ҍԍĠԍčҍԍōҍōōȍōЍԍٍ΍ҍҍǍҍč̍ōٍ͍̍΍ԍҍЍōÍōȍƍōԍ΍͍̍Ѝčōҍԍ؍ō΍ҍҍˍȍԍ׍ōӍӍō΍Ǎōҍ׍ōōӍٍҍҍ׍ōōЍҍ̍Ӎٍˍҍ̍ōˍԍҍֱ΍΍ٍ ٍٍ΍ ONS: "A$& ))"BEGINNING NUMBER: "B$G *)"NUMBER OF SELECTIONS: "C$M ,)| 1)"BASERATE PRE POST" 3) 6)" % CORRECT............... ";B$(1,1);36);B$(3,1) J)" MEAN-RESPONSE-TIME...... ";B$(1,3);36);B$(3,3)-!^)" TO΍΍ٍ K"F$8ECV:958:17690:CV:D8E1:1:868::868::868:1:8E17680:"L=LIST WORDS";21);"E=EDIT WORDS":"S=SAVE CHANGES";21);"Q=QUIT":::8$ECV24CV238.E88E21(X$)2);X$:8OFALTER RESET ROUTINE8PF(4)"BLOAD RESET"9UFF2TAL TIME.............. ";B$(1,4);36);B$(3,4)3!r)D!)"TREATMENT"J!)!)" % CORRECT:ONE TRIAL............ ";B(2,5);"%"!)" % CORRECT:TWO TRIALS........... ";B(2,6);"%"!)" % CORRECT:THREE OR MORE TRIALS. ";B(2,7);"%"!)")M1ī106ٍٍ΍|xDFBFbF|<$DBbB~~>FBDDFBDFBFTDDD>FBFBFFBF|xDFFB DBTB DBBFDDTBF D FBDFbDbDFDFBFDBDFDBFFDF$0<$$<FBBFBBFBBbRDF FD>FFFDbF TT BG< DDBbD~|0Z FBFBFFDbBBbDFF DTBbD DB>DFTBBBBB:\:>|><B\>\>:>|>8>||8:B:\:>BB(8<\<BB:<||><D:>><>:<:.||8>8>:<:B:|:<:|x8::B>B.<>|<<<>:8><.<<:><~?:<<8:\>\8:8>:<:D|<D>:8B>::8:(@B((|>>:<<>:<|<:B<\J8::>8>:|::8\:..B>D<\8BB@b:<:<::8\B<<\8:>:>|.>><\>>B8:.BBBBBBBB$@|~BBB0BBBH|xx@0BB00B@FHBDB$BBB@@@H<<~<~B8>>~<<@x<<< <B>80|x`@@ << <@B0;<><<<<~@@@0            110 !D/2!G/FPFP1@!I/X$"BASRERATE #":;20(X$)2);X$;FPI!N/FP0S!X/34,1Y!b/_!PÀ IGNMENT TO ARRAY u+NFDFD1* z+XZ1106 +ZX16@ +TT1V +FS$(XZ,ZX)FX$(T)^ +ZXf +XZn +T0t + . SCREEN FORMAT .34,0: .E$"Y"ī12100 .G$"Y"ī12100 /FPFP1 /2: /X$"TREATMENT #":;20(X$)2);X$;FP!/12:E(3)0E(4)0ī11035)M+UE(3)ī11035<N+C$"4"ī11092eO+E(4)0E(4)U:E(4)0E(5)0ī11035xP+UE(4)ī11035Q+C$"5"ī11094R+E(3)US+11095T+E(4)UU+11095V+E(5)UW+ZZ1\+NE(Z)ī11095a+NE(Z)NZf+ p+ ASS1042+C$"5"ī11044) +Q((1)3)14!+11050F"+Q((1)4)1Q#+11050c$+Q((1)5)1k*+UQ{/+Y1E(1)U4+Y1ī110359+UE(1)ī11035>+E(2)0E(2)U:E(2)0E(3)0ī11035C+UE(2)ī11035D+C$"3"ī11090H+E(3)0E(3)UMS +N1+C$"3"ī110200+C$"3"ī11019C+C$"5"ī11023\ +E(1)0:E(2)0:E(3)0g +11025 +E(1)0:E(2)0:E(3)0:E(4)0+11025+E(1)0:E(2)0:E(3)0:E(4)0:E(5)0+11025+Y0+Z0+YY1+C$"3"ī11040+C$"4"ī1 % CORRECT FIRST TRIAL:";B(2,1)H)" % CORRECT SECOND TRIAL:";B(3,1)N)^)M1ī10685)8:"PRINT RESULTS?(Y/N):";PA$)PA$"Y"MM1:1:10510)0:8:"STORE RESULTS?(Y/N):";FD$)FD$"Y"ī20000)10* RANDOM ASSIGNMENTS OF ITE΍ٍٍٍ΍ 2:56);LP$(I):0+;"PROGRAM: "F$;56);LP$(5)8+;:+;"DATE";15);"PARAMETERS";31);"BASERATES (% CORRECT)";15);"TREATMENT (% CORRECT)"+;15);"P B S";35);"PRE";44);"POST";15);"1 TRY";23);"2 TRIES";32);"3 OR MORE",;I180:"=";:15130*`;::16200=*e;49234,0:49237,0:49239,0:49232,0O*j;D$:D$"PR#1"}*t;X$"SUMMARY OF RESULTS":;41(X$)2);X$*y;::*~;LP$(1)"P=NUMBER OF PRESENTATIONS":LP$(5)"S=NUMBER OF SELECTIONS"*;"NAME: ";QPT$;60);"PARAMETERS:"+;I14ŠҠƠԢԠήԠԠӠŠˠנ٠ϠԠŠҠҮԠԠӠŠԠŠҢ̠ԠϠŮ  ԠԤΠ͠ӍŠ ԠӢ ԠȠŠԠĠȢԠŠԠήԠԠŠŢƤΠҠɠϠԠԠΠԠ¨Π͠Ӡō ԠŠҠźԠԠ٧Ӡź  ԠͤԠĤŠƤĠӢԠĤ΢ƤԠĤĢƤΠҠڠϠҠؠϠΠΠԠĤΩӤڬةĤΩԠԠԠĤԠ¨Πؤؤ¨   Ԡ͠ԠϠٍĤҤ̭͠čԠĤΠԠĤĠԠ¤äŤǤȤ  ؤéԠԠ¨Πؤؤ¨ؤ̠ӠĢԠ¨Πؤؤ¨ؤΠŠӢРΠؤؤ¨ҠɠϠ Ԡؤ٢Ԡ¨Πؤؤ¨ ؤҠͮӮԠΠȮĮԠ¨Πؤؤ¨ؤĠǢԠ¨Πؤؤ¨ؤҠӺԠ¨Πؤؤ¨  ؤĠӢԠ¨ƠФ٢ΠϠϠ  ԠŠՠԠŢŠƲŠƳŠƴҠɠϠŠɬԠנ͠ŠōŠ  µƠĤΠϠŠ ԠؠԺϠԺàԺàԍؤίҠɠϠ¤ɩؤ¤ɩؤԠϠŠ ԠԠ͠ٯΩ  ԠФԠ  ԠԠ̠ԠĤؠ̠ĤƠؠҠؠΠƠĤΠƠĤΠƠĤΠϠƠĤΠϠԠԠĠӢԠԠԠɢԠԠŠǠӢԠԠ٠ƠӢԠԠԠٍٍٍ͢ "ī11042$+C$"5"ī11044-$ +Q((1)3)18$!+11050J$"+Q((1)4)1U$#+11050g$$+Q((1)5)1o$*+UQ$/+Y1E(1)U$4+Y1ī11035$9+UE(1)ī11035$>+E(2)0E(2)U:E(2)0E(3)0ī11035$C+UE(2)ī11035$D+C$"3"ī11090%H+E(3)0E(85J")23:8:868:"PRINT RESULTS (Y/N)? :";PA$:PA$"Y"PA$"N"10660n")PA$"Y"MM1:D$"PR#1":10510~")D$"PR#0":")23:8:868:"STORE RESULTS (Y/N)? :";FD$:FD$"Y"FD$"N"10690")FD$"Y"12000")17#* RANDOM ASSIGNMENTS OF Ԭ©Ԡ ԠӤԬéƠäΠϠԠ ԠӤԬѩԠƠäΠϠ ԠӤԬĩ  ӲؠΠŠԠԠŨ ŨàŨѠŨĠŨ  ԠӤԬ  ԠӤԬԠ ԠӤƠؠĠŤ΢ΠؠƠؠΠԠŭŠƠؠΠԠԠƠؠĠǤ΢ΠƠؠΠԠԭŠԠŠΠĠϠŠŠϠϠӠŠŠōƠӠΠϠèƠΠҠ ϠƠԠè¬ΠРϠԠ ԍΠԠŠŠӠōԠԠĠũƠԠũҠԠũΠϠ ˠƠӠΠϠ  Ϡ͠Ϡ͠ǠԠӍƠˠΠϠҠҠƠؠΠԠؤԢԠ¨ΠؤؤΠӠ̠Š̠  ƠؠΠؤԬ٠΢ԠԠ¨ΠؤؤƠؠΠϠƠؠΠˠΠƠȤ٢ΠҠΠϠˠԠĤΠԠĤŠԠԠ¤ԠäԠŤԠǤԠȤԠĤŠԠĤˠϠ͠ǠǠӠננϠϠ  ԠȤƠȤ٢ĠȤ΢ΠϠĤҤ̭͠čԠĤˠԠĤΠԠĤŠԠäƠ̠äҠ̠äΠϠ  ԠŤƠŤ٢ĠŤ΢ΠϠϠ  ԠǤƠǤ٢ĠǤ΢ΠǤΠϠ  ԠƠ̠Ҡ̠ΠϠ  Ԡ¤Ơ̠¤Ҡ̠¤ΠϠ  ԠΠϠբ  ԠԨǤƠǤΠƠǤΠƠǤΠƠǤΠƠǤΠƠǤΠƳäԠ ԠŭԠſٯΩŤԠ ԠԭԠſٯΩǤԠ Ԡ٠ԿٯΩȤԠ РŠ  ԠǠӢ  ԠҠƠӨԠ ԠǠΨ¤Ԡ ԠҠƠӨ΍΍ٍĠŨΠϠƠՠŨΠϠƠäΠϠƠŨΠŨպƠŨĠŨΠϠƠՠŨΠϠƠäΠϠϠѠԠĠϠѠԠĠՠэƠ٠ΠŨՍƠ٠ΠϠƠՠŨΠϠƠŨΠŨպƠϠŨŨŨŨŨϠ٠ڠ٠٠ƠäΠϠƠäΠϠƠäΠϠѠԠĠ͠ӠƠӍؠƠäΠϠƠäΠϠƠäΠϠŨŨŨϠŨŨŨŨԽΠϠ ԠԠӠٯΩƠ٢Π͠͠ԠĤңϠԠĤң ԠŠӠٯΩĤƠĤ٢ΠϠԠԠԢԠԠԺŠ̮¨ԠԺϠӮ¨ԠԺŠҠŠӮ¨ԠƠ͠ŠԢԠԠԮ¤¨¤Ԡέŭ٤¨¤Ԡ̠٤¨¤ҵԠźͤԠźԤԠͺƤԠԠҠƠӺԠǠҺ¤ԠҠƠӺäԠԠŠ¨جԠϠàéөҠנ ԠàΠ͠ԠӍ͠ԠŠؤΠӢԠ¨ΠؤؤԠҤԠԠ¤جҤԠԠƠؠҠؠΠϠ¨جԠϠө¨جԠàө¨جԠàө٢ҠǤ٢Π Ϡ͠ŠؠؠƠؠĠŤ΢ҠؠĠǤ΢ҠؠΠ¤جҤԠҠө¨ج׍¤جƠؠΠԠԠϠŠ ˠΤҤؠԠΠIJԠΠ  ƠؠΠƠؠΠϠƠŤϠǠӍààΠ͠ǠŠΠϠǠӍààΠƠΠIJةԠؠŠԠȠԠФ̠ؠˠ̠ԠϠŢؠˠƠؠΠŠƠؠΠԨӲϠ͠ǠŠǠҍϠϠΠ͠ǠҠԍƠؠĠ Π ƠؠĠ Π Ơ ĠؠΠ  ƠؠĠȤ٢Π̠ԠԠȠŠŠԠŠ(1010):F3(1011):F4(1012):9ZF1010,3:1011,3:1012,166@9dFL98J19010R9=Jg9BJ(222)255Č771t9LJ216,0:~9@ 0149PÀ9BY B. SHON 5/15/83./15/83BĤŢ ԠĠƠԠԠٯΩؤƠؤ٢ΠԠ̠ ԠԠĤŢԠĤң̠͠ԠōԠŠˠΠӠξԠҠӠ٠Ҡ٠ҠծؠˠƠؠΠŠؠؠƠؠΠŠ ̠  ԠΠҠɠϠƠΠؤɩȨɩΠԠèȨɩΠؤɩԠؤɩԠԠΠ ԠԤŠԠΠӠˮԠԠԠĠϠƠؤɩίΠؤɩؤɩԠ ϠҠɠϠĠȨɩԠΠҠɠϠԠؤɩԩԠ¨Р Ӣ¨Ţ¨Ԣ¨٢¨Ӣ¨ҠŢҠɠϠԠԠԠԠĤ΢ԤԠĤĢԤ Ҡ¨ӺҠɠϠРԠ¨ФɩԠԠͺƤ¨ФԠԠԠިӢ¨Ӡԩ¨ԠŰŠŠԠĤңؤ٠ƠӢԠ¨ΠؤؤԠԠԠФнҠƠӢФӽҠƠӢԠźԤؠؠƠؠΠ ԠӠ٠٠ϠŢƠˠΠŠؠŠϠԠŠҠϠŠŠ¨Ţ¨Ԣ¨¨¨ҠɠϠԠԠԠ ҠϠؠԠĤ΢ԤԠĤĢԤ  ԠԠŠҠɠϠРԠФɩ¨ФɠԠŠ ԠԠިӢ¨Ţ¨ԢԠ¨Т¨¢¨ϠԠĤ٢Ԥ ФнƠӢФŽŭŢФ½ǠҢФԽԭŢФӽƠӢԠԠҠɠϠԠԠĤ΢ͤԠĤŢŠ͠٠ƠӍŠĤҤˤŠԠŠΠŠŠƠŠԮԠԠźԤҠԠäҠɠϠРƠ¤ɬίΠ¤ɬԤ¤ɬΠ¤ɬԠ¤ɬԠԠ¨Ԡ¨Ԡ¨ԠĤŢ Ϡ ΍΍ٍ ITEMS#+NX1!#+C$"3"ī110194#+C$"4"ī11021G#+C$"5"ī11023`# +E(1)0:E(2)0:E(3)0k# +11025# +E(1)0:E(2)0:E(3)0:E(4)0#+11025#+E(1)0:E(2)0:E(3)0:E(4)0:E(5)0#+11025#+Y0#+Z0#+YY1#+C$"3"ī11040$+C$"4Ԡ̽ԠӢ¨ŽԠӢԠӽŠӢ¨ѽԢԠԠΠƠ֠Π֠ΠԠ¨ΠؤؤΠ͠ҠԠōԠҠϠκԠĤɩԠԠԠĤŢԠĤˢƤ ֺ̠  ֺΠ  ̠Ԡ̠Ԡ̠ Π ɠŠ̠Š٠ĮԠҠԧϠŬǢԠŠϠΠϠծؤƠؤԢΠԠĤԠĤˢƤԠĤŢƤԠĤ΢ƤԠĤŢƤҠɠԠԻ¨ɠԺ ԠԠ̠ƠʠΠԠƠԠΠΠ֠ˠ  ֺΠ֠ˠ ̠ ԠĠԠԠԠĠԻɠԺ ԠŠϺؤƠؤΠ ˠ̠ϠƠؤΠĤԩؤ ˠ̠аΠ ԠؤԠĢԠԠӠ٠٠ϠŢ Ϡ ԠξϠŢԠӠԢԠҠӠŠĢ ֺ̠ʠԠԠԠǠԠؤ ƠؤΠ ֺϠƠؤΠԠϠƠ̠ؤΠΠƠ̠ؤΠԠ̠ؤϠ ƠԠƠˠΠŠΠ֠ˠ ԠҠĠҠĠҢԠξ̠ΠǠԠԠ̠ΠϠՍ ֺ̠ɩ̠Π͠ȍʠΠˠʺɠϠˠʠɍƠؤĤ˩ΠˠʠɺƠˠΠƠؤĤ˩ΠɠɠϠԠ˺ΠΠԠРϠƠˠΠƠˠΠŠƠˠΠΠƠʠΠŠԠĤԠϠ΍Ԡɻ¨ʠʠ ƠʠΠԠʠƠˠΠŠ ԠԠ֠ˠ  ֺΠƠˠԠҠӠԯРǢ ֺ̠ʠԠԠԠԠԻ¨ɠԺ  ԠԠƠʠΠԠƠԠΠΠԠϠҠɠԠ̠ؤϠ ƠԠΠ ԠؤԠĢԠԠӠ٠٠ϠŢ Ϡ ԠŠҠӠŠӢԠξӠǢǠԠԠ̠ΠϠՍ ֺ̠ԠԠǠԠؤ ƠؤΠƠؤΠԠϠƠ̠ؤΠΠƠ̠ؤΠٍٍ΍"+NX1"+C$"3"ī11019."+C$"4"ī11021A"+C$"5"ī11023Z" +E(1)0:E(2)0:E(3)0e" +11025" +E(1)0:E(2)0:E(3)0:E(4)0"+11025"+E(1)0:E(2)0:E(3)0:E(4)0:E(5)0"+11025"+Y0"+Z0"+YY1"+C$"3"ī11040#+C$"4"ī110B(2,6);"%"@!)" % CORRECT:THREE OR MORE TRIALS. ";B(2,7);"%"F!)V!)M1ī10685{!)8:"PRINT RESULTS (Y/N)? :";PA$!)PA$"Y"MM1:1:10510!)0:8:"STORE RESULTS (Y/N)? :";FD$!)FD$"Y"12000!)17!* RANDOM ASSIGNMENTS OF ITEMS1);36);B$(3,1)H J)" MEAN-RESPONSE-TIME...... ";B$(1,3);36);B$(3,3) ^)" TOTAL TIME.............. ";B$(1,4);36);B$(3,4) r) )"TREATMENT" ) )" % CORRECT:FIRST TRIAL.......... ";B(2,5);"%" !)" % CORRECT:SECOND TRIAL......... ";(X$)2);X$)$)"NAME:";QNM$6")"DATE:";QDT$I')"PROGRAM:";F$i():"# OF PRESENTATIONS:";A$))"BEGINNING #:";B$*)"# OF SELECTIONS:";C$,)1)"BASERATE PRE POST"3) 6)" % CORRECT............... ";B$(1,T100.5)100)#?%XX1XX3ī9540A@%B(XX,5)((ROPS)100.5)_A%B(XX,6)((OCPS)100.5)}B%B(XX,7)((TCPS)100.5)C%B(XX,8)(((ROOCTC)(PS))100.5)D%R0:W0:B0:BT0:TC0N%) PRINT RESULTS )M0) )X$"RESULTS":;20:9500d#XX310500&n#XX3ī9090@x#E$"Y"G$"Y"İ10500J#7000b% ACCUMULATE DATAn&%XXXX1+%(XX1E$"N")(XX3G$"N")XX295350%B$(XX,1)(((RPS)100.5))"%"9%B(XX,2)W:%B$(XX,3)((BT100.5)100)>%B$(XX,4)((T ANSWERSv OCOC1 E COUNTING MORE THAN TWO WRONG ANSWERSQ TCTC1W t4!RD2(X)(X100.5)100>!16368,0:T0::AP$;:H!X(16384):X127TT1:8520R!16368,0:(36)W!AN$(X128)\!TRD2(T35)f!(#:Z#3000AB0XX1İ8200AB0'XX1Č818b:" PUSH THE ";::"SPACE BAR";::" TO CONTINUE";~X(16384):X128816216368,0:X1608162YT(BA)S27050 COUNTING ONE WRONG ANSWER RORO1 l COUNTING FOR TWO WRONG,Q):C$"4"ī8090210:"5) ";FS$(CT,PD)>20:40OS20:AP$" "i20:19:8500:S2S2TA(AN$):A(C$)A18115AN$:AP$AN$ANXİ5000ANXK1ī8115ANXİ6000XX1AB1İ8300XX1AB2İ8400 #"; eBAjXX1!+@::]rAE(1)1:BE(2)1:CE(3)1:QE(4)1:PDE(5)1s6:17:FS$(CT,1)10:10:"1) ";FS$(CT,A)10:"2) ";FS$(CT,B)10:"3) ";FS$(CT,C)C$"3"ī809010:"4) ";FS$(CTONS ARE THE SAME!BAPSī90000C(BA,1)SB?BA07136LTB1BAdCTC(TB,1)ġ:7050lTBvSBCT|XX0E$"N"XX1LXX0ĺ"PRE-BASERATE #";VXX1ĺ"TREATMENT #";[XX2G$"N"10500`XX2ĺ"POST-BASERATE0(X$)2);X$;" "#)X:6PS(A$)CTE(B$)PSEPSTEYBA0mCT((1)SE)1CT(TE)CT(SE)ī70507100BABA1K0BAPSī90007400110008000 USED TO MAKE SURE NO TWO PRESENTATIG RESPONSES WW1"ABAB1[XX1:X$"INCORRECT,TRY AGAIN"::;20(X$)2);X$;kXX1ī5035yXX1K1HN150:A(16336):HN5025p COUNTING CORRECT RESPONSESzK1ī6030RR1XX1ĺ:X$"CORRECT":;2COMPUTER PRODUCTS,INC.Dٍٍ΍ 17* COUNTING WRONG RESPONSES 4WW1@ABAB1yXX1:X$"INCORRECT,TRY AGAIN"::;20(X$)2);X$;XX1ī5035XX1K1H$"Y"āHN150:A(16336):5025p COUNTING CORRECT RESPONSESzK1ī6030$hG$"Y"G$"N"ī4190&m41309r36:17:"";H$SwH$"Y"H$"N"4210]|4130hX17|D$;"OPEN DATA"D$;"DELETE DATA"D$;"OPEN DATA"D$;"WRITE DATA"A$B$C$E$G$H$D$;"CLOSE DATA"0*FG$"7"4230+4130F,37:7:"";A$:(A$)1(A$)754140P14130y631:9:"";B$:(B$)1(B$)754150;4130@33:11:"";C$:(C$)5(C$)34160E4130J36:13:"";E$TE$"Y"E$"N"ī4170Y4130^37:15:"";G23:"6) AUDITORY REINFORCEMENT?(Y/N): ";H$8 T!3:"7) RETURN TO MENU"z"14:22:868:"SELECT(1-7):";FG$#(FG$)0(FG$)7X1$FG$"1"4140%FG$"2"4150&FG$"3"4160'FG$"4"4170(FG$"5"4190)FG$"6"4217:3:"1) NUMBER OF PRESENTATIONS(1-75): ";A$6`3:"2) BEGIN WITH NUMBER(1-75): ";B$f3:"3) NUMBER OF SELECTIONS(3-5): ";C$3:"4) PRE-TREATMENT BASERATE?(Y/N): ";E$3:"5) POST-TREATMENT BASERATE?(Y/N): ";G$16368,0:X1601460!17M CALCULATE THE MEAN-TIME-OF-RESPONSE[ TT0:BT0h PS(A$)t T1PS TTTTYT(T) T BTTTPS  D$(4): CTRL-D LEARNING PARAMETERS:X02:10:"LEARNING PARAMETERS"0d.n" 3) PRESS THE BACK ARROW KEY TO "Ox" CHANGE YOUR ANSWER."U" 4) PRESS ";::"SPACE BAR";::" TO CONTINUE."5:"PRESS ";::"SPACE BAR";::" TO RETURN TO MENU ":38:18X(16384):X1281460TODAY'S DATE:""16:2:"";QNM$614:4:"";QDT$<Q INSTRUCTIONSWo(14:"INSTRUCTIONS"25:" 1) MATCH THE TARGET WORD WITH"<" THE BEST SELECTION."FP" 2) TYPE THE NUMBER OF THAT"Z" SELECTION."F$"ASSOCIATED NOUNS")D$;"OPEN";F$;D$;"READ";F$CN0PXZ175\ZX16fNN1vFS$(XZ,ZX)|D$;"CLOSE";F$I140:"*";::"*";40);"*";: USERS NAME2:"TYPE YOUR NAME:""21(X$)2);X$;40);"*";^ `X$"SOUTHWESTERN SOFTWARE SYSTEMS":"*";21(X$)2);X$;40);"*";v ~1210:1210:1200:  ASSIGNMENT TO ARRAY D$(4): CTRL-D D$;"OPEN DATA" D$;"READ DATA" A$,B$,C$,E$,G$,H$ D$;"CLOSE DATA"I13:1210:8 >X$"BY":"*";21(X$)2);X$;40);"*";B ?1210 @X$"BARBARA MAJOR M.S. & KENT WILSON PH.D.":"*";21(X$)2);X$;40);"*"; A1210:1210 LX$"(C) COPYRIGHT 1983":"*";20(X$)2);X$;40);"*"; VX$"ALL RIGHTS RESERVED":"*";768I,0::  TITLE FRAME& - 2= 1200:1210z $X$"COMPUTERIZED READING":"*";21(X$)2);X$;40);"*"; .X$"FOR APHASICS:":"*";21(X$)2);X$;40);"*"; 31210:1210 8X$"ASSOCIATED NOUNS":"*";21(X$)2);X$;40);"*"; =BD$"6"ī900 6:12307 T0:XXT:ROT:OCT:TCTc X$"N/A":I14:B$(1,I)X$:B$(3,I)X$:m 7000s  5:"EXIT PROGRAM (Y/N)";:24:1 P$ P$"Y"ī925 17 5:4:"SEE YOU NEXT TIME" 1010,F2:1011,F3:1012,F4:I040:CHANGE LEARNING PARAMETERS"! E " (5) SUMMARY OF RESULTS"K i " (6) EXIT PROGRAM"o 22:11:"SELECT (1-6):";:868:"";BD$:X(BD$):X1X6197 BD$"1"1300 BD$"3"17000 BD$"4"ī3500 BD$"5"ī15000 ٍٍ΍!+E(2)0E(2)U:E(2)0E(3)0ī110358$C+UE(2)ī11035K$D+C$"3"ī11090t$H+E(3)0E(3)U:E(3)0E(4)0ī11035$M+UE(3)ī11035$N+C$"4"ī11092$O+E(4)0E(4)U:E(4)0E(5)0ī11035$P+UE(4)ī11035$Q+C$"5"ī11094$R+E(3)U$S+11095ōҍ΍ō̍΍ҍ΍ōōٍ͍΍ōɍԍ΍ԍōԍԍՍӍҍԍԍҍōԍٍōٍ̍΍̍ō΍ōԍȍˍōǍō΍ǍЍҍԍčԍԍԍԍҍҍ΍ōٍԍ̍̍Í΍΍ٍčōōԍ̍΍΍ōōčҍ׍č΍ٍҍٍ͍΍čōٍ̍ԍӍԍōӍٍ׍čōÍˍҍ͍ōÍǍč΍΍ȍōȍҍōǍōō͍Ǎˍٍō̍ōӍō΍ԍ̍ōǍōԍԍӍԍčōōҍ΍ҍōԍčҍ΍ˍōōԍӍˍōƍōٍ΍ˍ̍ҍӍō΍ҍЍҍ΍ōō̍ԍȍ΍ōٍٍōԍ΍ˍԍҍԍōˍƍōԍ΍čȍٍӍčӍ΍͍׍ҍōˍٍ͍΍΍ҍ΍ōō̍ҍƍčٍˍ΍ٍҍōԍԍٍҍҍōōōԍԍōҍҍčԍōō΍ččˍҍ΍ҍԍĠԍč΍؍ԍ΍ԍҍԍҍ΍Ѝҍč΍ōčЍύӍōōčԍōҍ͍ҍԍȍō΍ōÍōȍƍōԍ΍͍̍Ѝčōҍōƍ̍ōӍԍččōō׍ҍЍǍ͍ˍ΍ٍˍȍЍ΍΍΍ҍԍˍ΍̍ōЍҍ̍Ӎٍˍҍ̍ōˍԍҍҍԍōҍōōȍōЍԍٍ΍ҍҍǍҍč̍ōٍ͍̍΍ԍҍЍō΍ٍҍٍȍōύ΍΍ҍ΍ōōԍ؍ō΍ҍҍˍȍԍ׍ōӍӍō΍Ǎōҍ׍ōōӍٍҍҍ׍ōōҍƍ΍ӍЍӍӍˍԍˍҍ̍ҍō΍ˍύԍōٍōٍԍԍӍҍčԍҍύÍǍōԍԍ̍ҍȍˍύ" " " " """"""""ISTRT:17362:"CHANGE TO: ";X$B6DX$"!"Ģ(37)1:958:17620S6DX$""17600m6DFS$((I6.011),J)X$6D(37)1:868:STRT;5);:ISTRT:17362:STRTSTRT1:868:J6ĺ6DSTRTN175606DCV(37)1:17690:CV:7DCV(37)1:1:868:17680::$,;D$"OPEN"QPT$:D$"READ"QPT$T,;15600:I59:X$(I)"N/A"X$(I)X$(I)"%"h,;:15630:15310,