&+Iɪ꽌ɖ@*<%<==Å'Iɪ꽌IV<Y<<Y<&，YLV0&^*^*&=L+L ٠Šҍ̰ HގH Hx PRȥQRRvȱRwv8vwv8vRwv RL}XiXYXiXY HHXYX oLnhh)X0 eXXYLeeTteUut8tXutYL}HHLwXHXHLX飨RHRHLw URe^dSe_e dHdHLeFɧɧߑߑjݥ"ɥ֬ߑߑߑߑߑߑߑ\-LX_XYX ^&_` ^_`RbScbtȱbctb``Z玅[掩`ގt,($       idގߎкȫؖةNAp|EhLZUk֫ÜLFp+ӥܛimunO2ߝםϝד۝ӝ˝p :Tי آ\.&ǒ*"2$˘PwߑߑTwӒӒӒӒӒӒӒӒӒӒӒӒӒӒӒӒBBBBBBBBBBBBBBBBHA.TEXT@].TEXT] LABELS.GRAFW RAVEN.GRAFAW EXAM.TEXT@] SM!LES.FOTOW  SM!LES.GRAFW   GOODBYE.TEXT]  WRITE.FONTEe HELLO.TEXT@] ALOHA.TEXT@]ALORAFW SALMON.GRAFW NEWSEA!.FOTOW BRIDGE!.FOTOW AREAS.GRAFAW PEOPLE.FONTe ONLYSEI.GRAFW SOUEAST.GRAFW LOGO!.FOTOAW LOGO!.GRAFAW NATIVES HOOK.GRAF AW BEAVER.GRAFW RETURN.GRAFW SMILES.GRAFW LONGBOAT.GRAFW EAGLE.GRAFAW NAMES.GRAFAW POTLATCH.GRAFW SCRIPT.FONTeGONAKADET.GLESSONS& RT0006.APPLEbh0 SYSTEM.PASCALbh0VSYSTEM.LIBRARYhVXSYSTEM.CHARSEThXYSYSTEM.MISCINFOYSYSTEM.STARTUPh BRIDGE!.GRAFW NEWSEA!.GRAFW HALIBUT.GRAFW꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xH&x'8*7Ixix&&  ') + &п x) ++`FG8`0($ p,&" (jJJ>L& "?I9  I `  ` x I Nx .x- u `V0^*^*>` YI꽌ɪVɭ&Y&&Y& \8`&&`L  x ? N 'i ͭ҅?/ȱ llMUST BOOT FROM SLOT 6NO FILE SYSTEM.APPLE RT0005.APPLE  L$J) URe^dSe_edi deeHdHLe URe^dSe_e hdhdLeèPHPHLw UPe^dQe_e dHdHLe UPe^dQe_edi deeHdHLe UPe^dQe_e hdhdLeX q U^ebd_ece dHdHLXX q U^ebd_ecedi deeHdHLXX q U^ebd_ece hdhdLXX Ue^te_utHtHLXX Ue^te_uhthtLXX Ue^e_HHLXhthuȱtHtHLwhthuhvhwtvȥuvLwȱXȘ tX)XYXHXHXetXYL}ȱX hhhivȥ]vv\w]VW8\Z][LǑlXx |ƄRSLZȱȱńRRL}Xx ~~~~L}Xx P~Qȑ~L}XxX HXY |0 L;Xx QHPH ~P~ȱP~~Pꎥ}|=0 8|8|}8||ȥ}|DHCHlL}?|8|}8z|~{||LǑ~8|~~8 ~P~ ~i jik|Lhj ~|it}iu8ttXutY|iT}iU~R쎥S펥~8vw\0 ՟L ̟LllL4L:/ L 韰8L t~ hI=+ ՟L t~I= ~ ̟LȄHHLehh tuLɠhhVtWu\z]{XiXYt8xtut8xtu8tt|ut0LLh)thh)htL lhvhwhthuEw0uwtv/1'u0+!hthuhthuHHLwhHHLw%lHHLwhhh |~hve| z~~8|eztl8冨Lן 0 8`hh t~ hL   UF_f^L UhvhwhthuXY^LFtvtuvw_LLL~hvhwv~WvXwhthutYtZutvv ȱtvtv %l HHLeHHLehtExx0tEtttxjtz) wzf{jv8vtwxyyHxHxyyHxHxu9xy9yyHxHxyt yHxHHviHLwHHLwHHL?? lXLӞL[L eƄLe8傅ń 8冪8冪ƂLehh&eȹ|ȹ})3f|)uf}|jjj)?tłetu9 fHHLwfHHLw @hhHHHHhzh{h|h}}L{)L8z|~{}L{|) u|f}e|Ȅ~ Ȅtl |8|e| h9 0 ~ʚLw || hI9~ʚLw |0| h~ʚLwztzx{yxtezʥ|x}y~xF|}H|HLwX hh&ńLe0exH{HzHezHHLXh|h}hzh{hxhyx~ȱx|80~~ iff~z ~=~=H~HLwhthuh|h}hzh{z vw|80tuutvwwvi &t&u&v&whxhyx~ȱxvI%~t~wI%u~xȥxLwhhh |hYL}hhhihjhkXi&jhȑjLehhjL>hjLeL瑺tutLLw Uhe^xhe_yxHxHLe Uhe^he_HHLehh U_ ^&LǙ^_ hexheHxHLeXXz{HH L&hexheH*ŇĆ 内&&&*ŇĆ 内ⅉ $ 8包HHLw HHLw(LLfLvhthuhvhwxyEw0wy)xv!y0uEy0yutxyLwLXYXXYYHXHLXYYHXHXXYeXXwhI8}hI}Lw & ee녌`HHhhd 8劅dhhEdd刅剅 d8匨HHLwHHLwhdhehh 8内劅LϑhhE8包卅&*ņ􅈆&eHdH`&&X&XeYei捠8XYL}XiXYL} hthuhvhwt&uZvȥ[vZetZ[eu[8\Z][LǑLe hthuZtȥ[tLehthutZȱt[掩Lel8Lwh}h}LwhIihIiHHLhHhHLeȱXtetetjktL3hjhjhhLehthuhettheuuHtHLwhhhthuhettheuutLwhhhihjhk ULhthuhh%uH%tHLwhthuhhuHtHLwhhIHIHLwXXhhQX0XōiX`0\XE0XLXŌC?8XQL} RhPhQL$ RR8tSut\ȱt]X i RHLERtȱRuVt tVuWRTȱRURXȱRYRRR쎆SL}L}8|}`|ȱ|L棠8||tȥ}|utetȱtet|8|}Ƅ`t et >HHBtCu\8t\]u]H\H8Z][LǑuHtHAH@H `  `\^]_t et@$A8\B\]C]\8]`8\] z8Ƒ |5|8|}8\|ȥ]|8|ƌ8حTRWPDŽ 1 - )8H<8HF J 8 и \`x y z { (@ Leq`8Hh`HHH0Ll) [,cjA[ituvivwзRS\][ Hx \]RPRRSQRR RȭR)@[@[Zg lqnpsL}VU>)Q>jj`ގ SYSTEM.PASCALة ގގ0HH`HHHHHH NiLli8Ɓzȱ{HH`HHHH{HzH @tu`wvtȩttituveztȱve{tȱvtȱvtt ޭ0Lt ̭ͭ| ގLexL|8 z~#0ĄLezz{xyLet Lz z{xгyLe~(8 Ǝ L`` ᯩ ` `ܯގ`ܯHۯHlܯHۯHl>LۑLehh ޭHHLehh ޭLehh ޭ0 LsHHHH Ls Ls Ls ގLehhhhhhLeHH{HzHyHxHwHvH| ގLe ގLeL|~h)~)hhvhwhxhy0Lh0yhzh{hezzhe{{hhHHLeHHHHL㑀? ABzDF@GPtI$KL nN(kPQChSU焵V!cX_Z[^]k _#ǭ`xXb'dxehSgiQYjoNln9?oIqr|otEv7w߄y @{Η|½~vӑ!  `ގhhLeߎHގHLeގ4IiIi&lhyhxhwhv 櫢 mvHwHxHyHLw 櫢 mLw8uhhL㑪0 vwx`Fvfwfxx wvLztvIvwIiwv`t ? svHwHLet ? svHwHLehh' HHu8u{8euPhhLi򅁩Fvfwfxe~e}e|ffffإ L0 Ш `t ?z ?u{ HHHHLw mLwt ?u HHHHLwtzu{v|w}x~y mLw^LwILwhhhht ) mLw O mLwt ?z ?uz mLw{tItt mLwtEzz ) mLw I O mLwt ?z ?uLϑ{ HHHHLwtEz{8u i  iL㑅 8y~x}w|v |}~8&&&&Fvfwfxfy Ш mLwtEzvfwfxfyyyF|f}f~f` yexe~we}ve| Ш ` 8y~x}w|v ` Ш `u{"$v|w}x~ yz8`u{u{v|v|w}w}x~x~t`t ?z ?uz mLw{t mLwtEzXЀ_ʱhjkiL ^L(hjLe8RZS[JHjHLehhhhh*68jh*vlhhjH*vjHHHlffff恩ŁhhL`0&&&&0ƁƁhhL`&悥F8`u8{I{FvȱwvLÑv8vwv8vwv xvиtȱutХL} ULeXiXYLӑhthuhvhwtvȑtvLehe^hie_ije^jke_k_ik ʱhjL^LħhjLeh^h_ hhhhhhhhLehjhkhejjhekkhhhihehhheii_ ʑjkL^LjLehhh|h}he||he}}hhhhh^eh_e^Ii^Ii_|ň.Lx'|}0 |}Lg|8|}Lg|8優}HHLehxhhhTT8tUut8tXȥuYxT VL}RSLȱ ƍLPQ |l|8|}8||ȥ}||8|}| iiLa 8ƑzL` 8` ^\_]`hh HLehh LeX rLqhhh^h_hhhhLehjhkhejjhekk P]M^N@P]^@H))hILO  Ll { նLl,LѲhhh(`N`hhhhhhHH)?` ˲ {H h` ` ` Ȣ`JJJJ ϱ` ˲,p ` ˲H h ɢ` 2 ˲0` ˲)` Ԣ `  ˲J` ˲ MȽ`_<8 0 L 8 0 e`800jjjá4w4]11á4\1šV42233z 3042221421Ä2*á444ń55P.TEXTׯ]צ.CODEJ.BACKׯ7צ.INFO$.""""" RTSYSIO.CODE @hLPASCALSYUSERPROGDEBUGGERPRINTERRINITIALIGETCMD LLLL`LͳL+L/LL~L9LLX`L˲L˲LLLRp _bbb8`' ax>?8T8Wuv ýI꽌ɪ꽌ɭ蠪&VE&]V]H)]V])]T])]' 8$hU>`FG8`0($ p,&" `Hh`&&Q꽌ɪɖ'*&%&,E' 꽌ɪ`8` Hh݌`  $(,048<@DHLPTX\`dhlptx|Հ؈䤨谴.m">?( ر-Lx -($8` ~h H5@@h@ N@`8'`0|&HhHh VY'&Y`ꪽ'  Ͱ()I يJ @JJJ5F؅G(  ڽ ]( F YG t XjPP0 Y .@85 @@Hh@H H`5@ ]h ]Ls@(LKLIH/h/ (-ͥmi)ͥ--9J 8J II `FNȌ``hhh )hJjJJhhihhhJiظhR LF8  ۸'e 8 Ǥ HH``P@h H Y t tP```e(`e8``````J) ) je`PPPP+*@S&@'8*3I@i@&&8  ڽ' ڽ& ڽ@)*++`3) 0Υ ˲Lg0iiЯH ghi` g0 i` e*0 j) @Ii` Lﶩ@ 0``L޵ IL,PL ,Q`) K #H"H`cccccζcԶcOccc cc%;cHcQҵbW]H & &e)e eeh `))? $PA[I&E$p $pP!pA0 i` ˲H g)hi H gGRAFׯצ.FOTOV < ~٤ Íܡ~  , Ąܓ"á  ܡ:" áܡ ܓת$á4w4]11á4\1šV42233z 3042221421Ä2*á444ń55P.TEXTׯ]צ.CODEJ.BACKׯ7צ.INFO$. HNT0 Ȅ-ܢ0ۤ ݢ`ڤá \zڨ  ȡ0ޤˡ ߢ`ޤ7 Vˡ)~~ת́ ˡ"ˡƁ  Ɓ ƁƁ ́ ʁ ȡAƁʁ ƀʁ ƀʁ lʁ ʁ ́ ~~ _  ۢڤޢ ȡUڤ ˡBȄ-ܢ0ۤ ݢ`ڤá \zڨ  ȡ0ޤˡ ߢ`ޤ7 Vˡ)צ(C) 1979 U.C. Regents   ,,@.Ptn   z  CONSOLE:ת( צSYSTERM:(*SYSTEM.SWAPDISKת(z צ*SYSTEM.CHARSETP**/́L1ʁL:*N     Welcome to Apple PILOTצ(C) 1980 Apple Computer Inc.צ(C) 1979 MicroPi צREMIN REMOUT U     z  CONSOLE:ת( צSYSTERM:(*SY٤ ~ ȡؤۦתۢÍ ȄqۢÍa؞&"áX P۶ ضá<۪ צ*SYSTEM.STARTUP(~ צCONSOLE SYSTERM צGRAPHIC PRINTERʁݢʁݢʁݢʁݢ ʁݢʁݢ ʁݢ ʁݢ ʁݣ  ʁݢʁܢ́ʁݢʁݢʁݢʁʁݢʁݢʁݢʁݢnʁn تٞ&"á  d'*SYSTEM.MISCINFOתPצתPƀƀʀ=ʀ* ʀ́ʁܢGʁܢHʁܢIʁܢ%O ƀ&́ʁܢʁʁܢʁܢ%́ݲn nnʁݢ٤SYSIO 30Ƅz٤̄ʄʄƃ٤ʄʄ؂     ٢ š٢ ٢٢ 4$ n/ nl ȡpZؤòZؤÍRzؤۢ0٤ؤܢlZؤáܢ ܢx  ڄ(٤ SYSTEM.LIBRARYׯC٤ ƃڄ"GRAFׯצ.FOTOV < ~٤ Íܡ~  , Ąܓ"á  ܡ:" áܡ ܓת$á4w4]11á4\1šV42233z 3042221421Ä2*á444ń55P.TEXTׯ]צ.CODEJ.BACKׯ7צ.INFO$.GRAFׯצ.FOTOV < ~٤ Íܡ~  , Ąܓ"á  ܡ:" áܡ ܓת$~~ת́ ˡ"ˡƁ  Ɓ ƁƁ ́ ʁ ȡAƁʁ ƀʁ ƀʁ lʁ ʁ ́ ~~ _   צSYSTEM FAILURE NUMBER  . %PLEASE REPORT FAILURE TO YOUR DEALER.zˡ.$  š @  !!&ˡ  ȡ2 š:X fȡ*!צ$ ,&&ֲX $>0 qS\ ńȄ4šáRתPńȄ ,ń.áš蕿@šQ *áá000áQP 0á0 é000+-Í-ë009ȄX 000á'%á 009Ȅ0+ dá1á%   Q l>š 쾿  .Tá " h ɡ 逫-á-32768ת Pġ>00ń0ˡ ɡ` Mȡš ȡ뾿  +áYšPá+ ɡ _" ġ   fj <% Oš *š  4T  +Uz   ,áʈƅ ~~擥 ~ 抦|ɥ8包~ƅLlII懩&&u`hh HHHHHL,} ei|ʽ 8襁i}}ʈƍƎƋƊЌإLl2d|e~28ʈƅyʈƅƉ` DL?Ł|}ƅL\E||怦}ʚH恺8倅偪ʈƅ})H揥L\LlL,E0LL DL\ ILlL,ELL DL\Ee8刅刪ʈʈww&~ʈƅFyʈƅ~HHHHHHL,~ʈƅFHHHH恥HL,0~}ʈƅ0I愊iʈؚH恥LŁ|} ƅL\ ~~8ʈƅ  ILlL, DhƁ}eʆƀƀ|ʊe~8偅z{lzhhhhhh8冐 0 h HHHL,L5IL,h h'(ʈ D.ł( Ł|} ŀ}|ƀL;~HHL,~HHY   9    ' sU7z ;|hvhwhhxylxMz|vwlvl llhzh{hƁhh-۲z0ݡߑ ع      y  &  N* عteVG8  )  T uh[NA4'á +-ÍNTEGER[36]) /END; ' " "PROCEDURE FREADDEC(VAR F: FIB; VAR D: STUNT; L: INTEGER); "PROCEDURE FWRITEDEC(VAR F: FIB; D: DECMAX; RLENG: INTEGER); "  IMPLEMENTATION L E צCode file saved62!o.צצ not named $ "TYPE DECMAX = INTEGER[36]; STUNT = RECORD CASE INTEGER OF 12:(W2:INTEGER[4]); 13:(W3:INTEGER[8]); 14:(W4:INTEGER[12]); 15:(W5:INTEGER[16]); 16:(W6:INTEGER[20]); 17:(W7:INTEGER[24]); 18:(W8:INTEGER[28]); 19:(W9:INTEGER[32]); 110:(W10:I' "''"""©RIGHT (C) 1980 APPLE COMPUTER INC.LOCK,N: INTEGER; "BEGIN SYSCOM^.IORSLT := INOERROR; $IF F.FISOPEN THEN &WITH F,FHEADER DO (BEGIN BLOCK := 0; BYTE := FBLKSIZE; *IF (RECNUM < 0) OR NOT FSOFTBUF OR 2((DFKIND = TEXTFILE) AND (FRECSIZE = 1)) THEN ,GOTO 1; (*NO SEEK ALLOWED*) *IF FRECSIZE < FBLKSIZE THEN ,BEGIN N := FBLKSIZE DIV FRECSIZE; .WHILE RECNUM-N >= 0 DO 0BEGIN RECNUM := RECNUM-N; 2BYTE := BYTE+N*FRECSIZE; 2WHILE BYTE > FBLKSIZE DO 4BEGIN BLOCK := BLOCK+1; 6BYTE := BYTE-FBLKSIZE 4END 0END ,END; *WHILE RECNUM > 0 DO ,ȡ!2? 5? ?f  z '~~5?. ????2 ?  ??  1?   ?=~ @:?^=>[' ~ ~>?    ġ+@? ??? k '~~5?. ????2   ??;ܳ1?ܳ^; Sƀ> ?L=[?    ??tI$'>ߡڑ߳RI@߳}:#9oLE.6Z"O$<=*A     4?צ)Name of output file ( to return) -->ƂPƂáƂ̂.ʂ.ȡƂƂ۾ .TEXTƂƂƂȍƂƂ.˄%Ƃ̂.Ƃ.ƂPƂ..TEXTUƂ.PƂƂ.á ƂƂƂצ*SYSTEM.WRK.TEXTP "FUNCTION SIN(X:REAL):REAL; "FUNCTION COS(X:REAL):REAL; "FUNCTION EXP(X:REAL):REAL; "FUNCTION ATAN(X:REAL):REAL; "FUNCTION LN(X:REAL):REAL; "FUNCTION LOG(X:REAL):REAL; "FUNCTION SQRT(X:REAL):REAL;   IMPLEMENTATION E ꥂNWá$ $ ݞ$' ݑ$ $݂ō $݂ġ ݂$ $ $ȡ%  0 ފ$čV   .ˡ:  Eɡ  -ݑ š 0 0 ߿`ġ(   ݂. ݕ ؂݂3  ݕ 0 . ݑ0 ݕ݂ ؂ ɡ  |, R -   $ $ ݞ$' ݑ$ $݂ō $݂ġ ݂$ $ $ȡ%  0 ފ$čV   .ˡ:  E.áBڲzؼ0ݞ$ڲzjeEÍɍEáޢ >ۓɡ ؼ݀$ ؼݞ$ۡܡ ؼ$ Dɍ -   "ˡ\ݣ ݣ šݢ ݣ ݢݣݣ ݣ ݣݣńݢݣݢݢݢˡݢݢ ۚݢܚ  / |á +-Í-ڲzؼ 0ݢݣޢÄɡ3ڕġ$ڕšš"šޣ Ąޣ ݣ ˡRݣ &ݢ ݢݢ!ݣ "ˡݣ ˄ݢ!ۂBEGIN RECNUM := RECNUM-1; .BYTE := BYTE+FRECSIZE; .WHILE BYTE > FBLKSIZE DO ' "PROCEDURE FSEEK(VAR F: FIB; RECNUM: INTEGER); PROCEDURE FREADREAL(VAR F: FIB; VAR X: REAL); "PROCEDURE FWRITEREAL(VAR F: FIB; X: REAL; W, D: INTEGER); ?  ??  1?   ?=~ @:?^=>[' ~ ~>?  $ $FUNCTION PADDLE(SELECT: INTEGER): INTEGER; $FUNCTION BUTTON(SELECT: INTEGER): BOOLEAN; $PROCEDURE TTLOUT(SELECT: INTEGER; DATA: BOOLEAN); $FUNCTION KEYPRESS: BOOLEAN; $FUNCTION RANDOM: INTEGER; $PROCEDURE RANDOMIZE; $PROCEDURE NOTE(PITCH,DURATIIif E J j 8  e e  `(J 8 e  ` Z Z< $ %$PQ $  ߩ $ Li`t JL` T$Q%P)Q I L`#JI`'  I` I0ݩ(0/,",i8i#Hiihifi`i,i,3iPII4ifH8H hIiH h hL8D ٚ  & @4` - G`` 8`*UH)JJh & & f)4#ibl    '    4 تP+,+,ȡ+ ++ V 0  آآآǿآآǿآآSǯ?Ǭ?ǰ?Ǯ?ǩ? áǫ?Ǭ?0 ٢ؚ ڢؚڢٚ ۚܢښܢٚܢؚɡšܢɡܢǿšܢǿɡܢɡܢAFMODE; $PROCEDURE FILLSCREEN(FILLCOLOR: SCREENCOLOR); $PROCEDURE VIEWPORT(LEFT,RIGHT,BOTTOM,TOP: INTEGER); $FUNCTION TURTLEX: INTEGER; $FUNCTION TURTLEY: INTEGER; $FUNCTION SCREENBIT(X,Y: INTEGER): BOOLEAN; $PROCEDURE DRAWBLOCK(VAR SOURCE; ROWSIZE,XSKIP,YSKIP,WIDTH,HEIGHT, 8XSCREEN,YSCREEN,MODE: INTEGER); $PROCEDURE WCHAR(CH: CHAR); $PROCEDURE WSTRING(S: STRING); $PROCEDURE CHARTYPE(MODE: INTEGER); $ "IMPLEMENTATION E ENCOLOR(PENMODE: SCREENCOLOR); $PROCEDURE TEXTMODE; $PROCEDURE GRAFMODE; $PROCEDURE FILLSCREEN(FILLCOLOR: SCREENCOLOR); $PROCEDURE VIEWPORT(LEFT,RIGHT,BOTTOM,TOP: INTEGER); $FUNCTION TURTLEX: INTEGER; $FUNCTION TURTLEY: INTEGER; $FUNCTION SCREENBIT(X,Y: INTEGER): BOOLEAN; $PROCEDURE DRAWBLOCK(VAR SOURCE; ROWSIZ $TYPE $ SCREENCOLOR=(none,white,black,reverse,radar, 3black1,green,violet,white1,black2,orange,blue,white2); $ $PROCEDURE INITTURTLE; $PROCEDURE MOVETO(X,Y: INTEGER); $PROCEDURE PENCOLOR(PENMODE: SCREENCOLOR); $PROCEDURE TEXTMODE; $PROCEDURE GRhh9.:.;.<0(0(099JH;HHH`Z310/$ T1234 1U`0:N0`LELK뭕 JF8ȹe8ИL`Lø{{ttmnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# !$hhhhhhhhhhh)hpdHHHH`4hhhhhhhi)hH`HHH`0hhhJhh)*XhHH`"hhhhhhH HHH`.hhhhhhHHLM0`L+L1ON: INTEGER); $ "IMPLEMENTATION E  .צE&Save as :. ? 瓡צSave asצ[š C?/צTEXT#CODE#饀!^cY}zeNEDh0h1hhhhh.h/h,h-h*h+h(h)(ȱ(*ȱ*,ȱ,.ȱ. HH1H0H(ȹ(*ȹ*,ȹ,.ȹ.`   ""##  )`%)8`)    L)ˢ   â LE % %  )  `8`&e epɀj f f&e e pɀjff %) % )`% L=`0(%$ $ @' áܡ ܓת$ ڟšx#ńF 09Ȅ ᾂ0 ߓń Ȅޓޓ! ܲݤߓÍߡ`ݤW ˡ!  č ܓܡߢ ܓצߢޢ!ޢ 8 0 ٤ Íܡ~  , Ąܓ"á  ܡ:"$.GRAFׯצ.FOTOO < ڤáޢܡ ޢޢÄȄĄMȄt߷iȡFۤ ōɍ ō ȍ  d5252á4w4]11á4\1šV42233039Ȅ 3042221421Ä2*á444ń55P.TEXTׯ]צ.CODEJ.BACKׯ7צ.INFOުPצצ22ȡ5233 ȡ 23a3zȄ 23aA22š*á ݲצ:22ȡáݲ 2á!2ȡ5252š[22š2222ȡ2šH(VAR FVID:VID; LOOKHARD:BOOLEAN; VAR FDIR:DIRP): UNITNUM; " "PROCEDURE INSENTRY(VAR FENTRY:DIRENTRY; FINX:DIRRANGE; FDIR:DIRP); " "PROCEDURE DELENTRY(FINX:DIRRANGE; FDIR:DIRP); " "FUNCTION FETCHDIR(FUNIT:UNITNUM):BOOLEAN; " "PROCEDURE WRITEDIR(FUNIT:UNITNUM; FDIR:DIRP); "  IMPLEMENTATION E ORDS:INTEGER); " "PROCEDURE FRESET(VAR F:FIB); " "PROCEDURE FOPEN(VAR F:FIB; VAR FTITLE:STRING; FOPENOLD:BOOLEAN; JUNK:FIBP); " "PROCEDURE FCLOSE(VAR F:FIB; FTYPE:CLOSETYPE); " "FUNCTION VOLSEARCH(VAR FVID:VID; LOOKHARD:BOOLEAN; VAR FDIR:DIRP): UNITNUM; " "PROCEDURE INSENTRY(VAR FENTRY:DIRENTRY; FINX:DIRRANGE; FDIR:DIRP); " "PROCEDURE DELENTRY(FINX:DIRRANGE; FDIR:DIRP); " "FUNCTION FETCHDIR(FUNIT:UNITNUM):BOOLEAN; " "PROCEDURE WRITEDIR(FUN  "PROCEDURE FINIT(VAR F:FIB; WINDOW:WINDOWP; RECWORDS:INTEGER); " "PROCEDURE FRESET(VAR F:FIB); " "PROCEDURE FOPEN(VAR F:FIB; VAR FTITLE:STRING; FOPENOLD:BOOLEAN; JUNK:FIBP); " "PROCEDURE FCLOSE(VAR F:FIB; FTYPE:CLOSETYPE); " "FUNCTION VOLSEARCOF=2  > | R  * ( BEGIN " SAVECOLO 8e*e+)*)fjfjfj+*fjfjfj8 8) )` (J(F ((Lee Lw  )LdI1Ld)QLd        xhXhhhhhhhhHH x # " `' & 8 ! 0"ee8 !  e e8"#0 88$ % 0"ee8$ %  e e8&'0heheheHHL<  B  ""##8&$iT8&UU ! U"# UT`+%$Y)!p xhhhhhhhhhhH8 )%HHH`5>hhh)hh h h h hhhh &    0&!"   #"  ` ` `SN-(' . hhhhhhHH `  HH8H8 hhhL.+ rhh he,ߓ$ ޓ "ߓۄ, ݤ ߓÍߡ2ݤ š˄ڶ a3 d ޓ(ݤ ߢܯߢ  d˯7 H  ۣȡڤ  ۣ צۣۢ0H ܣġ ۤ ٤ ڨ ܢܣ*@ٕ۶š ڸ۸۶ š۸ ڸ:   ȡQ  ȡ  <:*""">""""""""""""">>><"2<""">"""" "  ">"""**6"""2*&""""""""",*"""" """ ">""""""""""""6**"""""""""> >>> >00000>">>( <02&,*  **>> "&*2" > ""  >>" >""8 >"""" <"">> "GRAFׯצ.FOTOV < ~٤ Íܡ~  , Ąܓ"á  ܡ:" áܡ ܓת$تP š+ +0تPRš+R+PP0RšزRPزPR,@vP.TEXTׯ]צ.CODEJ.BACKׯ7צ.INFO$.GRAFׯצ.FOTOV < ~٤ Íܡ~  , Ąܓ"á  ܡ:" áܡ ܓת$ #PROCEDURE SETCHAIN(TYTLE:STRING); #PROCEDURE SETCVAL(VAL:STRING); #PROCEDURE GETCVAL(VAR VAL:STRING); #  IMPLEMENTATION E 444ń55P.TEXTׯ]צ.CODEJ.BACKׯ7צ.INFO$.ޣ˄ ߢ  ߢ ۤ ߢޣ ޣߢ ޣޢ ޢۤ ޢ áޢá צޢޢޢ/13:! šá٢. n b@T&˄ޢߢšáޢ ޣ ߢ  dޣޢޣޣߢ  dÍÍޢˡ ݓۤ ۤ Äݓۤ  dÄÍߢ ˄ɡۤ  dáߢ  dá ߢ # n ١ á9 ٓ/! !!١ˡ) ! 䚹 9U?2ń ١á  ޤ uš  gá  Ä+ޤ  ɡáޤ  Pצ   ١    š Í ÄU ǐɄ:ń! á ݤݚ ˄ܟۢۢ؂Xڢڢڢڣ ڣ ١ڢ ڣ ڣ١ ڢڣڣ ڣ áڣڣš ڢڣڣ hڢ ڢ١ڢ!ڣڣ ڢ!ڣڣ ڢÄڣ &ڢ ڣ ڢ! ڢ!ڣڣ ڢڢ ڣڢÄڢ  ȡ? ȡ  ġ  á ġMáš6 ܂ۻݪ d ( ۢۢۢۢٚÍۢáۢɡ ۟<"< """<<<"""< <>"$ <""""""  "" "***6""""""""" <""<: <$,2""""""6**"""" <""">>8  80,   ( ?ɡr áٓٶš&>ق؂ٕؕ ń)ɡ @ߊ @ފ @ ނ  ák zȡńńǿɄɡݡ  šńōč<hh=Tצ.GRAFY"áhf f ؂\v  š ݡ-܂܂ɍ܂ō ܑ܂ń routines)(Invalid variable name)aצ(Invalid execute instruction)8EAX0f? sO+ " ~._gJá𩄸@Paצ@MF@A+ȡZš㩀ȡ㩀ġ á8c}(bf  &,`ny subroutines)(Invalid variable name)aצ(Invalid execute instruction)8EAX0f? sO+ " ~._gJá𩄸@Paצ@MF@A+nation)צ(Invalid link destination)צ(Invalid modifier/condition)צ(Invalid instruction code)צ(Too many arrays or strings)צ(Invalid syntax or format)צ(Invalid expression type)(Too mas)(Invalid compute instruction)צ(Diskette read error)(Invalid expression)(File input/output error)צ(Invalid graphic instruction)(Invalid function argument)צ(Invalid jump desti=" ١f< ^'gJášgצ-error gצ(Arithmetic error)צ(Value out of boundp#5:ת*צ,**SSPSSSSSצ.TEXTXS*צת HELLO.TEXT& " á_LESSON: =Q==Q.TEXTVQO~h =תQ dP' 0T**׷""" " " "pPILOT:RTSYS.LIBRARY'L\ N  ) PILOT INITIALIGXSTUFF GRAFSTUFDOLITTLEDOMAINST    @ނP f f á  áɡ ˡ f f   ɡ ˡ    عڸ ٸ ɡ  ɡF'hh="ëfũFS ⩅fšث⥄5⚥ϩߩfQߩ Fháh=hyh="ëFf ثg Qߥ==࿦:ץ==áF==Q.DATAVQ:ץ=á==TQXhf⩄áF(  pCš ȡǿpCǿšǿٳ@س*@6 0pCšš ۶ɡۚ ȡǿpCǿšǿš ڶɡښ ȡ˶ˍ#= ׃H hhצ*SYSTEM.CHARSET"áh㥅hT=ׯfh==T.FONTYQh="áh㥅h\|ǿL :OVXr%hn H2 ޫޫޫޫ  ;˩Ʉ     ǿ;˩Ʉ&,á  ܕڕ 3CX,] Ei "M&*_ɡ ;ˡGꩅ'éÄޡ ɡߩÍ á š  ޫޫޫޫ  ;˩Ʉ    צ EXCOMTPQDRVáG쩄ǹ𩀄ëǩ;˩Ʉ   ǀީ ɡ   ߩÍ á ,álǀߩ0Ä1ީ ō  ީáޭ4",á޳>ޭ&ީީ ޭ,áޕޭ   ɡ  ǿثg  Ρ,͓1ˍSϩ޹7ëS ǩٕëǹɡB2 ع2HC>9 4 / * %  9630-*'$!X=תQh=צ  h 2(:  +qkg ;  خ á           HšHɡ=؞=ؿצ!=ˡehh!!!=T!.FOTOY! "áhͿwٮoٮi    ˡ   +qkg ;  خ á     㩅ȡhfhh="ëDϩߥ5੅ũF š ɡ੅f࿥Qߩff hf⩄áF b h  , ==㿩カå,==Tצ.CODEYQ*==Tצ.TEXTYQ="˫LQپǹšץ׼$ץ׼ռȥQپEÄQپ-ë̥Qپ+é̍ȡ2Qپ ǂ̡ٕץ׼$ץ׼$׼ li~d ؂QپQپǹšAťQ.ÄťQ-Ä Qپȩ..á^׼GPץ׼ ANJي1ռ4ńץ׼݀?եռ   ڂXšRەȡQ؂Q؂ȡQ؂Q؂ٮق 1W XšR㩄ȡ Qi㾿)^ݕȡ 0 ȡ \Ȅ ȡ!. ȡ ܕȡ 0 V . ȡ E ɡ- ݀ݩ٩  ٩  G\p2cϼݥ ݑ$ ϼ6Ń  A  Aȡ4 ۊ۩ق  A0áĩɄܩȄšݹɡݹȡ9. ռ׼ ع*70)" 2-(#ڊ ߩ߫ ׼XšR  - 0 ॄ ϼ  ݞ$)ϼ@ XȡE䩅3ˡT٥ꩅإH ׮ ծ    ō4  ǩˡǩɡB  \ ɡS䩅1á& ռ׼ߩ,ëͩ͡)ˡSέF ġE䩅1ꩅؚ,POȡRPPPP2 áE䩅3ꩅؚٚ6ȡE䩅1ˡTإꩅثg h2áThhh㥃1ϩd@ Ρ,1˩͓Sϩ޹7ëS ǂٕëǹɡB2 (ëΩΡ.ޫɡ١ڕɡ9$tf l 2glHšHɡ=؞=ؿ=40, ( $  $&*(&$"~Z$R6  fffffݕɡšݕݕۆšܑڏġ*ڕ܂š šɡšvfffɡ ɡ١ڕɡ9$tf l 2glHšHɡ=؞=ؿ=40, ( $  $&*(&$"~Zfffffffݕɡšݕݕۆšܑڏġ*ڕ܂š šɡšvfffɡ ٩=.<,áZL HšHɡ=ߞ=߿hh  =T צ.SONGY "áhfh"áf 쩅fXšRߩ߫⩄ȡ Q⥄i᾿ᩄ׮ 7 t׮ ׼ ׼׼<׮ Q׼*  ծ ռۊۥռռȡWȡ"Q۩ゾQکゾˡܡ۩ ׼eV  ռ׼ռcռR׼׼A<׼׼ռ&; T!OPġROOؤO("ȡD ==ɡM\%=תQD=̽.EW& 0 "BW:$2 áU D Γ͓3ˍXϩߥ5ޥQߥޞޫP ފD;੄੄ޮ[3áϩ5:ϩdá"OPġROOϩOϩ˹EhV|ɡɡtǹ1ފRLF@:4Qǿ㕫⩄㩄˹Ρ Ρ쩄͓㫄ܮܫ㩄Ρ͓ޥ㾫Ʃ1áB2áKϩॄ⥄5ᩄߩĩީčB੄ߩᏂނIϩ੄ɡީɩߩނ5ōB੄߭@dP~ǩ:éčˡA (á% šS˹"á/"ˡ㕫⩄㩄˹.^㩄.Eá+é-ÍIMׯ !^|b"z "$&(*,.0246>@-HNPwTSAZbjlnprtvxzšٮڂé˫έS& QÿXġRšENTׯ EYׯ ENׯ  OGׯ  NáOTׯ h؂RáfDLׯ NDׯ GNׯ :INׯ &QRׯ TRׯ ' "$&(*,.KF˹gBSׯ 8NDׯ g&SCׯ TNׯ TNׯ HRׯ OSׯ XPׯ IXׯ LOׯ NSׯ Źc˹h؂ˡ g؂؂8˓7ڹĩáǝũá6f>á=á=áǞ˹Ĺ#VOHA:AY2+&  ؚ!cáSˡؚ šS-Xh&خخخťĥĿ˥˄׮ ׮ ׼šɡ׮ ׮ ׼ōEǀ?],V" trljhYH'xig$'cÄ׮ ׼׮ ׼׮ ׼ ׼׼?X׮ ׼ծ ռ?GGռ㥄 Q㾊㥄 ⊮׮ ׼šɡͼռ׼A׮ ׼׮ ׼׮ ߩޮ׮ ׼׮ ׼׼A׮ ׼׮ ׼׼A׮ ׼׼A׮ ׼׼ռdš㩄d⩄٩Ȅd㩄 ׼ռ ׼ռ      ׼ռ ռ׼ ռ׼ ٩ɡ!ɡ <̃  ġf=Pɡ[==Q RQ==ǿ٩šکɡ2å=ń%á =%á٩ɡå=Ä" ۡ  QXqSZ$&éÄ ⩄  򩄽$=áǹ=ǥ= é(⩄ÄXBDjHJLNn򩄸PáMáš ˡ(á" ׼:ˡMTˡ³O¹_*# -}PéXÍFá (EB~xrlféٕZ1YR "$ "$b(`,.`2^68:~>ȡ0ááDJ *ám2ɡ\ɩéɄC ġۤ⩄ީš⫄ޥ5ۤޚᩄȡ(Q㥁Q߾ߩ㩄}ۤɡق5ۤōBکȡ>á ǹQ߾ǩߩޥQکǿM> -  ΓV͓@ɡVΡۤ͡dáۮ"=ˡC۾3ɡo׮ áۤ׼Mۤ㥄ۤ⥄5ۤک٩č۾2ˍBکᏂق׼ߥޮ ágۤ㥄,/á)ꩄ%áMá$ΩńǀɄ ǀ?C=ˡCAá׮ ׼Bá[ߥޮ PšP㩄ȡ(iQ߾ߩiMá׮ ׼C ΓV͓㫄ΓSAɡ\ɩōBX~šR3ϩ~ߚ5~߂~l͓ީߩީߩޏPOšR2ϩOߚ5ޚOߩޏO˩$˄+򩀄 Γ͓ ˩Ʉ⫀é+3á&ϩߥ5ީߩނ޹+ץϩ~ߩނީ߫㩄ȡQ+𩅞š +"$@(*᥄5ᩄ wJ)á| ȶōSš!šš== ø=צQ==ؿ+ =צQɡëǩ#⥄5ᩀɡCáQ⥁QUá1⫄੄ȡQुQ/áëë⫄ߩ⫄੄ȡHQྩˡQߥQ྿߹/ˡQߩƿߩثɡ &<ޫ ϩߥ54'< [ޫߩ2š2ߩ,ˡSšީߩɩ;˄Sš^ z( VϩɩÄ!i⾫⫄ᩄ쩄ťi.Äᩄťi-Äᩄëؤ׼Q -0# ɡaEåSÄ+;éÍ  ᥄iᩄéᫀ #ɡ#˩$˄V ΓV͓@ɡV"ؾ3ácؤ⩄⩄š⥄5ؤ⚥ؤᩄȡ Qߥi᾿ߩᩄ⩄iǿE$ ǩ ⥄iǿǩˡǩéPō$i=i &i@áצSYSXSî #iiGOTOׯigotoׯe㥄i áᩄ㫄⩄ȡ$y t,p f' Z' N&J(F u,8n Bo6xr B | < N|,v04Nh, ^ "8##t&'j'''(R((()))Z -68:~><š f< < >fǩǩéō<<fǭ@کf á<<ˡ<*á< #######_=TLheL_4BLerLinLg_+SLeaL_"cLovLerLs_tLheL_LLanLd_BLriLdgLeSLeaL3#3#3C3F@$I$@$ ١ á9 ٓ/! !!#J#I#K#K$H$9$9$7$4$0#4#0#,#(#&#(#!#$#$# ### # # ##!#)#)#-#/#.#(@8ALSILA-8&8ALLALSKLAC4C 4^P4TLO4DLA4YL43BLe4rLi4nLg43SLe4aL4C3######$#$#$## _`G,FU>$U6$T2$T*$U#$P$I$F$B$A $>$=$=$7$4#$2$)$%$#$+$2$+$)$ #$ $$$$*$8$=$9$&<$)?$)>$%=$$@$ B$ D$&E$'>=$@$B$@$?$$  $$$_#Z#V#P#H#J#K١ˡ) ! 䚹 9U?2˄ޢߢšáޢ ޣ ߢ  dޣޢޣޣߢ  dÍÍޢˡ ݓۤ 4#4#4#4$ 4#4#3C33.$38$4E$ 4?D44LLa4nLd44BLr4iLd4gLe43BLe4rLi4nLg43SLe4aL4#######3#3C3####$#$####F@$I$@$ á9 ٓ/! !!#J#I#K#K$H$9$9$7$4$0#4#0#,#(#&#(#!#$#$# ### # # ##!#)#)#-#/#.#(@8ALSILA-8&8ALLALSKLAP2L6,L00L0GGYLEALRSLC>>ALGOL_4$W4 $T4$R4$U4 $X4&$_4D\4 _`G,FU>$U6$T2$T*$U#$P$I$F$B$A $>$=$=$7$4#$2$)$%$#$+$2$+$)$ #$ $$$$*$8$=$9$&<$)?$)>$%=$$@$ B$ D$&E$'>=$@$B$@$?$$  $$$_#Z#V#P#H#J#KP ;v X$Jx4T.Nr&ھܡQ%á"ˡ ǹ ھةá ǩ*˩&˄ǥiؾˡ ݡھǩ&é!Íکčܡ&ˡ ۩ġکɡھ!ˡ/ Ω̈́3ˍh@ "   éÍ  hhɡ N ھܡQ%á"ˡ ǹ ھةá ǩ*˩&˄ǥiؾˡ ݡھǩ&é!Íکčܡ&ˡ ۩ġکɡھ!ˡޭ @áS@:(AP  8DWΡ$+ ɡ á9 ëǩسΩΓ ؿëǿëǩ$á 㩄hȡ  ͭ+ šڥQ ( Qؿ۩ íȡ0ġ å ˡء6㩃ȡ έ,u   í*dzš fق fقǩš f؂قǩá f fǩ:á:ˡ< "AZȄ `š١ˡ) ! 䚹 9U?2˄ޢߢšáޢ ޣ ߢ  dޣޢޣޣߢ  dÍÍޢˡ ݓۤ _P#D#B#<#<#;#<#>#A#C#D#B $>$7($,2$$3$"2$ /$+$-$0$2$3$-$!$$  $ $# # ###%#0#2#4#5#4#4#1#P<#B#G#N#S$: ######37#53#11#00#. _~|#y#w#v#w#*v#Fw#K|#Z~#\#`#`#`#_#\#X#S#L#I#G#F#E#D#B#=$8$3 $($%$$### ############## # ####C#L#R#T#W#YY#X#W#T1$&C$D$E$E$ E$ 6$4$1$.$&=#G#L#Q#R#Z#T#R#QQ#P#M#KH#I#C#B@#FD#?T#>ń ١á  ޤ uš  gá  Ä+ޤ  ɋ _u.4|#-4#/4#14#04#/4#.4#-4#.4 $04$-4$,4$$-43$14F$24W$14p$54$64$441#:#>#A}#E|#Fv#W#J#C#>$=+$?6@J$C\$Iv$Q$W$I$C|$?x$;q$6+E-$?($7'$/2$:7$A'$Q+$R.$T"$Z$T$R&$QQ$N"$M$DA$D!$?K/$&ń! á ݤݚ ˄ܟń ١á  ޤ uš  gá  Ä+ޤ  ɋ _M;#####$$$$$$ $#######ڣڢÄڢ    š Í ÄU ǐɄ:t$Z$utLo LbaLckL uLp.LuYLouL mLusLt LwaLitL fLorL tLheL sLquLarLe LcuLrsLorLutLo LapLpeLarL bLefLorLe LyoLu LbeLgiLn LtoL tLypLe.Lqá  Ä+ޤ  ɋ _uPLleLasLe LtyLpeL yLouLr LfiLrsLt LnaLmeL aLndL tLheLnupLreLssL tLheL kLeyL mLarLkeLdRLETLURLN+uILf LyoLu LgoLofL, LusLe LthLe LleLftL aLrrLowL_c$c$_$l$lb$XX$t$##z#####################################;#######$#$%#%*#*+### # ###### ########## ##### ##### ###########################B#C#D#B#>#<#;#<#?#B#D?#8#1#%#$###""#"###&#*#1#4#8#:#;#8#3#/#*#&*#.#0#/#,#*#)6#2#1#.#-####"#$#%#%#####"#%#&#%#!## _#}#z#w#x#|#}#|#}#3|#R~#V#X#Z#Z#X#S#N#K#J#J#K#O#S#W#X#W#U#R#K#H#F#B#>#:#6#2#0#-#)#"##################7#@ń! á ݤݚ ˄ܟń ١á  ޤ uš  gá  Ä+ޤ  ɋ _H I$ N$ T$`$p$#{$/$;$@x$=k$<]$:R$8M$6K$2M$0s$6u$3T$J$H$ SX$'PV$YU$X[$^[$b$x-t$<w=z$0}3{$=~=$58$>>$;k9i$>p$Dx$J{$Nz$R{$V~$[$` ǐɄ:.#--#,.#-.#-'#)*#+#-#2$4 $( $(I#NH#NE#JD#HC#F ## ##<!*&<##&#$&  $ ޤ uš  gá  Ä+ޤ  ɫ#S#M#E#F#C5#7#9#:#;#?#>#=#9#6#2#-#)#$#"### ##!#%#4)#*#-#,#1#4#6#8#9#:#9#7#5#1#/#,#)#(#(-#.#0#3#4#6#5#3#1#.#-#,#-#,:#4#/#+#&###"#)#.#:"<C)4C1-#-SELagLleLצ   ١  n ١ á9 ٓ/! !! _####$$$ $ $$$ $)$ 6$##'$3$"8#E$Q$S$S$V$Y$ X$"X$#\$&]$+f$.f$/e$0b$1\$0V$/K$.C$/3$3%$8$; $=$>#?#=#:#6#2#6#6#3#,#)#(#'#%#$#"# ### #"١ˡ) ! 䚹 9U?2˄ޢߢšáޢ ޣ ߢ  dޣޢޣޣߢ  dÍÍޢˡ ݓۤ +$>*$A$?$>$;?$@$B$E$G$J$K$L$Q$T$U$V!$T#$V"$X!$Z#$\&$]'$^)]+$\,$Z,$Y0$Y0$W,X*$V)$T+$Q,$O*$J)$H*H($F*$E,$D+$A/X.$X'Z'$Z,#,á9 ٓ/! !!.$4$5$6$#$00$$%$'$2$3$3$1$/$)$%$$/.$/$(+$''$,-$!.$#.#.$#-$&+$'($("$'$$$!$%$($*$,"$.'$-*$+)$)&.($0)$2'$4$$5 $4$1$. 4$6$8$;#$<'$;*$9)$7($5(<)$= _$$$$$$$$$ $"$&$+$-$.$-$1$1$-$.$+$ -$ -$($&$)*$#"$+$,$-$,$($#$ $*.$/$.$,$1$1$0$,$($&$$$&$!#$'$*$.$/$.$,$#$,/$0$P* BBBBB"D($BBU *DD* !  ((U JT!! UU* * )((((( H((H)**((** @@P@@@AA!! T(*AAAAA@@U !A(DT*  RP U@ (((((((P(TdX@0!p#@@@`P PPPPQU *0 ### # # # # # # 1#9#;#=#>#=#;#8#3>#D#E#F#B#=G#K#L#M#P#P#P#O#N#K#EP#U#X#[#\#[#Y#V#Pgá  Ä+ޤ  ɋ _###################################3#4#/#%##### ### #####ń! á ݤݚ ˄ܟń ١á  ޤ uš  gá  Ä+ޤ  ɋ _VRLavLenLSELagLleL ڢÄڣ &ڢ ڣ ڢ! ڢ!ڣڣ ڢڢ ڣڢÄڢ    š Í ÄU ǐɄ:١ˡ) ! 䚹 9U?2˄ޢߢšáޢ ޣ ߢ  dޣޢޣޣߢ  dÍÍޢˡ ݓۤ ###!# #######%#####!#$#+$#!=$B$C$D$E$C$G $F $E $E $H $I $I$F#?A$E@ $C ?$BHN$M Q$N%T$#O(V$'S*\$-=,9$)6.1$)*.$$( /$)-$) - $)-#'+#&*#&*#%)#$'#"#########';*  ١  n ١ á9 ٓ/! !!תժժժժժժժ@ժժժժՎ`ت ingits wժժժժߪ  Qժժժժժժ֯`qared :al|׾`ժժrc they ca`ߪժgp2eople geP!PpժPPIP@bժիժժժry :com@bՂժժժժժ get theժժժժުժժժժժժp@ the Tliתպ僀ժժ@תժd. t: t:תժժժժժժժ@ժժժժՆتpqa ty:Righ@ժժժժժժժ  Q;8ժժժժժժުr no ans~@ժժ` t: t:Wh@{ժna`cbQcty:You g pp ժ  p!@êժտժժժanding, r@Ǫժժժժժple of S8ժժժժxժժժժժ8ժ: t: m:fתժժתժ`gratulatתժժժժժժժAժժժժܪ e togethpժժժժժժժxqx s0ժժժժժժԪillages.@ժ`ause boat?`ժ\rectly, @rçĪժժժժved in tp2@բĪժծժժժժt was th0ժժժժ@ժժժժժpժing :is`תժժժժժժުժp`abthe statCתժժժܯ g:es c:rժժժժժժժpժժժժժժܪle lived١ˡ) ! 䚹 9U?2˄ޢߢšáޢ ޣ ߢ  dޣޢޣޣߢ  dÍÍޢˡ ݓۤ ժժժժCתժժժժժժ! t(u=1)֪՚ժժpժժinal *ne `  (ƒժժժժժժsaw :bepa`ժժժժժժժժժ:Don't fߪժժժժժժժ`ժժժժժت2"):The 8ժժժժ px!ժժժժժժ`pcb5,11 j:cCߪ՞`ժ՞$n$ ! YՎתժժfrrect an !@Վ  I£Īժתժժժhance t:<ժ` RETURN.ngOժժժժժժժժpժ@r, $n$ ! ܪպ@pa䧀ĪժժժTURN to תժժժժժժժ`ժժժժժxg@b's greatժժժժ՞  !ժժժժժժ@me :actպ`ժպ final s՞8ުժժf`cA`pt for thx!x@Վx x)xp@բêժժתժժժ%b="1"):vpժimo counժժ?ժժժժժժ՞`ժp1@ that arܪ՚@䀡Īժժժժ1 *quit תժժժժժժժ`ժժժժ~ r+1 t: uժժժժպ  y!ժժժժժժ`ns :livp`ժ`acsed blan՚pܪժժw8"lats!wooq `՞ qբժժתժժժure prob>@`. t: t: ժժժժsժժժժժժ@ժRc`ca :beaveު՚pģêժժ>ժժ. u:retuתժժժժժժժ`ժժժժx r a halibժժժժy  !ժժժժժժׯeturn g:`ժress RETպxժժs0r`rom a :~|xժժժժժժժժժ@bhe totalت@Ǫժתժժ over thqpy q bQcpaՂǪժվժժժժ :a fin@ժ the IndԪժՂ8@<@`ingits w HIIժ@~ red :al|>` they cap`@gpeople geP!PpPPIP@ժry :comՂ`ժժժ get they!xp8ժժժ` the Tli8僀@Ъd. t: t:ԪժՊp@ ty:Righ @Ъժ;88r no ans~@ t: t:Wh`@{@naty:You gqq pp 0  p!Àժanding, FǪ`ժժժple of S8pxԪժժ@8: t: m:fp8gratulatԪժՊ`Ae togethp`ppppЪժs0<8x@x8 illages.@`8use boat?@`\rectly,  8`çĀ|ժved in tGբĪ ժժժt was th0`@Ъժժ@ping :is x q``Ԫժժժpthe stat@C|xDx g:es c:r<ЪժcpDDx0le livedsժ@ժxof this ժժժ޿es e:  P Cժժժ`! t(u=1) pqpЪinal *ne `x  (ƒЪժsaw :bexժժժժժժ:Don't fԪժC`DDD|pp2"):The xqppp8ժժ`q5,11 j:cC`$n$ ! Y|xDDfrrect an !@  I£Ī@ժժhance t:<p RETURN. x)ngOժժժp, $n$ !  8䧀Ă@?ժTURN to ԪժՀ`< DDD>xg8's great! ЂժՊ@sme :act<8`8 final s8@DDft for thx!x@ x x)xբêժժ%b="1"):vp>imo coun xyp ~?ժժժ` that ar  䀡Ċwժ1 *quit ԪժՀ`Dtx88`~0r+1 t: u!Պ8ժcns :livpp`psed blanp8@`. t: t: P sժժժx@ :beavePģÊ>Ԫ. u:retuԪժՂ`D@|x8 a halib`x())ժpyԊGeturn g:p`@ress RET8x@s0rom a : I~|xЪժժժ`8he totalxI pǂpժ over thqpy q ՂǪЪժժ :a fin@|p the Ind _>O?$"C$$H$"K$!M$P$$R$%U$%W$"Z$_$d$j$k$ i$ g$f$_$ [$X$L$G$G$<$ 9$!5$$2$%.$$!$! $ $!$#!$'&$*!$+$($$$## # # # # # # ##########$$ $$ $SLo uLt hLe aLs tL M( ILn dLi aLn sL e eL sLhiLanL b$  a$ b$ L$Z$E$  2L #  13L0#0:::006ޣޣߢ  dÍÍޢˡ ݓۤ #'#(#*E#E#D#A#A#C # # ## #  #  #  # # #############$#$#%CNL/#=#8#6#98#89#<@"@$ FD M1 $$$!$#$$#"#!#"#(#-#,#-#4#8#;$<$A $C $D$C#D#E#E#F#H#I#J#K$Q$N$M$N $S$U$W$X#X$Z$\$] $_ $^$`$]$` $_,$]6$Z=$Y>$O$$$$$$$$$$*#)#' _>O?$"C$$H$"K$!M$P$$R$%U$%W$"Z$_$d$j$k$ i$ g$f$_$ [$X$L$G$G$<$ 9$!5$$2$%.$$!$! $ $!$#!$'&$*!$+$($$$## # # # # # # ##########$$ $$ $****UU**UU**UU  @@@@@TT* *@@@@@@@@TT@@@@@* * * ((* TT**((((((((UU** **TT**TT**TT(((((**U@U(((((((( $;$8$0$.$%$# !+$*6$)6)6$%$#(91L0B%,7:3LD+8 2L+G 4LOC, ?"?$ #### ߢ  dޣޢޣޣߢ  dÍÍޢˡ ݓۤ #'#(#*E#E#D#A#A#C # # ## #  #  #  # # #############$#$#%CNL/#=#8#6#98#89#<=T.$V$Q$R$$$!$#$$#"#!#"#(#-#,#-#4#8#;$<$A $C $D$C#D#E#E#F#H#I#J#K$Q$N$M$N $S$U$W$X#X$Z$\$] $_ $^$`$]$` $_,$]6$Z=$Y>$O$$$$$$$$$$*#)#' _>O?$"C$$H$"K$!M$P$$R$%U$%W$"Z$_$d$j$k$ i$ g$f$_$ [$X$L$G$G$<$ 9$!5$$2$%.$$!$! $ $!$#!$'&$*!$+$($$$## # # # # # # ##########$$ $$ $s@xof this pDDDNes e: $$$!$#$$#"#!#"#(#-#,#-#4#8#;$<$A $C $D$C#D#E#E#F#H#I#J#K$Q$N$M$N $S$U$W$X#X$Z$\$] $_ $^$`$]$` $_,$]6$Z=$Y>$O$$$$$$$$$$*#)#'#'#(#*E#E#D#A#A#C # # ## #  #  #  # # #############$#$#%CNL/#=#8#6#98#89#<@"@$ FD ! x|08`Up?՞8U@@x + >`x:```acc@y`^*_*AG@+=x?Wz~@0B@`@|@p_?, @0`/U*U*U~@q֪xȀȈɀ`pj0px~Վ@+ppp@@X@.p@|@pp`U@ת@תU "1"A@ x@\j@ժժ`+ `~ <p~`@\ܪ8@@ߍ>Uj@W*U`A~x:8׺+g@@@p`~`@a?X`, x@`x8u@<`UN ' @ xp`+׺@`pj0`8|qU>@/u asAbpcqpsbApc"@cAC@xx*<ժժp* `x0?@?p@\ܪ8@p߈pW*U+U*uppx|p:<׺+@c@@|px@X, p|_@88UվpUG@` xx`@+`|pz0pp@Wzp+=@"`p*pתժ?xj`@xpxp?@\ܪ8@_*U*U*U*=8~@`p8p:8p@ך+@a~@<@X<,m?x@~0pU8`պ0Ux`` @@+x`@p:@8x`Wj|*p$@`+ߪժ^jpab`psaaB`||cX:`׺/nώLJ@G@ΈLJ`8x~@@p\|, @p@c`~~@@\ު8`ߊLJLjLJ?`xO/U~~+U`xpACt:There will be questions for you to t: t:answer later. t: u:return g:es0;v0,39,14,23 gx:bridge! t:The first people in Alaska probably :came from Asia across the Bering Land :Bridge. That migration of people :lasted for a long, long period of time. u:r:Before any white men saw the land we t: t:call Alaska, many people were already t: t:living there. This lesson is about t: t:how those people lived long, long ago. t: t: t:Please read each sentence carefully, t: t:$n$ . t: t: CjklAbcm ABC t:DEFMNODTU1230:- DefDEFmnoDefm DEF t:GHIPQRGVW456!"# Ghi$%&$%pGhi$%&$%& t: t: tx:script t:abefijmops ABCDEFGOPQ th:cdghklnqrt HIJKLMNWTUV tx: t: Part Four t: gx:return g:v0,39,21,23 a:$n$ g(len(%b)<1):x31 jc:@a c:/n$ c g:es0 g:v t<1):clear jc:answer g:es e: *return t: th:Press RETURN to continue... as: g:es e: *yorn th:$y$ a: u(len(%b)<1):clear jc:yorn m:%y!%n un:clear jn:yorn g:es e: *clear g:x31,31,11 e: *clear4 g:x31,31,31,31,11 e: *start g:es tx:people t:ABCJKLA/SXYZ789 AbcABpr:l g d:n$(30) d:a$(30) d:t$(46) c:t$="Please type your answer and then :press RETURN." d:y$(74) c:y$="Answer yes or no and then :press RETURN to continue." j:start *an3wer t:$t$ a:$a$ u(len(%b)<1):clear4 jc:an3wer g:es e: *answer th:$t$ a:$a$ u(len(%b)(^BBCaLDCrLD&C#CCCLDC;CYCKC L1D9L8D1LD!C CtLD-C&$C&C&$C'#'$#-$-'$'-$-'$'-$-'$'-$-'$'-$U$#U$U$$U$ޢޣޣߢ  dÍÍޢˡ ݓۤ #;;;PLR#B#D#E#C#B#?#;#90#2#1#/#1#1;#9#7H($J3$KC=:$;0$9'$: $9$; $>$@$B$F$GC4C2CCC;; _\`;;<9!;######$7$;$H$Y$[$[L$;$ $$# ######## ##"#*#,#,# ##$*%3$'6$)C$H$[$## ##!#'#.#2#3$2 $0p,UxUxRB@@@^jpժժժ@/8@pxeturn gx:newsea! t:This unit covers some of those :people, the Indians, who made their :homes in Southeast Alaska. u:return g:es0 t:Southeast Alaska was the traditional :home of the Tlingit Indian people. gx:onlysei t: t:The Haida and the Tsimshian people :lived :at the very tip of what is now Alaska. gx:soueast u:return t:This area is one of the warmest parts :of Alaska. There are many islands, :large forests, and a heavy rainfall. u:return t:What do you think they used to :travel from one islan:story the figures suggest to you. t: t:When you are ready, $n$ , press :RETURN and I will tell you the :story of Gonakadet. u:return t:This pole tells the story of a sea :monster who was part human. t: t:He helped :a young man feed the village and keex:gonakadet t: t:Each pole told a story and each :figure on the totem pole had a :special place in the story. t: t:These stories helped to keep records :of their history. u:return t:Look at this totem pole and see what ;es t:Now, $n$ , what animal do you think :is represented by the figure on your :right? g:v0,16,14,23;es u:an3wer m:raven ty:Good student! g:v23,39,0,11;es gx:names g:v0,16,14,23 t: u:return g:es0;v0,20,0,23 t:They carved totem poles from :tall trees. galled clans. u:return g:v23,39,0,11 gx:eagle t:Which of these crests do you think :represents the eagle, $n$ , the one :on your right or the one on your left? g:v0,16,14,23 u:an3wer m:left ty:Of course! tn:The eagle has a sharp curved beak. g:v23,39,0,11:very complicated social organization, :$n$ . u:return g:es0;v0,39,0,10 gx:raven t: t:The raven, eagle, and wolf were the :crests or symbols of the main :tribal divisions. t: t:Other animals were used to :represent divisions of the extended :family cks, canes, rattles, and :fish hooks. t: t:They decorated these items by carving :and painting beautiful designs that :represented animals and people. u:return t:These complex designs were also used :to indicate membership and rank in a :represents, $n$ ? t: u:an3wer m:beaver ty:Sensational! tn:It is a beaver. Look at the big :teeth! t: t:The beaver was one of the many animal :designs used by the people of :Southeast Alaska. u:return t:They also used wood to make boxes, :dishes, masken from other Tlingit villages in :the household. t: t:The women cooked over a fire pit in :the center of the house. u:return g:v20,39,0,23 t:The men carved large house :posts, like this one, from cedar logs. gx:beaver t: t:What animal do you think it t:Usually, their houses were built :along the beach. u:return g:es0;v t:The typical household included the :headman, his wife and children, the :nephews and their families, his :younger brothers and families. t: t:Sometimes, there were also slaves :ta :hour. That is twice the speed :that you would normally walk. u:return t:These well-to-do people lived in :settled villages. They had large :houses made from logs of split cedar. :Several families lived in each house. t: eed t(b<12):Perhaps, they could go that :fast if there was a strong :wind blowing, $n$ . jc:speed t(b>12):Remember, $n$ , these people :had to paddle their own canoe! *speed t: t:A large wooden canoe like this would :probably travel about 6-8 miles peror travel, :for fishing, and for warfare. u:return t:How many miles per hour do you think :they could go in a longboat, $n$ ? t: th:Type a number and then press RETURN. a:#b g:es t(b<3):That's not very fast, $n$ ! jc:speed t(b<8):Good answer, $n$ ! jc:spu:return g:es0 g:v0,39,12,23 gx:longboat t:The people of Southeast Alaska made :big boats from hollowed-out logs. :Many of these boats were painted. :Some of them were 70 feet long. t: t:These boats were called longboats or :canoes. They were used fd to another, :$n$ ? t: u:answer m:boat!canoe!wooden g:es ty:That's right! Good for you, $n$ . tn:There were lots of trees and lots of :water, $n$ ! t: t:They made boats from :big logs. Let's look at a picture :of the kind of boat they used. p :his mother- in-law happy. t: t:Can you tell which figures are which? t: th:Press RETURN for the answers. as: g:x13,31,31,31,31,31,11 gx:labels t:There are many different ways to :tell this story. u:return g:es0;v0,39,13,23 t:These people had the best food :supply of any native group in Alaska. gx:halibut t: t:There were land animals to hunt, :many berries to pick, and fish to :catch. u:return t:These funny looking fish start out :with two eyes, one on each side of :their body. When they get ol0$.$-$,$'$$$$D$#$))$&&$(*$"%$&+$+DD3צ   ١  n ١ á9 ٓ/! !!;$:$7$$$$,$6$B$F$I$G$D$%$$ $$$$$$$&$'$.$4$>$>$7$3$&$$RU$R$_$f$i$h$g$b$T$r<3-D+" $$$$!$#$%$&$($,$/$0$2$2$1$ _##$ $$$"$.$6$;$>$D$H$M$V$b$m$t${$$$$$>$=:$=$>$>$>$s$v$t$:$6$8$R$q$}$$$$]$($ $$###$$ $ $$$ $*$-$1$4$7$ń! á ݤݚ ˄ܟń ١á  ޤ uš  gá  Ä+ޤ  ɋ _8RELagLleL12PLotLlaLtcLh LhaLt1MLotLheLr-LinL-lLawL8SLeaL mLonLstLerL9(LGoLnaLqaLdeLt)L  š Í ÄU ǐɄ:dians of Southeast :Alaska. Good luck! gx:smiles u:return g:es0 l:exam e: :man given, $n$ ? t: u:an3wer mx:%4!four ty:Absolutely! t: t:He has given four :potlatches. t: t:You can tell by counting the :rings on his hat. u:return g:es0 g:v t:That's about enough for now, :$n$ . t: t:Let's see what you have :learned about the Inar bark and goat hair. u:return g:v22,39,0,23 t:Hats, baskets and blankets were woven :by the women. gx:potlatch t: t:This is a potlatch :hat which shows how many potlatches :its owner has given. u:return t:How many potlatches has this mshian people :held many fine potlatches. t: t:They sang and danced and many gifts :were given. The more gifts a man :gave, the more highly he was thought :of. t: t:One of the best gifts was a Chilkat :blanket. These fine blankets were :made of ced dried salmon :which was their staple food. gx:salmon t:They ate the dried salmon dipped in :oil. t: t:Salmon and halibut heads were :considered a delicacy. They also ate :herring eggs and seaweed. u:return g:es0;v0,39,0,23 t:Tlingit, Haida, and Tsi:lot of people. A big halibut will :weigh more than 100 pounds. u:return t:Using hand made, wooden hooks, :they caught halibut all year long. gx:hook t: t:These hooks were often decorated with :elaborate carvings. u:return g:es0 th:They also caught andder, :both eyes are on top of their head! t: t:What kind of a fish is this, $n$ ? t: u:answer m:halibut ty:Absolutely! You've got your eyes :on straight. tn:This is a halibut. t: t:One halibut can provide food for a ١ˡ) ! 䚹 9U?2˄ޢߢšáޢ ޣ ߢ  dޣޢޣޣߢ  dÍÍޢˡ ݓۤ (^BBhe Tlingits use lots of :ivory in their carving? a: m:n ty:Of course not! cy:r=r+1 tn:Most of their carving was done in :wood. t: t: t:Did they use very simple designs to :decorate their carvings? a: m:n cy:r=r+1 thy:Correct! t:Their designs were very:r=r+1 tn:He has given four potlatches. *wznull u:return g:es0;v t:The following questions require only :a simple yes or no answer. Any other :response will be counted wrong. t: t:Be sure you press RETURN :after each answer, $n$ . t: u:return t:Did tm:fish!salmon t: tn:They relied on salmon all year long. ty:You got it! cy:r=r+1 u:return g:es0;v25,39,0,23 gx:potlatch t:How many potlatches has this man :given, $n$ ? a: t(len(%b)<1):He has given four :potlatches. jc:wznull m:%4!four t: ty:Right on! cyymbols used as :crests by the people of Southeast :Alaska? a: t: m:raven!eagle!wolf ty:Very good, $n$ ! cy:r=r+1 tn:The clan symbols were raven, :eagle, and wolf. t: t: t:What was the staple food of the :Indian people in Southeast, $n$ ? a: . t: cy:r=r+1 cy:s=s+1 ty(s=2):Congratulations, $n$ ! You got :both of the last two questions correct. tn:At this point, $n$ , you are #r for :4. t(s=4):Outstanding, $n$ , you have a :perfect score. Keep it up! c:s=0 u:return t:Name one of the main ser!village!group tn:They did live together in villages. cy:r=r+1 cy:s=1 ty:You're doing just fine. t: t: t:Now, $n$ , what is the weather :usually like in Southeast Alaska? a: t: m:wet!rainy!not&cold!windy tn:It is wet, windy, and rainy :but not too coldt(r=1):You have answered one question :correctly, $n$ . jc:more t:Good for you, $n$ , you answered both :questions correctly! *more u:return c:s=0 t:Did the Tlingits live together in :villages or did they wander the :countryside, :$n$ ? a: t: m:togeththeir principal means of :transportation, $n$ ? a: t: m:boat!canoe cy:r=r+1 ty:Of course! With all that water, :they had to use boats. tn:They used large boats made from :hollowed out cedar logs. t: t: j(r=0):more state capital (Juneau) is now located- :-the Tlingits, the Haidas, or the :Tsimshians? a: t: m:tlingit tn:The Tlingits lived in the area :where the state capital is now located. ty:Absolutely! The others lived :further South. cy:r=r+1 t: t: t:What was ago. t: t:Please type an answer to each :question and then press RETURN. t: t:Be careful how you answer, $n$ . :Spelling is important! t: t: th:Press RETURN to begin. as: g:es t:Which group of people in Southeast :Alaska lived in the area where the :pr:lg d:t$(1) c:t$=chr(25) d:c$(1) c:c$=chr(11) j:start *return t: th:Press RETURN to continue. as: g:es e: *start g:v g:es c:r=0 c:s=0 t: t:Here are some questions for you to :answer. Remember that these are :all questions about how people lived :long :complicated. t(r<3): tc: tc:There are only a few questions :left, $n$ , better keep trying! c:s=r+3 jc:last t: t: t:If you get the next three :questions correct, $n$ , you will have :a score of #s out of 12. Be careful! *last t: u:return t: t:Did they carve totem poles? a: m:y cy:r=r+1 tn:They carved totem poles from large :trees. ty:Naturally! Good for you, $n$ . t: t: t:Did the Tlingit people get any :of their food from the sea? a: m:y cy:r=r+1 tn:A lot of their food came from :the sea,You are :a fine student. Congratulations! *done t: t:Right now, it's time for some :other activities. t: t:Let's learn some more :about the Indian people of South :east Alaska. gx:smiles t: t: Have a good day, $n$ ! w:5 g:es0 gx:logo! w:10 g:es0 t:y for the total. a: g:v g:es0 t(r<6):You got #r correct, $n$ . :That's all right for the first time. :Perhaps you would like to go over the :program again. jc:done t(r<11):You got #r right, $n$ . :That's great! jc:done t:You got #r right, $n$ . t(%b="2"):The Aleut people lived :there. t(%b="3"):You're way off. That's :Eskimo country. t: th:Press RETURN to try again. a: g:x25,11 j:chance *total g:es0 t:Now I need a few seconds to :compute your final score. t: th:Press RETURN when :you're readight on the very first try. t(s<>0):You got it! c:r=r+1 *quit u:return j:total *wrong c:s=s+1 t(s>5):The correct answer is 4, $n$ . jc:quit t(%b>"5"):$n$ must not be from Alaska! t(%b="1"):That is where the Athapaskans :lived. of these areas did the :Tlingits, Haidas and Tsimshians :live? Please type :1, 2, 3 or 4 and then press RETURN. :If you type the wrong number, I will :tell you who did live in that area. a: t: j(%b<>"4"):wrong t(s=0):Fantastic, $n$ ! You got it :ra special :treat, $n$ ? a: m:fish&heads!salmon&heads!halibut&heads :!seaweed!herring&eggs!stink&heads ty:You really paid attention! tn:Fish heads were considered a :delicacy! cy:r=r+1 t: u:return g:es0 gx:areas g:v0,39,13,23 c:s=0 *chance t:In which one :Please type your answer and then :press RETURN. t: t: t:What garment did the Tlingits use :for clothing, $n$ ? a: m:blanket!hat!sock!sox cy:r=r+1 ty:That is right! tn:They used blankets but they also :wore hats and socks. t: t: t:What did they eat for ,23 gx:eagle u:next m:eagle!crest ty:There's no fooling you, $n$ ! cy:s=s+1 tn:This crest represents the eagle clan. t: t:You got #s of the picture problems. c:r=r+s t: u:return g:es0 g:v t:There are three more questions, $n$ . m:beaver!house&pole!house&post ty:Very good, $n$ . cy:s=s+1 tn:That is the picture of a :beaver house post, $n$ . u:return g:es0;v2,39,0,10 gx:raven u:next m:raven!crest ty:Good for you, $n$ ! cy:s=s+1 tn:That is the raven design. u:return g:es0;v0,39,14sh ty:You hooked that one, $n$ ! cy:s=s+1 tn:That fish is a halibut. u:return g:es0 gx:salmon u:next m:salmon!king!fish ty:Only a few more to go! cy:s=s+1 tn:This is supposed to be a picture of :a salmon, $n$ . u:return g:es0;v15,39,10,23 gx:beaver u:next:before you begin to type. t: th:Watch closely! Press RETURN to :begin. as: g:es0 gx:longboat g:v0,39,15,23 u:next m:long&boat!canoe ty:Of course! tn:That is a longboat carved from a :tree trunk. cy:s=s+1 t: u:return g:es0 gx:halibut u:next m:halibut!fiare some of the pictures you saw :before. Let's see if you recognize :them. t: t:Type in a description of each picture :as it appears on the screen. t: t:Don't forget, $n$ , that you must :wait for the square cursor to appear the next :question right, $n$ ! t(u=1):Way to go, $n$ ! t(u>1):Good job, $n$ ! You got #u of :the last three questions right. t: *all3 u:return c:s=0 j:final *next t: t: th:Press RETURN to continue. th:$t$ th:Your answer? a: th:$c$ t: e: *final t:Here $n$ . t: u:return t:Did the Tlingits wear lots :of clothes? a: m:n cy:r=r+1 tn:They did not wear a lot of clothing. t(s=r): t: tc:You did it, $n$ , you answered :all of the last three questions :correctly! tc: jc:all3 c:u=3-s+r t(u=0):I bet you'll get t:That is the end of this lesson and :you may remove the diskette. t: th:Otherwise, press RETURN to start :from the beginning again. a: e: p`0@pistrict 0copy or x|88` @`x@p ~8@?|~p@xpx`x` `00@@````@|~x?@````x@`@`88`08@`p@xx8 `|``p@``|@@@0<<~xgppp `x`x@x80p8x@0@@p`|<@@```@|``x|~<p00`0@@@pp@`x`@`~x?@@@?p`@@p88@`<pxg`x`x`?p~xp@xp` 0``@p@8 _M;#####$$$$$$ $#######ڣڢÄڢ    š Í ÄU ǐɄ:(^BBP* BBBBB"D($BBU *DD* !  ((U JT!! UU* * )((((( H((H)**((** @@P@@@AA!! T(*AAAAA@@U !A(DT*  RP U@ (((((((P(TdX@0!p#@@@`P PPPPQU *0 am! w:1 lx:natives  e: gx:logo! g:es0 t: t: This Diskette is the Property of: t: t: t: t: t: t: Larry and Martha Stevens t: t: 515 North Franklin Street t: t: Juneau, Alaska 99801 t: t: (907) 586-3689 t: t: t: t: t: Do NOT copy or modify this progr(^BBń! á ݤݚ ˄ܟń ١á  ޤ uš  gá  Ä+ޤ  89 t: t: t: t: t: Do NOT copy or modify this :diskette. w:2 lx:natives  e: gx:logo! g:es0 t: t: t: We hope you enjoy this program! t: t: t: t: Larry and Martha Stevens t: t: Applecart Programs for Education t: t: 515 N. Franklin Street t: t: Juneau, Alaska 99801 t: t: (907) 586-36(^BB89 t: t: t: t: t: Do NOT copy or modify this :diskette. w:2 lx:natives  e: gx:logo! g:es0 t: t: t: We hope you enjoy this program! t: t: t: t: Larry and Martha Stevens t: t: Applecart Programs for Education t: t: 515 N. Franklin Street t: t: Juneau, Alaska 99801 t: t: (907) 586-36