' +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- (  Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` d ֠z# u`05[ L90LGX\ L91$` 24103e XLG2500<j X:Z X9X250:PT(X9)02410k X9:HGX1:{ " NUMBER"; A1ĺ10)"NAME"; 25)"POINTS"33)"GRADE" 1710 N1"-"N2;:A1ĺ10)S$(N1,N2); 25)TP(N1,N2)33)G$:17901z"#    ԠҠ!Ԯ͠Ӡ ͠ҠŠԠíǠǭǠǭǠŠǠ̠ ԠĠԠĠɠԠҠϠ Π̠ŠҠԠ̠Š͠Ҡͮ͠Ҡͮ͠Ҡͮ#(Y$)201(Y$)1935206(Y$)194530I(Y$)212540_"AT LINE 625",Y$nF$"RUN":~F$"BRUN":F$"EXEC":&056,72,132,208,160,0,145,209,230,209,208,2,230,210,104,164,208,96,169,160,96: LINE #20 = DISK TITL OR RUN ANY OF THESE PROGRAMS? (THERE ARE MORE.) ";:380I hZ$W rZ$"Y"ıh |Z$"N"360 32,0:34,3:33,19:: (Y$)201(Y$)193440 (Y$)194450 (Y$)212460 470 F$"LOAD": F$"BLOAD":F$"EXEC": (X$,1)"R"İ480:2800 (X$,1)"0"2709 190Q ::D$;"CATALOG":h (X$,2,1)"0"270 "((X$,2,1))0190 ,: 6D$;F$;(A$(X),7,31);",V0" @ J33,19:32,20:: T32,0:34,22:33,40:A ^384:" DO YOU WANT TO LOAD:J10T21 T:J;3);(A$(J),7,16):JJ1:140K 32,0:34,22:33,40: 384:" TO RUN OR LOAD - TYPE OR AND PROGRAM # FOLLOWED BY A .";:380:" ";X$ X((X$,2,4)):Y$(A$(X),2,2) XJ1190 (X$,1)"L"İ400:280Q1,3:Q2,18:Q3,3:34,3X n24:D$;"CATALOG":D$;"PR#0":D$;"IN#0"::33,20:34,3::~ x384:" 0 CATALOG ":380 J1:QQ0A$(0)B$" " (A$(J),7,15)" "190 J18J53İ330 J36İ340:Z$"Y"190 T1 (I10011:A$(I)B$C$:B 2QQ(977)185:QQ0A$(0)C$" "Z <QQ0A$(0)C$" "z FI768788:PP:I,PP:I:I0 PZZ3037:I0:R0:QQ(977)185:QQ0ZZ3220 ZQ(977)(978)256ZZ:Z(107)(108)2568 d(209),(Z):(210),(Z1):Q,0:3 255:::A$(100):D$(4):D$;"NOMON C,I,O":"----------------------------------------";:384:" A.P.P.L.E. PUBLIC DOMAIN SOFTWARE ";:380:"----------------------------------------"C$" ":B$" "     "Ӡ]ӠΠՠ]ԠԠԠ ]ΠӠˠӠQfx]]à]٠ĠĠ]Š]Ŭ٠] ] M6o,P%@a(ŠΠŬî)TUVWY hM6|a()Q] ]ĮϠˠ &S(Ϡ̠ǠӠ)&@ M6ca() Q&a()QĠӠ٠)cpa(ŧ̠ΠҠŬĠȠ٠ˠŠՠŠ͠Š٬ȠҠӮ)0cDP%Xa(ŠΠŬî)lP a(Š)P a(Ŭ٠)cĠŠƠŠӠŠӠĠՠĠͿŠՠΠˠŠӠϠŭ).a(Š٠ͿΠ٠Ů)cTa(ŠĠŠϠԠҠħӠҠӠϠ٠ĠŮ)P#a(ŬDx]]à]٠ĠĮ]Š]Ŭ٠] ] M6cc,P @a(ΠΠ)TP&ha(ŠӠĠŠ)|c|a(ӠՠŠ    " " ":" "G "NAME----------------------------CLASS-----#-----"U P2ĺ" " " A B C D E A B C D E A B C D E A B C D E" K125 K;A$(K);K25;A$(K25);K50;A$(K50);K75;A$(K75) P2ĺ" " " 0"THE TOTAL NUMBER OF FILL-IN QUESTIONS";SR @"AFTER EACH -?- TYPE THE NUMBERS";] AK1Sg BF(K) CA$(F(K))"--------------" DF(K)10A$(F(K))"---------------" E 936 1 " 80N" " LAKES HIGH SCHOOL A$(101),F(101):K19:A$(K)" O O O O O ":GK1099bA$(K)" O O O O O "h()A$(100)" O O O O O "*"DO YOU WANT HALF SHEET?";P$+(P$,1)"N"P22"DO YOU NEED SPACES FOR FILL-INS ?";S$<(S$,1)"N"151) >   :HC:MD:X3:E1:? "2ND LUNCH",H":"M,"TO",:N30:2000::m MMN:M601HH(M60):MM60(M60)~ H12HH12 H":"M:ZM:MM5:M601HH1:MM60 ELAKES VIA THE SCIENCE DEPT. $$":" ":" "^ FX15:" ":"PERIOD "X,H":"M,"TO",:NB(X):2000y PX100,110,120,130,100 d: nSN1ĂX p"SNACK BREAK",H":"Z,"TO",:N5:2000: x:CH:DM:"1ST LUNCH",H":"M,"TO",:N30:2000: E1140 5:B(X)B::B(2)B10] 2"DO YOU WISH SNACK BREAK ";A$:(A$,1)"N"āX15:B(X)B(X)2::60f 7SN1p <936 A1:" 80N" C:10:"**** LAKES HIGH SCHOOL EMERGENCY BELL SCHEDULE ****":18:"++++ BY JOHN TACKE - '81 ++++") D12:"$$ DEDICATED TO   936s"USE THE 24-HOUR FORMAT.":"USE A COMMA INSTEAD OF A COLON":"STARTING TIME";H,M:"END TIME";H1,M1T(H160M1)(H60M):"TOTAL TIME="T B(T65)5:X15:B(X)B::"DO YOU WANT 2ND LONGER ";A$:(A$,1)"Y"BB2:X1   ٍٍٍٍٍčٍȍōٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍ͍ˍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍٍԍΠٍĠ΍ٍٍٍٍ̍   P TP(N1,N2)PH "CORRECTED AS ";N1;"";N2,""S$(N1,N2);"";TP(N1,N2)R 2340n "TYPE-NAME ";S$(N1,N2) "CORRECTED AS ";N1;"";N2;"";S$(N1,N2);"";TP(N1,N2)$ "ANY OTHER CORRECTIONS ";A$. (A$,1)"Y"2260B L X1250V PT(X)024N1;"-";N2;" ";S$(N1,N2);" "TP(N1,N2)K"IS THIS THE CORRECT STUDENT ";SA$i(A$,1)"N"2240"INPUT 1 FOR NAME CHANGE OR 2 FOR THE SCORE"N N12332 "CORRECT POINTS ";P SMSMPTP(N1,N2) SQSQTP(N1,N2)TP(N1,N2)PpXDCR$"-""zXC1CR$"/"4XBCR$"+"GXA3CR$"*"eZ91PT(X):Q$Q$CR$:Z9xX10)Q$:Q$""X1825"CORRECT INPUT ERROR BY STUDENT NUMBER""PERIOD 1 STUDENT INPUT AS: 1,2""STUDENT NUMBER IS";N1,N2&2000TP(N1,N2)C11960(G$"C"22000HTP(N1,N2)D1990SG$"D"]2000hG$"E"n>10);C$;20);F$:G0H08);"A=* B=+ C=/ D=- E=?"RCR$"?":2380\XLGHGaX10ĺ" ";bX100ĺ" ";fPT(X)02210PT(TP(N1,N2))1N2 " "(N16A11850<!K0G1ī2110_1A1:P91ĩ150r2N18:" ":N|41590:D$;"PR#0"DD$;"NOMONC,I,O"I255NXTP(N1,N2)A31910bG$"A"l2000vTP(N1,N2)B1940G$"B"0" NUMBER",#A1ĺ"NAME",9"POINTS","GRADE"B" "NN115[N2129z(S$(N1,N2),3)"***"1800(S$(N1,N2),6)"NOBODY"18101880P912560N1;"-";N2,A1ĺS$(N1,N2),TP(N1,N2),G$PT(TP(N1,N2))SCHOOL CHEMISTRY SCORES AND GRADES?@" FOR ";F$;" UP TO ";C$WJ" ":"AVERAGE ";MEuT"STANDARD DEVIATION ";SD^ GRADE SCALE "h"A ";A3;" AND UP"r"B ";B;" AND UP"|"C ";C1;" AND UP""D ";D;" AND UP"" ":" "P91252 GRADES BASED ON A5 *** STANDARD DEVIATION CURVEX *** CHANGE GRADE CURVE-ALTERy *** +OR- SD FROM THE MEAN.A3ME.5SDBME.5SDC1ME1.5SDDME2SD"P91ĺD$;"PR#1"," 80N": CTRL I 80N1A0"6" LAKES HIGH D$"OPEN";F$F$%D$"DELETE";F$F$9D$"OPEN";F$F$ND$"WRITE";F$F$ZN115gN2129vS$(N1,N2)N2:N1D$"CLOSE";F$F$MESMSTX(SQSTMEME)(ST1)SD(X) *** THE FOLLOWING STATEMENTS *** ASSIGNQSQTP(N1,N2)TP(N1,N2)$ dSTST1, nN24 xN1a }"DO YOU WISH TO CORRECT ANY ERRORS ";A$x ~(A$,1)"Y"İ2240 D$;"OPEN";F$ D$;"DELETE";F$ D$;"OPEN";F$ D$;"WRITE";F$ N115 N2129 TP(N1,N2) N2 N1A D$;"CLOSE ";F$F$& N1153 N2129T (S$(N1,N2),5)"NOBOD"1400s (S$(N1,N2),3)"***"1390 S551360 N1;"-";N2;S$(N1,N2); (" POINTS= ";PT <TP(N1,N2)TP(N1,N2)PT FAB(N1,N2)AB(N1,N2)A1 PSMSMTP(N1,N2) ZSK$,1)"N"S55 L1180, VD$;"OPEN ";F$? `D$;"READ ";F$J jA15V tB129c ~TP(A,B)j Bq A D$;"CLOSE "F$ 216,0: TO RESTORE ERR TEST D$;"OPEN ";F$F$ D$;"READ ";F$F$ A15 B129 S$(A,B) B AB(7,30) PT(430) Z(0), D$(4)? $D$;"MONC,I,O"O ."DATE ";C$d 8"FILE NAME ";F$ B"DO YOU WANT A GRAPH ";G$:(G$,1)"Y"G1 G"DO YOU WANT PRINT ON PAPER ";P$:(P$,1)"Y"P91 I"WILL YOU ADD POINTS ON THIS RUN"; JK$:(AM.& l *** ALL THAT NEED BE ENTEREDL m *** ARE THE POINTS EARNED SINCEf n *** THE LAST ENTRY. o *** ON STUDENT DROP CORRECT p *** NAME TO *** q *** NEW ENTRY ADD NAME ALL r *** ALL AT CORRECTION POINT.  S$(7,30),TP(7,30), ""d CHEM GRADER=e *** STUDENTS ARE ASSIGNED^f *** A PERIOD NUMBER - THENg *** A SEQUENCIAL STUDENT #.h *** FILES ARE ESTABLISHEDi *** BY USING FILE START C-G.j *** FILES ARE MAINTAINED BY k *** USING THIS PROGR     D$;"WRITE ";F$ N115( N21297 S$(N1,N2)? N2G "N1[ ,D$;"CLOSE ";F$p 1D$;"NOMONC,I,O"v 6"RIOD ";PN(N1); xNO# N21NO3 N1;"-";N2;< SN$T S$(N1,N2)(SN$,14)c NNO129y S$(N1,N)"NOBODY" N N2 178 N129 S$(N1,N)"NOBODY" N N1 D$;"OPEN";F$ D$;"DELETE";F$ D$;"OPEN ";F$ w D$(4) D$;"MONC,I,O"&: PN(7),S$(7,30)QTP(7,30),AB(7,30)f"FILE NAME ";F$s(F$F$F$<N115F"A PERIOD ";N1;" ?--Y OR N ";PA$Z(A$,1)"N"175[(A$,1)"Y"70dPN(N1)N1 n"HOW MANY STUDENTS IN PE   "WEST","TEST","DEAD","PAST","KILL","CARD","KNOW","QUIT","TAXI","HELP","JUST","BACK","EAST","LOST","LAST","HOLD"  "FIELD","YIELD","STEEL","AFTER","UNTIL","DEALT","BELOW","OLDER","BUILD","999"&3B#:D(1500(1)1):S1D:S0T0510938010:"THE LESSON IS THROUGH FOR THIS ROUND. TYPE 'RUN' FOR ANOTHER TRY AT IMPROVING YOUR READING SPEED.": "CAT","DOG","BOX","TOP","FOX","RUN","WAS","RED","YES","POT","GET","RAW","POP"v0 @P$"Y"ĄC$(I):340$ JC$(I). TTT1C ^C$(I)"999"370J hIP rb |I(T(0)1)w C$(I)"999"420 Q$"Y"Ģ11:C$(I):420 11:20);C$(I) T$C$(I) C$(I)C$(T) C$(T)T$ TT1 G$"B"AA100B1A1000:w "SELECT THE SPEED YOU WISH THE WORDS TO FLASH ON THE SCREEN (1 TO 10). 1 IS THE FASTEST AND 10 IS THE SLOWEST. ";A ":10 ,P$"Y"Ą"WILL YOU BE ENTERING MORE THAN 4 WORDS ON 1 LINE? (Y OR N) --- ENTER '999' WHEN FINISHED --- ";Q$ 6:I1200# ::10)"CHOOSE AGE CATAGORY"G ::12)"A. 1 TO 10 YEARS OLD"d :12)"B. 11 AND OLDER" ::10)"(CHOOSE A OR B) " :10)"-----> ";:G$ :(5) ::"DO YOU WISH TO ENTER YOUR OWN WORDS OR SENTENCES ? (Y OR N) ";P$ :(5)ILL FLASH ON THE SCREEN IN THE SAME LOCATION EACH TIME." :::"THE LENGTH EACH WORD IS ON THE SCREEN IS SELECTED BY YOU, BUT THE PERIOD BETWEEN WORDS IS RANDOM. SO KEEP YOUR EYES ON THE SCREEN. " ::"PRESS ANY KEY WHEN READY....." E$ 9 *"3 Z10:"* *"X d10:"*************************"i nW11500:Wu xT(100) C$(500):I(100) :58 "THIS PROGRAM WILL HELP YOUR READING SPEED. WORDS EITHER FROM WITHIN THIS PROGRAM OR WORDS YOU ENTER, W 010:10:"*************************"U10:"* *"z(10:"* READING *"210:"* 06/10/80 *"<10:"* BY ALBERT G. LAST *"F10:"* SAN ANDREAS, CA *" P10:"* 9524     ZX12000:X::10:"PRINT QUESTION #";I;". ";; dA$(I)A nd x"WHAT IS THE ANSWER ? ";B$(I)v A$(I)""60 "WHAT FILE NAME? ";N$ D$;"APPEND ";N$ D$;"WRITE ";N$ I1 J1I1 A$(J):B$(J) J D$;"CLOSE ";N$ APPEND TEST :107A$(100):B$(100):I0LD$(4): CTRL DR(2"THIS PROGRAM LETS YOUAPPEND TEXT AS EITHER QUESTIO NS/ANSWERS OR PLAIN TEXT. DO NOT EXCEED 239 CHARACTERS."<FII1P"(PRESS THE RETURN KEY TO QUIT.)0   THE ANSWER ? ";B$(I)' PA$(I)""40; ZD$;"CLOSE ";N$ =:A$(100):B$(100):I0) D$(4)m:10:"WHAT IS THE NAME OF THE PROGRAM YOU WISH APPENDED? ";N$D$;"APPEND ";N$D$;"WRITE ";N$(II1*X12000:X-:102"PRINT QUESTION #";I;". ";7A$(I)<:: F:"WHAT IS "PRINT QUESTION #";I;". ";% dA$(I)+ nN x"WHAT IS THE ANSWER ? ";B$(I)` A$(I)""60{ "WHAT FILE NAME? ";N$ D$;"OPEN ";N$ D$;"WRITE ";N$ I1 J1I1 A$(J):B$(J) J D$;"CLOSE ";N$)  :10%A$(300):B$(300):I0:D$(4): CTRL D@(2"THIS PROGRAM LETS YOU WRITE TEXT AS EITHER QUESTIONS/ANSWERS OR PLAIN TEXT. DO NOT EXCEED 239 CHARACTERS."<FII1P"(PRESS THE RETURN KEY TO QUI