L%hh LHH` X% " ӠӠΠǠ ˮԠˠǠӬĠӠ٠٠ϠŮ+JJJJ ,,,L Lک ٥ҥ>ӥ? ( ㆭ  ؆` | A""""""QQQYV <"<Q '(h((QQQ`@GHOHO $"!$q}T@` `@@``p0 8p@@`00 |0@` `pppPox`D3 < p?|@@@|@`f ppn|>0p  qcs6<, 3['Nxxxpp0` ```@vl  ?`@:3q  AcqcCyO@  0p`@@q @p?|`3cC ? ?>|xp`p`@Acwsssssss__????????~^^ ?~~~~~~~?>~||xpp`@~| xyy{~|@`pp xpp`@yyyyyyyx~ ~x`|xpxqa` cqx|||||||cCC?>>>??<<|||~?`ppxx||<||xxpp`|||||||| |?|p`@@@@`p|? OOGgccqpxsssssssppxxx|<<~?>~||xxxxppp```@@@`?~|x|~|||||||p@@p|~><|xp`@>|x|xpx}yyyyyyyAA?~|xpp`ppx|~? ?? 33@``@@glloLL LlOgloloG @`@glolo@@gLLL GaamGGlg`GGlg`G  xL| x@@xMLLxMyyM MyxAxMx|Yq @lllLglllgG LlL`@GLOLo033366m~0>3>33~G<`G}rccb``acccq{{{{8008????~ |lL COoooog CgoooocCFFLLXXPpqa88`}}}}>????~ | ~FCCFL ____|GG|GGccp{{{{ ;1q``qp`aas{{{{8008 0y| |}}}}AAQg((h' $C@0j ed`y < I1@@q q s8EE9EE8> ` `$DC0ANPQN@'h(' WPG((H@stq q8AyEx:NPQ@GhHHG#$p# @ (*Y9AyEy: QQQO~C%%C~_DDD qAAAaq9`ppxxx|xxx|AsGN8088 Ccˆʎõĵ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 iõ`  \ 濭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- ( t Ϡ@跻~!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䵍䵐`"L ŵ8ŵH ~(` d ֠z# u`(RETURN))";::AA$::' A GO BACK TO THE": "DISK AND RESUME THE PROGRAM TITLED"T "EQUIL TIC-TAC-TOE " "HOPE YOU AND YOUR OPPONENT DO WELL !!"4! WOULD IT PAY TO GIVE ANSWERS IN LINES 3000- IN MAIN PROGRAM?"D$(4)"D$;"RUN EQUIL TIC-TAC-TOE"'#(#:"(N CHOICE OF"6q "SEEING WHAT THE COMPUTER THINKS IS"av "THE CORRECT ANSWER,IF YOU HAPPEN TO"{ "BE WRONG.YOU AND YOUR OPPONENT SHOULD" "DECIDE WHETHER OR NOT THIS IS A GOOD" "IDEA FOR YOUR GAME PLAN." 9000: "NOW YOU'RE READY TO0 (= .004 )"= 0 " WILL OFTEN APPEAR AS 4E-3 AND CAN BE"a : " ENTERED THAT WAY AS WELL." D "(3) QUESTIONS IN ANY ONE BOX WILL BE" N " SIMILAR,BUT WITH SLIGHTLY DIFFERENT " X " NUMBERS,OR SIGNS,OR..." l :" AT OUTSET,YOU'LL BE GIVEOT TRY IT NOW!" 9000B "VERY NICE!! NOW LET'S GET GOING!!"N 9000:f  "A FEW MORE NOTES"  "(1) X WILL ALWAYS PLAY FIRST,SO IF"  " PLAYING SEVERAL GAMES,REVERSE ROLES." ! " -3" & "(2)A NUMBER SUCH AS 4*1 ACID/BASE CONSTANTS KA"2 :"RIGHT COLUMN";:U "ON KSP SOLUBILITY PRODUCTS" " FROM TIME TO TIME,WE'LL WANT YOU" "TO CLEAR SCREEN.OUR PROMPT WILL BE THIS:" :"((RETURN))";: "JUST HIT RETURN KEY TO GO ON." " IN FACT WHY NOP ROW ";:/ y"EASY QUESTIONS,SIMPLE MATH"F |:"MIDDLE ROW";:k ~"MEDIUM DIFFICULTY, SO-SO MATH" :"BOTTOM ROW";:: "HARDER,CALCULATORS USEFUL" :"LEFT COLUMN ";: "QUESTIONS ON KW,(1E-14)" :"MIDDLE COLUMN";: "ONONLY IF YOU CAN"? ^"CORRECTLY ANSWER THE QUESTION.IF YOU'RE"h c"WRONG,YOUR OPPONENT ";::"MAY";: f" CHOOSE SAME ONE" h"AND GET A SIMILAR QUESTION. OR HE/SHE" m"MAY OPT FOR A DIFFERENT SQUARE." r" HERE'S STRUCTURE OF GRID" w:"T.@:" EQUILIBRIUM TIC-TAC-TOE":]E" IN THIS GAME YOU AND AN OPPONENT WILL"J"PLAY TIC-TAC-TOE..BUT WITH A DIFFERENCE"O"FOR ONE,IN THE SQUARE YOU CHOOSE IS A "T"QUESTION ABOUT EQUILIBRIUM SYSTEMS.YOU" Y"CLAIM THE SQUARE   1380:#Z1,25:0,5MY45:800:Cd23:10:SC;:28:PT;" ":800:kd23:10:SC;:28:PT;" ":MPLAY AGAIN? ";A$ 832,01(A$,1)"Y"1320s:13:"OK.. .":"SEE YOU LATER!":X11500:X::~(:" "2D$(4)<D$"RUN THE MOLE GAME--PART II"F783,250:769,1:771,250:768:PI14:J15:0,IJ15:1,20:800:J:I:D WORK":12809"GOOD CHEMIST...CONGRATULATIONS":1280|"AMAZING CHEMIST...YOU HAVE FOUND YOUR":" CALLING!":1280"OUTSTANDING, TOP 1%, GRAND WIZARD,":" CHEMIST...TEACH THE CLASS!!!":"THANK YOU FOR PLAYING"::"WOULD YOU LIKE TO 0'"TRULY AMAZING CATCH, AND":1190@CHEMIST(PSSBL5)1O" -A ";zCHEMIST1220,1230,1240,1250,1260,1270"BEGINNING CHEMIST....KEEP WORKING":1280"BETTER THAN AVERAGE CHEMIST...WORK HARD":1280 "UP AND COMING CHEMIST...GOOCNT.5)20)1)1V"THAT MAKES YOU:":" --A ";Y`CTCH1130,1140,1150,1160,1170,1180zj"TERRIBLE CATCH, AND":1190t"PRETTY SAD CATCHER, AND":1190~"BUTTERFINGERS, AND":1190"REAL DECENT CATCH, AND":1190"GREAT CATCH, AND":119----- END OF GAME8------------------------KTM11000:TMbPSSBLE((832)4)z$PCENT100SCPSSBLE.::58"YOU HAVE CAUGHT ";(PCENT.5);"% OF THE METEORS":B"THERE WERE ";PSSBLE;" METEORS TO CATCH"::LCTCH(((PUP TO YOU TO CATCH IT."c:"YOU HAVE A BASKET AND YOU ARE CATCHING":"METEORS....VERY SIMPLE":"USE THE ARROWS AND KEY TO MOVE":"THE BASKET."::"I'LL KEEP SCORE.":"GOOD LUCK!"23:15:"HIT ";:T$:-------------------XOLD1:38,39XOLD1:XOLD,39$z3J38,39XNW1:38,39XNW1:XNW,39WXOLDXNW`450f--------------------- INSTRUCTIONS---------------------:5"THE SKY IS FALLING!":"THE SKY IS FALLING!"::".....AND IT IS 830 -----------------------2  MOVE LEFTO -----------------------_ XOLD1450g *S0{ 4XNWXOLD1:830 >----------------------- H DRAW BASKET R----------------------- \ OPENING OF BASKET IS XNW,38 f0p38,39bMXXOLDMY38660" l0:MX,MY. vMYMY1= 15:MX,MYF 400Y -----HIT-----j SCSC1:HT1v PTPT1 1360 450 -----------------------  MOVE RIGHT ----------------------- XOLD38450 S0 XNWXOLD1:ING METEORS' ----------------------7 PT01020E HT0600b ------DROP METEOR------r PT01020{ HT0 X1(37(.5)1) Y1201 &X1,Y1)15580 0Y1 :530 DMXX1:MYY1 N1350 XMY39PTPT1:1380:500 CAUGHT # METEORS LEFT"3 ^----------------------G h THE GAMEc r----------------------m |1380v 830 S(16384) S127450 16368,0 S149710: RIGHT S136770: LEFT ---------------------------  DROPPILL HAVE ";PT;" METEORS"7 -------------------------M SET UP SCREENl -------------------------u :0 X039:0,39X:X 15 "X1PT ,X1(37(.5)1):Y1(3(.5)) 6X1,Y1)15300 @X1,Y1 JX T22:" # METEORS D 2100n:$xXNW1:XOLD1-HT16255T------------------------h MOLE GAME------------------------15:"THE GAME:""INSTRUCTIONS? ";A$:(A$,1)"Y"İ940PT(832)PT((PT4).5)::22 "YOU W   SORRY!YOU'VE NOT YET DISCOVERED SNELL'S LAW!"L"BACK TO THE BEGINNING!!"r"HIT RETURN KEY TO PROCEED.";AA$:"PROGRAM'S OVER!!""TO DO A NEW RUN(AND GET DIFFERENT"" UNKNOWN!),RUN IT AGAIN. BYE NOW"0 K ";II31303X::"THE MOMENT OF TRUTH!!"\]"TO THE NEAREST TENTH,YOU WILL NOW"b"INPUT HERE YOUR VALUE FOR INDEX OF UNKNOWN ";ANSlANSZZ650v"CONGRATULATIONS!!YOU'VE DONE WELL""HIT RETURN KEY TO PROCEED.";AA$:900-"J2490+:"EXPT 3 UNKNOWN CHEMICAL"Y"YOU WILL REPEAT EXPT 2,EXCEPT THAT FOR""UNKNOWN MEDIUM,INPUT INDEX AS 10"J2:118"IF YOU WANT TO PREDICT INDEX NOW,CHOOSE""EXPT 4. OR YOU CAN REPEAT #3""INPUT EITHER 3 OR 4 HERE 1 "ANGLE OF REFRACTION IS "R" DEGREES"Y "IN GOING FROM "A$(M)" INTO "A$(N)b 185 "SORRY!LIGHT DOESN'T GO INTO NEW MEDIUM" J2490 :::"WANT TO DO ANOTHER EXAMPLE WITH KNOWNS?" "INPUT Y OR N ";D$ D$"Y"118"ANGLE TO NORMAL OF INCIDENT RAY ";XI W(X3.14159180):VZWYX V1.0180h U(1V2) M(Z64.9):N(Y64.9) Z1Z1.5Z1.33Z1.66M2:165 Y1Y1.5Y1.33Y1.66N2 T(VU):ST1803.14159:R(S.5)$(4)"GLASS":A$(5)"CALCITE"3 }ZZ.1(6(1)12)Y ~ZZ1ZZ1.33ZZ1.5ZZ1.66ī125c FF1u "TRIAL NO";F "ENTER INDEX OF INCIDENT MEDIUM ";Z Z10140 ZZZ "ENTER INDEX OF REFRACTIVE MEDIUM ";Y Y10148 YZZ( TURN KEY WHEN READY TO GO ON";AA$D d:"EXPT 2 KNOWN CHEMICALS"m i"DATA";15);"CHEMICAL";32);"INDEX" n"","AIR","1.0" p" ","GLASS","1.5" r" ","WATER","1.33" t" ","CALCITE","1.66" v xA$(1)"AIR":A$(2)"UNKNOWN":A$(3)"WATER":A"DO YOU WISH TO DO EXPT 1,2,OR 3? ";K8 K20,100,400V "EXPT 1 A RAY DIAGRAM"v :" AIR(N=1.0)" D16 2D);"*" #D ("----------------------" -20);"PLASTIC (N=1.5)" 2E15 7E15);"*" <E! P"HIT REA$(5):;"HI THERE!! WELCOME TO THIS STUDY INTO"j"THE LAW OF REFRACTION OF LIGHT WAVES.":"IS THERE A PRINTER ATTACHED AND WORKING PLEASE TYPE Y OR N";KK$(KK$,1)"N"10(4);"PR#1":(29)(9);"80N":(9);"I"&    TION PROBLEM"??&19:4:"WE HOPE IT WAS INTERESTING AND FUN."E?'dR THE SPACE BAR TO CONTINUE."*>!16368,0:>!16384,128@>!>& >& *** SIGN OFF>&>&>&7:10:"THANK YOU FOR TRYING THE" ?&11:12:"SIX-SOLU THE NUMBER 999">=H!"INSTEAD OF A TEST TUBE NUMBER. ONLY A"m=R!"COMPLETE ANSWER WILL BE ACCEPTED. THAT"=\!"IS, YOU CAN'T CHECK YOUR IDENTIFICATION"=f!"OF ONLY ONE OR TWO OF THE SOLUTIONS, "=p!"BUT HAVE TO DO ALL SIX AT ONCE.">z!22:"PRESS YOU ARE ASKED TO CHOOSE A TEST TUBE"V<!9:"NUMBER, PLEASE TYPE IN ONLY ONE NUMBER"< !"AT A TIME AND THEN PRESS THE 'RETURN'."<*!12:"YOU MAY CHECK TO SEE WHETHER YOU HAVE"<4!"CORRECTLY IDENTIFIED THE CONTENTS OF"=>!"THE TEST TUBES BY TYPINGUE."; 16368,0"; 16384,128(; [; 2:"THE TEST TUBES (WHICH WILL APPEAR AT THE"; 3:"TOP OF THE SCREEN) ARE NUMBERED FROM"; "1 TO 6, READING FROM LEFT TO RIGHT, AND"; "CONTAIN THE SIX SOLUTIONS IN RANDOM";!"ORDER."%< !8:"WHEN.1 M SODIUM CARBONATE (CO3-2)"R:X 15:"SILVER BROMIDE AND SILVER CARBONATE ARE":b "BOTH ASSUMED TO BE COLORED SOLIDS AND":l "THE 'COLOR' THAT APPEARS WHEN THEY FORM":v "IS THE SAME ON THIS VIDEO DISPLAY."; 22:"PRESS THE SPACE BAR TO CONTIN P9& *** SIGN OFFV9&\9&9&7:10:"THANK YOU FOR TRYING THE"9&11:12:"SIX-SOLUTION PROBLEM"9&19:4:"WE HOPE IT WAS INTERESTING AND FUN."9'd CHLORIDE (CL-)":S " 0 THAT"68\!"IS, YOU CAN'T CHECK YOUR IDENTIFICATION"c8f!"OF ONLY ONE OR TWO OF THE SOLUTIONS, "8p!"BUT HAVE TO DO ALL SIX AT ONCE."8z!22:"PRESS THE SPACE BAR TO CONTINUE."8!16368,08!16384,1288!=9& AND THEN PRESS THE 'RETURN'."O7*!12:"YOU MAY CHECK TO SEE WHETHER YOU HAVE"{74!"CORRECTLY IDENTIFIED THE CONTENTS OF"7>!"THE TEST TUBES BY TYPING THE NUMBER 999"7H!"INSTEAD OF A TEST TUBE NUMBER. ONLY A"8R!"COMPLETE ANSWER WILL BE ACCEPTED.OP OF THE SCREEN) ARE NUMBERED FROM"S6 "1 TO 6, READING FROM LEFT TO RIGHT, AND"~6 "CONTAIN THE SIX SOLUTIONS IN RANDOM"6!"ORDER."6 !8:"WHEN YOU ARE ASKED TO CHOOSE A TEST TUBE"6!9:"NUMBER, PLEASE TYPE IN ONLY ONE NUMBER"7 !"AT A TIMETO BE COLORED SOLIDS AND"H5l "THE 'COLOR' THAT APPEARS WHEN THEY FORM"r5v "IS THE SAME ON THIS VIDEO DISPLAY."5 22:"PRESS THE SPACE BAR TO CONTINUE."5 16368,05 16384,1285 5 2:"THE TEST TUBES (WHICH WILL APPEAR AT THE"$6 3:"T.1 M SILVER NITRATE (AG+)B4: " 0.1 M NITRIC ACID (H+)"i4D " 0.1 M SODIUM BROMIDE (BR-)"4N " 0.1 M SODIUM CHLORIDE (CL-)"4S " 0.1 M SODIUM CARBONATE (CO3-2)"4X 15:"SILVER BROMIDE AND SILVER CARBONATE ARE"5b "BOTH ASSUMED MALL CAVITIES. IT"F319:"WILL APPEAR AT THE MIDDLE OF THE SCREEN."r322:"PRESS THE SPACE BAR TO CONTINUE."316368,0316384,1283 3 2:"THE SIX SOLUTIONS IN THE TEST TUBES ARE:"3 3& " PURE WATER (H2O)"40 " 0T. AFTER";212:"SEVERAL SUCH MIXINGS AND OBSERVATIONS"i2"WITH DIFFERENT PAIRS OF SOLUTIONS, YOU"2"SHOULD BE ABLE TO IDENTIFY THE CONTENTS"2"OF EACH TEST TUBE."217:"THE MIXINGS WILL BE CARRIED OUT ON A"3"SPOT PLATE WITH EIGHT SECT OF THE PROBLEM IS TO IDENTIFY"L1r6:"THE CONTENTS OF EACH TEST TUBE."}1|8:"THE PROCEDURE YOU WILL USE IS TO MIX A"1"SMALL PORTION OF SOLUTION FROM ONE TEST"1"TUBE WITH THE SAME AMOUNT FROM ANOTHER" 2"TEST TUBE AND OBSERVE THE RESULOPd0? 0@ *** INSTRUCTIONS AND PROGRAM DOCUMENTATION0J0T2:"YOU WILL BE GIVEN SIX TEST TUBES"0^"EACH CONTAINING A CLEAR SOLUTION.""1h5:"THE OBJ 0> *** LINES IN THE 8000-9999 RANGE PROVIDE INSTRUCTIONS AND PROGRAM DOCUMENTATION CALLED IN THE FIRST FEW LINES OF THE PROGRAM AND THE SIGN OFF MESSAGE TO THE USER WHO WISHES TO ST.nC5C128:C2C:6530).xC134:C2C4;.C3(C21)78I.C91100Z.B1((1)3)k.B2((1)3)s.13.C3B1,C1B2.4.C3B1,C1B2.C9.F/= C4-C913!-(C3(C21)781-2C3,C32C1=-<C1C11E-FC9K-P-c -d *** SUB TO CREATE "BUBBLES" FOR THE REACTION OF H+ WITH CO3-2-iFLAG1APPROPRIATE SPOT PLATE CAVITY (C) WITH THE COLOR SET BY THE ABOVE SUBROUTINES CALLED BY THE "CHEMICAL LOGIC" IN "5000",FLAG1: *** SETS FLAG SO THAT RETURNS WILL PASS BACK THROUGH "5000"TO THE CONTROL IN "3000", C5C128:C2C:6430-C134:C2 e+ *** SUB TO SET COLOR AT THAT OF THE AGCL PRECIPITATE (WHITE)m+15w+6400}++ v, *** SUB TO FILL IN THE *8 *** SUB TO SET COLOR AT THAT OF THE AGBR OR AG2CO3 PRECIPITATES (YELLOW)*B13*L6400*V!+ ) *** SUB TO SET COLOR AT THAT OF "CLEAR" SOLUTIONS (GREEN))4)6400: *** FILLS IN THE APPROPRIATE SPOT PLATE CAVITY WITH COLOR JUST SET)X*7 ENCE OF CO3-2)F( *** IF H+ PRESENT THEN PRODUCE BUBBLES (SUB 6500)x(*** OTHERWISE PRODUCE CLEAR SOL'N (SUB 6100)(T$(F)"H+"T$(S)"H+"İ6500(FLAG1ı(6100(T) '|*** SUB TO TEST FOR CO3-2 (IN ABSENCE OF AG+)X'T$(F)"CO3-2"T$(S)"CO3-2"İ5600f'FLAG1ıp'6100v'' (*** SUB TO TEST FOR H+ (IN PRES Z&*** SUB TO TEST FOR CL- (IN PRESENCE OF AG+)}&"T$(F)"CL-"T$(S)"CL-"İ6300&,FLAG1ı&66100&@&{ 1 h%*** SUB TO TEST FOR BR- OR CO3-2 (IN PRESENCE OF AG+)%T$(F)"BR-"T$(F)"CO3-2"T$(S)"BR-"T$(S)"CO3-2"İ6200%FLAG1ı%5400%(&  $P*** SUB TO TEST FOR AG+$ZT$(F)"AG+"T$(S)"AG+"İ5300$dFLAG1ı$n5500$x-% K#*** SUB TO TEST FOR H2On#T$(F)"H2O"T$(S)"H2O"İ6100#FLAG1ı: *** FLAG SHOULD NOT BE 1 UNLESS THE "CHEMICAL LOGIC" IS FINISHED AND SPOT PLATE HAS BEEN PROPERLY COLORED IN# 5200#g$O " *** THE "5000" SERIES SUBROUTINES ARE THE "CHEMICAL LOGIC" OF THE PROGRAM AND DETERMINE WHAT COLOR WILL BE PUT INTO THE NEXT EMPTY SPOT PLATE CAVITY BY THE "6000" SERIES SUBROUTINES.# IS INCORRECT."=!"WANT TO STOP(1) OR CONTINUE MIXING(2)?"^!"TYPE 1 OR 2 AND 'RETURN'";e!Rs!R19900y! "  I I16, T1$(I)T$(G(I))45003 IA 936:21q "CONGRATULATIONS! YOUR ANSWER IS CORRECT." "WANT TO STOP(1) OR MIX SOME MORE(2)?" "TYPE 1 OR 2 AND 'RETURN'"; R &R19900 0 936:21!"SORRY, YOUR ANSWER  *** SUB TO ALLOW USER TO CHECK ANSWERSFLAG1I16936:22"IN WHICH TEST TUBE IS THE ";T1$(I);G(I)BLACK" C; < *** SUB TO PRODUCE BRONX CHEERFBUZZ150PSOUND(16336)ZBUZZdy 16384,128`s t *** SUB TO CLEAN SPOT PLATE~0C186400: *** FILLS EACH OF THE CAVITIES WITH " C *** SUB FOR EMPTY TEST TUBENFLAG1$3900: *** AUDIO SIGNAL THAT SOMETHING IS WRONG WITH CHOICE.936:218"TEST TUBE # ";TUBE;" IS EMPTY."B"PRESS THE SPACE BAR TO CONTINUE."L16368,0 VFLAG1H 3900: *** AUDIO SIGNAL THAT SOMETHING IS WRONG WITH CHOICEv "1-6 ONLY; PRESS SPACE BAR TO CONTINUE." 16368,0 16384,128 !  L(TUBE)9ı= 3600: *** TEST TUBE CHOSEN IS EMPTYC   *** SUB FOR CHOICE OF SAMPLE OUT OF RANGE B TO TEST WHETHER USER WANTS TO CHECK ANSWERS, TEST TUBE CHOICE IS IN CORRECT RANGE, OR TEST TUBE IS EMPTYR TUBE999İ4000: *** CHECK ANSWERS\ FLAG1ıf TUBE7TUBE13460p 3500: *** CHOICE OF TEST TUBE NUMBER IS OUT OF 1-6 RANGEz THE NEWLY CLEAN SPOT PLATEf R23200: *** HAVING CHECKED HIS/HER ANSWERS, THE USER MAY CONTINUEl G jH *** SUCHECK YOUR ANSWERS (2)?"1 "WANT TO STOP (3)?"V "TYPE 1, 2, OR 3 AND 'RETURN'";] Rs R1R2R33270} 3200 R3700,4000,9900: *** PRODUCE CLEAN SPOT PLATE, CHECK ANSWERS, OR QUIT THE PROGRAM R1İ3000: *** STARTS CHOICES FORER'S INPUTD FLAG13020BN 2700: *** ADJUSTS LIQUID LEVELSoX 5100: *** STARTS TESTS OF "CHEMISTRY"vb Cl 3900: *** AUDIO SIGNAL THAT NO MORE SPACES ARE LEFT ON SPOT PLATE 936:21 "WANT A CLEAN SPOT PLATE (1)?" "WANT TO P THEIR LADDER AFTER THE CHEMISTRY IS TES7 936:21] "CAVITY # ";C;" MIX SOLN'S FROM"t " TEST TUBE #";{ F TUBEF 3400: *** CHECKS USER'S INPUT FLAG13020 " TEST TUBE #";& S0 TUBES : 3400: *** CHECKS USO PRESENT USER CHOICES AND TO CONTROL REST OF PROGRAM D C18) FLAG0: *** THE FLAG IS USED IN SEVERAL WAYS; IT SIGNALS ERRORS SUCH AS ATTEMPTS TO USE EMPTY TEST TUBES AND STARTS USER OVER ON THAT ROUND AND IT SENDS THE "5000" SUBROUTINES BACK U27:S1,S231$6 S1,S233:S1,S237<@ 27,31S1:33,37S2TJ 27,31S2:33,37S1[T Sa^  9 *** SUB T  *** SUB TO DRAW SPOT PLATE 15 5,3425:5,3439 25,395:25,3934 S14" S1(S1)77:S2S14 , S1,S2 v *** SUB TO ADJUST LIQUID LEVELS IN THE TEST TUBES} 0 L(F1)61 L,L1L(F) L(F)L(F)1 FSL(F)9ı L(S1)61 L,L1L(S) L(S)L(S)1 { p( *** SUB TO FILL TEST TUBESw2 4< L1F T16P 1,8LZ 1,8L1d LL6n Tx ?  *** SUB TO SET INITIAL LEVELS I16 L(I)1 I P' J V _ ` *** SUB TO DRAW TEST TUBESj 15t T0306~ 0,9T 0,9T3 T,T39 T   *** SUB TO MOVE CONTENTS OF DUMMY ARRAY, D$, UP TO FIRST I-1 POSITIONS  J1I  D$(J)"ZZZ"2380  KJI1 $ D$(K)D$(K1) . K 8 D$(I)"ZZZ" B L11 fV((I)I)1& pT$(I)D$(V)6 zD$(V)"ZZZ" 2300: *** REMAINING VALUES INMM DUMMY ARRAY, D$, ARE MOVED UP TO THE FIRST I-1 POSITIONS IN PREPARATION FOR NEXT RANDOM CHOICE I O  L-" T1$(6)"CO3-2"  3 4 *** SUB TO RANDOMIZE CONTENTS; NEW ARRAY IS T$ >I16 HD$(I)T1$(I) RI \I6  *** SUB TO ASSIGN VALUES TO TEST TUBE ARRAY, T1$ T1$(1)"H2O" T1$(2)"AG+" T1$(3)"H+" T1$(4)"BR-" T1$(5)"C2100: *** RAMDOMIZES; NEW ARRAY IS T$- O 2400: *** DRAWS TEST TUBES{ 2500: *** SETS INITIAL LIQUID LEVELS 2600: *** FILLS TEST TUBES 2800: *** DRAWS SPOT PLATE 3000: *** CONTROLS REST OF ACTION v  1 d::n7:" THIS IS A CHEMICAL SIMULATION CALLED"jx10:" *** THE SIX SOLUTION PROBLEM ***"20:"DO YOU NEED INSTRUCTIONS (Y OR N)";R$R$"Y"İ8000: *** GIVES INSTRUCTIONS2000: *** SETS UP TEST TUBE ARRAY, T1$'                      A#R$"Y"2005$F#8:8:"THANK YOU FOR RUNNING THIS"\$P#10:9:"REACTION RATE SIMULATION"d$Z#24j$' RTHIS",#P#10:9:"REACTION RATE SIMULATION"4#Z#24:#' *T YOU CAN"y#$""TRY MORE EXPERIMENTS. IT'S YOUR CHOICE."#."8900#`"#"22:10:"PRESS THE SPACE BAR TO CONTINUE";#"16368,0:16384,128#"936#"#(# ***#2##<#936 $ED' TIME IS THAT YOU CAN"I"$""TRY MORE EXPERIMENTS. IT'S YOUR CHOICE."S"."8900Y"`"""22:10:"PRESS THE SPACE BAR TO CONTINUE";""16368,0:16384,128""936"""(# ***"2#"<#936"A#R$"Y"200#F#8:8:"THANK YOU FOR RUNNING HOICE WHETHER TO"?!!"RUN THIS REACTION IN 'REAL' TIME, THAT"j!!"IS, AS IT WOULD BE ON THE LAB BENCH"!!"OR IN 'COMPRESSED' TIME, WHICH IS "!""SPEEDED UP COMPARED TO THE TIME THE "!""REACTION REALLY TAKES. THE ADVANTAGE""""OF 'COMPRESSON TO BE ADDED, STARTS"> !"THE REACTION. AS SOON AS THIS "g !"SOLUTION IS ADDED, THE TIMER WILL" !"APPEAR ON THE SCREEN. WHEN THE SOLU-" !"TION CHANGES COLOR, PRESS THE SPACE " !"BAR TO STOP THE TIMER." !!!"YOU WILL BE GIVEN A CRUN LIKE THIS:"!7!" 6.7 ML WATER + INDICATOR"=!X!" 0.3 ML 0.1 M BASE"^!{!" 0.0 ML PURE ACETONE"!!" 3.0 ML 0.1 M ALKYL HALIDE IN ACETONE"!8900!3:"ADDITION OF THE ALKYL HALIDE SOLUTION," !"THE LAST SOLUTIOLVENT (WATER/ACETONE) AFFECT THE"8!"REACTION RATE."B!8900q!3:"IN ORDER TO GET REASONABLE RESULTS, "!"YOU SHOULD NOT HAVE MORE THAN ABOUT"!"20 PERCENT OF THE ALKYL HALIDE REACT "!"IN ANY RUN."!!"YOU MIGHT START WITH A S INFORMATION TO THE COMPUTER. %t!Qv!"THE COMPUTER WILL ADD THIS VOLUME TO"|x!"THE BEAKER AND MIX IT WITH THE REST"z!"OF ITS CONTENTS."|!~!"YOU CAN TEST HOW THE CONCENTRATIONS OF"!"THE REACTANTS AND THE COMPOSITION OF""!"THE SVENT."R!8900>h!3:"FOR EACH REACTION YOU WISH TO CARRY"hj!"OUT, YOU WILL BE ASKED HOW MUCH OF"l!"EACH OF THE REACTANTS YOU WISH TO ADD."m!n!"YOU WILL TYPE IN THE AMOUNT, IN ML, "p!"AND PRESS THE 'RETURN' KEY TO TRANSMIT"r!"THIBIT OF BROM-"0 !" PHENOL BLUE INDICATOR"6"!_$!" 2) 0.1 M AQUEOUS BASE SOLUTION"e&!*!" 3) PURE ACETONE (TO CHANGE THE "4!" SOLVENT COMPOSITION)"9!>!" 4) 0.1 M ALKYL HALIDE SOLUTION WITH"H!" ACETONE AS SOLORS THAT CHARAC-"+ "IZE REACTION RATES.5 8900f 3:"TO CARRY OUT YOUR EXERIMENTS, YOU HAVE" "AVAILABLE A 15-ML BEAKER, A TIMER " "THAT MEASURES IN SECONDS, AND THE"!"FOLLOWING FOUR SOLUTIONS:" ! !" 1) WATER CONTAINING A AMOUNTS OF REACTANTS YOU ADDED AT THE"RX "START, YOU CAN CALCULATE THE RATE OF"gb "THE REACTION:"ml v 12:"AMOUNT T-BUCL REACTED (M)" 4:"RATE = ---------------------------" 15:"TIME REQUIRED (SEC)"  "AS WELL AS OTHER FACT"TURNS YELLOW."8900J 3:"THE COLOR CHANGE SIGNALS THAT ALL THE"t& "BASE IS USED UP AND AN EQUIVALENT "0 "AMOUNT OF THE ALKYL HALIDE MUST ALSO": "HAVE REACTED. FROM THE MEASURED TIME"D "FOR THIS MUCH REACTION AND THE KNOWN"&N "E BASE (NAOH) AND AN ACID/BASE"K"INDICATOR (BROMPHENOL BLUE--BLUE IN "w"BASE - YELLOW IN ACID) ARE ADDED TO ""THE REACTION MIXTURE. THE SOLUTION""REMAINS BLUE UNTIL ALL THE HO- HAS ""REACTED WITH THE H+; THEN IT SUDDENLY" T-BUTYL CHLORIDE, TO FORM"D|"T-BUTANOL, HYDROGEN ION (H+) AND "q"CHLORIDE ION (CL-). THE REACTION IS ""CARRIED OUT IN A SOLVENT THAT IS A ""MIXTURE OF ACETONE AND WATER."12:"THIS IS SET UP AS A 'CLOCK' REACTION.""A LITTL"ANOTHER (Y OR N)";R$7R$"Y"R$"N"9000A7000Gk@ *** SUB TO PRESENT DIRECTIONSuE936J2:17:"RATES"T17:"-----"^"THIS PROGRAM IS DESIGNED TO SIMULATE"h"THE HYDROLYSIS REACTION OF AN ALKYL "r"HALIDE,EMBASEMBASEDHALIDE*FLAG15360=MBASE0İ2800MX(16384)^X160İ7000l16368,0sICLOCKCLOCK1"5200,X ***b936l21:25:"TIME: ";CLOCK;" SEC"v23:"THE RUN IS OVER. WOULD YOU LIKE TO DO" ***16368,0 CLOCK0*P ***MZ21:25:"TIME: ";CLOCK;" SEC"ld22:"PRESS SPACE BAR TO "n"STOP TIMER AT END OF RUN";xFLAG1NN10I1NR(1)II110DHALIDEMHALIDEKEFF10MHALIDEMHALIDEDHALID X(1) DLAY T *** SUB TO CALCULATE THE MOLARITIES OF THE REACTANTSlMBASE.1VBASEVTTLMHALIDE.1VHALIDEVTTL *** SUB TO CALCULATE KEFFRSOLV(VHALIDEVACTN)VTTL KEFF.003(110(.32))(110(RSOLV2))HAT A MESS!"9 "PRESS THE SPACE BAR AGAIN TO CLEAN UP"P "AND START OVER."j 16368,0:16384,128p v |  *** CHANGE SOLUTION COLOR FLAG1 13 I2021LEVEL1 16,24I" I,  *** DELAY DLAY110 I113 J7212 14,J& JB 14I,1421:26,26I21I 0V( 7,2014]2 2dF IoP FLAG1uZ d 21:17:"OVERFLOW!"i n 23:5:"PRESS SPACE BAR TO GET OUT OF THIS";x ""; 16368,0:16384,128 936  21:"WLEVEL(VWTRVBASEVACTNVHALIDE.5)9LEVEL0LEVEL1MLEVEL15İ2500[FLAG1ıqI2021LEVEL1~ 16,24I 3000 I$  *** SUB TO CREATE OVERFLOW I2061 16,24I 3000 I 936 16368,0 22:36:VHALIDE%VHALIDE01500/2200=FLAG1ı_VTTLVWTRVBASEVACTNVHALIDEi"936o@y ***4 *** SUB TO MAKE BEAKER>15H14,6R6,2115\16,2421f6,2125p *** FILLING THE BEAKER 2$ING TO" "USE (ML)";# VACTN5 VACTN01400? 2200M FLAG1ıW 936 21:"HOW MUCH ALKYL HALIDE (0.1 M IN ACETONE" "SOLUTION) ARE YOU GOING TO USE (ML)" " THE TIMER WILL START AS SOON AS THIS" "REACTANT IS ADDED";NTINUE";" 16368,0:16384,128, 10906 2200D FLAG1ıN 936| 21:"HOW MUCH BASE (0.1 M NAOH) ARE YOU" ("GOING TO USE (ML)"; 2VBASE <VBASE01300 F2200 PFLAG1ı x936 21:"HOW MUCH PURE ACETONE ARE YOU GO0 L21:"HOW MUCH WATER (+ INDICATOR) ARE YOU"J V"GOING TO USE (ML)";T `VWTRe eVWTR01090v jVWTR01200 t936 ~21:"YOU HAVE TO USE SOME WATER IN ORDER TO" "HAVE ANY INDICATOR IN THE SOLUTION!" 24:5:"PRESS SPACE BAR TO COPRESSED' TIME (2)"; R' R12804 R2290= 200K N50:300S "N1Y ,c 6936m @2100w J1000 OFLAG1100 T4000 ^5000  ***  ***  *** INPUT THE VOLUMES OF REAGENTS TO BE USED  ***  *** B936REACTION RATE SIMULATION"L x12:"DO YOU NEED DIRECTIONS (TYPE 'Y' OR 'N'"m "AND THEN PRESS 'RETURN')";u R$ R$"Y"190 R$"N"200 100 8000 936 8:"DO YOU WISH TO MAKE THIS RUN IN 'REAL'" "TIME (1) OR 'COM<x *** THE RATES PROGRAM IS A CHEMICAL SIMULATION WRITTEN BY JERRY A. BELL, SIMMONS COLLEGE, BOSTON, MA 02115. IT *** IS NOT YET FULLY DOCUMENTEDOR COMPLETELY DEBUGGED "CHEMICALLY," ALTHOUGH IT WORKS WITH "NORMAL" INPUTS.d: n8:9:"                   (&"WELL. TO PLAY AGAIN,SIMPLY TYPE RUN,"L(&"AND YOU'LL BE ON YOUR WAY."k(&:" BYE FOR NOW!!"q(' Z&" WE HOPE YOU'VE ENJOYED PLAYING THE"T'&"RACER GAME.WE ESPECIALLY HOPE THAT"'&"YOU WERE SUCCESSFUL IN PREDICTING THE"'&"WINNERS.THAT'S BECAUSE YOU MUST BE"'&"QUITE A GOOD BEGINNER PHYSICIST,OR"'&"A SUPER-GOOD GUESSER TO HAVE DONE"*:"OK "NAME$" ,LET'S GET GOING!"-&!9000:E&(#"((RETURN))";ZZ$:\&#" RACER"y&#"CREATED BY DAVE OLNEY"&#"LEXINGTON(MASS) H.S. FEB,1983"&#ZZ11000:ZZ&#:&& FINAL MESSAGE 9900-9999&&9000:&&"WELL IT'S OVER!! "*'ERY NICE!"8%f!"BY THE WAY,IS THERE A PRINTER ATTACHED"d%k!"THAT IS TURNED ON?INPUT Y OR N ";BB${%p!(BB$,1)"Y"8580%u!(BB$,1)"N"8590%z!"HEY!PLEASE INPUT YES OR NO!!":8550%!BB1%!"PLEASE TYPE IN YOUR FIRST NAME NOW"%!NAME$!&!!:"BEFORE WE GET STARTED,WE WANT YOU"M$C!"TO KNOW ABOUT OUR PROMPT SIGN."y$H!"WHENEVER YOU SEE THIS ((RETURN))"$M!"AND APPLE SITS WAITING,YOU SHOULD"$R!"HIT THE RETURN KEY TO PROCEED.WON'T YOU"$W!"YOU TRY IT RIGHT NOW?"$\!9000 %a!"V(5) #JS0#TK25-#^H(K)H(K1)ī80805#hS1@#rTH(K)P#|H(K)H(K1)]#H(K1)Td#Kr#S18010x##4! 8500-8555 INTRODUCTORY TEXT,SHOWING HOW TO USE PROMPT#6!10);" ";::"RACER !!":#9!" WELCOME TO THE RACER GAME!!"'$>CTED ORDER WAS :"+"zZ15:" ";S$(Z);:Z1"^""WERE YOU CLOSE?! BETTER GET A COPY OF"""SCREEN IF NO PRINTER AVAILABLE."""@ SORTING ROUTINE TO RANK CARS IN ORDER OF FINISH ACROSS LINE#EJ(1)H(1):J(2)H(2):J(3)H(3):J(4)H(4):J(5)HOU WANT?INPUT Y OR N ";YY$J!A(YY$,1)"N"ĺ"OK,WE'LL TRY AGAIN!":5120e!D"GOOD ENOUGH, ";NAME$!F"OK..BET HAS BEEN MADE..GUN IS UP...GO!"!HZZ1500:ZZ!K(4);"PR#0"!!p CLOSING MESSAGE TO QUINELLA!r:NAME$",";"u"YOUR PREDI" Z15:S$(Z)N S$(Z)(69)ĺ"PLEASE INPUT EITHER A,B,C,D,OR E":5140U Zf BB1ī5160 #(4);"PR#1":(9);"80N":(9);"I" ("YOUR PREDICTED ORDER IS AS FOLLOWS" 2S$(1)" "S$(2)" "S$(3)" "S$(4)" "S$(5)!<"IS THIS THE ORDER YREDICT."3"IF NO PRINT-OUT IS MADE,BETTER COPY"\"DOWN DATA HERE TO BE ABLE TO SHOW""TO YOUR INSTRUCTOR,IF ASKED."9000:Z15:R(Z)Z:Z1000:"TYPE IN NOW THE ORDER OF FINISH," "ONE LETTER PER ?,FROM FIRST TO LAST. ORDER"/"OF FINISH CORRECT,FIRST TO LAST."\"BE WARNED THERE'LL BE ONLY ONE CHANCE""AT THIS IN THIS RUN.IF YOU'RE WRONG,""YOU'LL HAVE TO START AT BEGINNING AGAIN!"" AFTER SHOWING YOU THE DATA,YOU'LL""INPUT THE ORDER YOU P"WHOA! TRY AGAIN!!":4390=*W5ĺ"WHOA!TRY AGAIN!!":4390J+W5140X,W09900a-120 5000-5300 TEXT TO PLAY THE QUINELLA:12);" ";::"THE QUINELLA":NAME$",YOU'RE GOING FOR THE QUINELLA""TO WIN YOU MUST HAVE THE EXACTTHEN YOU WILL"&"REPEAT PART TWO."Q" IF YOU INPUT 5 AS NUMBER,WHY THEN"t"YOU'VE ENTERED THE QUINELLA"!" IF YOU WANT SIMPLY TO QUIT AT THIS"#"POINT,INPUT 0 "&PP1:"WHICH NUMBER DO YOU WANT;1,2,3,4, OR 5? ";W)W(W)W5ILY WIN AGAIN!!"<" BUT MAYBE YOU FEEL READY TO GO ON"a"PART THREE....THE QUINELLA !!"" IN THIS PART ALL FIVE CARS MUST" "RACE,AND YOU HAVE JUST ONE SHOT AT""PICKING THE ORDER OF FINISH."" IF YOU INPUT 1,2,3,OR 4 L!!CONGRATULATIONS!":43288"BETTER LUCK NEXT RUN!!"D9000:r" AT THIS POINT YOU CAN RUN A NEW RACE""WITH ONE TO FOUR CARS COMPETING. BUT""BE WARNED!!THE DATA CHANGES WITH EACH""RUN, AND THE SAME CAR WILL NOT""NECESSARF THE"*T"CAR YOU THINK WILL WIN. ";X$m^X$(63)X$(69)ĺ"WHOOOPS....NO SUCH CAR!!TRY AGAIN.":4180w800020001900:NAME$" ,YOU HAD PICKED CAR "X$"THE ACTUAL WINNER WAS ";W$(1):W$(1)X$4325"YOU PICKED WEL":4110Z15:R(Z)0:Z($Z1JJD'"LETTER OF CAR #"Z:M$W,M$"A"R(1)1j.M$"B"R(2)2}0M$"C"R(3)32M$"D"R(4)44M$"E"R(5)56M$(69)ĺ"WHOA!!NO SUCH CAR!!TRY AGAIN":4135@ZJ::"INPUT HERE THE LETTER O,B,AND E AND THAT CAR E"?"ACCELERATES FOR 20 SECONDS,THEN"o"LEVELS OFF IN SPEED THE REST OF THE WAY."y90001000"HOW MANY CARS WILL BE RACING ";JJJJ09900JJ5140JJ(JJ)JJ5ĺ"PLEASE INPUT EITHER 0,1,2,3,OR 5OU'LL SEE THE RACE RUN AND THEN"N"SEE A TABLE OF TIMES AND SPEEDS OF ALL"w"ENTRIES. YOU CAN PLAY AS OFTEN AS""YOU WISH.AND WHEN YOU'RE READY,YOU CAN""GO FOR THE QUINELLA!!"" WE'LL REMIND YOU THAT IT IS 1000 M""FOR CARS A15:R(Z)Z:Z b 4000-4390 TEXT TO DO PART II;USER CAN RACE TWO-FOUR CARS MORE THAN ONCE"h" IN THIS NEW RACE YOU WILL BE ABLE TO"" RACE ANY COMBINATION OF CARS FROM ONE""TO FOUR AS YOU WISH.AFTER PICKING THE" "WINNER,YNNER...LIKELY"=+ "ONLY ENOUGH TIME FOR AN EDUCATED GUESS."h0 "THEN YOU'LL SEE THE RACE RUN ON THE"5 "SCREEN,AND MORE DATA. ": " HERE WE GO!!"D 9000:1000 Z18000:Z  "GUN IS UP......THEY'RE OFF!!" Z1600:Z  Z AND"1 "ACCELERATES FOR 20 SECONDS ONLY.FROM"` "THEN ON TO FINISH,IT GOES AT THE SPEED " "REACHED AT 20 SECOND MARK." 9000 :" IN THIS RUN WE'LL SHOW YOU DATA"! "FOR ALL FIVE CARS AND GIVE YOU JUST"& "TEN SECONDS TO PICK A WIAVE HIGHER INITIAL SPEED OR RATE"L "OF ACCELERATION TO HELP COMPENSATE."{ " SOME CARS TRAVEL AT CONSTANT RATE FROM" "START TO FINISH.OTHERS START FROM REST" "AND ACCELERATE SMOOTHLY THE WHOLE WAY." "CAR E STARTS ON THE LINE FROM RESTODUCE GAME,GIVE RULES ? 10);" ";::"THE RACE GAME":l " IN THIS GAME THERE ARE 5 CARS GOING" "DOWN A STRAIGHTAWAY 1000 METERS LONG." "TWO OF THE CARS,LABELLED C AND D ,HAVE" "TO START MANY METERS BEHIND THE LINE,"! "BUT H5R(Z)0ī2250*K(Z)12CCī2240L9K(Z),20Z111K(Z),20Z1n11K(Z),20Z19K(Z),20Z18K(Z),20Z12K(Z),20Z2250CC,20ZCC10,20ZZAA11000:AAX[ ` :j  3000-3305 TEXT TO INTR(212.2D(3))!CC,10CC,1103X2H(5)12> Z15ZK(Z)B(Z)X.5A(Z)XXK(Z)(.2K(Z).2D(3).2D(Z).5)*X2021104K(5).5A(5)XX:2120>K(5).5A(5)202020A(5)(X20)HK(5)(.2K(5).2D(3).5)ZZ1:3-Z15:(12.2D(3).2D(Z)),20Z:ZF3,223,186,186,22U3,206,20x4,424,383,386,386,423,424,406,406,616,623,623,586,586,594,824,783,786,786,823,826,1023,1023,986,983,1005,100CCE";28);"ELAPSED" rC0$ sY15/ vZ15E xJ(Z)H(Y)ī1940X (64Z);" ";y R(Z)0ĺ"DID NOT RUN":1940 4);A(Z);9);B(Z);16);D(Z);22);G(Z);30);J(Z) CC1:W$(C)(64Z) Z Y (4);"PR#0" 9000   ";B(Z);" ";D(Z)! 0:Z' bo l 1900-1970 PRINTS TABLE TO SHOW CORRECT ORDER OF FINISH AND TIMES mBB1ī1903 n(4);"PR#1":(9);"80N":(9);"I" o5);"ACC";10);"V(0)"; p15);"TOTAL";22);"V(F)";30);"TIME" q14);"DISTANC0.5A(5)400)G(5)0 H(5).1(10H(5).5)20F L14:K(L1)5[ H(L)H(K)ī1000e K:L  1800-1890 PRINTS TABLE SHOWING USER INITIAL DATA FOR CARS SELECTED " ACC V(0) DISTANCE BEHIND LINE" Z15 (64Z);" "; &A(Z);"0:B(4)(4020(1).5):D(4)D(3)G }A(5)(A(3)2(1)):B(5)0:D(5)0M z Z14:G(Z)(1000D(Z))2A(Z)B(Z)B(Z) G(Z).1(10(G(Z).5)) H(Z)2(1000D(Z))(B(Z)G(Z)):Z Z14:H(Z).1(10H(Z).5):Z G(5)20A(5) H(5)(100MIZED p  A()=ACCELERATION;B()=INITIAL VELOCITY;D()=HANDICAP DISTANCE;G()=MAXIMUM VELOCITY;H()=RACE TIME A(1)0:B(1)(3020(1).5):D(1)0 QA(2)(13(1).5):B(2)0:D(2)0 A(3)(A(2)1.5):B(3)0:D(3)(9030(4(1)).5)! A(4)s 2d9100i8500%n3000/p80009q2000Cs1900SxPP1İ4100]}4000g5000q8000{2000190060009900  1000-1536 SETS VALUES OF ACC,INITIAL VELOCITY,AND DISTANCE BEHIND LINEFOR THE FIVE CARS....RANDO                     N."(("BETTER LUCK NEXT TIME!! BYE!!".( ATOR.":+'Z"GOOD LUCK! AND BYE FOR NOW!!"5'd1999M'l"((RETURN))";AA$:W'1900]''"SORRY,YOU JUST EXCEEDED LIMIT OF"'"ERRORS WITH SIX MISTAKES SO FAR."'"EITHER GET INSTRUCTOR'S HELPAT THIS"("POINT,OR START AGAIN BY TYPING RU WELL!"2&2"OF EIGHTEEN QUESTIONS ASKED,YOU GOT"T&<(18W)" CORRECT FIRST TIME."^&A1900&F"NOW YOU'LL DRAW SOME GRAPHS AND TRY TO"&P"ANSWER QUESTIONS ON MIMEO SHEET."&R:"IF HE'S AVAILABLE,PLEASE SHOW"'T"THIS SCREEN DISPLAY TO INSTRUC(12.19N(5).5).%100(E(3)100.5)R12408%WW1s%"DID YOU GET ANSWER OF "100(12.19N(5).5)" DEG K?"}%1900%%:"WE'VE NOW TESTED FIVE DIFFERENT"%"GAS LAW RELATIONSHIPS.SOME ARE DIRECT"&("AND SOME ARE INVERSE.YOU'VE DONE1(.082N(5)80.5)$E(2)6$(SE(2)).111200J$WW1:W51950u$"SINCE 80 DEG IS 1/5TH OF 400,WE SEE"$"THAT P MUST BE 1/5*"(.0082N(5)400)" OR ".1(.08280N(5).5)" ATM"$"(3)AT ABOUT WHAT T DOES P=10 ATM?"$E(3)%R100Ӻ"(1) ARE P AND KELVIN T DIRECTLY OR"T#"INVERSELY PROPORTIONAL?TYPE DIR OR INV."t#E$(1):(E$(1),1)"D"1180#WW1:W51950#"NOPE!DOUBLING ONE DOUBLES THE OTHER!"#"(2)PREDICT P THAT MATCHES 80 DEG K"#"(TO NEAREST TENTH)"$S.ONSTANT AT ";N(5)7"B" VOLUME IS CONSTANT AT 10 L"b"L10);"P (IN ATM)";22);"T (IN DEG K)"m"VZ18"`"T IS ";T(5)"eP(5).1(N(5).082T(5).5)"j15);T(5);22);P(5)"tZ"y"COPY DOWN DATA!";:1900"~"LAST SET OF QUESTIONS"%#LES FROM 1.5 TO 3.0."1!"MOLES IS TO BE ";N(5)Y!$"FOR THIS CHOICE,A GOOD VALUE FOR"u!)"VOLUME IS 10 LITERS."{!,!."WE'D SUGGEST YOU MAKE TEMP GO UP"!3"IN UNITS OF 50 ,STARTING AT 50 DEG K"!81900::" EXPT E""=" MOLES IS C TO MISS "(6W)" MORE QUESTION."* 1900E :" EXPERIMENT E"p "THIS TIME WE'LL LOCK PISTON TO MAKE" "VOLUME CONSTANT,AND ALSO FIX MOLES." "THEN WE CAN SEE WHAT HAPPENS TO THE" "PRESSURE(FROM GAUGE) AS T CHANGES."!"SELECT MOORTION."1"(2)PREDICT V THAT MATCHES 150 DEG"["GIVE ANSWER TO NEAREST WHOLE NO. ";~D(4):(D(4))(Y150.5)970WW1:W51950"SORRY! CORRECT ANSWER IS "(Y150.5)" LITERS":"ONE MORE EXPERIMENT TO GO." "YOU CAN AFFORDVpZ&u"COPY DOWN DATA.";:1900A"MORE QUESTIONS NOW!"g"(1) ARE VOLUME AND KELVIN TEMP""DIRECTLY OR INVERSELY PROPORTIONAL?""TYPE DIR OR INV."D$(1):(D$(1),1)"D"950WW1:W51950"WRONG-O!! IT'S A DIRECT PROP Y1900::" EXPERIMENT D"CZ" P IS CONSTANT AT 1.09 ATM"j[" N IS CONSTANT AT "N(4)" MOLES"\"RANGE OF T FROM 60 TO 600"_12);"TEMP(DEG K)";22);"VOL (IN L)"aZ17f"T IS ";T(4)hV.1(10YT(4).5)k15);T(4);22);O LET PISTON 'FLOAT' FREELY AGAINST"OC"ATMOSPHERIC PRESSURE--SAY 1.09 ATM."~H" THEN YOU SET N TO ANY VALUE YOU WISH."J"(A GOOD RANGE IS FROM .2 TO .5 MOLES)"M"N IS TO BE ";N(4)RYN(4).0821.09W"PICK VALUES OF T TO SHOW RATIOS"TO DATE IS "W"""ON TO EXPT D",19002@ "EXPT D"H%X3q*:"THE VARIABLES THIS TIME ARE THE"/"TEMPERATURE AND VOLUME.THIS MEANS WE"4"MUST KEEP MOLES AND PRESSURE CONSTANT."9"THE EASIEST WAY TO KEEP P CONSTANT IS"$>"TRY!RIGHT ANSWER IS "X" LITERS."I"(4)PREDICT V THAT MAKES P=.10 ATM."cC(4):C(4)120X710wWW1:W51950"ONE-TENTH THE P MEANS 10 TIMES THE V !""VOLUME SHOULD EQUAL "120X" LITERS":"SO FAR SO GOOD!""YOUR TOTAL WRONG PE D OR I .";,C$(2):(C$(2),1)"I"670@WW1:W51950k"NOT SO!! THE TWO ARE INVERSELY PRO-""PORTIONAL.DOUBLING ONE HALVES OTHER!!""(3) PREDICT THE P THAT MATCHES V=12 L."C(3):(C(3).5)X690WW1:W51950"SORL GETS BIGGER,DOES PRESSURE"Gg"INCREASE OR DECREASE?TYPE I OR D .";flC$(1):(C$(1),1)"D"640zqWW1:W51950v"LOOK AGAIN!AS ONE GETS BIGGER,THE"{"OTHER GETS SMALLER.""(2)ARE V AND P DIRECTLY OR INVERSELY" "PROPORTIONAL?TY" MOLES IS CONSTANT AT "N(3)F5"SELECT V FROM RANGE OF 1 TO 60"m:15);"VOLUME";22);"PRESS IN ATM"x?Z18D"VOL IS ";V(3)I15);V(3);22);12XV(3)NZS"COPY THIS DATA!";:1900X"TIME FOR MORE QUESTIONS!!"b"(1) AS VOGE."4 "SELECT A TEMP (FROM 10 TO 50 DEG C)";T(3)bX(4(1)2):Y(12X)(.082(T(3)273))vY.1(10Y.5)N(3)Y"WE'LL ASSUME YOU SET MOLE NUMBER AT "N(3)!1900&:"EXPERIMENT C"+" TEMP IS CONSTANT AT "T(3)" DEG C" 0+"HAVE A TOTAL OF "W" WRONG RESPONSES."W"ONLY "(6W)" MORE AND YOU'LL HAVE TO"p"START AGAIN":1900:"EXPT C"" THIS TIME N AND TEMP WILL BE FIXED.""THEN WE'LL MOVE PISTON HEAD TO A ""DESIRED SPOT,AND READ THE PRESS GAUW519505"UH-UH. CORRECT ANSWER IS ".25X" ATM"n"(3) PREDICT MOLES THAT MATCH "60(4(1)1)" ATM"B(3):B(3)60X(4(0)1)490WW1:W51950"NOT SO.IT'S "60X(4(0)1)" MOLES HERE.":"THIS ENDS EXPT B. SO FAR YOU"S MOLE NUMBER DECREASES,DOES THE"Q"PRESS INCREASE OR DECREASE?TYPE I OR D.";pB$(1):(B$(1),1)"D"450WW1:W51950"WHOOPS!RIGHT ANSWER IS DECREASE TOO!""(2)PREDICT PRESS THAT MATCHES .25 M"B(2):B(2).25X470 WW1:E OF "Y" LITERS";w"SELECT MOLES FROM RANGE OF .1 TO 10"d|15);"MOLES";22);"PRESSURE IN ATM"oZ17"N IS ";N(2)P(2)N(2)X15);N(2);22);P(2)Z"COPY THIS DATA DOWN.";:1900"NOW SOME MORE QUESTIONS."!"(1) AHIS EXPERIMENT IT WILL BE THE"KY"TEMPERATURE AND VOLUME WHICH WILL NOT"k^"CHANGE,ONCE WE SET THEM."c" TEMP WILL BE WHAT YOU CHOSE IN"h" EXPT A, NAMELY "T(2)" DEG C"m" TO SET VOLUME,THE PISTON WILL BE"r" LOCKED AT A VOLUM"NOT SO!"CWW1:"ANSWER SHOULD BE ".8(3(0)1)" MOLES."j"YOU'VE DONE WELL!! ON TO EXPT B""SO FAR YOU HAVE ";W;" WRONG."1900 300,:"EXPT B"6T(2)T(1):X3(1)3:X(X)@Y.082(T(2)273)X:Y(Y.5)T:"IN TTERN,PREDICT THE VOLUME"5"OCCUPIED BY .9 MOLES."LA(3):A(3)18240VWW1{"NOPE!THE ANSWER IS 18 LITERS.""FINALLY,PREDICT THE MOLE NUMBER HERE.""THAT WOULD OCCUPY ";16(3(1)1);"LITERS."A(4):A(4).8(3(0)1)260 "LOOK AGAIN!IT DOES GET BIGGER!"K"ARE V AND N DIRECTLY OR INVERSELY"p"PROPORTIONAL?TYPE DIR OR INV."A$(2):(A$(2),1)"D"210"SORRY THEY ARE DIRECTLY PROPORTIONAL."WW1"DOUBLING ONE DOUBLES THE OTHER.""BASED ON PATZ& "COPY THIS DATA DOWN!";:1900P "IF YOU'VE GOT THE PATTERN HERE,YOU" "WILL BE ABLE TO ANSWER THESE QUESTIONS." "AS N INCREASES,DOES V INCREASE OR" "DECREASE IN SIZE? TYPE INC OR DEC ." A$(1):(A$(1),1)"I"190 WW1"1900::"EXPERIMENT A"F }"TEMP IS CONSTANT AT ";T(1);" DEG CELSIUS"q "PRESSURE IS CONSTANT AT ";P(1);"ATM" "SELECT MOLES FROM RANGE OF .1 TO 2" 15);"MOLES";22);"VOLUME" Z17 "N IS ";N(1) VN(1)20 15);N(1);22);V M"- P"TEMPERATURE(BETWEEN 15 AND 30 DEG)."[ U"TYPE IN HERE THE TEMP YOU DESIRE ";T(1) Z"NEXT,P WILL BE ATMOSPHERIC PRESS. WHICH" _"ON THIS DAY IS "; nP.082(T(1)273.15)20 xP(1).1(10P.5) zP(1)760" TORRS OR ";P(1)"ATM." |CK TO". 8"BEGINNING OF PROGRAM!GOOD LUCK!!"8 91900T :" EXPERIMENT A" <"IN THIS EXPERIMENT YOU WILL KEEP THE" A"TEMPERATURE AND PRESSURE ON GAS IN THE" F"PISTON CONSTANT FOR SEVEN TRIALS." K"TEMP IS MAINTAINED AT CLOSE TO ROOED.OUR CUE"1 *"WILL BE THE PHRASE ((RETURN))."U ,"IN FACT,WHY NOT TRY IT NOW!!"_ .1900x 0"THAT'S THE IDEA!!"~ 1 2"ALSO,FROM TIME TO TIME WE'LL ASK YOU TO" 4"INPUT CERTAIN ANSWERS.ONCE YOU TOTAL" 6"FIVE ERRORS,YOU'LL HAVE TO GO BA0 2"WE ASSUME YOU HAVE READ MIMEO SHEET"Z"THAT DEALS WITH THIS EXPERIMENT!" "REMEMBER TO RECORD DATA OFF SCREEN IF"""NO PAPER PRINTER IS WORKING HERE."#:"FROM TIME TO TIME WE WILL ASK YOU TO" ("HIT THE RETURN KEY TO PROCE            TAKES SO FAR."9&"EITHER GET INSTRUCTOR'S HELPAT THIS"d&"POINT,OR START AGAIN BY TYPING RUN."&"BETTER LUCK NEXT TIME!! BYE!!"& XT TIME."%A1900@%F"NOW YOU'LL DRAW SOME GRAPHS AND TRY TO"h%P"ANSWER QUESTIONS ON MIMEO SHEET."%Z"GOOD LUCK! AND BYE FOR NOW!!"%d1999%l"((RETURN))";AA$:%1900%%"SORRY,YOU JUST EXCEEDED LIMIT OF"&"ERRORS WITH SIX MISNSWER OF "100(12.19N(5).5)" DEG K?"1$19007$`$:"WE'VE NOW TESTED FIVE DIFFERENT"$"GAS LAW RELATIONSHIPS.SOME ARE DIRECT"$("AND SOME ARE INVERSE.YOU'VE DONE WELL!"$2"OF EIGHTEEN QUESTIONS ASKED,YOU GOT"%<(18W)" CORRECT FIRS#"SINCE 80 DEG IS 1/5TH OF 400,WE SEE"u#"THAT P MUST BE 1/5*"(.0082N(5)400)" OR ".1(.08280N(5).5)" ATM"#"(3)AT ABOUT WHAT T DOES P=10 ATM?"#E(3)#R100(12.19N(5).5)#100(E(3)100.5)R1240#WW1'$"DID YOU GET AELY PROPORTIONAL?TYPE DIR OR INV."B"E$(1):(E$(1),1)"D"1180V"WW1:W51950""NOPE!DOUBLING ONE DOUBLES THE OTHER!"""(2)PREDICT P THAT MATCHES 80 DEG K""S.1(.082N(5)80.5)"E(2)"(SE(2)).111200"WW1:W51950)B" VOLUME IS CONSTANT AT 10 L"N!L10);"P (IN ATM)";22);"T (IN DEG K)"Y!VZ18k!`"T IS ";T(5)!eP(5).1(N(5).082T(5).5)!j15);T(5);22);P(5)!tZ!~"LAST SET OF QUESTIONS"!"(1) ARE P AND KELVIN T DIRECTLY OR""""INVERS" "MOLES IS TO BE ";N(5)E $"FOR THIS CHOICE,A GOOD VALUE FOR"a )"VOLUME IS 10 LITERS."g , ."WE'D SUGGEST YOU MAKE TEMP GO UP" 3"IN UNITS OF 50 ,STARTING AT 50 DEG K" 81900::" EXPT E" =" MOLES IS CONSTANT AT ";N(5)#!E QUESTION."19001:" EXPERIMENT E"\"THIS TIME WE'LL LOCK PISTON TO MAKE""VOLUME CONSTANT,AND ALSO FIX MOLES.""THEN WE CAN SEE WHAT HAPPENS TO THE""PRESSURE(FROM GAUGE) AS T CHANGES." "SELECT MOLES FROM 1.5 TO 3.0.EDICT V THAT MATCHES 150 DEG"G"GIVE ANSWER TO NEAREST WHOLE NO. ";jD(4):(D(4))(Y150.5)970~WW1:W51950"SORRY! CORRECT ANSWER IS "(Y150.5)" LITERS":"ONE MORE EXPERIMENT TO GO." "YOU CAN AFFORD TO MISS "(6W)" MORT(4);22);VpZ-"MORE QUESTIONS NOW!"S"(1) ARE VOLUME AND KELVIN TEMP"~"DIRECTLY OR INVERSELY PROPORTIONAL?""TYPE DIR OR INV."D$(1):(D$(1),1)"D"950WW1:W51950"WRONG-O!! IT'S A DIRECT PROPORTION.""(2)PR9(W"PICK VALUES OF T TO SHOW RATIOS"IY1900::" EXPERIMENT D"lZ" P IS CONSTANT AT 1.09 ATM"[" N IS CONSTANT AT "N(4)" MOLES"\12);"TEMP(DEG K)";22);"VOLUME(IN L)"aZ17f"T IS ";T(4)hV.1(10YT(4).5) k15);ST WAY TO KEEP P CONSTANT IS"I>"TO LET PISTON 'FLOAT' FREELY AGAINST"tC"ATMOSPHERIC PRESSURE--SAY 1.09 ATM."H" THEN YOU SET N TO ANY VALUE YOU WISH."J"(A GOOD RANGE IS BETWEEN .2 AND .5 MOLES)"M"N IS TO BE ";N(4)RYN(4).0821.0FAR SO GOOD!"3"YOUR TOTAL WRONG TO DATE IS "W"G"ON TO EXPT D"Q1900We "EXPT D"m%X3*:"THE VARIABLES THIS TIME ARE THE"/"TEMPERATURE AND VOLUME.THIS MEANS WE"4"MUST KEEP MOLES AND PRESSURE CONSTANT."9"THE EASIE690WW1:W51950D"SORRY.RIGHT ANSWER IS ".75X" LITERS"n"(4)PREDICT V THAT MAKES P=.10 ATM."C(4):C(4)120X710WW1:W51950"ONE-TENTH THE P MEANS 10 TIMES THE V !""VOLUME SHOULD EQUAL "120X" LITERS" :"SO OR INVERSELY"0"PROPORTIONAL?TYPE D OR I .";OC$(2):(C$(2),1)"I"670cWW1:W51950"NOT SO!! THE TWO ARE INVERSELY PRO-""PORTIONAL.DOUBLING ONE HALVES OTHER!!""(3) PREDICT THE P THAT MATCHES V=16 L"C(3):C(3)12X16R MORE QUESTIONS!!"?b"(1) AS VOL GETS BIGGER,DOES PRESSURE"jg"INCREASE OR DECREASE?TYPE I OR D .";lC$(1):(C$(1),1)"D"640qWW1:W51950v"LOOK AGAIN!AS ONE GETS BIGGER,THE"{"OTHER GETS SMALLER." "(2)ARE V AND P DIRECTLY z#Xİ    ׵" Ҡ" Ө̩ ؠΠ̩ͨ3̴  ŠŠŭԠɠ ííŠԠ  àڠ àڠԠȠ ̠ííŠ! й֠!йŠ"̷ ̠Ϡ ̠Ϯà!Ġ̨ө( ij̫˱̹ ̠Ƞ*@@YY3fP*U*U*U*U*U*U*U*U*U*U*U`<P*U*U*U*UP*U*U*U*U`P*U*U*U*U*U@*U*U*U*U*U`F `P*ysdy?N3N3~9~O9fys($'<.'*** WRITTEN BYT8'*** LYNELL JACKSONnB'*** JANUARY 14, 1987tL'V'*** LAST MODIFIED BY`'*** LYNELL JACKSONj'*** JANUARY 27, 1987t'~'<*** "ISL HELLO" ***>DMONDAY-SATURDAY." #""F#"TECHNICAL/SOFTWARE SUPPORT HOURS ARE"w#"8:30 AM --> 4:30 PM PST MONDAY - FRIDAY." #""#"CALL US FOR A FREE CATALOG OF"#"COMPUTER SUPPLIES AND THE LATEST AND"#"MOST UP TO DATE PUBLIC DOMAIN SOFTWARE." Z#"A DIVISION OF U.S.COMPUTER SUPPLY INC."O d#"511-104 ENCINITAS BOULEVARD"j n#"ENCINITAS, CA 92024" x#"(800) 992-1992 (USA) #"(800) 992-1993 (FOR CA) #"(619) 942-9998 (FOREIGN) #"" #"ORDER HOURS ARE"#"6:00 AM --> 4:30 PM PST l24:7110 vGO$: # : TB%(21(PR$)2)I TB%:PR$;O U (#r +#<*** DATA LOCATION ***>x /# 2#"FOR OTHER PUBLIC DOMAIN AND" <#"USER-SUPPORTED PROGRAMS PLEASE CONTACT:" F#"" P#"THE INTERNATIONAL SOFTWARE LIBRARY",16297,1:16300,1:16301,1:16304,12 70108 @ :M I1ND%_ PR$:I:7110f Ip 7010v  RN$""ė:D$;"CATALOG": (:D$;"RUN ";RN$ 2 X [<*** SUBROUTINES ***> _ bPR$"< PRESS ANY KEY TO CONTINUE >" GF%11110 :E PR$" U.S. COMPUTER SUPPLY INC. PRESENTS:"S 10:7110 PR$"THE INTERNATIONAL SOFTWARE LIBRARY" $13:7110 .7010:1210 L V: `PR$"* LOADING PROGRAM *" j11:7110: ~D$;"BLOAD ISL HELLO.GRAPHIC"( CING FOR PRINTING DATA LINE6 * I = LOOP VARIABLE S * GO$ = CONTINUE STRING GF%1:* DISPLAY GRAPHIC FLAG, 1=YES, 0=NO ND%20:* NUMBER OF DATA LINES RN$"":* NAME OF THE PROGRAM TO RUN NEXT  <*** MAIN PROGRAM ***>  <*** "ISL HELLO" ***>">*** PROGRAM WRITTEN BYV(*** LYNELL JACKSONp2*** JANUARY 14, 1987vdg<*** VARIABLES ***>knD$(4):* CONTROL-DxH$(8):* CONTROL-H* PR$ = DATA LINE FOR PRINTING * TB% = TAB SPA     P*Os?~~?O`P*U*U*U*U*U@*U*U*U*U*U``P*?U`<P*U*U*U*U T*U*U*U*U`P*U*U*U*U*U*U*U*U*U*U*U`L}|L1`><P*ysd?N3N?~9rO9fIs`P*U*U*U*U*U@*U*U*U*U*U``s3O{qc<P*?U`<P*U*U*U*UP*U*U*U*U`P*U*U*U*U*UP*U*U*U*U*U` `P*ysx?N30~9O9fp HU10:L.01:QXQX1R1110\"THESE VALUES AI11(NM$(X))1:"-";:I<bI4((SC(X)))1:"-";:IYl" ";SC(X);" OUT OF ";QX_vfXlz1040:: --CALCULATION (1)-- U10:L.01:QXQX11110"THE VALUES YOU HAVE JUST WRITTEN DOWN""ARE THE CONCENTRATIRRY, ";NM$(X):8"YOUR ANSWER OF ";ANS(X);" IS MORE"T"THAN 2% OFF AGAIN.":y"THE CORRECT ANSWER IS ";A(X):"LET'S MOVE ON, ";NM$(X):1040:&X0: --KEEPING SCORE-- D(142NUM)NX1NUM:6:NM$(X);" ";XD TRY-- rX1NUM'|A(X)01830-510GNM$(X);"..."h" YOUR NEW ANSWER: ";ANS(X)I(100(A(X)ANS(X))A(X))I2.51770" GOOD JOB!!":SC(X)SC(X).5"LET'S MOVE ON, ";NM$(X):1040::1830:7:"SO!!!":SC(X)SC(X)1:A(X)0<" VERY GOOD, ";NM$(X):N"1040::1630k,"MORE THAN 2% OFF...":6"TRY AGAIN FOR 1/2 CREDIT."@"I'LL COME BACK TO YOU, ";NM$(X):J" YOUR VALUE WAS ";VAR(X):T1040:^X h --CHECK FOR 2NX X1NUM7-NM$(X);","Q"YOUR ANSWER OF ";ANS(X);" IS"|I(100(A(X)ANS(X))A(X)): % ERRORI.5ĺ"ABSOLUTELY CORRECT!!"::1550I2.51580I(10(I.05))10"WITHIN ";I;"%!!""THAT'S CLOSE ENOUGH------------------":" X1NUM;NM$(X);:15:VAR(X)AH(XR21040X<^FdPZ --TEST ANSWERS-- d ANS(X)=STUDENT'S ANSWER n A(X)=CORRECT ANSWERx:X1NUM"YOUR ANSWER, ";NM$(X);"?";" ";ANS(X):FLAG0: CHECK FOR DECIMAL POINT ,I14F(V$,I,1)"."FLAG1MIp CUTS NUMBER TO 3 SIG. FIGS.FLAG1V$(V$,3):1240V$(V$,4)VAR(X)(V$)X:5"PLEASE NOTE THE FOLLOWING VALUES: ""-----------------"PRESS TO CONTINUE ";T$&$:. --TIMER-- M8TM11500:TMSBYLxV --CHOOSE VARIABLES-- ` U IS RANGE OF VARIABLESj L IS LOWER LIMIT OF VARIABLEStX1NUM~VAR(X)U(.5)L: CHOOSE # V$(VAR(X))!7:"AN UNKNOWN ACID (OR BASE)"?7:" GIVEN TITRATION DATA"Ed3:"5) QUIT THIS PROGRAM"l:"YOUR CHOICE: ";AA1A6990A1950,2540,3370,3660,102010:"END OF PROGRAM...": --PRESS -- 6:ITIES" RA\3:"2) CALCULATE ";(91);"H+] OR ";(91);"OH-]"Zf7:"USING THE KW "`pz3:"3) CALCULATE THE PH OF A SOLUTION"7:"GIVEN THE ";(91);"H+]"7:" (AND VICE VERSA)"3:"4) CALCULATE THE CONCENTRATION OF" 4.5 X 10 ":2" SIMPLY TYPE IN 4.5 E-14"U" ('E' IS FOR EXPONENT) ":_1040e z --MENU--  :*"WHICH TYPE OF PROBLEM WOULD YOU LIKE:"4"------------------------------------">H3:"1) CALCULATING NORMALTES ON EXPONENTS-- "6/"NOTE:"="----":h"YOU MAY ENCOUNTER PROBLEMS IN WHICH""THE ANSWER IS SO LARGE OR SO SMALL""THAT YOU MAY WISH TO USE EXPONENTS.":"TO ENTER A NUMBER SUCH AS:":" -14"""--- ----- -- ------- ------ ----"::1 1040J & --THE WARNING-- P 0X :10h D"WARNING:"y N"-------": X"YOUR QUESTIONS AND NUMBERS SHOW UP" b"ON THE SCREEN ONLY ONCE." l"YOU HAD BETTER TAKE NOTES." v::1040 --NO TO TITRATE 8"),"DROPS OF VINEGAR.":U, "WHAT CONCENTRATION IS THE VINEGAR?":b,X1NUMw,A(X)VAR(X).58~,(X,21070:1370:1850,< ,FU350:L100:QXQX1,P1110,Z"THESE ARE THE NUMBER OF ML OF BASE THAT"-d"ARE NEEDEDO IT'S ENDPOINT.":?+"WHAT IS THE NORMALITY OF THE UNKNOWN"N+"ACID?":[+X1NUMr+A(X).2VAR(X)100y+X+1070:1370:1850+ +U10:L5:QXQX1+1110+"THESE NUMBERS ARE THE DROPS OF .5 M ","SODIUM HYDROXIDE USEDDE IT THROUGH CALCULATION (3)"::1040::790K*L --CALCULATION (4)-- b*VU150:L50:QXQX1l*`1110*j"THE NUMBER YOU HAVE JUST WRITTEN DOWN"*t"IS THE VOLUME (IN ML) OF .200 N BASE"*~"NEEDED TO TITRATE 100 ML OF AN UNKNOWN"+"ACID TU13:L1:QXQX1:1110)"THESE NUMBERS REPRESENT THE EXPONENTS":"OF THE OH- CONCENTRATIONS FOR SOME":"SOLUTIONS."::"YOU MUST CALCULATE THE POH FOR THIS ":"SOLUTION.":)$X1NUM:A(X)VAR(X):X).1070:1370:1850)815-*B"YOU HAVE MAU13:L1:QXQX1( 1110I( "THESE NUMBERS REPRESENT THE EXPONENTS"r( "OF THE OH- ION CONCENTRATION IN A"( "SAMPLE SOLUTION.":( "WHAT IS THE PH OF THE SOLUTION?":( X1NUM( A(X)14VAR(X)( X( 1070:1370:1850( )QX1'> 1110;'H "THE NUMBER YOU HAVE JUST WRITTEN DOWN"`'R "IS THE EXPONENT OF THE H+ ION"'\ "CONCENTRATION IN A SAMPLE SOLUTION.":'f "WHAT IS THE PH OF THE SOLUTION?":'p X1NUM'z A(X)VAR(X)' X' 1070:1370:1850' ( 1& "(HINT: FIRST FIND THE EXCESS OH- IONS.)":>& X1NUMb& A(X)1014((2VAR(X).75).1)i& X& 1070:1370:1850& 15& "YOU HAVE GOTTEN SAFELY THROUGH":"CALCULATION (2)"::1040::790&* --CALCULATION (3)-- '4 U13:L1:QX% U4:L1:QXQX1% 1110G% "THIS NUMBER OF MOLES OF CA(OH) IS"n% " 2"% "ADDED TO 10.0 LITERS OF WATER ALONG"% "WITH .750 MOLES OF HCL.":% "WHAT IS THE FINAL H+ ION CONCENTRATION"& "IN THE SOLUTION?"$: "USING THE DATA FROM THE LAST QUESTION,"Z$D "WHAT WOULD BE THE CONCENTRATION OF THE"}$N "H+ OR OH- IONS IN SOLUTION."$X "(WHICHEVER CONCENTRATION IS SMALLER)":$b X1NUM$l A(X)1014((1VAR(X))2)$v X$ 1070:1370:1850$ RS OF"4# "WATER ALONG WITH 1.00 MOLES OF NAOH.":a# "HOW MANY MOLES OF EXCESS ACID OR BASE"# "ARE LEFT AT EQUILIBRIUM?":# " (THIS IS A TWO PART QUESTION)"# X1NUM# A(X)(1VAR(X))# X# 1070:1370:1850#& #0 QXQX1,h "WHAT IS THE H+ CONCENTRATION AT":"r "EQUILIBRIUM?":G"| X1NUMi" A(X)1014(VAR(X)(.3540))p" X" 1070:1370:1850" " U2:L0:QXQX1" 1110" "THIS IS THE NUMBER OF MOLES OF ACID"# "(MONO-PROTIC) ADDED TO 2.00 LITETHE OH- ION":"CONCENTRATION TO BE AT EQUILIBRIUM?"9! F! X1NUM]! A(X)1014VAR(X)d!" Xz!, 1070:1370:1850!6 !@ U20:L1:QXQX1!J 1110!T "YOU ARE GIVEN THE MASS (IN GRAMS) OF"!^ "SOLID NAOH ADDED TO 350 ML OF WATER.":$" "EQUILIBRIUM?":" X1NUM= A(X)1014(2VAR(X))D XZ 1070:1370:1850d | U.1:L.001:QXQX1 1110 "THESE NUMBERS ARE THE H+ CONCENTRATION" "AFTER SOME ACID HAS BEEN ADDED TO WATER."3! "WHAT WOULD WE EXPECT "BE AT EQUILIBRIUM?":#< X1NUM:F A(X)1014VAR(X)AP XWZ 1070:1370:1850ad xn U3.5:L.1:QXQX1x 1110 "THESE NUMBERS REPRESENT MOLES OF HCL":"ADDED TO .500 LITERS OF WATER.": "WHAT WILL THE OH- CONCENTRATION BE AT":1040: 7900 --CALCULATION (2)-- I U1.5:L.001:QXQX1S 1110 "THE NUMBER YOU HAVE JUST WRITTEN DOWN" "IS THE NUMBER OF MOLES OF NAOH" "ADDED TO 1.00 LITER OF WATER.":( "WHAT IS THE H+ CONCENTRATION GOING TO"2 10%j "YOU HAVE THE NORMALITY OF A"Gt "SAMPLE OF SULFURIC ACID.":l~ "WHAT IS IT'S CONCENTRATION IN" "MOLES PER LITER (M)?": X1NUM A(X)VAR(X)2 X 1070 1370 1850 15  "YOU HAVE SURVIVED CALCULATION (1)": CONSTANT"4 "OF THIS SOLID,WEAK ACID.GOOD LUCK!":QS L(H3G10):K1000LJ,X S(1)(K100)EZ S(3)(K10)10S(1)d] S(5)(K100S(1)10S(3))}^ S(2)G:S(4)H:S(6)J` b X16d S(X);f Xg l  :"WITH THIS DATA YOU CAN DEDUCE BOTH THE"  "MOLECULAR MASS AND IONIZATION 80   Q1& G(9(Q)1)8& H(4(Q)4)L0 J(20(Q)10)\: KAG10Hf? KK1pD NAJF "COPY DOWN THIS DATA!!"I 3152K "THERE ARE "(H3)"."G" GRAMS OF ACID IN SAMPLE."N 2120P "YOUR UNKNOWN'S CODE NUMBER IS ";(10)#t PX(C).01(100(14F).5)C( C,.01(100VBN.5),PX(C)J2 CX< Q13200 "MOLES OF ACID IN SAMPLE="NA1000 "MOLARITY OF BASE SOLUTION ADDED="MB" M" "IONIZATION CONSTANT OF ACID="KA  "HIT ANY KEY TO GO TO START";B$KA(NAMBVBN)(MBVBN). PX(C)(A)(10)M$ PX(C).01(100PX(C).5)W) 2600o. NAMBVBN0ī24008 B(NA1E14)(KAVBN)= B(B)B D(B)(10):PX(C)14DG PX(C).01(100PX(C).5)L 2600` E(MBVBNNA)(VBN)j F(E)PH(30):PX(30)N1I;AKA(NAMBVBN)(MBVBN)PPH(N)(A)(10)oPH(N).01(100PH(N).5)N,VBN,PH(N)N:"TO SEE REMAINDER OF THIS TITRATION""TYPE GO.";A$C118 NI.1C NAMBVBN0ī2350 A;KA,>"MOLES OF ACID(FROM .01 TO .02)";NA;CNA1000NAeH"INPUT M OF BASE (FROM .2 TO .5)";MBR"SELECT SIZE OF VOLUME OFBASE ADDED IN"W"EACH INCREMENT(FROM 5 TO 10 ML)";VB\INA(MBVB)1f"#","TOT VOL","PH"k"","BASE ADDED"pN( "HIT ANY KEY TO GO TO START";B$0 806 b :"THIS SECTION WILL SHOW THE RESULTS" "OF TITRATING A SAMPLE OF A SOLID,WEAK" "MONO-PROTIC ACID WITH A STRONG BASE."  4"SELECT VALUE OF KA FROM RANGE OF"9"1E-4 TO 9E-8 "7.00:1180' Y(1X)(10):PH1Y- > Z(T1)2.5J RVA20 "TYPE GO TO SEE TABLE OF PH VALUES USING SMALL INCREMENTS NEAR END POINT";A$ N0VAR #SZVAN (1125 )M(NR.01) *PX(M).01(100PH.5) -N,S,PX(M) 2 )"","ACID ADDED". QT(2MBVB(MAVA))19 VN0TD XSNVAN [1125i \PH(N).01(100PH.5)x ^N,S,PH(N) `N b1300 eBMB50:AMAS jX(BA)(VBS) lABī1164 t(BA)0ī1170 yY(X)(10) ~PH14Y 1180 PHR RR1000,2000,3000 2 PH(30):PX(22)W "MOLARITY OF BASE(.1 TO .5)";MB| "MOLARITY OF ACID(.1 TO .5)";MA "VOLUME OF ACID IN EACH INCREMENT ";VA VB50 :"50 ML OF "MB" MOLAR BASE:ACID IS "MA" MOLAR." $"#","TOTAL","PH"THE"3 "TITRATION OF WEAK ACID WITH STRONG BASE"b "AT MOLARITY AND KA VALUE CHOSEN BY USER" "(3)RESULT OF TITRATION OF STRONG BASE" "VS WEAK ACID OF UNKNOWN KA ." "USER CALCULATES VALUE OF KA FROM DATA."  "INPUT 1,2,OR 3.";R< P'Z" TITRATION CURVES":Vd"YOU MAY CHOOSE ONE OF THREE TYPES HERE."n"(1)SEE A TABLE OF PH VALUES FOR THE"s"TITRATION OF A STRONG ACID WITH STRONG"x"BASE,AT MOLARITIES CHOSEN BY USER." "(2)SEE A TABLE OF PH VALUES FOR     040::790N TO TITRATE 250 ML OF A 6 M"7-n"SOLUTION OF ACID.":c-x"WHAT IS THE CONCENTRATION OF BASE?":p-X1NUM-A(X)1500VAR(X)-X-1070:1370:1850-15 ."YOU HAVE SUCCESSFULLY COMPLETED ALL OF":"THE PROBLEMS IN CALCULATION (4)"::1,53,53,53,53,543| 52,54,45,57,38,60,35,64,32,60["RECORD THIS DATA,THEN TYPE GO";A$a"WANT TO DO ANOTHER RUN? ";B$(B$,1)"N"890"WANT TO USE SAME CHEMICAL? ";C$(C$,1)"Y"179215z(4);"PR#0""TO SEE LIS BEING INPUTTED IN HEATING"E8"CURVE AT RATE OF "N" CAL/MINUTE."b;" TIME","TEMP","TEMP"@"(MIN)","COOLING","HEATING"EI1342JT1,S(I)D,S(I1)DOT1T1TTIw 71,23,60,30,54,44,53,48,53,52,53,53y53,53,53,53,53,53,53)";M M.1M.5235$ TT5K/ :T10: I19E O1(I)L If  0,-1,-1,9,9,9,5,5,5r DO1(O)} I19 A(I) I  4.27,13.8,10.8,14.7,2.1,11.7,7.8,4.3,9.9 "NA(O)M1000(5T) 'I134 ,S(I) 1I6"ENERGY 195* (4);"PR#1":(9);"80N":(9);"I"S "RECORD THIS CODE NUMBER,PLEASE ";D "WHAT IS TIME INTERVAL YOU WOULD LIKE" "TO TRY?(FROM .5 TO 3.O MIN)"; T T.5T3.0215 "HOW MANY MOLES DO YOU WISH IN SAMPLE"; "(FROM .1 TO .5ANHYDRIDE"6 " N-DOCASANE,TROCOSANE,N-PENTACOSANE"^ :"BE SURE TO RECORD CODE NUMBER!"| "TYPE GO TO CONTINUE";A$ :O(9(1)1) A(10(1)):B(10(1)):C(10(1)) D100A10BC EABC E10(E10)O180 PP1īATE,YOU CAN (WITH THE HELP"J "OF A CRC HANDBOOK HEAT OF FUSION TABLE)"v "FIND WHICH ONE OF NINE POSSIBILITIES" "IT IS.HERE'S THE LIST:" " CYANAMIDE,P DICHLORO BENZENE" " BENZOPHENONE,MYRISTIC ACID " " ELAIDIC ACID,CINNAMIC A)FIRST FROM LIQUID TO"E "SOLID BY STEADY COOLING IN A ICE BATH,"r "AND (B)BACK TO LIQUID BY STEADY HEAT-" "ING ON A HOT PLATE.THE RATE OF HEATING" "WILL BE TOLD TO YOU." "FROM THE TEMPERATURE-TIME DATA AND THE" "HEATING Rh":17);"";::"CAL 9":::R2"IS THERE A PRINTER ATTACHED AND WORKING?"p7"PLEASE TYPE Y OR N";PP$<(PP$,1)"Y"PP1_S(34)dn"CALORIE (A LAB SIMULATION) "x:"THIS SIMULATION WILL TAKE AN UNKNOWN" }"PURE CHEMICAL ("WANT TO GET A NEW SET OF MOLECULES TO"V 1"BUILD AND SHOW INSTRUCTOR?TYPE Y OR N";b 6"";ZZ$v @(ZZ$,1)"Y"8 E"HAVE FUN BUILDING THESE MODELS!!" RSTRUCTOR,S CHECK."E "C2H4O2","C3H8O","C2H5N","C2H3FI2","C2H2CL2"Z X15:B$(X):Xm Y(5(1)1) "II. CONSTRUCT AT LEAST THREE ISOMERS OF" B$(Y) ""DRAW DASH DIAGRAM OF EACH ISOMER YOU" '" BUILD ON PAPERPRINT-OUT." (( , LOWEST MOLECULAR WEIGHT."E " G. HAS THE BIGGEST % BY WEIGHT OF"c " HYDROGEN(IF ANY!!)" " H. HAS AN EMPIRICAL FORMULA THAT IS" " DIFFERENT FROM MOLECULAR FORMULA." " I.REPRESENTS AN ELEMENT,NOT A COMPOUND." "---------INNS BELOW."8 " A.CONTAINS AT LEAST ONE DOUBLE BOND."f " B.CONTAINS AT LEAST ONE TRIPLE BOND." " C.CONTAINS MORE THAN ONE DOUBLE BOND." " D.HAS THE MOST ATOMS PER MOLECULE." " E.HAS THE BIGGEST MOLECULAR WEIGHT." " F.HAS THEK KIT FOR PART C"; l10)"DASH DIAGRAM";26)"DOT DIAGRAM"D nY1O sZ14b xX(4(1)Y)m A$(X)y ::: YY4 Z "WHEN READY,HIT RETURN TO CONTINUE";ZZ$ "GIVE FORMULAS OF ANY AND ALL THAT FIT" "THE DESCRIPTIO A$(16)R114; "C2H2","CL2CO","N2","C2CL2"^ "HCN","N(OF)3","NCL3","N2H2" "C2H4O","(CH3)2CS","SCL2","ION"( "F2","H2O2","CH3OH","OF2"2X116:A$(X):Xd"HERE ARE FOUR COMPOUNDS TO BUILD WITH" h"YOUR BALL AND STIC      3590& C2C5C6ī3130Z0 "THERE ARE "A$(C,3)" ELEMENTS IN THIS COMPOUND.":3140: "THIS SUBSTANCE IS AN ELEMENT,NOT A COMPOUND."D 3590N "IN EACH MOLECULE OR CRYSTAL UNIT THERE"X "ARE "A$(C,4)" DOUBLE BONDS."b 3590!l "THE MO30708 "BOILING POINT IS ABOUT "A$(C,1)" (+-10 DEG)"O M$"BOILING POINT"Y 3070 "IT SUBLIMATES AT ABOUT "A$(C,1)"( + - 10DEG)" M$"SUBLIMATION POINT" 3590 "THE MOLECULAR MASS IN AMUS IS ABOUT" A$(C,2)" (+ OR - 4 AMUS)""MURIATIC ACID" , PRINTS QUESTIONS; X103599E X"." Z(X)3010,3080,3110,3150,3180,3210,3260,3310,3360,3430 C10C2C12ī3060 C10ī3050 "THE MELTING POINT IS ABOUT "A$(C,1)"( + - 10 DEG)" M$"MELTING POINT" -90","30","2","0","2.1","1.3","3","6","4","1","NATURAL GAS" "150","60","2","2","2.5","2.9","2","1","1","1","ACID RAIN MAKER" "-33","18","2","0", 2.1",".75","2","4","2","1","SMELLING SALTS" "-85","36","2","0","2.1","1.6","2","2","1","1",,"2.1","1.0","2","1","3","2","AQUA"` "-80","45","2","2","2.5","2","3","2","1","2","DRY ICE" "-160","15","2","0","2.1",".8","3","4","4","1","MARSH GAS" "-100","28","2","1","2.1","1.3","3","7","4","1","RAW MATERIAL OF MANY PLASTICS"; "","SAND" L "320","40","3","0",".9","2.1","1","5","2","2","STRONG BASE" "10.4","100","3","2","2.1","1.8","2","4","1","2","#1 INDUSTRIAL CHEMICAL"  "1270","60","2","0",".9","2.3","1","5","2","2","BASIC ANHYDRIDE" # "102","18","2","0"EGAR"C "800","60","2","0",".9","2.2 ","1","5","3","2","BRINE" "3500","15","1","0","2.5","3.5" ,"4","6","4","2","HARDEST" "120","256","1","0","2.5","2.1","3","3","4","2","YELLOWISH"  "1610","60","2","2",1.8","2.3","4","6","4","2GEN CHLORIDE"D118% B1112A$(D,B)< B:D4 "53","150","3","3","2.1","1.53","3","3","4","1","MOTHBALLS"\ "115","260","1","0","2.5","4.9","3","2","4","1","STARCH TEST" "17" ,"60","3","1","2.1","1.1","2","6","1","1","VINAA$(9)"HYDROGEN SULFATE"6 AA$(10)"SODIUM OXIDE"J AA$(11)"WATER"g AA$(12)"CARBON DIOXIDE" AA$(13)"METHANE CH4" AA$(14)"ETHENE C2H4" AA$(15)"ETHANE C2H6" AA$(16)"SULFUR DIOXIDE" AA$(17)"AMMONIA NH3" AA$(18)"HYDROURN))";ZZ$ v"  DATA VALUESA AA$(1)"P DICHLOROBENZENE"U AA$(2)"IODINE"s AA$(3)"HYDROGEN ACETATE" AA$(4)"SODIUM CHLORIDE" AA$(5)"DIAMOND" AA$(6)"SULFUR(RHOMBIC)" AA$(7)"SILICON DIOXIDE" AA$(8)"SODIUM HYDROXIDE" M30:35,24, $:"YOUR UNKNOWN IS IN FACT"6 &8040@ (1900L ,:9500  SUBROUTINE TO AVOID DUPLICATION OF QUESTIONS 1-10 Z(10) N110 Y(10(1)1) X1N YZ(X)ī1020 X Z(X1)Y .N 0 8 l"((RET YOU'RE READY TO PROCEED."$ 5010. 1900D " HERE WE GO"Y ZZZ11000:ZZZc 5000n 35,14t | X0 XX1 3000 X10280 210 TRTR1 TR2ī200 TR2İ9000 TR2İ8210 "4000:4000:4000 #NU) \AA$(18)" dC(18(1)1), n10006 p2000< vj x" FIRST,WE'LL SHOW YOU THE 18 CHOICES." }"THEY'LL STAY ON THE SCREEN THROUGHOUT" "THE GAME,BUT WHY NOT LOOK THEM OVER NOW" "BEFORE THE TIMER STARTS.THEN HIT RETURN" "WHENY(-2:" ";::"CHEMICAL SEARCH":Q<"A GAME WRITTEN BY DAVE OLNEY"xA"LEXINGTON (MASS)H.S. MARCH,1983"FX11500:XKX0PR"DO YOU NEED INSTRUCTIONS?TYPE Y OR N ";JJ$S(JJ$,1)"N"86U6000V6315 ZA$(18,12               IST OF POSSIBILITIES AGAIN"D"SIMPLY RUN PROGRAM AGAIN.HAVE FUN"`"WITH THIS ANALYSIS!!"f P.%~"WE'LL SHOW YOU ALL TEN FACTS TOGETHER,"]%"AND GIVE YOU EXTRA TIME TO WORK IT OUT."g%1900%"IF YOU GUESS RIGHT WITHIN FIRST FIVE"%"QUESTIONS,YOU GET A TOP SCORE OF 1000."%"GETTING IT WITH FIRST TEN QUESTIONS"&"IS STILL GREA0$`"MORE CHANCE,AS FLASHING OF FACTS RESUME.":$e1900g$j" IF YOU STILL HAVEN'T HIT SPACE BAR,"$o"YOU'LL NOW SEE ON SCREEN A KEY WORD OR"$t"PHRASE THAT IS CLOSELY RELATED TO YOUR"%y"CHEMICAL.AND IF THAT ";::"STILL";::" DOESN'T HELP"".#B"CLOCK.YOU'LL THEN BE ASKED TO TYPE IN"P#G"THE NUMBER OF YOUR CHOICE."\#L1900:#Q"IF YOUR CHOICE IS ";::"RIGHT";::" YOU'LL SEE A"#V"SUMMARY OF THE TEN FACTS,THEN YOUR SCORE"$[" BUT IF YOU'RE ";::"WRONG";::" YOU'LL GET ONE"FLASH ONTO THE"<"$"SCREEN FOR 10 SECONDS OR SO,ONE AFTER"h")"ANOTHER.YOU'LL SEE ALL TEN FACTS ONE""."TIME THROUGH,THEN A SECOND TIME THROUGH.""8" WHEN YOU THINK YOU KNOW THE CHEMICAL,"#="SIMPLY TAP THE ";::"SPACE";::" BAR TO STOP THE THE LIST OF THE 18 POSSIBLE"H! "CHEMICALS ON THE SCREEN CONSTANTLY."R! 1900!" NOW APPLE PICKS ";::"ONE";::" OF THOSE EIGHTEEN"!"AS YOUR UNKNOWN. THE GAME BEGINS!"!" WHEN YOU START THE CLOCK,THE FACTS"""FOR YOUR UNKNOWN WILL S IN ITS MEMORY TEN FACTS"G "ABOUT 18 COMMON CHEMICALS.THESE FACTS"r "GIVE(FOR EXAMPLE)HOW MANY ELEMENTS," "ITS APPROXIMATE MOLECULAR MASS,ITS" "MELTING OR BOILING POINT,WHETHER OR NOT" "IT HAS ANY DOUBLE BONDS,ETC."!"YOU'LL SEECREEN AND THEN">"CURSOR PATIENTLY BLINKS AT YOU WAITING,"e"YOU SHOULD HIT THE RETURN KEY .":"WHY NOT TRY IT NOW!!"1900:"WONDERFUL!DO IT AGAIN!!":1900 DESCRIPTION OF GAME" NOW ABOUT THE GAME !!" :" APPLE HA(16) SO2","(17) AMMONIA, NH3 (18) HCL"2Ip OPENING COMMENTSvz" WELCOME TO THE GAME CHEMICAL SEARCH":"BEFORE WE BEGIN,LET'S SHOW YOU HOW TO""CLEAR THE SCREEN WHEN NEEDED. WHEN YOU""SEE ";::"((RETURN))";::" ON THE SDICHLORO BENZENE C6H4CL2"H"(2) IODINE (3)PURE ACETIC ACID(HCH3COO)"o"(4) NACL (5)DIAMOND (6) SULFUR""(7) SIO2 (8) NAOH (9) H2SO4""(10) NA2O (11) WATER (12) CO2 GAS""(13) METHANE,CH4 (14)ETHENE,C2H4" "(15) ETHANE, C2H6 :"SORRY...YOUR UNKNOWN IN FACT IS":8040:1900:9500KNUM104320\35,24:7000rNUMNUM10:82101900:950035,24:80001900:9500 CHOICES FOR USER16" HERE ARE YOUR CHOICES""(1) PARA AT IT."+6"BUT IF YOU'RE RIGHT....WOW!!"^@:" TYPE IN NOW THE ";::"NUMBER";::" OF"J"YOUR CHOICE..NOT ITS NAME ";ANSTANSC4290hVVVVVV1rVVV14240|"NOPE!!ONE MORE SHOT AT IT."1900:499935,24NUM30*IONSNUMNUM1s. TIMING ROUTINE<TT1GGGMQQ(16384)^QQ1254100fTTp4999~16368,0:" OK !!"" HERE'S WHERE YOU TYPE IN YOUR"""SELECTION. IF YOU'RE WRONG,YOU'LL","GET JUST ONE MORE CHANCE Y EXTENT"> P(A$(C,9))DH "WHEN STIRRED INTO WATER,SUBSTANCE"OR P$(P)Y\ 3590|f R$(1)"HAS A ":R$(2)"HAS NO "p R(A$(C,10))z "SUBSTANCE "R$(R)"DISTINCTIVE SMELL." 35904000TR1ī3599  COUNTER OF # OF QUESTI-TETRAHEDRAL"! Q$(7)"PLANAR"K "ITS MOLECULAR SHAPE IS ESSENTIALLY"d Q(A$(C,8)):Q$(Q)n 3590 P$(1)"MAKES AN ACID":P$(2)"MAKES A BASE"* P$(3)"MIXES,WITH SOLUTION OF PH BETWEEN 5 AND 9" 4 P$(4)"JUST DOESN'T DISSOLVE TO ANSIFY IT AS A"Q T$(1)"IONIC":T$(2)"POLAR COVALENT":T$(3)"NON-POLAR COVALENT"k T$(4)"NETWORK SOLID" T(A$(C,7)):T$(T)" SUBSTANCE." 3590 Q$(1)"BENT":Q$(2)"STRAIGHT":Q$(3)"A RING":Q$(4)"PYRAMIDAL" Q$(5)"A CRYSTAL":Q$(6)"MULTST METALLIC ELEMENT IN THIS SUB-"Sv "STANCE HAS AN ELECTRONEGATIVITY OF "A$(C,5)] 3590 "ITS DENSITY AT STP IS ABOUT " A$(C,6); C113240 " G/ML (+ OR -.1 UNIT)":3250 " G/L (+ OR -.1 UNIT)" 3590  "MOST CHEMISTS CLAS7)C(5)ī100 "C(7)C(6)1002 'D(7)D(6)100@ +G0599[ , INSTRUCTIONS TO USER 6::" A MINIQUIZ ON CONCENTRATIONS ": ; @"TYPE IN YOUR FIRST NAME,PLEASE" JZ$ L1100 N" DO YOU NEED FURTHER INSTRUCTIONS?" P"IF SO,)2.5:D(2)4.0:D(3)6.0/ D(4)5.0:D(5)6.666J D(6)A:D(7)B10(6C)e D(7).001(1000D(7)) CHECKS TO AVOID TIES D(6)D(2)D(6)D(3)D(6)D(4)ī100 D(7)D(1)D(7)D(2)D(7)D(3)D(7)D(4)ī100 C(7)C(1)C(7)C(2)C(7)C(3)C(" BIGGEST "3 DATABANK AS SUBSCRIPTED VARIABLESO A(1)25:A(2)40:A(3)60l A(4)37.5:A(5)50:A(7)B B(1)11:B(2)22:B(3)44 B(4)22:B(5)88:B(7)C C(1)250:C(2)400:C(3)600 C(4)375:C(5)500 C(6)40A:C(7)1000B(6C) D(1M dAA(1)iA(7(1)3)4nB3(12(1)1)HxC5(4(1)1)ZD(3(1)1)lE(2(1)4)A$(1)"GRAMS DISSOLVED/LITER"A$(2)"MOLARITY OF SOLUTION"B$(1)"GRAMS/L":B$(2)"MOLARITY"F(2(1)1) D$(1)" MOST ":D$(2)         HAD FUN PLAYING THE GAME"@0R&" ";::"CHEMICAL SEARCH":R0\&" BYE NOW!!"X0'a0'X NAME"2/%"IN TIME.TOO BAD!!WHY NOT TRY AGAIN?!">/%1900:`/%"REMEMBER,TOP SCORE IS 1000"/%"YOUR SCORE THIS TIME AROUND WAS "S/&:"WOULD YOU LIKE TO PLAY AGAIN?"/ &"INPUT Y OR N ";WW$/&(WW$,1)"N"ī9800/ &:::860H&"HOPE YOU OUS !!":9700].%S850ĺ"PRETTY GOOD! YOU GOT IT WITH THE FIRST ROUND OF QUESTIONS.":9700.%S600ĺ"NOT BAD!! YOU DIDN'T NEED THE FINAL HINT":9700.%S500ĺ"WHEW!!JUST MADE IT!!WHY NOT TRY AGAIN?!":9700/%"OH-OH....YOU DIDN'T DISCOVER IT'S:-#-% CLOSING MESSAGE5-!% NOT A SUBROUTINE;-0%P-:%STU110025NUMd-D%STU1000ī9570o-N%SSTUy-X%9580-b%S1000-l%"YOU'RE SCORE IN THIS ROUND WAS "S-v%:-{%S1000ĺ"TOP SCORE!! FANTASTIC!!!":9700 .%S900ĺ"THAT'S STUPENDCLUE#11',2#:"STILL HAVEN'T GOT IT ?"R,<#"WE'LL GIVE YOU A CLUE...A PHRASE...",F#"THAT MAY HELP YOU TO IDENTIFY IT. IT'S",P#:" ";A$(C,11),Z#4000,_#NUM24,d#" OK, ONE LAST HELP",n#"WE'LL PRINT OUT ALL 11 FACTS FOR YOU."-x#1900TY AT STP IS "A$(C,6)7+N "7.IT'S A "T$(T)" SUBSTANCE"^+X "8.IT'S MOLECULAR SHAPE IS "Q$(Q)+b "9.IF STIRRED INTO WATER,IT "P$(P)+g "10.IT "R$(R)" DISTINCTIVE SMELL."+l "11.IT'S DISTINCTIVE PHRASE IS":" ";A$(C,11)+ ,(# ROUTINE TO GIVE S PROPERTIES"/* "1.IT HAS A "M$" OF "A$(C,1)\* "2.ITS MOLECULAR MASS IS ABOUT "A$(C,2)*& "3.THERE ARE "A$(C,3)" ELEMENTS IN IT."*0 "4.THERE ARE "A$(C,4)" DOUBLE BONDS/MOLECULE"*: "5.ITS MOST METALLIC ATOM HAS EN OF "A$(C,5)+D "6.ITS DENSIX1):"NOW WE'LL SUMARIZE THE PROPERTIES OF"O)" ";::AA$(C):U)r)@ CONGRATULATORY MESSAGEx)J)T"CONGRATULATIONS !! ")^"YOU'RE CORRECT!! YOUR UNKNOWN INDEED IS")h" ";::AA$(C):)r35,24 * " LET'S CHECK ITOW!I'LL FALL ASLEEP! 15 OR LESS":6350<(GGG(300K4.5)Z(::"NOW WE CAN BEGIN!!"d(N1900j(W(X NEEDED TO ESTABLIS P$(P),ETC([" YOU'RE RIGHT!!"(]GGG60:"LET'S SEE ITS OTHER PROPERTIES."(b1900(j(lX110(v3000)LAYERS MAY CHOOSE TO"@'"CHALLENGE THEMSELVES BY SPEEDING UP"U'"THE DISPLAYS!"':"PICK A DISPLAY TIME BETWEEN FIVE AND"'"FIFTEEN SECONDS."'"TIME IS TO BE ";K'K5ĺ"APPLE CAN'T WORK THAT FAST!! 5 OR MORE!":6350&(K15ĺ"TOO SLT,BUT SCORE GOES DOWN WITH":&"EACH NEW 'FLASH'.":1900@&_& USER SELECTS TIMING RATE&" NOW TO MAKE THINGS MORE INTERESTING"&"WE'LL LET ";::"YOU";::" SET THE RATE AT WHICH"&"THE QUESTIONS COME AT YOU!"'"MORE EXPERIENCED PAMS OF SOLUTE/L"E^3)"SOLUTION #"V" HAS "C(E)" GRAMS DISSOLVED/L"nh3)"SOLUTION #3 HAS "C(6)" GRAMS/L"r3)"SOLUTION #4 HAS "C(7)" GRAMS/L"w1700|4)"SOLUTION #"U" HAS A MOLARITY OF "D(D)4)"SOLUTION #"V" HAS A MOLARITY OF "D(E)" P9:%U(Y41):V(Y62)1MMMM1>Y7Z4KY6Z3XY5Z2eY4Z2sY3Z1~" "Z;L(MM)Z@ SHOWS ORDER FOR GRAMS/LITERJU(D41):V(E62)OF21660T3)"SOLUTION #"U" HAS "C(D)" GRASE ((RETURN)) AND APPLE"Jt"SITS WAITING,YOU SHOULD HIT THE KEY"u~"LABELLED RETURN. IN FACT,WHY DON'T""TRY IT RIGHT NOW!!""((RETURN))";W$:P1P2P3P4ī1180"UH-UH!PLEASE TYPE IN A NUMBER,EITHER1,2,3,OR 4D OFF) IN AMUS"3" KNO3=100 AMU KCL=75 AMU"Z" NAOH=40 AMU H2SO4=100 AMU"l:38);" ":v1170|L:Z$;" ,FROM TIME TO TIME WE WILL"V"WANT YOU TO CLEAR THE SCREEN OR TO"`"PROCEED ONWARDS.WHEN YOU SEE THE"j"PHR ML SOLUTION"74);"KNO3";12);"11 DEG";20);"25 G"a4);"KNO3";12);"22 DEG";20);"40 G"4);"KNO3";12);"44 DEG";20);"60 G"4);"KCL";12);"22 DEG";20);"37.5 G"4);"KCL";12);"88 DEG";20);"50 G":"MOLECULAR WEIGHTS(ROUNDE >16002 DATA TABLE FOR THIS PROGRAM8B(11)e:18);"DATA TABLE ":"SOLUBILITY LIMITS OF TWO SOLUTES"4);"SOLUTE";12);"CELSIUS";20);"GRAMS OF SOLUTE"4);"FORMULA";12);" TEMP"; 20);"PER 100"IS THIS ORDER YOU WANT?IF NO,WE'LL GIVE"V "ANOTHER SHOT AT ENTERING NUMBERS."l"TYPE Y OR N ";C$:(C$,1)"Y"ī800(C$,1)"N"ĺ"HEY!,PLEASE INPUT Y OR N !!":785G0:680  COMPARES USER ANSWER TO DATABANK*68049750BSQSRĺ"YOU ALREADY USED THAT NUMBER!TRY AGAIN!":750q"FINALLY,NUMBER OF LEAST CONCENTRATED ";TPT:1175P9760TQTRTSĺ"ONLY ONE NUMBER UNUSED!TRY AGAIN!!":760:" YOUR PREDICTED ORDER IS # "Q",#"R",#"S",#"T-$"TYPE IN ITS ";::"NUMBER";::5" HERE ";QCPQ:1175PP9730w"NOW NUMBER OF SECOND BIGGEST ";RPR:1175P9740RQĺ"YOU ALREADY USED THAT NUMBER!TRY AGAIN":740"NOW THE THIRD LARGEST ";SPS:1175PING ORDER OF ";G0655'B$(F)0658=:A$(F)KG0715T" "]904c USER INPUTS HIS ORDERGG1"NOW,"Z$" ,";"HERE'S THE SET AGAIN."605G2820:"WHICH SOLUTION HAS THE"D$(F);A$(F);"?")SATURATED SOL OF KNO3 AT "B(D)" DEG C"Zb3)"(2)SATURATED SOL OF KCL AT "B(E)" DEG C"l3)"(3)A SOLUTION OF NAOH THAT IS "D(6)" MOLAR"v3)"(4)A SOLUTION OF H2SO4 THAT HAS"6);B"X10^23 MOLECULES IN "C100" ML":"PUT THEM IN DECREASTHE NUMBERS THAT GIVE"EI"YOUR ORDER AND THEN WE'LL TELL YOU WHAT"xN"WE THINK THE ";::"RIGHT";::" ORDER IS!!"S1170W:G0:MM0X GIVES USER FOUR SOLUTIONSZ"HERE ARE YOUR FOUR SOLUTIONS TO COMPARE."[X11200:X']3)"(1 SOLUTIONS. AFTER YOU"B"DO SOME COMPUTATIONS (MOSTLY IN YOUR"p"HEAD!THE ARITHMETIC IS NOT TOO TOUGH!)"&"YOU SHOULD BE ABLE TO RANK THEM FROM "0:"MOST";::"CONCENTRATED TO";:" ";::"LEAST";::" CONCENTRATED."D"YOU'LL INPUT MATION IN A"3"DATA TABLE. IT LOOKS LIKE THIS:"=1170F900m:"DON'T WORRY,";Z$;",YOU'LL GET""A SECOND (OR THIRD!) LOOK AT THAT TABLE""LATER ON.NOW FOR THE QUIZ!":" WE'LL GIVE YOU INFORMATION ABOUT""FOUR DIFFERENT", |"SOLUBILITY LIMITS OF SATURATED SOL-"W "UTIONS;SOME WILL BE MOLARITIES;SOME" "WILL BE MOLECULES DISSOLVED PER LITER" 1170 :" YOU'LL PROBABLY WANT SOME DATA" "ABOUT THE CHEMICALS INVOLVED,AND WE'LL" "GIVE YOU THAT INFORTYPE Y ;TO GO DIRECTLY TO QUIZ,"? Q"TYPE N.ENTER Y OR N.";J$T R(J$,1)"N"599~ T" OK,";Z$;" THIS PROGRAM WILL TEST" ^"YOUR UNDERSTANDING OF CONCENTRATION" h"UNITS.YOU'LL GET INFORMATION ABOUT" r"FOUR DIFFERENT SOLUTIONS. SOME WILL BE*D"YOU'LL INPUT THE NUMBERS THAT GIVE"YI"YOUR ORDER AND THEN WE'LL TELL YOU WHAT"N"WE THINK THE ";::"RIGHT";::" ORDER IS!!"S1170W:G0:MM0X GIVES USER FOUR SOLUTIONSZ"HERE ARE YOUR FOUR SOLUTIONS TO COMPARE."[X1*"FOUR DIFFERENT SOLUTIONS. AFTER YOU"V"DO SOME COMPUTATIONS (MOSTLY IN YOUR""HEAD!THE ARITHMETIC IS NOT TOO TOUGH!)"&"YOU SHOULD BE ABLE TO RANK THEM FROM "0:"MOST";::"CONCENTRATED TO";:" ";::"LEAST";::" CONCENTRATED.""GIVE YOU THAT INFORMATION IN A"G"DATA TABLE. IT LOOKS LIKE THIS:"Q1170Z900:"DON'T WORRY,";Z$;",YOU'LL GET""A SECOND (OR THIRD!) LOOK AT THAT TABLE""LATER ON.NOW FOR THE QUIZ!":" WE'LL GIVE YOU INFORMATION ABOUT"UTIONS. SOME WILL BE"@ |"SOLUBILITY LIMITS OF SATURATED SOL-"k "UTIONS;SOME WILL BE MOLARITIES;SOME" "WILL BE MOLECULES DISSOLVED PER LITER" 1170 :" YOU'LL PROBABLY WANT SOME DATA" "ABOUT THE CHEMICALS INVOLVED,AND WE'LL" TIONS?"4 P"IF SO,TYPE Y ;TO GO DIRECTLY TO QUIZ,"S Q"TYPE N.ENTER Y OR N.";J$h R(J$,1)"N"599 T" OK,";Z$;" THIS PROGRAM WILL TEST" ^"YOUR UNDERSTANDING OF CONCENTRATION" h"UNITS.YOU'LL GET INFORMATION ABOUT" r"FOUR DIFFERENT SOL7)C(2)C(7)C(3)C(7)C(5)ī1003 "C(7)C(6)100F 'D(7)D(6)100T +G0599o , INSTRUCTIONS TO USER 6::" A MINIQUIZ ON CONCENTRATIONS ": ; @"TYPE IN YOUR FIRST NAME,PLEASE" JZ$ L1100 N" DO YOU NEED FURTHER INSTRUC1000B(6C)+ D(1)2.5:D(2)4.0:D(3)6.0C D(4)5.0:D(5)6.666^ D(6)A:D(7)B10(6C)y D(7).001(1000D(7)) CHECKS TO AVOID TIES D(6)D(2)D(6)D(3)D(6)D(4)ī100 D(7)D(1)D(7)D(2)D(7)D(3)D(7)D(4)ī100 C(7)C(1)C($(1)" MOST ":D$(2)" BIGGEST "G DATABANK AS SUBSCRIPTED VARIABLESc A(1)25:A(2)40:A(3)60 A(4)37.5:A(5)50:A(7)B B(1)11:B(2)22:B(3)44 B(4)22:B(5)88:B(7)C C(1)250:C(2)400:C(3)600 C(4)375:C(5)500 C(6)40A:C(7)] dAA(1)iA(7(1)3)4nB3(12(1)1)RsB15B21B27B33ī110fxC5(4(1)1)xD(3(1)1)E(2(1)4)A$(1)"GRAMS DISSOLVED/LITER"A$(2)"MOLARITY OF SOLUTION"B$(1)"GRAMS/L":B$(2)"MOLARITY"F1 D     E,PLEASE." !"K IS TO BE ";K-!K2100E!:"BYE FOR NOW!!!"K! RE WRONG AND CAN'T SEE WHY,"Z$K "GET HELP FROM INSTRUCTOR IF POSSIBLE."U 1170 :"YOU'VE DONE PRETTY WELL SO FAR,"Z$ "AT THIS POINT YOU CAN CHOOSE EITHER TO" "QUIT OR GET A SECOND SET OF SOLUTIONS." !"LET K=1 TO QUIT, 2 TO CONTINUIL11910."ACTUAL ORDER IS ";@X14:Y17UF(X)D(Y)İ1200_Y:Xe"YOUR ORDER FOR ";A$(F);" WAS #"Q",#"R",#"S",AND #"TL(1)QL(2)RL(3)SL(4)Tĺ"YOU'RE RIGHT!CONGRATULATIONS!!":19761170 "IF YOU'(I)E(I1):E(I1)MNL1"XI0]L11830Ib"ACTUAL ORDER IS ";[dX14:Y17pfE(X)C(Y)İ1200zhY:Xjk1960l SORT OUT ORDER OF MOLARITIESvL0I13F(I)F(I1)ī1945MF(I):F(I)F(I1):F(I1)ML100 G/MOLE"34)"KNO3=100 G/MOLE KCL=75 G/MOLE"b SORT OUT ORDER FROM DATA FOR GRAMS/LITERE(1)C(D):E(2)C(E):E(3)C(6):E(4)C(7)F(1)D(D):F(2)D(E):F(3)D(6):F(4)D(7)F21900&L00I13:E(I)E(I1)ī1880DME(I):E,4)"SOLUTION #3 HAS A MOLARITY OF "D(6)Y4)"SOLUTION #4 HAS A MOLARITY OF "D(7){12)"(INFO FROM DATA TABLE)"4)"SOLUBILITY LIMIT OF #"U" IS "A(D)" G/100ML"4)"SOL LIMIT OF #"V" IS "A(E)" G/100 ML" 4)"NAOH=40 G/MOLE H2SO4=170. "IF YOU'RE WRONG AND CAN'T SEE WHY,"Z$[ "GET HELP FROM INSTRUCTOR IF POSSIBLE."e 1170 :"YOU'VE DONE PRETTY WELL SO FAR,"Z$ "AT THIS POINT YOU CAN CHOOSE EITHER TO" "QUIT OR GET A SECOND SET OF SOLUTIONS."!"LET K=1 TO QUF(I1)ML1I%L11910>"ACTUAL ORDER IS ";PX14:Y17eF(X)D(Y)İ1200oY:Xu"YOUR ORDER FOR ";A$(F);" WAS #"Q",#"R",#"S",AND #"TL(1)QL(2)RL(3)SL(4)Tĺ"YOU'RE RIGHT!CONGRATULATIONS!!":1976 11880#DME(I):E(I)E(I1):E(I1)M+NL12XI@]L11830Yb"ACTUAL ORDER IS ";kdX14:Y17fE(X)C(Y)İ1200hY:Xjk1960l SORT OUT ORDER OF MOLARITIESvL0I13F(I)F(I1)ī1945MF(I):F(I)F(I1): G/MOLE H2SO4=100 G/MOLE"C4)"KNO3=100 G/MOLE KCL=75 G/MOLE"r SORT OUT ORDER FROM DATA FOR GRAMS/LITERE(1)C(D):E(2)C(E):E(3)C(6):E(4)C(7)F(1)D(D):F(2)D(E):F(3)D(6):F(4)D(7)F21900&L00I13:E(I)E(I1)ī1LARITY OF "D(E)<4)"SOLUTION #3 HAS A MOLARITY OF "D(6)i4)"SOLUTION #4 HAS A MOLARITY OF "D(7)12)"(INFO FROM DATA TABLE)"4)"SOLUBILITY LIMIT OF #"U" IS "A(D)" G/100ML"4)"SOL LIMIT OF #"V" IS "A(E)" G/100 ML"4)"NAOH=40U" HAS "C(D)" GRAMS OF SOLUTE/L"U^3)"SOLUTION #"V" HAS "C(E)" GRAMS DISSOLVED/L"~h3)"SOLUTION #3 HAS "C(6)" GRAMS/L"r3)"SOLUTION #4 HAS "C(7)" GRAMS/L"w1700|4)"SOLUTION #"U" HAS A MOLARITY OF "D(D)4)"SOLUTION #"V" HAS A MOEITHER1,2,3,OR 4"P9:5U(Y41):V(Y62)AMMMM1NY7Z4[Y6Z3hY5Z2uY4Z2Y3Z1" "Z;L(MM)Z@ SHOWS ORDER FOR GRAMS/LITERJU(D41):V(E62)OF21660 T3)"SOLUTION #"E THE"/j"PHRASE ((RETURN)) AND APPLE"Zt"SITS WAITING,YOU SHOULD HIT THE KEY"~"LABELLED RETURN. IN FACT,WHY DON'T""TRY IT RIGHT NOW!!""((RETURN))";W$:P1P2P3P4ī1180"UH-UH!PLEASE TYPE IN A NUMBER,R WEIGHTS(ROUNDED OFF) IN AMUS"C" KNO3=100 AMU KCL=75 AMU"j" NAOH=40 AMU H2SO4=100 AMU"|:38);" ":1170L:Z$;" ,FROM TIME TO TIME WE WILL"V"WANT YOU TO CLEAR THE SCREEN OR TO"`"PROCEED ONWARDS.WHEN YOU SE20);"PER 100 ML SOLUTION"G4);"KNO3";12);"11 DEG";20);"25 G"q4);"KNO3";12);"22 DEG";20);"40 G"4);"KNO3";12);"44 DEG";20);"60 G"4);"KCL";12);"22 DEG";20);"37.5 G"4);"KCL";12);"88 DEG";20);"50 G":"MOLECULAK *6804>1600 B DATA TABLE FOR THIS PROGRAMHR(11)u:18);"DATA TABLE ":"SOLUBILITY LIMITS OF TWO SOLUTES"4);"SOLUTE";12);"CELSIUS";20);"GRAMS OF SOLUTE"4);"FORMULA";12);" TEMP";,#"R",#"S",#"T="IS THIS ORDER YOU WANT?IF NO,WE'LL GIVE"f "ANOTHER SHOT AT ENTERING NUMBERS."|"TYPE Y OR N ";C$:(C$,1)"Y"ī800(C$,1)"N"ĺ"HEY!,PLEASE INPUT Y OR N !!":785G0:680  COMPARES USER ANSWER TO DATABANS:1175P9750RSQSRĺ"YOU ALREADY USED THAT NUMBER!TRY AGAIN!":750"FINALLY,NUMBER OF LEAST CONCENTRATED ";TPT:1175P9760TQTRTSĺ"ONLY ONE NUMBER UNUSED!TRY AGAIN!!":760:" YOUR PREDICTED ORDER IS # "Q"D$(F);A$(F);"?"4"TYPE IN ITS ";::"NUMBER";::E" HERE ";QSPQ:1175`P9730"NOW NUMBER OF SECOND BIGGEST ";RPR:1175P9740RQĺ"YOU ALREADY USED THAT NUMBER!TRY AGAIN":740"NOW THE THIRD LARGEST ";SP THEM IN DECREASING ORDER OF ";,G06557B$(F)@658M:A$(F)[G0715d" "m904s USER INPUTS HIS ORDERGG1"NOW,"Z$" ,";"HERE'S THE SET AGAIN."605G2820:"WHICH SOLUTION HAS THE"1200:X;]3)"(1)SATURATED SOL OF KNO3 AT "B(D)" DEG C"nb3)"(2)SATURATED SOL OF KCL AT "B(E)" DEG C"l3)"(3)NAOH AQ WITH "C(6)" GRAMS PER LITER"v3)"(4)A SOLUTION OF H2SO4 THAT HAS"6);B"X10^23 MOLECULES IN "C100" ML":"PUT324,33* 20,6920,6223,6526,6226,69` 20,9220,9525,9525,92:20,9920,9525,9525,99p <936:(22) FI13:J13 KL30I:H50J PA(I,J)10İ1690:1378 ZA(I,J)20İ1500:1378 _A(I,J)30İ1600:1378 bJ:I dSS11880 773,1476,1779,10: ~110,5110,17:115,6110,11115,17c 118,17121,10124,17:120,14122,14 161,5161,17:166,6161,11166,17 169,17173,17173,13169,13169,9173,9 176,17176,9180,9180,13176,13 24,3020,3020,3724,37:20,3(BB$,1)"Y"TT1 & NN1::38 43,23195,23J 43,25195,25\ 43,55195,55n 43,85195,85 43,115195,115 43,2343,115 95,2395,115 $145,23145,115 .195,23195,115 L60,560,17:65,660,1165,17 V67,1070,1Z/d:10);"EQUILIBRIUM TIC-TAC-TOE":Tn"DO YOU NEED INSTRUCTIONS?";ZZ$js(ZZ$,1)"N"140vxD$(4)}D$;"RUN TIC-TAC-TOE TEXT"A(3,3):ANS(3,3):B(8)"DO YOU WANT CORRECT ANSWER WHEN WRONG?""INPUT Y OR N ";BB$            !!! 0(FF10))B0ī935>"PLEASE RECORD THIS CODE NUMBER "DDNB10(B1)V45\A"YOU'VE HAD YOUR FOUR QUESTIONS ABOUT X ,"7AA$".";N"HAPPY HUNTING!!"W999kB(10(1)1)AA(10(1)):BB(10(1)):CC(10(1))DD100AA10BBCC:EEAABBCCEE10ĪFF20:950EE20ĪFF30:950FFEEFF(1 MOST"'"COMMON ISOTOPE IN NATURE."0600]"X HAS AN IONIZATION ENERGY OF ABOUT ";S$(BA)" ELCTRON VOLTS(+ OR - 1.0)."600&"X HAS "S$(BA)" DIFFERENT COMMON OXIDA-"+"TION STATES BESIDES ZERO IN NATURE."X:]45* IS ";S$(BA)"." 1600E ^"THERE ARE "S$(BA)" ELECTRONS IN THE"m c"OUTERMOST SHELL OF NEUTRAL ATOM."v h600 "THERE ARE "S$(BA)" ELECTRONS IN THE" "OUTERMOST SHELL OF MOST STABLE ION." 600"THERE ARE "S$(BA)" NEUTRONS IN THE,450,500,550; d"THERE ARE "S$(BA)" ISOTOPES IN NATURE."D s600y S$(BA)" OF ITS SHELLS ARE FILLED TO CAPACITY." 600 "ITS MELTING POINT IS ABOUT "S$(BA)" (+ OR -30)DEG C" 600 "X IS A "S$(BA)"." 600 ,"FORMULA OF OXIDE"7","3","730","METAL","XO","2","8","82","5","1"k & "8","3","440","METALLOID","XO2","6","8","78","9","3" (I1100:S$(I):I *930 -CC1 .C5900 0C;"."; 2"WHICH QUESTION DO YOU WANT ANSWERED?";A FA100,150,200,250,300,350,400,"8","52","7","2"K  "9","3","-110","INERT","NONE","8","8","78","12","0"  "1","3","820","METALLOID","X2O3","5","8","42","11","3" "4","4","320","METAL","X02","4","18","126","7","2" " "1","4","3160","METAL","X2O7","2","8","112","8","3"0 $"TYPE IN YOUR FIRST NAME,PLEASE ";AA$2 S$(100)h  "1","3","90","N.M.","X2O","7","8","74","11","4"  "2","3","65","METAL","X2O","1","8","20","4","1"  "1","2","1500","METAL","X2O3","2","15","32","8","2"  "1","3","2480","METAL","X2O5","1"^3 THIS PROGRAM IS FOR LOW-LEVEL CHEM STUDENTS IT ASSUMES THEY HAVE A N.Y.STATE REGENTS REFERENCE CHART AND A CENCO WALL PERIODIC TABLE. YOU SHOULD FEEL FREE TO ALTER THE QUESTIONS ASKED (AND DATA!) TO SUIT YOUR SYLLABUS.(3):%