8L2C)pJJJJ IH(ȱH:=IH[H`@HcH  $ +   I/H`JLNGȄBȄF aK  haaFF  mJm# KKJ UJ )J ۈ) ;J3ȱJFȱJGJKaȄM  aaNNJFLGJL LCe! H$q!r! c&L*!M8tl # ) y!s!(&s!t! c&E )?  @ e!l!0 $l!0u!v! c&-) &ύw!x! c&Эb)0I0 ( d!N)Gi/ h!4 )TIMED.TXT\LESSON1R4eRPD1.1TITLES6 iSOUND.3B0U"SRW.Y'THIRTYK'EYE.TXT AUXCLEAR'ART.TXTSPEED1PP' &PRODOS<P! !,BASIC.SYSTEM'(P! o'STARTUP=PINPUT<-PC'APINTRO@k.JERRYZ >dLԡm#i㰼m#iЕOLԡȱfg hi !dLԡ憦  Ljmkm l y`2 Lԡ8(Je稽)ʈ@LLnSOS BOOT 1.1 SOS.KERNEL SOS KRNLI/O ERRORFILE 'SOS.KERNEL' NOT FOUND%INVALID KERNEL FILE: xةw,@  ȱlmi8#)!)? &PRODOS `DaElH$?EGvѶK+`L HHLy XP LM ŠϠĠӠS)*+,+`F)) (*=GJFjJJA QE'+ '== `@ STSP8QSS8 m P o R(8Rn!o!p! k! iL X%>!L;!ΠΠҠ`}!!!"!!!l4"# G$YO!-e(eR9B}PBiB  !"#$%@~@}J@` ߩ%S @ ~`EhhhѺ0 h ѐ# ѐ ѐ ѐ 0 HϭэLпllllhh8` QSTV'P،h@ihAiȱ@JJJJq@)@%vȱ@Hȱ@Ah@E@c%e J) LxL LxJiB LxJ) <ҩxNhHHHHL(  аƠx@BEOD  а(`( C)CJJJlBJ,~آ <B*IBGF08Lé'+8H <(h`@؍L3<>=?<>CAB@?A` / L  <>` ڢF]PL8i m L   4< L  BLRAM' hLDLHB-4F 1"aɿ LL@ Nϰ H  @h( L Lh  @`bLJCAB@=?,<ʆ>*=?BC8 é&'112` ( < *? ( < (? ( < (? ( <*? * **? *? *? ( < *? ( <Lg& 'L&8ei` ,$`ee` `<( '<( '` ' ' '`hh8`8`=(>(F(`}N(`e`H)hJJ'0JJ)` (<  )1& ` (Xp< @1& )m1&1&.1&4& M1&i  ``rȱȱȱȱ0]cȱeem<(ȱ=(ȱ>(=(ȱF(=(ȱN( '<( z' #'Lg&`L' 'L& ' 8f ZHH)hh8JhJJJJJ '&H(&8H) 12 (j21 h!hH h %)Ђ12H)M0 h10200I20h2 9&`L#`)&!2"L  :8! ȱɈ 5   8 0 8 `0 / x X$$ $&$0`ŠӠέԠŠҬîʎ1DžϠ)&ʈ0  0ŠϠĠ͢Š͠͠ϠŠŠϠĠخ͠ YYZLYLYLY뿩 8@  *$ MNЩUM  LPN!-RB}PBiB ,m# m# J Qڨ)̰n]e мȱ ; ̀𩠙< iO P F V >Z SY ɘL` X _ [ V7 c L '0%O '8O JmO * 0ōҍJJJJ ɺi) ɺiL9Ҏw s)?ef t Ұs Ӱ s  |Ґ `l@Hȱ@I|HXAT^^ȱH ɯ|ȩxz^5H)/@a)_xx .0 :A[8@`,xx^x}z}Б|` Ґ L` א@>)I3|8^_0`1a`K8`@Nȱ@O@ lIiNȽN)/ȩ/N`@[ WHJjjjRhA &'KI0JH) ) )Wв<J8` GR悔0FRZ $ ӭ+j ;ސHR  4Rh8` ߰Q R@`ZWSSZ (RS W )8`)i п`  H  RFG`BH TRFG`H RhHBF  GxDER0r0C а(`(8` L*J R :"L ݢH R : R9` א@ P8`RSB8` RJJJJ=HIH IL9߅FHGI ѭlJkjHIH;7IRJJ Zߐ3HIHIL|ߩJKJK`FHIG ߰( ߬RȢMjJLk)eKM`R)` J FJZk ߰$Z0 ߰ZJFJL8`JGBJ T(`(8`R@`M8`R8@hʈIR)Fk8FF lL|߹ LߠRC8`V)@ iR)Fl8FVzkJ l_ F Lr߹) +V&lJ(b .RFG/8` .lJFd eeQFG`QJJJJi LWݩH8`Qf ݰQfe0 ݰ Q c`e ݰe`fQiygihB0Hf0gFhG ݪh0`שB*xEDr0C [` FG `QJJJJ`\HQ\hn)[N\jN\jN\jbN\.d WݰHi\ ݰ;\Qf ݰ*bNd[ ee`Z8` Wݰ#ddc c 5ݐ`bcG .G .G .G8d*JFG'(`)P P8ʈ` ۰0)i `uv8`QR ܍\FG[ ݰNQFG ݰ< \0 FGLۮQ[0 GF8TU`H8` ܹ ,[F G 8\z Wڭ01 E8`1݊0 iڰ$Q0̩GF ݰ ڰ ڰ`12)1`0Q`ȎQi 0U`z)x8`x`Q ېW }װG =۰A)H Qʈh0)*xzȱHx`Z8eHI ٰSB0 ؠQFXʈ pٌz`z8mz0_`,|{0H {hi LٍxȽxhQ0GF{z8y`FaG ݰ ڰ`Q0{Q8`X*؅IFG ݐ`[[ p8D`F` ilH)HFȍHG ݰ$%X&Y!8* J8` Lע  )I '`8ZiFG`Z*؅IH3H [( [ )WG ݰ%" ݰX)Im'F(G)* ݰ4 ֭ $H ݰ%HFFHGHG ݐ`R8`ͮͯ)` װ H` /ٰR(*؅IHHЍ@`[8W ؐeXW Y* Y=ȱ@/ȱ@9;<2DE)7I0 '*5 ܰ701FG ݰ( ְLݩI mIH` @= t=0FG ݰ ֬HFG ݰFF@ 0 [ [LթK8` I8`FHGH ܪhGhF ݰբFF芝 ݰFG ݮI m IHHyHȘI ݰLԩ` ՠ @/@ 7@Юz)mzʈ@i Q`RC8` @ l3Nz@) Wڎ} ԭziz}`0 iڰ0GF ݰ#Q0 ڰW,u0 Q ۩.H hȑNWȮvNuW8`xzNxz0NN` װG8`h)N$%Rjmkn LL⭚ L l L ;ް  0pnJo )@rNJOK ;ްiKKnnkk llIJo m nJФ̭lJkjHFIH rHIGrxKE а((H hH h8`8m@ȭn@L;ެR8NjNO 8q pjJLm`nRnʱLN.MOklMEKP/nMEKnLCL-qMp Okl,jpmeNNO(`JNKORL ;ް/  0P L8 | ZߠRJ`L@mȱ@nR LL`BLLТТТТТТТТТТТТТТТCOPR. APPLE,1983LM Mh@8nЍLЭ 0J @L:LhhhhIL@Ae P o**ӂӹ]|wKIJK,-NOPQRSuHUSTON!' @   !"#$Ԡ͠ˠĠԠ ]XXKR Ko`V8`no` & on ]I9XX`)HJJJh`OeNeO࿰ ]9XАO`@ȭ@` ON CNJKO`HHHHхЅG ݐ ` ~ qͬ ݰFG ݐ` ~* q% L`FGLݮ 'ܰ8`FHGH] 'ܰ]hGhF`@Bɼ>K@J5 ]9X(KI0F1G ݰ:%&N  ݰ# 'ܰFG ݐ`J HHR hh` 0 @ LFL q[̄T 0̄ȩF𸽒G ݰ 0` ݰF0F1G ݰy &밀L֢ȹLݠ@ȅH@ILҠ,|0` װJ WP8`TU fېH8,=)N 0 [01)@L` b讀 'ܰݩ ݰ L֬Qyy`O Wݰ @LL א=@ 5ȹQP8` &iQ` C0 5B C)yz( ȹ`y8myz8mz@8` װG8`F  װ P=)@N8`)@J 5yy))ꭁJJJJR RȢjI ;ސh(8H Nh(`R@`@Rȱ@ ` אB@8ZTUQ qۮQUT?H>8T2hU3JJJJ)@` װ%I -=) t 0@)N8``N8`  ) NRȢJ@jJjR@ʈLP 簞KIJHRȢjRjjk)lJn 8 ΄R  bH8R Ri ~8`L Ӑ L~ Ӱ )ܹ0 )p )@ )  R0FG ݰ حFG ׬R234 / F) F ְR)f ݰ`H@h~`h`R IhHIhH  i ` ܰ ii` )0CGHFHBFG ЪhFhG`@5~R͔ M @BRi ׭~` .R 4#R0 iڮQ)`L@.~R 簪HIFHR  PLnEnʱNLMOklMEKP%nMEKnL2 Okl,jm PjeNNO P(` R  F .AlJFHIGHIR HIHI`  .` .AR HF HG`@Nȱ@OR`RjM}FIF` tJMF t 3 tJF` R` H  ^h)N@ N; L  ;ް$ )bJTU f۰ ) H BhL ) . )lJkjIGLLՐ`BLڑL COPYRIGHT APPLE, 1983 h@ 0J @L:HUSTONP8H  ): e: y8鰕:Jjjj<)yi8i;i(*=>hP8`;Zx3QTTSRWVUHEVhEhH)IWHPHHHAHHHLaVEWLӿ&()*+,-./0123456789:! !5).莀/ ! !!!!! !!$ ! "<" !!뭳!!!!ILYL 8!9!詍` ! !ՠî򠠠!STARTUP/p$# {  { / XXύX?klmnÍoL) !6L'!(0`670! = ***)<JJH !h穖tp% !Z/݀!!'  &@DEF   %LҠؠӠ΢ϠԩҠŠƠԠԠŠӢɯϠҠůȠԠĠ à ɘɉ ɈL :Lɍ)ې)ɮ۰ɺH h 'ĝL  LL L)'L L L'L  (L(L $ʩ $$ $L `ީ % XʩXύX X A %  % ɍNH hɛɘɉɈ $ Lc :Lcې)ɮ۰ɺ'Ɲ Lc  : X i % $ɛ$8V%&8V)HV)hH)hHIhդD?DRIDQD); ?JDQD]`MY pY)p  p`8L:HhHh VY>:Y)`;R?AJ;<ȰY)`Y?)`ȐҰ ;HhHh=`Hh `Hh`DEiȍ01ZsDE8T8Wpq 7I꽌ɪ꽌ɭ蠪:VE:8`]V]H)]V])]T])] >8hUD` Y`> Hh݌(`HCJJJJ)*h`0($ p,&"op8`kkV꽌ɪɖxl*k-kmMl 꽌ɪ`8` *L o % YZoY 3 NZ`rZLkZq8r7IZiZkk 8 s q | kн Z)*>>` @ $(,048<@DHLPTX\`dh 0ުlptx| FGV*& .V  JJJJH :h Ei :EX`'8`jWC)p> pCYY 轊( ( BV ( p0 \BiJ @i> i'j:ZH i@ioZZH h ȭnWǥBJ 8X` +>ŠϠŠà͠ӠàԠŬ Gh  l( G쳼󩭙Llid l`H) ZhJJJJ ɺi`  ` .8 `O`S  [AI-Ly !B C ⟩VW 5L壥>  5e>>?́?`>ȥj>>m>` T`m8injkiljo풼i>?Ek?>Q>;>:8o>oȑ>ppȑ>> :op` {KpnͶ @p;=po:i>?Ek?!>Q>>>̀ `` > ̀ `e>>?́?>?Emn(>e>ȱ>e?>Q>ؠ> ie>>?`|;}=:<~:<=;`||m}K`JJJJ8`轚K)` 7#hhL"Jپھ pHJh` {!hgt}~p  `~t}p8n~ni}tpi~~tsLo8pinii>j?k̈́>~|ppn + {pnI:L ؅30,3L]8^933LAAJL ةޘг uv $ 8LЌ Le p>?@`>?@`BQ8`e 矮K ⟩ 䟢 춼LK  z KɍKL"?`  L@3 @LtJ)s@J % `͘?s?,E30ɍФ3 +E3HD F3 Ʉ%h3 M +E  LthɍLL3`3,A0s0% I`O>0O  矢POپھ p AH־Ǿh۰8L"־Jjjjɾ)Ⱦ8 + OL L$L>(F`־ؾپھ׾` Ʉ +KDEF L LK K% ʽ  ٚ,S` w $݅3`(l8L"3L>(Ƀ,`3,G0]ɾ ` w`پ_پ p _پ׾`>( p۾m׾) W)ʩ@`ɾ>(O puȾ ɾ-O c־Jjjj 왻ɠ, XLޭBDEF޾ p 7 ޾ p($ذ (0 U( L?ԦʚLeةީ s +  L ,FL,DLE,C0!3 > Ɉ 3ɾL(3ɾ;Ƀ UB94 H06172839h` 97L75v^͘ ?/( ?LKLLɍ$?`? ɍɥAH93827160hH46576879h`,C Lޛ $0. ɍ  ,S0 ?@ L L btR莪Ta 0a [HT ph(K,Lǧ/A5ʩJ _V zrTJ6LySLا [AJ w@V k38`J" zʩ @V zЧ z ( zЖabT)!J B8`@U)9VJ T)h*I/W) VV }>S ?@$I0 U)VJ *T)`l8`a HbIJhjǾȾɾ p٭b=aIe f`8` yP־ǾҾ,G0C =W)_``\"׾پӾؾھ pD`־ǾY׾ؾOW)ݩȾɾʾ pD`8`W)CB) ۵ 5W) )W)@! pZ}ȾȾ޾,N0MHhHh p' ,N HCNh`M`M N `޾Lp yh־Ҿ,G0^W)TP) ecfdپھ׾ؾӾ p$c d pccddީ 8`ȾɾʾNfne`_ 2Ͼ pH h8`jGMоM  G):_`蹀:`V)8`MN; ;`;C N8` G)̀#:蹀:`V)R y pH h8`Ͼо־ǾҾ_` EӾ pW) |LC`C N `9V) ß ` V) y޾ p` y (8` 8`8`(W)`_V)Ij!؍Í`_ jЭW)з#Ͼ p о־޾Ǿ` 8` 8`ɾ)ɾ̸ ɾɾ0miȾ p pY)ικ`lP y*,N!ǾȾɾʾ pǾ~H Uh8`8`,C U  8` 2ȾɾM$ mHݓǾ phϾ A ԟ ` ])Y 񩢍`Ⱦɾ0Ǿ p)莼 * 6 w= l& l8Hh l` 6Y׾ؾ+پھ p|پɾʾ`HV)jh츾$-ˌھپLp k V)@W0!XY aX6Y7` a YX`X:Y;τ<:: <`:8`'OV)Jj *f a  ԟ  ԟ ⟭ + +:ji  ԟɃ B , ԩ p`SW)0پȾھɾ p p 3LjÍ L I 9 1׾ؾ  p p 3 H h(`׾ؾ`  ߭׾t8퍼mؾŰ펼t폼 L8` `F`4W)ɐ/XYjV) *8` h e`l׾ XYW0V):W׾ؾ_`)0%I0)3]8X^YȰ8` 8` p Ⱦɾʾ8`پھW)@%ZȾ pSɐ"jÍgh I @8gȾhɾʾg׾hؾ  p hgͺ칾`L3V)jC mMjà Lp `VJJ°LyLp *)< LA * LAW)8VJưϥ3 ⟢BT eօ ܬ L s򩣍S3 Ly B# e $L? L Y kimljn`  pg׾mȾXhؾmɾYtѮȾɾ YX`8gM CgIY2m*b6>BSAVERIFYBLOADELETECATALOGOPENWRITEXECREATEFRES7 APINTRO ... 5-01-84...JC version OKS16368:KB16384i(4)"BLOADSOUND.3B0"S$"":TP$"_______________________________________________________________________________"CENTER(X)((80X)2)TRUE%1:FALSE%0 (1" 300" (4)"OPEN";FI$6 (4)"READ";FI$> B$F B$O 220` ,(4)"CLOSE"k 6216,0{ ;(4)"PR#0" @170 : CLEAR 40 COLUMN SCREEN I763767:D:I,D:I: POKE IN MOVE ROUTINE 60,0:61,4: SOURCE START $0400 & Z(4)"RUN APINTRO"+ _(4)"- FILER"8 dSTARTUPN n(4)"BRUN INPUT"V x:` }B$""g 4 "INSERT FILE DISK IN DRIVE 1 AND PRESS" " RETURN" A$ (4)"CAT,D1" "FILE TO PRINT:"; "";FI$ (4)"PR#;> ` H R hȥoȥp`xpress written consent of BBP."2 XX12000:: 90W 10:"OPTIONS AVAILABLE"v 5:10:"1. SPEED READING" (::10:"2. MAKE COPIES OF DISKS" 2::10:"3. PRINT OUT FILES" <15:"ENTER CHOICE ";CH FCH1CH310 PCH90,95,100  *** STARTUP ***!3000?S$" "J 984,0X :::: 8:S$;" This program is the sole property of" :S$;"the Bureau of Business Practice and may" :S$;"not be copied or reproduced without the"! :S$;"eL5LLL"L  KN)_ `@S8` ԠŬLL<[B?I>孓`仫6VtCicQĿUKqtVt Nʮq$6,⨁ K6, VtI=v!gNVt Vt  lg~TŠӠŠҠüϠž(+@ABCDEFGHIKLMNPSV     T[fouu~ՠٯ* PWN*]ĿNTz @n6VC/+A>@I5gN Oz @n[Dz @nd0,~z @`$仫@v$⩔,CTORENAMEBRUNLOCKCHAIN#FLUSHREADPOSITIONOMONPR#PREFIXCLOSEAPPENDx{[{0ǭ0hЫ}wA Xw­孶׭fl@@ -!S    !C- !ABELSDFRV@@ !$(19@E12)% P1941:P2942:DR943:MU944/ 936; N$(20)M (819)9160i (984)0(984)10160o ( )(984)10895 -REEDER$"":L(985):J1L:REEDER$REEDER$((985J))::1200 2HEADER$""HEADER$"Speed Reading . . . The Computer Co?ABCDEFGHIJKLMNOPQRSVXConnecticut"*I22:39:"06386":10080=JDLAY%3:10030mKLN1022:LN:34:" "::885h10:36:"Programmed"i11:39:" by "j12:38::JJ16:(19);:k13:36:"Innovative"l14:36:"Programming":15:36:"Associa34:15)::872+@10:37:"Copyright"?A11:39:"1983"_B12:38::JJ16:(19);:|C13:35:"The Bureau of"D14:37:"Business":15:37:"Practice"E17:35:"24 Rope Ferry"F18:39:"Road"G20:37:"Waterford "H21:36:"17:39:"THE",19:37:"COMPUTER"B21:38:"COURSE"M10080 DLAY%3:10030:II1221:II:36,2014(S$):S$;15):13:36,40:"A " 15:35:"SPEED READING"*17:38:"PROGRAM"+100804DLAY%3:10030:II12201:II:OF"#18:36,2017:"BUSINESS"A20:36,2017:"PRACTICE"L10080{DLAY%3:10030:II12202:II:34:15):15:36,2017:"PRESENTS"10080DLAY%3:10030:15:36,2014(S$):15)12:35:"SPEED "14:37:"READING..."DR,24:MUtJ1HANG18:%v: --------------(819)9Ģ14:36,38:"THANK":16:36,39:"YOU!":819,0:10080:MESSAGE$" Please Press .":10020:20000:120012:36,2019:"THE"14:36,2018:"BUREAU"16:36,2020:"I5590#0LS%3OFFSET1:590<:LS%8OFFSET1:590SDLS%3LS%8Q$""yNI4:36,20(LS%4)3OFFSET:Q$;XI9:36,31:(186);17);(186);]P1,2416(I1):P2,(P1):DR,4:MUblI9:32:": : : : : : : : : :"; qP1,0:P2,0: ";118:36,20(LS%4)3:JJ13:(127);:PP1,208:P2,208:DR,24:MUdII1HANG18:y --------------II24:II:36,20(LS%4)3:S$;" ":JJ180(II4)::9:32:": : : : : : : : : :"I114OFFSET0:Q$" " &: ---------------E2:36,20(LS%4)3:JJ13:(127);:e3:36,20(LS%4)3:" ";II416:II:36,20(LS%4)3:(32);(B$(LS%),II3,1);(32)JJ120:P1,1212(II1):P2,(P1):DR,6:MU17:36,20(LS%4)3:" 36,20J43:JJ13:(32);::fhII114:3II:36,20J43::" ";(B$(J),II,1);" ";::" ";:r17:36,20J43::JJ13:(32);::|18:36,20J43::JJ13:(127);::P1,19210.66(J1):P2,(P1):DR,12:MUII1HANG16shelf \/ 936 S$""@ 19:21::J141:(92);:: ,20:21:4);::JJ13:(92);:::27);::JJ13:(92);:: 1P1,0:P2,0:DR,48:MU 6I1HANG5: @ ------------ JJ110 T2:36,20J43::JJ13:(127);:"^3:"MELVILLE "n B$(5)"HEMINGWAY ":B$(6)"HAWTHORNE ":B$(7)"WHITMAN ":B$(8)"THOREAU " B$(9)"SPEED READING":B$(10)"DICKINSON " -------------- LS%9:HANG45 270 LS%0:HANG10 650 ------------ book(8)(8);. r(A$)1A$(A$,(A$)1):105F s(A$)1A$"":105V v10090:105q x(AA$)32İ10090:105 (A$)MAXLİ10090:105 AA$;:A$A$AA$:105 " "(8);: B$(1)"DICKENS ":B$(2)"MICHENER ":B$(3)"STEINBECK ":B$(4)urse"3 31:36,CENTER((HEADER$)):" ";HEADER$9 4U <Y%:X%:PROMPT$;" ";:r ZP1,24:P2,24:DR,12:MUx [ dA$"":AA$"" i"_"(8);:10040 lAA$(32)SM%FALSE%:151 nAA$(13)SM%FALSE%:151 oAA$(8)120 q(A$)0ĺ" ";tes""m17:36:"One Airport "7n18:39:"Place"Qo20:37:"Princeton "kp21:37:"New Jersey"q22:39:"08540":10080rDLAY%3:10030sLN1022:LN:34:" "::832u16:36:" WELCOME! ";vK13:KK192968:P1,KK:P2,KK:DR,8:MU::FwKK192568:P1,KK:P2,KK:DR,8:MU:cxP1,47:P2,47:DR,48:MUzMESSAGE$"Please Press The To Begin.":10020|AA$(32)890936:5010200V --------------`50j9:25:"Welcome ToS&2230:START%K%:EDGE%::C$(K%);:EDGE%4:G$(K%);::2220:AA$(13)2125Y&c&2125& ------- confirm & clear \/&19:1:958& ------- confirm & clear \/&20:28:"Press To Confirm. ":11040&!'20:23:P$ROW%1ĝ:ROW%START%:EDGE%:C$(ROW%):ROW%ROW%1^%ROW%START%:EDGE%::C$(ROW%);:o%JJ1(CH$)%A$(CH$,JJ,1)2185%JJ:A$(13)K%ROW%:2165%2195%K%(JJ1)2:ROW%START%:EDGE%:C$(ROW%);:ROW%K%&K%1K%NCH%2165$k21:22:"Press Or Just Type The Letter.";f$uROW%START%:EDGE%::C$(ROW%);::11040q$vA$AA$$wJJ1(LEG$):A$(LEG$,JJ,1)JJ40::2173$xJJ${2165$}A$DOWN$ROW%NCH%ĝ:ROW%START%:EDGE%:C$(ROW%):ROW%ROW%17%A$UFrom The Following:";9#USTART%8:EDGE%27:ROW%1:K%1b#WP1NCH%:PSTART%:EDGE%:C$(P);:#\P1NCH%:PSTART%:EDGE%4:G$(P);:#aTP%START%:BT%TP%NCH%1:LT%EDGE%1:RIGHT%EDGE%1:2105$f20:23:" Move The Cursor To Your Choice And";8$:CH$"AaBbCcDdEeFfGgHhIiJj"B"/2125: SKIP past the box suud"3 ------------- draw box \/k"4 r"9 ">Y(TP%1)(BT%1):Y:LT%:(124);:Y:RIGHT%:(124);:"C"H -------------"M936:HEADER$TT$:50#R5:25:"Please Choose CONVERTER ":B$(10)" ":HANG10:270K!11:36:TITLE$(1)c!15:35:TITLE$(2);{!17:35:TITLE$(3);!19:35:TITLE$(4);:10080:DLAY%2:10030!!936!%UP$(11):DOWN$(10)"*LEG$"AaBbCcDdEeFfGgHhIiJj"(13)UP$DOWNR":TITLE$(3)" READING":TITLE$(4)" SKILLS":1440:51000:60000 TITLE$(1)"":TITLE$(2)" MAGIC":TITLE$(3)" CONVERTER ":TITLE$(4)"":1440:51000:60000  --------- get "book" for lesson \/4!I18:B$(I)"LESSON "(I)" "::B$(9)"SON 6 ":TITLE$(2)" PATTERN":TITLE$(3)" &":TITLE$(4)" STRUCTURE":1440:51000:60000TITLE$(1)" LESSON 7 ":TITLE$(2)" RETENTION":TITLE$(3)" &":TITLE$(4)" RECALL":1440:51000:60000E TITLE$(1)" LESSON 8 ":TITLE$(2)" EXTEND YOU36:51000:60000TITLE$(1)" LESSON 4 ":TITLE$(2)" PREREAD":TITLE$(3)" WITH A":TITLE$(4)" PURPOSE":1440:51000:60000TITLE$(1)" LESSON 5 ":TITLE$(2)" SKIM":TITLE$(3)" FOR SPEED":TITLE$(4)"":1440:51000:60000`TITLE$(1)" LESEED READING":TITLE$(4)"":1440:51000:60000~TITLE$(1)" LESSON 2 ":TITLE$(2)" READING":TITLE$(3)" HABITS":TITLE$(4)" SURVEY":1440:51000:60000TITLE$(1)" LESSON 3 ":TITLE$(2)" READ FOR":TITLE$(3)" MAIN IDEAS":TITLE$(4)"":1440:9sson Eight":C$(8)"H"=G$(9)"Magic Converter":C$(9)"I"bG$(10)"Exit Program":C$(10)"J"nNCH%10x2000LS%K%xLS%1404,1406,1408,1410,1412,1414,1416,1418,1420,62000/|TITLE$(1)" LESSON 1 ":TITLE$(2)"PRINCIPLES OF":TITLE$(3)"SP$(11)(G$(1)"Lesson One":C$(1)"A"IG$(2)"Lesson Two":C$(2)"B"lG$(3)"Lesson Three":C$(3)"C"G$(4)"Lesson Four":C$(4)"D"G$(5)"Lesson Five":C$(5)"E"G$(6)"Lesson Six":C$(6)"F"G$(7)"Lesson Seven":C$(7)"G"G$(8)"Le$"N"BB$"n"İ10090:1160M18:37:10049:JJ$"R"Ģ19:1:958:1160(JJ$(13)BB$"n")(JJ$(13)BB$"N")NWPUPIL$"Y":LS%1:1400((BB$"Y"JJ$(13))(BB$"y"JJ$(13)))120010090:1172 ------------- menu \/G$(11),C SPEED READING, ";REEDER$"!"<o30000:SR1Č936:60000ut14:25:"Have you worked with this program "~16:25:"before? (Please press Y for Yes "18:36,25:"or N for No) ";10040:BB$AA$:BB$BB$"Y"BB$"y"BB(SP$,36);:21:22:(SP$,40);:''H!_'' ================== SUBROUTINES =================}'#' ---------- space bar \/'$'24:36,CENTER((MESSAGE$)):MESSAGE$;'%'11040'''AA$(32)İ10090:10021')'(-' ------------ pause for DLAY% seconds \/(.'QQ1900DLAY%::>(2' ---------- short pause \/Q(3'I1PAUSE::(7' --------------- get a char. (w/ flashing prompt) \/(8'KS,0(9'TQTQ1:TQ10(TQ10)İ10045(:'(KB)12810041(;'AA$((KB)128((KB)127))(<')='(9563T5SJ13:10090::U5T16:19:"(Or press 'R' to make a different selection)"5ULS%9Ģ14:7:"Please place any Lesson Disk in the drive and press . ";:10040:610156V14:2:"Please place the disk containing Lesson "LS%" in the drive aUN SR"G4 IF LS% = 1 THEN PRINT CHR$ (4)"RUN /SPEED1/LESSON1" ^4(4)"RUNAPDRIVER"4G ------------- disk error \/4H216,04M936:10:16:(TP$,49(REEDER$))5R11:16::" Sorry, ";REEDER$;", you need a different disk in the drive.":0ί)L` ":DT$"--------------------------------------------------------------------------------" SL$"!#$^&|\":TRUE%1:FALSE%0:FR4 D$(4) NWPM(1150)256(1151)/ KS16368:KB SR 5-1-84](4)"BLOADSOUND.3B0":(4)"BRUNINPUT":B$"":9,254:3000cREEDER$"":LS%(984):L(985):J1L:REEDER$REEDER$((985J)):TXT$(500),I$(30),FRST%(40),NUM%(50),NUM$(50),MAGE(120),R(20) SP$" /%N936:HEADER$"":50I/*N8:25:"Would you like to continue with t/4N10:25:"the program? (Please Press Y/>N12:25:"for Yes or N for No) ";/HN10040:BB$AA$:BB$;0RNBB$"Y"BB$"y"BB$"N"BB$"n"İ10090:10055:12:36,45:" ":1 (BREEDER$,J,1) = N$(J): NEXT JW.(OKR$"OK, "REEDER$".":OKBR$"OK, "BREEDER$"."e.(936:50k.(.+ -------------- get a char. (w/o flashing prompt) \/. +KS,0.!+(KB)12811041.#+AA$((KB)128((KB)127)).$+/ N ask to continue-d(J1LR:N$(J)"-"N$(J)" "N$(J1)((N$(J1))32)@-i(p-n(REEDER$"":J1LR:REEDER$REEDER$N$(J):J|-x(J1LR-(N$(J)(REEDER$,J,1):N$(J)"-"10390-(N$(J)"A"N$(J)"Z"10390-(N$(J)((N$(J))32)-(J!.(FOR J = 1 TO LR: MID$""REEDER$(13)10201:, ( --------- translate name \/],(LR(REEDER$):BREEDER$REEDER$t,((N$(1)(REEDER$,1),2(N$(1)"a"N$(1)"z"N$(1)((N$(1))32),<(J2LR,F(N$(J)(REEDER$,J,1),P(N$(J)"A"N$(J)"Z"N$(J)((N$(J))32)-Z(J:pe your first name"Y+'11:1:868:X%25:Y%11:PROMPT$"and then press :":60v+'MAXL9:10100:REEDER$A$+'(REEDER$)310230+'(REEDER$)2āK(REEDER$)21:(REEDER$,K,1)" "ī10210+'+'REEDER$(REEDER$,K):K2:,'REEDER$,128:P2,128:DR,96:MU:P1,96:P2,96:DR,96:MU8*b'`*i' ------------ input error sound \/}*j'P1,24:P2,24:DR,12:MU*o'*s' ------------- read line of input as A$ \/*t'100:*' --------- get user name \/+'7:1:868:9:20:"Please ty((TQ20)TQ20));(8);:g)A'TEMP2$"Press To Confirm.":21:36,CENTER((TEMP2$)):TEMP2$)B'TEMP$"Press 'R' To Re-Enter.":23:1:36,CENTER((TEMP$)):TEMP$:11040)C'JJ$AA$:)G'19:1:958)L')_' ---------- intro sound \/2*`'P1nd press . ";:1004006WAA$"R"1225K6ZAA$(13)İ90:61012]6\51000:60001i60936: 212VPGE%1MESSAGE$"Press or --> To Continue, <-- To Review.":273MESSAGE$"Press to Continue."20:AA$(8)PGE%1Č936:200936TXT$(LN)"STOP"277:AA$(8)FRST%(PGE%)M%:M%LN1:LNLN1:PGE%PGE%1____"'24:X::" ";MESSAGE$;::JLNFP:M%LN:FRST%(1)LN:PGE%1SVP1Q$(TXT$(LN),1):Q$"!"Q$"\"Q$"|"Q$"&"Q$"#"İ10000:260VP:20:TXT$(LN)LNLN1:VPVP2 TXT$(LN)""VPVP1TXT$(LN)"STOP"TXT$(LN)"END"q(A$)0ĺ" ";(8)(8);Ar(A$)1A$(A$,(A$)1):105Ys(A$)1A$"":105fv90:105~x(AA$)32İ90:105(A$)MAXLİ90:105AA$;:A$A$AA$:105" "(8);:XC((MESSAGE$)):23:X:"__________________________________J120:P1,48:P2,208:DR,4:MU:Z(CL)(CL):7VTZP1,24:P2,24:DR,12:MUZ[w_P1,96:P2,96:DR,48:MU}`b(9563((TQ20)TQ20))(8);:dA$"":AA$""i"_"(8);:45nAA$(13)AA$(32)SM%FALSE%:180oAA$(8)1202,116:DR,96:MUHP1,96:P2,96:DR,128:MU:P1,102:P2,102:DR,96:MU:P1,116:P2,116:DR,96:MU:P1,128:P2,128:DR,96:MUIP1,152:P2,152:DR,192:MUKPP1,96:P2,96:DR,32:MU:P1,72:P2,72:DR,32:MU:P1,96:P2,96:DR,48:MUQ1U2HEADER$""HEADER$"SPEED READING...THE COMPUTER COURSE"R 3XC((HEADER$))e 41:X:HEADER$k 7 <Y%:X%:PROMPT$;" ";: FP1,116:P2,116:DR,208:MU:J150::P1,128:P2,128:DR,255:MU:J1200::P1,128:P2,128:DR,96:MUGP1,116:P: I1940DLAY%::. #I1PAUSE::8 (KS,0R )TQTQ1:(KB)12841s *AA$((KB)128((KB)127))y + -KS,0 .TQTQ1:TQ10(TQ10)98:(KB)12846 /AA$((KB)128((KB)127)) 0AA$((AA$)32((AA$)96(AA$)123)):= D MESSAGE$""MESSAGE$"Please Press to Continue."f (FUNCT$,5)"TREAD"İ190:23 XC((MESSAGE$)):24:X:MESSAGE$; 40 AA$(8)(MESSAGE$,7)"Review."İ90:23 AA$(32)AA$(21)AA$(8)İ90:23 MESSAGE$""36:P1941:P2942:DR943:MU944z TP$"_______________________________________________________________________________" C(X)(((80X)2)) S$" " TITL$(1)"Principles of Speed Reading":TITL$(2)"Reading Habits Survey" Y ":DT$"--------------------------------------------------------------------------------" SL$"!#$^&|\":TRUE%1:FALSE%0:FR4:SPD150 D$(4):13000 NWPM(1150)256(1151) KS16368:KB16384:CL163 APDRIVER 5-02U(4)"BLOADSOUND.3B0":(4)"BRUNINPUT":B$"":9,254:4990REEDER$"":LS%(984):L(985):J1L:REEDER$REEDER$((985J)):TXT$(400),I$(30),FRST%(40),NUM%(50),NUM$(50) SP$" :210aLNFRST%(PGE%1):M%FRST%(PGE%1):M%FRST%(PGE%1):PGE%PGE%1:210: ELSE GOTO 271zTXT$(LN)"END"280AA$(8)280PGE%1FRST%(PGE%)M%:LNFRST%(PGE%1):M%FRST%(PGE%1):PGE%PGE%1:210FPLN1:,LNFP:WG0:M%LN:FRST%(1)LN:PGE%16VP1X;Q$(TXT$(LN),1):Q$"!"Q$"\"Q$"&"Q$"#"İ10000:360u@XYVP:XY:20:TXT$(LN);hLNLN1:VPVP2:VP22VPVP2iTXT$(LN)""VPVP1jFUNCT$"ASKM"TXT$(LN)"ENDM"İ20:410GkFUNCT$"ASKM"TXT$(LN)"STOPM"000:900:1050"10958" (FUNCT$,4)"SKIP"1059\"!((FUNCT$,5))0FPFP2:1059{""FPFP((FUNCT$,5)):1090"#936:FPFP1"$FUNCT$"TEXT"İ200:1090#&(FUNCT$,3)"ACC"NW%((FUNCT$,4,4)):NSCREENS%((FUNCT$,8)):WREC1:600:1090E$:LN1!B$!!TXT$(LN)B$T!LN1ĭTXT$(LN1)"EOF"TXT$(LN2)"HCODE"930i!TXT$(LN)""925z!LNLN1:915!D$;"CLOSE";FILE$:N2LL!!900!FP1:FUNCT$TXT$(FP)!FUNCT$"EOF"1056"TXT$(FP1)"RET"FILE$TXT$(FP1):51";S$ ;22:36,1:S$;7 <(A$)3"the same rate."U =(A$)2"a faster rate."s >(A$)1"a slower rate." ?(A$)1SPDSPD20 @(A$)2SPDSPD20 AMESSAGE$"":20 F HSPDSPD((FUNCT$,4))4: !::D$;"OPEN"FILE$:D$;"READ"FIL:21:" 2. 1/4 of a second?"I015:21:" 3. 1/10 of a second?"221:21:"Please enter the number of your selection: ";:45:A$AA$4(A$)1(A$)3İ90:8185FRFLSH((A$)):A$:JL831 :21:36,1:S$;"OK. This exercise is now set at:24:"(3) just about right?":818d&WRECĢ6:21:"Those letters were flashed at 1/"FR" of a"(WRECĢ6:21:"Those words were flashed at 1/"FR" of a"*8:21:"second. Do you wish to continue at:",11:21:" 1. 1/3 of a second?"!.132:(SP$,(TXT$(LN))):29"3FPFPNUM%:V FLSH(1)3:FLSH(2)4:FLSH(3)10!936:4:21:"How are you doing, "REEDER$"?"%"((LS%2JL1)WREC)Ģ6:21:"Are you finding this exercise:":11:24:"(1) too fast?":13:24:"(2) too slow?":151NL%(NUM%2)İ800:936:PAUSE4800FR:35:10:39:" "(127);:95:35zLNLN1:12:41(TXT$(LN))2:TXT$(LN)I1940FR::12:41(TXT$(LN))2:(SP$,(TXT$(LN)))DLAY%1:2912:41(TXT$(LN))2:TXT$(LN):29:12:41(TXT$(LN))N);LNLN1:VPVP22TXT$(LN)""VPVP1\TXT$(LN)"STOP"TXT$(LN)"END"61529:936:TXT$(LN)"STOP"LNLN1:610FPLN1:NUM%((FUNCT$,5)):LNFP1:FR4PAUSE1200:35:10:39:" "(127);:95:35L11NUM%L%L(FILE$,3)"ART"WREC05YNSCREENS%0NSCREENS%1[ZWREC1DLAY%(NW%(SPD60)):608]DLAY%(NW%((NWPMNWPM10)60))NSCREENS%`JL1JL0:610aJL0JL1bVP1gQ$(TXT$(LN),1):Q$"!"Q$"\"Q$"&"İ10000:660lVP1:21:TXT$(L&"İ10000:TQTQ100:5603VP1:20:TXT$(LN);G0LNLN1:VPVP2`5TXT$(LN)""VPVP1:TXT$(LN)"STOP"TXT$(LN)"END"515=20:TQTQ60:936:TXT$(LN)"STOP"LNLN1:510@580DFPLN1:TYMETQ69:GWPM(WC%TYME60):XLNFP:Č936:LNLN3:310T936:FPLN(3((FUNCT$,4)"QUIZ"))((FUNCT$,3)"ASK"):dJ1:LNLN3A$CH$(J)(A$)(CH$(J))32LNLNBR(J):936:310JJ1:425LNLNREV:936:310LNFP:TQ0:VP1Q$(TXT$(LN),1):Q$"!"Q$"\"Q$");%1:1:(FUNCT$,3)"ASK"4204J1200:K23:2:(SP$,79);A$CR$A$((CR$)32)Ģ23:30:"That's correct, "REEDER$".":80:40023:19:"I'm sorry, "REEDER$", the correct answer is "CR$".":WGWG1:8520TXT$(LN)"END",4)"QUIZ"CR$RMD$:377&vJ1NMLxBR(J)((RMD$,J13(J1),3)):JbyQUEST$TXT$(LN2)z23:C((QUEST$)):QUEST$": ";|45:A$AA$VD0:J1NM:(A$)(CH$(J))(A$)(CH$(J))32VD1VDİ90:380((A$)32((A$)90)20:936:AA$(13)FRST%(PGE%)M%:M%LN1:LNLN1:PGE%PGE%1:310qrTXT$(LN)"STOP"TXT$(LN)"END"315sTXT$(LN)"END"FUNCT$"ASK"İ20:410tINFO$TXT$(LN1):NM((INFO$,1)):J1NM:CH$(J)(INFO$,J1,1):uRMD$(INFO$,NM2):(FUNCT$9#)(FUNCT$,5)"TREAD"WC%((FUNCT$,6)):500:1090s#,FUNCT$"HCODE"SEG$TXT$(FP):FILE$TXT$(FP1):55000#-(FUNCT$,3)"SPD"İ840:1090#.FUNCT$"RATE"İ800:1090#3(FUNCT$,4)"RNDW"İ700:1090#5(FUNCT$,4)"RNDL"İ40000:10900$6(FUNCT$,3)"ASK"(FUNCT$,4)"QUIZ"İ300:1090;$7 EYEMo$8(FUNCT$,8)"SETFLASH"FR((FUNCT$,9)):1090$>936:"Invalid command in file at line "FP".":$@FPFP1$B1052$G6%936:G$(1)"Introduction":C$(1)"A":G$(2)"Rapid Perception you will perceive random"S211:20:"letters in a fraction of a second as you"213:20:"did in previous lessons. This will give"215:20:"you practice with rapid perception of"217:20:"items unrelated to each other.":6000N3LS%1FILRPD1.1":51000:1000:936:5050X1936:5:25:"== RAPID PERCEPTION DRILLS ==":20{1:3:20:"O.K., ";REEDER$;"."15:20:"Let's begin the RAPID PERCEPTION DRILLS"17:20:"with a WARM-UP EXERCISE with LETTERS."29:20:"In this drill, C((TITL$(LS%))12):"Lesson ";LS%;" -- ";TITL$(LS%):11:20:(DT$,40):95014:33::" INTRODUCTION ";::FILE$"LES"(LS%)".1":200(LS%1K%2)İ20000051000:101000:NTEST1:LS%1İ9000:NTEST0:5085"1936:4:21:LS%1FILE$"33:"Enter Y or N: ";:45:A$AA$:A$"Y"A$"N"İ90:5002U/A$:(A$)"Y"2000/936:50:13:21:"In that case, "REEDER$", let's begin with":15:21:"the introduction.":20/936:(SL$)0İ3/(997)05010O050:9:20:(DT$,40):10: let's begin with":15:21:"the introduction."::20:5006.9:20:(DT$,40):10:C((TITL$(LS%))12):"Lesson ";LS%;" -- ";TITL$(LS%):11:20:(DT$,40):95:20.936:50:12:21:"Have you worked with Lesson ";LS%;" before, ";REEDER$"?">/19: 5162@-~(2047)2İ3:FILE$"RPD"(LS%)".2":2047,0:5050-(997)0İ3:FILE$"LES"(LS%)"."((996)):997,0:5020-936:3:50:9:11:21:LS%9Ģ10:36:"MAGIC CONVERTER":95:20:14000<.(2046)1Ģ13:958:50:13:21:"OK, ";REEDER$", VV2VJ3IR30:1, VV2VJ3VJVV2C, VV3IR15:, 12:20:"Try the next selection at a slightly":14:20:"slower speed.":NWPM.95NWPM:20, , VV1VV(1)1, VV3VV(1)IR20:5154, VV3IR100:5154, IR255154-149,K%:K%5006,5006,5085,5030,5170,5180,96709+2125x+20:28:"Press To Confirm.":40:AA$(13)2125~++20:23:(SP$,36);:21:22:(SP$,40);:+936: VTAB 10: HTAB 20: PRINT "O.K, "REEDER$"." ,VV1VJ3:IR25:VV(1)0J,1)2185,*JJ:A$(13)K%ROW%:21656*2195m*K%(JJ1)2:ROW%START%:EDGE%:C$(ROW%);:ROW%K%*K%1K%NCH%2165*2230:START%K%:EDGE%::C$(K%);:EDGE%4:G$(K%);::2228*LS%2Ĺ1149,K%:K%5006,5030,5085,5170,5180,9670/+1JJ1(LEG$):A$(LEG$,JJ,1)2173-)xJJ7){2165{)}A$DOWN$ROW%NCH%ĝ:ROW%START%:EDGE%:C$(ROW%):ROW%ROW%1)A$UP$ROW%1ĝ:ROW%START%:EDGE%:C$(ROW%):ROW%ROW%1)ROW%START%:EDGE%::C$(ROW%);:)JJ1(CH$) *A$(CH$,JSTART%:EDGE%4:G$(P);:[(aTP%START%:BT%TP%NCH%1:LT%EDGE%1:RIGHT%EDGE%1:2105(f20:23:" Move The Cursor To Your Choice And";(k21:22:"Press Or Just Type The Letter.";(uROW%START%:EDGE%::C$(ROW%);::40(vA$AA$%)wBbCcDdEeFf"'/2125U'>Y(TP%1)(BT%1):Y:LT%:(124);:Y:RIGHT%:(124);:['Cu'M936:HEADER$TT$:50'R5:25:"Please Choose From The Following:";'USTART%9:EDGE%27:ROW%1:K%1'WP1NCH%:PSTART%:EDGE%:C$(P);:(\P1NCH%:P(7)G$(6):G$(6)G$(5):G$(5)G$(4):G$(4)G$(2):G$(2)"Initial Timed Reading":C$(7)"G"& NCH%6:UP$(11):DOWN$(10):LS%1NCH%7&"LS%1LEG$"AaBbCcDdEeFfGg"(13)UP$DOWN$:CH$"AaBbCcDdEeFfGg":2125 '*LEG$"AaBbCcDdEeFf"(13)UP$DOWN$:CH$"AaDrills":C$(2)"B":LS%2G$(1)"Introduction/Survey"% G$(3)"Accelerated Reading/Test":C$(3)"C":G$(4)"Practice Reading/Test":C$(4)"D"% G$(5)"Final Timed Reading/Test":C$(5)"E":G$(6)"Return to Main Menu":C$(6)"F"W&LS%1G$(3)(G$(3),19):G$E$"RPD1.2":1000:936:WREC1:SPD150:20:FILE$"RPD1.3":51000:1000:51693FILE$"RPD"(LS%)".1":51000:1000:LS%250853WREC1:SPD1503(LS%1(1149)3)51693936:LS%1(1149)351503LS%1(1149)351224FILE$"ART2.0":1000P4LS%1Ģ12:20:"Please turn to page "XX(LS%)" of your workbook":5124412:20:"Please turn to page "WW(LS%)" of your work book"414:20:"and enter below your effective reading rate"'5LS%1Ģ16:36,19:"for the INITIAL TIMED READING":65Bg%NTEST09580Bh%936:5:20:"OK, "REEDER$".":7:20:"These rates will help you to":9:20:"measure your progress throughout":11:20:"this course."Bi%20:Bl%936:2:20:"O.K., "REEDER$"."Cv%4:20:"This is the end of Lesson "LS%". IEAX%19:20:"Have you noted the above rates? (Y/N) ";:40:A$AA$XAZ%(A$)"N"9560hA[%NTEST9575A]%21:20:"Have you plotted your EFFECTIVE READING RATE on the"A^%23:20:"graph on page 121 of the workbook? (Y/N) ";:40:A$AA$Bb%(A$)"N"95n your workbook"C@0%8:20:"and note the following rates under"v@5%NTESTĢ10:20:"INITIAL TIMED READING:":9540@:%10:20:"FINAL TIMED READING:"@D%13:20:" Gross Reading Rate: "GWPM" wpm."AN%15:20:" Effective reading rate: "NWPM" wpm."ERC"% comprehension on"5?$8:20:"this test. ";G?$WG4ĺ:9510k?$"Perhaps next time you should"?$10:20:"slow down a bit so you can understand"?$12:20:"better what you're reading."@&%20:936:6:20:"Please turn to page "XX(LS%)" ickly."9>MESSAGE$"PRESS TO BEGIN.":20:p>(#PERC100WG20WG10(NTEST):NWPM(PERCGWPM100)>$4:20:WG3ĺ"Very good, ";:9435>$WG3WG4ĺ"OK, ";:9435>$4:20:"Gee, ";>$REEDER$".":NTESTī9700?$6:20:"You scored "Pll square (";(127);")"T=15:36,1:S$;"which will appear in the center of the"=17:36,1:S$;"screen just above the flashing letters."=19:36,1:S$;"This will help you use your peripheral">21:36,1:S$;"vision to perceive the letters qui appear on the screen and disappear"^<7:36,1:S$;"in a fraction of a second. The same"<9:36,1:S$;"letters will then reappear so you can"<11:36,1:S$;"check that you perceived them correctly."=13:36,1:S$;"Focus your eyes on the sma;;z45:J$AA$*;J$"N"J$"n"6030C;J$"Y"J$"y"ī6050M;6010;20:36,20:S$;S$;" ":21:36,20:S$;S$:6160;936:1:36,4:S$;"WARM-UP EXERCISE - LETTERS";3:36,1:S$;"In this drill, two to five letters"&<5:36,1:S$;"wille program."D:5MESSAGE$"Press for instructions.":20U:7936:12000_:<936{:bFILE$"FTR"(LS%)".0":d51000:1000:9000:pS$" ":s20:36,1:S$;"Would you like to review";u21:36,1:S$;REEDER$;"? (Y/N) ""at a faster speed? (Y/N) ";:40:A$AA$:A$"Y"A$"y"NWPM1.3NWPM:5167f9+A$"n"A$"N"5162|9,VV1IR30:51549/VVVV1:515192936:4:20:"O.K.,"REEDER$"."937:20:"It's time now for the PRACTICE READING" :49:20:"section of thd this selection":14:20:"comfortably? (Y/N)";:40:A$AA$:A$"y"A$"Y"5161k8%A$"N"A$"n"51568&2300:VV351548'51678(936:2:20:"O.K., "REEDER$"."8)3000L9*936:12:20:"Would you like to read the next selection":14:20:36:"Thank you.":MESSAGE$"Press to begin the reading.":20W7VV1:VJ47FILE$"ART"(LS%)"."(VV):51000:10007 ((LS%1VV3)(LS%1VVVJ))51547!51567"LS%1İ15000:50307#5170Q8$936:12:20:"Were you able to rea9:36,27:(SP$,18):51405619:36,55:(SP$,18)L6(A$)0İ90:5126f6NWPM(A$):ZNWPMNWPMw6LS%15145618:36,27:A$" wpm. ":21:36:"Thank you.":MESSAGE$"Press to begin.":20:5150I718:36,55:A$" wpm. ":21:18:36,19:"test? _____wpm.":5129c516:20:"for the FINAL TIMED READING in Lesson ";LS%1518:20:"or any other rate and press RETURN: ____ wpm."5 LS%1Ģ18:36,27:MAXL4:100:51335 18:36,55:MAXL4:1005 WREC0:ART16LS%1Ģ1f you">C%6:20:"wish to repeat any part of this lesson,"sC%8:20:"simply make that selection on the menu"C%10:20:"for Lesson "LS%"."C%12:20:"Remember to PRACTICE on your own"C%LS%8Ģ12:53:".":9660!D%14:20:"before starting Lesson "LS%1". Be sure to try"WD%16:20:"some of the techniques you've learned."D%MESSAGE$"Press to return to Main Menu.":20D%51000:60000D &6:20:"You scored "PERC"% comprehension on this"E&8:20:"this test, which meansAR> when you begin"PRD/TQ0:MESSAGE$"PRESS TO START TIMING.":20RI/MESSAGE$"PRESS TO STOP TIMING.":936:12:30:"I AM TIMING YOU NOW.":20RL/TYMETQ92:MG%1ıRN/GWPM((NUMW$(SL))TYME60) SX/936:2:20:"O.K., "REE/N)";:40:A$AA$BQ:/936:5:20:"Let's review again quickly:"uQ when you begin"Q>/10:20:" reading."Q@/13:20:"2. Press when you finish"QB/15:20:" reading."RC/8:20:"1. Press . I will respond"LP*/15:20:" with 'I AM TIMING YOU NOW.'"~P,/17:20:"2. As soon as you finish reading,"P./19:20:" press again to stop"P0/21:20:" timing."Q5/23:20:"Do you understand the instructions? (Yor me to time you, you must"RO /5:20:"tell me when to start timing and when"O"/7:20:"to stop by pressing ."O$/9:20:"You will follow these two steps:"O&/11:20:"1. When you're ready to begin reading,"P(/13:20:" press 6:20:"reading rate is ";ZNWPM;" words per minute."qb>8:20:"You've also proved that you are capable"b>10:20:"of reading ";IR;" % faster than your regular"b>12:20:"rate--even before starting the course!"c>14:20:"It may take a l:"rate."pa:14:20:"After only a few lessons, you should ":16:20:"find that you're able to bring your"a:18:20:"gross reading rate up to this level."a>20a>936:2:20:"OK, "REEDER$"!"b>4:20:"You've established that your normal"2:20:"OK, "REEDER$"!"J`:4:20:"You were able to keep up with the"~`:6:20:"ACCELERATED READING TEST at a rate of"`:8:20:(ZNWPMZNWPMIR100)" words per minute, which is "IR;"%" a:10:20:"faster than your initial gross reading":12:20AA$"Y"AA$"y"Č936:140200_7LS%89580q_7936:12:20:"All right, "REEDER$". You're done with the"_714:20:"Magic Converter program now. Remember, you can"_716:20:"use it anytime to work on your reading speed."_79660`:936:his selection and"O^716:20:"your reading rate. Then plot your progress"x^718:20:"on the graph on page 128."^721:20:"Now, "REEDER$", would you like to choose"^723:20:"another selection (Y/N)? ":40:(AA$)"Y"AA$"N"İ90:14260_7(60NW%NI%NN%(20TYME))L]n7936:5:20:"Congratulations, "REEDER$"!"]x77:20:"You read this selection at a rate of"]79:20:GWPM" words per minute."]712:20:"Please turn to page 124 of your workbook"^714:20:"and note the title of td all together? (Remember to round off"O\A714:20:"to the nearest inch.)"\F718:20:"Type the number here and then press : ____ inches.";:18:36,65:MAXL4:100:(A$)0İ90:14150\P718:36,65:A$" inches. ":NI%(A$)\Z720]d7GWPMines. ":NN%(A$)[720P[7MG%1:12060: pick up middle of prac. rdng.[7936:5:20:"Very good, "REEDER$"! Now I need to know"[(77:20:"the following information: "[2710:20:"How many inches of the selection did you"*\<712:20:"rea11:20:"of the selection? (Remember to count only lines"yZ713:20:"that go at least half way across the column!)"Z717:20:"Type the number here and then press : __ lines.";:17:36,65:MAXL2:100:(A$)0İ90:14095[717:36,65:A$" le number here and then press : ___ words.":16:36,65:MAXL3:100:(A$)0İ90:14070Y716:36,65:A$" words. ":NW%(A$)Y 720Y 7936:5:20:"I also need to know this:"Y 79:20:"How many lines are there in 4 inches (vertical)"0jW2W2II12:WW(II):IIW2II12:XX(II):IIW2II12:YY(II):IIW2II12:ZZ(II):IIW2 112,113,113,114,9,23,113,114W3JJLS%W"3 XV/936:12:20:"Would you like to try another practice"V/14:20:"reading (Y/N)? ":40:A$AA$:A$"Y"A$"y"A$"N"A$"n"İ90:12181V/(A$)"Y"A$"y"Č936:12022V/V 0D$;"OPEN TITLES":D$;"READ TITLES":LS%112325W0I13(LS%1)E is",U/7:20:NWPM" words per minute."iU/9:20:"Please turn to page "ZZ(LS%)" in your workbook"U/11:20:"and note the following rates:"U/14:20:"Gross Reading Rate: "GWPM" wpm."U/16:20:"Effective Reading Rate: "NWPM" wpm."V/2016:20:"your comprehension up to ";NWPM;" words per"c>18:20:"minute, but you've made a good start."c>20:20:"You're now ready for the RAPID"c>22:20:"PERCEPTION DRILLS."c>20:cPFK13İ41000:5dSF936:10:36,25:"Are you catching on,";REEDER$;"? (Y/N)";XdUFFLSH(1)3:FLSH(2)4:FLSH(3)10gdZF45:J$AA$ddFJ$"Y"J$"y"18100dnFJ$"N"J$"n"18200dxF18010dF936:5:36,15:S$;"GREAT!"eF9:36,1:S$;"These letters were flashed at 1/";FR;" of etchar (KS,0, )TQTQ1:(KB)12841M *AA$((KB)128((KB)127))S +e , char w curso -KS,0 .TQTQ1:TQ10(TQ10)98:(KB)12846 /AA$((KB)128((KB)127)) 0AA$((AA$)32((AA$)96(AA$)123)): 1 header6 2HEAD (FUNCT$,5)"TREAD"İ190:23J XC((MESSAGE$)):24:X:MESSAGE$;R 40 AA$(8)(MESSAGE$,7)"Review."İ90:23 AA$(32)AA$(21)AA$(8)İ90:23 MESSAGE$"": I1940DLAY%:  " pause #I1PAUSE:: ' g16384:CL16336:P1941:P2942:DR943:MU944 TP$"_______________________________________________________________________________" (4)"BLOADINPUT" C(X)(((80X)2))  MESSAGE$""MESSAGE$"Please Press to Continue.""bꥫ610003cD1283d(4)"PREFIX,D"D:(4)"CLOSE"O3f(4)"PREFIX":PX$}3gLS%9ĭPX$"/SPEED"ID$"/"D2::600203hLS%9ĭPX$"/SPEED1/"(PX$,6)"/SPEED"D2::600203j:216,0:610003o216,0:610003t216,04ySR1İ51000:(4)"ROne Moment, Please. ";: 2=DZk2x(REEDER$)0REEDER$"":L(985):J1L:REEDER$REEDER$((985J)):q2}2`59000:984,LS%:985,(REEDER$):J1(REEDER$):985J,((REEDER$,J,1))::996,1:997,02aID$(((LS%3)2)): LS% = 1 THEN ID$ = "1" 3ase"41Nu18:25:"press Y for Yes or N for No) ";L1Xu10040:BB$AA$:BB$1buBB$"Y"BB$"y"BB$"N"BB$"n"İ10090:300301luBB$"N"BB$"n"Ģ13:1:958:1vuSR1:18nj936:10:CENTER(18):"_____________________";29Ǣ11:CENTER(18)::" 2:36,45:20030A0WN18:37:10049:JJ$"R"Ģ19:1:958:20000v0XN(JJ$(13)BB$"n")(JJ$(13)BB$"N")Č936:0\N936:0fN00u ask for demo0:u14:25:"Would you like to see a demonstration "1Du16:25:"of this Speed Reading course? (Ple "=k27:36,1:S$;"span with longer letter groups."tk<10:36,1:S$;" Would you like to work at"kF12:36,1:S$;"(1) 1/3 (2) 1/4 (3) 1/10"kP14:36,1:S$;" of a second?"lZ18:36,1:S$;"Please enter your choRL2)):(SP$,RL):DLAY%1:35^j|12:(41(RL2)):RAN$:29:12:(41(RL2)):(SP$,RL):29kj:FR4:j(936:5:36,1:S$;"The next exercise will test your eye"j*J$(1)"(1)":J$(2)"(2)":J$(3)"(3)":JT(1)21:JT(2)35:JT(3)49 k+S$" 0:39:" "(127);:95:35(iTK1LT%TiVSPRED((1)10):SPRED4SPRED140022|iYSN%((1)10):SN%MSSN%LM40025i[(K6K13)İ18000:PAUSE4800FR:936:10:39:" "(127);:95:35i^43000:12:(41(RL2)):RAN$jhI1940FR::12:(41(":X100hpNR13213hzNC((R13)5)1:X(X2)khND113:R:36,(C1D(S$)):(IK$,D,1):I1X::hNR:36,C(S$):" ":hN13:36,1(S$):IK$;".":I1500::h@LT%((FUNCT$,5,2)):TJ0hEMSTLS%2:LM2iOPAUSE1200:35:1N7:36,(20(REEDER$)0)2:S$;"Welcome on-line,";REEDER$;"!":I11000:g>N9:2:S$;"You have just made one of the smartest"gHN11:1:S$;" decisions you'll ever make -- ":I11200:g\N11:36,31(S$):" to learn":XY("") hfNIK$"SPEED-READINGur eyes to"Ff6G9:36,1:S$;"perceive quickly. These letters were"f@G11:36,1:S$;"flashed at 1/";FR;" of a second. Try again"fDGFR10FR4:18250fEGFR4FR3fJG13:36,1:S$;"at 1/";FR;" of a second."fTG20:f NS$(SP$,20):936:50Lg*a"=eF11:36,1:S$;"second. The next letters will flash"SeFFR3FR4:18130ceFFR4FR10eF13:36,1:S$;"for 1/";FR;" of a second."eF20:eG936:e"G5:36,1:S$;"That's O.K.,";REEDER$;"." f,G7:36,1:S$;"It takes practice to train yoER$""HEADER$"SPEED READING...THE COMPUTER COURSE"K 3XC((HEADER$))^ 41:X:HEADER$d 7 8K13:KK192968:P1,KK:P2,KK:DR,8:MU:: 9KK192568:P1,KK:P2,KK:DR,8:MU: :P1,47:P2,47:DR,48:MU ;<Y%:X%:PROMPT$;" ";:&D NWPM FROM GWPM WAS AT 70 \/1E m.j.FP1,116:P2,116:DR,208:MU:J150::P1,128:P2,128:DR,255:MU:J1200::P1,128:P2,128:DR,96:MUGP1,116:P2,116:DR,96:MU+HP1,96:P2,96:DR,128:MU:P1,102:P2,102:DR,96:MU:P1,116:P2,:660 lVP1:21:TXT$(LN);4LNLN1:VPVP2MTXT$(LN)""VPVP1wTXT$(LN)"STOP"TXT$(LN)"END"61529:936:TXT$(LN)"STOP"LNLN1:610FPLN1: rpdsNUM%((FUNCT$,5)):LNFP1 PAUSE1200:35:10:39:" "(127)LN1:510@580BDFPLN1:TYMETQ69:GWPM(WC%TYME60):LW accVXLNFPsYNSCREENS%0NSCREENS%1ZWREC1DLAY%(NW%(SPD60)):610]DLAY%(NW%((NWPMNWPM10)60))NSCREENS%bVP1gQ$(TXT$(LN),1):Q$"!"Q$"\"Q$"&"İ10000 treadLNFPTQ0&VP1gQ$(TXT$(LN),1):Q$"!"Q$"\"Q$"&"İ10000:TQTQ100:560VP1:20:TXT$(LN);0LNLN1:VPVP25TXT$(LN)""VPVP1:TXT$(LN)"STOP"TXT$(LN)"END"515 =20:TQTQ60:936:TXT$(LN)"STOP"LNR$".":WGWG1:8520CTXT$(LN)"END"Č936:LNLN3:310936:FPLN(3((FUNCT$,4)"QUIZ"))((FUNCT$,3)"ASK"): J1LNLN3A$CH$(J)(A$)(CH$(J))32LNLNBR(J):936:310JJ1:425LNLNREV:936:310 VDİ90:3802((A$)32((A$)90));S1:1:(FUNCT$,3)"ASK"420bJ1200:y23:2:(SP$,79);A$CR$A$((CR$)32)Ģ23:30:"That's correct, "REEDER$".":80:40023:19:"I'm sorry, "REEDER$", the correct answer is "CNFO$,J1,1):HuRMD$(INFO$,NM2):(FUNCT$,4)"QUIZ"CR$RMD$:377TvJ1NMzxBR(J)((RMD$,J13(J1),3)):JyQUEST$TXT$(LN2)z23:C((QUEST$)):QUEST$": ";|45:A$AA$VD0:J1NM:(A$)(CH$(J))(A$)(CH$(J))32VD1:LN = FRST%(PGE% - 1):M% = FRST%(PGE% - 1):PGE% = PGE% - 1: GOTO 310aq GOSUB 35000 WAS HERErTXT$(LN)"STOP"TXT$(LN)"END"315sTXT$(LN)"END"FUNCT$"ASK"İ20:410: QUIZ SECTION\/tINFO$TXT$(LN1):NM((INFO$,1)):J1NM:CH$(J)(I$(LN);+hLNLN1:VPVP2:VP22VPVP2DiTXT$(LN)""VPVP1pjFUNCT$"ASKM"TXT$(LN)"ENDM"İ20:410kFUNCT$"ASKM"TXT$(LN)"STOPM"İ20:936:AA$(13)FRST%(PGE%)M%:M%LN1:LNLN1:PGE%PGE%1:310Fp IF PGE% > 1 THEN FRST%(PGE%) = M%AA$(8)280]PGE%1FRST%(PGE%)M%:LNFRST%(PGE%1):M%FRST%(PGE%1):PGE%PGE%1:210kFPLN1:|+ quiz & ask,LNFP:WG0:M%LN:FRST%(1)LN:PGE%16VP1;Q$(TXT$(LN),1):Q$"!"Q$"\"Q$"&"Q$"#"İ10000:360@XYVP:XY:20:TXTinue"+20:AA$(8)PGE%1Č936:2005936TXT$(LN)"STOP"277:AA$(8)FRST%(PGE%)M%:M%LN1:LNLN1:PGE%PGE%1:210LNFRST%(PGE%1):M%FRST%(PGE%1):M%FRST%(PGE%1):PGE%PGE%1:210: ELSE GOTO 271TXT$(LN)"END"280Q$"&"Q$"#"İ10000:2602VP:20:TXT$(LN)FLNLN1:VPVP2_ TXT$(LN)""VPVP1TXT$(LN)"STOP"TXT$(LN)"END"212PGE%1MESSAGE$"Press OR --> To Continue, <-- To Review.":273MESSAGE$"Press to ContMAXLİ90:105(AA$;:A$A$AA$:1058" "(8);:XC((MESSAGE$)):23:X:"______________________________________"24:X::" ";MESSAGE$;:: textLNFP:M%LN:FRST%(1)LN:PGE%1VP1Q$(TXT$(LN),1):Q$"!"Q$"\"Q$"|""_"(8);:45Hl IF AA$ = CHR$ (32) THEN SM% = FALSE%: GOTO 180 gnAA$(13)SM%FALSE%:180zoAA$(8)120q(A$)0ĺ" ";(8)(8);r(A$)1A$(A$,(A$)1):105s(A$)1A$"":105v90:105x(AA$)32İ90:105(A$)116:DR,96:MU:P1,128:P2,128:DR,96:MUKIP1,152:P2,152:DR,192:MUQK^O sounds{ZP1,24:P2,24:DR,12:MU[_P1,96:P2,96:DR,48:MU`a curs from aboveb(9563((TQ20)TQ20))(8);:c inputdA$"":AA$""i;:95:35L11NUM%$L%L1lL%(NUM%2)İ800:936:PAUSE1200:35:10:39:" "(127);:95:35LNLN1:12:41(TXT$(LN))2:TXT$(LN)I1940FR::12:41(TXT$(LN))2:(SP$,(TXT$(LN)))DLAY%1:29:12:41(TXT$(LN))2:TXT$(LN):29:12:41(TXT$(LN))2:(SP$,(TXT$(LN))):29@QFPFPNUM%:Y _ e!%II2090:MAGE(II):4AGE20YLMAGE(20):8306AGE85YLMAGE(90):8309YL(MAGE(AGE5)MAGE(AGE))2>HSPDSPD((FUNCT$,4))4:ad during the week?"S,12:1:S$;"(Remember to include professional journals,",14:1:S$;"technical and trade periodicals, and so on.)",18:1:S$;"Type in the number: ___ magazines.",VT18:19000:MZ(A$),)- 936:35:6:1:S$;"Howeek do you read a newspaper?"[+13:1:S$;"(Count Sunday editions as two newspapers.)"+15:1:S$;"Type in the number: ___"+VT15:19000:PAPS(A$)++936:35:8:1:S$;"What about magazines? How many of them ",10:1:S$;"do you rease count technicalF*c13:1:S$;"manuals, texts, etc., as books.)v*h15:1:S$;"Type in the number: ___ books."*jVT15:19000:BOOKS(A$)**936:35*7:1:S$;"Good, ";REEDER$;" . Now tell me this:"+11:1:S$;"How many times per wS$;"just as you did a moment ago."9)MESSAGE$"":20R)@==\/ init.questions|)ES$" ":PAUSE750)J936:35:5:1:S$;"OK. First question. ")T9:1:S$;"How many books do you read in an"*^11:1:S$;"average week? (PleING . . . The Computer Course"D(v8:36,22:S$;"can do for you."(12:36,22:S$;"I'll begin by asking you a few simple"(14:36,22:S$;"questions. All you have to do is"(16:36,22:S$;"TYPE IN THE ANSWER and PRESS ,"%)18:36,22:":'Z13:1:S$;"look forward to seeing you again soon"Y'd15:1:S$;"in Lesson One.a'20g'o'X936:2:36,22:S$;"Hello, "REEDER$"! For the next few"'b4:36,22:S$;"minutes I'm going to show you exactly what" (l6:36,22:S$;"SPEED READesent reading rate."&(20_&2936:5:1:S$;"Well, ";REEDER$;", it's time for me to say"&<7:1:S$;"goodbye. I hope you decide to take"&F9:1:S$;"SPEED READING . . . The Computer Course."'P11:1:S$;"It's been fun working with you. I'ller than you were at the beginning of"L%11:1:S$;"this demonstration."%15:1:S$;"That's terrific! With this course and"% 17:1:S$;"a few weeks of practice you should be"%19:1:S$;"able to double or even triple your"&21:1:S$;"pr$ 819,9:D$"RUN APINTRO":$40:IK$AA$:IK$""14310@$t$936:3:1:S$;"Congratulations, ";REEDER$;"!"$5:1:S$;"You just read that at ";(NWPM);" words per minute."$7:1:S$;"That means you're already reading 20%"'%9:1:S$;"fast003# NWPMGWPM1.1:FILE$"eye.txt":51000:1000E# NWPMNWPM1.1e# 820,(NWPM256(NWPM256))z# 821,(NWPM256)# 51000# (4)"RUNTHIRTYK"# NWPM(820)256(821)# NWPMNWPMNWPM.2:FILE$"ART.txt":51000:1000$ S$(SP$,20):5000"NW%((FUNCT$,6,4)):NSCREENS%((FUNCT$,11,2)):N2%((FUNCT$,14)):15000:1090[">g"@FPFP1q"B1052w"G" ====\/ main code" 3" (819)9Ĺ819,0:3079" 7000" 51000:FILE$"TIMED.TXT":1000" 12000" 13000# 9000:140#936:FPFP1/!$FUNCT$"TEXT"İ200:1090!&(FUNCT$,3)"ACC"NW%((FUNCT$,4,4)):NSCREENS%((FUNCT$,8)):600:1090!)(FUNCT$,5)"TREAD"WC%((FUNCT$,6)):500:1090!6(FUNCT$,3)"ASK"(FUNCT$,4)"QUIZ"İ300:1090U"7(FUNCT$,4)"EYEMroc    GOSUB 50% 900. FP1B FUNCT$TXT$(FP)Z FUNCT$"EOF"1056 TXT$(FP1)"RET"FILE$TXT$(FP1):51000:900:1050 1095 (FUNCT$,4)"SKIP"1059 !((FUNCT$,5))0FPFP2:1059 "FPFP((FUNCT$,5)):1090!D$;"OPEN"FILE$-D$;"READ"FILE$6LN1>B$NTXT$(LN)B$LN1ĭTXT$(LN1)"EOF"TXT$(LN2)"HCODE"930TXT$(LN)""925IFASC (TXT$(LN)) = 33 THEN LN = LN - 1LNLN1:915D$;"CLOSE";FILE$:N2LL  file p many reports and other long documents"M- 8:1:S$;"do you read a week?"- 12:1:S$;"Type in the number: ___ reports and documents."- VT12:19000:DOC(A$)-5 -: 936:35:6:1:S$;"One more question, ";REEDER$;" ."#.? 8:1:S$;"How many memos and letters (business and "\.D 10:1:S$;"personal) do you read on the average in"u.I 12:1:S$;"a week?".N 14:1:S$;"(Include newsletters here, too.)".S 16:1:S$;"Type in the number: ___ letters and memos.".X VT16:19000:LTR(A$)/{NUN$(NC%)(NUM$,I12,2) <'J<'NLR%(NC%1)2:NUM$(NLR%2)(NUM$,2)x<'I11NC%1:NUM%(I1)(NUM$(I1))::10160<':I1PTR%LM%NUM%(G%)2:(TXT$(LN),I1,1);:<':I1LM%1NUM%(G%)LM%1NUM%(G%)NUM%(G%1)1:(TXT$(LN),I1,1);::PTR%I1:!=WITCH%JJ=;L'SWITCH%10100,10200,10300,,10500,10600,10700C;m'U;s' vid optionsa;t'VP:20k;~'NC%0t;'I%3;'(TXT$(LN),I%,1)"@"NUM$NUM$(TXT$(LN),I%,1):I%I%1:10135;'LM%I%1:PTR%LM%;'I11(NUM$)<'(NUM$,I1,1)","NC%NC%1:#13:12:S$;V2$N:#17:36,4:S$;"e y e s p a n.":9270]:#I1700:c:#u:6$JE1200:::' ============ INFREQUENT SUBROUTINES \/ ============:' spec chars:':8'JJ1(SL$):Q$(SL$,JJ,1)10045::'JJ:;' ;='Sn. ":9270,9#13:12:S$;V1$;P2$b9#17:36,7:S$;" e y e s p a n. ":9270z9#13:12:S$;V2$;P1$9#17:36,7:S$;" e y e s p a n. ":92709#13:12:S$;V1$;P2$9#17:36,7:S$;"e y e s p a n.":9270: y e s p a n.":9270;8#13:12:S$;V2$;P1$q8#17:36,7:S$;" e y e s p a n. ":92708#13:12:S$;V1$;P2$8#17:36,7:S$;" e y e s p a n. ":92708#J8#13:12:S$;V2$;P1$9#17:36,7:S$;" eye spa$97x#17:36,7:S$;" eye span. ":9270Q7}#13:12:S$;V1$;P2$7#17:36,7:S$;" e y e s p a n. ":92707#13:12:S$;V2$;P1$7#17:36,7:S$;" e y e s p a n. ":92707#13:12:S$;V1$;P2$#8#17:36,7:S$;"eTION"26K#7:36,9:S$;"The following exercises"P6P#9:14:S$;"are designed"r6U#11:13:S$;"to improve your"6Z#13:12:S$;V1$;P1$6_#15:19:S$;"and"6d#17:36,7:S$;" eye span. "6i#I11100:6n#J127s#13:12:S$;V2$;P1going to show you how this"V5!17:1:S$;"course can increase your reading speed."5*!MESSAGE$"Press When You Are Ready.":205/!5(# ==\/RPD'S52#9365A#6F#936:V1$"visual ":V2$"VISUAL ":P1$"perception":P2$"PERCEP74!7:1:S$;"test, but don't worry about it. This"o4!9:1:S$;"test doesn't count. It's only for your"4 !11:1:S$;"benefit. I want to find out what your"4!13:1:S$;"normal, everyday reading speed is, that's"5!15:1:S$;"all. Then I'm dea how"A3 14:1:S$;"much time it takes you to do all that"f3 16:1:S$;"reading every week?"3 20:1:S$;"Let's find out.":203 936:1:1:S$;"OK, ";REEDER$;". Now comes the fun part."4 5:1:S$;"I'm going to give you a little reading"1:S$;"and then . . .":MESSAGE$"":2082 ===\/ v2 936:4:1:S$;"Surprise, ";REEDER$;" ! According to my"2 6:1:S$;"calculations you read about ";AW$2 8:1:S$;"words every week."2 56 3 12:1:S$;"That's a lot. Do you have any i75000BOOKS10000PAPS50000MZ1500DOC300LTRA1 AWAW1.25l1 XTAW:25000:AW$XT$: getending 1 MESSAGE$"":201 936:9:1:S$;"OK, now give me just a couple of seconds"1 11:1:S$;"while I perform some quick calculations"(2 13:igure"E0 15:1:S$;"to account for all the cereal boxes, forms,"0 17:1:S$;"signs, and so forth that we all read all"0 19:1:S$;"the time."0 MESSAGE$"Please Press to Continue.":XC((MESSAGE$)):24:X:MESSAGE$;21 51003:AW =\/calc pageV/ 936:35:5:1:S$;"Thanks for the input, ";REEDER$;". Now I'm"/ 7:1:S$;"going to use that data to tell you approx-"/ 9:1:S$;"imately how many words you read every week."0 13:1:S$;" Then I'm going to add 25% to that f'G1(2NLR%)2:G%G:10151:Q=':I1PTR%(TXT$(LN)):(TXT$(LN),I1,1);:z='I11NC%1:NUM$(I1)"":NUM%(I1)0:='CL$"":PTR%0:NC%0:NUM$"":LM%0:CL%(1)7:CL%(2)0:CM$""='='HEADER$"MEMORY JOGGER":50:70:=)JJ1(TXT$(LN)) > )(TXT$(LN),JJ,6)"READER"10515(>)JJ1>)JJ0;>)Z%JJw>)VP:20:(TXT$(LN),2,Z%2);REEDER$;:(TXT$(LN),Z%6);}>^)>h)DLAY%((TXT$(LN),3,1)):29:VP:20:(TXT$(LN),4);:>)JJ1(TXT$(LN))>)(TXT$(LN),JJ,4)"GWPM"10715>)JJ?)JJ0936:5:1:S$;"Coming up next on the screen will be a"mL&47:1:S$;"sample of just some of the special"L+49:1:S$;"speed reading exercises that are provided"L0411:1:S$;"in this course to help you improve your" M5413:1:S$;"speed and comprehIf you want to learn to read faster"]K411:1:S$;"and understand more of what you read,"K 413:1:S$;"SPEED READING . . . The Computer Course"K415:1:S$;"is designed especially for you."K4MESSAGE$"PRESS TO FIND OUT WHY.":20:L!4our)."?J317:1:S$;"And all this just by learning to read"sJ319:1:S$;"a little faster than you read now!"{J320J3=========\/ next screenJ3936:3:1:S$;"Well, ";REEDER$;", I've got some good news"J35:1:S$;"for you."&K49:1:S$;" life. And if you value"QI39:1:S$;"your time, that means you'd be saving"mI3XTMNYSV:25000:MS$XT$I311:1:S$;"at least $";MS$;" over the course of your"I313:1:S$;"life (and that's based on a low rate of"J315:1:S$;"just $5.00 per hader is worth ...QH3936:1:1:S$;"Now, ";REEDER$;", just imagine that you"H33:1:S$;"could increase your reading speed by 20%."H35:1:S$;"That would mean you could save as many as"I37:36,1:JJ1(S$)1:" ";::(YS$,5);" years of yours many as ";THOURS$TG312:1:S$;"hours during your remaining lifetime reading."G316:1:S$;"That's ";TDAYS$;" days!":18:1:S$;"Or ";TYRS;" years!"G3YS$(TYRS.2):TYRS.21YS$((TYRS.2))G3MNYSV5THOURS.2G320H3============\/ re$:TYRSTDAYS360:XTTYRS:25000:TYRS$XT$FF3TYRS((TYRS100))100oF3936:3:1:S$;"Here's the answer:"F36:1:S$;"Based on your present reading speed and"F38:1:S$;"the data you've supplied, I estimate"G310:1:S$;"that you will spend a the rest of your life."OE3MESSAGE$"PRESS FOR THE ANSWER.":20rE3800 * find yrs.left E3==\/ calcE3AMAWGWPME3TMINSYLAM52E3THOURSTMINS60:XTTHOURS:25000:THOURS$XT$+F3TDAYSTHOURS16:XTTDAYS:25000:TDAYS$XT936:4:1:S$;"Thank you, ";REEDER$;" ."dDh38:1:S$;"Let me explain why I had to ask you that"Dm310:1:S$;"question."Dr314:1:S$;"You see, I'm about to calculate the"Dw316:1:S$;"amount of time you will spend reading"E|318:1:S$;"duringr age: ___ "5C8320:1:S$;"Then press ."PC:317:36,42:MAXL3:100fC<317:36,42:" "C=3JJ1(A$):(A$,JJ,1)"0"((A$,JJ,1))0İ90:13110C>3JJCM3((A$)1(A$)120)İ90:17:36,35:"___":13112CO3AGE(A$)CY335C^3+Dc3ut I have to get"OB29:36,20:"rather personal. Don't worry, I won't tell"B211:36,20:"anybody your answer. (Besides, I forget"B313:36,20:"everything I learn once I'm turned off.)"B1315:1:S$;" How old are you?"C6317:9:S$;"Type youress to Continue."HAf/24:36,C((MESSAGE$)):MESSAGE$""RAg/20:qA2==\/ quest after tmedreadA2S$" ":PAUSE550A2936:5:36,20:"Now, "REEDER$", please don't think I'm"B27:36,20:"being nosy or indiscreet, br not, you can read even"Q@^/8:36,20:"faster than that, and in a couple of"@`/10:36,20:"minutes I'm going to prove it to you."@b/13:36,20:"But first, I have to ask you another"@d/15:36,20:"very important question." Ae/MESSAGE$"Please P ?)Z%JJK?)VP:20:(TXT$(LN),3,Z%4);" "GWPM" ";:(TXT$(LN),Z%5);Q?/*d?. ====\/ GWPM ?X/936:2:36,20:"Good, "REEDER$"! You read that selection"?Z/4:36,20:"at a rate of "GWPM" w ords per minute."?[/56@\/6:36,20:"Believe it oension."HM:417:1:S$;"Watch the screen carefully now, ";REEDER$;"."M?419:1:S$;"The Rapid Perception Drills are about"MD421:1:S$;"to begin!"MI4MESSAGE$"PRESS TO BEGIN EXERCISES.":20:56MN4M6N6S$" "?N6936:S$;" In the first drill, ";REEDER$;", letters,":qN6S$;"words, and phrases will appear on the":N6S$;"screen and disappear in a fraction of a":N6S$;"second. They will then reappear so you ":O6S$;"can check that you read them c53.22,\N 52.25,51.28,50.31,49.33,48.36Q\N 47.40,46.43,45.46,44.50,43.53w\N 42.57,41.61,40.65,39.70,38.75 \N 37.79,36.85,35.90,34.96,34.03\N 33.10,32.18,31.27,30.37,29.48 \N 28.60,27.72,26.86,26.01,26.16 ]N 24.33,23.50,22.68,2"."((A$,JJ,1))0İ90:VT:36,42:"___":19020][KJJ1ĭ(A$,JJ1,2)".."İ90:19020e[KJJ[KVT:36,42:A$;:JJ3(A$):" ";:[K35:[N ============\/mortality data [N 62.01,61.03,60.05,59.08,58.10\N 57.12,56.15,65.17,54.20,N)"END"VPVP2:LNLN1:15040KZ:TXT$(LN)"STOP"LNLN1:VP1:15040eZ:TXT$(LN)"END"15100pZ:15040~Z:FPLN1:Z8J20:1:S$;"Then press ."ZLJVT:36,42:MAXL3:100ZdKVT:36,42:" "4[KJJ1(A$):(A$,JJ,1)"0"(A$,JJ,1)oopY:JJ1(TXT$(LN));Y:(TXT$(LN),JJ,1)"/"15050CY:JJLY:JJ0Y:JJ0ĢVP:20:(TXT$(LN),1,JJ1);:35:VP:20:(SP$,JJ1);:VP:40:(TXT$(LN),JJ1);:35:VP:40:(SP$,(TXT$(LN))JJ);Y:TXT$(LN)""VPVP1"Z:TXT$(LN)"STOP"TXT$(L8J X8X:936{X:SP$" ":S$(SP$,20)X:DLAY%(NW%(NWPM60))NSCREENS%:LNLN1:PAUSEDLAY%450(N2%NSCREENS%)X:LNFP:VP1X:(TXT$(LN))32LNLN1Y: Top of l100:W8J19$W8TL(TXT$(J))?W8TL2(TL2)TLTL1UW8COL20TL2(S$){W811:36,COL:TXT$(J):I1SPEED:W811:36,COL:JJ1TL1:" ";::I11100:W811:36,COL:TXT$(J):I11100:W811:36,COL:JJ1TL1:" ";::I11100:XV@8LOOPLIM1:HANG3008VJ8I1LOOPLIM:S$;TXT$(I)::NVO8I1HANG::936`VT8QQLOOPLIM2fVY8V^8---------------------------Vh8JJ19:TXT$(JJ):Vr8936V|814475V8V8LOOPLIM9W8936:I11100::10:36,20(S$):95:(127):I11:SPEED2444:14335:U7IK$"2"COL16:SPEED2222:14335uU718:1:S$;" Please enter only 1 or 2 ":14315U721:36,59:" ";IK$;" "U823:1:S$;" GET READY TO BEGIN. "U 8I12400:U"814430U,8936V68936:8:1like":>T7S$;"to try some words and phrases flashed ":^T7S$;"faster or slower? ":{T7S$;" 1.faster ":T7S$;" 2.slower":T721:1:S$;"Type in the number of your selection: "T740:IK$AA$:IK$""14310U7IK$"1"COL1OL:S$;RS$S7SEC11100:DS712:36,COL:S$;:JJ150:" ";:VS7SEC11100:]S7JcS7S7 ******************************S7936S74:1S7S$;"Those letters were flashed at 1/4 second.": T7S$;"How was that, ";REEDER$;" ? Would you 3R279R28514155!RU7Q21Q@RZ7R2R(Q2)R2R(Q25)14155HR_7Q2TRd7R(Q)R2[Ri7QfRn7RS$""qRs7Q15Rx7RS$RS$(R(Q))SPC$R}7QR712:36,COL:S$;RS$R7SEC1SPEED:R712:36,COL:S$;:JJ150:" ";:R7SEC11100: S712:36,C-----------Q#7- PRINT RADNOM LTR -RQ(7-------------------------------dQ-7SEC11100:Q2795:11:36,20(S$):(127)Q77SEC11100:Q<7J1LOOPLIMQA7Q15:R(Q5)R(Q):R(Q)32:QF7Q1LTRSQK7R2(26(1))65RP7R265R269R27"2P6MESSAGE$"Press To Begin.":20CP6936:LTRS3cP6COL16:SPC$" ":LOOPLIM1nP714110P7COL15:SPC$" ":LTRS4:LOOPLIM1P 714140P7COL4:SPC$" ":LTRS6:LOOPLIM1P714140P714265P795 Q7---------------------orrectly.":SO6S$;"Focus your eyes on the square (";(127);")";" which will":O6S$;"appear in the center of the screen. This":O6S$;"exercise will develop peripheral vision,":O6S$;"a necessary step in the speed reading":P6S$;"process.1.87,21.07 2]N 20.28,19.50,18.72,17.95,17.20X]N 16.45,15.72,15.00,14.30,13.60 ~]N 12.93,12.27,11.62,11.00,10.39 ]N 9.79,9.22,8.67,8.14,7.62]N 7.13,6.66,6.21,5.78,7.37]N 4.99]R fox,depend,hidden,parliament,"exaggerate"Y^lR anonymous benefactor,common misunderstanding,forwarding address,"decaffeinated coffee"f^a endings^aXT(XT)^aXT$(XT)^a(XT$)7ND$",000,000":XT((XT(1000000).5)):25100^a(XT$)4ND$",000":XT((XT(1000).5)):25100 _a(XT$)4S$;"features:":PAUSE1500:35Xu7:1:S$;"--> a 128-page workbook with charts and"u9:1:S$;" graphs to record your progress"uPAUSE500:35:11:1:S$;"--> a unique program (the Magic Converter)"u13:1:S$;" which allows you to testentals"H]u35:17:1:S$;"--> survey of your present reading habits"tbu35:21:1:S$;"And there's more . . ."luMESSAGE$"Press And See.":20qu==\/ next screenvu936:1:1:S$;"This course also includes these exciting" {u3:1:he Computer Course:"LIu35:9:1:S$;"--> interesting practice readings"NuPAUSE500:35:11:1:S$;"--> challenging comprehension tests"Su35:13:1:S$;"--> more eye exercises and drills" Xu35:15:1:S$;"--> instruction in speed reading fundam3, 2uPAUSE1500:S$" "k 5u936:1:1:S$;"OK, ";REEDER$;". Now that you've sampled :u3:1:S$;"some of the eye movement exercises, look" ?u5:1:S$;"at some of the other special features of"Du7:1:S$;"SPEED READING . . . TXC((HEADER$))% 41:X:HEADER$+ 7F <Y%1:X%1:PROMPT$:c ZP1,24:P2,24:DR,12:MUi [ b(9563((TQ20)TQ20))(8);: N ENDING %N936 X819,9:51000::(4)"RUN /SPEED1/SR" 0u==========\/ speed reading description 1u)) +3 , ----GET A CHARACTER (NOT TIMED) \/= -KS,0j .TQTQ1:TQ10(TQ10)98:(KB)12846 /AA$((KB)128((KB)127)) 0AA$((AA$)32((AA$)96(AA$)123)): 1 2HEADER$""HEADER$"SPEED READING...THE COMPUTER COURSE" 3AGE$,7)"Review."İ90:22I AA$(32)AA$(21)AA$(8)İ90:22[ MESSAGE$"":o I1940DLY%:u } REN ! #JJ1PAUSE:: ' --------GET A CHARACTER(TIMED) \/ (KS,0 )TQTQ1:(KB)12841 *AA$((KB)128((KB)127@ KS16368:KB16384:CL16336:P1941:P2942:DR943:MU944Y C(X)(((80X)2))_ {  ---WAIT FOR SPACE BAR MESSAGE$""MESSAGE$"Please Press to Continue." XC((MESSAGE$)):24:X:MESSAGE$; 40 AA$(8)(MESS- 30K section ..4/25/84 . . . jc830000REEDER$"":LS%(984):L(985):J1L:REEDER$REEDER$((985J)):TXT$(500),I$(30),FRST%(40),NUM%(50),NUM$(50)SP$" "PF$"/SPEED"(((LS%3)2))"/" D$(4)drive.":aSJ13:90::vaV14:6:"Please place the Introduction disk in the drive and press . ";:45aZAA$(13)İ90:61014a\51000:60000X$#`hPX$"/SPEED1/"D2:600209`jD2DD1:60004K`o216,0:61000V`t216,0\`yr`(4)"RUNAPINTRO"`G dsk err`H don't remove`M936:10:16:(TP$,49(REEDER$)) aR11:16::" Sorry, ";REEDER$;", you need a different disk in the ND$""_ bXT$(XT)ND$!_e'_0u1_8nj936__9Ǣ11:C(18)::" One Moment, Please. ";:p_;Ǻ(4)"FRE":_ֲ hcode seg_ֹ996,((FILE$,1)):51000::(4)"RUN"SEG$_` _bꥫ61000_cD1_d(4)"PREFIX,D"D:(4)"CLOSE"`f(4)"PREFIX":P your reading"Ju15:1:S$;" speed on anything you want to read--"u17:1:S$;" right now and for years to come."u35:20:1:S$;"Next up--a complete list of lesson topics."uMESSAGE$"PRESS FOR MENU OF LESSONS.":20 u==\/lesson1>uX$" SPEED READING . . . The Computer Course "Hu936eu1:36,C((X$))::X$:uX$"LESSON ONE: PRINCIPLES OF SPEED READING"u5:36,C((X$)):X$u9:1:S$;"Find out how you can read faster--and"!u11:1:S$;"smarter--in for years to come by allowing"W tw19:1:S$;"you to measure your reading speed for" yw21:1:S$;"anything you ever choose to read." ~w20 w==\/ next screen w2:958 w w12:1:S$;"All this--and much more--in just eight""!w14:1:S$X$<[w9:1:S$;"See how it all comes together and find"u`w11:1:S$;"out how you can use your newly acquired"ew13:1:S$;"skills, no matter what you're reading."jw15:1:S$;"Let the Magic Converter program extend" ow17:1:S$;"your skills read and find out exactly how to"]3w13:1:S$;"improve your retention and recall skills"8w15:1:S$;"by following five basic memory rules."=w20Bw==\/lesson8Lw2:958QwX$"LESSON EIGHT: EXTEND YOUR READING SKILLS"Vw5:36,C((X$)):ns will increase your reading speed"Hw21:1:S$;"and proficiency."P w20aw==\/lesson7nw2:958wX$"LESSON SEVEN: IMPROVE RETENTION & RECALL"$w5:36,C((X$)):X$)w9:1:S$;"Discover why you forget information"#.w11:1:S$;"you v11:1:S$;"with better comprehension, by understanding"tv13:1:S$;"its structure. This lesson teaches you"v15:1:S$;"to pick out the five basic writing patterns."v17:1:S$;"Then it shows you why recognizing these"&w19:1:S$;"patter"ideas and how to skim for details?"Qv21:1:S$;"Learn how in this lesson."Yv20jv==\/lesson6wv2:958vX$" LESSON SIX: EXPLORE PATTERN & STRUCTURE "v5:36,C((X$)):X$v9:1:S$;"Learn to read any piece of writing faster,";kimming is one way"Nv11:1:S$;"to read faster. But do you know how to"v13:1:S$;"get the most out of skimming? Do"v15:1:S$;"you know when to skim and when to slow"v17:1:S$;"down? Do you know how to skim for main"&v19:1:S$;ickly and"Ev17:1:S$;"then zero in on the important material."yv19:1:S$;"Learn how to do it in this lesson."v20v==\/lesson5v2:958vX$"LESSON FIVE: SKIM FOR SPEED"v5:36,C((X$)):X$v9:1:S$;"Everyone knows that sH A PURPOSE"'fv5:36,C((X$)):X$_kv9:1:S$;"Find out how prereading can save you an"pv11:1:S$;"enormous amount of time and effort. This"uv13:1:S$;"vital speed reading technique allows you" zv15:1:S$;"to get the overall picture quragraph structure,"M>v17:1:S$;"read phrases not individual words, and"Cv19:1:S$;"spot the key signal words that unlock the"Hv21:1:S$;"meaning of sentences at a glance."Mv20Rv==\/lesson4\v2:958avX$"LESSON FOUR: PREREAD WITAD FOR MAIN IDEAS"-%v5:36,C((X$)):X$f*v9:1:S$;"Train yourself to focus instantly on the"/v11:1:S$;"main ideas in any reading matter. Improve"4v13:1:S$;"your reading speed and comprehension by"9v15:1:S$;"learning to analyze pay "?u13:1:S$;"which reading habits you need to acquire"v15:1:S$;"and which ";(34);"bad";(34);" habits are holding you "v17:1:S$;"back and keeping you from reading faster." v20v==\/lesson3v2:958 vX$"LESSON THREE: REhelp")u21:1:S$;"you master them."1u20Bu==\/lesson2Ou2:958yuX$"LESSON TWO: READING HABIT SURVEY"u5:36,C((X$)):X$u9:1:S$;"This computerized survey of your reading"u11:1:S$;"skills will tell you in minutes exactljust a short time. Learn the "\u13:1:S$;"fundamental speed reading techniques you "u15:1:S$;"need to know in order to increase your "u17:1:S$;"reading speed and discover how the unique"u19:1:S$;"capabilities of the computer can ;"easy and stimulating lessons!"*!w20I!w==\/last screen prior art!w936:1:1:S$;"OK, ";REEDER$;". Enough talk. Now for some"!w3:1:S$;"ACTION! I'm going to prove to you how"!w5:1:S$;"this course will help you increase your"9"w7:1:S$;"reading speed AND improve your comprehension."r"w11:1:S$;"Coming up next on the screen is a short""w13:1:S$;"reading test. I'll advance the screens""w15:1:S$;"for you this time. All you have to do is"/#w17:1:S$;"read. So, s/ University Hospital suggests that/ your attitude upon waking can influence/ your entire day. STOP So if you start off/ grumpy and irritable, kiss the rest/ of the day goodbye. And beware/ of the snooze alarm. That 10-minute catnap/ is apt to make you/ ehe alarm rouses you,/ how do you greet the day?/ Do you rise and shine, cheerfully humming/ your favorite tune? Or do you/ drag yourself wearily out of bed/ with a resentful scowl? Recent research/ conducted by the Health Promotions/ Department of St. Louiander confirmed. "Oh, him,"/ the shoemaker replied. "He can't even make/ a pair of shoes." END ASK &How was that, READER? Would you like to try another one? (Y/N) STOP 2YNY+04N+00 ENTER Y or N END SKIP37 END EYEM|0172|03|29 When the shrill blare/ of t people welcoming home/ a conquering monarch. People threw flowers/ in the hero's path and cheered themselves hoarse./ But the shoemaker stood silent./ "Why aren't you cheering?"/ someone demanded. "You're gazing on/ the greatest man of our times,"/ a bystothers./ So keep your dreams in check/ by reminding yourself of your own/ strong points and making the most/ of them. And the next time/ you find yourself STOP yearning to be/ what you aren't, remember the story/ of the shoemaker who joined the throngs/ ofing/ our ambitions. STOP But dreams/ can hurt us, too--- when we begin/ to covet those abilities/ which we lack. This kind/ of envy causes unhappiness/ and discontent because jealous people/ often overlook their own strengths/ while they begrudge those of s. Photographers want/ to be airline pilots. Airline pilots want/ to be professors. And professors dream/ of being great Olympic heroes./ Dreams generally help give us a goal/ to strive for and keep us/ from falling into a rut./ They make us excel by spurr (10% faster, actually) than your present reading rate. \GYour present reading rate is GWPM words/minute. END EYEM|0201|03|36 Most of us/ find ourselves occasionally wanting/ to be something different/ from what we are. Secretaries want/ to be photographerTEXT &Very good, READER. Now here's another speed reading drill-- the EYE MOVEMENT EXERCISE. This one is designed to train your eyes to move quickly across line of print. Try to take in the whole phrase at a glance. The speed will be set a little faster (""):$=DZsit back, relax, and when you're ready . . ."f#wMESSAGE$"PRESS TO BEGIN READING!":20q#w20000#Pâ25:36,1:JJ179:" ";::#8nj936: HEADER$ = "One Moment, Please.": GOSUB 50 #9Ǣ11:C(18)::" One Moment, Please. ";: $;XYven more lethargic. Though getting up/ may be no laughing matter,/ the researchers say the following wake-up plan/ will produce a positive attitude/ toward yourself and your day:/ Get up immediately after awakening./ Stand with your hands STOP on the back/ of your hips, palms facing upward./ Now, begin to laugh. Let your laughter/ feed off itself and spread/ throughout your body. Keep laughing/ for a few minutes. When you feel comfortable,/ stop laughing. Then proceed with/ your morning routine. END EOF RETSPACE BAR> as directed. 3. Read at your normal pace so that you understand what you're reading. 4. Reread these instructions. END TREAD302 THE SINKING OF AN UNSINKABLE SHIP It was pitch black on that April night in 1912 and there had been icebTEXT PLEASE READ THESE INSTRUCTIONS CAREFULLY: 1. When you press to begin, the reading will appear. I'll be timing you, so start reading right away. 2. As soon as you finish reading each screen, "turn the page" by pressing the to Continue."B (FUNCT$,5)"TREAD"İ190:23j XC((MESSAGE$)):24:X:MESSAGE$;r 40 AA$(8)(MESSAGE$,7)"Review."İ90:23 AA$(32)AA$(21)AA$(8)İ90:23 MESSAGE$"": I1940DLAY%:: #I1PP1941:P2942:DR943:MU944w TP$"_______________________________________________________________________________" C(X)(((80X)2)) S$" " TITL$(1)"Principles of Speed Reading"  MESSAGE$""MESSAGE$"Please P ":DT$"--------------------------------------------------------------------------------" SL$"!#$^&|\":TRUE%1:FALSE%0:FR4 D$(4):13000 NWPM(1150)256(1151) KS16368:KB16384:CL16336: LESSON1 4-30-84 Z(4)"BLOADSOUND.3B0":(4)"BRUNINPUT":B$"":9,254:4990REEDER$"":LS%(984):L(985):J1L:REEDER$REEDER$((985J)):TXT$(400),I$(30),FRST%(40),NUM%(50),NUM$(50) SP$" ped to prevent countless others in the years since from meeting a similar fate. END EOF RET id come out of this tragic event. In the wake of the Titanic disaster came a wave of maritime reforms designed to ensure safer passage on the high seas. Perhaps the lives lost that night were not lost in vain, and those who went down with the Titanic hels for a fraction of the people on board. The assurance of her builders that she was unsinkable and the ambition of her captain that she win a record turned out to be no match for STOP the dangers of the open sea. Still, it might be said that some good dgreatest sea disasters of all time. The "unsinkable" luxury liner had sliced her bow on an iceberg and sunk in a matter of hours, taking 1,517 sur- prised and unbelieving people to the bot- tom with her. It turned out that there were only enough lifeboather, what could possibly happen. The Titanic was unsinkable, wasn't she? Well, the Titanic did make the headlines the next day as a recordbreaker. But in- stead of going down in history as the fastest crossing, it will be remembered STOP as one of the a speed record for the trans- atlantic crossing. STOP Yet despite rumors of icebergs that circulated through the salons and dining rooms that evening, none of the 2,200 passengers and crew seemed the least bit concerned. After all, they assured one anot...THE COMPUTER COURSE". 3XC((HEADER$))A 41:X:HEADER$G 7c <Y%:X%:PROMPT$;" ";: FP1,116:P2,116:DR,208:MU:J150::P1,128:P2,128:DR,255:MU:J1200::P1,128:P2,128:DR,96:MU GP1,116:P2,116:DR,96:MU]HP1,96:P2,96:DR,128:MU:P1,102:P2,102:DR,96:MU:P1,116:P2,116:DR,96:MU:P1,128:P2,128:DR,96:MU}IP1,152:P2,152:DR,192:MUKPP1,96:P2,96:DR,32:MU:P1,72:P2,72:DR,32:MU:P1,96:P2,96:DR,48:MUQ UJ120:P1,48:P2,208:DR,4:MU:Z(FPLN1:1NUM%((FUNCT$,5)):LNFP1:FR4`PAUSE1200:35:10:39:" "(127);:95:35oL11NUM%yL%L1L%(NUM%2)İ800:936:PAUSE4800FR:35:10:39:" "(127);:95:35LNLN1:12:41(TXT$(LN))2:TXT$(LN),I1940FR:`JL1JL0:610"aJL0JL1+bVP1bgQ$(TXT$(LN),1):Q$"!"Q$"\"Q$"&"İ10000:660{lVP1:21:TXT$(LN);LNLN1:VPVP2TXT$(LN)""VPVP1TXT$(LN)"STOP"TXT$(LN)"END"61529:936:TXT$(LN)"STOP"LNLN1:610 =20:TQTQ60:936:TXT$(LN)"STOP"LNLN1:510>@580kDFPLN1:TYMETQ69:GWPM(WC%TYME60):XLNFP:(FILE$,3)"ART"WREC0YNSCREENS%0NSCREENS%1ZWREC1DLAY%(NW%(SPD60)):608]DLAY%(NW%((NWPMNWPM10)60))NSCREENS%936:310JJ1:4253LNLNREV:936:310=LNFPFTQ0OVP1Q$(TXT$(LN),1):Q$"!"Q$"\"Q$"&"İ10000:TQTQ100:560VP1:20:TXT$(LN);0LNLN1:VPVP25TXT$(LN)""VPVP1:TXT$(LN)"STOP"TXT$(LN)"END"5155:19:"I'm sorry, "REEDER$", the correct answer is "CR$".":WGWG1:85Q20yTXT$(LN)"END"Č936:LNLN3:310936:FPLN(3((FUNCT$,4)"QUIZ"))((FUNCT$,3)"ASK"):J1LNLN3 A$CH$(J)(A$)(CH$(J))32LNLNBR(J)::J1NM:(A$)(CH$(J))(A$)(CH$(J))32VD19KVDİ90:380h((A$)32((A$)90));1:1:(FUNCT$,3)"ASK"420J1200:23:2:(SP$,79);A$CR$A$((CR$)32)Ģ23:30:"That's correct, "REEDER$".":80:400I23tINFO$TXT$(LN1):NM((INFO$,1)):J1NM:CH$(J)(INFO$,J1,1):~uRMD$(INFO$,NM2):(FUNCT$,4)"QUIZ"CR$RMD$:377vJ1NMxBR(J)((RMD$,J13(J1),3)):JyQUEST$TXT$(LN2)z23:C((QUEST$)):QUEST$": ";|45:A$AA$3VD0(13)FRST%(PGE%)M%:M%LN1:LNLN1:PGE%PGE%1:310p IF PGE% > 1 THEN FRST%(PGE%) = M%:LN = FRST%(PGE% - 1):M% = FRST%(PGE% - 1):PGE% = PGE% - 1: GOTO 310qrTXT$(LN)"STOP"TXT$(LN)"END"315sTXT$(LN)"END"FUNCT$"ASK"İ20:410E 6VP1I;Q$(TXT$(LN),1):Q$"!"Q$"\"Q$"&"Q$"#"İ10000:360f@XYVP:XY:20:TXT$(LN);hLNLN1:VPVP2:VP22VPVP2iTXT$(LN)""VPVP1jFUNCT$"ASKM"TXT$(LN)"ENDM"İ20:4108kFUNCT$"ASKM"TXT$(LN)"STOPM"İ20:936:AA$ST%(PGE%1):M%FRST%(PGE%1):M%FRST%(PGE%1):PGE%PGE%1:210: ELSE GOTO 271kTXT$(LN)"END"280~AA$(8)280PGE%1FRST%(PGE%)M%:LNFRST%(PGE%1):M%FRST%(PGE%1):PGE%PGE%1:210FPLN1:,LNFP:WG0:M%LN:FRST%(1)LN:PGE%1MESSAGE$"Press or --> To Continue, <-- To Review.":273uMESSAGE$"Press to Continue."20:AA$(8)PGE%1Č936:200936TXT$(LN)"STOP"277:AA$(8)FRST%(PGE%)M%:M%LN1:LNLN1:PGE%PGE%1:210RLNFRX::" ";MESSAGE$;::;LNFP:M%LN:FRST%(1)LN:PGE%1DVP1Q$(TXT$(LN),1):Q$"!"Q$"\"Q$"|"Q$"&"Q$"#"İ10000:260VP:20:TXT$(LN)LNLN1:VPVP2 TXT$(LN)""VPVP1TXT$(LN)"STOP"TXT$(LN)"END"212GPGE%1" ";(8)(8);2r(A$)1A$(A$,(A$)1):105Js(A$)1A$"":105Wv90:105ox(AA$)32İ90:105(A$)MAXLİ90:105AA$;:A$A$AA$:105" "(8);:XC((MESSAGE$)):23:X:"______________________________________"24:CL)(CL):V0ZP1,24:P2,24:DR,12:MU6[S_P1,96:P2,96:DR,48:MUY`b(9563((TQ20)TQ20))(8);:dA$"":AA$""i"_"(8);:45lAA$(32)SM%FALSE%:180nAA$(13)SM%FALSE%:180oAA$(8)120q(A$)0ĺ:12:41(TXT$(LN))2:(SP$,(TXT$(LN)))<DLAY%1:2912:41(TXT$(LN))2:TXT$(LN):29:12:41(TXT$(LN))2:(SP$,(TXT$(LN))):29FPFPNUM%: FLSH(1)3:FLSH(2)4:FLSH(3)10!936:4:21:"How are you doing, "REEDER$"?""(LS%2JL1)Ģ6:21:"Are you finding this exercise:":11:24:"(1) too fast?":13:24:"(2) too slow?":15:24:"(3) just about right?":818&WRECĢ6:21:"Those letters were flashed at 1/"FR" of a"(WRECĢ6:21:"Those words were flas:12:20:"in this Lesson and then press :":16:35:" ____ wpm.":2360, 10:20:"rate from the FINAL TIMED READING ", 12:20:"in Lesson ";LS%1;" and then press :":16:35:" ____ wpm.",8 16:36,35:MAXL4:100,B WREC0-L 3A+20:28:"Press To Confirm.":40:AA$(13)2125G+u+20:23:(SP$,36);:21:22:(SP$,40);:{++MAXL4:936+ 8:20:REEDER$;", please type your effective reading"Q, LS%1Ģ10:20:"rate from the INITIAL TIMED READING "8*K%(JJ1)2:ROW%START%:EDGE%:C$(ROW%);:ROW%K%O*K%1K%NCH%2165*2230:START%K%:EDGE%::C$(K%);:EDGE%4:G$(K%);::2228* IF K% > 2 AND K% < 7 THEN GOSUB 2300 *1149,K%:K%5006,5006,5085,5030,5170,5180,9670*2125+F)}A$DOWN$ROW%NCH%ĝ:ROW%START%:EDGE%:C$(ROW%):ROW%ROW%1)A$UP$ROW%1ĝ:ROW%START%:EDGE%:C$(ROW%):ROW%ROW%1)ROW%START%:EDGE%::C$(ROW%);:)JJ1(CH$))A$(CH$,JJ,1)2185)JJ:A$(13)K%ROW%:2165*2195%1:LT%EDGE%1:RIGHT%EDGE%1:2105Z(f20:23:" Move The Cursor To Your Choice And";(k21:22:"Press Or Just Type The Letter.";(uROW%START%:EDGE%::C$(ROW%);::40(vA$AA$(wJJ1(LEG$):A$(LEG$,JJ,1)2173(xJJ){2165:Y:RIGHT%:(124);:'C&'H @'M936:HEADER$TT$:50q'R5:25:"Please Choose From The Following:";'USTART%9:EDGE%27:ROW%1:K%1'WP1NCH%:PSTART%:EDGE%:C$(P);:'\P1NCH%:PSTART%:EDGE%4:G$(P);:&(aTP%START%:BT%TP%NCHeading/Test":C$(5)"E"m& G$(6)"Final Timed Reading/Test":C$(6)"F":G$(7)"Return to Main Menu":C$(7)"G"& NCH%7:UP$(11):DOWN$(10)&"LEG$"AaBbCcDdEeFfGg"(13)UP$DOWN$:CH$"AaBbCcDdEeFfGg":2125&9 '>Y(TP%1)(BT%1):Y:LT%:(124);d command in file at line "FP".":0%@FPFP1:%B1052@%GF%%936:G$(1)"Introduction":C$(1)"A":G$(2)"Initial Timed Reading/Test":C$(2)"B":G$(4)"Rapid Perception Drills":C$(4)"D"& G$(3)"Accelerated Reading":C$(3)"C":G$(5)"Practice R3)"SPD"İ840:10903$.FUNCT$"RATE"İ800:1090V$3(FUNCT$,4)"RNDW"İ700:1090{$5(FUNCT$,4)"RNDL"İ40000:1090$6(FUNCT$,3)"ASK"(FUNCT$,4)"QUIZ"İ300:1090$7 EYEM$8(FUNCT$,8)"SETFLASH"FR((FUNCT$,9)):1090$%>936:"InvaliP1##$FUNCT$"TEXT"İ200:1090#&(FUNCT$,3)"ACC"NW%((FUNCT$,4,4)):NSCREENS%((FUNCT$,8)):WREC1:SPD400:600:1090#)(FUNCT$,5)"TREAD"WC%((FUNCT$,6)):500:1090#,FUNCT$"HCODE"SEG$TXT$(FP):FILE$TXT$(FP1):55000$-(FUNCT$,"" "900""FP16"FUNCT$TXT$(FP)N"FUNCT$"EOF"1056"TXT$(FP1)"RET"FILE$TXT$(FP1):51000:900:1050"1095" (FUNCT$,4)"SKIP"1059"!((FUNCT$,5))0FPFP2:1059""FPFP((FUNCT$,5)):1090##936:FPF!!HSPDSPD((FUNCT$,4))4:'!-!I!D$;"OPEN/SPEED2/"FILE$e!D$;"READ/SPEED2/"FILE$n!LN1v!B$!TXT$(LN)B$!LN1ĭTXT$(LN1)"EOF"TXT$(LN2)"HCODE"930!TXT$(LN)""925! !LNLN1:915"D$;"CLOSE";FILE$:N2LLAA$# 4(A$)1(A$)3İ90:818C 5FRFLSH((A$)):A$:JL831{ :21:36,1:S$;"OK. This exercise is now set at";S$ ;22:36,1:S$; <(A$)3"the same rate." =(A$)2"a faster rate." >(A$)1"a slower rate." ?MESSAGE$"":20!Fhed at 1/"FR" of a"H*8:21:"second. Do you wish to continue at:"o,11:21:" 1. 1/3 of a second?".13:21:" 2. 1/4 of a second?"015:21:" 3. 1/10 of a second?" 221:21:"Please enter the number of your selection: ";:45:A$6,25:(SP$,18);(SP$,20)2-V (A$)0İ90:2310n-` NWPM(A$):1150,NWPM(NWMP256)256:1151,(NWPM256)-j 16::36,35:A$" wpm. ":21:36:"Thank you.":20:-~(2047)2İ3:FILE$"RPD"(LS%)".2":2047,0:5050 .(997)0İ3:FILE$"LES"(LS%)"."((996)):997,0:5020m.936:3:50:9:11:21:LS%9Ģ10:36:"MAGIC CONVERTER":95:20:14000.(2046)1Ģ13:958:50:13:21:"OK, ";REEDER$" let's begin with":15:21:"the introduction."::20:5006I/9:20:(DT$,40):10:C((TITLich will appear in the center of the"d<17:36,1:S$;"screen just above the flashing letters."<19:36,1:S$;"This will help you use your peripheral"<21:36,1:S$;"vision to perceive the letters quickly." =MESSAGE$"PRESS TO BEG36,1:S$;"in a fraction of a second. The same"j;9:36,1:S$;"letters will then reappear so you can";11:36,1:S$;"check that you perceived them correctly.";13:36,1:S$;"Focus your eyes on the small square (";(127);")"'<15:36,1:S$;"whJ$"Y"J$"y"ī6050 :6010T:20:36,20:S$;S$;" ":21:36,20:S$;S$:6160:936:1:36,4:S$;"WARM-UP EXERCISE - LETTERS":3:36,1:S$;"In this drill, two to five letters":5:36,1:S$;"will appear on the screen and disappear"1;7:or instructions.":20(97936:1200029<936N9bFILE$"FTR"(LS%)".0"e9d51000:1000:90009pS$" "9s20:36,1:S$;"Would you like to review"9u21:36,1:S$;REEDER$;"? (Y/N) ";9z45:J$AA$9J$"N"J$"n"6030:40:A$AA$:A$"Y"A$"y"NWPM1.1NWPM:5167I8+A$"n"A$"N"5162[8/VVVV1:5151a8182936:4:20:"O.K.,"REEDER$"."837:20:"It's time now for the PRACTICE READING"849:20:"section of the program."95MESSAGE$"Press fO.K, "REEDER$"."w7'12:20:"Try the next selection at a slightly":14:20:"slower speed.":NWPM.95NWPM:20:51677(936:2:20:"O.K., "REEDER$"."/8*936:12:20:"Would you like to read the next selection":14:20:"at a faster speed? (Y/N) ";:"(LS%)"."(VV):51000:100066 LS%1VV45154@6!5156Q6"15000:5030[6#51706$936:12:20:"Were you able to read this selection":14:20:"comfortably? (Y/N)";:40:A$AA$:A$"y"A$"Y"51626%A$"N"A$"n"51567&936:10:20:"18:36,19:"test? _____wpm.";5 18:36,55:MAXL4:100L5 WREC0:ART1f519:36,55:(SP$,18)}5(A$)0İ90:5128518:36,27:A$" WPM. ":21:36:"Thank you.":MESSAGE$"Press to begin.":20:5VV1:ZNWPMNWPM!6FILE$"ARTREC1:SPD1504 ART-4(1149)35170=4936:5150V4FILE$"ART2.0":1000412:20:"Please turn to page "WW(LS%)" of your work book"414:20:"and enter below your effective reading rate" 516:36,19:"for the INITIAL TIMED READING":ons. This will give"K315:20:"you practice with rapid perception of"317:20:"items unrelated to each other.":60003FILE$"RPD1.2":1000:936:WREC1:SPD150:20:FILE$"RPD1.3":51000:1000:51693FILE$"RPD"(LS%)".1":51000:10004W$;"."=25:20:"Let's begin the RAPID PERCEPTION DRILLS"q27:20:"with a WARM-UP EXERCISE with LETTERS."29:20:"In this drill, you will perceive random"211:20:"letters in a fraction of a second as you"313:20:"did in previous lessINTRODUCTION ";::FILE$"LES"(LS%)".1":20A1K%2İ20000O151000:1u11000:NTEST1:9000:NTEST0:50851936:4:21:FILE$"RPD1.1":51000:1000:936:50501936:5:25:"== RAPID PERCEPTION DRILLS ==":202:3:20:"O.K., ";REEDER50:13:21:"In that case, "REEDER$", let's begin with":15:21:"the introduction.":20q0936:(SL$)0İ30(997)05010050:9:20:(DT$,40):10:C((TITL$(LS%))12):"Lesson ";LS%;" -- ";TITL$(LS%):11:20:(DT$,40):95/114:33::" $(LS%))12):"Lesson ";LS%;" -- ";TITL$(LS%):11:20:(DT$,40):95:20/936:50:12:21:"Have you worked with Lesson ";LS%;" before, ";REEDER$"?"/19:33:"Enter Y or N: ";:45:A$AA$:A$"Y"A$"N"İ90:5002/A$:(A$)"Y"2000Z0936:IN.":20:C=(#PERC100WG20WG10(NTEST):NWPM(PERCGWPM100)j=$4:20:WG3ĺ"Very good, ";:9435=$WG3WG4ĺ"OK, ";:9435=$4:20:"Gee, ";=$REEDER$".":NTESTī9700=$6:20:"You scored "PERC"% comprehension on">$8:20:"this test. ";>$WG4ĺ:9510>>$"Perhaps next time you should"s>$10:20:"slow down a bit so you can understand">$12:20:"better what you're reading.">&%20:936:6:20:"Please turn to page "XX(LS%)" in your workbook"?0%8:20:"and note the foen Selection #"SL", titled"9L/7:20:"'";TT$(SL)"'."L/10:20:"Is that correct? (Y/N)":40:A$AA$:A$"y"A$"Y"A$"N"A$"n"İ90:12040L /A$"n"A$"N"12010L/13:20:"Good. I will now time how long it takes"M/15:20:"you to read page "YY(LS%)" in your workbook."XK.22:20:"Please choose 1, 2 or 3 ": K.20:20:"Which reading have you selected? ";:40:A$AA$K.(A$)1(A$)3İ90:12028K/SL(A$)K/936:3:20:"O.K., "REEDER$"."L/5:20:"You have choss"7J.5:20:"in sequence, or you may wish to pick"hJ.7:20:"out one that interests you at this"|J.9:20:"time."J.12:20:"Please enter the number next to the"J.14:20:"title of the PRACTICE READING you have"#K.16:20:"selected from JJ1(TXT$(LN))6I)(TXT$(LN),JJ,4)"GWPM"10715>I)JJGI)JJ0QI)Z%JJI)VP:20:(TXT$(LN),3,Z%4);" "GWPM" ";:(TXT$(LN),Z%5);I/*I.51000:I.12300I.FILE$"PRAC2"I.1000J.936:3:20:"You may choose to read the selection'*H'HEADER$"MEMORY JOGGER":50:70:@H)JJ1(TXT$(LN))eH )(TXT$(LN),JJ,6)"READER"10515mH)JJvH)JJ0H)Z%JJH)VP:20:(TXT$(LN),2,Z%2);REEDER$;:(TXT$(LN),Z%6);H^)Hh)DLAY%((TXT$(LN),3,1)):29:VP:20:(TXT$(LN),4);:I)UM%(G%)LM%1NUM%(G%)NUM%(G%1)1:(TXT$(LN),I1,1);::PTR%I1:fG'G1(2NLR%)2:G%G:10151:G':I1PTR%(TXT$(LN)):(TXT$(LN),I1,1);:G'I11NC%1:NUM$(I1)"":NUM%(I1)0:G'CL$"":PTR%0:NC%0:NUM$"":LM%0:CL%(1)7:CL%(2)0:CM$""H'LM%I%1:PTR%LM%&F'I11(NUM$)_F'(NUM$,I1,1)","NC%NC%1:NUN$(NC%)(NUM$,I12,2)eF'F'NLR%(NC%1)2:NUM$(NLR%2)(NUM$,2)F'I11NC%1:NUM%(I1)(NUM$(I1))::10160F':I1PTR%LM%NUM%(G%)2:(TXT$(LN),I1,1);:DG':I1LM%1N51000:900:936:200:9510'E4&9510NE'JJ1(SL$):Q$(SL$,JJ,1)10045XE:'JJ:gE='SWITCH%JJEL'SWITCH%10100,10200,10300,,10500,,10700Em'Et'VP:20E~'NC%0E'I%3E'(TXT$(LN),I%,1)"@"NUM$NUM$(TXT$(LN),I%,1):I%I%1:10135F"reading rate is ";NWPM;" words per minute."fD &14:20:"Would you like to see the reading again?"D%&16:20:"YOU WILL NOT BE TIMED OR TESTED! (Y/N) ";D*&45:A$AA$:A$"Y"A$"y"A$"n"A$"N"İ90:9765E/&A$"Y"A$"y"FILE$"LES1.4":FP2:"some of the techniques you've learned."gC%MESSAGE$"Press to return to Main Menu.":20rC%51000}C%60000C%C &6:20:"You scored "PERC"% comprehension on this"C&8:20:"this test, which means that your effective".D&10:20:f this lesson,"FB%8:20:"simply make that selection on the menu"gB%10:20:"for Lesson "LS%"."B%12:20:"Remember to PRACTICE on your own"B%LS%8Ģ12:53:".":9660B%14:20:"before starting Lesson "LS%1". Be sure to try"*C%16:20:REEDER$".":7:20:"These rates will help you to":9:20:"measure your progress throughout":11:20:"this course."Ai%20:Al%936:2:20:"O.K., "REEDER$"."Av%4:20:"This is the end of Lesson "LS%". If you"B%6:20:"wish to repeat any part o? (Y/N) ";:40:A$AA$+@Z%(A$)"N"9560;@[%NTEST9575~@]%21:20:"Have you plotted your EFFECTIVE READING RATE on the"@^%23:20:"graph on page 121 of the workbook? (Y/N) ";:40:A$AA$@b%(A$)"N"9565@g%NTEST09580vAh%936:5:20:"OK, "llowing rates under"I?5%NTESTĢ10:20:"INITIAL TIMED READING:":9540m?:%10:20:"FINAL TIMED READING:"?D%13:20:" Gross Reading Rate: "GWPM" wpm."?N%15:20:" Effective reading rate: "NWPM" wpm."@X%19:20:"Have you noted the above ratesthe selection. Just"GM/17:20:"remember to try to PUSH yourself,"|M/19:20:"reading faster than your normal rate."M/20M/936:1:20:"READ THESE INSTRUCTIONS CAREFULLY!"M/3:20:"In order for me to time you, you must"#N /5:20:"tell me when to start timing and when"RN"/7:20:"to stop by pressing ."N$/9:20:"You will follow these two steps:"N&/11:20:"1. When you're ready to begin reading,"N(/13:20:" press . I will respond"O*/15:20:" w))4\n7936:5:20:"Congratulations, "REEDER$"!"g\x77:20:"You read this selection at a rate of"\79:20:GWPM" words per minute."\712:20:"Please turn to page 124 of your workbook"\714:20:"and note the title of this selection and"7]7er to round off"7[A714:20:"to the nearest inch.)"[F718:20:"Type the number here and then press : ____ inches.";:18:36,65:MAXL4:100:(A$)0İ90:14150[P718:36,65:A$" inches. ":NI%(A$)[Z720\d7GWPM(60NW%NI%NN%(20TYME208Z7MG%1:12060: pick up middle of prac. rdng.vZ7936:5:20:"Very good, "REEDER$"! Now I need to know"Z(77:20:"the following information: "Z2710:20:"How many inches of the selection did you"[<712:20:"read all together? (Remembn? (Remember to count only lines"aY713:20:"that go at least half way across the column!)"Y717:20:"Type the number here and then press : __ lines.";:17:36,65:MAXL2:100:(A$)0İ90:14095Y717:36,65:A$" lines. ":NN%(A$)Z7ress : ___ words.":16:36,65:MAXL3:100:(A$)0İ90:14070pX716:36,65:A$" words. ":NW%(A$)xX 720X 7936:5:20:"I also need to know this:"X 79:20:"How many lines are there in 4 inches (vertical)"$Y 711:20:"of the selectio2"W61000AW65:20:"All right, "REEDER$", I need to know"kW67:20:"the following information: "W610:20:"How many words are there in 5 lines of"W612:20:"the selection you're going to read?"GX616:20:"Type the number here and then pB$:TT$(I)B$#V*0B$:NUMW$(I)B$)V/08V40D$"CLOSE">V>0DV2\V2II12:WW(II):IItV2II12:XX(II):IIV2II12:YY(II):IIV2II12:ZZ(II):IIV2112,113V3113,114V39,23V3113,114V3JJLS%V"3V651000W6FILE$"MRINTr practice"cU/14:20:"reading (Y/N)? ":40:A$AA$:A$"Y"A$"y"A$"N"A$"n"İ90:12181U/(A$)"Y"A$"y"Č936:12022U/U 0D$;"OPEN/SPEED2/TITLES":D$;"READ /SPEED2/TITLES":12325U0I13(LS%1)U0B$U0B$U 0U%0I13V(09:20:"Please turn to page "ZZ(LS%)" in your workbook"gT/11:20:"and note the following rates:"T/14:20:"Gross Reading Rate: "GWPM" wpm."T/16:20:"Effective Reading Rate: "NWPM" wpm."T/20 U/936:12:20:"Would you like to try anothe%)"."(SL)Sq/51000:1000HSv/PERC10010WG:NWPM(PERCGWPM100)mS{/936:1:20:"O.K., "REEDER$"."S|/3:20:"You scored "PERC"% comprehension on this"S~/5:20:"test. Your EFFECTIVE READING RATE is"S/7:20:NWPM" words per minute.":T/ "GWPM" words"FR\/6:20:"per minute. This is your GROSS READING"ZR^/8:20:"RATE."R`/11:20:"To determine your EFFECTIVE READING"Rb/13:20:"RATE, please complete the following ten":15:20:"comprehension questions.":20Sl/FILE$"TEST"(LSPACE BAR> TO START TIMING.":20|QI/MESSAGE$"PRESS TO STOP TIMING.":936:12:30:"I AM TIMING YOU NOW.":20QL/TYMETQ92:MG%1ıQN/GWPM((NUMW$(SL))TYME60)QX/936:2:20:"O.K., "REEDER$"."RZ/4:20:"You read this selection atw again quickly:"FP when you begin"bP>/10:20:" reading."P@/13:20:"2. Press when you finish"PB/15:20:" reading."PC/8:20:"1. Press when you begin"!QD/TQ0:MESSAGE$"PRESS again to stop"O0/21:20:" timing."O5/23:20:"Do you understand the instructions? (Y/N)";:40:A$AA$P:/936:5:20:"Let's revie16:20:"your reading rate. Then plot your progress"`]718:20:"on the graph on page 128."]721:20:"Now, "REEDER$", would you like to choose"]723:20:"another selection (Y/N)? ":40:(AA$)"Y"AA$"N"İ90:14260^7AA$"Y"AA$"y"Č936:14020^7LS%89580Y^7936:12:20:"All right, "REEDER$". You're done with the"^714:20:"Magic Converter program now. Remember, you can"^716:20:"use it anytime to work on your reading speed."^79660_:936:2:20:"OK, "REEDER$"!""RUN/SPEED2/"SEG$l` )lbꥫ610001lcD1Sld(4)"PREFIX,D"D:(4)"CLOSE"jlf(4)"PREFIX":PX$lhPX$"/SPEED1/"D2:60020ljD2DD1:60004lo216,0:61000lt216,0lyl(4)"RUNAPINTRO"lH216,0 mM936:10:16:(TP$,49(0LIN%25kiHOZ%0HOZ%1MkjLIN%:HOZ%:(SP$,79HOZ%);:RL%(RAN$):Tk| mkPâ24:1:(SP$,79);:k8nj936:10:C(18):"_____________________";k9Ǣ11:C(18)::" One Moment, Please. ";:k=Ǻ(4)"FRE":lֹ996,((FILE$,1)):51000::(4)KK1300::12:36,JT(T):J$(T):JJOjsMSTMST2:LMLM2:MESSAGE$"":936:[jRAN$""hjJ1SN%jTP(((8)26)65)jTP65TP69TP73TP79TP8543006jRAN$RAN$(TP)(SP$,SPRED):j RAN$(RAN$,(RAN$)SPRED):RL(RAN$): khLIN% "[iiJ$AA$:T(J$):T1T3İ90:41050pijT1FR3:41069~ikT2FR4ilT3FR10imMESSAGE$"GET READY TO BEGIN.":XC((MESSAGE$)):23:X:MESSAGE$%jnJJ13:KK1300::12:36,JT(T):" ":er groups."Dh<10:36,1:S$;" Would you like to work at"~hF12:36,1:S$;"(1) 1/3 (2) 1/4 (3) 1/10"hP14:36,1:S$;" of a second?"hZ18:36,1:S$;"Please enter your choice: 1 or 2 or 3";hd454if18:36,1:S$;" :29:12:(41(RL2)):(SP$,RL):29,g5gFR4;gyg(936:5:36,1:S$;"The next exercise will test your eye"g*J$(1)"(1)":J$(2)"(2)":J$(3)"(3)":JT(1)21:JT(2)35:JT(3)49g+S$" " h27:36,1:S$;"span with longer lett10):SPRED4SPRED140022DfYSN%((1)10):SN%MSSN%LM40025f[(K6K13)İ18000:PAUSE4800FR:936:10:39:" "(127);:95:35f^43000:12:(41(RL2)):RAN$fhI1940FR::12:(41(RL2)):(SP$,RL):DLAY%1:35&g|12:(41(RL2)):RAN$113:R:36,(C1D(S$)):(IK$,D,1):I1X::YeNR:36,C(S$):" ":eN13:36,1(S$):IK$;".":I1500::e@LT%((FUNCT$,5,2)):TJ0eEMSTLS%2:LM2eOPAUSE1200:35:10:39:" "(127);:95:35eTK1LT%fVSPRED((1)R$;"!":I11000:Kd>N9:2:S$;"You have just made one of the smartest"dHN11:1:S$;" decisions you'll ever make -- ":I11200:d\N11:36,31(S$):" to learn":XY("")dfNIK$"SPEED-READING":X100dpNR1321dzNC((R13)5)1:X(X2)3eNDwords were "Nc@G11:36,1:S$;"flashed at 1/";FR;" of a second. Try again"ecDGFR10FR4:18250tcEGFR4FR3cJG13:36,1:S$;"at 1/";FR;" of a second."cTG20:c NS$(SP$,20):936:50d*N7:36,(20(REEDER$)0)2:S$;"Welcome on-line,";REEDEash"bFFR3FR4:18130,bFFR4FR10ZbF13:36,1:S$;"for 1/";FR;" of a second."dbF20:obG936:b"G5:36,1:S$;"That's O.K.,";REEDER$;"."b,G7:36,1:S$;"It takes practice to train your eyes to"c6G9:36,1:S$;"perceive quickly. These FFLSH(1)3:FLSH(2)4:FLSH(3)100aZF45:J$AA$IadFJ$"Y"J$"y"18100banFJ$"N"J$"n"18200maxF18010aF936:5:36,15:S$;"GREAT!"aF9:36,1:S$;"These letters were flashed at 1/";FR;" of a"bF11:36,1:S$;"second. The next letters will flrate."m`:14:20:"After only a few lessons, you should ":16:20:"find that you're able to bring your"`:18:20:"gross reading rate up to this level."`>20:`PFK13İ41000:`SF936:10:36,25:"Are you catching on,";REEDER$;"? (Y/N)";!aU2_:4:20:"You were able to keep up with the"f_:6:20:"ACCELERATED READING TEST at a rate of"_:PC((NWPMZNWPM)NWPM100.5)_:8:20:(NWPM)" words per minute, which is "PC" %"`:10:20:"faster than your initial gross reading":12:20:"REEDER$))[mR11:16::" Sorry, ";REEDER$;", you need a different disk in the drive.":nmSJ13:90::mV14:6:"Please place the Introduction disk in the drive and press . ";:45mZAA$(13)İ90:61014m\51000:60000 % SEG1.3 ....JC 4-30-84 010000^ =======INITIALIZATION \/ ==============d{S$" "REEDER$"":LS%(984):L(985):J1L:REEDER$REEDER$((985J)): SP$" ":DT$"-----------------------AUSE1200:35:13:36,40:(127):35EO14:36,14(S$):"J C";TOJJ150:tO14:36,14(S$):" "OI1100::O16OS$;" The letters that flash underneath":PS$;"the square will reappear so that you": PS$;"can check 0:60000 36:10:16:(TP$,49(REEDER$))rpR11:16::" Sorry, ";REEDER$;", you need a different disk in the drive.":pSJ13:90::pV14:6:"Please place the Introduction disk in the drive and press . ";:45pZAA$(13)İ90:61014 q\5100":4oֹ996,((FILE$,1)):51000::(4)"RUN"SEG$@o`ꥫ61000HocD1jod(4)"PREFIX,D"D:(4)"CLOSE"of(4)"PREFIX":PX$ohPX$"/SPEED1/"D2:60020ojD2DD1:60004oo216,0:61000ot216,0oyo(4)"RUNAPINTRO"oH216,0"pM9N$(RAN$,(RAN$)SPRED):RL(RAN$):;nhLIN%0LIN%25NniHOZ%0HOZ%1}njLIN%:HOZ%:(SP$,79HOZ%);:RL%(RAN$):nPâ24:1:(SP$,79);:n8nj936:10:C(18):"_____________________";n9Ǣ11:C(18)::" One Moment, Please. ";:o=Ǻ(4)"FRE$UmnJJ13:KK1300::12:36,JT(T):" ":KK1300::12:36,JT(T):J$(T):JJmsMSTMST2:LMLM2:MESSAGE$"":936:mRAN$""mJ1SN%mTP(((8)26)65)mTP65TP69TP73TP79TP8543006mRAN$RAN$(TP)(SP$,SPRED):'n RAice: 1 or 2 or 3";ld45dlf18:36,1:S$;" "liJ$AA$:T(J$):T1T3İ90:41050ljT1FR3:41069lkT2FR4llT3FR10mmMESSAGE$"GET READY TO BEGIN.":XC((MESSAGE$)):23:X:MESSAGE 62,255:63,7: SOURCE END $07FF S 66,0:67,4: DESTINATION START $0400 j 763: MOVE IT! z (4)"PR#3"   56,32,17,195,96  SEC,JSR $C311,RTS SEC,JSR $C311,RTS  :CLEAR 40 COLUMN SCREENOI763767:D:I,D:I:POKE IN MOVE ROUTINEs60,0:61,4:SOURCE START $0400(62,255:63,7:SOURCE END $07FF266,0:67,4:DESTINATION START $0400<763:MOVE IT!F(4)"PR#3"Pd56,32,17,195,96 e-") PF$"/SPEED"(((LS%3)2))"/"g KS16368:KB16384:CL16336:PI941:P2941:DR943:MU944 C(X)(((80X)2))   ==============WAIT FOR SPACE BAR \/ ======= MESSAGE$""MESSAGE$"Please Press to Continue."" Xthat you perceived them":1PS$;"correctly."<P21390[P14:36,14(S$):"J C";#PMESSAGE$"PRESS TO BEGIN.":3:20(P2047,2:51000::(4)"RUN"PF$"APDRIVER": POKE SO DRIVER KNOWS TO LOAD NEXT RPD (RPD1.2) xPI1