@L|}6CD l0C)HCC WhL/h `CmCDiD`  R@P1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLL&0") $G% }H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0 })8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH) }  hyhyB q L> Lm JJ  Ln*` dB%' }8  H H` 1 { LL   !L     Hh SY?  q  1L }  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}}j  |||DDOS DOSDOS SYS }}}}CDOS SYS} 0`BDELV !B }`LVUQ   ]   TU J ]L!T  #      TU  } L ? .  t`GBJ V~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI   0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -'}LLu DEHILV 9 .l 9 .l  `` s$B VBH(}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL)}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e*}1i1232435ޥ<<8{} 3:}ŧӠɠҠӠӠéɛA. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGE J. D,}UPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESSF. LOCK F-}ILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES9!&x#!7&p))'&X*./)L''-؆莟.}R'S  vW DEHHI 1A#! @ ~0ɛ8A0.) ȅ 1 1i/}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU! 0 .{z:*{}.|~ 1 0 00}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # 0 0 n&|D! 1L NOT A DISK FILE1}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH2}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L 3} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED COPYING---DN:4}# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B5} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#6}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%7} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C}//3Hu ξL/L DRIVE TO WRITE DOS FILES TO?WRITING NEW DOS FILESTYPE "Y" TO WRITE DOS TO DRIVE 1.?}D1:DOS.SYSERROR - NOT VERSION 2 FORMAT. , &* բ( 1L `[) 0NΞ 0 L1M) 1@} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DUA}P DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,B}  `)  <0 2 2 0  ,   ,,ޢ* 1L ,K* 1 ~0 0C}FINSERT BOTH DISKS, TYPE RETURNERROR - DRIVES INCOMPATIBLE., 1 ~038  , 1L D}, &*  Lz+, 0 , 1 ~0 + Y,0!,0 ,L+ ,mm  v,"ǭE}0Ξ, 05,Lt+L +,Hh` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNF}INSERT DESTINATION DISK,TYPE RETURN`    `L,8,0( rG}L1(`ߢ) 1* 1 ~0Y`hhL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtH}% A., 1 <0 0 .@L# .BJ 1  DEHIB V L1 ,5 1 <0,L. I} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 , 1 <0,0Lf- B VJ},A#P, 1 <0 0L#L ߢ) 1* 1 ~0Yj383}mm ݭK}}`8}``|* ? ɛ,`|:(|/ 1L `DESTINATION CANT L}BE DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξM}hAΞB,0 J 1 BޝDEHI,HDE 1HIHIDELSAVE-N}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L O}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥP}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{Q}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1R} L ERROR- 128ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDS} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uT} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uEiͩkΩ͙kCop j`j {j`Hi͝Νh`V}L"UNEM:D"NURͩkΩ͙kCop j`j {j`Hi͝Νh` AXLPB0NZZA4 X} @AR@ AP +'0@@@A0@@ Y}@[0@@@m@@@@9AR@(} MENU( Z} ( GG;@@,;@ ,;@@,;A,;@,;@@, "D1:MENU" &&@@ [}D:*.* 6,6." 6 @0i6-%@(6.7@<@,A67@ < \}@ ,..i67@<@,.7@<@,3 6. 67B:,%@,.367B:,%@,.G67@<@ ]},.(--@B:,:7<,4 G67<,..] 6.=:, @D67@<@,.7@<@,]67@ ^}<@,.0$@(B:,"@@*A77@<@,4SYS)7@<@,4SAVA @ _}`- @ 2() <@FB:,"@@HA77@<@,4SYS)7@<@,4 `}SAVA @0K @ P(7@<@,) U @0Z( (( xARz/-@ a}@!/( TYPE PROGRAM NUMBERP-@@"1( AND PRESS RETURN; A0?F(P BP: b},A00"@&6.7@<@,0 AELB6.7+&@,$@%@<+&@,$@%@,L c} B37@<@,4 36.7@<@,!7@<@,4DOS!.! 6.D1:!67B:,%@,. d}8-@@!8( @AR@'-@@"@  LOADING  e} A% BL-@@".  CANNOT RUN 8 @B BL A0 (}X-@@ f}>($SAN MATEO COUNTY OFFICE OF EDUCATIONP-@@X(ANDm-@ @2(COMPUTER-USING EDUCATORSD-@ g}@ Q(SOFTSWAPc-@@m(ATARIN-@ @0(DISSEMINATION PROGRAMSB-@@N( h}DISK #3-@A F:Ad,"@A` $D:MENU ZjkN'NPGHBLRLRINSLFRTCRACLACRLCLLAFICLMEKINPMPP1ILRLLPLHLRLLNMODMSj}@ k}l} !"#$%&'()*+,---- PAm}K JANA--- ORIGINAL VERSION BY--- BILL FINZER$$--- ADAPTED BY DON MILTON, JR.!!--- CENTER FOR MATHEMATIn}CAL--- LITERACY--- SAN FRANCISCO STATE--- UNIVERSITY --- MAY 1982  $$___________________o}___________ $$| | $$| SAN MATEO COUNTY |$$| OFFICE OF EDUCATION |$$p}| & |$$| COMPUTER-USING EDUCATORS |$$| |$$| SOFTSWq}AP |$$|333 MAIN STREET,REDWOOD CITY|$$| CA 94063 (415)363-5472 |$$|____________________________|r}$$______________________________$$| |$$| PROGRAM MAY BE COPIED FOR |$$| Es}DUCATIONAL USE ONLY AND |$$| MAY NOT BE SOLD. COPYRIGHT |$$| (C) 1982 CUE,INC |$$|___________________t}_________| 7G6-F:A,&@(6-$AVGF:&@,"AUA`<Ҡ>'+@u}%@'AR@@+-@@+ @PAK JANAB-@A D'+@%@'Av}R@F+-@@+ @FROM THEH--@@- @ CENTER FORJ/-@@ / w}@ MATHEMATICALL+-@@+ @LITERACYN(-@@( @(CML)P0-@@x}0 @ SAN FRANCISCOR3-@@3 @STATE UNIVERSITYT-@A  B/y}AV/@@K:&6-F:@,& A(Ai+@&A(+B7t&A(z}Ԡ͠K6-B6-B'6-B36-B?6-BK6-B;A,9@{}<@,;@A,;@A,;A,;A%,;@,;@,;@,;@,;@,;A%,|}RR;@,;@,;@,;@,;@,;@7,;@7,; A6-@ %6-@16-@}}; B@Πi0@@@70@@@=(}O-@S(e-@~}@i(! - - -! / 6.6.-# %@$)6./6.! - - -! } A AԠ6-@6-@)6-%@76-%@PE6-%@ S6-%@0}a6-%@0m6-@v6...6.336.)336.)}7-@A367B:,%@,. 7 ll6.b   }      3367B:,%@,.   mm6.c}         ##67B:,%@,. }  &ll6.b        0ff6.\}        :\.6.$}Y6.$\$-@A -@@($R-@}@!"AH(!ԧӠӠŠR A p2B:,"@2(Ǡ } A $ԠΠ+-@(+-@6-@ A6.C-@}@(*4*!@66-9'C A4A$?Ԡ@4Q)4QU}ITA@B4L)4LISTBE4E)4EXECUTEB J$$7@<@,4DAO 4N)4NEW} ApQ4H)4HELPB0R! 4I6-! B@SNB:,!@.7@<@,4INST8 B}@D6-N AT$$7@<@,4MAYB:, @A^!7@<@,4HE! c!}7@<@,4LA! h!7@<@,4RA! m!7@<@,4LL! r!7@<@,4RL}! w%%7@<@,4WAA |%%7@<@,4REAK-@@7(ĠĠ}A A K APŠР!@A"_B:, @$-@@K("}٠РϠŠU A _ AP99@:7@,, @H)@:7@,,!@WAl6-A:7@},,%)"7-@@X(έԠРb A l AP006.7+&@,$@%@}<@$,w-&@e67+&@,$@%@<$@,.7$@%@<$@%@,i w6-&}@>-@@>(ĺ7@,D-@B:,,(>:@:7<,,%A(,0 : A }D BŠլĬ̬ҩ!@A" #"A A P# AP ^B:,"@$-@}@J( ǠΠլĬ̬ҩT A ^ AP47@<@,4U*6-&@4 A`4}7@<@,4D*6-%@4 Ae&47@<@,4L*6-%@4 Ap047@<@,4}R*6-&@4 Au: AD% @ 6-@ % AE&-@@(& AI%!@}6-@% AJ&-@@(& AN%!@)6-@)% AO$-@@(}$ AS% @6-@% AT-@@(X"A%b$kHHԠ}ǠԠ РӠl!@A"qaB:,"@$-@@M(#}ӺԬW A a APv 6-B:,-@x7<,4,' A y  AG6}-%@G@:7@,, @H)@:7@,,!@WAt6-A:7@,,&B:,"&@8-@@`("}ǠҠԩj A t AP--@:7,, @H)@:7,,!@WA6-A:7,,c"})!&@--@@O(έԠРY A c APh")!@+-@}@T(#ԠԠΠĠ^ A h AP9")"@%6-?/ A%9 B } A0!!ԠӠ!@A"_B:,"@$-@@K(!}ǠҠU A _ AP99@:7@,, @H)@:7@,,!@WA<6-A:7@,,<B:,!}@%P:L:,%@,Ag @)!@P+-@@S("ҠԠŠΠĠ] A }g AP"A%-@@$ $3ŠԠ4+ - (- +"}A%>$ΠϠŠY"@!-@@E(ΧԠϠԠΠӠO A }Y BY"@!-@@E(ΧԠϠԠΠӠO A Y B2 A EE}ԠΠ Ϡ٢ _B67+&@,$@%@<+&@,$@%@,.P6}-%@\"?_$ AP ŠԠ 8<@,A1 ""8<@,!}A2 +68<@,-(6-&@+$ נР t6-%@!@/-@@W(#}Ϡ٠ӻϠ͠Ҡa A g6-j't B!& %68<@,-%68<@,- Рˠ} 86-&@568<@,-8<@,&@8$Ԡ͠t (}$0@@@>0}@@@P@@b@@8tAR@[-@@(+-@@/(A}-@@E(W-@@[(P-@@-(P(} A4A@027@<@,4N(6-@2 B0$$7@<@,0YA@S-@}@-(S(!塠-@A  +%D:MENU?}ԠŠ@2 6.6.6.*AR@2(J)@6.>:,44>:AU,(*}AR@4 A@=4>:A&,*B:,"@&6.3(= AR4>:A&,*B:,!@;6.7}@:%A(,K67B:,%@,. }A 4 $)-@B:,)7<,4 ApC67B:,%@,.7<,C67B:,%@,.>:@:7<,,%A(},  6.6.$'ԠĠ'!@A"'0"A)B:,"@& A P0 AP'}C1@:7@,,!@G*@:7@,, @XC6-A:7@,,'f @)!@ +-@@R(!Ҡ}ԠŠΠĠ\ A f AP'FF@:7@,, @H)@:7@,,!@W)B:,!@A'* 6.6}-%@$ 6-* A!'L=(   I6-@L$$'L=(}   I6-@L$.'L=(   I6-@}L$8'\M(7@,  7@,  Y6-@\$B' 6. %@$}L' 6. %@$V' 6. %@$`' 6... %@$j' 6.`` %@$s'Ԡ٠}t'>;(2      >$u'M1@:7@,,!@G*@:7@,, @XC6-A:7}@,,M Bv'FF@:7@,, @H)@:7@,,!@W)B:,!@A'ԠԠ͠'}!@A"'0"A)B:,"@& A P0 AP'C1@:7@,,!@G*@:7@,, @XC6-A:7@},,'f @)!@ +-@@R(!ҠԠŠΠĠ\ A f AP'FF@:7@},, @H)@:7@,,!@W)B:,!@A') 6.6-%@$6-) A!'-*(!  } -$''$(  '$')&()$(%"(  }%$ ((%(($(!(  !$(96(-   }9$((96(-  9$2(52() 5$;(}ԠԠ͠<(!@A"=(0"A)B:,"@& A P0 AP?(C1@:7@,,!@G}*@:7@,, @XC6-A:7@,,@(f @)!@ +-@@R(!ҠԠŠΠĠ\ }A f APA(FF@:7@,, @H)@:7@,,!@W)B:,!@AB() 6.6-%@$6-) A!}F(0-($   0$P(,)(  ,$Z(*'(}*$d(+((  +$n()&(  )$x(&#( } &$(41((   4$(63(*  6$(63(*} 6$(ԠԠǠ(!@A"(0"A)B:,"@}& A P0 AP(C1@:7@,,!@G*@:7@,, @XC6-A:7@,,(f @)!@+-@@}R(!ҠԠŠΠĠ\ A f AP(FF@:7@,, @H)@:7@,,!@W)B:,!@}A() 6.6-%@$6-) A!(=:(1   =$(<9(0}   <$(HE(<      H$(2/(}&    2$)ԠԠǠ)!@A")0"A)B:,"@}& A P0 AP)C1@:7@,,!@G*@:7@,, @XC6-A:7@,,)f @)!@+-@@}R(!ҠԠŠΠĠ\ A f AP )FF@:7@,, @H)@:7@,,!@W)B:,!@}A )) 6.6-%@$6-) A!)>;(2   >$)?<(3}   ?$")FC(:      F$,);8}(/    ;$*ԠŠ*g (}#0@@@5-@}A6-M6-@Q(c-@@g(*B-@@)&@"8( ϠB B}+(+<-@&@"6.00<67@&P:L:,,,.=:, +OO(  7+&@,$@%@<+&@},$@%@, +,6-%@"@ (,6- ++!"@P*&@!@P+ B*+ R+X}-@@":(ҠĠҠӠD AX"AW+ A\+<-@@"<(!}ŠǬӠf+$)@$AUBp+A (}-@'6-+(=-@@}A(z+$-@@!($$.ŠŠ.Z (}$0@@@0"?<6-}@B6-P6-&@Z B . 6-6-%@%6-%@P36-%@ A6-%@0O6-%@0[6-@}g6-@s6-@ 6-@6-@.! - - -! .) 6.6...-) %@$}. - - .&@"B!.U-@@.68<@,-E68<@,-I} U6-@/BB6.7+&@,$@%@<+&@,$@%@, /0 6.-@B:,07<,4 B }E /67B:,%@,.7<, /   6./@-@((  2 A @6-%@/ 6-} B!&/ B @D/@$I/8-@8( ϠŬӠN/$)@$AU}B!X/6- A2 ՠƠӠ2!@A"2 (}$0@@@>0}@@@P-@T(f-@@j(v6-@-@@2##(COMMAND }MEANING2$$( PROGRAMMING 2--(% RLn Right Leg position n (1-4)2,,($ LLn Left Leg position }n (1-4)2--(% RAn Right Arm position n (1-9)3,,($ LAn Left Arm position n (1-9)3**(" HEn HEad expre}ssion n (1-9)3**(" MU,MD, Move in direction shown"3))(! ML,MR (Up,Down,Left,Right),3,,($ WAn WAit n ten}ths of a second63..(& REn,m REpeat from step n, m times@3( EDITINGJ3 ( Dn Delete step nT3 ( } E Execute dance^3( H Helph3( I Instructionsr3&&( L List steps of dance|3//(& }N New dance; erase this dance3--(% Q Quit playing with Pak Jana3/(/(# ҠĠҠӠ}3! A!"A3 A6Ӡ6t (}$0@@@>0@}@@P@@b@@8tAR@63B:,!37@<@,4IB@ 6k}-@@(+-@@/(A-@@E(k( 6 A4B}@6$$7@<@,4NBC6447@<@,4Y)4OK)4OKAYB@ 6 B@6? (}-@ }@5(***** ˠ *****?(6UU(MPAK JANA is a dancer. You can make upa dance for PAK JANA by moving} his6bX(Plegs , arms , head , and body todifferent positions , one at a time.b BY6WW(O}You can choos}e 4 different positionsfor each leg. To move PAK JANA's6UU(Mright leg to position 2, for example,just type ̲} . To move his left leg6M"(to position 4, type ̴.M(&Each arm has 9 different positions.7UU(MTyping or }, for instance, movesPAK JANA's right arm to position 7 73)(!or his left arm to position 1.3 BY7WW(O}You} can choose 9 different headpositions or face expressions.7UU(MFor example , if you type Ŵ ,PAKJANA}'s face will turn to the right.(7PP(HNumbers 1 to 4 turn his head; 5 to 7 control his mouth;27WW(O } 8 and 9 change his eyes. To move his whole body up, down,<7:0((right, or left, type , , , .}: BYF7[[(S}To make PAK JANA pause in his dance,type ( for WAIT ) ,followed by aP7UU(Mnumber ( 1 to }50 ). For instance, will cause PAK JANA to waitZ7,"(12 tenths of a second., BY_733(+}To make } PAK JANA repeat a series ofd7UU(Msteps, type (for REPEAT), followedby two numbers separated by commas.n7UU(MFo}r example, ű will make PAK JANAgo back to step 15 and repeat allx7/%(steps after that 4 times./ BY7}@@(8}PAK JANA will remember every commandyou give him.7>>(6To see him do the whole dance, type or .}7I?(7For a list of all the steps , type or .I BY7]](U}To get rid of a step , type (for}DELETE), followed by the step number.7;1()That is , IJ would delete step 28.; BY7XX(P}Your dance can }have up to 99 steps.To erase the whole dance and start7j%(another one, type or .j(@If you need help }remembering thecommands, type or .7G=(5To see the instructions again , type or .G BY7aW(O}}When you are all finished playing withPak Jana, type or .a BY7SS(K}Look at the following} summary of all the commands.7<2(*Then begin to make PAK JANA dance!< BY7 B0>-}@"&>(((ϠŬӠ0>AdAU:>$)@$AUBY D>AdA}U$e B0`mS +'0@@@A0@@@SAR@jm_ (}-@}@ <(Please wait about 45 seconds_( while PAK JANA puts ontm%%( his dance costume...~m$Hq!!}ҠΠMq BRq-A#\q%F:BsD%, fq*""A '&@AU}*$pq-@zq"%$@% q B0qҠq81,0,0,0,7,8,16,16,1}6q69,0,0,0,224,16,8,8,8q80,2,4,8,16,31,1,1,1q90,16,16,16,8,7,0,0,0q67,8,8,8,16,224,0,0,0q73,1,2,4,8,}15,0,0,0q65,0,0,0,15,0,0,0,0q68,0,0,0,240,0,0,0,0q79,128,64,32,16,240,0,0,0r70,1,2,4,8,16,32,64,128r}71,128,64,32,16,8,4,2,1r""83,129,66,36,24,24,36,66,129$r96,0,0,0,8,28,62,28,8.r((86,128,128,128,128,128,128,128,128}8r66,1,1,1,1,1,1,1,1Br78,0,0,0,0,0,0,0,255Lr77,255,0,0,0,0,0,0,0Vr&&84,60,126,255,255,255,255,126,60`r 999} D:PAKJANAPGHBLRLRINSLFRTCRACLACRLCLLAFICLMEKINPMPP1ILRLLPLHLRLLNMODMS0mmCCHCROBJKOMMANDARGARGENOUGHDELETEATTRIBTYPEATTRIBSECTORBOX1BOX2BOX1N2NOBOXELIM1ELIM2USEDOBJS }GATTRIBINDXFINISEECPCPBLUYELLOGREEREOBJBKGRNLTRBKGRNSCRBKGRNBOOBJCOLOERFIRSTPOLASTPOOBJSIZOBJCOLOU }OBJSHAPPOBOX1NBOXBOXNOBOOBJCHALIMLIMELIMELIMARGNUSUAACMDENUFENUFGHUSDOBJATBTYPATBATBOBJBGSCRBGOBJCL }OBJSIOBJSHOBJCHSCTRFPOLPOKMDFULAGID@@@  }@ @ @ @ @@@@@@@ } !"#$%&'(})*+,-./012345678}9:;<=>?@@@A@B@C@DEFGH}IJK@LMNOPQR99--ABOXES**BILL FINZER/GREG BEDDOW*}*CML,SFSU**1982--SOFTSWAP (415)363-5472""333 MAIN STREET,REDWOOD CITYEEPROGRAM MAY BE COPIED BUT NOT SOLD. CO}PYRIGHT (C)1982 CUE,INCd--TITLE,DIM--n##@@K:x|+@%@'-@C(@} ATTRIBUTEN(@h(@ BOXESr A| B'`--MAIN--S A A ! A +} A5 A@? AS"@A==INSTRUC;INIT VARS;DRAW BOARD;CHOOSE ATTRIBS;PLAY;REPLAY +}%D:MENUX--INIT VARS--bhh;@,;@ ,;@,;@,;@,;@0,;@,9@,}9@,g9@,9@,9@,9@<@,9@<@,9@<@,9@,9@}<@ ,9@<@ ,i999@<@,9@,;@U,9@,jfA6.7SMALLLARGEBLUEGREENREDYELLOWCI}RCLEDIAMONDSQUARETRIANGLEU-@Y"b68,-f k$$1,6,11,15,20,23,29,35,42,48,56ll@@'@}@@<68@,-Q68@,-]6-l6.>:AU,qU-@+-@}<68<,-M68<,-Q U vk-@+-@<68<,-@ D X-@}g68,-k {-@+-@ <68<,-M68<,-Q U j68@,-}68@,-D-@+-@<68<,-@ D f6-6-'6-}36-?6-K6-W6-c6-f$--INIT GRAPHICS--U +@6-%6-}16-=6-@G BUPOSITIONRELk0@@70@@@Q0@@}@k0@@@B6-6-@'6-@36-@96-?6-B$ --CHOOSE ATTRIBS-- }%Y.68@,-P:H:@,$@%@,Y68@,-P:H:@,$@%@,*]]+8@,"@)8@,!}"@,*+8@,"@)8@,"@,A4M-@@&8,"@C68,-P:H:@,%@,"}M A09((68,-P:H:@,$@%@,> C##8@,"8@,A z$--INSTRUC.-- A#}R (}-@@ 9(Do you want instructionsC B R4A<<7@<@,4Y)7@<$}@,4OKA%$$7@<@,4NA% AuAR@W(=}This is a game using blocks %}and boxes. The blocks come in:u( 2 sizes: mall, arge;gg(_ 4 colors: lue, reen, ed, ellow;  4 shapes: ir&}cle, iamond, quare,  riangle.VV(NOne of the blocks, for instance, is a LYD or arge ellow iamond. Another'};1()block is a SGC or mall reen ircle.; B' \\(T}There are two boxes. Each has a certainattribute, t(}hat is, each box will hold4*("only a certain kind of block.4 B'68@,-@-68@,-@B)}68@,-@W68@,-@c6-@o6-@y A AR@y-(% For example, here are th*}e two boxes.7 B'`W( Box 1 is for mall blocks,a B'`m6-@y6-@y6-@ AU7( Box 2 +}is for ed blocks.A B'`M6-@Y6-@e6-@o AUy B'"_U(M} Try to figure out where th,}e LRD (arge ed iamond) would go._ B''- 6.LRD6-@# A@%- B'`)_U(M}Since this block -}is red but not small, it goes in Box 2 but not in Box 1._ B',L.(&} The SBD goes in Box 1 but not Box 2,8 B'`.}B6.SBDL A@%1H*(" the SRS goes into boxes,4 B'`>6.SRSH A@%6U-(% and the LYC goes /} both boxes.7 B'`A6.LYCK A@%U B';n AAR@n(JAt the beginning of each game, I 0}will pick an attribute for each box@TT(Lbut I won't tell you what they are. I might pick CIRCLE for Box 1, forEg1}-(%example, and NOT BLUE for Box 2.7 B'g(+}Your goal is to discover the attributeJTT(Lof each box. To 2}do this, you gather clues by choosing different blocks,O\R(Jone at a time. I will place each blockyou choose in its 3}proper box.\ B'TW6. }6.% ARM(! Ready? Here we go....W B'Y$D +4}'0@@@A0@@@D$--DRAW BOARD--w A6-@)6-@3 5}B?6-K6-@dU Ba6-@m6-w BI6-6-6@d& B36-6@6}?6-I B[6-@6-@"!-%/ B;6-@G6-Q B[ B[6-@7}6-% B/ B;6-@G6-Q B[ Bi6-@d6-@d%-16-8}=6-G BS6-_6-@di Bk6-@6-% B16->6-6@dH 9}BU6-6@a6-k B[6-@f6-@!-%/ B;6-@G6-Q B[:} B^6-@6-% B/ B;6-@G6-Q B[ B^$ --S CIR--& B;}6-@%6-@/ B;6-@G6-Q B^6-6@k6-6@u B6-@6<}- B0 6-6@6-6@' B36-@?6-I BV6-6@c6-6@m B=}y6-@6- B: 6-6@6-6@' B36-@?6-I BV6-6@c6>}-6@m By6-@6- Bv *6-6@6-6@' B*$ --L CIR-- B?}6-@%6-@/ B;6-@G6-Q B^6-6@k6-6@u B6-@6-@} B 6-6@6-6@' B36-@ ?6-I BV6-6@ c6-6@m By6A}-@ 6- B 6-6@6-6@' B36-@?6-I BV6-6@c6-6@B}m By6-@6- B 6-6@6-6@' B36-@?6-I BV6C}-6@c6-6@m By6-@ 6- B 6-6@ 6-6@' B36-@ ?6-D}I BV6-6@c6-6@m By6-@6- B p6-6@6-6@' B3E}6-@?6-I BV6-6@c6-6@m Bp$ --S DIAM-- u B6-@%6-@ F}/ B<6-6@I6-6@S B_6-@k6-u B 6-6@6-6@' B36-@G}?6-I BV6-6@c6-6@m By6-@6- B 6-6@6-6@H}' B36-@?6-I BV6-6@c6-6@m By6-@6- B> N6-6I}@6-6@' B46-6@A6-6@K BN$H --L DIAM--R B6-@%6-@/ J}B;6-@G6-Q B^6-6@k6-6@u B6-@6- B\ 6-6@K}6-6@' B36-@?6-I BV6-6@c6-6@m By6-@6- BL}f 6-6@6-6@' B36-@ ?6-I BV6-6@c6-6@m By6-@M}6- Bp 6-6@6-6@' B36-@ ?6-I BV6-6@c6-6@m BN}y6-@6- Bz 6-6@6-6@' B36-@?6-I BV6-6@O}c6-6@m By6-@6- B p6-6@6-6@' B36-@?6-I BP}V6-6@c6-6@m Bp$ --S SQR-- Q B6-@%6-@/ B;6-@G6-Q}Q B -@@#6-06-6@: BG6-6@S6-] Bi6-v6-R}6@ B6-@6- B  p6-6-6@& B36-6@?6-I S}BV6-6@c6-6@m Bp$--L SQR--Q B6-@%6-@/ B;6-@G6-T}Q B$-@@#6-06-6@: BG6-6@S6-] Bi6-v6U}-6@ B6-@6- Bjt 6- 6-6@* B76-6@C6-M V}BZ6-6@g6-6@q Bt$t--S TRI--~Q B6-@%6-@/ B;6-G6-W}Q B]-@6-6+6-6@5 BC6-%@O6-Y B] *6-6@X}6-6@' B*$--L TRI-- B6-@%6-@/ B;6-G6-Q BeY}-@@l6-6y6-6@ B2J 6-6- B# 06-6@=6-6@G BJ$<Z}--ERASE OBJ--AK6-6-@) B56-@A6-K BP-@@#6-[}06-6@: BG6-6@S6-] Bi6-v6-6@ B6-@6- B\}- 6-6@ 6-* B-$--PLAY--%6-6-% A.AR B]} .4A@!6-8@,!6-8@,&6.7<,4S)4L& AA@+4S)4L,*+(," AI^}, AC6 AP@ A@` A@` 4P AQ A@`. 4H6.}6.$ AR. A@`_} 4A AS A@`0QA@ AV  $ A@#6-@ B# A@`}--PARSE OBJ--=6-&@)6-@3 B= AAC6.7<,%6.7@<@,-4S96-a}@C AA06-@"e6.7@<@,&6-:-@@K78,<8,,4Y6-&@e6-b}@' 6/"6-@% B/ AA@e6.7@<@,&6-:-@@ K7c}8,<8,,4Y6-&@e6-@ E T/"6-@% B/ AA^5(6-8&@<+$,%+&@d},%,5(AAb[0(The  has [(&already been used. c//(&e} d\6-@6-P:,*6-+&,$A0-D-@AH R A9\ ACf}g$--SHOW OBJ--/ AD"@%6-/ AC4468&@<+$,%+&@,%,-%+'A,g}''ACACAC AC% 6- AC0 6- AC0 6- AC0 6-''AC5ACEq}Rb'DOS SYSb*+DUP SYSbUAUTORUN SYSbWMENU biPAKJANA bABOXES baFRACTION b-QCINQUAIN ACUACe#"@ A1# AC A2 AC#"@ A3# AC A4 r}AC#"@ A5# AC A6 AC #"@ A7# AC A8&$0s}--CHOOSE OBJ LOCATION--b/8@,*8@,% AE/ ADg$8@, AF$ ADl$8@, t}AG$ ADq AH$--BOX 1&2--#"@ AHP# AEJ6-P:H:@,$@,76-P:Hu}:@,$@,@8<,J AER6-@f%+$@,36-@'%+$@,A6-%@R68<,-@$v}--BOX 1--#"@  AHP# AFJ6-P:H:@,$@,76-P:H:@,$@,@8<,J AFw} R6-@%+@$,36-@9%+@$,A6-%@R68<,-@R$\--BOX 2--a#"@  AHPx}# AFfJ6-P:H:@,$@,76-P:H:@,$@,@8<,J AGpR6-A%+@$,36-@&y}%+@$,A6-%@R68<,-@$--OUTSIDE BOXES--#"@ AHP# AH0P6-P:H:@z},$@,76-P:H:@,$@,P8$@%,AHd%6-@%+@$,%$@=6-@%+$@f,K{}6-%@d68$@%,-@$`6-@7( } Sorry, no room to draw the `($ on the screen. Gues|}s an attribute4'( or choose another object.1 B'4$$--UPDATE POSSIBILITIES--3J AIe!-@@}}=AI AI%AI0JCHOOSE BOX836-&@6-)6-@3 AI5=36-%@6-@~})6-@3 AI5B)6-%@6-@)6-@ G -LG "#688@,<,-@=688@,<},-@G AIPQM(68O:8@,&@,<,-@M68O:8@,&@,<,-@V  $e--CHOOSE} BOX--l&-@@&68,-nY28,AIvAIAIAIAIYSIZE,COLOR,NOT COLOR,SHAPE,N}OT SHAPEp "8,68,-@r AIt "8,68,-@v AIx 8,68,-@z AI}| "8,68,-@~ AI 8,68,-@   $--ENOUGH INFO?--  $8@},AP@L6-#-@7-@ D6-%8<,H L  @AP@R38}<,%8<@,"@H68@,-@R AP@$!@$68@,-@$6-$8@},APu@-@+-@ 86-%8<,< @  @APuR38<,}%8<@,"@H68@,-@R APu$!@$68@,-@+!8@,*8@,*(*}(+ AP58@,*(6-@+6-@5 AP58@,*(6-@+6-@5 AP }APY-(%} You now have enough information toY('guess the attributes of Boxes 1 and 2.%6-@6-@% }APX+(#} You now have enough informationX(! to guess the attribute of Box . B'$--POS}SIBILITIES--3%(} POSSIBLE ATTRIBUTES3(BOX 1 : C" ( All Possible9(BOX 2 : All PossibleC A}Q8@,AQ;8@,1(One left - can you guess it?; AQP!(8<,!(s,!}(8<@,!(L, E-@@ '(8<,;(78,<8,,,E AQ@+(8@<,+(N}78,<8,,, ( &(BOX 2 : &8@,AQU!;8@,1(One left - can you guess it?; AQ}#!(8<,!(s,(!(8<@,!(L,2E-@@ '(8<,;(78,<8,,},E AQ7+(8@<,+(N78,<8,,,< ( O B'$P--HELP--UYY('To choose a bloc}k, type three initials.!Example: LRS for arge ed quareZ>4(' SGT for mall reen riangle > B'}_E(1.Size: mall,argeE(2.Color: lue, reen,ed,ellowd>4('3.Shape: ircle,iamond,quare,riangle> }B'il_(' To guess the ttribute of a box, % type A , then answer the questions.b(l B'nk^(' } To see all ossible attributes $ remaining for each box, type P .a(k B'sUU(' To uit this r}ound, type Q .  To get elp, type H .x?2($ After each command, press .< B'?$}--GUESS ATTRIB--(} ATTRIBUTE==+8@,8@,,)+8@,8@,,AS^T(LThere'}s not enough information. Gather more clues and figure it out!^ AST(( Which box)6-;AR}E B T4AS> 6.78@,<8@,,(4146-@> AS0! 426-@! }AS06-@ ASfa 8,.(} You've already guessedW( the attribute of Box .a AS}(8,ASQ( Attribute&6-8ARB B Q4AS<6-078}@,<8@,,4NOT<6-@6-@ ASG6-@58%@,&8,!@+6-@}5 ASf6.78,<8%@,,--")+0SMALL*0LARGE,ASUS+(#} Find a simpler way of writin}gI( NOT S ASO6-@#-@@O(+478&@,<8,&@,,ASbM1}6-P:@#P:+%@,'@,%>,= @C6-M ASa006-%@&@$P:+%@,'@,}6-@6- ?2(& I don't understand. Please try again.5(? AS@6-!%"8,*"8,}068,-@@CORRECT GUESS(8,AS9"(} Good thinking!+( /9(NOT 9%( is Box }'s attribute./ AU9 AS e-(%} There's not enough information to[(" determine the attribute of Box }.e AS  (}(NOT  G'( is impossible for Box .G( Do you see why?'8@},*8@,'6-@ B'$|--SHOW ATTRIB--J#6-+&@,$@`%@FD6-+&@,$6@%}@"J-7  B!6-@-6-7 B"@6-@AU%AU@AUe}!BB! AU1'BBBB1 AU''BBBB }$--QUIT--AR](} QUITD(! Do you want to quit this roundN B ]4}AV<<7@<@,4Y)7@<@,4OKAV0$$7@<@,4NAV AVA (}}-@@A( Box  's attribute was )8,"@)8,"@)(NOT -8,"@#6-8,&}@- AVp-8, @#6-8,%@- AVp6-8,%@&*&(78,<8%@,&@,.* 0}6-@( B':$D--ERASE LTR--N6-6-@) B56-@A6-K B}_-@@k6-x6-6@ BX6-6@6-& B26-?6-6@I B}U6-@a6-k Bo {6-6-6@ B)6-6@6-& B)$@-}-PRINT MENU--JX.(&}SIZE : , X(%COLOR : ,,, ^X-(%SHAPE : ,,, } X(%MENU : ,,, r7AR7(WHICHwBB}(++8@,*(8@,,)+8@,*(8@,,,A|h((Type A if youD(!want to guess} anh(attribute.)}( $(#--REPLAY--2#P (}"8@,*8@,M(&Good }work! You figured them both out!P(<#>%( Do you want to play again/ B >4AF#J47@<@,4}Y)7@<@,4OK@6-@J APP#$$7@<@,0NAZ#$t'88-- 10100-11400 DRAW S,L,B,G,R,}Y,C,D,T,O,X,1,2,N --~'6-@6-@% B16-@=6-G BT6-6@a6-6@k B}w6-@6- B'6-6@6-6@' B36-@?6-I BV6-6@c6}-6@m By6-@6- B'6-6@6-6@' B36-@?6-I B}V6-6@c6-6@m By6-@6- B'*6-6@6-6@' B*$'6-@}6-@% B16->6-6@H BT6-@`6-j Bv6-6-@ B}'o6-6-6@& B26-@>6-H BU6-6@b6-6@l Bo$<(6-@}6-@% B16-@=6-G BT6-6@a6-6@k Bw6-@6- }BZ(6-6@6-6@' B36-@?6-I BU6-b6-6@l Bx6-@}6- Bd(6-6@6-6@' B36-@?6-I BV6-6@c6-6@m }By6-@6- B(p6-6@6-@& B26-?6-6@I BV6-6@}c6-6@m Bp$(6-@6-@% B26-6@>6-H BT6-`6-@}j Bw6-6@6- B(6-6@6-6@' B36-@6-6@J BV6-@}b6-@l Bx6-6-6@ B(G6-@6-% B16-=6-@G} B(o6-6@6-& B26-@>6-H BU6-6@b6-6@l Bo$)6}-@6-@% B16-@=6-G BT6-6@a6-6@k Bw6-@6-} B)6-6@6-6@' B36-@?6-I BV6-6@c6-6@m By6-}@6-6@ B")6-6@6-& B26->6-@H BU6-6@a6-@}k Bw6-6-6@ B,)6-@6-% B16-=6-@G BS6-}`6-6@j Bv6-@6- B^)*6-6@6-6@' B*$h)6-@6-@}% B16-@=6-G BS6-`6-6@j Bv6-@6- B)6}-6-6@& B26-@>6-H BT6-`6-@j Bv6-@6-} B)6-6-@% B16-@=6-G BT6-6@a6-6@k Bw6-}6-6@ B)6-6@6-& B26->6-@H BU6-6@a6-k }Bw6-6-6@ B)*6-6@6-6@' B*$)6-@6-@% B26}-6@>6-H BT6-@a6-6@k Bx6-6@6- B)6-6@6-6@}' B36-@?6-I BU6-b6-6@l By6-6@6- B&**6}-6@6-6@' B*$0*6-@6-@% B16-@=6-G BT6-6@a6-}6@k Bw6-@6- BN*6-6@6-6@' B36-@?6-I B}V6-6@c6-6@m By6-@6- BX*6-6@6-6@' B36-@?6}-I BV6-6@c6-6@m By6-@6- B*p6-6@6-@& B}26-?6-6@I BV6-6@c6-6@m Bp$*6-@6-@% B16-@}=6-G BT6-6@`6-j Bv6-6-6@ B*n6-@6-% B}16-=6-@G BT6-6@a6-6@k Bn$*6-@6-@% B16-}>6-6@H BT6-@`6-j Bv6-6-@ B +6-@6-@% B}16-@=6-G BS6-@`6-6@j Bv6-6-6@ B+6-@6}-% B16-=6-@G BT6-6@a6-6@k Bx6-6@6- B}R+*6-6@6-6@' B*$\+6-@6-@% B16-@=6-@G BS6-@}_6-i Bv6-6@6-6@ Bp+6-@6-% B26-6@>6-@H B}T6-@`6-j Bv6-@6-6@ B+*6-6@6-6@' B*$+6-@}6-@% B16-@=6-@G BS6-@_6-i Bv6-6@6-6@ }B+6-@6-% B16->6-6@H BT6-@`6-j Bv6-}6-@ B,p6-@6-6@& B36-6@?6-I BV6-6@c6-6@m B}p$$,6-@6-@% B16->6-6@H BT6-@`6-j Bv6-}6-@ B8,l6-@6-% B16->6-6@H BU6-6@b6-6@l }BB,6-@6-% B16-@=6-@G BT6-6@a6-6@k Bw6-@}6- B~,*6-6@6-6@' B*$,%6-@6-@% B,-@@}#6-/6-9 BE6-R6-6@\ Bh6-@t6-~ B6-6-@} B,6-@6-% B) 66-6@ B6-L BX6-@e6-6@o B{6}-6-6@ B,M6-6@6-@& B36-6@@6-6@J BM$P---OBJ BKGR}ND--U-BZ-6-@6-@) B66-6@B6-L B`-@@l6-}y6-6@ B-o6-@6-% B16->6-6@H BU6-6@a6-}k Bo -  $---SMALL s---6-@6-@% B16-@=6-G BT6-6@}a6-6@k Bw6-@6- B-6-6-6@& B26-@>6-H B}U6-6@b6-6@l Bx6-@6- B.p6-6@6-6@' B36-@}?6-I BV6-6@c6-6@m Bp$ N--PLOTREL--*N 6-%6-&zN , $N--DRAWREL--}N 6-%6-&/$N--POSITIONREL--BO 6-%6-&-$0u--ERRHNDLR--:u..(&I don}'t understand. DuZ.(&Please try again or Z(&type H for help. u-@A}P $}--GETARG-- }f6-@6-@'6-9AR=OAR@W(f4B} }.67B:,%@,..6.7@<@,}4B }0 B P#}46-%@6-%@*6.7}<,4 B 02}4 )4B p7}&6-%@6.7<,& B PF}<6-%@!@' B1 B <}ERRHNDLRK}E68@$&@,-568@$,-&@;6-E B %_}$--GET RETURN--''( To go }on, press .6AdAU")@6AUB' $-@A $D:ABOXES}<//BMLBLWRESIGLHLHHHILEFRIGHLIMILOWERGUESUPPERGUESLWHOLNULDERWHORNURDENNUDEWHOSDE}RLINELEINLANCHORATICBACLIGFLALLLDA} } !"#$%&'(})*+,-./012--- GUESS MY FRACTION--- ORI}GINAL VERSION BY--- BILL FINZER --- ADAPTED BY GREG BEDDOW!!--- CENTER FOR MATHEMATICAL--- LITERAC}Y--- SAN FRANCISCO STATE--- UNIVERSITY --- DECEMBER 1981   $$______________________________} $$| |$$| SAN MATEO COUNTY |$$| OFFICE OF EDUCATION |$$| } & |$$| COMPUTER-USING EDUCATORS |$$| |$$| SOFTSWAP }|$$| |$$|333 MAIN STREET,REDWOOD CITY|$$| CA 94063 (415)363-5472 |$$|_________}___________________|$$______________________________$$| |$$| PROGRAM MAY B}E COPIED FOR |$$| EDUCATIONAL USE ONLY AND |$$| MAY NOT BE SOLD. COPYRIGHT |$$| (C) 1982 CUE,INC | }$$|____________________________|!"2d ATITLE##@@K:<<;@,};@,;@P,;@,;@P,//6.%  A@INSTRUCTIONS= (}}#0@@@=0@@@9AR@'@@9@@9 AP}CHOOSE HID FRAC APLAY"@ A$ AEND----TITLE----4+@%@'}AR@4CURSOR OFFr-@@( @GUESS:-@@J @MY\-@@r @}FRACTION-@A '+@%@'AR@+-@@+ @FROM THE}--@@- @ CENTER FOR/-@@ / @ MATHEMATICAL+-@@+ @}LITERACY(-@@( @(CML)0-@@0 @ SAN FRANCISCO3-@@3 @}STATE UNIVERSITY-@A $----INSTRUCTIONS----C +AR@1@}@C@@870@@@70@@@K/(&} Do you want the instruction}sAARK A$$7@<@,4NA3#7@<@,0Y*0OK&()(3 ARXX(P}}In Ӡ٠ I will choose ahidden fraction. This could be aUU(Mproper fraction ( such as 3/5 ), a}nimproper fraction ( such as 9/4 ) or aTT(Lwhole number ( such as 2 , which isequivalent to the fraction 2/1 ). }U(U(JYour task is to guess my fractionin as few tries as possible.*(*( To go on, press  } AYY(Q}Before I choose my hidden fraction,you set a limit on the size of the UU(Mdenominator.  }The denominator must notbe smaller than 3 or larger than 20.UU(MThis restricts the number of possiblefractions; oth }erwise, you could guess(for a long, long time.*(*( To go on, press  A#WW(O}When th }e game begins, I will draw anumber line; my hidden fraction lies(UU(Msomewhere on this line. You will guessdifferen}t fractions, one at a time,-UU(Muntil you find my fraction. For eachguess, I will tell you whether your2UU(Mfr}action is too small or too large.I will also reduce the size of the7''(number line to show your guess.<)()(} To go on, press A AFZZ(R}Use the diagonal slash / for afraction bar. Your guess ma}y be anKUU(Mordinary fraction (such as 5/8 or 7/3)or a whole number ( such as 1 ) or aPRR(Jmixed number (such as 2 }3/4 , which isequivalent to the fraction 11/4 ).U*(*( To go on, press Z A_\\(T}If yo}u become frustrated and want toQUIT during the game, type insteadd(of your guess.i,(,(! To go on,} press n Ax---LIMIT---zQQ(I}What maximum value do you want for thedenominator ( 3 to 20 )?}} ( (;AR(1( Limit ; A A26-A:, B((!@* @!*}"P:,AE9(/(# ŠҠΠĠ9 A4(((( ŠΠ-AR}@)-@A- )(((() A$ ---CHOOSE HIDDEN NUMBER---46-P:H:@},$%@,4HIDDEN DENOMINATOR:%6-P:H:@,$@%@,:LIM IN NUMBER LINE,6-P:H:@,$$,,HI}DDEN NUMERATOR6-P:',HIDDEN WHOLE 6-'HIDDEN FRACTION''"P:,*H:@, ?Ap --6.#}]6-@6-@5'6-@36-@?6-@ K6-Q6-]6-}]6-6-'6--6-96-E6-Q6-]6-6$@----PLAY THE GAME----}J6-T A"DRAW BOARD^ A$GET GUESSh*O:&, > Ae*THAT'S ITr!}$|   A2 ! A4 A0----FINISH----"  } "CLEAR PAGE"(}0 (=:, $$(=:,/=:, 5 is my fraction!0  That took you 5 &#}  guess!@# es( .+P-@@4 Do you want to play againFARP A09# }7@<@,4Y)4OK/6-@9 A`:27@<@,4N(6-@2 A`? (} A5D!}$----B$ TO FRACTION----W6-6-@'6-36-?6-K6-W6- A"}SPACES ERROR-@B:,6.7<,6@:, @F)@:,!@W'0 36-@6$ 4 6-#} 4/6- 4.6-@$  +!@+6-A:7@<&@,,"@*""6-A:$}, -!@-6-A:7%@<&@,,%%*"B:,"6-@%$*C!@(6-A:7%@  6-6-6-H !6-6-6-$'}----DRAW BOARD----%% } Ӡ٠-@@  A&HATCH MARKS 6-6-(}6- A(LEFT FRACTION 6-6-6- A)RIGHT FRACTION6-@56-&6-$` )}----GET GUESS----e 6-%@6-%@j ) ! A`)ERASE RESPONSE AREAo -t 5 Guess #  )*}AR5CURSOR ON~ +6-@ A+GET NON-EMPTY $ 6- "AR@"CURSOR OFF  +}4Q AP$  A B$ TO FRACTION !  E"@1 ҠԠԠŠ; Ar,}E A$ K"@7 "ŠΠӬԠA ArK A$ H"@)"@4 ԧӠԠ-}> ArH A$ F"@2 ȠϠǠƠŠ< ArF A$ H"@4 .}Ϡ̠ƠŠ> ArH A$ J"@, ҠĠϠ6 A%`@ ArJ A$ /}C"@/ էŠ٠Ġ9 ArC A$ 6-P:++&,',$@5, !! 0} $  @6- A%u $6-P:'@,$6-&@$  6.=:, >:@:,%A(,  6.=:, >:@:,1}%A(, $( ----HATCH MARKS----2 -@@ < 8-%@@ 2-%@@8 F 2}$ ----LEFT FRACTION---- F-@@+-@%@B 7@<%@,F  !!"*3}A(E +-@ =:,+"A( -  =:,&-%@@-  !@ )!@  4} -%@@ =:, A( 9-%@@  =:,2-%@@9 " !@ )!@ 5} ' -%@@ =:,J $T ----RIGHT FRACTION----^ H-@@--%@%@D 7@6}<@6&,H c "A)Eh 3-%@@ =:,3"A)m -  =:,&-%@7}@- r !@ )!@  w -%@@ =:,| A) 9-%@@  =:,2-%@8}@9  !@ )!@   -%@@ =:, $ ----HIDDEN FRACTION---- 6-P:9}++&,',$@5, 6-&+$, "A0B 3-%@@ =:,3"A0 -  =:,:}&-%@@-  !@ )!@   -%@@ =:, A0 4"#-%@;}@* =:,4 A0 9-%@@ =:,2-%@@9  !@ )!@   -%<}@@ =:, -%@@ * $ ----G}@,  A& A( $H ----G>HID----M -@$  Too largeR ! 6-"@5!6-@4\ 6-?}&%@ 6-f 1 @ A@# A4`1EXPAND LINEp .-%@@. 7@<@5&,z  @}A& A) $----EXPAND LINE-----@@d-@@= #䬠A}ɧd(" -@AP ?-@@* 7@<@6,? 7@<B}@6,6-@6-@5 A"DRAW BOARD$----RESIGN----a-@@= #Sorry you diC}dn't guess my fraction.a  This is my secret fraction: A0HIDDEN FRACTIONJ-@@"1 To go on,D} press ; AJGET  }CLEAR PAGE A5PLAY AGAIN?$p!!----ERASE RESPONSE AREA--E}--z3-@@+-%@/ 3 6-%@ 6-@$d----THAT'S IT----n3-@F}@%-%@) 3 Afx1-@%@'  ԧӠԡ1 Af H-@@ +-G}@@H You guessed my fraction! A0HIDDEN FRACTIONJ-@@"1 To go on, press ;H} AJGET  }CLEAR PAGE AFINISH$----WAIT-----@@% $I} ----WAIT AND ERASE----*-@AP 4 ->4-@&%@ 0-%&@4 H$@J}----GET ----EAR@( JAdAUr)@|@:>:,,AUAP$(#K}----SPACES ERROR-----#' ' Š٠2# Ar<# A$%GET NON-EMPTY STRING!% (? L}&%6-0% 6.:%)@D%B"AU*4*"@$-8 Guess #  B AF%"AU*4M}A0I%"AU$N%+"A&*"! + AX%8"A& ~ 67,..6-&@8 A0N}b%8!@ #-@@* ~. 8 Al% >:,v%6-%@67,.>:,{% (~% A0H&O} ENDM&AR@R&,(,(! O.K. Thanks for playing.\&-@A f& +p&%D:MENUP} D:FRACTIONBLWRESIGLHLHHHILEFRIGHLIMILOWERGUESUPPERGUESLWHOLNULDERWHORNURDENNUDEWHOSDE./NATABSBDGKVTTINQXYCQQ@R} S}CINQUAIN 12/13/1980HELPS MAKE CINQUAIN POEMSATARI 32KDOREAN BART}NES    EEADAPTED FROM APPLE TO ATARI BY BRUCE ERICKSON 7/16/82 $$U}$$| SAN MATEO COUNTY |$$| OFFICE OF EDUCATION |$$| & |$$| CV}OMPUTER-USING EDUCATORS |$$| |$$| SOFTSWAP |$$| W} |$$|333 MAIN STREET,REDWOOD CITY|$$| CA 94063 (415)363-5472 |$$X}$$$$| PROGRAM MAY BE COPIED FOR |$$| EDUCATIONAL USE ONLY AND | $$|Y} MAY NOT BE SOLD. COPYRIGHT |!$$| 1982 CUE,INC |"$$d]];AU,;AUZ},;AU,;AU,;AU,;AU,;AU,;AU,+AR@?6.*** CINQUAIN ***;[}-@&+B:,'@,@? -@A  +6-A A   -@@\}D +-@@6 WHAT IS YOUR NAME:D A0f 42 #GEE, I THOUGHT EVERYONE HAD A NAME.D]}-@@X-@A\ f A @:, @dA$ A`$INTRODUCTION TO GAME A^} TITLE# A#SECOND LINE OF POEM  Ap 3RD LINE OF POEM" , A P 4TH LINE OF POEM6_} @ A0 5TH LINE OF POEMJ Y    ^($-@&+B:,'@,@( h($-@&+B:,'@,@`}( r($-@&+B:,'@,@( |($-@&+B:,'@,@ ( ($-@&+B:,'@,@a}( @-@@@ &WOULD YOU LIKE TO DO ANOTHER CINQUAIN? A "@CAPF+-@@b}< WOULD ANYONE ELSE LIKE TO TRY?F A  A "@CA %D:MENU. +-@@c}.INTRODUCTION  HI, . '' DO YOU KNOW WHAT A CINQUAIN IS? A "@C  Ad} +-@@.. &A CINQUAIN (SIN KWANE') IS A POEM THAT&I, $HAS ONLY 5 LINES. I AM GOING TO HELP/ e}I YOU WRITE A CINQUAIN.06-AP A4 ? AP AD6-AP AN$X- CHOOSIf}NG FIRST LINE] +-@@b&&  WHAT IS YOUR FAVORITE SEASON?l  ------v  SUMMER  AUTUg}MN  WINTER  SPRING AdAUE, $PLEASE TYPE ONE OF THE GIVEN SEASONS/ E AND PRESS RETUh}RN..   * WHICH ONE WOULD YOU LIKE.4SUMMERA..4AUTUMN)4WINTER)4SPRINGA i}u-@@ = #ENTER ONLY ONE OF THE WORDS ABOVE. Q-@APU a6-APk Au Aj} +   6-@ A6-@ AF+ #THE FIRST LINE OF YOUR CINQUAIN IS;. F  k} ''6-A A6-@ A $  SECOND LINE OF CINQUAIN*8. &THE SECOND LINl}E OF YOUR CINQUAIN NEEDS8 TWO 4,, WORDS THAT DESCRIBE . PLEASE>4+ #TYPE A DESCRIPTION USING TWO WORDS.. m}1 4 H A@ =>R& 4-@@& A@U+6-6-@!6.+ A0 V#"n}+# AW +  \$fTHIRD LINE OF CINQUAINp-- %THE THIRD LINE OF YOUR CINQUAIN NEEDSu o}z++ #THREE WORDS THAT DESCRIBE SOMETHING  THAT HAPPENS IN .  .. &TYPE IN A HAPPENING USING p}THREE WORDS.     A@ =>& 4-@@& A +6-6-@!6.+ Aq}0 #"+# A +  $FOURTH LINE OF CINQUAIN9. &THE FOURTH LINE OF YOURr} CINQUAIN NEEDS9 FOUR 6% WORDS THAT DESCRIBE A FEELING( 6 YOU GET  DURING .   ((  TYPE A s}FEELING USING FOUR WORDS.     A@ =>& 4-@@& A+6-6-@t}!6.+ A0 #"+# A ` +  $FIFTH LINE OF POEM;) !THE FIFTH, AND u}LAST, LINE OF YOUR, ;  CINQUAIN 3" NEEDS ONE WORD THAT REFERS% 3 TO .   $ TYPE IN ONE WORD.) v}   . A@ =>8& 4-@@& Ap:+6-6-@!6.+ A0 ;#"w}+# A@= +  B$LSECOND TIMERV 6-`#  %6-%@# A j$t$~x}4-@@#4 PRESS RETURN TO CONTINUE.AdAU F:Ad,"AUARF:Ad,"@y}$ AQL-@(@   --@@ L (Y FOR YES OR N FOR NO)=>AdAU F:Az}d,"AUA 33F:Ad,@C*F:Ad,@5A 6-F:Ad,$ 6- B:,"@{}A0p `B:,!@5$-@@ E PLEASE ENTER A SHORTER LINE.Y-@A] `$ -@|}B:,&@ -@:7<%@,,"@2-6-%@   "&@6-@ $ K-@@ 3  PLE}}ASE ENTER  WORDS.G-@AK  $ D:CINQUAIN@G