TH SHIFT/RUN). ÔHIS MENU WILL LOAD ANY OF THE PROGRAMS ON THE DISK AND WILL BE LOADED BY THE PROGRAMS WHEN ONE EXITS THEM. ÉF THIS PROVES TO BE A NUISANCE, THE PROGRAMS CAN BE LOADED INDIVIDUALLY AND EXITED WITH THE RUN/STOP KEY FOLLOWED BY PRESSING THTIONAL PROGRAMS VARY A GREAT DEAL IN THE AUDIENCE FOR WHICH THEY ARE INTENDED AND IN THEIR QUALITY. ÉT IS SUGGESTED THAT YOU LOOK AT ALL OF THE PROGRAMS ON THIS DISK WHICH YOU HAVE PURCHASED BEFORE MAKING A DECISION ON WHETHER YOU LIKE IT OR NOT. ÔHE NA ÇAMES ÉÉ - 13 PROGRAMS ÇAMES ÉÉÉ - 7 PROGRAMS AMS ÍATHEMATICS ÖÉÉÉ - 11 PROGRAMS ÃOMPUTER ÓCIENCE - 13 PROGRAMS Å7 ÅÎÇÌÉÓÈ Á ÅNGLISH É - 14 PROGRAMS ÅNGLISH ÉÉ - 16 PROGRAMS  E HOME KEY TWICE (TO ELIMINATE THE 40 COLUMN WINDOW); OR THE SUBROUTINE AT LINES 900-999 CAN BE REPLACED WITH A SINGLE LINE "END". ÔHE PROGRAMS ALL HAVE THE SAME BASIC FORMAT, A FORMAT WHICH THE INDIVIDUAL PROGRAMMERS FOLLOWED TO A GREATER OR LESSER DEG INE Â-128 PUBLIC DOMAIN EDUCATION DISKS ARE ARRANGED BY SUBJECT, AS WERE THE Ã-64 DISKS. ÔHE CONTENTS OF EACH Â-128 DISK ARE: Å1 ÇÈÂÔ ÇEOGRAPHY - 13 PROGRAMS ÈISTORY - 5 PROGRAMS ÂUSINESS - 14 PROGRAMS REE. ÔHE PROGRAMS WILL SURELY GIVE PEOPLE IDEAS ON FURTHER EDUCATIONAL PROGRAMS TO BE DEVELOPED, IN SOME CASES BY SUGGESTING GOOD IDEAS, AND IN SOME CASES BY SUGGESTING THINGS TO AVOID. ÆOR NOVICE PROGRAMMERS, THE FORMAT OF THE ENTIRE PROGRAM MAY BE C ÔECHNOLOGY - 10 PROGRAMS Å2 ÓÃÉÅÎÃÅ Á ÓCIENCE É - 12 PROGRAMS ÓCIENCE ÉÉ - 13 PROGRAMS Å3 ÓÃÉÅÎÃÅ Â ÓCIENCE ÉÉÉ - 12 PROGRAMS ÓCIENCE ÉÖ - 12 PROGRAMS Å4 ÍÁÔÈÅÍÁÔÉÃÓ Á ÍONFUSING, SINCE SOME OF THE THINGS IN THE STANDARD FORMAT WERE IGNORED BY THE PROGRAMMERS BUT NOT REMOVED. ÉNSTRUCTIONS FOR MODIFICATION OF DATA USED IN THE PROGRAMS ARE GIVEN IN ABOUT HALF OF THE PROGRAMS. ÁNY OF THE PROGRAMS CAN BE MODIFIED, HOWEVER.ATHEMATICS É - 14 PROGRAMS ÍATHEMATICS ÉÉ - 15 PROGRAMS ÍATHEMATICS ÉÉÉ - 15 PROGRAMS Å5 ÍÁÔÈÅÍÁÔÉÃÓ Â ÍATHEMATICS ÉÖ - 14 PROGRAMS ÍATHEMATICS Ö - 15 PROGRAMS ÍATHEMATICS ÖÉ - 15 PROGRAM ÔHE FORMAT FOR THE PROGRAMS HAS A NUMBER OF SUBROUTINES IN THE BEGINNING: INPUT ROUTINE BEGINNING AT LINE 35 MAIN MENU LINES 300-399 STUDENT INSTRUCTIONS LINES 400-499 TEACHER INSTRUCTIONSS Å6 ÍÁÔÈÅÍÁÔÉÃÓ Ã ÍATHEMATICS ÖÉÉ - 16 PROGRAMS ÍATHEMATICS ÖÉÉÉ - 11 PROGRAMS ÃOMPUTER ÓCIENCE - 13 PROGRAMS Å7 ÅÎÇÌÉÓÈ Á ÅNGLISH É - 14 PROGRAMS ÅNGLISH ÉÉ - 16 PROGRAMS  LINES 500-599 MODIFICATION INSTRUCTIONS LINES 600-699 SCREEN FORMAT LINES 800-899 RETURN TO SHIFT/RUN MENU (MY ADDITION) LINES 900-999 BODY OF PROGRAM LINES 1000- ÔHESE PUBLIC DOMAIN EDUCA ÅNGLISH ÉÉÉ - 15 PROGRAMS Å8 ÅÎÇÌÉÓÈ Â ÅNGLISH ÉÖ - 15 PROGRAMS ÅNGLISH Ö - 13 PROGRAMS ÅNGLISH ÖÉ - 12 PROGRAMS ÅNGLISH ÖÉÉ - 3 PROGRAMS Å9 ÇÁÍÅÓ ÇAMES É - 14 PROGRAMS PAGE DESIGN ROUTINE **TUP²UPª1.W™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)]\™" --------------------------------------"l`‹UH³±0§870 a™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "±fUH²0:™"":ŽÐk ** PLEASE WAIT REMARK **p™È(UD$,24);FERENCE PATTERNS PRODUCED ON"F™" GRAPH PAPER, SO YOU HAVE A RECORD OF"3P™" THEM."<Z840Fd1880Pn1590Yx840‹‚852:™" ÄO YOU WANT TO TRY A DIFFERENT"©‡™" SLIT SEPARATION? ";ÍŠUS$²"NYQ":UL²1:35:‹UR$²"Q"§300ߌ‹U IS THE SLIT SEPARATION IN MM?"(g™" ";:US$²"0123456789.Q":UL²4:35:D²Å(UR$):‹UR$²"Q"§3008l‹D±².1§1940_v™" ÔHE SLITS ARE SO CLOSE THEY„€™" APPROXIMATE A SINGLE SLIT.™Š840:2450:‰1890¬”‹D³²100¬L§1990Ùž™" ÆOR A VALID INTE€*NB ÆILENAME "PUB DOM NOTES" €*LM5:RM75:JU1 ÃÏÍÍÏÄÏÒÅ ÐÕÂÌÉà ÄÏÍÁÉÎ ÅÄÕÃÁÔÉÏÎÁÌ ÐÒÏÇÒÁÍÓ ÔHE PROGRAMS IN THIS SERIES OF CONVERSIONS FOR THE Â-128 WERE ORIGINALLY WRITTEN FOR THE ÃOMMODORE ÐÅÔ COMPUTERS BY STUDENTS AND TEACHERS IN THE ÃANADIAN PUBLIC , WITH SEVERAL EXCEPTIONS: THE ORIGINAL PROGRAMS HAD WHAT WAS CALLED A "HELP FUNCTION," WHICH WOULD ALLOW THE USER TO RETURN TO THE MAIN MENU AND LOOK AT EITHER TEACHER OR STUDENT INSTRUCTIONS OR MODIFICATION INSTRUCTIONS BEFORE RETURNING TO THE PROGRAM " ONE MOMENT PLEASE... " uŽ/„ -- LOAD AND RUN MENU PROGRAMJ‰TT$²"0:SHIFT/RUN MENU"VŽ™Ç(147)\“™b˜™ƒ™"LOAD";Ç(34);TT$;Ç(34);",8"‰¢™§™•¬™›±™§¶™ "RUN"³À™ Ç(19)¾Ê—209,2ÊÔ—939,13ÖÞ—940,13Üç€ R$²"N"§1450ñ–‹UR$²"Y"§1380ûª2000 ´1590:840<¾852:™" ÄO YOU WANT TO TRY A DIFFERENT"UÙ" WAVELENGTH? ";yÆUS$²"NYQ":UL²1:35:‹UR$²"Q"§300‹È‹UR$²"N"§1510Ò‹UR$²"Y"§1450¨æW²6000²ð1750Áú1590:840ó852:™"  RFERENCE PATTERN, ¨™" THE SLIT SEPARATION SHOULD BE LESS+ ²™" THAN"100¬L;"MM. ÔRY AGAIN.@ ¼840:2450:‰1890F ÆŽO Ð852w Ú™:™" ×HAT IS THE NEW WAVELENGTH› ßA²Â(U4)ª2:™" IN ÁNGSTROMS? "¨ à™" ";Þ âUS$²"0123456789.Q":UL²5: SCHOOL SYSTEM, WHERE ÃOMMODORE HAS 67 PER CENT OF THE COMPUTER MARKET. ×HEN THE ÃOMMODORE 64 COMPUTER WAS RELEASED, THERE WERE ONLY A LIMITED NUMBER OF PROGRAMS AVAILABLE, SO A NUMBER OF THE ÃANADIAN PROGRAMS WERE CONVERTED TO RUN ON THE ÃOMMODORE 64 A AT THE POINT AT WHICH THE HELP WAS REQUESTED. É HAVE ELIMINATED THIS FUNCTION, BOTH BECAUSE THE INSTRUCTIONS GENERALLY DO NOT PROVIDE THE TYPE OF HELP WHICH ONE WOULD WANT IN THE MIDDLE OF THE PROGRAM, AND BECAUSE THE PROGRAMS WERE NOT ALWAYS WRITTEN Tè‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **é™"“";:Œü™"“"7L²2:W²6000:D².5:UG$²""JUP²0:UH²1:852{.™" ÔHIS COMPUTER SIMULATION WILL ALLOWª8™" YOU TO EXAMINE ÙOUNG'S DOUBLE SLIT "ÁB™" EXPERIMENT."ôL™" ÙOU CAN STUDY  ÄO YOU WANT TO TRY A DIFFERENT" ™" SLIT SCREEN LENGTH? ";8 US$²"NYQ":UL²1:35:‹UR$²"Q"§300J‹UR$²"Y"§1520T,‰2160]6™"“"@™" Ì=";L;"M ×=";W;"ÁNGSTROMS Ä=";D;"MM"®J™" ÄISTANCE(MM FROM CENTRE)"¾TA²«.18:B².2â^R²(3.1416¬D¬135:W²Å(UR$):‹UR$²"Q"§300ð ä‹W±²3000§2060!î‹W³1000§2120.!ø™:™" Á WAVELENGTH OF ";W;" IS ULTRA-"d!™" VIOLET LIGHT, AND SO IS NOT VISIBLE.":‰2090v! ‹W³²8000§2150¦!™:™" Á WAVELENGTH OF ";W;" IS INFRA-RED"Ï! ™" LIGHT, AND SO IS NOND RELEASED TO THE PUBLIC DOMAIN. ÐROGRAMS IN THE PUBLIC DOMAIN ARE NOT COPYRIGHT AND ARE AVAILABLE TO ANYONE TO COPY OR MODIFY OR WHATEVER. ÔHE EDUCATIONAL PROGRAMS, ORIGINALLY NUMBERING 656, WERE AVAILABLE TO DEALERS TO COPY FOR THEIR CUSTOMERS, BUT O ALLOW THE HELP FUNCTION TO BE CALLED AT ANY TIME. Á "QUIT FUNCTION" WAS ADDED, WHICH WAS AVAILABLE IN SOME OF THE PROGRAMS, SO THAT ONE MAY RETURN TO THE MENU DURING THE PROGRAM BY ENTERING "Q" INSTEAD OF THE ANSWER TO A QUESTION. ÔHE RUN/STOP KEY WATHE EFFECT OF ALTERING "#V™" THE PARAMETERS ON THE INTERFERENCE "?`™" PATTERN PRODUCED.Rb840:UH²1:852tj™" ÔHE PARAMETERS ARE:"¤t™" 1. ×AVELENGTH OF LIGHT (ÁNGSTROMS)."È~™" 2. ÓLIT SEPARATION (MM)."óˆ™" 3. ÓLIT00000)­(W¬L):1720òhX²A¤B ©.02 rY²20¬¾(R¬X)¬¾(R¬X))w‹¶(X)³.001§X$²" 0.00":‰17003|2400Q¤™£29);X$;£µ((Yª39.5)))"."Y®‚:Žˆ¸™£39);"²":AA²1¤17:™£39);"Ý":‚AA:™£39);"±"ÄÀ™"«ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÛÀÀÀÀINTENSITYÀÀÀÀÀÀ³ÐÁ™"T VISIBLE."ü!*™" ÔHE INTERFERENCE PATTERN WILL ONLY""/™" BE VISIBLE USING DETECTORS.8"4™" ÔRY AGAIN."M">840:2450:‰2016y"H™" Á WAVELENGTH OF ";W;" IS Ø-RAYS,›"R™" AND SO IS NOT VISIBLE."¥"\‰2090«"fŽ´"p852ä"z™" ×MOST DEALERS DIDN'T WANT TO BOTHER WITH THE COPY PROCEDURE. ÃOMMODORE SUBSEQUENTLY WENT THROUGH THE 656 PROGRAMS AND ELIMINATED SOME SIMILAR PROGRAMS AND DROPPED SOME WHICH WERE OF LOWER QUALITY. ÔHE RESULTING 334 PROGRAMS WERE RELEASED ON 27 DISKS FORS DISABLED IN THE Ã-64 VERSIONS, BUT É HAVE LEFT IT ENABLED SINCE IT IS NOT EXPECTED THAT THESE PROGRAMS WILL BE USED IN SCHOOLS WHERE IT MIGHT BE ADVANTAGEOUS FOR THE TEACHER TO HAVE TOTAL CONTROL. É HAVE ALSO MADE A FEW MODIFICATIONS IN THINGS LIKE CA TO SCREEN DISTANCE (M)."’840:UH²1:8524¦™" ÉNITIALLY THE PARAMETERS WILL BE"Y°™" GIVEN THE FOLLOWING VALUES:zº™" 1. ×AVELENGTH = 6000."žÄ™" 2. ÓLIT SEPARATION = 0.5."ÅΙ" 3. ÓLIT-SCREEN DISTANCE = 2."ñØ™" ÔHE INTE"ÖÂŽèÖ852:™" "à™" ×HAT IS THE NEW DISTANCE FROM SLITS?êA²Â(U4)ª2:™" TO SCREEN (METRES)? "~ï™" ";:US$²"0123456789.Q":UL²4:35:L²Å(UR$):‹UR$²"Q"§300•ô‹1000¬L±²10¬D§1820Æþ™" ÔHIS DISTANCE IS TOO SMALL FOR GOOD "ç™OULD YOU LIKE A PLOT WITH YOUR OWN#„™" VALUES FOR WAVELENGTH,SLIT SEPARATION;#Ž™" AND SLIT-SCREEN DISTANCE? ";_#˜US$²"NYQ":UL²1:35:‹UR$²"Q"§300n#¢‹UR$²"N"§Žx#¶2000‚#À1:80Œ#Ê1750›#Ô1590:840¾#Þ852:™" ÁNOTHER GRAPH? ";â THE ÃOMMODORE 64. ÔHE Â-128 SERIES AVAILABLE THROUGH ÃÂÕÇ CONTAINS ALL 334 PROGRAMS ON NINE DISKS, WITH PROGRAMS FROM TWO TO FOUR ÃOMMODORE 64 DISKS BEING ON EACH Â-128 DISK. ÔHE SAME PROGRAMS ARE BEING CONVERTED FOR THE Â-128 BY A PROFIT-MAKING ORGANPITALIZATION IN SOME PROGRAMS (É COULDN'T SEE HAVING TO NAME PHYSICAL FEATURES STARTING WITH CAPITAL LETTERS, OR NAMING COUNTRIES STARTING WITH LOWER CASE LETTERS). ÉN ADDITION, É ADDED A MENU AT THE BEGINNING OF THE DISK (WHICH CAN BE LOADED AND RUN WIRFERENCE PATTERN PRODUCEDâ™" USING THESE VALUES IS SHOWN NEXT."&ì84001590C 840:UH²1:852t™" ÙOU CAN VARY ONE OF THE PARAMETERS "¢(™" WHILE KEEPING THE OTHER TWO FIXED."Æ2™" É SUGGEST YOU SKETCH THEò<™" INTER" INTERFERANCE PATTERNS.ü840:2450:‰1775 ‹L³²5§1870:&™" ÁLTHOUGH ANY DISTANCE GREATER THAN"f0™" ";D­100;"IS VALID, ABOVE 5 METRES†:™" BECOMES HARD TO SEE."›D840:2450:‰1775¡NŽ´X852:™""ébA²Â(U4):™" ×HATä#ãUS$²"NYQ":UL²1:35:‹UR$²"Q"§300ô#è‹UR$²"Y"§2230$ò‹UR$²"N"§Ž&$` X$²Ä(X):X$²X$ª"000":X$²È(X$,4)C$j X$²È(X$,1)ª"0"ªÉ(X$,3):Ž\$’ —U4,A:™"‘":AA²1¤13‹$œ ™" " $¦ ‚AA:—U4,A:™"‘":Ž"fŽ´"p852ä"z™" ×IZATION AND ARE BEING RELEASED ON 27 DISKS. ÓINCE É HAVE NOT SEEN THESE CONVERSIONS, É CANNOT COMPARE THEM WITH MY OWN CONVERSIONS. ÉN CONVERTING THE PROGRAMS TO RUN ON THE Â-128, É HAVE GENERALLY TRIED TO KEEP THE PROGRAM THE SAME AS THE Ã-64 PROGRAMS>™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES"**×UX$²"H":†UQ%(1000)âU4²207UD$²"CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **, Œ™"“":‰9007 875:ŽX  ** STUDENT INSTRUCTIONS **a •™"“"‡ šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850¸ Â: ™" ÒEMEMBER TO HIT AFTER"ä Ä: ™" TYPING YOUR ANSWER. ÔHIS TELLS" Æ: ™" TG CHART:"ñ& ™:™"°ÀÀÀÀÀÀÀÀ²ÀÀÀÀÀÀÀÀ®"'( ™"Ý Ý Ý"E'2 ™"Ý Ý Ý"o'< ™"Ý Ý Ý"™'F ™"Ý Ý Ý"Ã'P ™"Ý I²1 ¤ 2000:‚ß,à ™"‘ "ñ,ê I²1 ¤ 1000:‚-ô ™" "V-þ ™"×HAT IS THE RULE FOR CONVERTING FROM ËELVIN TO ÃELSIUS?"p- ™:™"ÃHOOSE A LETTER:"‘- ™:™£17ª21);"‘‘Á) ¾Ã = Ë+273"®- ™£17ª21);"Â) ¾Ã = Ë+10 ED TO REVIEW THE LESSON!"Á2Þ Ê2è 835Ð2ò Žå2ü K²µ(»(1)¬500)ª1:ñ2C²K«273÷2Ž 3 INPUT ROUTINE938US$²"0123456789.-Q":UL²4:35:‹UR$²"Q"§300Q3BIN$²UR$:IN²Å(IN$):Žo3 ™"ÔRY AGAIN!"‚3ªAA²1¤1000:‚AA¢3´™" " "8UP$²" "Y: UT$²" ÙÏÕÎÇ'Ó ÅØÐÅÒÉÍÅÎÔ"q800: TITLE SCREENˆ ‰300: MENU SCREEN¤# +++ INPUT SECTION +++¶(UR$²"":UI$²""Æ*‹UL²0§UL²80Ó-™" ";ç2¡UI$:‹UI$²""§50 7‹UI$²Ç(13)¯Ã(UR$ HE COMPUTER TO ACCEPT WHAT YOU"+ È: ™" HAVE TYPED."X Ê: ™" ÔYPE AT ANY TIME TO RETURN"r Ì: ™" TO THE MENU."{ å835 ê:‡ óŽ¨ ô ** TEACHER INSTRUCTIONS **± õ™"“"× öUP²0:UG$²"ÔEACHER ÉNST":UH²1:850 ÷™" ÔO THE BES Ý Ý"í'Z ™"­ÀÀÀÀÀÀÀÀ±ÀÀÀÀÀÀÀÀ½")(d I²1 ¤ 30:‚I:™ "¤¤¤¤¤¤ËÅÌÖÉÎ"J(n ™"(Ë)"…(x ™"¤¤¤¤¤¤¤ŸÃÅÌÓÉÕÓ"±(‚ ™"(¾Ã)"Ù(Œ  0"Ë-& ™£17ª21);"Ã) ¾Ã = Ë-273"è-0 ™£17ª21);"Ä) ¾Ã = Ë-100"ü-: ™"ÁNSWER ? ";.D 35:C$²UR$:‹UR$²"Q"§3001.N ‹C$²"C"°C$²"Ã"§ 3170j.X ™:™"ÔRY AGAIN!":AA²1¤1000:‚AA:™"‘ ":‰ 3060€.b ™"ÔHAT'S RIGHT!"‰.l 835’.v ™"“"Â.€ ™:™"ÃONVERTING ËEW:ŽÀ3Ò™"×ELL DONE!"Ó3ÜAA²1¤1000:‚AAó3æ™" ":ŽTQ²CRªNW52¶ ™:™"ÙOU SCORED"CR"OUT OF"TQ"TOTAL ATTEMPTS."b2À ‹ NW³²1 § ™:™"ÅXCELLENT EFFORT!":‰ 3550‰2Ê ‹ NW³²5 §™:™"ÇOOD EFFORT!":‰ 3550»2Ô ‹ NW±5 § ™:™"ÙOU NE)±²1§™" ";:‰85<‹UI$²Ç(20)§1052>‹ Ã(UR$)²±UL§50WA120: CHECK FOR VALID CHARACTERgFUR$²UR$ªUI$qK™UI$;yP‰50U:…Z:‹_:‘dŽªf ++ CHECK DELETE ++»i‹Ã(UR$)³1§50ÓnUR$²È(UR$,Ã(UR$)«1)ås™" ";:‰50 x ++ CHECK FOR VT OF OUR KNOWLEDGE,". ø™" THIS PROGRAM IS IN THE PUBLIC"Z ù™" DOMAIN. ÉF THIS IS NOT THE CASE"w ú™" PLEASE CONTACT:"¡ û™" ÃOMMODORE ÂUSINESS ÍACHINES"Ä ü™" 3370 ÐHARMACY ÁVE.è ý™" ÁGINCOURT, ÏNTARIO" þ™I²1¤30:‚ I:™"ÆREEZING POINT")– I²1¤50:‚I:™"273Ë"8)  ™" ";m)ª US$²"0123456789-.Q":UL²4:35:F$²UR$:‹UR$²"Q"§300…)´ ‹F$²"0"§4050:‰2770•)¾ 4000:‰2700Ÿ)È 4050Ç)Ò I²1¤70:‚I:™"LVIN TO DEGREES ÃELSIUS"á.Š ™:™"ÈOW MANY QUESTIONS? ";ü.” 3610:NQ²IN:NW²0:CR²0 /ž II²1¤NQ/¨ 3580B/² ™"“×HAT IS THE TEMPERATURE IN DEGREES"p/¼ ™:™"ÃELSIUS IF THE TEMPERATURE IS";K;"Ë?"”/Æ ™:™" ¾Ã = ";:3610Ê/Ð ‹ IN²C §™:™"ÃORATION INST **þY™"“"#]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850,”8352²:8»ŽX  ** T I T L E P A G E **e"™"“";{$I²1¤38:™"¦’";:‚“&I²1¤22:™"¦’";:‚«(I²1¤37:™"¦’";:‚Ã*I²1¤22:™"‘¦’";:‚è,™"© ALID CHARACTERS ++}‹Ã(US$)²0§150/‚US²1¤Ã(US$)F‡‹UI$²Ê(US$,US,1)§ŽLŒ‚Y‘UI$²"":Žt– ** STANDARD INPUT **…˜‹Æ(UI$)²46§Ž–›‹UI$²Ç(32)§Ž³ ‹Æ(UI$)³48°Æ(UI$)±57§170¹¥ŽÖª‹Æ(UI$)³65°Æ(UI$)±90§180ܯŽ´‹Æ(UI$)³193°Æ(UI$)±218§" ÃANADA Í1× 2Ë4"* ÿ™" (416) 499-4292"D UP²1: 835:UH²1: 850s ™" ÐROGRAM ÎAME: ÙOUNG'S ÅXPERIMENT• ™" ×RITTEN ÂY : ÕNKNOWN¹ ™" ÕPGRADED ÂY : ÒAY ×HITEâ ™" ÃONVERTED ÂY: ÍARILYN ÇARDNER ™" ÂOILING POINT"ì)Ü ™"373Ë"*æ ™" ";.*ð 35:B$²UR$I*ú ‹ B$²"100"§4050:‰2840Y* 4000:‰2770y* ™ "ÁBSOLUTE ZERO" *" ™ "0 Ë"Ö*, ™ "RECT":CR²CRª1:AA²1¤1000:‚AA:‰33000Ú ™:™"×RONG! ÔRY AGAIN!":NW²NWª1:AA²1¤1000:‚AA:‰ 3250 0ä ‚ II0ø EQ²CRªNWJ0 ™:™"ÙOU HAVE"CR"CORRECT OUT OF"EQ"ATTEMPTS."j0 ‹ NW²0§™:™"EXCELLENT WORK!"s0 835|0 ™"“"¡0* ™"ÃONVERTING ÃELSIUS TO ËELVIN"Á04  ’ .™" ’  ’©+0™" ’ £ßI2™"ß ’q4™"C O M M O D O R E”6™"EDUCATIONAL³8™"SOFTWAREÎ: ** COMMODORE LOGO **;™È(UD$,24);"UI$²"":Ž»Ž¾UI$²"":Ž$, ** MENU **..™"“"K1™" ÍENU"z6™" --------------------------------------"¤;: ™" 1. YOUNG'S EXPERIMENTÎ@™" 2. STUDENT INSTRUCTIONS"øE™" 3. TEACHER INSTRUCTION ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒ1 ™" ÉF ERRORS ARE NOTED, CONTACTQ ™" ÍARILYN ÇARDNERu ™" 1630 ÍADISON ÓTREETž ™" ÅVANSTON, ÉLLINOIS 60202¸ UP²2: 835:UH²1: 850Ý™" ÉF YOU WANT TO SUGGEST ™" A ";å*6 35:A$²UR$+@ ‹A$²"-273"§4050:‰2910+J 4000:‰2840%+^ ™""h+h ™"×HAT IS THE RULE FOR CONVERTING FROM ÃELSIUS TO ËELVIN?"€+r ™"ÃHOOSE A LETTER:"¡+| ™:™£17ª21);"‘‘Á) Ë = ¾Ã+273"¾+† ™£17ª21);"™:™"ÎUMBER OF QUESTIONS? ";Ò0> 3610:NQ²INâ0H II²1 ¤ NQí0R 35801\ ™"“×HAT IS THE TEMPERATURE IN ËELVIN"C1f ™:™"IF THE TEMPERATURE IS ";C;"¾Ã?"i1p ™:™"Ë = ";: 3610¡1z ‹ IN²K § ™:™"ÃORRECT":CR²CRª1:AA²1¤1000:‚AA:‰ 3470Ú1PRESS SPACE BAR OR WAIT’":I²0(<¡A$:‹A$³±" "§I²Iª1:‹I³250§828L>T1$²"":T2$²"":T3$²"":T4$²"":I²0U@‰300qC ** SPACE BAR PRESS **¦H™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"»JZZ²0¤9:¡ZZ$:‚ZZÒL¡UI$:‹UI$³±" "§844ØNŽøR ** S" O: ™" 4. QUIT"F T™" --------------------------------------"w Y™" PRESS NUMBER KEY (1-4) THEN ";§ ^: UL²1:US$²"1234":35:---INPUT ROUTINE---² `US$²""Ò c: ‘Å(UR$)1000,400,500,396Û h‰300 ‹ ** REMOVE WINDOW, DDITIONAL EDUCATIONAL PROGRAMS1™" TO BE WRITTEN FOR THE Â128"M™" PLEASE CONTACT"m™" ÍARILYN ÇARDNER‘™" 1630 ÍADISON ÓTREETº™" ÅVANSTON, ÉLLINOIS 60202Ã835ÉN:ÏWŽõX ** PROGRAM MODIFICÂ) Ë = ¾Ã+100"Û+ ™£17ª21);"Ã) Ë = ¾Ã-100"ø+š ™£17ª21);"Ä) Ë = ¾Ã-273" ,¤ ™"ÁNSWER ? ";=,® US$²"ABCDÁÂÃÄQ":UL²1:35:R$²UR$:‹UR$²"Q"§300V,¸ ‹ R$²"A"°R$²"Á"§3020, ™:™"ÔRY AGAIN!":AA²1¤1000:‚AA:™"‘ ":‰ 2910©,Ì ™"ÇOOD CALCULATION!"»,Ö „ ™:™"×RONG! ÔRY AGAIN!":NW²NWª1:AA²1¤1000:‚AA:‰ 3420ã1Ž ‚ IIì1˜ ™"“"õ1¢ TQ²02¬ TQ²CRªNW52¶ ™:™"ÙOU SCORED"CR"OUT OF"TQ"TOTAL ATTEMPTS."b2À ‹ NW³²1 § ™:™"ÅXCELLENT EFFORT!":‰ 3550‰2Ê ‹ NW³²5 §™:™"ÇOOD EFFORT!":‰ 3550»2Ô ‹ NW±5 § ™:™"ÙOU NE ** PROGRAM STARTS HERE **é™"“";:ŒíZZ²»(«Å(TI$))òŒ4ü TEMP CONVERSIONSNTHERMOMETER DIAGRAMSa BOB MUIRHEADg:p¦™"“"‰°™£5ª21)"¢"£11ª21)"¢"°ºI²1¤15:™£4ª23)"§ ¥"£10ª21)"§ ¥":‚ÑÄ™£4ª21)"¡ ’¡"£10ª21)"¡ ’¡"òΙ£4ª21 ’¡"÷"™£4ª21)"¡ ’¡"£10ª21)"¡ ’¡",™"--":™£8ª21)"‘--"76™"--":™£8ª21)"‘--"l@™"¤¤¤¤¤¤¤ÃÅÌÓÉÕÓ"¦J™"¤¤¤¤¤¤ËÅÌÖÉÎ"ÖT™"ÏN A THERMOMETER 00Þ À‹ H$²"100" § 2270!Ê™"ÔRY AGAIN!":AA²1¤1000:‚AAJ!Ï™" ":‰ 2200n!ÔI²1¤50:‚I:™"Ü"œ!Þ™"ÁNOTHER PLUS!"©!è™"100"·!ò™"¾Ã"Û!üI²1¤50:‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **B Œ™"“":‰900M 875:Žn  ** STUDENT INSTRUCTIONS **w •™"“"¥ š™"ÔHIS PROGRAM TEACHES YOU ABOUT THE"Ó ›™"ËELVIN AND ÃELSIUS SCALES AND HOW TO" œ™"CONVERT BETWEEN THE TW ðY™"“"]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850”835$²:*»ŽJ  ** T I T L E P A G E **W"™"“";m$I²1¤38:™"¦’";:‚…&I²1¤22:™"¦’";:‚(I²1¤37:™"¦’";:‚µ*I²1¤22:™"‘¦’";:‚Ú,™"© ’ü.™" )"¡ ’¡"£10ª21)"¡ ’¡" Ø™""£14ª21)"ÉN THE LAB, IN THE METRIC"G♣14ª21)"SYSTEM, WHAT THERMOMETER"w왣14ª21)"SCALE IS USED ? ";ŸöUS$²"":UL²8:35:A$²UR$:‹UR$²"Q"§300ËA$²"ÃELSIUS"°A$²"CELSIUS"§1320é ‹A$³±"CELCIUS"¯A$³ THERE"^™"ARE TWO FIXED POINTS"(h™"INVOLVING WATER.";¤AA²1¤1000:‚AAhž™" ÔHEY ARE:”£™"1. ÆREEZING’ POINT."¿¨™"2. ÂOILING’ POINT."ï²™" ‚I:™"Ü"" ™£5ª21);:I²1¤9:™"Ü‘";:J²1¤50:‚J:‚I8" I²1¤500:‚I:™"Ü"X" ™£11ª21);:I²1¤8:™"Ü‘";:‚“"$ ™"’¤¤¤¦¤¤ËÅÌÖÉÎ"¯". ™"ÆÐ"Å"8 ™" O. ÁS YOU WILL"/ ™"LEARN, THE DIFFERNECE BETWEEN ËELVINS ž™"AND ÃELSIUS IS ALWAYS 273."ƒ ¤™"ÔO QUIT AT ANY TIME PRESS 'Q' RETURN"Œ å835’ ê:˜ óŽ¹ ô ** TEACHER INSTRUCTIONS ** õ™"“"è öUP²0:UG$²"ÔEACHER ÉNST":UH²1:850 ÷™" ’  ’©0™" ’ £ß;2™"ß ’c4™"C O M M O D O R E†6™"EDUCATIONAL¥8™"SOFTWAREÀ: ** COMMODORE LOGO **ø;™È(UD$,24);"PRESS SPA±"ÃELCIUS"§1300™:™£14ª21)"ÓPELLING MISTAKE!":AA²1¤1000:‚AAD™:™£14ª21)"‘‘ ":‰1240_™:™£14ª21)"ÔRY AGAIN!"‘AA²1¤1000:‚AA:™:™£14ª21)"‘‘ ":‰1240º(™:™£14ª21)"ÇOOD ANSWER! ×ARMING UP!"â2™:™£14ª21)" ÔHEIR SYMBOLS AND THEIR"*¼™"EXACT POSITIONS ARE SHOWN":I²1¤300:‚IIÆ™"ÆÐ":™£8ª21)"‘ÆÐ"eЙ"ÂÐ":™ £8ª21)"‘ÂÐ"sÚ835:™"“"Œä™£5ª21)"¢"£11ª21)"¢"³îI²1¤16:™£4ª21)"§ ¥"£10ª21)"§ ¥":‚Ôø™£4ª21)"¡ ’¡"£10ª21ÂÐ"þ"B ™"ÔHE TEMPERATURE INCREASE"1#L ™"FROM THE Æ.Ð.’ TO THE Â.Ð.’"`#V ™"ON THE ËELVIN AND ÃELSIUS"‰#` ™"SCALES IS THE SAME."È#t ™"ÏN THE THERMOMETER  ÔO THE BEST OF OUR KNOWLEDGE,"? ø™" THIS PROGRAM IS IN THE PUBLIC"k ù™" DOMAIN. ÉF THIS IS NOT THE CASE"ˆ ú™" PLEASE CONTACT:"² û™" ÃOMMODORE ÂUSINESS ÍACHINES"Õ ü™" 3370 ÐHARMACY ÁVE.ù ý™" ÁGINCOURCE BAR OR WAIT’":I²0<¡A$:‹A$³±" "§I²Iª1:‹I³250§828>>T1$²"":T2$²"":T3$²"":T4$²"":I²0G@‰300cC ** SPACE BAR PRESS **˜H™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"­JZZ²0¤9:¡ZZ$:‚ZZÄL¡UI$:‹UI$³±" "§844ÊNŽêR ** PAGE DESIGN RO "#<I²1¤600 :‚I:™" ¤¤¤¤¤¤¤ÃÅÌÓÉÕÓ"BF™"Ü"mP™£5ª21);:I²1¤15:™"Ü‘";:J²1¤100:‚:‚Z™"’"£14ª21)"×HAT IS THE NAME OF"¿d™£14ª21)"THE ABSOLUTE SCALE "ïn™£14ª21)"FOR TEMPE)"¡ ’¡"õ™£4ª21)"¡ ’¡"£10ª21)"¡ ’¡" ™"¤¤¤¤¤¤¤ÃÅÌÓÉÕÓ"+™"ÆÐ"] ™"×HAT IS THE FREEZING POINT"Œ*™"OF WATER IN DEGREES "¹4™"ÃELSIUS? ¾Ã= ";ì>US$²"Q012345DIAGRAM"ø#~ ™"É HAVE STATED THE Æ.Ð.’ IN"%$ˆ ™"ËELVIN. ÙOU TYPE IN"R$’ ™"THE BOILING POINT’."x$œ I²1¤200:‚I:™"273"“$¦ ™"Ë"Ñ$° ™"T, ÏNTARIO" þ™" ÃANADA Í1× 2Ë4"; ÿ™" (416) 499-4292"U UP²1: 835:UH²1: 850„ ™" ÐROGRAM ÎAME: ÔEMPERATURE ÃONV."« ™" ×RITTEN ÂY : ÂOB ÍUIRHEADÔ ™" ÃONVERTED ÂY: ÍARILYN ÇARDNERû ™" ÆÏÒ ÔÈÅUTINE **öTUP²UPª1 W™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)O\™" --------------------------------------"^`‹UH³±0§870’a™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "£fUH²0:™"":ŽÂk ** PLEASE WAIT REMARK **øp™È(UD$,24);" ONRATURE ? ";xUS$²"":UL²7:35:B$²UR$:‹UR$²"Q"§300:‚‹B$²"KELVIN"°B$²"ËELVIN"§ 1440dŒ™:™£14ª21)"ÉNCORRECT!":AA²1¤1000:‚AA‡–™:™£14ª21)"‘‘ ":‰1370¢ ™:™£14ª21)"ÃORRECT! "²ªI²1¤600:‚I믙"6789":UL²3:35:M$²UR$:‹UR$²"Q"§300þH‹ M$²"0"§2150%R™"ÔRY AGAIN!"a\AA²1¤1000:‚AA:™" ":‰2080†f™"ÅXACTLY!"›p™"0¾Ã"ÆzI²1¤50:‚I:™"Ü"ïÂ.Ð. Ë= ";%º US$²"0123456789.Q":UL²3:35:K²Å(UR$):‹UR$²"Q"§300%Ä ‹K²373§2520]%Î ™"ÉNCORRECT’":AA²1¤1000¡%Ó ‚AA:™" ":‰ 2480Ù%Ø ™" Â128 ÃÏÍÐÕÔÅÒ# ™" ÉF ERRORS ARE NOTED, CONTACTC ™" ÍARILYN ÇARDNERg ™" 1630 ÍADISON ÓTREET ™" ÅVANSTON, ÉLLINOIS 60202ª UP²2: 835:UH²1: 850Ï™" ÉF YOU WANT TO SUGGESTû™" ADDITIONAL EDUCE MOMENT PLEASE... "þuŽ!„ -- LOAD AND RUN MENU PROGRAM<‰TT$²"0:SHIFT/RUN MENU"HŽ™Ç(147)N“™T˜™u™"LOAD";Ç(34);TT$;Ç(34);",8"{¢™§™‡¬™±™™¶™ "RUN"¥À™ Ç(19)°Ê—209,2¼Ô—939,13ÈÞ—940,13Îç€ùè‹UZ²1§UZ²0:¤¤¤¤¤¤ËÅÌÖÉÎ"´™"";=¾™£11ª21);:I²1¤15:™"Ü‘";:J²1¤100:‚:‚Fæ835Oð™"“"hú™£5ª21)"¢"£11ª21)"¢"ŽI²1¤5:™£4ª21)"§ ¥"£10ª21)"§ ¥":‚µI²1¤10:™£4ª21)"§Ü¥"£10ª21)"§Ü¥":‚Ö™£4ª21)"¡ ’¡"£10ª21)"¡„™£5ª21);:I²1¤8:™"Ü‘";:J²1¤50:‚:‚ ŽI²1¤1000:‚I:™"ÂÐ"< ˜™"×HAT IS THE BOILING"k ¢™"POINT OF WATER IN DEGREES"• ¬™"ÃELSIUS? ¾Ã= ";È ¶US$²"Q0123456789":UL²3:35:H$²UR$:‹UR$²"Q"§3ÃORRECT!"í%â ™"373"&ì ™"Ë",&ö I²1¤50:‚I:™"Ü"V& ™£11ª21);:I²1¤9:™"Ü‘";:J²1¤50:‚:‚& ™"’ "& 835:™"“"Ã& ™"ÃOMPLETE THE FOLLOWINATIONAL PROGRAMS#™" TO BE WRITTEN FOR THE Â128"?™" PLEASE CONTACT"_™" ÍARILYN ÇARDNERƒ™" 1630 ÍADISON ÓTREET¬™" ÅVANSTON, ÉLLINOIS 60202µ835»N:ÁWŽçX ** PROGRAM MODIFICATION INST **²1:850% ÷™" ÔO THE BEST OF OUR KNOWLEDGE,"N ø™" THIS PROGRAM IS IN THE PUBLIC"z ù™" DOMAIN. ÉF THIS IS NOT THE CASE"— ú™" PLEASE CONTACT:"Á û™" ÃOMMODORE"ÂUSINESS ÍACHINES"ä ü™" 3370 ÐHARMACY ÁVE. ý™" PRESS SPACE BAR OR WAIT’":I²0*<¡A$:‹A$³±" "§I²Iª1:‹I³250§828N>T1$²"":T2$²"":T3$²"":T4$²"":I²0W@‰300sC ** SPACE BAR PRESS **¨H™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"½JZZ²0¤9:¡ZZ$:‚ZZÔL¡UI$:‹UI$³±" "§844ÚNŽúR *ARE "™" SHOWN IN THE BALANCED EQUATION? ";=US$²".0123456789Q":UL²5:35:B²Å(UR$):‹UR$²"Q"§300n ™:™" ÈOW MANY MOLES OF UNKNOWN COMPOUND ARE"¥™" SHOWN IN THE BALANCED EQUATION? ";:35:C²Å(UR$)Ô™:™" ×HAT'S THE FORMULA MASS OF THE KNOWN"õN:™" ÅNTER ÍASS -> ";:35:P²Å(UR$)¤‹P²0§1780®R²(L­K)¬(P­M)/¸UH²1:UP²UPª1:850E™:™" ÁNSWER’"kÌ™:™" ";R" MOLES OF UNKNOWN GAS."xÖS²R¬22.4Ÿà™:™" ";R;" LITRES OF UNKNOWN GAS."©ê‰2030Ùô™:™" ×HAT IS THE VOLUME, IN  >™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000)ûUD$²""- ÁGINCOURT, ÏNTARIO"* þ™" ÃANADA Í1× 2Ë4"J ÿ™" (416) 499-4292"d UP²1: 835:UH²1: 850” ™" ÐROGRAM ÎAME: ÓTOICHIOMETRIC ÃAL."» ™" ×RITTEN ÂY : Ò. Ê. ÌAMB ä ™" ÃONVERTED ÂY: ÍARILYN ÇARDNER ™" * PAGE DESIGN ROUTINE **TUP²UPª10W™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)_\™" --------------------------------------"n`‹UH³±0§870¢a™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "³fUH²0:™"":ŽÒk ** PLEASE WAIT REMARK **p™È(UD$,24 (™" COMPOUND? ";:35:D²Å(UR$)&2™:™" ×HAT'S THE FORMULA MASS OF THE UNKNOWN"G<™" COMPOUND? ";:35:E²Å(UR$)tP™:™" ×HAT MASS, IN GRAMS, OF THE KNOWN "¡Z™" COMPOUND IS INVOLVED IN"THE CHEMICAL"Ëd™" REACTION? ÉF THIS INFORMATION IS "øn™" A LITRES, OF THE"þ™" KNOWN GAS INVOLVED IN THE REACTION "!™" (MUST BE AT ÓÔÐ)? ";235:Q²Å(UR$)GT²(Q­22.4)¬(L¬K)]&UH²1:UP²UPª1:850s0™:™" ÁNSWER’"Ÿ:™:™" ";T;" MOLES OF UNKNOWN COMPOUND."©DU²T¬NÔN™:™" ";U;" GRAMS OF UNKNOWUP$²" "{UT$²" ÔÅÍÐÅÒÁÔÕÒÅ ÃÏÎÖ. ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!***“800: TITLE SCREENª ‰300: MENU SCREENÆ# +++ INPUT SECTION +++Ø(UR$²"":UI$²""è*‹UL²0§UL²80õ-™" "; 2¡U ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒ3 ™" ÉF ERRORS ARE NOTED, CONTACTS ™" ÍARILYN ÇARDNERw ™" 1630 ÍADISON ÓTREET  ™" ÅVANSTON, ÉLLINOIS 60202º UP²2: 835:UH²1: 850ß™" ÉF YOU WANT TO SUGGEST ™" );" ONE MOMENT PLEASE... "uŽ1„ -- LOAD AND RUN MENU PROGRAML‰TT$²"0:SHIFT/RUN MENU"XŽ™Ç(147)^“™d˜™…™"LOAD";Ç(34);TT$;Ç(34);",8"‹¢™‘§™—¬™±™©¶™ "RUN"µÀ™ Ç(19)ÀÊ—209,2ÌÔ—939,13ØÞ—940,13Þç€VAILABLE IN MOLES, ANSWER ZERO (0)."s™:™" ÅNTER MASS -> ";,x35:F²Å(UR$):‚‹F²0§1440DŒG²F­DO–‰ 1470~ ™:™" ÈOW MANY MOLES OF THE KNOWN COMPOUND"¶ª™" WHERE INVOLVED IN THE CHEMICAL ":™" REACTION? ";Ç´35:G²Å(UR$)Õ¾H²(C­BN COMPOUND."ÞX‰2030ÿbUH²1:UG$²"ÖOL-ÖOL":UP²0:850( v™" ÈOW MANY MOLES OF KNOWN GAS ARE "L €™" INVOLVED IN THE REACTION? ";‚ …US$²".0123456789Q":UL²5:35:U²Å(UR$):‹UR$²"Q"§300¯ Š™:™" ÈOW MANY MOLES OF UNKNOWN GAS ARE "à ”™" INVOLVED IN THEI$:‹UI$²""§50-7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85@<‹UI$²Ç(20)§105T>‹ Ã(UR$)²±UL§50yA120: CHECK FOR VALID CHARACTER‰FUR$²UR$ªUI$“K™UI$;›P‰50¡U:§Z:­_:³dŽÌf ++ CHECK DELETE ++Ýi‹Ã(UR$)³1§50õnUR$²È(UR$,Ã(UR$)«1)s ADDITIONAL EDUCATIONAL PROGRAMS3™" TO BE WRITTEN FOR THE Â128"O™" PLEASE CONTACT"o™" ÍARILYN ÇARDNER“™" 1630 ÍADISON ÓTREET¼™" ÅVANSTON, ÉLLINOIS 60202Å835ËN:ÑWŽ÷X ** PROGRAM MODIF è‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **é™"“";:Œ1ü-STOICH-R.J.LAMB.1981.;‰1150IUH²1:850w.™" ÔHIS PROGRAM IS DESIGNED TO SOLVE "8™" STOICHIOMETRIC CALCULATIONS."ËB™" ÂEFORE YOU BEGIN, ENSURE YOU HAVE A"øL™" BALANCED)¬GëÈUH²1:UP²UPª1:850Ò™:™" ÁNSWER’"-Ü™:™" ";H;" MOLES OF UNKNOWN COMPOUND."7æJ²H¬Ebð™:™" ";J;" GRAMS OF UNKNOWN COMPOUND."lú‰2030ŒUH²1:UG$²"ÍASS-ÖOLUME":850¹™" ÈOW MANY MOLES OF KNOWN COMPOUND ARE"ã"™" SHOWN IN THE BA REACTION? ";:35:V²Å(UR$)!ž™:™" ×HAT IS THE VOLUME IN LITRES OF THE ":!¨™" KNOWN GAS INVOLVED IN THE CHEMICAL"_!²™" REACTION (MUST BE AT ÓÔÐ)? ";p!¼35:W²Å(UR$)~!ÆX²(V­U)¬W”!ÐUH²1:UP²UPª1:850ª!Ú™:™" ÁNSWER’"Ò!ä™:™" ";X;" LITRES OF™" ";:‰50.x ++ CHECK FOR VALID CHARACTERS ++@}‹Ã(US$)²0§150Q‚US²1¤Ã(US$)h‡‹UI$²Ê(US$,US,1)§ŽnŒ‚{‘UI$²"":Ž–– ** STANDARD INPUT **§˜‹Æ(UI$)²46§Ž¸›‹UI$²Ç(32)§ŽÕ ‹Æ(UI$)³48°Æ(UI$)±57§170Û¥Žøª‹Æ(UI$)³65°Æ(UI$)±90§180ICATION INST **Y™"“"%]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850.”8354²::»ŽZ  ** T I T L E P A G E **g"™"“";}$I²1¤38:™"¦’";:‚•&I²1¤22:™"¦’";:‚­(I²1¤37:™"¦’";:‚Å*I²1¤22:™"‘¦’";:‚ê,™" EQUATION, AND THE FORMULA "&V™" MASSES OF THE SUBSTANCES INVOLVED IN"=`™" THE EQUATION."Gj 835MtŽ[~UP²0:850ˆœ™" 1. ÍASS-MASS CALCULATIONS."³¦™" 2. ÍASS-VOLUME CALCULATIONS."à°™" 3. ÖOLUME-VOLUME CALCULATLANCED EQUATION? ";'US$²".0123456789Q":UL²5:35:K²Å(UR$):‹UR$²"Q"§300J,™:™" ÈOW MANY MOLES OF UNKNOWN COMPOUND ARE"6™" SHOWN IN THE BALANCED EQUATION? ";:35:L²Å(UR$)°@™:™" ×HCT'S THE FORMULA MASS OF THE KNOWN"ÑJ™" COMPOUND? ";:35:M²Å(Uœ UNKNOWN GAS."ý!î™:™" ÄO YOU WISH TO RUN AGAIN? ";("øUS$²"YNQ":UL²1:35:A$²UR$:‹UR$²"Q"§3009"‹A$²"Y"§1150J"‹A$²"N"§2070S" ‰300\"‰300:UL²5:35:U²Å(UR$):‹UR$²"Q"§300¯ Š™:™" ÈOW MANY MOLES OF UNKNOWN GAS ARE "à ”™" INVOLVED IN THEþ¯Ž"´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž(»Ž5¾UI$²"":ŽF, ** MENU **P.™"“"m1™" ÍENU"œ6™" --------------------------------------"È;™" 1. TEMPERATURE CONVERSION"ò@™" 2. STUDENT INSTRUCTIONS" E© ’ .™" ’  ’©-0™" ’ £ßK2™"ß ’s4™"C O M M O D O R E–6™"EDUCATIONALµ8™"SOFTWAREÐ: ** COMMODORE LOGO **;™È(UD$,24);"IONS." µ™" ÅNTER A NUMBER KEY (1-3) ";:ºUS$²"123Q":UL²1:35:A²Å(UR$):‹UR$²"Q"§300EÄA²µ(A){΋A³1°A±3§™:™"ÍUST BE 1,2,OR 3. ÔRY AGAIN.":‰1210‘Ø‘A‰1250,1540,1890¯âUH²1:UG$²"ÍASS-ÍASS":850Ýö™" ÈOW MANY MOLES OF KNOWN COMPOUND R$)T™:™" ×HAT'S THE FORMULA MASS OF THE UNKNOWN"#^™" COMPOUND? ";:35:N²Å(UR$)Pr™:™" ×HAT MASS, IN GRAMS, OF THE KNOWN "}|™" COMPOUND IS INVOLVED IN THE CHEMICAL"¦†™" REACTION? ÉF ONLY THE VOLUME IS "Æ™" KNOWN, ANSWER ZERO (0)."ùš™™" 3. TEACHER INSTRUCTIONS"8 O™" 4. QUIT"g T™" --------------------------------------"˜ Y™" PRESS NUMBER KEY (1-4) THEN ";À ^UL²1:US$²"1234":35: INPUT ROUTINEË `US$²""è c‘Å(UR$)1000,400,500,396ñ h‰3002 ²1:850³Dà™" ÉF THE HYDROGEN COMPOUND CONTAINS NO"áDê™" OXYGEN, THE NAME OF THE ACID BECOMES"Eô™" HYDRO¤¤¤¤¤¤IC ACID. EG: È2‘Ó(AQ) IS"8Eþ™" HYDROSULPHURIC ACID, ÈÂR(AQ) IS"SE ™" HYDROBROMIC ACID."\E835‚E&I²1¤25:W$(I)²J$(I):Y$(I)²K>™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000)ûUD$²""-WEEN VALENCES."Ü3Š ™" ÉF THE COMPUTER PUTS THE NUMBERS ON"4” ™" THE WRONG LINE, ERASE YOUR ENTIRE",4ž ™" ANSWER, THEN TYPE IT AGAIN."54¨ 835[4Æ I²1¤37:W$(I)²B$(I):Y$(I)²C$(I):‚a4Ð Ž—4Ú UH²1:850:™" ×HEN CHEMICALS COMBINE, A POSITIVE"Ä4ä ™"LEMENT TO TELL"Á9™" WHAT ITS VALENCE IS."î9 ™" EG ÆEÉ3‘ IS IRON ÉÉÉ IODIDE AND ÃUÏ:™" IS COPPER ÉÉ OXIDE.":835:UH²1:850C:™" ÙOU WILL HAVE A CHANCE TO"r:$™" PRACTICE. ÙOU WILL BE GIVEN 20 TRIES."ž:.™" Á NAME OR FORMULA WILL  S ONE MORE WAY TO DERIVE THE"Ò?ª™" NAME OF RADICALS. ÁTOMS THAT ARE IN"û?´™" THE SAME VERTICAL GROUPS ON THE"@¾™" ÐERIODIC ÔABLE HAVE FAMILY"K@È™" RESEMBLANCES. ÔHUS IF CARBONATE IS"w@Ò™" ÃÏ3‘, VALENCE -2 THEN SILICATE IS"£@Ü™" ÓIÏ3‘ $(I):‚ˆE0Ž«ER-----PAGE DESIGN ROUTINE-----ºER: UP²UPª1äER: ™"“"È(UT$ªUP$,21);È(UG$ªUP$,14);UPF&R: ™" -------------------------------------"F0RŽ!FðURF‰XUH²1:850:™" ÓELECT THE AREA YOU WISH TO"zFŠX™" REVIEW THE INSTRUCTIONS FOR:" UP$²" "{UT$²" ÓÔÏÉÃÈÉÏÍÅÔÒÉà ÃÁÌ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!***“800: TITLE SCREENª ‰300: MENU SCREENÆ# +++ INPUT SECTION +++Ø(UR$²"":UI$²""è*‹UL²0§UL²80õ-™" "; 2¡U  ONE ALWAYS COMBINES WITH A NEGATIVE"ó4î ™" ONE. ÔHE NUMBERS OF EACH PART IS SUCH" 5ø ™" THAT THE TOTAL POS. CHARGE IS EQUAL"L5 ™" TO THE TOTAL NEGATIVE CHARGE. ÆOR"u5 ™" EXAMPLG, IF ÁL WITH A +3 CHARGE"ž5 ™" COMBINES WITH Ï -2: 2 ÁL ATOMS APPEAR, AND"È:8™" YOU MUST TYPE IN THE NAME OR THE"õ:B™" FORMULA. ÁFTER TYPING YOUR ANSWER," ;L™" PRESS ";V835=;tI²1¤25: W$(I)²D$(I):Y$(I)²E$(I):‚C;~Žx;ˆUH²1:850:™" ÍOST RADICALS ON YOUR LIST END"¦;’™" WITH 'ATE', AND, VALENCE -2. ÐERCHLORATE IS"Ì@æ™" ÃLÏ4‘ -1, PERMANGANATE MUST BE"ï@ð™" ÍNÏ4‘ -1.":835:UH²1:850 Aõ™" ÙOU NOW HAVE A GREATLY INCREASED"LAú™" LIST OF RADICALS YOU CAN USE, WITH"yA™" VERY LITTLE ADDITIONAL MEMORY WORK."‚A835¨žFŽX™" 1. ÓYMBOLS AND VALENCES.ÌF˜X™" 2. ÓIMPLE COMPOUNDS AND RADICALS."ìF¢X™" 3. ÄERIVED RADICALS.G¬X™" 4. ÁCIDS.%G±X™" 5. ÒETURN TO MAIN MENU."jG¶XUL²1:US$²"Q12345":™" ×HAT IS YOUR CHOICE? ";:35:‹UR$²"Q"§300uGÀXX$²UR$„GI$:‹UI$²""§50-7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85@<‹UI$²Ç(20)§105T>‹ Ã(UR$)²±UL§50yA120: CHECK FOR VALID CHARACTER‰FUR$²UR$ªUI$“K™UI$;›P‰50¡U:§Z:­_:³dŽÌf ++ CHECK DELETE ++Ýi‹Ã(UR$)³1§50õnUR$²È(UR$,Ã(UR$)«1)s,"Ë5 ™" TOTAL CHARGE= 2Ø(+3)=6 WILL COMBINE"÷5* ™" WITH 3 Ï ATOMS WITH A TOTAL CHARGE"64 ™" OF 3Ø(-2)=-6.":835:850D6> ™" ÔHE POSITIVE PART IS ALWAYS PLACED"s6H ™" FIRST, AND THE NUMBER OF EACH ATOM IS"“6M ™" PLACED AS A SUB-SCRIPT"¾6N ™" ALL OF THESE CONTAIN"Ó;œ™" OXYGEN. ÉF YOU ADD ONE OXYGEN TO AN"û;¦™" ATE RADICAL, YOU PRODUCE A NEW")<°™" RADICAL. ÔHE NAME OF THE NEW RADICAL"U<º™" IS OBTAINED FROM THE OLD BY ADDING"…<Ä™" 'PER' TO IT: ÓÏ4‘ IS SULPHATE, ÓÏ5‘"®<Ι"A6I²1¤25:W$(I)²H$(I):Y$(I)²I$(I):‚®A@ŽåAJUH²1:850:™" ÔHE LAST GROUP OF COMPOUNDS WE WILL" BT™" LOOK AT ARE THE ACIDS. ÉF THE":B^™" POSITIVE PART OF THE COMPOUND IS È,"gBh™" THEN THE COMPOUND WILL FORM AN ACID"•Br™" IF IT IS DISSOLVED:ÊX‹Å(X$)²5§Ž£GØY‘Å(X$)2810,3290,3720,4170®GâY‰22000²UPª1äER: ™"“"È(UT$ªUP$,21);È(UG$ªUP$,14);UPF&R: ™" -------------------------------------"F0RŽ!FðURF‰XUH²1:850:™" ÓELECT THE AREA YOU WISH TO"zFŠX™" REVIEW THE INSTRUCTIONS FOR:"™" ";:‰50.x ++ CHECK FOR VALID CHARACTERS ++@}‹Ã(US$)²0§150Q‚US²1¤Ã(US$)h‡‹UI$²Ê(US$,US,1)§ŽnŒ‚{‘UI$²"":Ž–– ** STANDARD INPUT **§˜‹Æ(UI$)²46§Ž¸›‹UI$²Ç(32)§ŽÕ ‹Æ(UI$)³48°Æ(UI$)±57§170Û¥Žøª‹Æ(UI$)³65°Æ(UI$)±90§180 E.G. ÁL2‘Ï3‘ OR ÁL2‘(ÓÏ4‘)3"è6R ™" ÎOTICE THAT TO SHOW 3 SULPHATE"7\ ™" GROUPS WE PUT THE ENTIRE SULPHATE"A7f ™" GROUP (ÓÏ4‘) IN BRACKETS, OTHERWISE"n7p ™" THE NUMBER AFFECTS ONLY THE ATOM IN"“7z ™" FRONT OF IT.":835:UH²1:850½7  IS PERSULPHATE.":835:UH²1:850Ù<Ó™" ÉF AN OXYGEN ATOM WAS REMOVED, THE=Ø™" ATE IN ITS NAME BECOMES 'ITE'."+=â™" EG ÃLÏ3‘ IS CHLORATE, ÃLÏ2‘ IS"W=ì™" CHLORITE. ÉF AN OXYGEN IS REMOVED…=ö™" FROM AN 'ITE' RADICAL, THE NAME GETS"¯=™" IN WATER. ÔO SHOW"ÁB|™" THAT IT IS DISSOLVED IN WATER, PUT"C†™" (AQ) AFTER THE FORMULA.":™" E.G. ÈÃL(AQ), ÈÎÏ3‘(AQ)"C‹835:UH²1:850AC™" ÁS AN ACID, THE SUBSTANCE IS GIVEN A"pCš™" DIFFERENT NAME. ÉF THE COMPOUND ENDED"œC¤™" IN 'ATE4 ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **D Œ™"“":‰900O 875:Žp  ** STUDENT INSTRUCTIONS **y •™"“"Ÿ šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850Ò œ: ™" ÒEMEMBER, HIT KEY AFTER"þ ž: ™" TYPING YOUR ANSWER.þ¯Ž"´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž(»Ž5¾UI$²"":ŽF, ** MENU **P.™"“"m1™" ÍENU"œ6™" --------------------------------------"Ê;™" 1. BEGIN STOICHIOMETRIC CAL"ô@™" 2. STUDENT INSTRUCTIONS"™" ÉF A SINGLE ATOM HAS A NEGATIVE"ë7„ ™" CHARGE ITS NAME IS CHANGED TO END IN"8Ž ™" 'IDE'. ÎAÆ IS CALLED SODIUM FLOURIDE."D8¶ ™" ÔHE ONLY PROBLEM LEFT IS THAT"n8À ™" OF SUBSTCNCES WITH MORE THAN ONE"š8Ê ™" VALENCE. ÎO SUBSTANCE HAS MORE  A PREFIX OF 'HYPO'. ÃHANGING THE"Þ= ™" NUMBER OF OXYGENS DOES NOT CHANGE THE" >™" CHARGE ON THE RADICAL. ÍEMORIZE THE"/>™" 'ATE' AND DERIVE THE REST."8>(835n><UH²1:850:™" ÔHIS CHART GIVES THE CHANGE IN THE"—>F™" NUMBER OF OXYGEN AT', IT BECOMES AN 'IC' ACID;"ÇC®™" ENDING IN 'ITE' PRODUCES AN 'OUS'"ôC¸™" ACID. EG: HYDROGEN SULPHATE (AQ) IS"D™" SULPHURIC ACID, HYDROGEN "CDÌ™" HYPOCHLORITE (AQ) IS HYPOCHLOUROUS"rDÖ™" ACID. ÒEMEMBER: ATE...IC, ITE...OUS"…DÛ835:UH ÔHIS TELLS"+  : ™" THE COMPUTER TO ACCEPT WHAT YOU"E ¢: ™" HAVE TYPED."r ¤: ™" ÔYPE AT ANY TIME TO RETURN"Œ ¦: ™" TO THE MENU."› å835:1040¡ ê:§ óŽÈ ô ** TEACHER INSTRUCTIONS **Ñ õ™"“"÷ öUP²0:UG$²"ÔEACHER ÉNST":UH E™" 3. TEACHER INSTRUCTIONS": O™" 4. QUIT"i T™" --------------------------------------"š Y™" PRESS NUMBER KEY (1-4) THEN "; ^UL²1:US$²"1234":35: INPUT ROUTINEÍ `US$²""ê c‘Å(UR$)1000,400,500,396ó h‰300THANÈ8Ô ™" ONE NEGATIVE VALENCE, AND WHEN IT IS"õ8Þ ™" NEGATIVE IT ENDS IN 'IDE' AND COMES"9è ™" SECOND IN THE NAME.":835:850J9ò ™" ÉF THE POSITIVE ELEMENT HAS MORE"x9÷ ™" THAN ONE VALENCE, ÒOMAN ÎUMERALS ARE"£9ü ™" PLACED AFTER THAT EOMS FROM THE"Î>P™" 'ATE' RADICAL AND HOW THE NAME":™" CHANGES."ó>Z™" +1  Ï PERCHLORATE ÃLÏ4"?d™" CHLORATE ÃLÏ3"=?n™" -1 Ï CHLORITE ÃLÏ2"a?x™" -2 Ï HYPOCHLORITE ÃLÏ "j?‚835x?–UH²1:850¥? ™" ÔHERE I -2","THIOSULPHATE","Ó2Ï3 -2""„ƒ"SODIUM FLUORIDE","ÎAÆ","HYDROGEN NITRATE","ÈÎÏ3"O"Žƒ"PHOSPHORUS Ö IODIDE","ÐÉ5","LEAD ÉÉ OXIDE","ÐBÏ"Š"˜ƒ"NITROGEN ÉÉÉ HYDRIDE","ÎÈ3","IRON ÉÉ SULPHIFE","ÆEÓ"È"¢ƒ"COPPER É SULPHATE","ÃU2ÓÏ4","NITROGEN Ö BROMIDE",2"þ't ƒ"TIN ÉÖ MANGANATE","ÓN(ÍNÏ3)4","HYDROGEN PERPHOSPHATE","È3ÐÏ5" (~ ƒ"COPPER ÉÉ SULPHATE","ÃUÓÏ4"`(ˆ ƒ"HYDROCHLORIC ACID","ÈÃL(AQ)","HYDROFLUORIC ACID","ÈÆ(AQ)"(’ ƒ"HYDROBROMIC ACID","ÈÂR(AQ)","HYDROIODIC ACID","ÈÉ(AQ)"ß(œ ƒ"HYDROSULPHURIC ACI" YOU MUST HAVE MEMORIZED THE SYMBOLS". ™" AND VALENCES OF THE COMMON SUBSTANCES"+. ™" FROM THE LIST YOU WERE GIVEN IN"@." ™" CLASS.":835{., UH²1:850:™" ÔHE FIRST LETTER OF A CHEMICAL SYMBOL"¦.6 ™" MUST BE A CAPITAL. ÉF THERE IS A"Ñ.@§1260¦RC²µ(25¬»(Å(TI$))ª1):‹FL%(RC)²1§1190*°FL%(RC)²1:CC²CCª1:‹CC³18§1220FºI²1¤37:FL%(I)²0:‚:CC²0mÄNF²µ(2¬»(Å(TI$))ª1):‘NF ‰1230,1240ŒÎF$²Y$(RC):AN$²W$(RC):‰1250¥ØF$²W$(RC):AN$²Y$(RC)¯â‰1280ÈìRC²µ(37¬»(Å(TI$))ª1)áöF$²B$(RC):A ";ÙTK²0ý^I²1¤Ã(AN$):‹Ê(AN$,I,1)²" "§K²1h‹K²1¯Å(X$)²1§1660Ar‹Æ(Ê(AN$,I,1))±48 ¯ Æ(Ê(AN$,I,1))³58§1670X|™Ê(AN$,I,1);:‰1680q†™"";Ê(AN$,I,1);"‘";w‚€š835‡®‚L‘¸‰1980·ÂQ²µ(16¬»(Å(TI$))ª1):‹F%(Q)²1§1730ÏÌNC%²NC%ª1:CC%²CC "ÎÂR5" #¬ƒ"LEAD ÉÖ CHROMATE","ÐB(ÃRÏ4)2","IRON ÉÉÉ NITRATE","ÆE(ÎÏ3)3"G#¶ƒ"MANGANESE ÉÖ OXIDE","ÍNÏ2","ALUMINUM SULPHIDE","ÁL2Ó3"†#Àƒ"ZINC ACETATE","ÚN(ÃÈ3ÃÏÏ)2","BARIUM HYDROXIDE","ÂA(ÏÈ)2"Ê#ʃ"AMMONIUM CARBONATE","(ÎÈ4)2ÃÏ3","POTASSIUM PHOSPHAT D","È2Ó(AQ)","HYDROCYANIC ACID","ÈÃÎ(AQ)")¦ ƒ"PERCHLORIC ACID","ÈÃLÏ4(AQ)","CHLORIC ACID","ÈÃLÏ3(AQ)"])° ƒ"CHLOROUS ACID","ÈÃLÏ2(AQ)","HYPOCHLOROUS ACID","ÈÃLÏ(AQ)")º ƒ"SULPHURIC ACID","È2ÓÏ4(AQ)","SULPHUROUS ACID","È2ÓÏ3(AQ)"Ú)Ä ƒ"NITROUS ACID","È ™" SECOND LETTER, IT MUST BE A SMALL"/J ™" LETTER. ÔHE SYMBOL FOR COPPER MUST BE"$/T ™" TYPED ÃU AND NOT ÃÕ OR CU."7/^ 835:UH²1:850d/h ™" ÔHE VALENCE IS SIMPLY THE CHARGE"“/r ™" ON THE SUBSTANCE WHEN IT IS PART OF A"¾/| ™" COMPOUND. Ô N$²C$(RC)ì21000 ™" # OF SUBSTANCES GIVEN IS";L;" "L™" # ATTEMPTS IS";AT%" ";", # CORRECT IS";NC%v™" ÐRESS AFTER YOUR ANSWER,¯(™" ENTER ";Ç(34);" STOP";Ç(34);" TO QUIT.";È(CP$,10)Á2I²1¤10:¡G$:‚Ö<™"";:I²1¤Ã(F$)%ª1ïôF%(Q)²1:Q1²Q1ª1:‹Q1³12§1800 þI²1¤16:F%(I)²0:‚:Q1²0%™È(CP$,21);" ÃORRECT!"4835:‰1710d¼21000:™" ×ELL THAT'S 20. É'LL GIVE YOU A„Æ™" CHANCE TO RESELECT NOW.¬Ë™" ÙOU GOT";NC%;"OUT OF 20 RIGHT."»Ð835:‰1130ÅÚ‰1131ïE","Ë3ÐÏ4"$Ôƒ"TIN ÉÉ PERMANGANATE","ÓN(ÍNÏ4)2","COPPER ÉÉ DICHROMATE","ÃUÃR2Ï7"I$Þƒ"TIN ÉÖ OXIDE","ÓNÏ2","CALCIUM CARBONATE","ÃAÃÏ3"‰$èƒ"SODIUM CHLORATE","ÎAÃLÏ3","MAGNESIUM HYDROXIDE","ÍG(ÏÈ)2"Ì$òƒ"LEAD ÉÉ PHOSPHATE","ÐB3(ÐÏ4)2","MERCURY É SULPÎÏ2(AQ)","PHOSPHORIC ACID","È3ÐÏ4(AQ)"*Î ƒ"HYPOPHOSPHOROUS ACID","È3ÐÏ2(AQ)","BROMIC ACID","ÈÂRÏ3(AQ)"[*Ø ƒ"PERIODIC ACID","ÈÉÏ4(AQ)","PERMANGANIC ACID","ÈÍNÏ4(AQ)"”*â ƒ"CARBONIC ACID","È2ÃÏ3(AQ)","IODIC ACID","ÈÉÏ3(AQ)"Ñ*ì ƒ"IODOUS ACID","ÈÉÏ2(AQ)"HE SIZE OF THE CHARGE"é/† ™" DETERMINES HOW MANY THINGS IT CAN"0 ™" ATTRACT. ÔHE SIGN DETERMINES IF IT"A0š ™" WILL ATTRACT POSITIVE OR NEGATIVE"p0¤ ™" SUBSTANCES. ÔHEREFORE, AS WELL AS THE"›0® ™" SYMBOL, YOU MUST KNOW THE VALENCE"º0¸ ™" ANF‹Æ(Ê(F$,I,1))±48 ¯Æ(Ê(F$,I,1))³58§1370P™Ê(F$,I,1);:‰1380/Z™"";Ê(F$,I,1);"‘";5d‚=nK²0Qx¡A$:‹A$²""§1400my‹A$²Ç(13)°A$²Ç(20)§1410†z‹(Æ(A$)¯127)³32§1400Ÿ‚‹A$²"+"° A$²"-"§ K²1±Œ‹Ã(A1$)³1§K²0À–‹K²1 §1450蛋Ã(A3$)±20¯A$³±ƒ"HYDROGEN","È -1+1","SODIUM","ÎA +1"* ƒ"POTASSIUM","Ë +1","LITHIUM","ÌI +1","SILVER","ÁG +1"oƒ"CALCIUM","ÃA +2","ZINC","ÚN +2","ALUMINUM","ÁL +3","MAGNESIUM"³ ƒ"ÍG +2","FLUORINE","Æ -1","CHLORINE","ÃL -1","BROMINE","ÂR -1"í*ƒ"IODINE","É -1"HATE","ÈG2ÓÏ4"í$üƒ"CARBON ÉÖ CHLORIDE","ÃÃL4"'% ƒ"HYDROGEN SULPHITE","È2ÓÏ3","SODIUM NITRITE","ÎAÎÏ2"i% ƒ"LITHIUM SILICATE","ÌI2ÓIÏ3","POTASSIUM PERSULPHATE","Ë2ÓÏ5"ª% ƒ"SILVER CHROMITE","ÁG2ÃRÏ3","MAGNESIUM FLUORATE","ÍG(ÆÏ3)2"ï%$ ƒ"CALCIUM CHL,"PHOSPHOROUS ACID","È3ÐÏ3(AQ)"+ö ƒ"HYPOBROMOUS ACID","ÈÂRÏ(AQ)","HYPOSULPHUROUS ACID","È2ÓÏ2(AQ)"7+ ƒ"CHROMIC ACID","È2ÃRÏ4(AQ)"=+< :C+F Ž{+P 850:™" ÔHIS PROGRAM WILL GIVE INSTRUCTIONS"«+Z ™" AND PRACTISE IN CHEMICAL NOMENCLATURE."¶+d D THE CORRECT SIGN."Í0 835:UH²1:850ú0Ì ™" ÙOU WILL BE GIVEN A TEST TO SEE IF"'1Ö ™" YOU HAVE DONE YOUR MEMORY WORK. ÙOU"Q1þ ™" SHOULD ANSWER 17 OF THE 20 ITEMS"€1 ™" CORRECTLY TO PASS. ÙOU WILL BE GIVEN"¯1 ™" A NAME, AND YOU WILL HAVE TÇ(20)¯A$³±Ç(13)§1480) ‹Æ(A$)±48 ¯Æ(A$)³58 §A1$²A1$ª" ":A2$²A2$ªA$:A3$²A3$ªA$:‰1480=ª‹Æ(A$)²20§ 1520P´‹Æ(A$)²13§1550d¹‹Ã(A3$)±20§1480Š¾A1$²A1$ªA$:A2$²A2$ª" ":A3$²A3$ªA$ÁÈ™È(CP$,15);" "îÒ™" ,"OXYGEN","Ï -2","SULPHUR","Ó -2+4+6" 4ƒ"NITROGEN","Î -3+3+5","PHOSPHORUS","Ð -3+3+5"d >ƒ"ARSENIC","ÁS -3+3+5","CARBON","à -4+2+4","CHLORATE","ÃLÏ3 -1"ž Hƒ"TIN","ÓN +2+4","LEAD","ÐB +2+4","MERCURY","ÈG +1+2"ß Rƒ"COPPER","ÃU +1+2","IRON","ÆE +2+3ORITE","ÃA(ÃLÏ2)2","BARIUM HYPOCHLORITE","ÂA(ÃLÏ)2"1&. ƒ"ALUMINUM BROMITE","ÁL(ÂRÏ2)3","ARSENIC Ö IODATE","ÁS(ÉÏ3)5"u&8 ƒ"LEAD ÉÉ PERBROMATE","ÐB(ÂRÏ4)2","COPPER É PHOSPHITE","ÃU3ÐÏ3"·&B ƒ"MERCURY ÉÉ SULPHITE","ÈGÓÏ3","COPPER ÉÉ NITRATE","ÃU(ÎÏ3)2"û&835:Žñ+i 850:™" ÓELECT THE AREA YOU WISH TO":™" REVIEW."1,n ™" 1. ÆOR A REVIEW OF SYMBOLS AND":™" VALENCES."x,x ™" 2. ÆOR A REVIEW OF SIMPLE COMPOUNDS":™" AND RADICALS."²,‚ ™" 3. ÆOR A REVIEW OF DERIVED":™" RADICO GIVE THE"Ý1 ™" CORRECT SYMBOL AND VALENCE. ÔO MAKE"2& ™" A CAPITAL LETTER, HOLD DOWN THE"C20 ™" KEY WHILE TYPING THE LETTER.":835:UH²1:850q2: ™" ÌEAVE ONE SPACE BETWEEN THE SYMBOL"›2D ™" AND THE VALENCE, USING THE LARGE"Ç2N ™" "Ü™"‘‘";A1$:™""A2$æ‰1400"ð‹Ã(A1$)²0§1480búA1$²È(A1$,Ã(A1$)«1):A2$²È(A2$,Ã(A2$)«1):A3$²È(A3$,Ã(A3$)«1)l‰1480•AT%²AT%ª1:TR²TRª1:‹A3$²"STOP" § 2010§‹A3$²AN$§1730¼"CC%²0:‹TR±1§1600Ü,™È(CP$,17);"ÎO","MANGANESE","ÍN +2+4+7"!\ƒ"AMMONIUM","ÎÈ4 +1","SULPHATE","ÓÏ4 -2","NITRATE","ÎÏ3 -1"b!fƒ"CARBONATE","ÃÏ3 -2","PHOSPHATE","ÐÏ4 -3","HYDROXIDE","ÏÈ -1"®!pƒ"ACETATE","ÃÈ3ÃÏÏ -1","PERMANGANATE","ÍNÏ4 -1","DICHROMATE","ÃR2Ï7 -2"á!zƒ"CHROMATE","ÃRÏ4L ƒ"IRON ÉÉÉ HYPOPHOSPHITE","ÆEÐÏ2","AMMONIUM PERIODATE","ÎÈ4ÉÏ4";'V ƒ"TIN ÉÖ CARBONATE","ÓN(ÃÏ3)2","BARIUM BROMATE","ÂA(ÂRÏ3)2"|'` ƒ"MERCURY É IODITE","ÈGÉÏ2","BISMUTH Ö SULPHATE","ÂI2(ÓÏ4)5"º'j ƒ"LEAD ÉÉ SULPHITE","ÐBÓÏ3","CALCIUM FLUORITE","ÃA(ÆÏ2)ALS.×,Œ ™" 4. ÆOR A REVIEW OF ACIDS.û,‘ ™" 5. ÒETURN TO MAIN MENU."@-– UL²1:US$²"Q12345":™" ×HAT IS YOUR CHOICE? ";:35:‹UR$²"Q"§300O-› ‹UR$²"5"§ŽZ-  X$²UR$`-ª Žj-´ ‰1970¦-ú UH²1:850:™" ÉN ORDER TO BENEFIT FROM THIS PROGRAM,"Ó- ™ SPACE BAR. ÔO ERASE A MISTAKE, USE"ó2X ™" THE KEY. ÅNTER THE VALENCES,"3b ™" FROM LOWEST TO HIGHEST, WITH THEIR"J3l ™" SIGN THEN PRESS THE KEY."]3q 835:UH²1:850€3v ™" EG: ARSENIC ÁS -3+3+5"¯3€ ™" ÄO NOT LEAVE SPACES BET, TRY AGAIN.î-XS²1¤1500:‚:.™È(CP$,17);" "J1™È(CP$,15);" "y2™" "˜6A1$²"":A2$²"":A3$²"":‰1290¸@™È(CP$,18);" ÓTILL WRONG...ÑJ™" THE ANSWER IS>™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES"**×UX$²"H":†UQ%(1000)"†B$(37),C$(37),D$(25),E$(25),H$(25INE--- `US$²""% c: ‘Å(UR$)1000,400,500,396. h‰300o ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU ** Œ™"“":‰900Š 875:Ž«  ** STUDENT INSTRUCTIONS **´ •™"“"Ú šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850 ™" ÒEMEMEBER " ";:US$²"0123456789Q":UL²2:35:‹UR$²"Q"§300ï* DR²Å(UR$) + ‹DR³0°DR±14§2060:‰2810+ D²1¤3%+" R²32:20603+, ™H$(Dª12):+6 ‚DR+@ D²23:R²13ª6¬X:2060+J **CALL INPUT ROUTINE FOR TREATMENT TYPE**¦+^ US$²"NPSQ":UL²1:35:‹UR$²"Q"§300²+r TT$²U§D²16µ0œ2060½0¦™X$Ä0°‚JÙ0º‹FLAG±²1§3930ß0ÄŽþ0Î**DISPLAY WHEN FISH DIE**1ØDTEMP²D:RTEMP²R%1âD²6:R²32:206031ì™"AAAGH!"E1ö™È(R$,35);"×"W1™È(R$,35);"×"i1 ™È(R$,36);"×"1™È(R$,32);" ©ß’"˜1™È(R$,32);" Σ Íׯ1(™È(R$,3 ÅVANSTON, ÉLLINOIS 60202835N:WŽ@X ** PROGRAM MODIFICATION INST **IY™"“"n]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850w”835}²:ƒ»Ž£  ** T I T L E P A G E **°"™"“";Æ$I²1¤38:™"¦’";:‚Þ&I²1¤22:™"¦’";:‚ö(I² ),I$(25),J$(25),K$(25),W$(37),Y$(37)FUD$²""xUP$²" "¨: UT$²" ÒÅÍÄÌ. ÃÈÅÍÉÓÔÒÙ":† FL%(37),F%(16)À800: TITLE SCREEN× ‰300: MENU SCREENó# +++ INPUT SECTION +++(UR$² TO HIT AFTER"1 Ä™" TYPING YOUR ANSWER. ÔHIS TELLS"[ Æ™" THE COMPUTER TO ACCEPT WHAT YOU"r È™" HAVE TYPED."› Ê™" ÔYPE AT ANY TIME TO RETURN"² Ì™" TO THE MENU."» å835Æ æ22000Ì ê:Ò óŽó ô ** TEACHER INSTRUCTIONS R$½+| D²1¤3Ì+† R²32:2060Ú+ ™H$(Dª15)á+š ‚Dç+¤ Ž,b **CALCULATION ROUTINE**3,l **NP=INJECTION RATE OF NATURAL POLLUTANTS_,v **ND=NATURAL WASTE DECOMPOSITION COEFF‰,€ **OA=OXYGEN ABSORPTION RATE OF WATER’,Š NP²2,” ND².75°,ž ‹BW$²"P"§OA² 2);"Ö <×Å12™È(R$,32);" Í ÎÚ1<™È(R$,34); "£V£î1FD²DTEMP:R²RTEMPô1PŽ2ZD²6:R²32:20602dI²1¤1000:‚I&2n™" "12xI²1¤9I2‚™È(R$,32);" "P2Œ‚IV2–Žo2 **GRAPHIC DISPLAY**‚2ª™"“";È(D$,19);±2´™"@@@@@@@@@@@@@@@@@@@@@@@@@1¤37:™"¦’";:‚*I²1¤22:™"‘¦’";:‚3,™"© ’U.™" ’  ’©v0™" ’ £ß”2™"ß ’¼4™"C O M M O D O R Eß6™"EDUCATIONALþ8"":UI$²""*‹UL²0§UL²80"-™" ";62¡UI$:‹UI$²""§50Z7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85m<‹UI$²Ç(20)§105>‹ Ã(UR$)²±UL§50¦A120: CHECK FOR VALID CHARACTER¶FUR$²UR$ªUI$ÀK™UI$;ÈP‰50ÎU:ÔZ:Ú_:àdŽùf ++ CHECK DELETE ++ **ü õ™"“"" öUP²0:UG$²"ÔEACHER ÉNST":UH²1:850P ÷™" ÔO THE BEST OF OUR KNOWLEDGE,"y ø™" THIS PROGRAM IS IN THE PUBLIC"¥ ù™" DOMAIN. ÉF THIS IS NOT THE CASE" ú™" PLEASE CONTACT:"ì û™" ÃOMMODORE ÂUSINESS ÍACHINES".4Â,¨ ‹BW$²"L"§OA²1Ö,² ‹BW$²"S"§OA²1.5è,¼ ‹BW$²"F"§OA²3ü,Æ ‹TEMP±50§3310"-Ð **MO=MAX OXYGEN CONTENT OF WATER:-Ú MO²15«2¬(TEMP«32)­9F-ä ‰3320\-î MO²11«(TEMP«50)­9†-ø **HD=HUMAN WASTE DECOMPOSITION COEFFš- ‹WT$²"I"§HD².25®- ‹WT$²"S"§HD².@@@@@@@@@@@@@@"à2¾™"ÉÕËÊÉÊÉËÊÉÕÉÕÊÉÕÉÕÊÉÕÉÕÊÉÕÉÕÉÊÉÉÕÉÊÉÊÉÕ"3È™"ÕÉÉÊÉÉÊÉÊÊÉÊÉÕËÕÉËÉÊÉÊÉÊÉÕËÉÊÊÉÊÉÉÊÉÕÉÊ">3Ò™"ÕÉÕÉÊÉÕÕÉÉÕÉÊÉÕÕÕÉÉÊÉÊÉÕËÉÉÊÉÕÊÉÊÉÊÉËËÉ"m3Ü™"ÉÊÉÕÊÊÉÊÉÊÕÕÊÊÕËÊËËÊÕÊËËÊÊÊËËÊÕËÊÊÕËËÊÊ"œ3æ™"ÉÕÉÊÉÕÕÊÉÊÉÕÊÉÕÊÊÉÊÉËÊËÉÉÊÊËÊÉÊÉÊÉÊÉÊÉÕ"¨3ð™"SOFTWARE: ** COMMODORE LOGO **Q;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0s<¡A$:‹A$³±" "§I²Iª1:‹I³250§828—>T1$²"":T2$²"":T3$²"":T4$²"":I²0 @‰300¼C ** SPACE BAR PRESS **ñH™È(UD$,24);"PRESS SPACE BA i‹Ã(UR$)³1§50"nUR$²È(UR$,Ã(UR$)«1)4s™" ";:‰50[x ++ CHECK FOR VALID CHARACTERS ++m}‹Ã(US$)²0§150~‚US²1¤Ã(US$)•‡‹UI$²Ê(US$,US,1)§Ž›Œ‚¨‘UI$²"":ŽÃ– ** STANDARD INPUT **Ô˜‹Æ(UI$)²46§Žå›‹UI$²Ç(32)§Ž ‹Æ(UI$)³48°Æ(U ü™" 3370 ÐHARMACY ÁVE.3 ý™" ÁGINCOURT, ÏNTARIO"U þ™" ÃANADA Í1× 2Ë4"u ÿ™" (416) 499-4292" UP²1: 835:UH²1: 850¿ ™" ÐROGRAM ÎAME: ÒEMEDIAL ÃHEMISTRY"á ™" ×RITTEN ÂY : ÕNKNOWN™" 75Ì- **HW=WASTE DUE TO HUMANSå- **OX=OXYGEN CONTENT.* **NW=WASTE DUE TO NATURAL POLLUTANTS.4 NW²NP­ND%.> HW²05.H OX²MO«NP­OAD.R W(1)²NWªHWQ.\ OX(1)²OXh.f **DR=DUMPING RATE|.p ‹TT$²"N"§3470EE’.z ‹TT$²"P"§DR².5¬DR¨.„ ‹TT$²"S"§DR².1¬DR´…I²1¤75½3úR²µ(»(1)¬200ª.5)Ó3 POKE33528+R,81Ú3‚Iî3D²12:R²16:2060ý3"™"POLUT’"4,I²1¤3000:‚I46™"“"!4@Ž 2xI²1¤9I2‚™È(R$,32);" "P2Œ‚IV2–Žo2 **GRAPHIC DISPLAY**‚2ª™"“";È(D$,19);±2´™"@@@@@@@@@@@@@@@@@@@@@@@@@R TO CONTINUE’"JZZ²0¤9:¡ZZ$:‚ZZL¡UI$:‹UI$³±" "§844#NŽCR ** PAGE DESIGN ROUTINE **OTUP²UPª1yW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)¨\™" --------------------------------------"·`‹UH³±0§870ëa™È(UD$,24);È(UP$,7);"QUIT - PRESS I$)±57§170¥Ž%ª‹Æ(UI$)³65°Æ(UI$)±90§180+¯ŽO´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":ŽU»Žb¾UI$²"":Žs, ** MENU **}.™"“"š1™" ÍENU"É6™" --------------------------------------"÷;: ™" 1. REMEDIAL NOMENCLATURE ÕPGRADED ÂY : Ô ×ALKER-™" ÃONVERTED ÂY: ÍARILYN ÇARDNERT™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒ| ™" ÉF ERRORS ARE NOTED, CONTACTœ ™" ÍARILYN ÇARDNERÀ ™" 1630 ÍADISON ÓTREETé ™" ÅVANSTON, ÉLLINOIS 60202.Ž J²2¤25ë.˜ ™È(UD$,25);" ONE MOMENT PLEASE... "ú. I².1¤1©.1 /¢ OX²OXª.1¬(OA¬(MO«OX)«ND¬NW«HD¬HW)//¬ ‹OX³0§OX²0G/¶ NW²NWª.1¬(NP«ND¬NW)_/À HW²HWª.1¬(DR«HD¬HW)f/Ê ‚Is/Ô OX(J)²OX‚/Þ W(J)²NWªHW‰/è ‚J’/í ™""˜/ò Ž²/ü **GRAPHING™æ±™ò¶™ "RUN"þÀ™ Ç(19) Ê—209,2Ô—939,13!Þ—940,13'ç€Rè‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **^é™"“";:Œ{875:UP²0:UG$²"ÐROBLEMS"¯ CP$²""µ.ŒÐ8I²1¤37:‡B$(I),C$(I):‚ìBI²1¤25Q "üfUH²0:™"":Žk ** PLEASE WAIT REMARK **Qp™È(UD$,24);" ONE MOMENT PLEASE... "WuŽz„ -- LOAD AND RUN MENU PROGRAM•‰TT$²"0:SHIFT/RUN MENU"¡Ž™Ç(147)§“™­˜™Î™"LOAD";Ç(34);TT$;Ç(34);",8"Ô¢™Ú§™à¬"! @™" 2. STUDENT INSTRUCTIONS"K E™" 3. TEACHER INSTRUCTIONS"j O: ™" 4. QUIT"™ T™" --------------------------------------"Ê Y™" PRESS NUMBER KEY (1-4) THEN ";ú ^: UL²1:US$²"1234":35:---INPUT ROUT UP²2: 835:UH²1: 850(™" ÉF YOU WANT TO SUGGESTT™" ADDITIONAL EDUCATIONAL PROGRAMS|™" TO BE WRITTEN FOR THE Â128"˜™" PLEASE CONTACT"¸™" ÍARILYN ÇARDNERÜ™" 1630 ÍADISON ÓTREET™"  ROUTINE**½/FLAG²0É/J²1¤25Ù/X$²OX$(Xª1)ã/$R²Jª5ø/.D²17«µ(OX(J)ª.5)08‹µ(OX(J)ª.5)³²5§FLAG²FLAGª1,0B‹FLAG²1§3790A0L‹D³²0§X$²"":D²1P0V‹D²17§D²16Z0`2060b0j™X$q0tX$²W$(Xª1)‡0~D²17«µ(W(J)­4ª.5)œ0ˆ‹D³²0§X$²"":D²1«0’‹D²17:‡ D$(I),E$(I):‚LI²1¤25:‡ H$(I),I$(I):‚#VI²1¤25:‡J$(I),K$(I):‚,e™"“"Hj2640: TOPIC SELECTIONdk2665: TOPIC SELECTION„tAT%²0:NC%²0:CC%²0:NF²0:RC²0£~‘Å(X$)2810,3290,3720,4170¯ˆL²1¤20Í’TR²0:A1$²"":A2$²"":A3$²""ßœ‹Å(X$)²1: ** COMMODORE LOGO **';™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0I<¡A$:‹A$³±" "§I²Iª1:‹I³250§828m>T1$²"":T2$²"":T3$²"":T4$²"":I²0v@‰300’C ** SPACE BAR PRESS **ÇH™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"ÜJZZ²0¤9:GE ONE VARIABLE ONLY AND KEEP THEð™" OTHERS CONSTANT.ú835:UP²UPª1:850C™" ÔHIS PROGRAM SIMULATES THEm™" EFFECTS OF POLLUTION ON DIFFERENT†™" BODIES OF WATER.³™" ÔHE USER CHOOSES VARIABLES AS:Ý"™" ÔHE BODY OF R TO CONTINUE’": POKEUO,0é$Æ‹X²3§844:Žó$Ð2415ý$Ú‰1890%ä %€!% **CURSOR ADDRESS**<%P$²""ªÈ(D$,D)ªÈ(R$,R)E% ™P$;K%*ŽZ%4**PAUSE**{%>™:™"HIT ANY KEY TO CONTINUE"%H¡Z$:‹Z$²""§2120•%RŽ·%\**DRAW AXES & SET UP TABLE**À%f : ÎONE"Ò™" : ÐRIMARY"GÔ™" : ÓECONDARY"ZÖ835:UH²1:850ƒØ™" ÏNCE ALL THE OPTIONS ARE FILLED°Ú™" THE COMPUTER WILL DISPLAY A GRAPH OFÜÜ™" WASTE CONTENT AND OXYGEN CONTENT OF Þ™" THE W 0202í835UH²1:UP²2:850 ™""2 ™" ÏNCE ALL THE OPTIONS ARE"Y"™" FILLED THE COMPUTER WILL"€#™" DISPLAY A GRAPH OF WASTE"©$™" CONTENT AND OXYGEN CONTENT"Ò&™" IN ÐÐÍ (OXYGEN WILL APPEAR"ï'™"  ¡ZZ$:‚ZZóL¡UI$:‹UI$³±" "§844ùNŽR ** PAGE DESIGN ROUTINE **%TUP²UPª1OW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)~\™" --------------------------------------"`‹UH³±0§870Áa™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "ÒfUH²0:™"":Ž WATER : ÌARGE POND" ,™" ÌARGE LAKE"/ 6™" ÓLOW RIVER"W @™" ÆAST RIVER| J™" ÔHE WATER TEMP IN Ã: 1 - 33’ O835:UP²UPª1:850¼ T™" ÔHE KIND OF WASTE : ÉNDUSTRIAL"à ^™"  ™"“"Ô%p™"W OX’ PPM"à%zJ²0¤14&„‹J­5²µ(J­5)§™" Û":‰2200&Ž™" Ý"&˜‚JB&¢™" ÛÀÀÀÀÛÀÀÀÀÛÀÀÀÀÛÀÀÀÀÛÀÀÀÀÛDAYS"M&¬J²1¤6h&¶™£21ª(5¬J«1));(J«1)¬5;o&À‚J€&Ê™"62 15’"“&Ô™"40 10’"¦&Þ™"20  5’"¹&è™" 0  0’" ATER IN ÐÐÍ (OXYGEN WILL APPEAR à™" IN REVERSE’).fâ™" ÎÏÔÅ: IF OXYGEN FALLS BELOW 5 PPM THE FISH WILL DIE.¢ä™" ÕP TO 3 GRAPHS MAY BE SUPERIMPOSED PER RUN."«å835±óŽÒô ** TEACHER INSTRUCTIONS **Ûõ™"“"öUP²0:UG$ IN REVERSE’)."(UH²1:UP²3:835:8501)™" ÎÏÔÅ: IF OXYGEN FALLSY*™" 5 PPM THE FISH WILL DIE."~+™" ÕP TO 3 GRAPHS MAY BE"£,™" SUPERIMPOSED PER RUN."»0UH²1:UP²4:835:850åD™"ÉT IS ESSENTIAL TO ñk ** PLEASE WAIT REMARK **'p™È(UD$,24);" ONE MOMENT PLEASE... "-uŽP„ -- LOAD AND RUN MENU PROGRAMk‰TT$²"0:SHIFT/RUN MENU"wŽ™Ç(147)}“™ƒ˜™¤™"LOAD";Ç(34);TT$;Ç(34);",8"ª¢™°§™¶¬™¼±™È¶™ "RUN"ÔÀ™ Ç ÓEWAGE!h™" ÔHE RATE OF DUMP : (PPM/DAY),!r™" ÔYPE OF TREATMENT : ÎONE"R!w™" : ÐRIMARY"z!|™" : ÓECONDARY"•!835:™"“":UP²UPª1:850Ã!‹™" ÏNCE ALL THE OPTIONS ARE FILLEDÌ&òD²11:R²6:2060Ø&üJ²1¤25â& ™".";é& ‚Jõ& ‰2350'$ ™" FISH DIE’"'. ™"" '8 ™È(D$,18);G'B ™" BODY/WATER    Â"m'L ™" WATER TEMP    ”'V ™" WASTE TYPE    Â"»'` ™" DUMP RATE    ²"ÔEACHER ÉNST":UH²1:850/÷™" ÔO THE BEST OF OUR KNOWLEDGE,"Xø™" THIS PROGRAM IS IN THE PUBLIC"„ù™" DOMAIN. ÉF THIS IS NOT THE CASE"¡ú™" PLEASE CONTACT:"Ëû™" ÃOMMODORE ÂUSINESS ÍACHINES"îü™" 3370 ÐHARMPREPARE "J™" STUDENTS FOR THIS SIMULATION":™" BY:"]K™"1. ÔEACHING THE SKILL OF":™" EXPERIMENTING"¢L™"2. ÄEVELOPING THE RELATION-":™" SHIPS BETWEEN";ÛM™" DISSOLVED":™" OXYGEN,MICRODES AND WASTE.(19)ßÊ—209,2ëÔ—939,13÷Þ—940,13ýç€(è‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **5é™"“Ž";:Œ]F VARIABLES EXPLAINED LATER IN REMS€PD$²""²ZR$²""ÉnI²1¤18:‡H$(I):‚:Œþxð!™" THE COMPUTER WILL DISPLAY A GRAPH OF"•™" WASTE CONTENT AND OXYGEN CONTENT OFI"š™" THE WATER IN ÐÐÍ (OXYGEN WILL APPEAR`"›™" IN REVERSE’).«"Ÿ™" ÎÏÔÅ: IF OXYGEN FALLS BELOW 5 PPM’ THE FISH WILL DIE."è"¤™" ÕP TO 3 GRA Â"â'j ™" TREATMENT    Â"(o ™È(UD$,25);È(UP$,7);"QUIT - PRESS Q ""(t D²1¤41(~ R²32:2060<(ˆ ™H$(D)C(’ ‚D[(œ D²19:R²13ª6¬X:2060‰(¦ **CALL INPUT ROUTINE FOR BODY OF WATER**¯(º US$²"PLSFQ":UL²1:35:‹UR$²"Q"§300µ(Ä ACY ÁVE.ý™" ÁGINCOURT, ÏNTARIO"4þ™" ÃANADA Í1× 2Ë4"Tÿ™" (416) 499-4292"nUP²1: 835:UH²1: 850”™" ÐROGRAM ÎAME: ÐOLLUTION»™" ×RITTEN ÂY : ËEN ËISSMANN"à™" ÕPGRADED ÂY : ÊIM ÂORITZ "äN835êS:ðWŽX ** PROGRAM MODIFICATION INST **Y™"“"D]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850M”835S²:Y»Žy  ** T I T L E P A G E **†"™"“";œ$I²1¤38:™"¦’";:‚´&I²1¤22:™"¦’";:‚Ì(I²1¤37:™"¦’";:‚ä*I²1¤22ƒ"P’OND ","L’AKE ","S’LO-RIV","F’ST-RIV"-‚ƒ"1-33’ C "," "," "," "JŒƒ"I’NDUST ","S’EWAGE "e–ƒ"0-14’ "," "Ž ƒ"N’ONE ","P’RIMARY","S’ECOND "³ªƒ" ", " ", " "½¯‰1840Ý´UG$²"INSTRPHS MAY BE SUPPERIMPOSED PER RUN."#©™" ÔO RETURN TO THE ÍÅÎÕ, TYPE H ÒÅÔÕÒÎ##¸835:Ž,#8352#+Ž;#0™"“"g#:**X=COUNTER FOR NUMBER OF TRIALS-MAX=3o#DX²0–#N**CALL ROUTINE FOR TABLE & AXES**¢#X2140¸#b‹BW$²"NON"§2020ß#l**Á(â BW$²UR$Ì(ì D²1¤4Û(ö R²32:2060è( ™H$(Dª4)ï( ‚D) D²20:R²13ª6¬X:2060,) **CALL INPUT ROUTINE FOR TEMP**a)2 ™" ";:US$²"0123456789Q":UL²2:35:‹UR$²"Q"§300z)< TEMP²Å(UR$)¬(;­5)ª32”)F ‹TEMP³33°TEMP±92§2580Ÿ)P D²1¤2®)Z R²32:2060»)d ™™" ÃONVERTED ÂY: ÍARILYN ÇARDNER0™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒ[ ™" ÉF ERRORS ARE NOTED, CONTACT:"{ ™" ÍARILYN ÇARDNERŸ ™" 1630 ÍADISON ÓTREETÈ ™" ÅVANSTON, ÉLLINOIS 60202â UP²2: 835:UH²1: 850:™"‘¦’";:‚ ,™"© ’+.™" ’  ’©L0™" ’ £ßj2™"ß ’’4™"C O M M O D O R Eµ6™"EDUCATIONALÔ8™"SOFTWAREï.":UP²0:UH²1:850 ¹™"ÔHIS PROGRAM ALLOWS YOU TO INVESTI-;¾™" GATE THE EFFECT OF 5 VARIABLES ON THEaÈ™" ACCUMULATION OF WASTE AND THEÒ™" DEPLETION OF OXYGEN IN A WATER SYSTEM.½Ü™" ÉN PERFORMING AN EXPERIMENT YOUëæ™" CHANCALL ROUTINE FOR CALCULATIONS**ë#v3170$€**WS(),OX$()STORE PLOTTING SYMBOLS>$ŠOX$(1)²"1’":OX$(2)²"2’":OX$(3)²"3’"`$”W$(1)²"1":W$(2)²"2":W$(3)²"3"}$ž**CALL GRAPHING ROUTINE‰$¨3580“$²X²Xª1Ù$¼‹X²3§™È(UD$,25);"PRESS SPACE BAH$(Dª8)Â)n ‚DÚ)x D²21:R²13ª6¬X:2060*‚ **CALL INPUT ROUTINE FOR KIND OF WASTE**,*– US$²"ISQ":UL²1:35:‹UR$²"Q"§3008*ª WT$²UR$C*´ D²1¤2R*¾ R²32:2060`*È ™H$(Dª10)g*Ò ‚D*Ü D²22:R²13ª6¬X:2060¬*æ **CALL INPUT ROUTINE FOR DUMPING RATE**á*ú ™™" ÉF YOU WANT TO SUGGEST3™" ADDITIONAL EDUCATIONAL PROGRAMS[™" TO BE WRITTEN FOR THE Â128"w™" PLEASE CONTACT"—™" ÍARILYN ÇARDNER»™" 1630 ÍADISON ÓTREETä™" ÅVANSTON, ÉLLINOIS 6F È+ OR ÏÈ£, AS WELL AS"ÁF,™" THE TOTAL VOLUME’. ÔHUS, WE ALSO CAN"ïF.™" EASILY FIND THE PÈ’ OF THE SOLUTION."G0™" ÈOWEVER, MIXTURES OF ACIDS WITH BASES"EG2™" ARE SLIGHTLY MORE"COMPLICATED."NG4835\G5UH²1:850ˆG@™" ÈERE IS ONE OF THERODUCED PER È2ÓÏ4, 0.12 MOLES"¹L}™" OF È+ IS PRODUCED. ÔHUS, THERE IS A"åL~™" TOTAL OF 0.36 MOLES OF È+ PRODUCED."MŠ™" STEP 2’ 0.5Ì OF 0.5Í ËÏÈ CONTAINS7M”™" 0.5 X 0.5 = 0.25 MOLES OF ÏÈ£."_MЙ" STEP 3’ ÔHERE IS AN EXCESS OF"ŒMÚ™" 0.36 Ï™" "«RЙ" ‘ "ÙRÒUL²10:US$²"Q.0123456789":35:‹UR$²"Q"§300çRÓAN²Å(UR$)SÔ‹¶(AN«.0085)³.0002§6117,SÞ™" ÎO, CHECK YOUR SUBTRACTION.‘‘‘"VSã™" ‘":‰6098zSå™"‘ .´ CAN BE OF NO FURTHER AID~Xœ™" TO YOU.”Xº™" ÇOODBYE ..."XÄ835¨XΉ 2250®XZŽ´XnÉX@EX²µ(¼(X)­¼(10))ÙXJZ²X­(10®EX)ïXTZ²µ(Z¬100ª.5)¬.01Y^X2²Z¬(10®EX)YrŽ ‘"EW(UL²10:US$²"Q.0123456789":35:‹UR$²"Q"§300SW*AN²Å(UR$)nW. >™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000)†QU$(250),AN$(250),OX(31),W(31),H$ SE MORE COMPLEX"šGJ™" PROBLEMS:"ÂGT™" E.G. 3’ ×HAT IS THE PÈ OF THEðG^™" FOLLOWING MIXTURE: 350MÌ OF 0.2Í ÈÎÏ3,Hh™" 200MÌ OF 0.5Í ÈÃL & 250MÌ OF .3Í ÎAÏÈ.JH†™" ÏN MIXING, THE È+ IONS WILL REACT"tH™" WITH THE ÏÈ£ IONS IN A 1:1 RATIO."Ÿ - 0.25 = 0.11 MOLES OF È+ IONS."•Mä835£MéUH²1:850×Mî™" STEP 4’ ÔHE TOTAL VOLUME OF THE MIXTURE"úMø™" IS 0.2 + 0.6 + 0.5 = 1.3Ì.")N™" STEP 5’ [È+] = (# MOLES OF È+)/VOLUMEPN ™" = 0.11/1.3 = 0.085ÍqN™" STEP 6’ PÈ = -LO 0085 MOLES "ŸSæ™" "ØSè™" STEP 4’ ×HAT IS THE TOTAL VOLUME IN Ì?"TêZ0²1¤5:™" ":‚Z0!Tì™"‘‘‘‘“‘‘"OTîUL²10:US$²"Q.0123456789":35:‹UR$²"Q"§300]TðAN²Å(UR$)  3. TEACHER INSTRUCTIONS"4 O™" 4. QUIT"c T™" --------------------------------------"” Y™" PRESS NUMBER KEY (1-4) THEN ";¼ ^UL²1:US$²"1234":35: INPUT ROUTINEÇ `US$²""ä c‘Å(UR$)1000,400,500,396í h‰300. ‹ (18)&UD$²""XUP$²" "~UT$²" ÐÏÌÌÕÔÉÏÎ       ": PLACE–800: TITLE SCREEN­ ‰300: MENU SCREENÉ# +++ INPUT SECTION +++Û(UR$²"":UI$²""ë*‹UL²0§UL²80ø-™" "; 2Hš™" ÔHUS, THE OVERALL APPROACH TO ALL"ÉH¤™" THESE MIXTURE PROBLEMS WILL BE AS"éH¦™" GIVEN ON THE NEXT PAGE."òH¨835IªUH²1:850,I¬™" ÈOW TO SOLVE A MIXTURE PROBLEM:"^I®™" STEP 1’ ÆIND THE # OF MOLES OF È+ IONS."‘I¸™" STEP 2’ ÆINDG [È+]"™N ™" = -LOG 0.085 = 1.07’"·N*™" ×ASN'T THAT EASY?!!"ÀN4835ÉN9850öN>™" ÍIXTURE: 60MÌ OF 0.5Í ÎAÏÈ, 50MÌ OF#OH™" 0.08Í ËÏÈ, 60MÌ OF 0.4Í ÈÎÏ3 AND 30MÌ8OR™" OF 0.05Í ÈÃL.TO\™" ×HAT IS THE PÈ?’"ƒO^UL²10:US$²"Q-.0uTò‹¶(AN«.2)³.001§6134˜Tô™" ÎO, CHECK YOUR ADDITION."ÇTõ™"‘‘‘‘ ‘":‰6126ñTö™" STEP 5’ ÁND NOW WHAT IS [ÏÈ£]?"U÷UL²10:US$²"Q.0123456789":35:‹UR$²"Q"§300-UøAN²Å(UR$)HUù‹¶(AN«.0425)³.001§6150xUú™" ÒEMEMBER, ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **> Œ™"“":‰900I 875:Žj  ** STUDENT INSTRUCTIONS **s •™"“"™ šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850Ç ¦™" ÔHIS PROGRAM ALLOWS YOU TO INVESTI-õ ¨™" GATE THE EFFECT OF 5 VARIABLES ON ¡UI$:‹UI$²""§5007‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85C<‹UI$²Ç(20)§105W>‹ Ã(UR$)²±UL§50|A120: CHECK FOR VALID CHARACTERŒFUR$²UR$ªUI$–K™UI$;žP‰50¤U:ªZ:°_:¶dŽÏf ++ CHECK DELETE ++ài‹Ã(UR$)³1§50ønUR$²È(UR$,Ã(UR$)«1)  THE # OF MOLES OF ÏÈ£ IONS."ÁI™" STEP 3’ ÓUBTRACT THE ABOVE TO FIND THEíIÌ™" # OF MOLES OF IONS IN EXCESS.JÖ™" STEP 4’ ÁDD THE VOLUMES TO GET THE"7JÛ™" TOTAL VOLUME."fJà™" STEP 5’ ÄIVIDE THE # MOLES OF EXCESS"Jæ™" 123456789":35:‹UR$²"Q"§300‘O`AN²Å(UR$)«Of‹¶(AN«12.63)³.15§6210ÛOp™"‘‘‘ STEP 1’ ×HAT'S THE TOTAL MOLES È+?"Pr™" ‘"5PvUL²10:US$²"Q.0123456789":35:‹UR$²"Q"§300CPxAN²Å(UR$)_Pz‹¶(AN«.0255)³.001§6030šP„™"[ ] = # MOLES / VOL(Ì).’ "±Uû™"‘‘‘ ‘":‰6135H ³Ž±ãU™" STEP 6’ ÁND THE PÏÈ? " V™" ‘"ß PRINT" "7>à PÝRINT"‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘"f>á™" STEP 4’ ×HAT IS THE [ÏÈ£]? ">â™" C–™" THE FOLLOWING TYPE:ÆC ™" E.G. 1’ ×HAT IS THE PÈ OF A 600MÌ"õCª™" SOLUTION FORMED BY ADDING 1.5G OF ÎAÏÈ"D´™" AND 0.5G OF ËÏÈ?"ã™" ‘‘"í>äUL²10:US$²"Q-.0123456789E":35:‹UR$²"Q"§300û>æAN²Å(UR$)?(AN«.108)³.01§4620UL²10:US$²"Q-.0123456789E":35:‹UR$²"Q"§300/@AN²Å(UR$)>/BP1²P1ª1:‹¶(AN«OH)³10®«O%§4170M/D‹P1±1§3914j/F™" ÎOPE, TRY AGAIN.‘‘‘"¤/H™ " ‘‘":‰ 3902Ð/J220¼4r™" ÎO, TRY AGAIN.‘‘‘"ö4w™ " ‘‘":‰ 41845|™"‘‘ ÎOT YET, THE [È+] IS";H:W²Wª1M5™" "„5ƒ™" YOUR SCORE IS";3¬L«W;" OUT OF";3¬L;"."5†835”5‚L5•85HE MOLECULAR MASS"Ä:Œ™" OF CALCIUM HYDROXIDE?":™ò:ŽUL²10:US$²"Q.0123456789":35:‹UR$²"Q"§300;AN²Å(UR$);”‹¶(AN«74)³.2§4520F;ž™"  ÎO, CHECK YOUR ÐERIODIC ÔABLE. ’‘‘‘"u; ™ " ‘":‰ 4494¡;¨™" STEP 2’ ÈOW MANY 8É@*™"":Z0²1¤9:™" ":‚ A+™"":™" STEP 6’ ÆINALLY, WHAT IS THE PÈ? "9A/UL²10:US$²"Q.0123456789":35:‹UR$²"Q"§300GA1AN²Å(UR$)bA4‹¶(AN«13.03)³.03§4680ˆA>™" ÎO, CHECK YOUR SUBTRACTIE CASE" ú™" PLEASE CONTACT:"= û™" ÃOMMODORE ÂUSINESS ÍACHINES"` ü™" 3370 ÐHARMACY ÁVE.„ ý™" ÁGINCOURT, ÏNTARIO"¦ þ™" ÃANADA Í1× 2Ë4"Æ ÿ›" (416) 499-4292"à UP²1: 835:UH²1: 850 ™" :I²0ï@‰300 C ** SPACE BAR PRESS **@H™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"UJZZ²0¤9:¡ZZ$:‚ZZlL¡UI$:‹UI$³±" "§844rNŽ’R ** PAGE DESIGN ROUTINE **žTUP²UPª1ÈW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)÷\™" ----------------E" ™" IS OFTEN INTERESTED IN THE HYDROGEN"%$ ™" ION CONCENTRATION, [È+]."N. ™" ÔHE RANGE OF VALUES ENCOUNTERED"}8 ™" VARIES FROM 1.0 TO 0.00000000000001"¥B ™" MOLAR. ÓINCE THIS PRESENTS SOME"ÒL ™" AWKWARD NUMBERS TO WORK WITH, THE PÈ"ï  PÈ = -LOG[È+] ’æÒ 835îæ C²0ùð L²1¤6ú P²0 I²µ(90¬»(1)ª10)­10+ J²µ(14¬»(1)ª1); X²I¬10®(«J)J 8000:H²X2S 850y" ™" ÉF THE [È+] IS ";H;" MOLAR,¢, ™" WHAT IS THE PÈ OF THE SOLUTION?"Ð6 UL²10:US$²"Q.0123456789":35:‹UR$ IS";PHà$ø ™" WHAT IS THE [È+]?";% UL²10:US$²"A-.0123456789E":35:‹UR$²"Q"§300% AN²Å(UR$);% ‹¶(AN«H)±10®(«PH«1)§3370[% ™" ÔHAT IS CORRECT.":C²Cª1e% ‰3400y%* P²Pª1:‹P±1§3395›%4 ™" ×RONG, TRY AGAIN.":‰3330À%C ™" ÓTILL WRONG, IT SHOULD B ÐROGRAM ÎAME: PÈ ÐROBLEMS".™" ×RITTEN ÂY : Ò. ×. ÄRAYS™" ÕPGRADED ÂY : ÑUINCY ÌEE|™" ÃONVERTED ÂY: ÍARILYN ÇARDNER£™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒË ™" ÉF ERRORS ARE NOTED, CONTACTë ™" ÍARILYN ÇARDNE ----------------------"`‹UH³±0§870:a™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "KfUH²0:™"":Žjk ** PLEASE WAIT REMARK ** p™È(UD$,24);" ONE MOMENT PLEASE... "¦uŽÉ„ -- LOAD AND RUN MENU PROGRAMä‰TT$²"0:SHIFT/RUN N ™" SCALE WAS DEVELOPED."øP 835R UH²1:850%V ™" PÈ’ IS DEFINED AS :"G` ™" PÈ = -LOG[È+]sj ™" ÉF [È+] = 1Í , PÈ = -LOG(1) = 0t ™" -14 " -14Ë~ ™" ÉF [È+] = 10 Í, PÈ = -LOG(10 )=14"÷ˆ ™" ²"Q"§300ß; ANS²Å(UR$)é@ P²Pª1ûJ X²«¼(H)­2.303 O 8000:PH²X2" T ‹¶(ANªPH)±.1§2940B ^ ™" ÔHAT IS CORRECT.":C²Cª1L r ‰2970[ | ‹P±1§2960} † ™" ×RONG, TRY AGAIN.":‰2870¤ ™" ÓTILL WRONG, THE ANSWER IS";PHØ š ™" YOUR SCORE IS";CE";Hô%H ™" YOUR SCORE IS";C;" OUT OF";L;"."ý%M 835&R ‚L&\ ‹C±4§3460!&g UH²1:850M&h ™" ÉT WOULD BE TO YOUR ADVANTAGE TO"k&j ™" REVIEW THIS MATERIAL."š&l ™" ×OULD YOU LIKE TO REVIEW OR RETURN TO"°&n ™" MENU? (R/M) ";Ô&p UL²1:R ™" 1630 ÍADISON ÓTREET8 ™" ÅVANSTON, ÉLLINOIS 60202R UP²2: 835:UH²1: 850w™" ÉF YOU WANT TO SUGGEST£™" ADDITIONAL EDUCATIONAL PROGRAMSË™" TO BE WRITTEN FOR THE Â128"ç™" PLEASE CONTACT" MENU"ðŽ™Ç(147)ö“™ü˜™™"LOAD";Ç(34);TT$;Ç(34);",8"#¢™)§™/¬™5±™A¶™ "RUN"MÀ™ Ç(19)XÊ—209,2dÔ—939,13pÞ—940,13v瀡è‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **­é™"“";:Œ¶ä™"“"Ò„UP²0:UG$²"PREFACE":850Ž™" ÙOU CAN SEE THAT THE PÈ IS USUALLY"’ ™" BETWEEN 0 AND 14.">œ ™" ÎOTICE THAT THE MORE CONCENTRATEDk¦ ™" THE ACID (OR THE MORE ACIDIC IT IS),"…« ™" THE LOWER THE PÈ."Ž° 835œµ UH²1:850ʺ ™" ×HILE PURE WATER HAS A PÈ OF 7.0, PÈ"òÄ ™;" OUT OF";L;"."á Ÿ 835è ¤ ‚Lö ® ‹C±3‰3040ÿ ³ 8502!¸ ™" ÙOU ARE STRONGLY ADVISED TO REVIEW THIS"D! ™" MATERIAL."v!Ì ™" ÄO YOU WISH TO REVIEW OR PROCEED? (R/P)"š!Ð UL²1:US$²"QRP":35:‹UR$²"Q"§300¯!Ò ‹ UR$²"R" § 2310º!Ô ‰ 3070Ã!à 850US$²"QRM":35:‹UR$²"Q"§300é&r ‹ UR$²"R" § 3070ó&t ‰2250'„ UH²1:8500'† ™" ÙOU HAVE SUCCESSFULLY MASTERED THIS"['ˆ ™" SECTION. ÙOU MAY GO TO ÓECTION 2."d'Š 835o'Ž ‰ 2250’'¢ UP²0:UG$²"PÏÈ CALC.":UH²1:850¹'¬ ™" ÉN SOME INSTANCES, ONE IS MOR™" ÍARILYN ÇARDNER+™" 1630 ÍADISON ÓTREETT™" ÅVANSTON, ÉLLINOIS 60202]835cN:iWŽX ** PROGRAM MODIFICATION INST **˜Y™"“"½]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850Æ”835̲:Ò»Žò  ** T I T L E  ÙOU WILL NEED A  CALCULATOR ’ AND A2˜™"  ÐERIODIC ÔABLE ’ TO COMPLETE THIS"C¢™" PROGRAM."q¬™" ÔHIS PROGRAM ONLY DEALS WITH STRONG‰¶™" ACIDS AND BASES.’À835˜ÊžÌ:¼Ï™"“ ÍENU"ëÔ™" ---------------------" VALUES BELOW 7.0 INDICATE ACIDIC Î ™" SOLUTIONS AND THOSE ABOVE 7 REPRESENT"GÓ ™" BASIC (OR ALKALINE) SOLUTIONS."sØ ™" ÔO CONVERT A [È+] TO PÈ, YOU SIMPLY¢â ™" TAKE THE (BASE 10) LOG OF THE [È+] AND"»ì ™" CHANGE THE SIGN."Üö ™" ÔO REFRESHð!å ™" ÈAVING MASTERED THE FIRST STEP,""ê ™" WE WILL PROCEED."ô 835 "þ UP²11:850J" ™" ÔO CALCULATE THE [È+] IF YOU ARE"e" ™" GIVEN THE PÈ, USE:"‡" ™" -PÈ"¥" ™" [È+] = 10"Í" ™" Eß'® ™" INTERESTED IN [ÏÈ£] THAN [È+].(¶ ™" ÔHUS PÏÈ HAS BEEN DEFINED AS THE*(À ™" FOLLOWING: PÏÈ = -LOG[ÏÈ£]V(Ê ™" ÙOU CAN DO EXACTLY THE SAME TYPE OF…(Ô ™" CALCULATIONS AS WITH PÈ. ÂUT REMEMBER"±(Þ ™" THAT, ON THE PÏÈ SCALE, LOW NUMBERS"ß(è  P A G E **ÿ"™"“";$I²1¤38:™"¦’";:‚-&I²1¤22:™"¦’";:‚E(I²1¤37:™"¦’";:‚]*I²1¤22:™"‘¦’";:‚‚,™"© ’¤.™" ’  ’©Å0™" ’ £ßã2™"ß ’----------------"Ö™" 1. ÔHE ÍEANING OF PÈ "AØ™" 2. ÃALCULATIONS WITH PÏÈ" "iÜ™" 3. ÁCID OR ÂASE ÓOLUTIONS"ŠÞ™" 4. ÓTRONG ÍIXTURES"±â™" 5. ÒETURN TO ÍAIN ÍENU"ßä™" ------------------------------- YOUR MEMORY,"ö ™" LOG 100 = 2" ™" LOG 0.00001 = -5"0 ™" LOG 5.2 = 0.716w ™" (SINCE 10 = 5.2) LOG 0.52 = -0.284"˜( ™" LOG 0.0252 = -2.284"¡d 835¯i UH²1:850Ûn ™" ÎOW, IT'S TIME TO P -6.4ð" ™" E.G. IF PÈ = 6.4, [È+] = 10#& ™" -7 0.6"I#0 ™" = 10 X 10"n#3 ™" -7›#6 ™" = 10 X 3.95"Æ#: ™" = 3.9™" INDICATE BASIC SOLUTIONS, NOT ACIDIC.")ò ™" ÉN ANY AQUEOUS (WATER) SOLUTIONS, THE";)ü ™" FOLLOWING RELATION ALWAYS HOLDS TRUE:\)™" -14y)™" [È+][ÏÈ£] = 10¢)™" ÃLEARLY, IF YOU KNOW ONE OF THE"Ü)$™" CONCENTRAT 4™"C O M M O D O R E.6™"EDUCATIONALM8™"SOFTWAREh: ** COMMODORE LOGO ** ;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0Â<¡A$:‹A$³±" "§I²Iª1:‹I³250§828æ>T1$²"":T2$²"":T3$²"":T4$²""------"æ™" ÐRESS A NUMBER KEY (1-5) ";.èUL²1:US$²"12345Q":35:‹UR$²"Q"§300@ò‹Ã(UR$)±1§300KüUS$²""qþ‘Å(UR$)‰ 2310,3490,4290,5260,2306| ‰ 2250‚ Ž© UP²0:UG$²"ÍEANING OF PÈ":UH²1:850Ø ™" ÉN THE STUDY OF ACIDS AND BASES, ONUT THIS THEORY"òx ™" INTO PRACTICE."Œ ™" ÄUE TO THE PROBLEMS É HAVE WRITINGL– ™" POWERS OF 10, É'LL USE THE E METHOD OF"t  ™" INDICATING SCIENTIFIC NOTATION."–¾ ™" -5¶È ™" E.G. 6.3E-05 = 6.3X10"ÝÍ ™" 5E-07"õ#D ™" ÌET'S GIVE OUR THEORY MORE PRACTICE."þ#N 835$² C²0$¼ L²1¤6$Æ P²05$Ð PH²µ((1400¬»(1)ª1))¬.01D$Ò X²10®(«PH)S$Ó 8000:H²X2\$Õ 850ˆ$Ú ™" ÒEMEMBER TO GIVE YOUR ANSWER USING"ž$ä ™" THE E METHOD."Å$î ™" ÉF THE PÈ OF A SOLUTIONÃONVERTED ÂY: ÍARILYN ÇARDNER2 ™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒZ ™" ÉF ERRORS ARE NOTED, CONTACTz ™" ÍARILYN ÇARDNERž ™" 1630 ÍADISON ÓTREETÇ ™" " ÅVANSTON, ÉLLINOIS 60202á UP²2: 835:UH²1: 850™" SE WAIT REMARK **)p™È(UD$,24);" ONE MOMENT PLEASE... "/uŽR„ -- LOAD AND RUN MENU PROGRAMm‰TT$²"0:SHIFT/RUN MENU"yŽ™Ç(147)“™…˜™¦™"LOAD";Ç(34);TT$;Ç(34);",8"¬¢™²§™¸¬™¾±™Ê¶™ "RUN"ÖÀ™ Ç(19)áÊ—209,";dUL²2:US$²"1234567890Q":35:‹UR$²"Q"§300%nB²Å(UR$):‹B±20 °B³1§1370HŒŒ:J²1¤B:‡E$(J),S$(J),V$(J):‚JT– Q²1¤Ai›UG$²"":UP²Q:850— Y²Yª1:™:™"";£10ª21);R;"RIGHT OUT OF";NêX²µ(B¬»(1)ª1):Z²µ(2¬»(1)ª1):‹ Z²2 ‰1520´N²Nª1:™:™" Ôõ","ÎE",0çàƒ"SODIUM","ÎA",1ÿêƒ"MAGNESIUM","ÍG",2ôƒ"ALUMINUM","ÁL",3,þƒ"SILICON","ÓI",4Dƒ"PHOSPHORUS","Ð",3]ƒ"SULPHUR","Ó","2&4"tƒ"CHLORINE","ÃL",1ˆ&ƒ"ARGON","ÁR",0Ÿ0ƒ"POTASSIUM","Ë",1µ:ƒ"CALCIUM","ÃA",2»D€ENT!!!":‰1@ DIVIDER FOR SCIENCE IV<™"“DIVIDERONLYDOESNOTRUN"‚-NOMENCLATURE    4‚-NUCLEAR REACTOR R‚ PERCENT         ‚PERIODIC TABLE   ÉF YOU WANT TO SUGGEST2™" ADDITIONAL EDUCATIONAL PROGRAMSZ™" TO BE WRITTEN FOR THE Â128"v™" PLEASE CONTACT"–™" ÍARILYN ÇARDNERº™" 1630 ÍADISON ÓTREETã™" ÅVANSTON, ÉLLINOIS 60202ì8 2íÔ—939,13ùÞ—940,13ÿç€*è‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **7é™"“";:ŒLA²0:R²0:N²0:UP²0V.‰1340\L:mV™"“"²t™£5ª21);"*";£34ª21);"*":™£5ª21);"******************************"ö~™:™£2ª21);"ÂÙ ÓTEPHEN ×OROSZCZUK INC.": HE ELEMENT IS: ";E$(X):™" ×HAT IS ITS SYMBOL? ";.¹UL²15:US$²"":35:A$²UR$:‹UR$²"Q"§300a¾‹ A$²S$(X)§™:™" ÔHAT IS CORRECT.":R²Rª.5:‰1490¢È™:™" ÔHAT IS INCORRECT. ÔHE SYMBOL IS:":™""£15ª21);S$(X):™ÃÒ™:™" ×HAT IS ITS VALENCE? ";÷×UL²0:US$²" Hƒ"ÎAÏÈ",40,"ËÏÈ",56.1,"ÌIÏÈ",23.9,"ÈÃL(AQ)",36.5,"ÈÃLÏ4(AQ)",100.5jƒ"ÈÎÏ3(AQ)",63,"È2ÓÏ4(AQ)",98¡–¥A(X)²Å(È(Ä(X¬1.0000001),5)ª"E"ªÄ(µ(¼(X)­¼(10))))Þ™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODE ™"“"£21)Ç(15): UPPER LEFT  ÍENU"1 6™" --------------------------------------"T ;: ™" 1. PH PROBLEMS~ @™" 2. STUDENT INSTRUCTIONS"¨ E™" 3. TEACHER INSTRUCTIONS"Ç O: ™" 4. QUIT"ö T™" -------------------------------------35òWŽX ** PROGRAM MODIFICATION INST **!Y™"“"A]UP²0:UG$²"ÐROGRAM ÍOD":850J”835X²‹UZ²1§217^»Ž~  ** T I T L E P A G E **‹"™"“";¡$I²1¤38:™"¦’";:‚¹&I²1¤22:™"¦’";:‚Ñ(I²1¤37:™"¦’";:‚é*I²1¤22:™"‘¦’";:™" ÆORT ×ILLIAM ÃOLLEGE ’ INSTRUCTIONS8œ™" ÔHE AIM OF THIS PROGRAM IS TO AID YOUc¦™" IN THE LEARNING OF THE SYMBOLS AND«™" VALENCES OF THE FIRST 20 ELEMENTS¬­™" OF THE PERIODIC TABLE.Ü°™" ÙOU WILL BE GIVEN AN ELEMENT NAME OR A"0123456789&Q":35:A$²UR$:‹UR$²"Q"§300+Ü‹ A$²V$(X)§ ™:™" ÔHAT IS CORRECT.":R²Rª.5:‰1580oæ™:™" ÔHAT IS INCORRECT THE VALENCE IS:":™""£15ª21);V$(X):‰1580±ðN²Nª1:™:™" ÔHE SYMBOL IS: ";S$(X):™" ×HAT IS THE ELEMENT? ";ÙõUL²0:US$²"":35:A$²UR$:‹URWINDOWC™""£60)Ç(143): LOWER RIGHT WINDOW` ** SET UP VARIABLES **wUX$²"H":†UQ%(1000) †F$(10),MM(10):I²1¤7:‡F$(I),MM(I):‚ÄUD$²""öUP$²" ":-"' Y™" PRESS NUMBER KEY (1-4) THEN ";W ^: UL²1:US$²"1234":35:---INPUT ROUTINE---b `US$²""‚ c: ‘Å(UR$)1000,400,500,396‹ h‰300Ì ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **Ü Œ™"“":‰900ç 875:Ž  ** S‚,™"© ’0.™" ’  ’©Q0™" ’ £ßo2™"ß ’—4™"C O M M O D O R Eº6™"EDUCATIONALÙ8™"SOFTWAREô: ** COM º™" SYMBOL. ÙOU WILL HAVE TO GIVE THE OTHERK¿™" AS WELL AS THE VALENCE OF THE ELEMENT.":835:UH²1:850Ä™" ÆOR EXAMPLE:":™£14ª21);"ÔHE ELEMENT IS ÓODIUM.":™£14ª21)ÇΙ"×HAT IS ITS SYMBOL? ÎA":™£14ª21);"ÔHAT IS CORRECT." Ø™£14ª21);"×HAT$²"Q"§300ú‹ A$²E$(X) §™:™" ÔHAT IS CORRECT.":R²Rª.5:‰ 1550P™:™" ÔHAT IS INCORRECT. ÔHE ELEMENT IS:":™""£15ª21);E$(X):™q™:™" ×HAT IS ITS VALENCE? ";¥UL²0:US$²"0123456789&Q":35:A$²UR$:‹UR$²"Q"§300Ù‹ A$²V$(X)§ ™:™" ÔHAT IS CORRECT.":R UT$²" PÈ ÐROBLEMS"(800: TITLE SCREEN? ‰300: MENU SCREEN[# +++ INPUT SECTION +++m(UR$²"":UI$²""}*‹UL²0§UL²80Š-™" ";ž2¡UI$:‹UI$²""§50Â7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85Õ<‹UI$²Ç(20)§105é>‹ Ã(UR$)²±UL§50A120: CHECKTUDENT INSTRUCTIONS ** •™"“"7 šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850d ™" ÒEMEMBER TO HIT AFTER" Ä™" TYPING YOUR ANSWER. ÔHIS TELLS"· Æ™" THE COMPUTER TO ACCEPT WHAT YOU"Î È™" HAVE TYPED."÷ Ê™" ÔYPE AT ANY TIME TO MODORE LOGO **,;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0N<¡A$:‹A$³±" "§I²Iª1:‹I³250§828r>T1$²"":T2$²"":T3$²"":T4$²"":I²0{@‰300—C ** SPACE BAR PRESS **ÌH™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"ÞJA²0¤9:¡A$:‚AõL¡ IS ITS VALENCE? 1":™£14ª21);"ÔHAT IS CORRECT."8ö™:™" ÎOTE: ÆOR MULTIPLE VALENCES USE"c™" '&' ONLY (NO SPACES) TO"‹ ™" SEPARATE THE NUMBERS.¶™" ÆOR EXAMPLE: ÓULFUR IS"Ι" 2&4."Ù(835:²Rª.5:‰1580"™:™" ÔHAT IS INCORRECT THE VALENCE IS:":™:™£15ª21);V$(X)',835:™"“":‚Q`6™"“ ÙOUR PERCENTAGE WAS: ";:S²µ(R¬100­A):™S;"%"p@™""ŽT‹S³²80§™" ÎOT BAD.":‰1655­^‹S³²90§™" ÖERY GOOD":‰1655Ïh‹S³²99§™" ÅXCELLENT!!!":‰1 FOR VALID CHARACTERFUR$²UR$ªUI$(K™UI$;0P‰506U:<Z:B_:HdŽaf ++ CHECK DELETE ++ri‹Ã(UR$)³1§50ŠnUR$²È(UR$,Ã(UR$)«1)œs™" ";:‰50Ãx ++ CHECK FOR VALID CHARACTERS ++Õ}‹Ã(US$)²0§150æ‚US²1¤Ã(US$)ý‡‹UI$²Ê(US$,USRETURN" Ì™" TO THE MENU." å835 ê:# óŽD ô ** TEACHER INSTRUCTIONS **M õ™"“"s öUP²0:UG$²"ÔEACHER ÉNST":UH²1:850¡ ÷™" ÔO THE BEST OF OUR KNOWLEDGE,"Ê ø™" THIS PROGRAM IS IN THE PUBLIC"ö ù™" DOMAIN. ÉF THIS IS NOT THUI$:‹UI$³±" "§844ûNŽR ** PAGE DESIGN ROUTINE **'TUP²UPª1QW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)€\™" --------------------------------------"`‹UH³±0§870Ãa™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "ÔfUH²0:™"":Žók ** PLEAŽ<UP²0:™"“ ÈOW MANY QUESTIONS DO YOU WANT? ";>AUS$²"1234567890Q":UL²2:35:‹UR$²"Q"§300^FA²Å(UR$):‹A±20 ° A³1 § 1340‘P™"“ ×HAT IS THE HIGHEST NUMBER ELEMENT YOU"±U™" WOULD LIKED TO BE ASKED"ÜZ™" (20 ELEMENTS) ? 655ôr‹S²100§™" ÅINSTEIN MOVE OVER!!!"ÿw835:Ž|ƒ"HYDROGEN","È",1*†ƒ"HELIUM","ÈE",0@ƒ"LITHIUM","ÌI",1Xšƒ"BERYLLIUM","ÂE",2k¤ƒ"BORON","Â",3®ƒ"CARBON","Ã",4•¸ƒ"NITROGEN","Î",3©Âƒ"OXYGEN","Ï",2¿Ìƒ"FLUORINE","Æ",1ÒÖƒ"NEON ,1)§ŽŒ‚‘UI$²"":Ž+– ** STANDARD INPUT **<˜‹Æ(UI$)²46§ŽM›‹UI$²Ç(32)§Žj ‹Æ(UI$)³48°Æ(UI$)±57§170p¥Žª‹Æ(UI$)³65°Æ(UI$)±90§180“¯Ž·´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž½»ŽÊ¾UI$²"":ŽÛ, ** MENU **å.™"“" 1™" >™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES"**ìUX$²"H":†UQ%(1000),E$(20),S$(20),V$(20)UD$²" ÔHIS TELLS"+  : ™" THE COMPUTER TO ACCEPT WHAT YOU"E ¢: ™" HAVE TYPED."r ¤: ™" ÔYPE AT ANY TIME TO RETURN"Œ ¦: ™" TO THE MENU>"› å1065:835¡ ê:§ óŽÈ ô ** TEACHER INSTRUCTIONS **Ñ õ™"“"÷ öUP²0:UG$²"ÔEACHER ÉNST":UH© ’ .™" ’  ’©-0™" ’ £ßK2™"ß ’s4™"C O M M O D O R E–6™"EDUCATIONALµ8™"SOFTWAREÐ: ** COMMODORE LOGO **;™È(UD$,24);"ëj‹A$²"Y"§ 1160þo‹ A$²"N"§ 1480t‰1120~‹ A³±1 § 1120CˆUG$²"ÅXAMPLE":UP²1:850:™" ÅXAMPLE:"t’™" ÔHE PERCENT COMPOSITION OF NITRIC ACID."Žœ™" ÆORMULA- ÈÎÏ3."¶¦™" Í1 = ATOMIC MASS OF HYDROGEN."Þ°™" Á1 = NUMBER OF HYDROGEN A $):‹UR$²"Q"§300&"™:™" ÎUMBER OF ATOMS = ";:US$²"":UL²10:35:A(N)²Å(UR$):‹UR$²"Q"§3008,Y²YªM(N)¬A(N)>6‚d@UH²1:850:™:™" ÆORMULA MASS = ";Y”J™:™" ÁT.ÍASS ÎO OF ATOMS % ÃOMP."œT™:™§^N²1¤JÔh™M(N);£15ª21)A(N);£27ª21)M(N)¬A( "BUP$²" "UT$²" ÐERIODIC ÔABLE    ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!***¨800: TITLE SCREEN¿ ‰300: MENU SCREENÛ# +++ INPUT SECTION +++í(UR$²"":UI$²""ý*‹UL²0§UL²8 ²1:850% ÷™" ÔO THE BEST OF OUR KNOWLEDGE,"N ø™" THIS PROGRAM IS IN THE PUBLIC"z ù™" DOMAIN. ÉF THIS IS NOT THE CASE"— ú™" PLEASE CONTACT:"Á û™" ÃOMMODORE ÂUSINESS ÍACHINES"ä ü™" 3370 ÐHARMACY ÁVE. ý™"  PRESS SPACE BAR OR WAIT’":I²0*<¡A$:‹A$³±" "§I²Iª1:‹I³250§828N>T1$²"":T2$²"":T3$²"":T4$²"":I²0W@‰300sC ** SPACE BAR PRESS **¨H™È(UD$,24);"PRESS SPACE BAR TO CONVINUE’"½JZZ²0¤9:¡ZZ$:‚ZZÔL¡UI$:‹UI$³±" "§844ÚNŽúR * TOMS."º™" Í2 = ATOMIC MASS OF NITROGEN."-Ä™" Á2 = NUMBER OF NITROGEN ATOMS."RΙ" Í3 = ATOMIC MASS OF OXYGEN."xØ™" Á3 = NUMBER OF OXYGEN ATOMS."™â835:UG$²"ÅXAMPLE":UP²2:850Äö™" Ù = FORMULA MASS OF NITRIC ACID."ê™" Ù = (Í1*…N)­Y¬100Úr™à|‚†™:™" ÁNOTHER CALCULATION? ";,US$²"YNQ":UL²1:35:Y$²UR$:‹UR$²"Q"§300=š‹Y$²"Y"§1480MŸ‹Y$²"N"§300EMENTS":‰1490o N²1 ¤ J˜UG$²"ÅLEMENT":850:™:™" ÅLEMENT ";NÝ™:™" ÁTOMIC MASS = ";:US$²"":UL²10:35:M(N)²Å(UR0 -™" ";2¡UI$:‹UI$²""§50B7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85U<‹UI$²Ç(20)§105i>‹ Ã(UR$)²±UL§50ŽA120: CHECK FOR VALID CHARACTERžFUR$²UR$ªUI$¨K™UI$;°P‰50¶U:¼Z:Â_:ÈdŽáf ++ CHECK DELETE ++òi‹Ã(UR$)³1§50 nUR$ ÁGINCOURT, ÏNTARIO"* þ™" ÃANADA Í1× 2Ë4"J ÿ™" (416) 499-4292"d UP²1: 835:UH²1: 850• ™" ÐROGRAM ÎAME: ÐERCENT ÃOMPOSITION"» ™" ×RITTEN ÂY : Ò. Ê. ÌAMB ä ™" ÃONVERTED ÂY: ÍARILYN ÇARDNER ™"* PAGE DESIGN ROUTINE **TUP²UPª10W™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)_\™" --------------------------------------"n`‹UH³±0§870¢a™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "³fUH²0:™"":ŽÒk ** PLEASE WAIT REMARK **p™È(UD$,24Á1)+(Í2*Á2)+(Í3*Á3)"  ™" Ù = (1*1)+(14*1)+(16*3)"™" Ù = 63">835:UG$²"ÅXAMPLE":UP²3:850a2™" ÐERCENT È = (Í1*Á1/Ù)*100"ƒ<™" = (1*1/63)*100"F™" = 1.59"ÀP™" ÐERCENT Î = (Í2*Á2/Ù)*100"ãZ™" =500,396 h‰300E ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **U Œ™"“":‰900` 875:Ž  ** STUDENT INSTRUCTIONS **Š •™"“"° šUP²0:UG$²"ÓTUDENT ÉNST":UH²1:850º Ÿ1170È ê‹UZ²1§217Î óŽï ô ** TEACHER INSTRUCTIONS **ø ²È(UR$,Ã(UR$)«1)s™" ";:‰50Cx ++ CHECK FOR VALID CHARACTERS ++U}‹Ã(US$)²0§150f‚US²1¤Ã(US$)}‡‹UI$²Ê(US$,US,1)§ŽƒŒ‚‘UI$²"":Ž«– ** STANDARD INPUT **¼˜‹Æ(UI$)²46§ŽÍ›‹UI$²Ç(32)§Žê ‹Æ(UI$)³48°Æ(UI$)±57§170𥎠ª‹Æ( ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒ3 ™" ÉF ERRORS ARE NOTED, CONTACTS ™" ÍARILYN ÇARDNERw ™" 1630 ÍADISON ÓTREET  ™" ÅVANSTON, ÉLLINOIS 60202º UP²2: 835:UH²1: 850ß™" ÉF YOU WANT TO SUGGEST ™" );" ONE MOMENT PLEASE... "uŽ1„ -- LOAD AND RUN MENU PROGRAML‰TT$²"0:SHIFT/RUN MENU"XŽ™Ç(147)^“™d˜™…™"LOAD";Ç(34);TT$;Ç(34);",8"‹¢™‘§™—¬™±™©¶™ "RUN"µÀ™ Ç(19)ÀÊ—209,2ÌÔ—939,13ØÞ—940,13Þç€ (14*1/63)*100"þd™" = 22.22"!n™" ÐERCENT Ï = (Í3*Á3/Ù)*100"Dx™" = (16*3/63)*100"_‚™" = 76.19"y‡835:UH²1:UG$²"":850¬Œ™" ÄO YOU WANT TO DO A PROBLEM? ";Ø–US$²"YNQ":UL²1: 35:A$²UR$:‹UR$²"õ™"“" öUP²0:UG$²"ÔEACHER ÉNST":UH²1:850L ÷™" ÔO THE BEST OF OUR KNOWLEDGE,"u ø™" THIS PROGRAM IS IN THE PUBLIC"¡ ù™" DOMAIN. ÉF THIS IS NOT THE CASE"¾ ú™" PLEASE CONTACT:"è û™" ÃOMMODORE ÂUSINESS ÍACHINES" ü™" UI$)³65°Æ(UI$)±90§180¯Ž7´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž=»ŽJ¾UI$²"":Ž[, ** MENU **e.™"“"‚1™" ÍENU"±6™" --------------------------------------"Û;™" 1. BEGIN PERIODIC TABLE" @™" 2. STUDEN ADDITIONAL EDUCATIONAL PROGRAMS3™" TO BE WRITTEN FOR THE Â128"O™" PLEASE CONTACT"o™" ÍARILYN ÇARDNER“™" 1630 ÍADISON ÓTREET¼™" ÅVANSTON, ÉLLINOIS 60202Å835ËN:ÑWŽ÷X ** PROGRAM MODIF è‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **é™"“";:Œ‰1103-)835:850`.™" ÔHIS PROGRAM WILL CALCULATE PERCENT "‹8™" COMPOSITION BY MASS OF A COMPOUND"³B™" CONTAINKNG UP TO FIVE ELEMENTS.òL™" ÔHE SAMPLE CALCULATION SHOWS HQ"§300ê ‹ A$²"Y"§1480û¥‹A$²"N"§300 ª‰1430´‹ A²0 § 1710(¾‹ A³±1 § 1430=ÈUP²UP²1:850:Y²0qÒ™:™" ×HAT IS THE NUMBER OF ELEMENTS IN THE "·Ü™ " FORMULA (2-5)? ";:US$²"2345Q":UL²1:35:J²Å(UR$):‹UR$²"Q"§300ëæ‹ J±5§ ™:™"ÍAXIMUM O 3370 ÐHARMACY ÁVE./ ý™" ÁGINCOURT, ÏNTARIO"Q þ™" ÃANADA Í1× 2Ë4"q ÿ™" (416) 499-4292"‹ UP²1: 835:UH²1: 850µ ™" ÐROGRAM ÎAME: ÐERODIC ÔABLEâ ™" ×RITTEN ÂY : ÓTEPHEN ×OROSZCZUK ™" T INSTRUCTIONS"/ E™" 3. TEACHER INSTRUCTIONS"K O™" 4. QUIT"z T™" --------------------------------------"« Y™" PRESS NUMBER KEY (1-4) THEN ";Ó ^UL²1:US$²"1234":35: INPUT ROUTINEÞ `US$²""û c‘Å(UR$)1000,400,ICATION INST **Y™"“"%]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850.”8354²::»ŽZ  ** T I T L E P A G E **g"™"“";}$I²1¤38:™"¦’";:‚•&I²1¤22:™"¦’";:‚­(I²1¤37:™"¦’";:‚Å*I²1¤22:™"‘¦’";:‚ê,™"OW":™" THIS IS DONE."øMŽO PERCENT,R.J.LAMB.1980'SUH²1:UP²0:850QT PRINTTAB(9)"ÐERCENT COMPOSITION."yU PRINTTAB(9)"¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯"­V™" ÄO YOU WISH A SAMPLE CALCULATION? ";Ù`US$²"YNQ":UL²1: 35:A$²UR$:‹UR$²"Q"§300F 5 ELEMENTS PLEASE!":‰1490 ð‹ J³2 § ™:™"ÓENSIBLE ANSWERS ONLY PLEASE.":‰1490aú‹ J³±µ(J) § ™:™"ÉT MUST BE A WHOLE NUMBER OF ELEMENTS":‰1490o N²1 ¤ J˜UG$²"ÅLEMENT":850:™:™" ÅLEMENT ";NÝ™:™" ÁTOMIC MASS = ";:US$²"":UL²10:35:M(N)²Å(UR Ø´S2²0ä¾S²S¬1.5È JUMP CALCULATION LOOP ÒS²S«S2ÜF²S¬T#æD2²F¬¾(A)0ðR²F¬¿(A)AúR2²R2ª(32¬T)MR3²R2¬TZH²HªR«R3eD²DªD2}" S2 IS DRAG FACTOR‘,S2²(S­120)¬32¬T¢6‹ D±²J§G²G«RÃ@ CALCULATE HT. ABOVE GROUNDÑJ‹G³²0§ Ü!˜C$²"×Íב‘&Ç"õ!¢CE$²"   ‘‘  "û!§Œ"¬I²1¤10"¶‡AA2"Àƒ20,19,18,17,16,15,14,13,12,11]"Ê™È(UD$,AAª1);:™È(UX$,I)A$:XI²1¤10:‚XI‰"Ô™È(UD$,AAª1);:™È(UX$,I)AE$:XI²1¤10:‚XI"Þ‚I"èI²11¤27¥"ò‡AAÐ"üƒ10,10,9,9,8,8,8,7,7,7,8 >™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000)ûUD$²""- P IN WHICH THE USER"(™" SPECIFIES THE CONDITIONS FOR THEJ*™" JUMP. ÁDVANCED STUDENTS SHOULD"u,™" BE ABLE TO DEFINE THE RELATIONSHIP¢0™" BETWEEN THE ANGLE OF THE RAMP, SPEEDÌ2™" AT TAKEOFF, AND DISTANCE TO JUMP.ë:™" ÄO YOU WANT SO ™â±™î¶™ "RUN"úÀ™ Ç(19)Ê—209,2Ô—939,13Þ—940,13#ç€Nè‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **[é™"“Ž";:ŒaL:­VI$²"R.ARM R.LEG BACK NECK SKULL RIBS KNEE BUTT FACE PELVISPRIDE "Þ`I$²I$ª"BIKE KIDNEYHEAD BIGTOEL.ARM L G²0ßT‹H±G§1490ó^™"“":2100:™"“"h‹D³J§1710r‹D±Jª20§1750(|L²((D«J)­30)ª»(0)7†‹L±.8§1760_™" HE MADE IT! GREAT JUMP, KILLER!"kšT2²T2ª1u¤‰2010†®JG$²"MISSED"¬³™" HE'S SHORT OF THE RAMP ......"ø CALC OF INJURIESãÂL2²µ ,8,8,9,9,10,10û" ™È(UD$,AAª1);:™È(UX$,I)B$:XI²1¤10:‚XI'# ™È(UD$,AAª1);:™È(UX$,I)BE$:XI²1¤10:‚XI.# ‚I;#$ I²28¤36C#. ‡AAf#8 ƒ11,12,13,14,15,16,17,18,19,20‘#B ™È(UD$,AAª1);:™È(UX$,I)C$:XI²1¤10:‚XI½#L ™È(UD$,AAª1);:™È(UX$,I)CE$:XI²1¤10:‚XIÄ# UP$²" "zUT$²" ÐÅÒÃÅÎÔ ÃÏÍÐÏÓÉÔÉÏÎ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!***’800: TITLE SCREEN© ‰300: MENU SCREENÅ# +++ INPUT SGCTION +++×(UR$²"":UI$²""ç*‹UL²0§UL²80ô-™" ";2¡UI UND? "; ?UL²1:US$²"YN":35:QQ$²UR$N:WŽ;X ** PROGRAM MODIFICATION INST **DY™"“"i]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850r”835x²:~»Žž  ** T I T L E P A G E **«"™"“";Á$I²1¤38:™"¦’";:‚Ù&I²1¤22:™"¦’";:‚ñ(I²1 .LEG "çjT².1 t T IS RATE OF JUMP CALCULATION.~T2²0ˆT3²0D’™"“"¦7)"WE'RE AT THE SCENE OF"nœ™""¦5)" THE BIG MOTORCYCLE JUMP "w¦835·°UG$²"":850:™" HOW MANY BUSSES WILL YOU TRY TO JUMP? "ôº™" ";:UL²2:US$²".12345678 ((((J«D)­5)ª»(0)¬5)ª.5)í̉1780Ö™" HE JUMPED TOO FAR!;àJG$²"MISSED"5å™" HE MISSED THE RAMP."VêL2²µ((((Dª20«J)­20)ª»(0)¬5)){ô™:™" I THINK HE'S HURT ......."‡þK²1¤17“I2(K)²Kš‚K¤K2²17µ&‹L2±17§L2²17Å0‹L2³²0§L2²1Ñ: V ‚IÓ#` I²1¤500:‚ä#j ™"":Œ:Ž÷#ª—59467«5170,16 $´—59466«5170,15$¾I²1¤50C$È—59464«5170,254:X²1¤5:‚:—59464«5170,212Q$ÒX²1¤15:‚c$×—59464«5170,0q$ÙX²1¤15:‚w$Ü‚}$Ž$ˆŒ:I²1¤37:‡C:‚Á$—59467«5170,16:—59464«5170,0:—59466«5170, $:‹UI$²""§50,7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85?<‹UI$²Ç(20)§105S>‹ Ã(UR$)²±UL§50xA120: CHECK FOR VALID CHARACTERˆFUR$²UR$ªUI$’K™UI$;šP‰50 U:¦Z:¬_:²dŽËf ++ CHECK DELETE ++Üi‹Ã(UR$)³1§50ônUR$²È(UR$,Ã(UR$)«1)s™ ¤37:™"¦’";:‚ *I²1¤22:™"‘¦’";:‚.,™"© ’P.™" ’  ’©q0™" ’ £ß2™"ß ’·4™"C O M M O D O R EÚ6™"EDUCATIONALù8™ 90Q":35:N²Å(UR$):‹UR$²"Q"§300"Ä‹N±12§™" COME ON NOW...":I²1¤500:‚:‰1200-ÎJ²N¬15AÓYJ%²(J­3.28ª.5)NØ™:™ " ";yâ™:™N ;"BUSSES! THAT'S ";YJ%;" METRES!"¬ì™:™" WHAT RAMP ANGLE WILL YOU USE? ";ãöUL²2:US$²".0123456789Q":35:A2²Å(UR K²1¤L2äDV²µ(»(0)¬1000)ýNV²(V«(µ(V­K2)¬K2))ª1 XH2²I2(V)bI2(V)²I2(K2))lI2(K2)²H25vK2²K2«1<€‚KKŠI²1¤500:‚e”™:™" WELL KILLER,..."Žž™:™" THE DOCTOR SAYS YOU BROKE HIS" ¨K²(18«L2)¤17²²P²(6¬I2(K))«5üA$²Ê(I$,P,6)ÐÆ 104Í$’‡C,TQ,Zá$œTQ²TQ¬30:Z²Z¬30þ$¦—59464«5170,C:I²1¤TQ:‚I%°—59464«5170,0:I²1¤Z:‚I(%º‹Z±0§5010H%Ä—59466«5170,0:—59467«5170,0‚%΃ 237,10,1,237,5,1,177,20,5,237,10,1,177,5,1,140,20,5¼%؃ 237,10,1,177,5,1,140,15,2,237,10,1,177,5,1,140,15,2 " ";:‰50-x ++ CHECK FOR VALID CHARACTERS ++?}‹Ã(US$)²0§150P‚US²1¤Ã(US$)g‡‹UI$²Ê(US$,US,1)§ŽmŒ‚z‘UI$²"":Ž•– ** STANDARD INPUT **¦˜‹Æ(UI$)²46§Ž·›‹UI$²Ç(32)§ŽÔ ‹Æ(UI$)³48°Æ(UI$)±57§170Ú¥Ž÷ª‹Æ(UI$)³65°Æ(UI$)±90§180 "SOFTWARE: ** COMMODORE LOGO **L;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0n<¡A$:‹A$³±" "§I²Iª1:‹I³250§828’>T1$²"":T2$²"":T3$²"":T4$²"":I²0›@‰300·C ** SPACE BAR PRESS **ìH™È(UD$,24);"PRESS SPACE BAR $):‹UR$²"Q"§300ù‹ A2³90¯A2±0§13105 ™" ";A2;"DEGREES? THAT'S IMPOSSIBLE.":™" COME ON NOW,"H™"‘‘‘‘‘":‰1260`™"";:A²A2¬.01745”(™:™" HOW FAST WILL YOU LEAVE THE RAMP? ";Ê2UL²2:US$²".0123456789Q":35:S²Å(UR$):‹UR$²"Q"§300ì<‹S± ™" ";A$,×ЂKãÚT3²T3ª1òäI²1¤500:‚øî™" ó‹QQ$²"Y" ¯ JG$²"MISSED"§ JG$²"":5000G ø™:™" WANT TO JUMP AGAIN (Y/N) ";j UL²1:US$²"YN":35:‹UR$²"Q"§300| ‹UR$²"Y"§1200± ™"“ YOU MADE IT ";T2;"OUT OF ";T3;"ATTEMPTS."Ò ™:™" BE Cö%⃠237,10,1,177,5,1,140,25,5,177,10,1,140,5,1,118,25,12&ìƒ 140,20,1,177,15,1,237,25,1,237,20,1,237,10,1,177,25,08&PŽU&öUG$²"":850:™"":Œ:Ž«5170,0q$ÙX²1¤15:‚w$Ü‚}$Ž$ˆŒ:I²1¤37:‡C:‚Á$—59467«5170,16:—59464«5170,0:—59466«5170, ý¯Ž!´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž'»Ž4¾UI$²"":ŽE, ** MENU **O.™"“"l1™" ÍENU"›6™" --------------------------------------"Ê;™" 1. BEGIN"PERCENT COMPOSITION"ô@™" 2. STUDENT INSTRUCTIONS"  TO CONTINUE’"JZZ²0¤9:¡ZZ$:‚ZZL¡UI$:‹UI$³±" "§844NŽ>R ** PAGE DESIGN ROUTINE **JTUP²UPª1tW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)£\™" --------------------------------------"²`‹UH³±0§870æa™È(UD$,24);È(UP$,7);"QUIT - PRESS Q 100§™" CAN'T GO THAT FAST"F‹S±100§™"‘‘‘‘":I²1¤500:‚:‰1320P‹S³²0§1390EZ™"“"¦8)"HE'S GETTING READY!"td™:™""¦6)"LETS WISH HIM GOOD LUCK!":‰1420Žn™:™" A PRACTICE RUN?"¤x™" OK, THIS TIME"®‚‰1320¶ŒH²6¾–D²0Æ G²6ϪR2²0 AREFUL NOW."Ý *835:Ž!4™"“"; !>I²1¤N!H™"¥‘ϣЧ";&!R‚I9!W‹QQ$²"Y"§4010W!\™" THERE HE GOES!!!"f!fI²1¤500:‚!pA$²"בΑ×&®"™!zAE$²" ‘ ‘ "®!„B$²"ױב&®"Ä!ŽBE$²" ‘ "4 ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **D Œ™"“":‰900O 875:Žp  ** STUDENT INSTRUCTIONS **y •™"“"Ÿ šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850Ò œ: ™" ÒEMEMBER, HIT KEY AFTER"þ ž: ™" TYPING YOUR ANSWER.  E™" 3. TEACHER INSTRUCTIONS": O™" 4. QUIT"i T™" --------------------------------------"š Y™" PRESS NUMBER KEY (1-4) THEN "; ^UL²1:US$²"1234":35: INPUT ROUTINEÍ `US$²""ê c‘Å(UR$)1000,400,500,396ó h‰300  "øfUH²0:™"":Žk ** PLEASE WAIT REMARK **Mp™È(UD$,24);" ONE MOMENT PLEASE... "SuŽv„ -- LOAD AND RUN MENU PROGRAM‘‰TT$²"0:SHIFT/RUN MENU"Ž™Ç(147)£“™©˜™Ê™"LOAD";Ç(34);TT$;Ç(34);",8"Т™Ö§™Ü¬!>™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES"**×UX$²"H":†UQ%(1000)† QU$(250),AN$(250),I2(250):U3²203!M²U­2.5:850:™:™"ÓUPPOSE A SPECIMEN TOOK UP HALF THE"-ð ™"MEDIUM POWER FIELD OF VIEW. ×HAT=-ú ™"WOULD BE ITS LENGTH? ";:35:V²Å(UR$)M- ‹V²M­2§2840l- ™:™£10ªTB)"ÎO,"M"/2 ="M­2š- ™:™"ÓUPPOSE IT TOOK UP A QUARTER OF THE"¿-" ™"MEDIUM PO! H²U­10Ý2¨ 850:™:™"ÉF A SPECIMEN TOOK UP HALF THE FIELD"3² ™"OF VIEW OF HIGH POWER ("H"U )",3¼ ™"×HAT IS ITS SIZE? ";:35:V²Å(UR$)<3Æ ‹V²H­2§3290c3Ð ™:™"ÎO,"H"/2 ="H­2" "‘3Ú ™:™"ÉF ONE HUNDRED CELLS FIT ACROSS THE"»3ä ™"DIAMETE!UESTION Â:":™"££££££££ £"Þ8$™"ÃALCULATE THE SIZE OF THE SPECIMEN IN"ó8)™"MICROMETRES."@9.™:™" ÙOUR ANSWER: ";:US$²"1234567890.Q":UL²10:35:V²Å(UR$):‹UR$²"Q"§300S98‹µ(V)²333§3660w9B™:™" ÎO, THAT'S NOT IT.":‰3480§9L™:™"ÖERY GOOD. ÎOW YOU! "; ^UL²1:US$²"1234":35: INPUT ROUTINE* `US$²""G c‘Å(UR$)1000,400,500,396P h‰300‘ ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **¡ Œ™"“":‰900¬ 875:ŽÍ  ** STUDENT INSTRUCTIONS **Ö •™"“"ü šUH²1:UP²0:UG$²"ÓTUDENT ! :U4²207)UD$²""[UP$²" "©UT$²" MOTOR CYCLE JUMP  ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!***ÜUX$²""ô800: TITLE SCREEN  ‰30! WER FEILD OF VIEW."ë-' ™"×HAT IS ITS LENGTH? ";:35:V²Å(UR$)û-, ‹V²M­4§2900.6 ™:™" ÎO,"M"/4 ="M­4&.@ 835W.T 850:™:™"ÌET'S TRY THE SAME THING FOR THEk.Y ™"HIGHPOWER."š.^ ™"×HAT IS THE HIGH POWER MAGNIFICATION?"Ã.h ™:™"ÅNTER ! R, WHAT IS THE AVERAGE SIZEà3é ™"FOR EACH ONE? ";:35:V²Å(UR$)ò3î ‹V²H­100§33304ø ™:™"ÎO,"H"/100 ="H­100>4 ™:™"ÓUPPOSE 15 CELLS COULD FIT ACROSS THE"i4 ™"FIELD OF VIEW. ×HAT IS"THE SIZE OFŠ4 ™"ONE CELL? ";:35:V²Å(UR$)­4 ‹µ(V¬10)­10²µ(H! 'VE GOT THE HANG OF»9Q™:™"IT.":‰3480Å9V‰3000Î9 850æ9™:™"ÈELP":™"££££" :™" ÍAJOR POINT TO REMEMBER:"1:(™:™"ÉF ONE OBJECTIVE MAGNIFIES 10"[:2™"TIMES MORE THAN ANOTHER ONE, THEN"€:<™"THE DIAMETER OF THE FIELD OF"¨:F™"THAT OBJEC!ÉNST":850' ¤™" ÔHIS PROGRAM LETS YOU INPUT THEV ©™" VELOCITY (1-100) AND ANGLE (1-89) THAT ®™" A MOTORCYCLE WILL TAKE OFF AT OVER£ ¸™" NUMBER OF BUSSES (0-12)."Ì ½™" ÔHE COMPUTER WILL THEN CALCULATEñ ™" WHETHER OR NOT YOU MADE IT.!0: MENU SCREEN'# +++ INPUT SECTION +++9(UR$²"":UI$²""I*‹UL²0§UL²80V-™" ";j2¡UI$:‹UI$²""§50Ž7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85¡<‹UI$²Ç(20)§105µ>‹ Ã(UR$)²±UL§50ÚA120: CHECK FOR VALID CHARACTERêFUR$²UR$ªUI$ôK™UI$;üP‰!THE APPROPRIATE LETTER."/r ™£13ªTB)"Á. 100X":™£13ªTB)"Â. 40X":™£13ªTB)"Ã. 10X":™£13ªTB)"Ä. 4X"D/| ™:™"";:US$²"ABCDQ":UL²1:35:A$²UR$:‹UR$²"Q"§300U/ ‹A$²"B"§3000–/š ™"‘É DON'T THINK SO. ÌOOK AGAIN, IT SHOULD BE 40X."Ÿ/¤ 835Ô/¸ 850!­15¬10)­10§3400Õ4 ™:™"ÎO,"H"/15 ="µ(H­15¬1000)­1000Þ4* 835ÿ4H 850:™"ÔRY THESE PROBLEMS:",5R ™:™"Á SPECIMEN TAKES UP A THIRD OF THE"Y5\ ™"MEDIUM POWER FIELD OF VIEW. ÔHE LOW"ƒ5f ™"POWER FIELD OF VIEW IS MEASURED AT­5p ™"5000 MICROMETRES,!TIVE WILL BE 10 TIMES"Ñ:P™"LESS, OR A TENTH OF THE FIELD OF"ö:Z™"THE LESS POWERFUL OBJECTIVE."!;d™:™"EX. OBJ.#1 5X OBJ.#2 50X"P;n™"ÏBJ.#2 MAGNIFIES 10X MORE THAN OBJ.#1"|;x™"ÔHEREFORE, IF OBJ.#1'S FIELD OF VIEW¤;}™"WAS 100U THE!" Ç™" ÆROM THIS PROGRAM YOU SHOULD LEARNF Ì™" HOW THE 3 FACTORS MENTIONED ABOVEo Ñ™" AFFECT THE OUTCOME OF THE JUMP."x å835~ ê:„ óŽ¥ ô ** TEACHER INSTRUCTIONS **® õ™"“"Ô öUP²0:UG$²"ÔEACHER ÉNST":UH²1:850 ÷™" ÔO THE BEST!50U:Z:_:dŽ-f ++ CHECK DELETE ++>i‹Ã(UR$)³1§50VnUR$²È(UR$,Ã(UR$)«1)hs™" ";:‰50x ++ CHECK FOR VALID CHARACTERS ++¡}‹Ã(US$)²0§150²‚US²1¤Ã(US$)ɇ‹UI$²Ê(US$,US,1)§ŽÏŒ‚Ü‘UI$²"":Ž÷– ** STANDARD INPUT **!:™:™"ÔHIS IS WHAT YOU SHOULD HAVE FOR THE"ÿ/ ™"VALUES WE HAVE CALCULATED SO FAR:"#0Ì ™"LOW POWER MAG."£20ªTB)" 4X"J0Ö ™"MEDIUM POWER MAG."£20ªTB)"10X"o0à ™"HIGH POWER MAG."£20ªTB)"40X"”0ê ™"ÄIAMETERS OF FIELD OF VIEW"®0ô ™" LOW! MAGNIFICATION OFÓ5u ™"MEDIUM IS 10X AND LOW IS 2X."þ5z ™" Á. ÃALCULATE THE DIAMETER OF THE""6„ ™" MEDIUM FIELD OF VIEW."g6Ž ™" Â. ÃALCULATE THE SIZE OF THE SPECIMEN IN MICROMETRES."Œ6˜ ™:™" ÃHOOSE OPTION BY LETTER:"®6¢ ™" 1šN IT WOULD BE 10 FOR´;‚™" OBJ.#2."Ã;Œ835:‰3400ä; ™"ÉNCORRECT’. ÔRY AGAIN."÷;ªAA²1¤1000:‚AA <´™"‘ ‘‘ ‘"&<¾Ž 10"[:2™"TIMES MORE THAN ANOTHER ONE, THEN"€:<™"THE DIAMETER OF THE FIELD OF"¨:F™"THAT OBJEC! OF OUR KNOWLEDGE,"+ ø™" THIS PROGRAM IS IN THE PUBLIC"W ù™" DOMAIN. ÉF THIS IS NOT THE CASE"t ú™" PLEASE CONTACT:"ž û™" ÃOMMODORE ÂUSINESS ÍACHINES"Á ü™" 3370 ÐHARMACY ÁVE.å ý™" ÁGINCOURT, ÏNTARIO"þ™"!˜‹Æ(UI$)²46§Ž›‹UI$²Ç(32)§Ž6 ‹Æ(UI$)³48°Æ(UI$)±57§170<¥ŽYª‹Æ(UI$)³65°Æ(UI$)±90§180_¯Žƒ´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž‰»Ž–¾UI$²"":Ž§, ** MENU **±.™"“"Î1™" ÍENU"ý6™" --------------------------------! "UÒ0þ ™" MEDIUM "M:835:8501 ™"ÄIVIDE THE HIGH POWER MAGNIFICATION"/1 ™"BY THE LOW POWER MAGNIFICATION TO GET"]1 ™"YOUR REDUCTION OF THE FIELD OF VIEW."¯1& ™:™"ÅNTER YOUR ANSWER: ";:US$²"0123456789.Q":UL²10:35:V²Å(UR$):‹!. ANSWER QUESTION Á"Ð6¬ ™" 2. ANSWER QUESTION Â"ê6¶ ™" 3. NEED HELP"þ6À ™" 4. ÍÅÎÕ:7Å ™"";:US$²"1234Q":UL²1:35:A²Å(UR$):‹A²4§Ž:‹UR$²"Q"§300P7Ô ‘A‰3550,3610,3850z7Þ 870:™:™"ÑUESTION Á:":™"££££££££ £"©7è ™:™"ÃALCULATE THE DIAME! ÉF ERRORS ARE NOTED, CONTACT' ™" ÍARILYN ÇARDNERK ™" 1630 ÍADISON ÓTREETt ™" ÅVANSTON, ÉLLINOIS 60202Ž UP²2: 835:UH²1: 850³™" ÉF YOU WANT TO SUGGESTß™" ADDITIONAL EDUCATIONAL PROGRAMS™" ! ÃANADA Í1× 2Ë4"'ÿ™" (416) 499-4292"AUP²1: 835:UH²1: 850m™" ÐROGRAM ÎAME: ÍOTOR ÃYLE ÊUMP™" ×RITTEN ÂY : ÕNKNOWN¸™" ÃONVERTED ÂY: ÍARILYN ÇARDNERß™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒ ™" !------"' ;™" 1. BEGIN MOTOR C. JUMP "Q @™" 2. STUDENT INSTRUCTIONS"{ E™" 3. TEACHER INSTRUCTIONS"— O™" 4. QUIT"Æ T™" --------------------------------------"÷ Y™" PRESS NUMBER KEY (1-4) THEN !UR$²"Q"§300¾10 ‹V²10§3155Þ1: ™:™" ×RONG! 40/4 = 10"ç1D 835ð1S 8502b ™:™"ÎOW DIVIDE THE FIELD OF VIEW FOR LOW"^2l ™"POWER BY 10 AND ENTER YOUR ANSWER.":™£10ªTB)"> ";:35x2v V²Å(UR$):‹V²U­10§3230•2€ ™:™" ÎO,"U"/10 ="U­10ž2Š 835©2ž!TER OF THE MEDIUMÂ7í ™:™"FIELD OF VIEW."8ò ™:™"ÙOUR ANSWER: ";:US$²"0123456789.Q":UL²10:35:V²Å(UR$):‹UR$²"Q"§3008ü ‹V²1000§3600B8™:™"ÎO, THAT'S NOT IT.":‰3480r8™:™"ÖERY GOOD. ÎOW YOU'VE GOT THE HANG OF†8™:™"IT.":‰3480°8850:™:™"Ñ  TO BE WRITTEN FOR THE Â128"#™" PLEASE CONTACT"C™" ÍARILYN ÇARDNERg™" 1630 ÍADISON ÓTREET™" ÅVANSTON, ÉLLINOIS 60202™835¨UH²1: 850Ô!™" ÔHIS PROGRAM SIMULATES A MOTOR-ù&™" CYCLE JUM"R. ÙOU MUST ESTIMATE WHAT FRACTION"!ä™"OF THE FIELD THAT THE OBJECT TAKES UP."E!î™"ÉN OTHER WORDS, HOW MANY TIMES WILL|!ø™"THE OBJECT FIT ACROSS THE DIAMETER?":835:850­!™:›"ÒECALL YOUR DIAMETER OF THE LOW POWER"Æ! ™"FIELD OF VIEW.""§2395ì&8 ™:™"ÔHAT'S STRANGE, IT SHOULD BE 10X."'B ™"ÃHECK IT AGAIN, JUST TO MAKE SURE."!'L 835*'[ 850['` ™:™"×HAT IS THE MAGNIFICATION OF YOUR LOWv'e ™"POWER OBJECTIVE?"'j ™"ÅNTER THE APPROPRIATE LETTER."é't ™£13ªTB)"Á. 100X":™£13" ÅVANSTON, ÉLLINOIS 60202835N:WŽDX ** PROGRAM MODIFICATION INST **MY™"“"r]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850{”835²:‡»Ž§  ** T I T L E P A G E **´"™"“";Ê$I²1¤38:™"¦’";:‚â&I²1¤22:™"¦’";:‚ú("S, CHOOSE THE")º™"MOST APPROPRIATE DEFINITION AND TYPE":™"ITS LETTER."SÄ™"ÄIAMETER Á. RADIUS OF A CIRCLE"šÎ™£11ªTB)"Â. DISTANCE FROM CENTRE TO":™£14ªTB)"OUTSIDE OF A CIRCLEáØ™£11ªTB)"Ã. DISTANCE ACROSS A CIRCLE":™£14ªTB)"THROUGH ITS" ER."™:™"×HAT UNITS ON YOUR RULER DID YOU USE?"*š™£8ªTB)"ÅNTER CHOICE BY LETTER."\¤™£10ªTB)"Á. METRES":™£10ªTB)"Â. CENTIMETRES"®™£10ªTB)"Ã. MILLIMETRES":™£10ªTB)"Ä. INCHES"½¸™:™" ";:US$²"ABCDQ":UL²1:35:‹UR$²"Q"§300ÈÂA$²UR$ìÌ‹" "ê!™" (APPROX. "U"MICROMETERS)"" ™:™"ÓUPPOSE A SPECIMEN TAKES UP HALF THIS"M"*™"DIAMETER. ÈOW LONG IS IT? ";:35:V²Å(UR$)]"4‹V²U­2§2120”">™:™£10ªTB)"ÎO,"U"/2 ="U­2" ‘":835É"H850:™:™"ÓUPPOSE THREE OF YOUR SPECIMENS" ªTB)"Â. 40X":™£13ªTB)"Ã. 10X":™£13ªTB)"Ä. 4X"ø'~ 35:A$²UR$ (’ ‹A$²"D"§2510:(œ ™:™"ÉT SHOULD BE 4X. ÃHECK AGAIN AND MAKE"f(¦ ™"Q]SURE THAT YOU'RE READING THE RIGHT"Ž(° ™"NUMBER ON THE RIGHT OBJECTIVE."—(º 835È(Î 850:™:™"ÔHE MEDIUM POWER" I²1¤37:™"¦’";:‚*I²1¤22:™"‘¦’";:‚7,™"© ’Y.™" ’  ’©z0™" ’ £ß˜2™"ß ’À4™"C O M M O D O R Eã6™"EDUCATIONAL" CENTRE ♣11ªTB)"Ä. DISTANCE AROUND A CIRCLE"Bö™" ";:US$²"QABCD":UL²1:35:A$²UR$:‹UR$²"Q"§300S ‹A$²"C"§1330]4000g‰1270p2850½<™:™"ÌOW ÐOWER Á. OBJECTIVE WITH THE":™£15ªTB)"SMALLEST MAGNIFICATION"F™£12ªTB)"Â. OBJECTIVE"A$²"C"§850:™:™"ÇOOD.":‰1760õÑ850<Ö™:™"×ELL, YOU BLEW IT! ÙOU WERE SUPPOSED TO USE MILLIMETRES."†à™" ÈOW DO YOU CONVERT MILLIMETRES":™"  TO MICROMETRES?"­ê™£8ªTB)"ÅNTER CHOICE BY LETTER."íô™£10ªTB )"Á. DIVIDE BY 100" WOULD"ù"R™"FIT ACROSS THE FIELD OF VIEW. ×HAT IS".#\™"THE LENGTH OF EACH SPECIMEN? ";:35:V²Å(UR$)P#f‹µ(V¬10)­10²µ(U­3¬10)­10§2170#p™:™" ÎO,"U"/3 ="µ(U­3¬1000)­1000°#z™:™"ÙOU CAN COUNT ELEVEN CELLS ACROSS THE"Ý#„™"LOW POW" FIELD OF VIEW IS"ô(Ø ™"SMALLER THAN THE LOW POWER FIELD OF)â ™"VIEW BECAUSE IT NARROWS IN ON THEJ)ì ™"SPECIMEN AND YOU SEE A SMALLER AREAj)ö ™"MAGNIFIED, RIGHT?":835Ÿ)û 850:™:™"ÔO CALCULATE HOW MANY TIMES SMALLER"Î) ™"THE MEDIUM F"8™"SOFTWARE: ** COMMODORE LOGO **U;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0w<¡A$:‹A$³±" "§I²Iª1:‹I³250§828›>T1$²"":T2$²"":T3$²"":T4$²"":I²0¤@‰300ÀC ** SPACE BAR PRESS **õH™È(UD$,24);"PRESS SPAC" WITH THE":™£15ªTB)"LARGEST MAGNIFICATION"EP™£12ªTB)"Ã. OBJECTIVE WITH MID-RANGE":™£15ªTB)"MAGNIFICATION"{d™:™" ";:US$²"QABC":UL²1:35:A$²UR$:‹UR$²"Q"§300Œx‹A$²"A"§1450–‚4000 Œ‰1380·ª™"";:UP²UPª1:855¯™:™"ÈIGH ÐOWER Á. OBJECT"0":™£10ªTB)"Â. MULTIPLY BY 1000"+þ™£10ªTB)"Ã. DIVIDE BY 100":™£10ªTB)"Ä. MULTIPLY BY 100"]™:™" ";:US$²"ABCDQ":35:A$²UR$:‹UR$²"Q"§300n‹A$²"B"§1860¿&™:™"‘‘ ÎO, YOU MULTIPLY BY 1000 TO CONVERT  MILLIMETRES TO MICROMETRES."È0835ý"ER DIAMETER. ÈOW LONG IS THE$‰™"AVERAGE CELL? ";:35:V²Å(UR$)&$Ž‹µ(V¬10)­10²µ(U­11¬10)­10§2230T$˜™:™£10ªTB)"ÎO,"U"/11 ="µ(U­11¬1000)­1000]$¢835“$¶850:™:™"ÕSUALLY THE SPECIMEN IS BEING VIEWED"¿$À™"UNDER MEDIUM OR HIGH POWER WHEN YO"IELD IS COMPARED WITH THE"ñ) ™"LOW FIELD, YOU DIVIDE THE"* ™"MAGNIFICATION OF THE MEDIUM POWER"K* ™"OBJECTIVE ÂÙ THE MAGNIFICATION OF THE"i*( ™"LOW POWER OBJECTIVE."¸*2 ™" ×HAT ANSWER DO YOU GET? ";:US$²"0123456789.Q":UL²10:35:‹UR$²""E BAR TO CONTINUE’" JZZ²0¤9:¡ZZ$:‚ZZ!L¡UI$:‹UI$³±" "§844'NŽGR ** PAGE DESIGN ROUTINE **STUP²UPª1}W™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)¬\™" --------------------------------------"»`‹UH³±0§870ïa™È(UD$,24);È(UP$,7);"QUIT - PRES"IVE WITH THE":™£15ªTB)"SMALLEST MAGNIFICATION"I°™£12ªTB)"Â. OBJECTIVE WITH THE":™£15ªTB)"LARGEST MAGNIFICATION"Œ±™£12ªTB)"Ã. OBJECTIVE WITH MID-RANGE":™£15ªTB)"MAGNIFICATION"²´™:™" ";:35:A$²UR$:‹UR$²"Q"§300ÃÈ‹A$²"B"§1525ÍÒ4000×܉1"D850:™:™"ÎOW ENTER THE DIAMETER OF YOUR LOW"7N™"POWER FIELD OF VIEW IN MILLIMETRES.":™£8ªTB)"> ";oXUS$²"0123456789.Q":UL²10:35:MM²Å(UR$):‹UR$²"Q"§300b‹MM³±0§1920¬l™:™" ÓURELY YOU CAN SEE SOMETHING.‘‘‘"Ãv835:UP²UP«1:‰1860 €"Uê$Ê™"ARE DOING A DETAILED DRAWING. ÙOU%Ô™"CAN'T USE A RULER TO MEASURE THEB%Þ™"DIAMETER SO HERE IS HOW YOU CALCULATEn%è™"THE DIAMETER OF THE MEDIUM FIELD OF‡%í™"VIEW.":835:850·%ò™:™"×HAT IS THE MAGNIFICATION OF YOUR"Ø%ü"Q"§300Ñ*< R²Å(UR$):‹R²2.5§2690ÿ*F ™:™"ÉF YOU'RE USING ONE OF THE SCHOOL'S"H+P ™"MICROSCOPES YOU SHOULD GET 2.5 .":™" ( 10/4 = 2.5 )":835z+‚ 850:™:™"ÎOW DIVIDE THE DIAMETER OF THE LOW"©+Œ ™"POWER FIELD OF VIEW ÂÙ THE NUMBER YOU"Ù+– ™""S Q "fUH²0:™"":Žk ** PLEASE WAIT REMARK **Up™È(UD$,24);" ONE MOMENT PLEASE... "[uŽ~„ -- LOAD AND RUN MENU PROGRAM™‰TT$²"0:SHIFT/RUN MENU"¥Ž™Ç(147)«“™±˜™Ò™"LOAD";Ç(34);TT$;Ç(34);",8"Ø¢™Þ§™"460àõ850 ú™:™"ÆIELD OF ÖIEW Á. AREA OF SLIDE"N™£16ªTB)"Â. CIRCULAR AREA VIEWED":™£19ªTB)"THROUGH MICROSCOPE"v™£16ªTB)"Ã. AREA OF SLIDE VISIBLE"ž™£16ªTB)"Ä. AREA OF FLOOR VISIBLE"¸"™" ";à,US$²"ABCDQ":35:A$²UR"™:™" ÃONVERT THIS TO MICROMETRES AND ENTERYOUR ANSWER."( Š™£8ªTB)"> ";9 ”35:U²Å(UR$)U ž‹U­MM³±1000§™"‘‘":‰1930‹ Æ850:™:™"ÓOMETIMES WE WANT TO ESTIMATE THE SIZE"¹ Й"OF A SPECIMEN BEING VIEWED UNDER LOW"é Ú™"POWE"™"MEDIUM POWER OBJECTIVE?"& ™"(ÉT'S ENGRAVED ON THE OBJECTIVE.)"+& ™"ÅNTER THE APPROPRIATE LETTER."w& ™£13ªTB)"Á. 100X":™£13ªTB)"Â. 40X":™£13ªTB)"Ã. 10X":™£13ªTB)"Ä. 4X"¤& ™"";:US$²"ABCDQ":UL²1:35:‹UR$²"Q"§300¯& A$²UR$À&. ‹A$²"C!JUST CALCULATED. ÔHIS IS THE DIAMETER",  ™"OF THE MEDIUM POWER FIELD OF VIEW."3,ª ™:™" ÅNTER YOUR ANSWER: ";:35:M²Å(UR$)E,´ ‹M²U­2.5§2790t,¾ ™:™"ÉF YOU ARE USING ONE OF THE SCHOOL'S" ,È ™"MICROSCOPES YOU SHOULD GET"U­2.5"."©,Ò 835æ,æ "䬙걙ö¶™ "RUN"À™ Ç(19) Ê—209,2Ô—939,13%Þ—940,13+ç€Vè‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **bé™"“";:Œ|™"“":UG$²"":UP²0:850LTI$²"000000"¼¦™"ÓTEP 1’: ÂECOMING FAMILIAR WITH TERMS"ê°™:™"ÆOR THE FOLLOWING TERM"$:‹UR$²"Q"§300ñ@‹A$²"B"§1630ûJ4000T‰15708^850:™"ÎOW THAT YOU HAVE THE TERMS DOWN PAT,"[h™"ON TO THE EXCITING STUFF."‡r™"É ASSUME YOU HAVE ALREADY MEASURED"µ|™"THE DIAMETER OF YOUR LOW POWER FIELD"Ô†™"OF VIEW WITH A RUL#‘‘":™£14)"Ë"è™"‘‘‘":™£14)"É" D²1¤200:‚D:‚F:™"":835 &™"“" 0" :( ?a D™"":ˆT$²":":S$²":":A²30:B²13:3160:™"‘‘‘‘‘‘‘‘‘‘‘‘‘"ˆ N™£8)"REFLECTED LIGHT READINGS":›""­ X™£9)"MEASURE THE AMOUNTS OF":™""Ñ b™£10)"LIGHT REFLECTE#FFERENT SUBJECTS":™"" &V ™£7)"REFLECT DIFFERENT AMOUNTS":™"":™£15)"OF LIGHT."9&` 5000:™"“":ˆT$²"*":ˆS$²"+":A²34:B²18:3160T&j ™"‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘"v&t ™£9)"SUBJECT LUMINANCE RANGE"˜&~ ™£9)"£££££££ £££££££££ £££££"¬&ˆ ™£17)"READINGS"Ä&’ ™£17)"£££#HE HIGHLIGHT READING = 19":™""â+, ™£16)"THEN":™"" ,6 ™£6)"THE SUBJECT LUMINANCE RANGE":™""5,@ ™£6)"WOULD BE 19 - 11 = 8 STOPS":™""T,J ™£10)"OR A RATIO OF 1:256"k,T ™"":‹ M²4§ 2940u,^ 835£,| ™"“":™"":ˆT$²"¦":S$²"¦":A²36:B²12:3160¸,† ™"‘‘‘‘#>™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000)õ† QU$(250),AN$(250):TB²21UD$²# ,400,500,396 h‰300J ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **Z Œ™"“":‰900e 875:Ž†  ** STUDENT INSTRUCTIONS ** •™"“"µ šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850á ›™"ÔHIS PROGRAM TEACHES YOU HOW TO " œ™"CALCULAT# D FROM":™""ø l™£8)"THE SUBJECT AS SEEN FROM":™""!v™£10)"THE CAMERA POSITION""!€ 50009!Š™"“":™"":™"":ˆQ²32L!”™£31)"SUBJECT"_!ž™£31)"£££££££"n!¨™£31)" ¦©"}!²™£32)" ¦©"Œ!¼™£33)" ¦©"›!Æ™£34)" ¦©"ª!Й£35)" ¦©"º!Ú™"‘‘‘‘‘‘‘‘"Ò!ä™"CAM# £££££":™""î&œ ™£6)"S.L.R. READINGS MEASURE THE":™""'¦ ™£6)"CONTRAST OF A SCENE.":™""='° ™£6)"THIS IS DONE BY MEASURING THE":™""h'º ™£6)"DIFFERENCE IN THE AMOUNTS OF":™""'Ä ™£6)"LIGHT REFLECTED FROM THE":™""µ'Î ™£6)"SHADOWS AND THE HIGHLIGHTS."Å'# ‘‘‘‘‘‘‘‘‘"î, ™£10)"KEY TONE READINGS":™£10)"£££ ££££ ££££££££"-š ™£5)"KEY TONE READINGS ARE USED WHEN":™""C-¤ ™£7)"ONE SPECIFIC TONAL VALUE":™""w-® ™£4)"MUST RECEIVE THE CORRECT EXPOSWRE":™"":™""¦-¸ ™£7)"FOR EXAMPLE: SKIN TONES.":™"":835¯- ™# ""KUP$²" "™UT$²" ÍÉÃÒÏÓÃÏÐÙ       ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!***±800: TITLE SCREENÈ ‰300: MENU SCREENä# +++ INPUT SECTION +++ö(UR$²"":UI$²""*‹#E THE SIZE OF OBJECTS UNDER"> ž™"YOUR MICROSCOPE. ÆIRST IT EXPLAINS THE"f  ™"METHOD AND THEN IT GIVES YOU A"• ¢™"QUESTION TO SEE IF YOU UNDERSTOOD THE"Á ¤™"'LESSON'. ÍAKE SURE THAT YOUR GROUPí ¦™"HAS A MICROSCOPE AND A CALCULATOR."ö #ERA METER"ê!î™"££££££     £££££"ò!ø™"" "™"§ÍÎÍÎ¥ ÕÀÀÀÀÀÀÀÉ"&" ™"§    £   Ý       Ñ"@"™"§ ¤ Ý ->18 :"Z" ™"§ÎÍÎÍ¥ ÊÀÀÀÀÀÀÀË"i"*™""…"4™£Q)"***":™£Q)"***":™""±">™£Q«1)"LIGHT":™£Q«1)"SOURCE":™"‘‘‘‘‘‘‘"Ô"HF²1¤5:R²1¤#Ø ™"":835Ú'â ™"“":™""(ì ™£14)"FIRST TAKE A REFLECTED":™""&(ö ™£14)"LIGHT READING FROM THE":™""K( ™£14)"DARKEST AREA IN WHICH":™""n( ™£14)"YOU REQUIRE DETAIL.":™""|( ™"":ˆS²6Œ( ™£S)"METER"œ(( ™£S)"£££££"¯(2 ™£S«1)"ÕÀÀÀÀÉ"Â(< ™£#"“"À-Ì ™£31)" ¢¢"Ó-Ö ™£31)" ¢¢¢¢¢¢"å-à ™£31)" Î Íø-ê ™£31)"ץѠ Ñ§× .ô ™£31)" ¥ ¼¾ §".þ ™£31)" Í ÕÉ Î"0. ™£31)" ͤ¤Î"M. ˆQ²29:ˆN²6 : 2010:1140›. ™"‘‘‘‘‘‘":™"SKIN TONE REFLECTS TWICE":™"AS MUCH LIGHT AS A GREY":™"CARD."Ý.& ™"":™"THE #UL²0§UL²80-™" ";'2¡UI$:‹UI$²""§50K7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85^<‹UI$²Ç(20)§105r>‹ Ã(UR$)²±UL§50—A120: CHECK FOR VALID CHARACTER§FUR$²UR$ªUI$±K™UI$;¹P‰50¿U:ÅZ:Ë_:ÑdŽêf ++ CHECK DELETE ++ûi‹Ã(UR$)³1§5#å835ü ê: óŽ# ô ** TEACHER INSTRUCTIONS **, õ™"“"R öUP²0:UG$²"ÔEACHER ÉNST":UH²1:850€ ÷™" ÔO THE BEST OF OUR KNOWLEDGE,"© ø™" THIS PROGRAM IS IN THE PUBLIC"Õ ù™" DOMAIN. ÉF THIS IS NOT THE CASE"ò ú™" PLEASE CONTACT:#10:™£Q)"^^^":™"‘‘"è"R™£Q)" ":4000û"\™"‘‘‘":‚R:™"‘"#fT²Q¤18 ©«1:™£T)"_ ":™£T)"_ "(#p™"‘‘‘"/#z‚TE#„™£18)" ":™£18)" "W#Ž™"":‚Fp#˜‹N²6§ 3100:‹Z²3§2330#¢‹Z²3§2330:ž#¬™"‘‘":™"NOTE THE POSITION"¹#¶™"OF THE WHITE SPHERE"ô#À™"#S«1)"Ý    Ý"Õ(F ™£S«1)"Ý Ý"è(P ™£S«1)"Ý Ý"û(Z ™£S«1)"ÊÀ ÑË" )d ™""?)n ™£2)"............¨¨¨¨¨¨¨¨¨¨¨¨¢¢¢¢¢¢¢¢¢¢¢¢":™""m)x ™£2)" SHADOW § MID-TONE § HIGHLIGHT"™)‚ ™£2)" DETAIL DETAIL"Ç)Œ ™"‘‘‘‘‘‘":K²1¤5:D²1¤#METER TRANSLATES THE":™"SKIN TONE INTO A MID-GREY "ò.0 ™"EXPOSURE.":™""=/: ™"YOU MUST COMPENSATE":™"FOR THIS BY GIVING":™"ONE STOP MORE EXPOSURE"`/D ™"THAN THE METER READS.":5000i/N ‰300r/X ™"“"”/] I²1¤A:™£(40«A)­2)T$;:‚I:™T$¸/b I²1¤B:™£(40«A)#0nUR$²È(UR$,Ã(UR$)«1)%s™" ";:‰50Lx ++ CHECK FOR VALID CHARACTERS ++^}‹Ã(US$)²0§150o‚US²1¤Ã(US$)†‡‹UI$²Ê(US$,US,1)§ŽŒŒ‚™‘UI$²"":Ž´– ** STANDARD INPUT **Ř‹Æ(UI$)²46§ŽÖ›‹UI$²Ç(32)§Žó ‹Æ(UI$)³48°Æ(UI$)±57§170ù¥#" û™" ÃOMMODORE ÂUSINESS ÍACHINES"? ü™" 3370 ÐHARMACY ÁVE.c ý™" ÁGINCOURT, ÏNTARIO"… þ™" ÃANADA Í1× 2Ë4"¥ ÿ™" (416) 499-4292"¿ UP²1: 835:UH²1: 850æ ™" ÐROGRAM ÎAME: ÍICROSCOPY™#AT THE SIDE OF THE":™"METER ££££":™"‘‘‘‘‘‘‘‘‘‘‘‘‘‘"#$ÊC²1¤10:™£18)"_":D²1¤45:‚D:™"‘‘":™£18)" ";$ÔV²1¤90:‚V:™"‘‘":‚CW$Þ™"":H²1¤800:‚Hz$è™"NOTICE THAT ONLY SOME "$ò™"OF THE LIGHT IS REFLECTED "À$ü™"OFF THE SUBJECT AND INTO #12:™£Sª1)"^^":™"‘‘"Ñ)‘ 4000ü)– ™£Sª1)" ":™"‘‘‘":‚D:™"":‚K&*  5000:‹G²2§2810:™"“":ˆS²31:™""5*ª ‹ G²2§2810>*´ ™"“"S*¾ ˆS²31:™""|*È ™£2)"THEN TAKE A READING OF ":™""¥*Ò ™£2)"THE LIGHTEST PART OF THE ":™""Î*Ü ™£2)"SCë­2)S$;¦A«1)S$:‚IÙ/l I²1¤A:™£(40«A)­2)T$;:‚I:™T$ß/v Žú/ ¡AN$: 0UX$²"Q":‹AN$²"Q"§‰3000hŽ 0ˆ:&0’:,0œ:20¦:<0° 835q0µ™È(UD$,24);" " "w0º:}0Ä:ƒ0Î:‰0Ø:0âŽARD."Ý.& ™"":™"THE #Žª‹Æ(UI$)³65°Æ(UI$)±90§180¯Ž@´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":ŽF»ŽS¾UI$²"":Žd, ** MENU **n.™"“"‹1™" ÍENU"º6™" --------------------------------------"à;™" 1. BEGIN MICROSCOPY" @™" 2. S#" ×RITTEN ÂY : ÕNKNOWN1™" ÃONVERTED ÂY: ÍARILYN ÇARDNERX™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒ€ ™" ÉF ERRORS ARE NOTED, CONTACT  ™" ÍARILYN ÇARDNERÄ ™" 1630 ÍADISON ÓTREETí ™" ÅVANSTON, ÉLLINOIS 60# "ã$ ™"THE CAMERA. "ú$ ™"‘‘‘‘":ˆZ²3:2120/% ™"":835:™"“":™"":ˆT$²"Ñ":S$²"×":A²34:B²159%$ 3160O%. ™"‘‘‘‘‘‘‘‘‘‘‘‘‘‘"|%8 ™£5)"REFLECTED LIGHT METER READINGS":™""¨%B ™£5)"MUST BE INTERPRETED CAREFULLY":™""Ñ%L ™£7)"BECAUSE DI#ENE - THE BRIGHTEST ":™"" +æ ™£2)"IMPORTANT HIGHLIGHT. ":™"‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘"+ð ˆG²2: 2590$+ú 4000L+ ™"“":ˆT$²":":S$²":":A²36:B²15:3160|+ ™"‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘":™£14)"FOR EXAMPLE:":™""¥+ ™£6)"IF THE SHADOW READING = 11":™""Î+" ™£6)"T"202 UP²2: 835:UH²1: 850,™" ÉF YOU WANT TO SUGGESTX™" ADDITIONAL EDUCATIONAL PROGRAMS€™" TO BE WRITTEN FOR THE Â128"œ™" PLEASE CONTACT"¼™" ÍARILYN ÇARDNERà™" 1630 ÍADISON ÓTREET ™" #TUDENT INSTRUCTIONS"4 E™" 3. TEACHER INSTRUCTIONS"P O™" 4. QUIT" T™" --------------------------------------"° Y™" PRESS NUMBER KEY (1-4) THEN ";Ø ^UL²1:US$²"1234":35: INPUT ROUTINEã `US$²"" c‘Å(UR$)1000” ":Žû,r INTERFERENCE BY R.W.DRAY, R.R.#2 PETERBOROUGH ONT. K9J 6X3 1982>-| UPGRADED BY DEREK LEE JULY/82F²(«(Â(UM)²0)¬111)ª(«(Â(UM)³±0)¬82):‰2870›+ú F²(«(Â(UM)²0)¬82)ª(«(Â(UM)³±0)¬70):‰2870È+ F²(«(Â(UM)²0)¬70$>™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODE` ™"“"Ç(15): UPPER LEFT WINDOWŸ™""£39)Ç(143): LOWER RIGHT WINDOW¼ ** SET UP VARIABLES **ÓUX$²"H":†UQ%(1000)ë† QU$(250),AN$(250)UD$²"$,396 h‰300B ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **R Œ™"“":‰900] 875:Ž~  ** STUDENT INSTRUCTIONS **‡ •™"“"¨ šUP²0:UG$²"ÓTUDENT ÉNST":850Ó Ì™"ÎOTE:ÔO ADVANCE FROM ONE TOPIC" Ö™" TO THE NEXT PRESS $ BETTER UNDERSTANDING OF THE"4*™" PROPER USAGE OF A PHOTOGRAPHIC LIGHT"D,™" METER."r.™" ÎÏÔÅ: ÔHIS PROGRAM INVOLVES NO USER"–0™" RESPONSES. ÉT IS A"»2™" DEMONSTRATION LESSON."Ä3835ÒN‹UZ²1§217ØWŽþX ** PROG$ òœ- ****************************** ******************************R ****REVISED BY KEN KISSMANN***Ÿ$ ****************************** ******************************©L‰1490¯VÒ`¡A$:‹A$²""§1120:‹A$³±"" § 1120ØjŽë$ 34:B²19:3160ûx™"‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘"‚™£15)"ÒEMEMBER":™£15)"££££££££"VŒ™£6)"ÅXPOSURE METERS ARE NOT VERY":™£6)"SMART":™""–™£6)"THEY REPRODUCE MOST SCENES":™""« ™£6)"INTEGRATED OR AVERAGED TO 18%":™""Ȫ™£6)"OR 'MID-GREY'.":™""ò´™£6$ "AUP$²" "UT$²" ÍÅÔÅÒ ÒÅÁÄ        ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!***§800: TITLE SCREEN¾ ‰300: MENU SCREENÚ# +++ INPUT SECTION +++ì(UR$²"":UI$²""ü*‹UL²0§UL²80$ THE ÓÐÁÃÅ BAR" Û™" WHEN INDICATED."E à™" ÔO RETURN TO THE MENU,"Z á™" PRESS Q"c å835q ê‹UZ²1§217w óŽ˜ ô ** TEACHER INSTRUCTIONS **¡ õ™"“" öUP²0:UG$²"ÔEACHER ÉNST":850ð ÷™" ÔO THE BEST OF OUR KNOWLEDGE,"$ RAM MODIFICATION INST **Y™"“"']UP²0:UG$²"ÐROGRAM ÍOD":8500”835>²‹UZ²1§217D»Žd  ** T I T L E P A G E **q"™"“";‡$I²1¤38:™"¦’";:‚Ÿ&I²1¤22:™"¦’";:‚·(I²1¤37:™"¦’";:‚Ï*I²1¤22:™"‘¦’";:‚ô,™"$tP²1¤1000:‚P:Ž~ˆT$²"*":S$²"+":A²32:B²7:™"“":3160:™"‘‘‘‘‘‘‘‘"Hˆ™£7)"ÔHIS UNIT DEMONSTRATES FOUR":™""i’™£11)"METHODS OF TAKING":™""œ™£10)"LIGHT METER READINGS":™""º¦™£4)"ÔHERE IS NO GUARANTEED METHOD OF"å°™£4)"MEASURING THE 'CORRE$)"ÙOU MUST LEARN TO INTERPRET":™""¾™£6)"WHAT THE METER INDICATES IN":™""RÈ™£6)"ORDER TO GET THE BEST RESULTS":UB835:™"“":Ž[Ò™"“"}Ü™£8)"INCIDENT LIGHT READINGS"Ÿæ™£8)"££££££££ £££££ ££££££££"Ëð™£2)"INCIDENT LIGHT METER MEASUREMENTS"î$ -™" ";2¡UI$:‹UI$²""§50A7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85T<‹UI$²Ç(20)§105h>‹ Ã(UR$)²±UL§50A120: CHECK FOR VALID CHARACTERFUR$²UR$ªUI$§K™UI$;¯P‰50µU:»Z:Á_:ÇdŽàf ++ CHECK DELETE ++ñi‹Ã(UR$)³1§50 nUR$²$ ø™" THIS PROGRAM IS IN THE PUBLIC"E ù™" DOMAIN. ÉF THIS IS NOT THE CASE"b ú™" PLEASE CONTACT:"Œ û™" ÃOMMODORE ÂUSINESS ÍACHINES"¯ ü™" 3370 ÐHARMACY ÁVE.Ó ý™" ÁGINCOURT, ÏNTARIO"õ þ™" ÃANADA Í$© ’.™" ’  ’©70™" ’ £ßU2™"ß ’}4™"C O M M O D O R E 6™"EDUCATIONAL¿8™"SOFTWAREÚ: ** COMMODORE LOGO **;™È($CT' EXPOSURE"º™£4)"FOR A NEGATIVE":™""3Ä™£3)"ÇOOD EXPOSURES ARE THE RESULT OF:-":™""XΙ£3)"1.ÃAREFULL MEASUREMENT":™""€Ø™£3)"2.ÔHOUGHTFULL ANALYSIS OF THE"©â™£5)"CHARACTERISTICS OF THE SUBJECT"Ê왣5)"TO BE PHOTOGRAPHED":™"" ö835:ˆT$ú™£7)"DETERMINE HOW MUCH LIGHT"™£8)"FROM THE LIGHT SOURCE"-™£9)"FALLS ON THE SUBJECT"L™£9)"£££££ ££ £££ £££££££"W" 5000m,™" LIGHT METER"ƒ6™" £££££ £££££"™@™"S ÕÀÀÀÀÀÀÀÀÀÉ"¯J™"U Ý         Ý"ÆT™"B Ý ÊÉ"Ý^™$È(UR$,Ã(UR$)«1)s™" ";:‰50Bx ++ CHECK FOR VALID CHARACTERS ++T}‹Ã(US$)²0§150e‚US²1¤Ã(US$)|‡‹UI$²Ê(US$,US,1)§Ž‚Œ‚‘UI$²"":Žª– ** STANDARD INPUT **»˜‹Æ(UI$)²46§ŽÌ›‹UI$²Ç(32)§Žé ‹Æ(UI$)³48°Æ(UI$)±57§170漏 ª‹Æ(U$1× 2Ë4" ÿ™" (416) 499-4292"* UP²1: 835: 850T ™" ÐROGRAM ÎAME: ÍETER ÒEAD v ™" ×RITTEN ÂY : ÕNKNOWN ™" ÕPGRADED ÂY : ËEN ËISSMANNÆ ™" ÃONVERTED ÂY: ÍARILYN ÇARDNERí ™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒ$UD$,24);"PRESS SPACE BAR OR WAIT’":I²04<¡A$:‹A$³±" "§I²Iª1:‹I³250§828X>T1$²"":T2$²"":T3$²"":T4$²"":I²0a@‰300}C ** SPACE BAR PRESS **²H™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"ÄJA²0¤9:¡A$:‚AÛL¡UI$:‹UI$³±" "§844áN$$²"Ø":S$²"Ø":A²32:B²13:™"“":3160:™"‘‘‘‘‘‘‘‘‘‘‘‘‘‘"1™£6)"ÔHE FOUR MOST IMPORTANT METER"U ™£6)"READING METHODS ARE:-":™""x™£8)"1.ÉNCIDENT READINGS.":™""œ™£8)"2.ÒEFLECTED READINGS.":™""À(™£8)"3.ÓUBJECT LUMINANCE RANGE"Ù2™£10)"READINGS.$"J Ý ÕË"óh™"E Ý         Ý""r™"C ÊÀÀÀÀÀÀÀÀÀË LIGHT"R|™"T SOURCE"x†T²1¤5:1680:4000:‚T:‰1750:1140‡™"‘‘‘‘‘‘‘"°šJ²32¤15 ©«1:™£J)"_ ":™£J)"_ ":4000¾¤™"‘‘‘":‚JÖ®™£15);"$I$)³65°Æ(UI$)±90§180¯Ž6´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž<»ŽI¾UI$²"":ŽZ, ** MENU **d.™"“"1™" ÍENU"°6™" --------------------------------------"Ø;™" 1. BEGIN METER READ " @™" 2. STUDENT I$ ™" ÉF ERRORS ARE NOTED, CONTACT5 ™" ÍARILYN ÇARDNERY ™" 1630 ÍADISON ÓTREET‚ ™" ÅVANSTON, ÉLLINOIS 60202— UP²2: 835: 850¼™" ÉF YOU WANT TO SUGGESTè™" ADDITIONAL EDUCATIONAL PROGRAMS$ŽR ** PAGE DESIGN ROUTINE ** TUP²UPª17W™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)f\™" --------------------------------------"l`:ra:xfŽ—k ** PLEASE WAIT REMARK **Íp™È(UD$,24);" ONE MOMENT PLEASE... "ÓuŽö„ -- L$":™""ý<™£8)"4.ËEYTONE READINGS.":™""*F™£2)"ÉN ORDER TO CHOOSE THE BEST METHOD"WP™£2)"FROM THE ABOVE LIST,YOU MUST FIRST"‡Z™£2)"STUDY THE DIFFERENT METHODS AND LEARN"³d™£2)"THEIR ADVANTAGES AND LIMITATIONS."ßn™"":835:ˆT$²"*":S$²"+":A²# ":™£15);" "ö¸™"‘‘":™"->12":™"‘‘"!™"‘‘":™£34)"***":™"‘":™£34)"***":™""*Ö™""Sà™£4)"NOTE THE POSITION OF THE WHITE"|ꙣ4)"SPHERE OVER THE SENSITIVE CELL"Žô™"‘‘‘‘‘‘‘‘‘‘"ÁþF²1¤5: T²1¤100:‚T:™£14)"*":T²1¤100:‚T:4000Ô™"$NSTRUCTIONS", E™" 3. TEACHER INSTRUCTIONS"H O™" 4. QUIT"w T™" --------------------------------------"¨ Y™" PRESS NUMBER KEY (1-4) THEN ";Ð ^UL²1:US$²"1234":35: INPUT ROUTINEÛ `US$²""ø c‘Å(UR$)1000,400,500$™" TO BE WRITTEN FOR THE Â128",™" PLEASE CONTACT"L™" ÍARILYN ÇARDNERp™" 1630 ÍADISON ÓTREET™™" ÅVANSTON, ÉLLINOIS 60202¢835¬$ 850Ú&™" ÔHIS PROGRAM WILL GIVE OR TEACH THE"(™" USER A$OAD AND RUN MENU PROGRAM‰TT$²"0:SHIFT/RUN MENU"Ž™Ç(147)#“™)˜™J™"LOAD";Ç(34);TT$;Ç(34);",8"P¢™V§™\¬™b±™n¶™ "RUN"zÀ™ Ç(19)…Ê—209,2‘Ô—939,13Þ—940,13£ç€Îè‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **Úé™"“Ž";à% ÂY : Ò.×. ÄRAY™" ÕPGRADED ÂY : ÄEREK ÌEEF™" ÃONVERTED ÂY: ÍARILYN ÇARDNERm™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒ• ™" ÉF ERRORS ARE NOTED, CONTACTµ ™" "ÍARILYN ÇARDNERÙ ™" 1630 ÍADISON ÓTREET ™" %ß ’ 4™"C O M M O D O R E/6™"EDUCATIONALN8™"SOFTWAREi: ** COMMODORE LOGO **¡;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0Ã<¡A$:‹A$³±" "§I²Iª1:‹I³250§828ç>T1$²"":T2$²"":T3$²%(UR$):‹UR$²"Q"§300ýÉ‹N³.25°N±5§2900:‰1730Ê 2910LÌ™" # OF CYCLES SECOND WAVE ";:35:N1²Å(UR$):‹UR$²"Q"§300jÑ‹ N1³.25°N1±5§2900:‰1740uÓ 2910ÃÖ™" AMPLITUDE OF FIRST WAVE (1-2.5) ";:35:W²Å(UR$):‹UR$²"Q"§300ÞÛ‹W³1°W%!HI²1¤36:—UMª1543ªI,100:‚ú!R—UMª1541,3:—UMª1542,23"\I²1¤36"fQ²10¬µ(P­10ª.5)0"pQ1²10¬µ(P1­10ª.5)}"zA²((W1¬1000¬¿((I¬N1¬10ªQ1)¬ÿ­180)ª.5)ª(W¬1000¬¿((I¬N¬10ªQ)¬ÿ­180)))­1000“"„C²8¬(A«µ(A))ª1.05Ä"Ž‘ C ‰2200,2210,2220,2230,2240,2250,2260,22% Â(UM)²0)¬70)ª(«(Â(UM)³±0)¬64):‰2530ê'º F²67:‰2530ù'Ä F²68:‰2530(Î F²69:‰2530(Ø F²99,(â —UMª983ªI«80¬µ(A),F:‚I[(ì IFPEEK(50003)<>1THENPOKE59464,(250-40*N1)j(ö —UMª982,50€( Q1²10¬µ(P1­10ª.5)È( I²1¤36:A²(W1¬1000¬¿((I¬N1¬10ªQ1)¬ÿ­180)ª.5)­1000% ÅVANSTON, ÉLLINOIS 60202 UP²2: 835:UH²1: 850A™" ÉF YOU WANT TO SUGGESTm™" ADDITIONAL EDUCATIONAL PROGRAMS•™" TO BE WRITTEN FOR THE Â128"±™" PLEASE CONTACT"Ñ™" ÍARILYN ÇARDNERõ™" 16% "":T4$²"":I²0ð@‰300 C ** SPACE BAR PRESS **AH™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"SJA²0¤9:¡A$:‚AjL¡UI$:‹UI$³±" "§844pNŽR ** PAGE DESIGN ROUTINE **œTUP²UPª1ÆW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)õ\™" ----------% ±2.5§2900:‰1750éÝ 2910:à™" AMPLITUDE OF SECOND WAVE (1-2.5) ";:35:W1²Å(UR$):‹UR$²"Q"§300Wå‹W1³1°W1±2.5§2900:‰1760bç 2910´ê™" FIRST WAVE PHASE ANGNE (DEGREES) ";:35:P²Å(UR$):‹UR$²"Q"§300ôô™:™" SECOND WAVE P% 70Ô"˜F²100:‰2280#¢F²(«(Â(UM)²0)¬111)ª(«(Â(UM)³±0)¬82):‰2280/#¬F²(«(Â(UM)²0)¬82)ª(«(Â(UM)³±0)¬70):‰2280\#¶F²(«(Â(UM)²0)¬70)ª(«(Â(UM)³±0)¬64):‰2280k#ÀF²67:‰2280z#ÊF²68:‰2280‰#ÔF²69:‰2280’#ÞF²99¸#è—UMª1543ªI«80¬µ(A),F:J²1¤K:‚J:‚IÁ#ò83%:C²8¬(A«µ(A))ª1.05ù( ‘ C ‰2590,2600,2610,2620,2630,2640,2650,2660ÿ( ) F²100:‰2670=)( F²(«(Â(UM)²0)¬111)ª(«(Â(UM)³±0)¬82):‰2670j)2 F²(«(Â(UM)²0)¬82)ª(«(Â(UM)³±0)¬70):‰2670—)< F²(«(Â(UM)²0)¬70)ª(«(Â(UM)³±0)¬64):‰2670¦)F F²67:‰2670µ)P F²68:‰267%30 ÍADISON ÓTREET™" ÅVANSTON, ÉLLINOIS 60202'8355 UH²1:850h": ™" ÔHIS IS A DEMONSTRATION OF THE"“$: ™" INTERFERENCE OF TWO WAVES. ÉT"Â&: ™" MAY BE A USEFUL SUPPLEMENT IN THE"ï(: ™" GRADE 11 PHYSICS C%----------------------------"`‹UH³±0§8708a™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "IfUH²0:™"":Žhk ** PLEASE WAIT REMARK **žp™È(UD$,24);" ONE MOMENT PLEASE... "¤uŽÇ„ -- LOAD AND RUN MENU PROGRAMâ‰TT$²"0:SHI%HASE ANGLE ";:35:P1²Å(UR$):‹UR$²"Q"§300þ™"“Ž":Q²10¬µ(P­10ª.5)4I²1¤36:—UMª263ªI,100:‚}IFPEEK(50003)<>0THENPOKE59467,16:POKE59466,100:POKE59464,(250-40*N)—&—UMª261,35:—UMª262,49Ü0I²1¤36:A²(W¬1000¬¿((I¬N¬10ªQ)¬ÿ­180)ª.5)­1000%5Ñ#ü™"“":‰1600ù# UP²1:UL²5:UG$²" CHOICE #":850=$ ™" # OF CYCLES IN 1ST WAVE (.25 - 5) ";:US$²".0123456789Q"[$ 35:N²Å(UR$):‹UR$²"Q"§300z$ ‹N³.25 ° N±5 § 2900:‰2320„$ 2910È$ ™" # OF CYCLES SECOND WAVE ";:35:N1²Å(UR$):‹U%0Ä)Z F²69:‰2670Í)d F²99è)n —UMª983ªI«80¬µ(A),F:‚Iî)x *‚ —UMª981,32:—UMª982,32.*Œ ™""K*– I²1¤36:—UMª1383ªI,100:‚f*  —UMª1381,3:—UMª1382,23r*ª I²1¤36†*´ Q²10¬µ(P­10ª.5)œ*¾ Q1²10¬µ(P1­10ª.5)é*È A²((W1¬1000¬¿((I¬%OURSE. ÓINCE"*: ™" NO EXPLANATION IS GIVEN, THE"C,: ™" STUDENT SHOULD UNDERSTAND THEo.: ™" CONCEPT OF INTERFERENCE BEFORE"ž0: ™" RUNNING THE PROGRAM. ÔHE TEACHER"Ì2: ™" MAY WISH TO USE THE PROGRAM AS A"í4: ™" CLASS D%FT/RUN MENU"Ç(147)ô“™ú˜™™"LOAD";Ç(34);TT$;Ç(34);",8"!¢™'§™-¬™3±™?¶™ "RUN"KÀ™ Ç(19)VÊ—209,2bÔ—939,13nÞ—940,13t瀟è‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **«é™"“";:Œ±ò:·ü:ùÜ INTERFERENCE BY R.W.DR%:C²8¬(A«µ(A))ª1.05â5:‘ C ‰1860,1870,1880,1890,1900,1910,1920,1930#DF²100:‰1940QNF²(«(Â(UM)²0)¬111)ª(«(Â(UM)³±0)¬82):‰1940~XF²(«(Â(UM)²0)¬82)ª(«(Â(UM)³±0)¬70):‰1940«bF²(«(Â(UM)²0)¬70)ª(«(Â(UM)³±0)¬64):‰1940ºlF²67:‰1940ÉvF²68:‰194%R$²"Q"§300é$ ‹N1³.25 ° N1±5 § 2900:‰2330ó$" 2910?%$ ™" AMPLITUDE OF FIRST WAVE (1-3) ";:35:W²Å(UR$):‹UR$²"Q"§300\%) ‹W³1 ° W±3 § 2900:‰2340f%, 2910µ%. ™" AMPLITUDE OF SECOND WAVE (1-3) ";:35:W1²Å(UR$):‹UR$²"Q"§300Ô%3 ‹W%N1¬10ªQ1)¬ÿ­180)ª.5)ª(W¬1000¬¿((I¬N¬10ªQ)¬ÿ­180)))­1000ÿ*Ò C²8¬(A«µ(A))ª1.050+Ü ‘ C ‰2790,2800,2810,2820,2830,2840,2850,2860@+æ F²100:‰2870n+ð F²(«(Â(UM)²0)¬111)ª(«(Â(UM)³±0)¬82):‰2870›+ú F²(«(Â(UM)²0)¬82)ª(«(Â(UM)³±0)¬70):‰2870È+ F²(«(Â(UM)²0)¬70%EMONSTRATION.ö6835üN:WŽ(X ** PROGRAM MODIFICATION INST **1Y™"“"V]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850b: ™" ÔHIS PROGRAM CANNOT BE MODIFIED"¾g: ™" WITHOUT PROGRAMMING EXPERIENCE."Ç”835Ͳ:Ó»Žó  ** T%AY, R.R.#2 PETERBOROUGH ONT. K9J 6X3< UPGRADED BY DEREK LEE JULY/82Z@™"“":UP²0:UG$²"ÍENU":850mh™" ÐRESS:r™" 1’ FOR THE 2 WAVES ON SEPARATE GRAPHSÌ|™" 2’ FOR THE 2 WAVES ON THE SAME GRAPH톙%0Ø€F²69:‰1940áŠF²99ü”—UMª263ªI«80¬µ(A),F:‚I ž ¨—UMª901,35:—UMª902,508 ²I²1¤36:—UMª903ªI,100:‚> ¼T ÆQ1²10¬µ(P1­10ª.5)œ ÐI²1¤36:A²(W1¬1000¬¿((I¬N1¬10ªQ1)¬ÿ­180)ª.5)¯1000:C²8¬(A«µ(A))ª1.05¢ ÕÓ Ú‘ C ‰2020,2030,2040,2050,2060,2%1³1 ° W1±3 § 2900:‰2350Þ%6 29100&8 ™" FIRST WAVE PHASE ANGLE (DEGREES) ";:35:P²Å(UR$):‹UR$²"Q"§300o&B ™:™" SECOND WAVE PHASE ANGLE ";:35:P1²Å(UR$):‹UR$²"Q"§300y&Q ™"“Ž"&V Q²10¬µ(P­10ª.5)©&` I²1¤36:—UMª983ªI,100:‚Ã&j —UMª981,35:—$)ª(«(Â(UM)³±0)¬64):‰2870×+ F²67:‰2870æ+ F²68:‰2870õ+" F²69:‰2870þ+, F²99$,6 —UMª1383ªI«80¬µ(A),F:J²1¤K:‚J:‚I.,@ ‰2290p,T ™" ÎUMBER ÏUTSIDE ÒANGE!’":Ž²,^ ™" QUIT - PRESS Q % I T L E P A G E **"™"“";$I²1¤38:™"¦’";:‚.&I²1¤22:™"¦’";:‚F(I²1¤37:™"¦’";:‚^*I²1¤22:™"‘¦’";:‚ƒ,™"© ’¥.™" ’  ’©Æ0™" ’ £ßä2™"%" 3’ IF YOU ARE FINISHED5™" ×HAT IS YOUR CHOICE? ";:US$²"123Q":UL²1:35:G$²UR$:‹UR$²"Q"§300Fš‹G$²"2"§2310X¤‹G$ ²"3"§300€¸UP²0:UL²5:UG$²" CHOICE #":850Ä™" # OF CYCLES FIRST WAVE, (.25 - 5) ";:US$²".0123456789Q"âÇ35:N²Å%070,2080,2090ã äF²100:‰2100!îF²(«(Â(UM)²0)¬111)ª(«(Â(UM)³±0)¬82):‰2100>!øF²(«(Â(UM)²0)¬82)ª(«(Â(UM)³±0)¬70):‰2100k!F²(«(Â(UM)²0)¬70)ª(«(Â(UM)³±0)¬64):‰2100z! F²67:‰2100‰!F²68:‰2100˜! F²69:‰2100¡!*F²99¼!4—UMª903ªI«80¬µ(A),F:‚IÂ!>ß%UMª982,49É&t '~ I²1¤36:A²(W¬1000¬¿((I¬N¬10ªQ)¬ÿ­180)ª.5)­1000:C²8¬(A«µ(A))ª1.05'ƒ C'ˆ ‘C‰2450,2460,2470,2480,2490,2500,2510,2520S'’ F²100:‰2530'œ F²(«(Â(UM)²0)¬111)ª(«(Â(UM)³±0)¬82):‰2530®'¦ F²(«(Â(UM)²0)¬82)ª(«(Â(UM)³±0)¬70):‰2530Û'° F²(«(&C3ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ˜sÎlûÿ&#d™"":Œ: CLEAR ANY WINDOWSjnƒ INTERFERENCE, ION, LOCKEY, METER READ, METRIC VOLUME, MICROSCOPY«xƒ MOLOR, MOTORCYJUMP, NOMENCLATURE, NUCLEAR REACTOR, PERCENTÀ‚ƒ PERIODIC TABLEý–ƒ PH PROBLEMS, PHOTOSYNTHESIS, POLLUTION, REG PWR SUPPLY=&"I`™" 8. MOTORCYJUMP SIMULATION WITH DISTANCE, ANGLE, AND SPEED VARIABLES"—j™" 9. NOMENCLATURE DRILL WITH RADICALS, ACIDS, AND OUS-IC COMPOUNDS"Þt™"10. NUCLEAR REACTOR GRAPHIC SIMULATION OF NUCLEAR POWER PLANT""~™"11. PERCENT 'C3Nÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ& ÒÅÔÕÒÎ ÔÏ ÍÁÉÎ ÍÅÎÕ":™:™E z…"ÐRESS THE NUMBER FOR YOUR SELECTION (1-13) THEN ";N\ „‹ N³1 ° N±13 ‰3040l Ž‹N²13 § 500w ˜N²Nª12‡ ˆ™Ç(147):™:™ª ’™"LOAD";Ç(34);A$(N);Ç(34);",8"½ œ™:™:™:™:™"RUN"É ¦™ Ç(19)Ô °—209,2à º—939,13ì Ä—94\+ THIS IS A DIVIDER FOR SCIENCE III3I²1LI²Iª1:™¦I)"*DIVIDER"Z(‹I³255§30& ªƒ REMEDIAL NOMENCL, S.I. CONVERSIONS, SPECIFIC HEAT, STOICHi´ƒ TEMP. CONVERT., TITRATE, USPOP, YOUNG‡܆A$(50):A²1¤24:‡A$(A):‚AÁô™"“ - - Í Á É Î Í Å Î Õ - -":™:™þ™"ÔHIS DISK CONTAINS PROGRAMS FROM TWO OF THE PUBLIC DOM& CALCULATES PERCENT COMPOSITION BY MASS"_ˆ™"12. PERIODIC TABLE ELEMENTS, SYMBOLS, AND VALENCES"„°™:™"13. ÒÅÔÕÒÎ ÔÏ ÍÁÉÎ ÍÅÎÕ":™:™Æº…"ÐRESS THE NUMBER FOR YOUR SELECTION (1/13) THEN ";NÝÄ‹ N³1 ° N±13 ‰1040í΋N²13 § 500øØ& >™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **àUX$²"H":†UQ%(1000):UM²53248UD$²"0,13ò ΀ELSIUS TEMPERATURE CONVERSIONS"Z R™"10. TITRATE SIMULATION OF A TITRATION EXPERIMENT"” \™"11. USPOP POPULATION GROWTH SIMULATION"Þ f™"12. YOUNG SIMULATION OF ÙOUNG'S DOUBLE SLIT EXPERIMENT" p™:™"13.&NS"# E™" 3. TEACHER INSTRUCTIONS"P J™" 4. MODIFICATION OF PROGRAM"l O™" 5. QUIT"› T™" --------------------------------------"Ì Y™" PRESS NUMBER KEY (1-5) THEN ";õ ^UL²1:US$²"12345":35: INPUT ROUTIN&AIN"E™"DISKS RELEASED FOR THE ÃOMMODORE 64. ÅACH PROGRAM HAS BEEN"o™"CONVERTED TO RUN ON THE Â-128:":™:™•™"1. SCIENCE III - 12 PROGRAMS":™º&™"2. SCIENCE IV - 12 PROGRAMS":™×D™"3. ÑÕÉÔ ÔÈÉÓ ÄÉÓË":™:™ýN™"×HICH MENU DO YOU WISH TO SEE?&‰ 5000Ð SCIENCE IV MENUNä™"“ - - - Ó Ã É Å Î Ã Å É Ö - - - ":™:™˜î™"ÔHIS SECTION CONTAINS 12 PROGRAMS, MAINLY DEALING WITH BIOLOGY":™:™âø™" 1. PH PROBLEMS DRILL ON FINDING THE PH OF VARIOUS SOLUTIONS"( ™" 2. PHO&"6UP$²" "~: UT$²" ÉÎÔÅÒÆÅÒÅÎÃÅ": PLACE PROGRAM TITLE HERE!!!!!!!!!!!!!!!***–800: TITLE SCREEN­ ‰300: MENU SCREENÉ# +++ INPUT SECTION +++Û(UR$²"":UI$²""ë*‹UL²0§UL²80ø-™" "; 2& TYPING YOUR ANSWER. ÔHIS TELLS"; Ê: ™" THE COMPUTER TO ACCEPT WHAT YOU"i Ì: ™" HAVE TYPED. ÙOU CAN ERASE ERRORS" Í: ™" WITH THE KEY."½ Î: ™" ÔYPE AT ANY TIME TO RETURN"× Ð: ™" TO THE MENU."ã å: 835é ê:ï &E `US$²""! c‘Å(UR$)1000,400,500,600,396* h‰300k ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **{ Œ™"“":‰900† 875:Ž§  ** STUDENT INSTRUCTIONS **° •™"“"Ö šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850 ´™" ÔHIS PROG&"<X…"ÐRESS A NUMBER KEY (1-3), THEN . ÙOUR CHOICE";NQb‹ N³1 ° N±3 ‰500xl‹ N²3§™"“":€: CLEAR WINDOWS,END‹v‘ N ‰1000,2000¢è SCIENCE III MENUâ™"“ - - Ó Ã É Å Î Ã Å É É É - - - ":™:™ ™"ÔHIS SECTION CONT&TOSYNTHESIS SIMULATION OF PHOTOSYNTHESIS EXPERIMENTS"{ ™" 3. POLLUTION SIMULATES WASTE AND OXYGEN CONTENT OF A BODY OF WATER"Á ™" 4. REG PWR SUPPLY DESIGN POWER SUPPLIES, OPTIONAL PRINTOUT"ý ™" 5. REMEDIAL NOMENCL DRILL ON CHEMICA&¡UI$:‹UI$²""§5007‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85C<‹UI$²Ç(20)§105W>‹ Ã(UR$)²±UL§50|A120: CHECK FOR VALID CHARACTERŒFUR$²UR$ªUI$–K™UI$;žP‰50¤U:ªZ:°_:¶dŽÏf ++ CHECK DELETE ++ài‹Ã(UR$)³1§50ønUR$²È(UR$,Ã(UR$)«1) &óŽô ** TEACHER INSTRUCTIONS **õ™"“"?öUP²0:UG$²"ÔEACHER ÉNST":UH²1:850m÷™" ÔO THE BEST OF OUR KNOWLEDGE,"–ø™" THIS PROGRAM IS IN THE PUBLIC"Âù™" DOMAIN. ÉF THIS IS NOT THE CASE"ßú™" PLEASE CONTACT:" û™" &RAM WILL DEMONSTRATE6 ¶™"INTERFERENCE OF WAVES. ÙOU MAY SELECT:d ¸™"THE NUMBER OF CYCLES, THE AMPLITUDE,“ ¹™"AND THE PHASE ANGLE OF EACH WAVE. ÔHE" º™"INDIVIDUAL WAVES WILL BE PLOTTED, AND"ñ ¼™"THEN THE COMBINED WAVE ('Ã×') WILL BE&AINS 12 ASSORTED SCIENCE PROGRAMS":™:™d™" 1. INTERFERENCE DEMONSTRATION OF INTERFERENCE OF WAVES"¢$™" 2. ION QUIZ ON ION CHARGES AND FORMULAS"ê.™" 3. LOCKEY LOCK AND KEY HYPOTHESIS STUDY OF AN ENZYME"#8™" 4. MET&L NOMENCLATURE"6 *™" 6. S.I. CONVERSIONS DRILL ON METRIC CONVERSIONS"Š 4™" 7. SPECIFIC HEAT FACILITATES GRADING LAB TEST ON SPECIFIC HEAT CAPACITY"È >™" 8. STOICH SOLVKNG STOICHIOMETRIC EQUATIONS" H™" 9. TEMP. CONVERT. QUIZ ON&s™" ";:‰501x ++ CHECK FOR VALID CHARACTERS ++C}‹Ã(US$)²0§150T‚US²1¤Ã(US$)k‡‹UI$²Ê(US$,US,1)§ŽqŒ‚~‘UI$²"":Ž™– ** STANDARD INPUT **ª˜‹Æ(UI$)²46§Ž»›‹UI$²Ç(32)§ŽØ ‹Æ(UI$)³48°Æ(UI$)±57§170Þ¥Žûª‹Æ(UI$)³65°Æ(UI$)±90§% ÃOMMODORE ÂUSINESS ÍACHINES",ü™" 3370 ÐHARMACY ÁVE.Pý™" ÁGINCOURT, ÏNTARIO"rþ™" ÃANADA Í1× 2Ë4"’ÿ™" (416) 499-4292"¬UP²1: 835:UH²1: 850Õ™" ÐROGRAM ÎAME: ÉNTERFERENCEù™" ×RITTEN&" ½™"PLOTTED."0 ¾™" ÙOU WILL BE ASKED HOW MANY"^ À™"CYCLES, ETC. AND GIVEN A RANGE. I.E.Œ ™"(.25 - 5) CALLS FOR A NUMBER BETWEEN Ä™".25 AND 5.± Å 835:UH²1:850â Æ: ™" ÒEMEMBER TO HIT AFTER" È: ™" &ER READ DEMO OF LIGHT METER READING"tB™" 5. METRIC VOLUME QUIZ ON CONVERSIONS FROM ONE METRIC UNIT TO ANOTHER"²L™" 6. MICROSCIPY TUTORIAL ON MICROSCOPE OPERATION"÷V™" 7. MOLAR MOLAR CALCULATIONS WITH USER-INPUT MASS& KELVIN AND CELSIUS TEMPERATURE CONVERSIONS"Z R™"10. TITRATE SIMULATION OF A TITRATION EXPERIMENT"” \™"11. USPOP POPULATION GROWTH SIMULATION"Þ f™"12. YOUNG SIMULATION OF ÙOUNG'S DOUBLE SLIT EXPERIMENT" p™:™"13.& 180¯Ž%´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž+»Ž8¾UI$²"":ŽI, ** MENU **S.™"“"p1™" ÍENU"Ÿ6™" --------------------------------------"Ï;: ™" 1. BEGIN INTERFERENCE DEMO"ù@™" 2. STUDENT INSTRUCTIO&CPUB DOM ED SCI B  E3 2C    '‚&SHIFT/RUN MENU  ‚&--SCIENCE III---‚&INTERFERENCE    *‚(ION             ‚)LOCKEY           ‚$METER READ      -‚*METRIC VOLUME   0‚#MICROSCOPY      9'‚,MOLAR           ‚!MOTORCYJUMP     #‚-NOMENCLATURE    4‚-NUCLEAR REACTOR R‚ PERCENT         ‚PERIODIC TABLE  ‚---SCIENCE IV---‚PH PROBLEMS     V' ‚2PHOTOSYNTHESIS  "‚POLLUTION       1‚3REG PWR SUPPLY  1‚REMEDIAL NOMENCLE‚5S.I. CONVERSIONS,‚6SPECIFIC HEAT   "‚STOICH          ‚TEMP CONVERSION 1ÿ‚8TITRATE         )‚9USPOP           .‚YOUNG           !PUB DOM NOTES   ;ÁNNOTATD ÄIRCTRY(>™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000) † E$(38),S$(38),C(38),R(12),M(38):( 835:UH²1: 850™" ÉF YOU WANT TO SUGGESTJ™" ADDITIONAL EDUCATIONAL PROGRAMSr™" TO BE WRITTEN FOR THE Â128"Ž™" PLEASE CONTACT"®™" ÍARILYN ÇARDNERÒ™" 1630 ÍADISON ÓTREETû™" ÅVANS($)1000,400,500,396 h‰300Q ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **a Œ™"“":‰900l 875:Ž  ** STUDENT INSTRUCTIONS **– •™"“"¼ šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850í œ: ™" ÒEMEMBER TO HIT AFTER" ž(¶™ "RUN"ôÀ™ Ç(19)ÿÊ—209,2 Ô—939,13Þ—940,13ç€Hè‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **Té™"“";:Œ`êM²0:J²0yü -ION.R.J.LAMB.1980’™"“":‰1200:A1²0:A2²0˜Û&™:™:™" ÔHIS TEST IS CONCERNED WITH IONS AND THEIR CHARGES."( «1)²N §1450ð Y(D)²N:D²Dª1öªŽÿ´835¾C²Cª1:‹C±10 § 1490 ȉ1220=ÒUP²0:UG$²"ÒESULTS": 850R׋ A1±10 § A1²10:fÙ‹ A2±10 § A2²10‘Ü™" ÆÏÒÍÕÌÁÓ- ÙOU GOT ";A1;" OUT OF 10"¬á™" CORRECT."¶æ™:™:™ßð™" ÃÈÁÒÇÅÓ- ÙOU GOT ";A( M²0:J²0:Z²0-UD$²""_UP$²" "­UT$²" ÉÏÎ ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!***Å800: TITLE SCREENÜ ‰300: MENU SCREENø# +++ INPUT SECTION +++ (( TON, ÉLLINOIS 60202835 N:WŽ6X ** PROGRAM MODIFICATION INST **?Y™"“"d]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850m”835s²:y»Ž™  ** T I T L E P A G E **¦"™"“";¼$I²1¤38:™"¦’";:‚Ô&I²1¤22:™"¦’";:‚ì(I²1¤37:™"( : ™" TYPING YOUR ANSWER. ÔHIS TELLS"F  : ™" THE COMPUTER TO ACCEPT WHAT YOU"` ¢: ™" HAVE TYPED." ¤: ™" ÔYPE AT ANY TIME TO RETURN"§ ¦: ™" TO THE MENU."à ³: 835:UP²1:850:1050É óŽê ô ** TEACHER INSTRUCTIONS **ó õ™( .™:™" ÙOU WILL BE GIVEN THE NAME OF AN ION,"C8™" AND BE ASKED TO SUPPLY ITS FORMULA AND CHARGE."rB™:™" ÔHERE ARE TEN QUESTIONS IN THE TEST."­j™:™" ÒEMEMBER TO USE UPPER AND LOWER CASE LETTERS,"èt™" E.G. ÔHE DICHROMATE ION HAS THE FORMU(2;" OUT OF 10ûõ™" CORRECT.":™+ú‹A1³4°A2³4§™" ÂETTER LUCK NEXT TIME.":‰1570K‹A1³7°A2³7§ ™" ÆAIR.":‰1570r‹A1²10 ¯A2²10§ ™" ÖERY GOOD":‰1630™" ÇOOD"ˆ"835º, 850:™" ÙOU MADE MISTAKES IN THE FOLLOWING:"î6™:™£5ª21)"ÉÏÎ";£2(UR$²"":UI$²""*‹UL²0§UL²80'-™" ";;2¡UI$:‹UI$²""§50_7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85r<‹UI$²Ç(20)§105†>‹ Ã(UR$)²±UL§50«A120: CHECK FOR VALID CHARACTER»FUR$²UR$ªUI$ÅK™UI$;ÍP‰50ÓU:ÙZ:ß_:ådŽþf ++ CHECK DELET(¦’";:‚*I²1¤22:™"‘¦’";:‚),™"© ’K.™" ’  ’©l0™" ’ £ßŠ2™"ß ’²4™"C O M M O D O R EÕ6™"EDUCATIONALô8™"("“" öUP²0:UG$²"ÔEACHER ÉNST":UH²1:850G ÷™" ÔO THE BEST OF OUR KNOWLEDGE,"p ø™" THIS PROGRAM IS IN THE PUBLIC"œ ù™" DOMAIN. ÉF THIS IS NOT THE CASE"¹ ú™" PLEASE CONTACT:"ã û™" ÃOMMODORE ÂUSINESS ÍACHINES" ü™" (LA ÃR2Ï7"&~™" ÒEMEMBER ALSO TO INDICATE IF THE CHARGE IS NEGATIVE,";7ˆ™" E.G. -2."B’835:ŽS°C²1:D²1:UP²0vºŒ: Z²1¤37:‡E$(Z),S$(Z),C(Z):‚‰ÄN²µ(37¬»(0)ª1)•Î M²0¤J§Ø‹ R(M)²N§1220®â‚MÁìR(Mª1)²N:J²Jª1Üö:UG$²"ÑUESTIONS":(0ª21)"ÆÏÒÍÕÌÁ";£30ª21)"ÃÈÁÒÇÅ"ö@™:™4JZ²1¤D«1:™" ";E$(Y(Z));£21ª21)S$(Y(Z));£32ª21)C(Y(Z)):‚nT™:™:™" ÍAKE A NOTE OF THESE AND TRY TO LEARN THEM."t^}h835ƒrŽÁ† Z²0¤D«1:Y(Z)²0:R(Z)²0:‚:C²1:D²1:A1²0:A2²0:M²0:J²0:‰1220Ùšƒ"ÁLUMIN(E ++i‹Ã(UR$)³1§50'nUR$²È(UR$,Ã(UR$)«1)9s™" ";:‰50`x ++ CHECK FOR VALID CHARACTERS ++r}‹Ã(US$)²0§150ƒ‚US²1¤Ã(US$)š‡‹UI$²Ê(US$,US,1)§Ž Œ‚­‘UI$²"":ŽÈ– ** STANDARD INPUT **Ù˜‹Æ(UI$)²46§Žê›‹UI$²Ç(32)§Ž ‹Æ(UI$)³4(SOFTWARE: ** COMMODORE LOGO **G;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0i<¡A$:‹A$³±" "§I²Iª1:‹I³250§828>T1$²"":T2$²"":T3$²"":T4$²"":I²0–@‰300²C ** SPACE BAR PRESS **çH™È(UD$,24);"PRESS SPACE BAR TO CONTI( 3370 ÐHARMACY ÁVE.* ý™" ÁGINCOURT, ÏNTARIO"L þ™" ÃANADA Í1× 2Ë4"l ÿ™" (416) 499-4292"† UP²1: 835:UH²1: 850° ™" ÐROGRAM ÎAME: ÉON Ó ™" ×RITTEN ÂY : Ò.Ê.ÌAMBú ™" ÕPGRADED ÂY :( 850™" ×HAT IS THE FORMULA FOR THE " ™:™" ";E$(N);" ION"G™" ";:US$²"":UL²6:35:A$²UR$:‹UR$²"Q"§300O™:™z(‹A$²S$(N)§ ™" ÃORRECT!":ˆA1²A1ª1:‰1350 2™:™" ×RONG! ÔHE ANSWER IS ";S$(N)ª<1430ÔF™:™" ÍAYBE YOU KNOW ITS CHARGE......"(IUM","ÁL",3ñ¤ƒ"ÁMMONIUM","ÎÈ4",1®ƒ"ÂARIUM","ÂA",2¸ƒ"ÃALCIUM","ÃA",23ƒ"ÃHROMOUS","ÃR",2Ĩ"ÃHROMIC","ÃR",3_Öƒ"ÃUPROUS","ÃU",1tàƒ"ÃUPRIC","ÃU",2Šêƒ"ÈYDROGEN","È",1 ôƒ"ÆERROUS","ÆE",2µþƒ"ÆERRIC","ÆE",3ȃ"ÌEAD","ÐB",2Þ(8°Æ(UI$)±57§170 ¥Ž*ª‹Æ(UI$)³65°Æ(UI$)±90§1800¯ŽT´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":ŽZ»Žg¾UI$²"":Žx, ** MENU **‚.™"“"Ÿ1™" ÍENU"Î6™" --------------/-----------------------"ç;™" 1. ION" @™" (NUE’"üJZZ²0¤9:¡ZZ$:‚ZZL¡UI$:‹UI$³±" "§844NŽ9R ** PAGE DESIGN ROUTINE **ETUP²UPª1oW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)ž\™" --------------------------------------"­`‹UH³±0§870áa™È(UD$,24);È(UP$,7);"QUIT - PRESS Q ( ÍARK ÓTEWART#™" ÃONVERTED ÂY: ÍARILYN ÇARDNERJ™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒr ™" ÉF ERRORS ARE NOTED, CONTACT’ ™" ÍARILYN ÇARDNER¶ ™" 1630 ÍADISON ÓTREETß ™" ÅVANSTON, ÉLLINOIS 60202ù UP²2:(P™:™" ×HAT IS THE CHARGE ON THE ";E$(N);" ION"CZ™" ";:US$²"-0123456789.Q":UL²2:35:A²Å(UR$):‹UR$²"Q"§300Kd™:™vn‹ A²C(N) § ™" ÃORRECT!":ˆA2²A2ª1:‰1460šx™:™" ×RONG! ÔHE CHARGE ON THE "»‚™:™" ";E$(N);" ION IS ";C(N)ËŒ1430:‰1460ß–‹Y(D)ƒ"ÌITHIUM","ÌI",1öƒ"ÍAGNESIUM","ÍG",2&ƒ"ÍERCUROUS","ÈG",1%0ƒ"ÍERCURIC","ÈG",2<:ƒ"ÐOTASSIUM","Ë",1QDƒ"ÓILVER","ÁG",1fNƒ"ÓODIUM","ÎA",1yXƒ"ÚINC","ÚN",2”bƒ"ÁCETATE","ÃÈ3ÃÏÏ",-1«lƒ"ÂROMIDE","ÂR",-1Åvƒ"ÃARBONATE","ÃÏ3",-2Ý€( 2. STUDENT INSTRUCTIONS"; E™" 3. TEACHER INSTRUCTIONS"W O™" 4. QUIT"† T™" --------------------------------------"· Y™" PRESS NUMBER KEY (1-4) THEN ";ß ^UL²1:US$²"1234":35: INPUT ROUTINEê `US$²"" c‘Å(UR("òfUH²0:™"":Žk ** PLEASE WAIT REMARK **Gp™È(UD$,24);" ONE MOMENT PLEASE... "MuŽp„ -- LOAD AND RUN MENU PROGRAM‹‰TT$²"0:SHIFT/RUN MENU"—Ž™Ç(147)“™£˜™Ä™"LOAD";Ç(34);TT$;Ç(34);",8"Ê¢™Ð§™Ö¬™Ü±™è)>™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000)ûUD$²""-)ƒ"ÃHLORIDE","ÃL",-1÷Šƒ"ÃHROMATE","ÃRÏ4",-2žƒ"ÆLUORIDE","Æ",-1'¨ƒ"ÈYDROXIDE","ÏÈ",-1<²ƒ"ÉODIDE","É",-1T¼ƒ"ÎITRATE","ÎÏ3",-1lƃ"ÎITRITE","ÎÏ2",-1…Ѓ"ÏXALATE","Ã2Ï4",-2œÚƒ"ÃYANIDE","ÃÎ",-1¶äƒ"ÐHOSPHATE","ÐÏ4",-3Êîƒ"ÏXIDE","Ï",)/RUN MENU ** Œ™"“":‰900 875:Ž<  ** STUDENT INSTRUCTIONS **E •™"“"| šUH²1:UT$²" ÌÏÃË-ËÅÙ": UP²0:UG$²"ÓTUDENT ÉNST":850† ¤1220” ê‹UZ²1§217š óŽ» ô ** TEACHER INSTRUCTIONS **Ä õ™"“"å öUP²0:UG$²"ÔEACHER ÉNST":850 ÷™" )Z²1§217÷»Ž  ** T I T L E P A G E **$"™"“";:$I²1¤38:™"¦’";:‚R&I²1¤22:™"¦’";:‚j(I²1¤37:™"¦’";:‚‚*I²1¤22:™"‘¦’";:‚§,™"© ’É.™" ’  ’©ê0™" ’ ) 0ýL LOCKEY : HUNTINGTON 2#V FIT TO PET BY EMOND & GAMBLE 80:` COLUMBIA COLLEGEZj 1619 W10 AVE VANCOUVER BC`ÄΙ" ÙOU ARE CONDUCTING AN INVESTIGATION OF"¾Ï™" THE ENZYME ACETYLCHOLINESTERASE. ÆROM"îЙ" THE NAME YOU CAN TELL T) UP$²" "QUT$²" ÌÏÃË-ËÅÙ": PROGRAM TITLEi800: TITLE SCREEN€ ‰300: MENU SCREENœ# +++ INPUT SECTION +++®(UR$²"":UI$²""¾*‹UL²0§UL²80Ë-™" ";ß2¡UI$:‹UI$²""§507‹UI$²Ç(13)¯Ã(UR$)±²1§™" O-2ãøƒ"ÓULPHATE","ÓÏ4",-2üƒ"ÓULPHITE","ÓÏ3",-2 ƒ"ÓULPHIDE","Ó",-2RIC","ÈG",2<:ƒ"ÐOTASSIUM","Ë",1QDƒ"ÓILVER","ÁG",1fNƒ"ÓODIUM","ÎA",1yXƒ"ÚINC","ÚN",2”bƒ"ÁCETATE","ÃÈ3ÃÏÏ",-1«lƒ"ÂROMIDE","ÂR",-1Åvƒ"ÃARBONATE","ÃÏ3",-2Ý€) ÔO THE BEST OF OUR KNOWLEDGE,"< ø™" THIS PROGRAM IS IN THE PUBLIC"h ù™" DOMAIN. ÉF THIS IS NOT THE CASE"… ú™" PLEASE CONTACT:"¯ û™" ÃOMMODORE ÂUSINESS ÍACHINES"Ò ü™" 3370 ÐHARMACY ÁVE.ö ý™" ÁGINCOURT, ÏN) £ß2™"ß ’04™"C O M M O D O R ES6™"EDUCATIONALr8™"SOFTWARE: ** COMMODORE LOGO **Å;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0ç<¡A$:‹A$³±" "§I²Iª1:‹I³250§82)HAT THIS ENZYME"Ñ™" WORKS ON THE CHEMICAL ACETYLCHOLINE - "KÒ™" IT BREAKS ACETYLCHOLINE INTO ACETIC"qÓ™" ACID AND CHOLINE. ×E WANT TO"¢Ô™" INVESTIGATE WHICH INHIBITOR IS THE MOST"ÒÕ™" EFFECTIVE IN SLOWING THE NORMAL ACTION"ýÖ™" O)";:‰85<‹UI$²Ç(20)§105*>‹ Ã(UR$)²±UL§50OA120: CHECK FOR VALID CHARACTER_FUR$²UR$ªUI$iK™UI$;qP‰50wU:}Z:ƒ_:‰dŽ¢f ++ CHECK DELETE ++³i‹Ã(UR$)³1§50ËnUR$²È(UR$,Ã(UR$)«1)Ýs™" ";:‰50x ++ CHECK FOR VALID CHA)r™:™" NO REACTION IS POSSIBLE WITHOUT "|™£15)" SUBSTRATE"/†™: 835:‰ 1580@ˆ S1²S1­1000KšˆS2²S1i¤™:™" TYPE OF INHIBITOR? "’¥™" 0. NO INHIBITOR 1. AMMONIUM¾¦™" 2. DIMETHYLAMINE 3. ETHYLAMINE"í§™" 4. PROSTIGM)TARIO" þ™" ÃANADA Í1× 2Ë4"8 ÿ™" (416) 499-4292"M UP²1: 835: 850r ™" ÐROGRAM ÎAME: ÌOCK-ËEY› ™" ÃONVERTED ÂY: ÍARILYN ÇARDNER ™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒê ™" ÉF ERRORS ARE NOTED, CONTACT )8 >T1$²"":T2$²"":T3$²"":T4$²"":I²0@‰3000C ** SPACE BAR PRESS **eH™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"wJA²0¤9:¡A$:‚AŽL¡UI$:‹UI$³±" "§844”NŽ´R ** PAGE DESIGN ROUTINE **ÀTUP²UPª1êW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(U)F THE ENZYME. ÔHIS WILL GIVE US "*×™" VALUABLE INFORMATION ON ITS ACTION."=àUH²1:835:850dá™" ÉN THIS STUDY YOU CAN CONTROL:"Œâ™" A. ÔHE AMOUNT OF ACETYLCHOLINE"®ã™" B. ÔHE TYPE OF INHIBITOR"Òä™" C. ÔHE AMOUNT OF INHIBITOR"ûå™")RACTERS ++}‹Ã(US$)²0§150'‚US²1¤Ã(US$)>‡‹UI$²Ê(US$,US,1)§ŽDŒ‚Q‘UI$²"":Žl– ** STANDARD INPUT **}˜‹Æ(UI$)²46§ŽŽ›‹UI$²Ç(32)§Ž« ‹Æ(UI$)³48°Æ(UI$)±57§170±¥ŽÎª‹Æ(UI$)³65°Æ(UI$)±90§180Ô¯Žø´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž)INE 5. RIMETHYLAMINE"5®™"";:US$²"012345Q":UL²1:35:‹UR$²"Q"§300C³K2²Å(UR$)W¸‹K2³±µ(K2)§1700f‹K2±5§1700uÌ‹K2³0§1700„Ö‹K2²0§2000“à‹K2³4§1850¢ê‹K2²4§1820¨ô®þ½ˆK2²2.6E«3lj1950ÍÜ&)™" ÍARILYN ÇARDNER. ™" 1630 ÍADISON ÓTREETW ™" ÅVANSTON, ÉLLINOIS 60202l UP²2: 835: 850‘ ™" ÉF YOU WANT TO SUGGEST½ ™" ADDITIONAL EDUCATIONAL PROGRAMSå ™" TO BE WRITTEN FOR THE Â128"™")P),18)\™" --------------------------------------"(`‹UH³±0§870\a™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "mfUH²0:™"":ŽŒk ** PLEASE WAIT REMARK **Âp™È(UD$,24);" ONE MOMENT PLEASE... "ÈuŽë„ -- LOAD AND RUN MEN) ÂY COMPARING THE STRUCTURE OF ",æ™" ACETYLCHOLINE WITH THE STRUCTURE OF THE"[ç™" FIVE INHIBITORS YOU SHOULD BE ABLE TO"Šè™" MAKE AN HYPOTHESIS AS TO WHICH OF THE"´é™" FIVE INHIBITORS WILL BE THE MOST"Èê™" EFFECTIVE."Ñë835×õŽ)þ»Ž ¾UI$²"":Ž, ** MENU **&.™"“"C1™" ÍENU"r6™" --------------------------------------"–;™" 1. LOCK-KEY "À@™" 2. STUDENT INSTRUCTIONS"êE™" 3. TEACHER INSTRUCTIONS" O™" )ˆK2²1.6E«5æ0‰1950ö:‹K2±²2§1890üDNˆK2².9X‰1950 b‹K2²2§1930&l2vˆK2².12<€‰1950BŠQ”ˆK2²2.1E«2ž™" AMOUNT OF INHIBITOR? ";¬¨US$²"0123456789Q":UL²10:35:‹US$²"Q"§300¹­I²Å(UR$)DzˆI²I­1000Õ¼‹I³0) PLEASE CONTACT"!™" ÍARILYN ÇARDNERE™" 1630 ÍADISON ÓTREETn™" ÅVANSTON, ÉLLINOIS 60202w835…N‹UZ²1§217‹WŽ±X ** PROGRAM MODIFICATION INST **ºY™"“"Ú]UP²0:UG$²"ÐROGRAM ÍOD":850ã”835ñ²‹U)U PROGRAM‰TT$²"0:SHIFT/RUN MENU"Ž™Ç(147)“™˜™?™"LOAD";Ç(34);TT$;Ç(34);",8"E¢™K§™Q¬™W±™c¶™ "RUN"oÀ™ Ç(19)zÊ—209,2†Ô—939,13’Þ—940,13˜ç€Ãè‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **Ðé™"“";:Œá$™"“":Œ:‰154) ÝúæˆN²1왇 T,P1,C,K1,M,X,V"ƒ0,0,0,9E-5,3E-3,750,0B,UT$²" LOCK-KEY":UG$²"":UP²0:850L6ˆT1²0q@™" AMOUNT OF ACETYLCHOLINE? ";–JUS$²"123Q":UL²1:35:‹UR$²"Q"§300¤OS1²Å(UR$)´T‹ S1±3§1600Ä^‹ S1³0§1600Ôh‹ S1±0§1680) 4. QUIT"5 T™" --------------------------------------"f Y™" PRESS NUMBER KEY (1-4) THEN ";Ž ^UL²1:US$²"1234":35: INPUT ROUTINE™ `US$²""¶ c‘Å(UR$)1000,400,500,396¿ h‰300 ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT*§1950äÆ‹I³±0§2020íÐK2²1öÚˆI²0 äˆK²K1ª(K1¬I­K2)î835:™"“"ø)N$²"T": ‹N$²"T"§2230F*Ë ¤1570W4‹N$²"G"§2600a>‰2280pH‹T1±X§3000‚RT²T1ª1¤T1ª50ˆ\žfˆV1²(M¬S1)­(S1ªK)±pˆV²(VªV1)­1000¾zˆS1²S1«VË„ˆP1²P1ªVÕ* TOTAL ACETIC""& ™" ELAPSED REMAINING ACID PRODUCED"/"0 ™" ÅÅÅÅÅÅÅ ÅÅÅÅÅÅÅÅÅ ÅÅÅÅÅÅÅÅÅÅÅÅÅ"9": ‰2370c"Y™" 0. ÎO INHIBITOR" 1. MM‘IUM’"Z™" 2. ÄIMETHYLAMINE" 3. ETHYLAMINE"Ä"[™" 4. ÐROSTIGMINE" 5. RIMETHYLAMIN*>™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEJ10:‰20p ™"“"£21)Ç(15): UPPER LEFT WINDOW±™""£60)Ç(143):Ž: LOWER RIGHT WINDOWÎ ** SET UP VARIABLES **îUX$²"H":†UQ%(1000):UM²53248† A$(100),B*UR KNOWLEDGE,""ø™" THIS PROGRAM IS IN THE PUBLIC"Nù™" DOMAIN. ÉF THIS IS NOT THE CASE"kú™" PLEASE CONTACT:"•û™" ÃOMMODORE ÂUSINESS ÍACHINES"¸ü™" 3370 ÐHARMACY ÁVE.Üý™" ÁGINCOURT, ÏNTARIO"þþ™" *ŽˆV²V1ܘ‚TꢈT1²T1ª50ô¬‰2100ú¶À.Ê™" MINS ACETYLCHOLINE TOTAL ACETIC"\Ô™" ELAPSED REMAINING ACID PRODUCED"‹Þ™"Ž ÅÅÅÅÅÅÅ ÅÅÅÅÅÅÅÅÅ ÅÅÅÅÅÅÅÅÅÅÅÅÅ"©èTX²T1­500:™ æ "##.##";TX;Ôë™ æ "##########.##";µ(S1¬10®5ª* UL²1:US$²"12345":35: INPUT ROUTINE# `US$²""D c‘Å(UR$)1000,400,500,600,396M h‰300Ž ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **ž Œ™"“":‰900© 875:ŽÊ  ** STUDENT INSTRUCTIONS **Ó •™"“"ù šUH²1:UP²0:UG$²"ÓTUDENT ÉNSE"P1¬10®5ª.5)­100ä P ‰2290ê Z €!d ™:™" PRESS ANY KEY TO CONTINUE"%!n ¡ZZ$:‹ZZ$²""§26704!x ™Ç(147);:Ž=!¸ 835v! ™"“ DO YOU WANT TO CONTINUE THE ASSAY (Y/N) ";“!Ì US$²"YN":UL²1:35:A$²UR$¤!Ö ‹A$²"N"§2390Ó! ™"“ MINS ACETYLCHOLINE * $(100)(UD$²""ZUP$²" "¨UT$²" ÍÅÔÒÉàÖÏÌÕÍÅ     ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!***À800: TITLE SCREEN× ‰300: MENU SCREENó# +++ INPUT SECTION +++(UR$²* ÃANADA Í1× 2Ë4"ÿ™" (416) 499-4292"8UP²1: 835:UH²1: 850b™" ÐROGRAM ÎAME: ÍETRIC ÖOLUMEŠ™" ×RITTEN ÂY : ÄON ×HITEWOOD³™" ÃONVERTED ÂY: ÍARILYN ÇARDNERÚ™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒ ™" * .5)­100;þî™ æ "##########.##";µ(P1¬10®5ª.5)­100ò‹µ(S1¬10®5ª.5)­100³²0§2310'ü‰2120Z 835:™"“ THE REACTION HAS RUN TO COMPLETION"d ‰2390“ ™" DO YOU WANT TO CONTINUE THE ASSAY? ";° US$²"YN":UL²1:35:A$²UR$¶$ Ç. ‹A$²"N"§2390Ù*T":850) ›™"ÔHIS PROGRAM IS DESIGNED TO TEST YOUR"W œ™"ABILITY IN CONVERTING VARIOUS ÍÅÔÒÉÃ"… ™"VOLUME MEASUREMENTS FROM ONE UNIT TO"— ž™"ANOTHER."Ä Ÿ™"ÁFTER EACH QUESTION IS ASKED, ANSWERó  ™"WITH THE APPROPRIATE VOLUME. ÒEMEMBE*ILL. ÉT IS ASSUMED"#+™"THAT THE STUDENT ALREADY KNOWS HOW TO"N,™"CONVERT FROM ONE UNIT TO ANOTHER."y-™"ÔHIS PROGRAM IS RECOMMENDED FOR" 0™"STUDENTS IN THE ÊÕÎÉÏÒ GRADES"µ2™"(4, 5 AND 6)"È:835:UH²1:850ò<™"ÔHIS PROGRAM*"":UI$²""*‹UL²0§UL²80"-™" ";62¡UI$:‹UI$²""§50Z7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85m<‹UI$²Ç(20)§105>‹ Ã(UR$)²±UL§50¦A120: CHECK FOR VALID CHARACTER¶FUR$²UR$ªUI$ÀK™UI$;ÈP‰50ÎU:ÔZ:Ú_:àdŽùf ++ CHECK DELETE ++*ÉF ERRORS ARE NOTED, CONTACT"$ ™" ÍARILYN ÇARDNERH ™" 1630 ÍADISON ÓTREETq ™" ÅVANSTON, ÉLLINOIS 60202‹ UP²2: 835:UH²1: 850°™" ÉF YOU WANT TO SUGGESTÜ™" ADDITIONAL EDUCATIONAL PROGRAMS™" *8 ‹A$³±"Y"§2330æB ˆX²Xª750ðL ‰2130öV %` ™" CONCENTRATION OF INHIBITOR REMAINING:"Aj ™""I¬1000;"MILLIMOLES"at ™" ANOTHER EXPERIMENT ? ";~y US$²"YN":UL²1:35:E$²UR$„~ ›ˆ ‹E$²"Y"§™"“":‰2540­’ ‹E$³±"N"§2420³œ Ž¹¦ ™¿° ™Åº ™Ë*R" ¡™"TO USE THE PROPER FORMAT.": 30000 ¤835:UH²1:850U ¥™"ÈÅÌÐÆÕÌ ÃÈÁÒÔ’"~ ¦™"1MÌ = 0.1CÌ 1MÌ = 0.01DÌ"® §™"1MÌ = 0.001Ì 1MÌ = 0.000 000 1KÌ"Ö ¨™"1CÌ = 10MÌ 1CÌ = 0.1DÌ" ©™"1CÌ = 0.01Ì * CAN BE USED BY THE =™"STUDENTS INDIVIDUALLY OR IN A GROUP"=>™"AS A CLASS ACTIVITY."k?™"ÔO ALTER THE ÄÁÔÁ TO YOUR DESIRED "”@™"QUANTITIES, SEE THE MODIFICATION´A™"SECTION OF THE ÍÅÎÕ(4)."½D835ÃN:ÉWŽïX ** PROGRAM M* i‹Ã(UR$)³1§50"nUR$²È(UR$,Ã(UR$)«1)4s™" ";:‰50[x ++ CHECK FOR VALID CHARACTERS ++m}‹Ã(US$)²0§150~‚US²1¤Ã(US$)•‡‹UI$²Ê(US$,US,1)§Ž›Œ‚¨‘UI$²"":ŽÃ– ** STANDARD INPUT **Ô˜‹Æ(UI$)²46§Žå›‹UI$²Ç(32)§Ž ‹Æ(UI$)³48°Æ(U* TO BE WRITTEN FOR THE Â128" ™" PLEASE CONTACT"@™" ÍARILYN ÇARDNERd™" 1630 ÍADISON ÓTREET™" ÅVANSTON, ÉLLINOIS 60202–835¤UH²1:850Õ™"ÔHIS PROGRAM IS DESIGNED TO TEST YOUR"™"STUDE*Ä ™ÑÎ ™×Ø ™Ýâ Žãì Œîö ˆN²Nª1ø ‰1550 ™:FA²27­(S1¬1000)>  ™" MIN. MILLIMOLES ACETIC ACID PRODUCED"o  ™" ££££ £££££££££££££££££££££££££££££££££" ( ™T1­500£5); 2 XX²(µ(P1¬10®5ª.5)­100)¬FA² < ‹XX²0§™"0":‰2640Ú F II²1¤XX:™"¦";:* 1CÌ = 0.000 001KÌ"+ ª™"1DÌ = 100MÌ 1DÌ = 10CÌ"X «™"1DÌ = 0.1Ì 1DÌ = 0.000 01KÌ" ¬™"1Ì = 1 000MÌ 1Ì = 100CÌ"§ ­™"1Ì = 10DÌ 1Ì = 0.001KÌ"° Â835¾ ÇUH²1:850í Ì™"ÎOTE:ÔO ADVANCE FROM ONE QUESTION*ODIFICATION INST **øY™"“"]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850>^™"ÃÈÁÎÇÉÎÇ ÄÁÔÁ ÌÉÓÔ’"m_™"ÔHIS SECTION IS DESIGNED TO SHOW THE"`™"TEACHER THAT THE PROGRAM CAN BE EASINY"Ûa™"ALTERED TO CONTAIN THE DESIRED  QUANTITIES.*I$)±57§170¥Ž%ª‹Æ(UI$)³65°Æ(UI$)±90§180+¯ŽO´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":ŽU»Žb¾UI$²"":Žs, ** MENU **}.™"“"š1™" ÍENU"É6™" --------------------------------------"ò;™" 1. BEGIN METRIC VOLUME" @* NTS PROFICIENCY IN CONVERTING". ™"ÍÅÔÒÉà VOLUME MEASUREMENTS FROM ONE"H"™"UNIT TO ANOTHER."u'™"ÉT IS ESSENTIAL THAT YOUR STUDENTS"¢(™"KNOW THE CORRECT FORMAT FOR WRITING"Â)™"NUMBERS.":835:UH²1:850ô*™"ÔHIS PROGRAM IS A DR*‚:™µ(P1¬10®5ª.5)­100ä P ‰2290ê Z €!d ™:™" PRESS ANY KEY TO CONTINUE"%!n ¡ZZ$:‹ZZ$²""§26704!x ™Ç(147);:Ž=!¸ 835v! ™"“ DO YOU WANT TO CONTINUE THE ASSAY (Y/N) ";“!Ì US$²"YN":UL²1:35:A$²UR$¤!Ö ‹A$²"N"§2390Ó! ™"“ MINS ACETYLCHOLINE *"Ö™"TO THE NEXT PRESS THE ÓÐÁÃÅ BAR"BÛ™"ÉF AT ANY TIME YOU WISH TO RETURN"fà™"TO THE ÍÅÎÕ PRESS Q ÒÅÔÕÒÎ"oå835uê:{óŽœô ** TEACHER INSTRUCTIONS **¥õ™"“"ËöUP²0:UG$²"ÔEACHER ÉNST":UH²1:850ù÷™" ÔO THE BEST OF O+"b™"ÁLL THE TEACHER HAS TO DO IS FOLLOW",c™"THESE STEPS.":835:UH²1:850Wd™"1) ÔHE DATA STATEMENTS ARE FOUND"…e™"IN LINES 1690 THROUGH TO 2180 IN"ºf™"INCREMENTS"OF 10.ÅØÁÍÐÌÅ"Îg™"1690 ÄÁÔÁ"áh™"1*™" 2. STUDENT INSTRUCTIONS"F E™" 3. TEACHER INSTRUCTIONS"s J™" 4. MODIFICATION OF PROGRAM" O™" 5. QUIT"¾ T™" --------------------------------------"ï Y™" PRESS NUMBER KEY (1-5) THEN "; ^+å*I²1¤22:™"‘¦’";:‚ ,™"© ’,.™" ’  ’©M0™" ’ £ßk2™"ß ’“4™"C O M M O D O R E¶6™"EDUCATIONALÕ8™"+:™"ÁLL RIGHT!":5000 :‰1575÷'™:™"ÙES SIR!":5000:‰1575 ("™:™"ÙOU'RE TOO MUCH!":5000:‰15756('835:‹ZZ³±KL§1230`(6UP²µ(KL­5ª.5)«1:UG$²"ÃONCLUSION":850“(@™:™" ÙOUR SCORE IS";C;" CORRECT ";W;"WRONG"Ê(J™:™" ÙOUR RATING IS" ;µ(C­+700 ÄÁÔÁ"ði™" :"ÿj™" :"k™"2170 ÄÁÔÁ"3l™"2180 ÄÁÔÁ":835:UH²1:850bm™"2)×HEN PLACING THE QUANTITIES IN THE"n™"ÄÁÔÁ STATEMENTS, YOU MUST FIRST ENTER½o™"THE ORIGINAL AMOUNT FOLLOWED BY AN "ép™"EQUAL SIGN(=), TH+SUREMENTS FROM ONE UNIT TO ANOTHER."#q™"ÁFTER EACH QUESTION IS ASKED, TYPE"D#s™"IN AN APPROPRIATE ANSWER, FOLLOWED BY"Y#u™"A <ÒÅÔÕÒÎ>."ˆ#w™"ÉF YOU NEED HELP AT ANY TIME,VYPE IN"—#y™"A 'Ñ'." #{835©#|850×#}™"ÉF YOU DO NOT+ 0.18KÌ = ¤¤ Ì","180"Û-ƒ"0.072KÌ = ¤¤ Ì","72"ö- ƒ"25Ì = ¤¤ KÌ","0.025".*ƒ"550Ì = KÌ","0.55"(.4ƒ"3Ì = ¤¤KÌ","0.003"H.>ƒ"0.98Ì = ¤¤ KÌ","0.000 98"c.Hƒ"16Ì = ¤¤ KÌ","0.016"‚.Rƒ"5 000MÌ = ¤¤ KÌ","0.005"¢.\ƒ"38 000MÌ = ¤¤ KÌ","0.038"Á.fƒ"2+ SOFTWAREð: ** COMMODORE LOGO **(;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0J<¡A$:‹A$³±" "§I²Iª1:‹I³250§828n>T1$²"":T2$²"":T3$²"":T4$²"":I²0w@‰300“C ** SPACE BAR PRESS **ÈH™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"Ý+ (CªW)¬10000)­100;"%"û(T™:™"ÄO YOU WISH TO CONTINUE (Y OR N)? ";&)^US$²"YNQ":UL²1:35:C$²UR$:‹UR$²"Q"§300e)h‹È(C$,1)²"Y" §KL²KLª5:UG$²"ÑUESTION #":ZZ²ZZ«1:N²N«1:‰1230„)r‹ È(C$,1)²"N" §œ:900:‰300 )šƒ"5 Ì = ¤¤¤ MÌ","5 000"½)¤ƒ"0.032 Ì = ¤¤¤+ EN THE DOLLAR SIGNq™"HELD DOWN WITH ÃÔÒÌ, THEN THE NEW UNIT."Nr™"ÔHEN PUT THE CORRECT ANSWER.":™"ÅØÁÍÐÌÅ’"†s™"1690ÄÁÔÁ"Ç(34)"5Ì=¤DÌ"Ç(34)","Ç(34)"50"Ç(34)""¿t™"2110ÄÁÔÁ"Ç(34)"18DÌ=¤Ì"Ç(34)","Ç(34)"1.8"Ç(34)""üu™"ÄO NOT’ FORG+ WISH TO DO A QUESTION$™"TYPE IN A 'ÓÐÁÃÅ' AND A NEW QUESTION""$™"WILL BE PRESENTED."R$ƒ™"ÙOUR ANSWERS MUST BE WRITTEN IN PROPER"d$…™"FORMAT."v$‡™"ÅØÁÍÐÌÅ’"”$‰™"0.23MÌ = 0.000 23Ì"¬$‹™"123CÌ = 1 230MÌ"Æ$¿835:UG$²"ÑUE+KÌ = ¤¤ MÌ","2 000 000"à.pƒ"0.035KÌ = ¤¤MÌ","35 000"ú.zƒ"1KÌ = ¤¤ Ì","1 000"/„ƒ"1Ì = ¤¤ KÌ","0.001"/Ž™:™:™$/˜S/¢™:™" ×ELL, É GUESS YOU REALLY DIDN'T KNOW"c/¬™" IT!!! "/¶™:™"ÔHE CORRECT ANSWER IS ";B$(I):835š/è‰1230«/òƒ"999","9+JZZ²0¤9:¡ZZ$:‚ZZôL¡UI$:‹UI$³±" "§844úNŽR ** PAGE DESIGN ROUTINE **&TUP²UPª1PW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)\™" --------------------------------------"Ž`‹UH³±0§870Âa™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "ÓfU+ MÌ","32"Ù)®ƒ"0.9 Ì = ¤¤¤ MÌ","900"õ)¸ƒ"0.007 Ì = ¤¤¤ MÌ","7"*ƒ"0.35 Ì = ¤¤¤ MÌ","350"0*̃"37 Ì = ¤¤¤ MÌ","37 000"M*Öƒ"240 MÌ = ¤¤¤ Ì","0.24"j*àƒ"85 MÌ = ¤¤¤ Ì","0.085"ˆ*êƒ"1 200 MÌ = ¤¤¤ Ì","1.2"¤*ôƒ"4 MÌ = ¤¤¤ Ì","0.004"Á*þƒ"750 MÌ +ET THE QUOTES("Ç(34)")!!":835:UH²1:850*v™"3) ÙOU MAY ENTER ONLY ONE SET OF "Xw™"QUESTIONS ON EACH ÄÁÔÁ STATEMENT."nx™"ÅØÁÍÐÌÅ’"¨y™"2010ÄÁÔÁ"Ç(34)"35MÌ=¤CÌ"Ç(34)","Ç(34)"3.5"Ç(34)""ìz™"2050ÄÁÔÁ"Ç(34)"2Ì=¤CÌ"Ç(34)","Ç(34+STION #"é$ÄI²0:N²0:C²0:W²0:CO²0:ZZ²0:KL²6û$ÎN²Nª1:ZZ²ZZª1 %Ó‹ZZ²KL§1590%ØI²µ(T0¬»(1))2%â‹ A$(I)²"*"§ 1240S%ì‹ I ² 0 § A$(I) ² "*":‰ 1240_%öCO²COª1v%F$²A$(I):A$(I)²"*"~% Q²0„%”%UP²N«1:850¬%™£6ª21)"";F$;"? ";â%(US$²" 01234+99"¹/¸ 835:850ë/º ™:™"ÔHE PROPER FORMAT FOR ANSWERING VOLUME"0¼ ™"QUESTIONS IS ....".0¾ ™"1) ÉNSTEAD OF USING A COMMA TOZ0À ™"SEPARATE YOUR UNITS, USE A SPACEt0Á ™"(EG. 5 464)."¡0 ™"2) ÉF THERE ISN'T A UNIT BEFORE THE"Ñ0Ä +H²0:™"":Žòk ** PLEASE WAIT REMARK **( p™È(UD$,24);" ONE MOMENT PLEASE... ". uŽQ „ -- LOAD AND RUN MENU PROGRAMl ‰TT$²"0:SHIFT/RUN MENU"x Ž™Ç(147)~ “™„ ˜™¥ ™"LOAD";Ç(34);TT$;Ç(34);",8"« ¢™± §™· ¬™½ ±™É ¶™ "R+= ¤¤¤ Ì","0.75"Þ*ƒ"28 MÌ = ¤¤¤ Ì","0.028"ú*ƒ"6 KÌ = ¤¤¤ Ì","6 000"+ƒ"0.18 KÌ = ¤¤¤ Ì","180"4+&ƒ"0.072 KÌ = ¤¤¤ Ì","72"Q+0ƒ"25 Ì = ¤¤¤ KÌ","0.025"n+:ƒ"550 Ì = ¤¤¤ KÌ","0.55"Š+Dƒ"3 Ì = ¤¤¤ KÌ","0.003"¬+Nƒ"0.98 Ì = ¤¤¤ KÌ","0.000 98"É+X+)"200"Ç(34):835:UH²1:850{™"ÓÕÍÍÁÒÙ’"&|™" 1) ÄÁÔÁ STATEMENTS IN LINES"@}™" 1690 - 2180."m~™" 2) ÔHE WORD ÄÁÔÁ FOLLOWED BY THE SET‰™" OF QUESTIONS."´€™" 3) ÒÅÍÅÍÂÅÒ THE QUOTES("Ç(34)")ANDä™" THE COMMA IN TH+56789.Q":UL²15:35:Z$²UR$:‹UR$²"Q"§300õ%<‹B$(I)²Z$§1480&F‹Z$²" "§N²N«1:ZZ²ZZ«1:‰1230.&P‹Å(Z$)²Å(B$(I))§1380I&UQ²Qª1:‹Q±1§5049:‰2200z&Z™:™ "ÎOT CORRECT...TRY AGAIN":5049:‰1410¡&d™:™"ÔHAT IS THE CORRECT VALUE."î&n™:™"ÈOWEVER, YOU HA+™"DECIMAL POINT, PUT A ZERO BEFORE IT"ì0Æ ™"(EG. 0.355 54)."ò0ê Ž1  TITLE IIR1¡**IFPEEK(50003)=0THENPOKE53281,1:PRINT"“":POKE53281,6:POKE53280,14:GOTO4004[1¢™"“"i1¤—59467,16x1¦—59466,150…1¨K²1¤100™1ªC²µ(»(1)¬960)ª1­1¬L²µ(»(+UN"Õ À™ Ç(19)à Ê—209,2ì Ô—939,13ø Þ—940,13þ ç€)!è‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **5!é™"“";:ŒF!òUG$²"":4000}!üTHIS PROGRAM IS A REVIEW OF THE METRIC SYSTEM.Ì!"WRITTEN BY DON WHITEWOOD ,OAKWOOD COLLEGIATE ,991 ST CLAIR AVE W+ƒ"16 Ì = ¤¤¤ KÌ","0.016"ê+bƒ"5 000 MÌ = ¤¤¤ KÌ","0.005" ,lƒ"38 000 MÌ = ¤¤¤ KÌ","0.038"-,vƒ"2 KÌ = ¤¤¤ MÌ","2 000 000"O,€ƒ"0.035 KÌ = ¤¤¤ MÌ","35 000"h,Šƒ"5Ì = ¤¤MÌ","5 000"‚,”ƒ"0.032Ì = ¤¤MÌ","32"›,žƒ"0.9Ì = ¤¤MÌ","900"´,¨ƒ"0.007Ì = ¤¤M+E ÄÁÔÁ STATEMENTS." ‚™" 4) ÔHE SYMBOL FOR ÌITRES IS THE'ƒ™" SHIFTED (Ì)."E…™"ÇÏÏÄ ÌÕÃË’!!!"N”835T²:Z»Žz  ** T I T L E P A G E **‡"™"“";$I²1¤38:™"¦’";:‚µ&I²1¤22:™"¦’";:‚Í(I²1¤37:™"¦’";:‚+VE NOT WRITTEN YOUR ANSWER IN THE CORRECT FORM.'x™ £6ª21)"ÔRY AGAIN.":5049'‚W²Wª10'–AA²1¤500:‚AA:‰1300C'ÈC²Cª1:R²»(0)¬4^'Ò‘R‰1540,1550,1560,1570‘'ú™:™"ÃORRECT..YOU'RE A GENIUS!":5000 :‰1575²'™:™"ÃORRECT!":5000:‰1575Ö'™,1)¬10)ª48Á1®M²µ(»(1)¬255)ª1Í1°—UMªC,LÚ1²—59464,Má1´‚Kñ1¹D²1¤500:‚D2»T²50¤1©«1-2½™"“METRIC VOLUME">2¿—59464,Tª100E2À‚TR2×59464,0_2Å—59467,0e2ÒŽs2ˆ SOUND 12Š—59467,162Œ—59466,150œ2T²1¤50Ë2—+.TORONTOð! PLEASE COPY BUT CREDIT ABOVE". I²1 ¤ 100"8‡ A$(I),B$(I)."B‹A$(I)²"999"§T0²I:‰11106"L‚ IE"V™"“":10Z"`UP²0:UG$²"":850‰"j™"ÔHIS PROGRAM IS DESIGNED TO GIVE YOU"·"m™"PRACTICE IN CONVERTING ÍÅÔÒÉà VOLUME"ç"o™"MEA+Ì","7"Î,²ƒ"0.35Ì = ¤¤MÌ","350"é,¼ƒ"37Ì = ¤¤MÌ","37 000"-ƃ"240MÌ = ¤¤ Ì","0.24"-Ѓ"85MÌ = ¤¤ Ì","0.085";-Úƒ"1 200MÌ = ¤¤ Ì","1.2"U-äƒ"4MÌ = ¤¤ Ì","0.004"p-îƒ"750MÌ = ¤¤ Ì","0.75"‹-øƒ"28MÌ = ¤¤ Ì","0.028"¥-ƒ"6KÌ = ¤¤ Ì","6 000"À- ƒ",>™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000)ûUD$²""-Å59464,55:—59464,254:—59464,100:—59464,222Ò2‘‚Tß2“—59464,0ì2•—59467,0ò2¡Ž3¹ SOUND II3º—59467,163¿—59466,15)3ÄT²1¤5063É—59464,T=3Ê‚TP3Ë**POKE59464,0]3Ì—59467,0c3ÎŽx1¦—59466,150…1¨K²1¤100™1ªC²µ(»(1)¬960)ª1­1¬L²µ(»(,** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **> Œ™"“":‰900I 875:Žj  ** STUDENT INSTRUCTIONS **s •™"“"™ šUP²0:UG$²"ÓTUDENT ÉNST":UH²1:850Ì œ: ™" ÒEMEMBER, HIT KEY AFTER"ø ž: ™" TYPING YOUR ANSWER. ÔHIS ,ER™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒ; ™" ÉF ERRORS ARE NOTED, CONTACT[ ™" ÍARILYN ÇARDNER ™" 1630 ÍADISON ÓTREET¨ ™" ÅVANSTON, ÉLLINOIS 60202½ UP²2: 835: 850â™" ÉF YOU WANT TO SUGGEST™, åNŽR ** PAGE DESIGN ROUTINE **TUP²UPª1;W™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)j\™" --------------------------------------"y`‹UH³±0§870­a™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "¾fUH²0:™"":ŽÝk ** PLEASE WAIT REMARK **, UP$²" "{UT$²" ÍÏÌÁÒ      ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!***“800: TITLE SCREENª ‰300: MENU SCREENÆ# +++ INPUT SECTION +++Ø(UR$²"":UI$²""è*‹UL²0§UL²80õ-™" "; 2¡U, :35:A$²UR$ùâ‹ A$²"Y"§™"“":‰1063 ç‹A$²"N"§300ì‰12402öUH²1:UG$²"ÍOLES-ÍASS":850\™:™" ×HAT IS THE MOLAR MASS OF THE"¥ ™:™" SUBSTANCE? ";:US$²"Q.0123456789":UL²5:35:M²Å(UR$):‹UR$²"Q"§300Ø™:™" ÈOW MANY MOLES OF THIS SUBSTANCE? ";, TELLS"%  : ™" THE COMPUTER TO ACCEPT WHAT YOU"? ¢: ™" HAVE TYPED."l ¤: ™" ÔYPE AT ANY TIME TO RETURN"† ¦: ™" TO THE MENU."™ ®835:UH²1:850Ë ¸™" ÔHE FOLLOWING CALCULATIONS ARE AVAIL- "ê º™" ABLE IN THIS PROGRAM:" ¼™, " ADDITIONAL EDUCATIONAL PROGRAMS6™" TO BE WRITTEN FOR THE Â128"R™" PLEASE CONTACT"r™" ÍARILYN ÇARDNER–™" 1630 ÍADISON ÓTREET¿™" ÅVANSTON, ÉLLINOIS 60202È835ÖN‹UZ²1§217ÜWŽX ** ,p™È(UD$,24);" ONE MOMENT PLEASE... "uŽ<„ -- LOAD AND RUN MENU PROGRAMW‰TT$²"0:SHIFT/RUN MENU"cŽ™Ç(147)i“™o˜™™"LOAD";Ç(34);TT$;Ç(34);",8"–¢™œ§™¢¬™¨±™´¶™ "RUN"ÀÀ™ Ç(19)ËÊ—209,2×Ô—939,13ãÞ,I$:‹UI$²""§50-7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85@<‹UI$²Ç(20)§105T>‹ Ã(UR$)²±UL§50yA120: CHECK FOR VALID CHARACTER‰FUR$²UR$ªUI$“K™UI$;›P‰50¡U:§Z:­_:³dŽÌf ++ CHECK DELETE ++Ýi‹Ã(UR$)³1§50õnUR$²È(UR$,Ã(UR$)«1)s,:35åN²Å(UR$) ™:™" ÔHE MASS IS ";M¬N;" GRAMS"0(™:™" ÄO YOU WANT ANOTHER? ";N2US$²"YN":UL²1: 35:A$²UR$f<‹ A$²"Y"§™"“":‰1063wA‹A$²"N"§1590F‰1330žPUH²1:UG$²"ÍOLARITY":850ÆZ™:™" ×HAT IS THE MOLAR MASS OF THE"d™:™" SU," 1. ÃONVERTS MASS INTO MOLES.5 ¾™" 2. ÃONVERTS MOLES INTO MASS.c À™" 3. ÃALCULATES MOLARITY OF A SOLUTION.¢ ™" 4. ÃALCULATES MASS OF SOLUTE IN A  SOLUTION."« å835¹ ê‹UZ²1§217¿ óŽà ô ** TEACHER INSTRUCTIONS **é õ™"“" ö,PROGRAM MODIFICATION INST ** Y™"“"+]UP²0:UG$²"ÐROGRAM ÍOD":8504”835B²‹UZ²1§217H»Žh  ** T I T L E P A G E **u"™"“";‹$I²1¤38:™"¦’";:‚£&I²1¤22:™"¦’";:‚»(I²1¤37:™"¦’";:‚Ó*I²1¤22:™"‘¦’";:‚ø,™",—940,13éç€è‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **!é™"“";:Œ;ü-MOLAR-R.J.LAMB.1980Q'UG$²"ÏPTION":850zB™" 1. ÃONVERTS MASS INTO MOLES.¢L™" 2. ÃONVERTS MOLES INTO MASS.ÓV™" 3. ÃALCULATES MOLARITY OF A SOLUTION.[™",™" ";:‰50.x ++ CHECK FOR VALID CHARACTERS ++@}‹Ã(US$)²0§150Q‚US²1¤Ã(US$)h‡‹UI$²Ê(US$,US,1)§ŽnŒ‚{‘UI$²"":Ž–– ** STANDARD INPUT **§˜‹Æ(UI$)²46§Ž¸›‹UI$²Ç(32)§ŽÕ ‹Æ(UI$)³48°Æ(UI$)±57§170Û¥Žøª‹Æ(UI$)³65°Æ(UI$)±90§180,BSTANCE? ";:US$²"Q.0123456789":UL²5:35:M²Å(UR$):‹UR$²"Q"§300>n™:™" ×HAT IS THE MASS OF THIS SUBSTANCE "`x™:™" (GRAMS)? ";:35:G²Å(UR$)‰‚™:™" ×HAT IS THE VOLUME OF SOLVENT"¬Œ™:™" (LITRES)? ";:35:V²Å(UR$)Ø–™:™" ÔHE SOLUTION IS ";G­M­V;",UP²0:UG$²"ÔEACHER ÉNST":8508 ÷™" ÔO THE BEST OF OUR KNOWLEDGE,"a ø™" THIS PROGRAM IS IN THE PUBLIC" ù™" DOMAIN. ÉF THIS IS NOT THE CASE"ª ú™" PLEASE CONTACT:"Ô û™" ÃOMMODORE ÂUSINESS ÍACHINES"÷ ü™" 3370 ÐH,© ’.™" ’  ’©;0™" ’ £ßY2™"ß ’4™"C O M M O D O R E¤6™"EDUCATIONALÃ8™"SOFTWAREÞ: ** COMMODORE LOGO **;, 4. ÃALCULATES MASS OF SOLUTE IN A SOLUTION."ij™" ÅNTER A NUMBER KEY (1-4) ";:US$²"1234Q":UL²1:35:A²Å(UR$):‹UR$²"Q"§300†t‘ A ‰1170,1270,1360,1480~™"“"™ˆ‰1070¸’UH²1:UG$²"MASS-MOLES":850᜙:™" ×HAT IS THE MOLAR MAS,þ¯Ž"´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž(»Ž5¾UI$²"":ŽF, ** MENU **P.™"“"m1™" ÍENU"œ6™" --------------------------------------"Ä;™" 1. BEGIN MOLAR "î@™" 2. STUDENT INSTRUCTIONS" E™", MOLAR."ú ™:™" ÄO YOU WANT ANOTHER? ";ªUS$²"YN":UL²1: 35:A$²UR$0´‹ A$²"Y"§™"“":‰1063@¹‹A$²"N"§300J¾‰1450eÈUH²1:UG$²"ÓOLUTE":850Ò™:™" ×HAT IS THE MOLAR MASS OF THE"ÖÜ™:™" SUBSTANCE? ";:US$²"Q.0123456789":UL²5:35:M²Å(UR$):‹UR$,ARMACY ÁVE.ý™" ÁGINCOURT, ÏNTARIO"=þ™" ÃANADA Í1× 2Ë4"]ÿ™" (416) 499-4292"rUP²1: 835: 850œ™" ÐROGRAM ÎAME: ÍOLAR Ù" ×RITTEN ÂY : Ò. Ê. ÌAMB ì™" ÃONVERTED ÂY: ÍARILYN ÇARDN,™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²08<¡A$:‹A$³±" "§I²Iª1:‹I³250§828\>T1$²"":T2$²"":T3$²"":T4$²"":I²0e@‰300C ** SPACE BAR PRESS **¶H™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"ÈJA²0¤9:¡A$:‚AßL¡UI$:‹UI$³±" "§844,S OF THE"*¦™:™" SUBSTANCE? ";:US$²"Q.0123456789":UL²5:35:M²Å(UR$):‹UR$²"Q"§300X°™:™" ×HAT IS THE MASS OF THIS SUBSTANCE"zº™:™" (GRAMS)? ";:35:G²Å(UR$)¡Ä™:™" ÔHE NUMBER OF MOLES = ";G­MÄΙ:™" ÄO YOU WANT ANOTHER? ";áØUS$²"YN":UL²1, 3. TEACHER INSTRUCTIONS"4 O™" 4. QUIT"c T™" --------------------------------------"” Y™" PRESS NUMBER KEY (1-4) THEN ";¼ ^UL²1:US$²"1234":35: INPUV ROUTINEÇ `US$²""ä c‘Å(UR$)1000,400,500,396í h‰300. ‹ -²"Q"§300æ™:™" ×HAT IS THE MOLARITY? ";:35:N²Å(UR$)4ð™:™" ×HAT IS THE VOLUME OF THE SOLUTION"Wú™:™" (LITRES)? ";:35:V²Å(UR$)Š™:™" ÔHE SOLUTION CONTAINS ";M¬N¬V;" GRAMS."­™:™" ÄO YOU WANT ANOTHER? ";ÊUS$²"YN":UL²1:35:A$²UR$â->™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000)íUH²1:U4²207:TB²21UD$²"->™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000) † N$(100),F$(100),C$(21),F%(100),C-835ôê:úóŽô ** TEACHER INSTRUCTIONS **$õ™"“"JöUP²0:UG$²"ÔEACHER ÉNST":UH²1:850x÷™" ÔO THE BEST OF OUR KNOWLEDGE,"¡ø™" THIS PROGRAM IS IN THE PUBLIC"Íù™" DOMAIN. ÉF THIS IS NOT THE CASE"êú™" PLEASE CONTACT::"‹ A$²"Y"§™"“":‰1063ò'‹A$²"N"§300ü,‰15606ŽL²1: 35:A$²UR$0´‹ A$²"Y"§™"“":‰1063@¹‹A$²"N"§300J¾‰1450eÈUH²1:UG$²"ÓOLUTE":850Ò™:™" ×HAT IS THE MOLAR MASS OF THE"ÖÜ™:™" SUBSTANCE? ";:US$²"Q.0123456789":UL²5:35:M²Å(UR$):‹UR$-  ^UL²1:US$²"12345":35: INPUT ROUTINE' `US$²""H c‘Å(UR$)1000,400,500,600,396Q h‰300’ ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **¢ Œ™"“":‰900­ 875:ŽÎ  ** STUDENT INSTRUCTIONS **× •™"“"ý šUH²1:UP²0:UG$²"ÓTUDENT- "CUP$²" "‘UT$²" ÎUCLEAR ÒEACTOR   ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!***©800: TITLE SCREENÀ ‰300: MENU SCREENÜ# +++ INPUT SECTION +++î(UR$²"":UI$²""þ*‹UL²0§UL²- F%(21):UC²552971UD$²""cUP$²" "±: UT$²" ÎÏÍÅÎÃÌÁÔÕÒÅ      ": PLACE PROGRAM TITLE HERE!!!!!!!!!!!!!!!***É800: TITLE SCREENà ‰300: MENU SCREENü# +++ INPUT SECTION +++- "û™" ÃOMMODORE ÂUSINESS ÍACHINES"7ü™" 3370 ÐHARMACY ÁVE.[ý™" ÁGINCOURT, ÏNTARIO"}þ™" ÃANADA Í1× 2Ë4"ÿ™" (416) 499-4292"·UP²1: 835:UH²1: 850à™" ÐROGRAM ÎAME: ÎOMENCLATURE™- ENT INSTRUCTIONS"1 E™" 3. TEACHER INSTRUCTIONS"M O™" 4. QUIT"| T™" --------------------------------------"­ Y™" PRESS NUMBER KEY (1-4) THEN ";Õ ^UL²1:US$²"1234":35: INPUT ROUTINEà `US$²""ý c‘Å(UR$)1000,40- ÉNST":850. œ: ™" ÒEMEMBER TO HIT AFTER"Z ž: ™" TYPING YOUR ANSWER. ÔHIS TELLS"‡  : ™" THE COMPUTER TO ACCEPT WHAT YOU"¡ ¢: ™" HAVE TYPED."Î ¤: ™" ÔYPE AT ANY TIME TO RETURN"è ¦: ™" TO THE MENU."ñ ¬: -80 -™" ";2¡UI$:‹UI$²""§50C7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85V<‹UI$²Ç(20)§105j>‹ Ã(UR$)²±UL§50A120: CHECK FOR VALID CHARACTERŸFUR$²UR$ªUI$©K™UI$;±P‰50·U:½Z:Ã_:ÉdŽâf ++ CHECK DELETE ++ói‹Ã(UR$)³1§50 nUR-(UR$²"":UI$²""*‹UL²0§UL²80+-™" ";?2¡UI$:‹UI$²""§50c7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85v<‹UI$²Ç(20)§105Š>‹ Ã(UR$)²±UL§50¯A120: CHECK FOR VALID CHARACTER¿FUR$²UR$ªUI$ÉK™UI$;ÑP‰50×U:ÝZ:ã_:édŽf ++ CHECK D-" ×RITTEN ÂY : Ò. ×. ÄRAY.™" ÕPGRADED ÂY : ÌYNDA ÂONANNO"W™" ÃONVERTED ÂY: ÍARILYN ÇARDNER~™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒ¦ ™" ÉF ERRORS ARE NOTED, CONTACTÆ ™" ÍARILYN ÇARDNERê ™" 1630 ÍADISON -0,500,396 h‰300G ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **W Œ™"“":‰900b 875:Žƒ  ** STUDENT INSTRUCTIONS **Œ •™"“"² šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850á È™" ÔHIS PROGRAM ALLOWS YOU TO CONTROL A" É™" NUCLEAR R-™ ®: ™" ÔO ERASE AN ERROR, PRESS THE"E ¯: ™" KEY ONCE FOR EACH"Z °: ™" LETTER."p ±: 835:UH²1:850 ²™" ÅITHER A NAME OR A FORMULA WILL"Ê ´™" APPEAR ON THE SCREEN. ÉF A FORMULA"õ ¶™" APPEARS, TYPE IN THE NAME.-$²È(UR$,Ã(UR$)«1)s™" ";:‰50Dx ++ CHECK FOR VALID CHARACTERS ++V}‹Ã(US$)²0§150g‚US²1¤Ã(US$)~‡‹UI$²Ê(US$,US,1)§Ž„Œ‚‘‘UI$²"":Ž¬– ** STANDARD INPUT **½˜‹Æ(UI$)²46§ŽÎ›‹UI$²Ç(32)§Žë ‹Æ(UI$)³48°Æ(UI$)±57§170ñ¥Žª‹Æ-ELETE ++i‹Ã(UR$)³1§50+nUR$²È(UR$,Ã(UR$)«1)=s™" ";:‰50dx ++ CHECK FOR VALID CHARACTERS ++v}‹Ã(US$)²0§150‡‚US²1¤Ã(US$)ž‡‹UI$²Ê(US$,US,1)§Ž¤Œ‚±‘UI$²"":ŽÌ– ** STANDARD INPUT **ݘ‹Æ(UI$)²46§Žî›‹UI$²Ç(32)§Ž  ‹Æ(UI-ÓTREET ™" ÅVANSTON, ÉLLINOIS 60202- UP²2: 835:UH²1: 850R™" ÉF YOU WANT TO SUGGEST~™" ADDITIONAL EDUCATIONAL PROGRAMS¦™" TO BE WRITTEN FOR THE Â128"™" PLEASE CONTACT"â™" ÍARILYN ÇARDNER.EACTOR. ÙOU CAN CONTROL"9 Ê™" FACTORS SUCH AS CONTROL ROD POSITIONS"V Ë™" AND COOLANT FLOWS"„ Û™" ÉF AT ANY TIME YOU WISH TO RETURN"¬ à™" TO THE ÍÅÎÕ PRESS Ñ ÒÅÔÕÒÎ."Û á™" ÁFTER EACH ANSWER, PRESS ÒÅÔÕÒÎ’."î â835:UH²1:850- ÉF A" ¸™" NAME APPEARS, TYPE THE FORMULA.K ¼™" ÔO MAKE CAPITAL LETTERS, HOLD DOWN"v ¾™" THE KEY WHILE TYPING THE"‰ À™" LETTER."´ Á™" ÕNLESS TOLD OTHERWISE, YOU MUST"á ™" GIVE THE NAME BY THE É.Õ.Ð.Á.Ã. OR"Ä™" Ò-THE STUDENT TYPES 'STOP',"'*: ™" OR HE/SHE HAS ANSWERED 25 CON-"S,: ™" SECUTIVELY CORRECT QUESTIONS."_.: 835eN:kWŽ‘X ** PROGRAM MODIFICATION INST **šY™"“"¿_UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850íb: ™" ÔHE ÄÁÔÁ STAT-$)³48°Æ(UI$)±57§170¥Ž.ª‹Æ(UI$)³65°Æ(UI$)±90§1804¯ŽX´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž^»Žk¾UI$²"":Ž|, ** MENU **†.™"“"£1™" ÍENU"Ò6™" --------------------------------------"ö;: ™" 1. NOMENCLATURE-™" 1630 ÍADISON ÓTREET/™" ÅVANSTON, ÉLLINOIS 602028835F UH²1:850t": ™" ÔHIS PROGRAM IS AN EXERCISE" $: ™" IN NAMING FORMULAS AND NAMES."Ì&: ™" ÔHE QUESTIONING WILL CONTINUE"ú(: ™" UNTIL -(UI$)³65°Æ(UI$)±90§180¯Ž8´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž>»ŽK¾UI$²"":Ž\, ** MENU **f.™"“"ƒ1™" ÍENU"²6™" --------------------------------------"Ý;™" 1. BEGIN NUCLEAR REACTOR" @™" 2. STUD-OMAN ÎUMERAL METHOD."#Å™" EG. IRON ÉÉ OXIDE"OÆ™" AND NOT FERROUS OXIDE."zÊ™" ÒEMEMBER THAT ACIDS MUST INCLUDE"¤Ì™" (AQ) AFTER THE FORMULA. ÈYDRO-"ÎΙ" CHLORIC ACID IS ÈÃL(AQ) AND NOT"âЙ" JUST ÈÃL."îå: .EMENTS IN THIS"d: ™" PROGRAM MAY BE CHANGED SLIGHTLY"Kf: ™" (THE ORDER IS EXTREMLY IMPORTANT!)."wh: ™" ÏNE NAME MAY BE EXCHANGED FOR" j: ™" ANOTHER AS LONG AS ONLY"THE"Ël: ™" VALUES BETWEEN THE COMMAS ARE"ân: ™" CHAN- @™" 2. STUDENT INSTRUCTIONS"J E™" 3. TEACHER INSTRUCTIONS"w J™" 4. MODIFICATION OF PROGRAM"“ O™" 5. QUIT" T™" --------------------------------------"ó Y™" PRESS NUMBER KEY (1-5) THEN ";.™õ™"LOAD";Ç(34);TT$;Ç(34);",8"û¢™§™¬™ ±™¶™ "RUN"%À™ Ç(19)0Ê—209,2<Ô—939,13HÞ—940,13Nç€yè‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **…é™"“";:Œ©üCP$²""º: ™"“":875à : Œí I ² 1 . ô ** TEACHER INSTRUCTIONS ** õ™"“"> öUP²0:UG$²"ÔEACHER ÉNST":UH²1:850l ÷™" ÔO THE BEST OF OUR KNOWLEDGE,"• ø™" THIS PROGRAM IS IN THE PUBLIC"Á ù™" DOMAIN. ÉF THIS IS NOT THE CASE"Þ ú™" PLEASE CONTACT:"û™" Ã.GED."p: ™" ÉF YOU WISH TO ADD A NEW NAME,";r: ™" THEN THE ÆÏÒ-ÎÅØÔ LOOP MUST BE"jt: ™" CHANGED AND THE EXACT FORMAT MUST"’v: ™" BE FOLLOWED. (BE CAREFUL!)ž”: 835¤²:ª»ŽÊ  ** T I T L E P A G E **×"™"“";í.SOFTWARE: ** COMMODORE LOGO **F;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0h<¡A$:‹A$³±" "§I²Iª1:‹I³250§828Œ>T1$²"":T2$²"":T3$²"":T4$²"":I²0•@‰300±C ** SPACE BAR PRESS **æH™È(UD$,24);"PRESS SPACE BAR TO CONT. ìR²»(«Å(TI$)):BL$²" ">öT1$²" ÐÅÔ ÎÕÃÌÅÁÒ ÐÏ×ÅÒ ÐÌÁÎÔ"dT2$²" ÓÔÁÔÕÓ ÒÅÐÏÒÔ, ÄÁÙ"š ™"“"T1$:™¦7)" ÓÔÅÐÈÅÎ Ò. ÂÅÒÇÇÒÅÎ":Z4²7:4480™¦5)"AS MODIFIED BY THE STAFF OF"ú™" ÂÒÉÄÇÅ×ÁÔÅÒ. ¤ 100:‡ N$(I),F$(I):F%(I)²0:‚ I²1¤21:‡C$(I):CF%(I)²0:‚9.AT%²0:C%²0:CC%²0:A²0:A%²0:B²0:B%²0:TC%²0:C81750fBB%²µ(2¬»(1)ª1): NAME OR FORM.ŠLCD²12:TR²0:A1$²"":A2$²"":A3$²""­VA%²µ(A¬»(1)ªB):‹F%(A%)²1§1110Ï`F%(A%)²1:F1²F1ª1:‹F1³10§1140. OMMODORE ÂUSINESS ÍACHINES"+ü™" 3370 ÐHARMACY ÁVE.Oý™" ÁGINCOURT, ÏNTARIO"qþ™" ÃANADA Í1× 2Ë4"‘ÿ™" (416) 499-4292"«UP²1: 835:UH²1: 850×™" ÐROGRAM ÎAME: ÎUCLEAR ÒEACTORù™" ×RITTEN. $I²1¤38:™"¦’";:‚&I²1¤22:™"¦’";:‚(I²1¤37:™"¦’";:‚5*I²1¤22:™"‘¦’";:‚Z,™"© ’|.™" ’  ’©0™" ’ £ß»2™"ß ’ã4™"C O M M . INUE’"ûJZZ²0¤9:¡ZZ$:‚ZZL¡UI$:‹UI$³±" "§844NŽ8R ** PAGE DESIGN ROUTINE **DTUP²UPª1nW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)\™" --------------------------------------"¬`‹UH³±0§870àa™È(UD$,24);È(UP$,7);"QUIT - PRESS Q T1$²"":T2$²"":T3$²"":T4$²"":I²0Ç@‰300ãC ** SPACE.>"ñfUH²0:™"":Žk ** PLEASE WAIT REMARK **Fp™È(UD$,24);" ONE MOMENT PLEASE... "LuŽo„ -- LOAD AND RUN MENU PROGRAMŠ‰TT$²"0:SHIFT/RUN MENU"–Ž™Ç(147)œ“™¢˜™Ã™"LOAD";Ç(34);TT$;Ç(34);",8"É¢™Ï§™Õ¬™Û±™.G A REACTOR MELTDOWN.":4480ZZ5²1¤7:™£18ªTB)"‘MELTDOWN’":Z6²1¤50:‚Z6Md™£18ªTB)"‘MELTDOWN":Z6²1¤50:‚Z6,Z5:4490Wn‰2050‘‚UH²1:850:™"ÔHE CONTROL RODS’ ADJUST THE AMOUNT OF"ÃŒ™"HEAT PRODUCED BY THE REACTOR.":Z4²11:4480ð–™"ÔHE PR/--------------------------"þ«: ™È(CP$,7)" ";°I²1 ¤ Ã(DN$)Aº‹Æ(Ê(DN$,I,1))±48 ¯ Æ(Ê(DN$,I,1))³58 § 1230YÄ™Ê(DN$,I,1);:‰1240rΙ"";Ê(DN$,I,1);"‘";xØ‚ŠâI²1¤10:¡G$:‚©ç: ™È(CP$,CD)" ";:—UC,96¾ì¡G$:‹G$²""§1260Ñö‹Æ(G$)². 835:UH²1: 850™" ÉF YOU WANT TO SUGGESTI™" ADDITIONAL EDUCATIONAL PROGRAMSq™" TO BE WRITTEN FOR THE Â128"™" PLEASE CONTACT"­™" ÍARILYN ÇARDNERÑ™" 1630 ÍADISON ÓTREETú™" ÅVAN. BAR PRESS **H™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"-JZZ²0¤9:¡ZZ$:‚ZZDL¡UI$:‹UI$³±" "§844JNŽjR ** PAGE DESIGN ROUTINE **vTUP²UPª1 W™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)Ï\™" --------------------------------------"Þ`.継 "RUN"óÀ™ Ç(19)þÊ—209,2 Ô—939,13Þ—940,13ç€Gè‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **Sé™"“";:ŒxL NUCLEAR POWER PLANT SIMULATION§V****POKE59467,16:POKE59466,15:POKE59464,0¾` FOR PET COMPUTERÈj‰2122Î~:ˆ BASED.IMARY COOLANT’ TRANSFERS THIS" ™"HEAT TO THE HEAT EXCHANGER.":4480Lª™"ÔHE SECONDARY COOLANT’ PICKS UP THE HEAT"†´™"FROM THE HEAT EXCHANGER";:4480:™", AND TRANSFERS"»¾™"IT TO THE TURBINE’";:4480:™", WHICH DRIVES"õÈ™"THE ELECTRIC / WHEN OTHER SYSTEMS"ú™"FAIL.":4480:™"ÕNLIKE THE OTHER COOLANTS,"F™"EMERGENCY COOLANT IS NOT RECYCLED.":4480r™"ÔHIS MEANS YOUR SUPPLY OF EMERGENCY"Ÿ™"COOLANT IS LIMITEF.":4480:835:Z4²13×"UH²1: 850:™"ÁN INCREASED FLOW OF PRIMA.STON, ÉLLINOIS 60202835 N:WŽ5X ** PROGRAM MODIFICATION INST **>Y™"“"c]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850l”835r²:x»Ž˜  ** T I T L E P A G E **¥"™"“";»$I²1¤38:™"¦’";:‚Ó&I²1¤22:™"¦’";:‚ë(I²1¤37:™".‹UH³±0§870a™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "#fUH²0:™"":ŽBk ** PLEASE WAIT REMARK **xp™È(UD$,24);" ONE MOMENT PLEASE... "~uŽ¡„ -- LOAD AND RUN MENU PROGRAM¼‰TT$²"0:SHIFT/RUN MENU"ÈŽ™Ç(147)Γ™Ô˜. ã™" ÓUCCESSFUL OPERATION DEPENDS ON": ä™" GETTING A BALANCE";:4480w å™", BETWEEN THE HIGH":™" TEMPERATURES NEEDED FOR POWER"± æ™" GENERATION";:4480:™" AND THE TEMPERATURE LIMITS"Ó ç™" OF THE MACHINERY.":4480:â é835:1410è ê:î óŽ. ON S. R. BERGGREN, CREATIVE COMPUTING DECEMBER 1980 PAGE 128 FF!’:@œ REVISED 23 DECEMBER 1980J¦‰1260q°B$²"":™"";±™£24ªTB);œºUS$²"?+0123456789H":UL²3ÁÄ™"(H-HELP) ";: 35:‹UR$²"?"§1240ÌÎB$²UR$ÒØ:ØâŽ.GENERATOR.";:4480:™" ÔHE SECONDARY"-Ò™"COOLANT THEN GOES TO THE COOLING TOWER’,":4480eÜ™"AND THEN BACK TO THE HEAT EXCHANGER.":4480:835 æUH²1: 850:™"ÔHE EMERGENCY COOLANV’ IS USED TO HELP"âð™"SHUT DOWN THE REACTOR";:Z4²11:4480:™".¦’";:‚*I²1¤22:™"‘¦’";:‚(,™"© ’J.™" ’  ’©k0™" ’ £ß‰2™"ß ’±4™"C O M M O D O R EÔ6™"EDUCATIONALó8™"/RY COOLANT" ,™"WILL LOWER THE REACTOR CORE TEMPERATURE":448076™"AND WILL RAISE THE HEAT EXCHANGER"R@™"TEMPERATURE.":4480‚J™"ÁN INCREASED FLOW OF SECONDARY COOLANT"¿T™"WILL LOWER THE HEAT EXCHANGER":™"TEMPERATURE";:4480ù^™", AN/POUNDS WITH RADICALS"ì%: ™" 2. ACIDS"&: ™" 3. OUS-IC COMPOUNDS"6&!: ™" 4. MIXTURE OF ALL"R&&: ™" 5. QUIT"ƒ&0: ™" -------------------------------------"°&5: ™" PRESS A NUMBER KEY (1 - 5) ";Ú&:: UL/UT 100 TO 150"#€™"DAYS";:4480:™", DEPENDING ON HOW MUCH ENERGY"*#Š™"IS PRODUCED EACH DAY.":4480T#”™"×HEN THE FUEL IS EXHAUSTED, YOUR"‘#ž™"PERFORMANCE WILL BE SUMMARIZED.":4480:835:UH²1:850Ô#¨™"ÉF YOU WANT TO REPAIR DAMAGE OR REPLACE/A1$,Ã(A1$)«1):A2$²È(A2$,Ã(A2$)«1):A3$²È(A3$,Ã(A3$)«1)!d‰1310.!nAT%²AT%ª1:TR²TRª1:‹ A3$²"STOP"§1070H!sUR$²A3$:US$²"***":85t!u: ‹ A3$²"H"§A1$²"":A2$²"":A3$²"":‰1250‡!x‹A3$²DF$§1750!‚CC%²0:‹TR±1§1450Ú!Œ™È(CP$,CD);"/ ER É CHLORIDE","ÃUÃL"à+^ ƒ"SODIUM IODIDE","ÎAÉ"ÿ+h ƒ"POTASSIUM FLUORIDE","ËÆ",r ƒ"MAGNESIUM HYDRIDE","ÍGÈ2"=,| ƒ"SULPHUR ÖÉ OXIDE","ÓÏ3"`,† ƒ"PHOSPHORUS ÉÉÉ IODIDE","ÐÉ3"‚, ƒ"NITROGEN ÉÉÉ HYDRIDE","ÎÈ3" ,š ƒ"LITHIUM NITRIDE","ÌI3Î"¿,¤ ƒ"CALCIUM/ D WILL INCREASE THE":™"POWER GENERATED";:4480h™", BUT WILL RAISE THE"Ir™"COOLING TOWER TEMPERATURE.":4480:835:Z4²13~®UH²1:850:™"ÅNTER Ä TO SEE REACTOR DIAGRAM."¨¸™"ÅNTER É FOR WORKING INSTRUCTIONS."Ê™"ÅNTER Í TO RETURN TO MEN/ ²1:US$²"Q12345":35:‹UR$²"Q"§300æ&?: ™"“"'D: ‘Å(UR$)‰1920,1930,1940,1950,1970'€A²31:B²48:Ž.'ŠA²22:B²79:ŽA'”A²20:B²1:‰2150Q'žA²79:B²22:Ž\'²‰2210g'\‰1820•'f™"“ ÆOR THIS DRILL ONLY, YOU MUST"À'p™" USE THE OUS-IC METHOD OF / ":™"COOLANT";:Z4²11$²4480:™", BRING THE REACTOR TEMPERATURE"5$¼™"DOWN BELOW 100";:4480:™", AND SHUT OFF THE"g$Æ™"COOLANT FLOWS.";:4480:™" ÔHIS WILL CAUSE"˜$Й"AN AUTOMATIC MAINTENANCE SHUTDOWN.":4480Ñ$Ú™"ÒEPAIRS WILL BE MADE";:4480:™/ ÎO, TRY AGAIN."ó!–A1$²"":A2$²"":A3$²""" CD²15:‰1180<"ª™È(CP$,CD)"ÓTILL WRONG..."X"´™" ÔHE ANSWER IS ";j"¾I²1 ¤ Ã(DF$)›"È‹Æ(Ê(DF$,I,1))±48 ¯ Æ(Ê(DF$,I,1))³58 § 1500³"Ò™Ê(DF$,I,1);:‰1510Ê"Ü™""Ê(DF$,/ FLUORIDE","ÃAÆ2"Ý,® ƒ"CALCIUM SULPHIDE","ÃAÓ"ø,¸ ƒ"CESIUM IODIDE","ÃSÉ"- ƒ"MANGANESE ÉÖ OXIDE","ÍNÏ2"4-Ì ƒ"ZINC HYDRIDE","ÚNÈ2"U-Ö ƒ"ARSENIC Ö BROMIDE","ÁSÂR5"q-à ƒ"CARBON ÉÉ OXIDE","ÃÏ"”-ê ƒ"NICKEL ÉÉ PHOSPHIDE","ÎI3Ð2"³-ô ƒ"SILVER PHOSPHIDE"/U" Ì™""£13ªTB);:US$²"ÄÉÍDIM":UL²1:35:A$²Ç(Æ(UR$)¯127) ΋A$²"D"§4510:‰1710( Ö‹A$²"M"§Žb êUH²1:850:™"ÔHE CONTROLS ARE OPERATED BY TYPING IN"Ÿ ô™"THE DESIRED CONTROL ROD SETTING";:Z4²13:4480:™" AND"ß þ™"FLOW RATES.":4480:™"ÕSE VALU/NAMING."ï'z™" EG: FERROUS IODIDE OR CUPRIC BROMIDEø'„835þ'˜Ž.(¢™"“ ×ELL THANKS FOR THE PLEASURE OF"F(¬™" YOUR COMPANY."O(¶835X(À‰300x(F ƒ"FERROUS CHLORIDE","ÆEÃL2"–(P ƒ"FERRIC BROMIDE","ÆEÂR3"¸(Z ƒ"PLUMBIC NITRATE","ÐB(ÎÏ3)/", AND ALL COOLANT"ô$ä™"WILL BE REPLENISHED.":4480 %î™"ÔHE GREATER THE DAMAGE, THE LONGER"J%ø™"THE REPAIRS WILL TAKE.":4480:835j%™"“"£13ªTB)"×ÁÒÎÉÎÇ:"Ž% ™£7ªTB)"ÔÈÉÓ ÐÏ×ÅÒ ÐÌÁÎÔ ÈÁÓ"Ç%™£3ªTB)"ÎÏ ÁÕÔÏÍÁÔÉà ÓÁÆÅÔÙ ÄÅÖÉÃÅÓ!!":/I,1)"‘";Ð"æ‚Ù"ð835ä"‰1090ü"TC%²TC%ª1:CC%²CC%ª1#‹CC%²10§1650 #"‹CC%²20§17002#,‹CC%²25§2250Y#6I²µ(21¬»(Å(TI$))ª1):‹CF%(I)²1§1590{#@CF%(I)²1:CC²CCª1:‹CC³15§1620—#JL²1¤21:CF%(L)²0:‚:CC²0°#T™È(CP$,21)" "C$(I)¹#^835Ä#h‰1/,"ÁG3Ð"Ñ-þ ƒ"MERCURY É IODIDE","ÈGÉ"ò- ƒ"MERCURY ÉÉ SULPHIDE","ÈGÓ". ƒ"BARIUM CHLORIDE","ÂAÃL2"8. ƒ"MAGNESIUM PHOSPHATE","ÍG3(ÐÏ4)2"Z.& ƒ"IRON ÉÉÉ PHOSPHITE","ÆEÐÏ3".0 ƒ"LEAD ÉÖ PERCHLORATE","ÐB(ÃLÏ4)4"¡.: ƒ"LEAD ÉÉ SULPHATE","ÐBÓÏ4"Å.D ƒ"LE/ES FROM 0 TO 100.";:4480!™"ÉF A ? IS":™"ENTERED, THE PREVIOUS SETTINGS WILL"8!™"REMAIN UNCHANGED.":4480c!&™"×HEN THE DESIRED ENTRIES HAVE BEEN"!0™"MADE, THE NEXT DAY'S CONDITIONS WILL"¼!:™"BE CALCULATED.":4480:835:UH²1:850ì!D™"/4"Ö(d ƒ"PLUMBOUS IODIDE","ÐBÉ2"ò(n ƒ"FERRIC OXIDE","ÆE2Ï3")x ƒ "CUPRIC SULPHATE","ÃUÓÏ4"1)‚ ƒ "CUPROUS NITRIDE","ÃU3Î"Q)Œ ƒ"STANNOUS FLUORIDE","ÓNÆ2"t)– ƒ"STANNIC HYDROXIDE","ÓN(ÏÈ)4"•)  ƒ"MERCURIC CHLORIDE","ÈGÃL2"³)ª ƒ"MERCUROUS OXIDE","ÈG2Ï"0Z4²13:4480ü% ™"ÔHE OPERATOR";:Z4²4:4480:™", (YOU)";:4480&*™", IS RESPONSIBLE"A&4™"FOR SAFE OPERATION OF ALL EQUIPMENT."R&>4480:835:Žb&H INITIATEh&J:r&R3580…&\RH²0:RL²0:TT²0–&fDAY%²0:D4%²0¶&pQP%²1«(»(2)±.57)«(»(2)±.95)Ö&z/090÷#r™"“ ×Ï×!!! 10 IN A ROW. ÔHAT'S GREAT."%$|™" ÁRE YOU SURE THAT WE'RE NOT RELATED?P$†™" É SURE LIKE THE WAY YOUR CIRCUITS_$™" WORK.n$š835:‰1090$¤™"“ ÎOW THAT'S 20 IN A ROW WITHOUT"Ç$®™" A SINGLE MISTAKE. ÁRE /AD ÉÉ CHLORITE","ÐB(ÃLÏ2)2"ç.N ƒ"POTASSIUM CHLORATE","ËÃLÏ3"/X ƒ"LITHIUM SULPHITE","ÌI2ÓÏ3"./b ƒ"COPPER ÉÉ CHLORATE","ÃU(ÃLÏ3)2"Q/l ƒ"SILVER HYPOCHLORITE","ÁGÃLÏ"q/v ƒ"ZINC PERSULPHATE","ÚNÓÏ5"–/€ ƒ"ZINC PERMANGANATE","ÚN(ÍNÏ4)2"·/Š ƒ"CALCIUM CYA/20§1360ü‹Æ(G$)²13¯Ã(A3$)±²1§—UC,8:™" ";:‰1390$: ‹ Ã(A3$)²±22 §—UC,8:™" ";:‰1260e ‹Æ(G$)±48 ¯ Æ(G$)³58§A1$²A1$ª" ":A2$²A2$ªG$:A3$²A3$ªG$:‰1310ˆ : ‹ Æ(G$)±64 ¯ Æ(G$)³91 §1302¨: ‹ G$²"(" ° G$²")" § 1300Í: ‹ Æ(G$)±192 ¯ Æ(G$)³219 /Ô)´ ƒ"PHOSPHORIC BROMIDE","ÐÂR5"ó)¾ ƒ"ANTIMONIC IODIDE","ÓBÉ5"*È ƒ"CUPRIC NITRITE","ÃU(ÎÏ2)2"3*Ò ƒ"FERROUS NITRIDE","ÆE3Î2"R*Ü ƒ"PLUMBOUS SULPHIDE","ÐBÓ"v*æ ƒ"PLUMBIC CHLORATE","ÐB(ÃLÏ3)4"*ð ƒ"CUPRIC OXIDE","ÃUÏ"°*ú ƒ"STANNIC CHLORIDE","ÓNÃL4"Ì/ÔHE REACTOR CAN BE KEPT OPERATING UNTIL"'"N™"THE REACTOR FUEL IS EXHAUSTED";:Z4²13:4480:™", OR"N"X™"UNTIL A MELTDOWN OCCURS.":4480|"bZ5²1¤7:™£8ªTB)"‘MELTDOWN’":Z6²1¤50:‚Z6£"l™£8ªTB)"‘MELTDOWN":Z6²1¤50:‚Z6,Z5Ð"v™"ÔHE FUEL WILL LAST ABO/YOU SURE"ó$¸™" THAT YOU'RE NOT CHEATING?? ÍAYBE" %™" YOU'RE JUST DOING THE EASY ONES!!!"/%Ì835:‰1090C%Ö-----MENU-----S%àˆ Z ² 0:W²0s%: ™"“ MENU"¤% : ™" -------------------------------------"Ñ%: ™" 1. COM0NIDE","ÃA(ÃÎ)2"Ø/” ƒ"CALCIUM NITRATE","ÃA(ÎÏ3)2ù/ž ƒ"CALCIUM NITRITE","ÃA(ÎÏ2)20¨ ƒ"BARIUM THIOSULPHATE","ÂAÓ2Ï3"B0² ƒ"LEAD ÉÖ HYPOBROMITE","ÐB(ÂRÏ)4`0¼ ƒ"SILVER NITRATE","ÁGÎÏ3"‡0Æ ƒ"MAGNESIUM PHOSPHATE","ÍG3(ÐÏ4)2"¨0Ð ƒ"AMMONIUM CHLORIDE","ÎÈ4Ã/§1300ä: ‹ G$²" " § 1300ñ: ‰1260 : A1$²A1$ªG$:A2$²A2$ª" ":A3$²A3$ªG$M —UC,8:™" ":™È(CP$,CD)" "v (™" "… 2™"‘ "A2$– <™"‘‘ "A1$;§ F—UC,96:‰1260» P‹Ã(A1$)²0§1310û ZA1$²È(/* ƒ"FERRIC IODIDE","ÆEÉ3"ð* ƒ"STANNIC CARBONATE","ÓN(ÃÏ3)2" + ƒ"SODIUM OXIDE","ÎA2Ï"-+" ƒ"MAGNESIUM CHLORIDE","ÍGÃL2"J+, ƒ"IRON ÉÉ IODIDE","ÆEÉ2"k+6 ƒ"IRON ÉÉÉ SULPHIDE","ÆE2Ó3"†+@ ƒ"LEAD ÉÉ OXIDE","ÐBÏ"¥+J ƒ"LEAD ÉÖ NITRIDE","ÐB3Î4"Å+T ƒ"COPP00°XT%±500°CT%±300°GZ%±2000§2290÷'À‹GZ%³1000¯(DAY%«D4%±8)§2290(Ê‹EV%³200°PV%³100°SV%³100§2290;(Ô‹RD%±3°PD%±4°SD%±4°ED%±2§2290](Þ‹PB%±0°SB%±0°XB%±0°GB%±0§2290g(è‰2700p(ò™T1$(ü™T2$;DAY%""˜( ™"×ÁÒÎÉÎÇÓ:":SW²1ª( ‹RT%³800§2350ñ( ™" ÒE0L"Ê0Ú ƒ"AMMONIUM HYDROXIDE","ÎÈ4ÏÈ"ï0ä ƒ"AMMONIUM SULPHITE","(ÎÈ4)2ÓÏ3"1î ƒ"LITHIUM CARBONATE","ÌI2ÃÏ3"11ø ƒ"LITHIUM BROMITE","ÌIÂRÏ2"T1 ƒ"STRONTIUM IODATE","ÓR(ÉÏ3)2"w1 ƒ"POTASSIUM CHROMATE","Ë2ÃRÏ4"˜1 ƒ"POTASSIUM HYDROXIDE","ËÏÈ"¶1 ƒ"ZINC 0¶-‚ 4490Ó-Œ ™"“";"DAY"T1$;:™T2$;DAY%.– ‹RD%±5§™" ÍÅÌÔÄÏ×Î!’ ÍÅÌÔÄÏ×Î!’ ÍÅÌÔÄÏ×Î!’":‰38109.  ™"££££££££££‘ÉÎÄÉÃÁÔÏÒÓ"c.ª ™£12ªTB)"‘ÃONTROL ROD POSITION:"A%"%"“.« ™"¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤"Â.¬ ™"¥ RE SMART, ARE YOU CUTE TOO?"É6~ƒ "×ELL DONE!"á6ˆƒ "ÙOUSE DID GOOD!"7’ BY R.W.DRAY RR#2 PETERBOROUGH ONT. K9J 6X3 1981]5.ƒ "ÔHAT IS CORRECT!","ÇO BABY GO!","ÁNOTHER GREAT ANSWER#"›58ƒ "ÒIGHT ON BABY!","ÙUP!","ÂRAINS AND BEAUTY...×Ï×!","ÏË"0 §"å2h ™"¥ ÐRIMARY"£13ªTB)"§"PV%£20ªTB)"§"PD%"Ì/DAY"£32ªTB)"§"PF%ö2i ™£38ªTB)"‘§"73r ™"¥ ÓECONDARY"£13ªTB)"§"SV%£20ªTB)"§"SD%"Ì/DAY"£32ªTB)"§"SF%H3s ™£38ªTB)"‘§"w3t ™"£££££££££££££££££££££££££££££££££££££££"ª3| ‹(100«RL)³5§™"ÒEACTOR FUEL EXHAUS0 ACTOR OVERHEATED":RD%²RD%ª1«(RT%±850)«(RT%±900)«2¬(RT%±950))$ PD%²PD%ª1:ED%²ED%ª1«(RT%±850):SW²2*). ‹XT%³500§2380N)8 ™" ÈEAT EXCHANGER OVERHEATED")B XD%²XD%ª1«(XT%±600):PD%²PD%ª1:SD%²SD%ª1:SW²2’)L ‹GZ%³2000§2410¯)V ™" ÔURBINE OVERLOADED"×)` 0 IODITE","ÚN(ÉÏ2)2"Ø1* ƒ"HYDROGEN PHOSPHATE","È3ÐÏ4"ú14 ƒ"HYDROGEN ARSENATE","È3ÁSÏ4"2> ƒ"ZINC HYPOIODITE","ÚN(ÉÏ)2"D2H ƒ"ANTIMONY ÉÉÉ SULPHITE","ÓB2(ÓÏ3)3"d2R ƒ"CHLORIC ACID","ÈÃLÏ3(AQ)"…2\ ƒ"CHLOROUS ACID","ÈÃLÏ2(AQ)"¨2f ƒ"PERCHLORIC ACID","ÈÃLÏ0 § § §"ñ.´ ™"¥ÔEMPERATURES: ÍÁØ § ÃÈÁÎÇÅ § ÎÏק" /µ ™"¥ § § §"?/¾ ™"¥ ÒEACTOR 800 §"r/È ™£25ªTB)"‘"RT%«T7%:™£32ªTB)"‘§":™£33ªTB)"‘"RT%ƒ/É ™£38ªTB)"‘§"/Ò T7%²RT%®/Ü ™"¥ÈEAT EXCHANGER 0 PF%±95)¬(»(2)±.95)«(4000¬»(2)³DAY%):‰3280ø7¨ PD%²PD%ª(PF%±55)¬(»(2)±.9995)ª(PF%±80)¬(»(2)±.993)/8² PD%²PD%ª(PF%±92)¬(»(2)±.94)«(2700¬»(2)³DAY%):‰3280e8¼ PD%²PD%ª(PF%±40)¬(»(2)±.999)ª(PF%±70)¬(»(2)±.985)–8Æ PD%²PD%ª(PF%±87)¬(»(2)±.93)«(1400¬»(2)³DAY%)0TED":‰4040É3† GRET NEW CONTROL VALUESÜ3 A2%²A1%:A1%²A%û3š POKE216,23:PRINT:PRINTBL$)4¤ —U4,22:™:™"ÃONTROL ROD POSITION? ";:120094® ‹B$²""§3010a4¸ A%²Å(B$):A%²A%ª(100«A%)¬(«(A%±100))‚4 POKE216,23:PRINT:PRINTBL$¾4Ì —U4,22:™:™"ÅMERGENCY CO0TD%²TD%ª1«(GZ%±2500):SD%²SD%ª1:SW²2*j ‹CT%±300§™" ÃOOLING TOWER OVERHEATED":SD%²SD%ª1:SW²2<*t ‹GZ%³1000§™" ÐOWER OUTPUT LOW":SW²2j*~ ‹EV%³100§™" ÅMERGENCY COOLANT LOW":SW²2 *ˆ ‹PV%³100§™" ÐRIMARY COOLANT LOW":PD%²PD%ª1:SW²2Ø*’ ‹SV%³100§™" 04(AQ)"É2p ƒ"HYPOIODOUS ACID","ÈÉÏ(AQ)"ë2z ƒ"HYDROBROMIC ACID","ÈÂR(AQ)" 3„ ƒ"HYDROCYANIC ACID","ÈÃÎ(AQ)"/3Ž ƒ"SULPHURIC ACID","È2ÓÏ4(AQ)"N3˜ ƒ"NITROUS ACID","ÈÎÏ2(AQ)"n3¢ ƒ"ACETIC ACID","ÃÈ3ÃÏÏÈ(AQ)Œ3¬ ƒ"NITRIC ACID","ÈÎÏ3(AQ)"°3¶ ƒ"PHOSPHOROUS A0500 §"á/æ ™£25ªTB)"‘"XT%«T8%:™£32ªTB)"‘§":™£33ªTB)"‘"XT%ò/ç ™£38ªTB)"‘§"þ/ð T8%²XT%0ú ™"¥ ÃOOLING TOWER 300 §"P0 ™£25ªTB)"‘"CT%«T9%:™£32ªTB)"‘§":™£33ªTB)"‘"CT%a0 ™£38ªTB)"‘§"0 ™"£££££££££££££££££££££££££££££££££££££££"œ0 T9%²CT%Ê0 ™" 0®8Ð ‘QS%‰3290,3310,3330å8Ú SD%²SD%ª(SF%±75)¬(»(2)±.9997)ª(SF%±93)¬(»(2)±.995)9ä SD%²SD%ª(SF%±97)¬(»(2)±.94)«(3000¬»(2)³DAY%):‰3350R9î SD%²SD%ª(SF%±60)¬(»(2)±.9992)ª(SF%±85)¬(»(2)±.99)‰9ø SD%²SD%ª(SF%±94)¬(»(2)±.92)«(2400¬»(2)³DAY%):‰3350¿9 SD%²SD0OLANT FLOW ? ";:1200Î4Ö ‹B$²""§3050û4à EF%²Å(B$):EF%²EF%ª(100«EF%)¬(«(EF%±100))5ê POKE216,23:PRINT:PRINTBL$Y5ô —U4,22:™:™"ÐRIMARY COOLANT FLOW? ";:1200i5þ ‹B$²""§3090–5 PF%²Å(B$):PF%²PF%ª(100«PF%)¬(«(PF%±100))·5 0 ÓECONDARY COOLANT LOW":SD%²SD%ª1:SW²2ê*œ ‘SW‰2470,2480ý*¦ ™£11ªTB)"ÎONE"+° ™"ÄÁÍÁÇÅ:":SW²1;+º ‹RD%±3§™"ÒEACTOR CORE DAMAGED":SW²2K+Ä ‹PD%³5§2530t+Î ™"ÐRIMARY COOLANT LEAK:";PD%;"Ì/DAY"œ+Ø PV%²(PV%«PD%)¬(«((PV%«PD%)±0)):SW²2¬+â ‹SD%³5§2560×+ì0CID","È3ÐÏ3(AQ)"Ñ3À ƒ"CARBONIC ACID","È2ÃÏ3(AQ)"ó3Ê ƒ"HYDROFLUORIC ACID","ÈÆ(AQ)"4Ô ƒ"HYDROSULPHURIC ACID","È2Ó(AQ)";4Þ ƒ"SULPHUROUS ACID","È2ÓÏ3(AQ)"\4è ƒ"HYPOIODOUS ACID","ÈÉÏ(AQ)"}4ò ƒ"MANGANIC ACID","ÈÍNÏ3(AQ)"Ÿ4ü ƒ"PERBROMIC ACID","ÈÂRÏ4(AQ)0ÐOWER OUTPUT (MAX. 2000): "GZ%"K×"ë0" KW%²TT­DAY%:VE²µ(24¬TT¬.055)1, VE$²Ä(VE):‹VE³10000§VE$²"$"ªVE$:‰2880>16 VE$²"$"ªÈ(VE$,Ã(VE$)«3)ª" "ªÉ(VE$,3)l1@ ™" ÁVERAGE POWER OUTPUT: "KW%"K×"”1J ™" ÖALUE OF ENERGY PRODUCED: "VE$Ã1R ™"¤¤¤¤¤¤¤¤¤1%ª(SF%±40)¬(»(2)±.9985)ª(SF%±78)¬(»(2)±.98)ï9 SD%²SD%ª(SF%±89)¬(»(2)±.9)«(1800¬»(2)³DAY%): PB%²«(PD%±5): SB%²«(SD%±5)P:* ‹PF%±(100«PD%¬10)¯PB%±0§PF%²(100«PD%¬10)¬(«(100«PD%¬10±0)):4 ‹SF%±(100«SD%¬10)¯SB%±0§SF%²(100«SD%¬10)¬(«(100«SD%¬10±0))Ÿ:0 POKE216,22:PRINT:PRINTBL$ó5 —U4,22:™:™"ÓECONDARY COOLANT FLOW? ";:12006& ‹B$²""§3130060 SF%²Å(B$):SF%²SF%ª(100«SF%)¬(«(SF%±100))X6: ‹PF%²0¯SF%²0¯RH³1¯RT%³100¯A%²0§3150b6D ‰3180z6N 3580:—U4,22:™:™BL$«6X —U4,23:™:™"ÍAINTENANCE SHUT0 ™"ÓECONDARY COOLANT LEAK:";SD%;"Ì/DAY"ÿ+ö SV%²(SV%«SD%)¬(«((SV%«SD%)±0)):SW²2, ‹ED%³3§2590<, ™"ÅMERGENCY COOLNAT LEAK:";2¬ED%;"Ì/DAY"h, EV%²(EV%«2¬ED%)¬(«((EV%«2¬ED%)±0)):SW²2x, ‹PB%²0§2620ž,( ™"ÐRIMARY COOLANT PUMP FAILURE:";Ð,2 ™10¬PD%¬(«(0"¿4ƒ"HYDROIODIC ACID","ÈÉ(AQ)"â4ƒ"HYDROCHLORIC ACID","ÈÃL(AQ)"ÿ4ƒ"IODIC ACID","ÈÉÏ3(AQ)"5$ƒ"BROMIC ACID","ÈÂRÏ3(AQ)"]5.ƒ "ÔHAT IS CORRECT!","ÇO BABY GO!","ÁNOTHER GREAT ANSWER!"›58ƒ "ÒIGHT ON BABY!","ÙUP!","ÂRAINS AND BEAUTY...×Ï×!","ÏË"0QS%²1«(»(2)±.57)«(»(2)±.95)"'„ QP%=QUALIFY OF PRIMARY LOOP WORKMANSHIP, QS%=SAME FOR SECONDARY LOOPf'Ž 1 FOR FIRST-CLASS WORK, 2 FOR SECOND-CLASS, 3 FOR THIRD-CLASSr'˜DMGE%²0‡'¢A%²0:A1%²0:A2%²0¬'¬DAY%²DAY%ª1:™"“";: WRITE REPORT×'¶‹RT%±800¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤"ò1S ™"¥ § § §  §"!2T ™"¥ÃOOLANTS: § ÌÅÖÅ̧ ÌÅÁËÁÇÅ § ÆÌÏק"P2U ™"¥ § § §  §"“2^ ™"¥ ÅMERGENCY"£13ªTB)"§";EV%£20ªTB)"§"ED%"Ì/DAY"£32ªTB)"§"EF%:¤2_ ™£38ªTB)"‘0DOWN:"MD%"DAYS.‘"¼6b I²1¤5000:‚IÑ6l ‹EF%±EV%§EF%²EV%7v DAMAGE ASSESSMENT AND OPERATION CALCULATIONS#7€ EV%²EV%«EF%ª2¬ED%¬(ED%±3)S7Š ‘QP%‰3220,3240,3260: LEAKAGE POSSIBILITIESŠ7” PD%²PD%ª(PF%±65)¬(»(2)±.9998)ª(PF%±90)¬(»(2)±.996)Á7ž PD%²PD%ª(0PD%³10))ª100¬(«(PD%±²10));"%":SW²2à,< ‹SB%²0§2650-F ™"ÓECONDARY COOLANT PUMP FAILURE:";:-P ™10¬SD%¬(«(SD%³10))ª100¬(«(SD%±²10));"%":SW²2d-Z ‹XB%±0§™"ÈEAT EXCHANGER FAILURE":SW²2‡-d ‹GB%±0§™"ÔURBINE FAILURE":SW²2™-n ‘SW‰2680,2690¬-x ™£11ªTB)"ÎONE"0â5Bƒ "ÇOOD SHOW!","ÙOU'RE THE GREATEST!","ÉS THERE NO END TO THIS?!?"6Lƒ "ÎOW YOU'RE COOKING!","ÁRE YOU FREE ÆRI. NIGHT?"T6Vƒ "ÆANTASTIC!","ÎOT BAD ..FOR YOU.","ÙOU'RE TOO MUCH!"r6`ƒ "ÇREAT SHOW!","ÇOODIE!"Ž6jƒ "ÙIPPIE, YOU DID IT!"¶6tƒ "ÙOU'1 ‹XB%±0§XT%²RT%¬.8ª5â;Ž SH²SF%¬(100¬(«(PV%±100))ªPV%¬(«(PV%³²100)))­350¬(XT%«CT%)ö;˜ ‹XB%±0§SH²SH¬.2<¢ GZ%²SH­XT%¬(XT%«CT%)¬2­3*<¬ ‹GZ%±2600§GZ%²2600L<¶ GZ%²GZ%¬(«(GZ%±0))¬(«(GB%²0))v<À CT%²25ª((XT%«25)¬(SH«GZ%)­(SHª1)¬.75)ž<Ê CT%²25¬(«(CT%³²25))1FÌ™"SERIOUS.":‰4320ŸFÖ™"SEVERE."©Fà ENDîFê™"×OULD YOU LIKE TO TRY AGAIN? (Y/N)";:US$²"YN":UL²1:35:A$²UR$Gô‹A$²"Y"§3580:‰2120Gþ™"‘":ŽGB$²""&GI²1¤4.G¡A$BG&‹Æ(A$)³±94§4430OG0‹B$²""§Ž^G:OUT%²Å(B$)dGDŽ~GN‹Æ(A$)²13§:GOT1Î’ ÍÅÌÔÄÏ×Î"ÜA–**IFPY$<>"N"THENFORA=100TO75STEP-1:POKE59464,A:POKE59464,A-20:NEXT:ïA—**POKE59464,0!B ™"‘ ÍÅÌÔÄÏ×Î’ ÍÅÌÔÄÏ×Î ÍÅÌÔÄÏ×Î’")Bª‚Z5IB´A²1¤10:B²1¤150:‚:: :‚\B¾—U4,21:™:‰4320uBÈ EVALUATION OF GAME¢BÒ™"“ ÏVER1"L~™£17ªTB)"¼¬"‘Lˆ™£18ªTB)"¡"¡L’™£18ªTB)"¡"ÃLœ™£16ªTB)"¬¬¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢»"ÞL¦™£16ªTB)"¡"£33ªTB)"¡"ýL°™£16ªTB)"¢¬’¡"£33ªTB)"¡"Mº™£18ªTB)"¡"£33ªTB)"¡"3MÄ™£18ªTB)"¡"£33ªTB)"¡"DMΙ£33ªTB)"¡"UMØ™£33ªTB)"¡"fM♣33ªTB)"¡"Mì™1 HEAT FLOW, L-LIFE, O-OUTPUTQ, T-TEMPERATURE, V-VOLUMEãQ6 OTHER VARIABLES TOT-TOTAL POWER OUTPUT, KW-AVERAGE POWER OUTPUTR@ DAY-DAY OF OPERATION, DMGE-TOTAL EQUIPMENT DAMAGEDRJ PROGRAM DISCRIPTION BY LINE NUMBER^RT 10-220 INTRODUCTIONyR^1 ªCT%¬(«(CT%±25))Å<Ô ‹XB%³1§XB%²(«(XD%±2))¬(«(»(4)±.9))ì<Þ ‹GB%³1§GB%²(«(GD%±4))¬(«(»(4)±.9))ú<è TT²TTªGZ%=ò ‰2220)=ü MAINTENANCE REPAIR SUBROUTINEE=EV%²300:PV%²120:SV%²120e=QP%²1«(»(2)±.57)«(»(2)±.95)…=QS%²1«(»(2)±.57)«(»(2)±.95)—=$RT1 O65535‹GXB$²B$ªA$”Gb™A$;›Gl‚I¡GvŽºG€J6²1¤10:‚:Ž: DELAYÃGŠ835ÉG•ŽêGžZD$²""&H¨UH²1:850:™ZD$"ÔHIS IS THE REACTOR VESSEL ‘"AH²™" ¾ ’¢¢¾ ’»"TH¼™" ¡ ¢¢¢¢» "sHÆZZ²1¤4:™" ¡’¡  ":‚ˆH1 A PERIOD OF"DA%"DAYS, YOU HAVE"ÍBÜ™"PRODUCED AN AVERAGE POWER OUTPUT OF"ÞBæ™""KW%"K×."'CðAK%²1«(KW%±799)«(KW%±899)«(KW%±999)«(KW%±1099)«(KW%±1199)«(KW%±1299)ICúAK%²AK%«(KW%±1399)«(KW%±1499)yC™" ÙOUR AVERAGE POWER PRODUCTION RATE IS"¯C‘A1 £21ªTB)"¬"£33ªTB)"¡"žMö™£21ªTB)"¼¢¢¢¢¢¢¢¢¢¢¢¢"­M4480:835àM ™ZD$"ÔHIS IS THE TURBINE ‘"N™""£17ªTB)"¬¢¢¢¢»"N™£17ªTB)"¼¾¾¾¾¾"1N(™£17ªTB)"¡¾¾¾¾¡"GN2™£17ªTB)"¢¢¢¢»¢"VN<4480:835‰NF™ZD$"ÔHIS IS TH1 225-380 INSTRUCTIONS›Rh 390-455 VARIABLE INITIATIONÈRr 460-850 WRITE REPORT AND ASSESS DAMAGEóR| 900-1165 INPUT NEW CONTROL VARIABLESS† 1170 MAINTENANCE SHUTDOWN EVALUATIONFS 1200-1260 PUMP FAILURE ASSESSMENTrSš 1270-1430 PLANT OPE1%²25:T7%²25©=.XT%²25:T8%²25»=8CT%²25:T9%²25å=BDMGE%²DMGE%ª2¬RD%ªED%ªPD%ªXD%ªSD%ªGD%1>LMD%²5ª3¬(10¬(«(RD%±3))«(ED%±3)«(PD%±3)«(SD%±3)ª2¬PB%ª2¬SB%ª3¬XB%ª3¬GB%)L>VDAY%²DAY%ªMD%:D4%²DAY%V>`RD%²0`>jED%²0j>tPD%²0t>~XD%²0~>ˆSD%²0ˆ>’GD%²0’1Й" ¡¼’ ¬ "œHÚ™" » ’¾"¯Hä™" ¢¢¢¢’¾"ÄHîZ4²11:4480:835öHø™ZD$"ÔHIS IS THE CORE ‘" I™"¬¢¢¢"(I ZZ²1¤3:™"¡ ":‚7I4480:835pI ™ZD$"ÔHIS IS THE EMERGENCY COOLANT ‘"I*1K%‰4120,4130,4140,4150,4160,4170,4190,4200,4220áC™"HORRIBLE! ÆIND A LESS DEMANDING JOB.":‰4240D"™"BAD. ÙOUR AREA HAD":™"FREQUENT BLACKOUTS.":‰4240XD,™"PRETTY BAD. ÙOUR AREA HAD":™"FREQUENT BLACKOUTS.":‰4240‡D6™"WAY BELOW YOUR AREA'S POWER NEE1E ELECTRIC GENERATOR ‘"®NP™""£10ªTB)"¡»»»»»"ÆNZ™£10ªTB)"¡ ’¢"ÜNd™£10ªTB)"¡»»»»»"òNn™£10ªTB)"¼¢¢¢¢¢"OxZ4²11:4480:835:O‚™ZD$"ÔHIS IS THE COOLING TOWER ‘"bOŒ™""£24ªTB)"¡’"£31ªTB)"¡"€O–™1RATING ALGORITHTMS£S¤ 2000-2200 MAINTENANCE SHUTDOWN SUBROUTITNEÃS® 3000-3190 MELTDOWN ENDINGïS¸ 4000-4290 EVALUATITON OF GAME RESULTST 5000-5070 END,TÌ 6000-7060 PLANT DIAGRAM SUBROUTINEDTÖ 9000-9190 REMARKSdTà APPLE NUCLEAR POWER1>œPB%²0œ>¦SB%²0¦>°XB%²0°>ºGB%²0Æ>ÄEF%²0:PF%²0:SF%²0Ð>ÎGZ%²0Ö>ØŽõ>â™"“": MELTDOWN ENDING?ì‹RD%±6‰38802?ö™" ÔHE REACTOR CORE HAS BEEN DESTROYED"Z?™"BY UNCONTROLLED THERMAL RUNAWAY."‡? ™"ÈOWEVER, THE CONTAINMENT BUILDING HAS"1™" ¼’¡"ŽI4™" »’¾"™I>™" ¡"¤IH™" ¡"²IR™" ¼»¬»"ÁI\™" ¡»¬»"ÌIf™" ¡"àIpZZ²1¤3:™" ¼":‚ïIz4480:835'J„™ZD$"ÔHESE ARE THE CONTROL RODS ‘"=JŽ™""£5ªTB)"¡¡"NJ˜™£5ªTB)"¡¡"_J¢™£5ªTB)"¾¾"pJ¬™£5ªTB)"»»"1DS":‰4240¸D@™"NOT GOOD. ÙOUR AREA HAD BROWNOUTS.":‰4240áDJ™"NOT BAD. ÙOUR AREA'S POWER NEEDS"ET™"WERE SUPPLIED - JUST.":‰42401E^™"ADEQUATE. ÙOU COULD DO BETTER.":‰4240bEh™"EXCELLENT! ÐOWER RATES IN YOUR AREA WILL"Er™"NOT NE INCREASED.":1£24ªTB)"¼¼"£30ªTB)"¾’¾"žO ™£25ªTB)"¡’»"£29ªTB)"¬¡"¹Oª™£26ªTB)"¡"£29ªTB)"¡"ÔO´™£26ªTB)"¡"£29ªTB)"¡"ïO¾™£26ªTB)"¡"£29ªTB)"¡" PÈ™£25ªTB)"¬¡"£29ªTB)"¡’»"#PÒ™£25ªTB)" "2PÜ4480:835ePæ™ZD$"ÔHIS IS THE COMPLETE DIAGRAM. ‘"& PLANT€Tê BY STEPHEN R BERGGREN VARIABLE INITIATIONÈRr 460-850 WRITE REPORT AND ASSESS DAMAGEóR| 900-1165 INPUT NEW CONTROL VARIABLESS† 1170 MAINTENANCE SHUTDOWN EVALUATIONFS 1200-1260 PUMP FAILURE ASSESSMENTrSš 1270-1430 PLANT OPE1 ?™"NOT YET RUPTURED."Î?™" ÉNITIATE YOUR EVACUATION PLAN.":‰3960ü?(™" ÔHE REACTOR CORE HAS MELTED DOWN AND"#@2™"PRODUCED A STEAM EXPLOSION. ÔHE"L@<™"CONTANMENT BUILDING HAS RUPVURED."x@F™"LETHAL RADIOACTIVE GASSES AND DEBRIS"@P™"HAVE ES1J¶™£5ªTB)"¾¾"–JÀZ4²11:4480:835ÎJÊ™ZD$"ÔHIS IS THE PRIMARY COOLANT LOOP ‘"æJÔ™""£12ªTB)"¡¾"øJÞ™£12ªTB)"¼¬"K虣13ªTB)"¡"Kò™£13ªTB)"¡"0Kü™£8ªTB)"¢ ¢¢¢¢¢’¡"@K™£15ªTB)"¡"XK™£8ªTB)"¢ ¢¢¢¢¢’¾"gK4480:835ŸK$™ZD$1‰4240¯E|™"NEAR THE MAXIMUM! ÐOWER COSTS IN YOUR"ÔE†™"AREA WILL DROP SIGNIFIGANTLY."ÞE3580FšD%²1«(DM%±10)«(DM%±20)«(DM%±30).F¤™" ÔHE EQUIPMENT DAMAGE SUSTAINED WAS"JF®‘D%‰4280,4290,4300,4310cF¸™"VERY LIGHT.":‰4320zF™"MODERATE.":‰43201> RL²RLªRH­50Ê:H RH²(A%¬30ªA1%¬60ªA2%¬10)­2500¬(100«RL)þ:R PH²PF%¬(100¬(«(PV%±100))ªPV%¬(«(PV%³²100)))­350;\ EH²EF%­200¬(RT%«25)9;f RT%²RT%ªRH«EH«PH«5¬(«(RT%±25))Y;p RT%²25ª(RT%«25)¬(«(RT%±25))Œ;z XT%²((RT%«25)¬PF%ª(CT%«25)¬SF%)­(PF%ªSF%ª1)ª25¤;„1{Pð4480:835:™"“":Ž“Pú VARIABLE PREFIXESÙP A-CONTROL RODS, C-COOLING TOWER, E-EMERGENCY COOLANT, G-TURBINE"Q P-PRIMARY COOLANT, R-REACTOR, S-SECONDARY COOLANT,X-HEAT EXCHANGER:Q VARIABLE SUFFIXESQ" B-BROKEN, D-DAMAGE, F-FLOW RATE, H-1CAPED."³@Z™" ÉNITIATE YOUR EVACUATION AND"â@d™"RADIATION CLEANUP PLANS AND GET MEDICAL"õ@n™"ASSISTANCE."Ax™""PA‚Z5²1¤15:**:IFPY$="Y"THENFORA=99TO75STEP-1:POKE59464,A:POKE59664,A-20:NEXTcAƒ**POKE59464,0“AŒ™"‘ ÍÅÌÔÄÏ×Î ÍÅÌÔÄÏ×1"ÔHIS IS THE HEAT EXCHANGER ‘"½K.™""£14ªTB)"¬¢¢’¡"ÒK8™£14ªTB)"¬’¡"åKB™£14ªTB)"¡¡"úKL™£14ªTB)"¬’¡"LV™£14ªTB)"¢¢¢’¾"$L`Z4²11:4480:835WLj™ZD$"ÔHIS IS THE SECONDARY COOLANT LOOP ‘"oLt™""£17ªTB)"¡¾2>™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000)è†V(32),R(32) UD$²"2 BE WRITTEN FOR THE Â128" ™" PLEASE CONTACT"@™" ÍARILYN ÇARDNERd™" 1630 ÍADISON ÓTREET™" ÅVANSTON, ÉLLINOIS 60202–835¤UH²1:850Ô&™" ÔHIS PROGRAM SIMULATES AN EXPERIMENT"þ'™" WITH PLANTS296ÿ h‰300@ ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **P Œ™"“":‰900[ 875:Ž|  ** STUDENT INSTRUCTIONS **… •™"“"« šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850µ Â1170Î ÃUP²2:UH²1:850:1340ú Ç™" ÔO RETURN TO THE MENU DUR2MENU"Ç(147)õ“™û˜™™"LOAD";Ç(34);TT$;Ç(34);",8""¢™(§™.¬™4±™@¶™ "RUN"LÀ™ Ç(19)WÊ—209,2cÔ—939,13oÞ—940,13u瀠è‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **¬é™"“";:Œ¶$‰1290Ôˆ™"“ PHOSYN"’™:™2 ES. TYPE IN ONLY"‚™" ONE VALUE AFTER EACH QUESTION MARK." ™Hª™" NOTE: RP MEANS 'RATE OF PHOTOSYNTHESIS'"i´™" LIGHT INTENSITY "x¹835:™"“";„¾I²0¤20ÈV(I)²«1–Ò‚§×™"“":ZZ²1¤2²ÜI²1¤5Êá‹ZZ²2¯I²1§835:™"“"ÿæ™:™2 ">UP$²" "ŒUT$²" ÐHOTOSYNTHESIS    ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!***¤800: TITLE SCREEN» ‰300: MENU SCREEN×# +++ INPUT SECTION +++é(UR$²"":UI$²""ù*‹UL²0§UL²802 IN WHICH THE USER CAN((™" CHANGE THE INTENSITY OF THE LIGHTS)™" AND AMOUNT OF THE CARBON DIOXIDE."\*835bN:hWŽŽX ** PROGRAM MODIFICATION INST **—Y™"“"¼]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850Å”835˲:Ñ»Žñ  ** T I T L E 2 ING THE" Ê™" PROGRAM, PRESS "@ Ì™" INSTEAD OF ENTERING DATA."I Ö835O ê:U óŽv ô ** TEACHER INSTRUCTIONS ** õ™"“"¥ öUP²0:UG$²"ÔEACHER ÉNST":UH²1:850Ó ÷™" ÔO THE BEST OF OUR KNOWLEDGE,"ü ø™" THIS PROGRAM IS IN 2 " ÈELLO! ÂY NOW YOU SHOULD KNOW FROM"1œ™" YOUR LECTURES WHAT PHOTOSYNTHESIS IS."b¦™" ÔHIS PROGRAM WILL ENABLE YOU TO CONDUCT";Š°™" EXPERIMENTS WHICH WOULD NOT BE "±º™" PRACTICAL DURING CLASS TIME."ßÄ™" ÓINCE ALL OUR FOOD COMES FROM PLA2" #"(ZZ«1)¬5ªI"(LIGHT INTENSITY) ";4ðUL²2:US$²"0123456789Q":35:W²Å(UR$):‹UR$²"Q"§300C‹W±20§1610Q‹W³0§1610c‹W³±µ(W)§1610n"V(W)²Wš,R(W)²µ(12500¬(1«½(«.222¬V(W)))ª.05)­100·6™"RP="µ(R(W)ª.5)Á@‰1640éJ™:™"  US2-™" ";2¡UI$:‹UI$²""§50>7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85Q<‹UI$²Ç(20)§105e>‹ Ã(UR$)²±UL§50ŠA120: CHECK FOR VALID CHARACTERšFUR$²UR$ªUI$¤K™UI$;¬P‰50²U:¸Z:¾_:ÄdŽÝf ++ CHECK DELETE ++îi‹Ã(UR$)³1§50nUR$²È(U2 P A G E **þ"™"“";$I²1¤38:™"¦’";:‚,&I²1¤22:™"¦’";:‚D(I²1¤37:™"¦’";:‚\*I²1¤22:™"‘¦’";:‚,™"© ’£.™" ’  ’©Ä0™" ’ £ßâ2™"ß ’ 2THE PUBLIC"( ù™" DOMAIN. ÉF THIS IS NOT THE CASE"E ú™" PLEASE CONTACT:"o û™" ÃOMMODORE ÂUSINESS ÍACHINES"’ ü™" 3370 ÐHARMACY ÁVE.¶ ý™" ÁGINCOURT, ÏNTARIO"Ø þ™" ÃANADA Í1× 2Ë4"ø ÿ™" (416)2NTS,"Ι" LET'S FIND OUT HOW CHANGING THE AMOUNT"<Ø™" OF CARBON DIOXIDE OR THE INTENSITY OF"jâ™" LIGHT WILL AFFECT THE PLANT'S RATE OF"™ì™" PHOTOSYNTHESIS, MEASURED IN MICROGRAMS"¾ö™" OF GLUCOSE PRODUCED PER DAY."Ê™:2660ÐŽü ™"“2E ONLY INTEGER VALUES "T™" BETWEEN 0 AND 20. TRY AGAIN!UZ9²1¤1000:‚:V™"‘‘";UP$:™UP$;"‘‘‘‘‘"D^‰1510Lh‚:‚Rr™X|€†™" TABLE, GRAPH OR BOTH (T/G/B)? ";¬‹UL²1:US$²"TGBQ":35:W$²UR$:‹UR$²"Q"§300½‹W$²"T"§1720Õš‹W$²"G"§™"“"2R$,Ã(UR$)«1)s™" ";:‰50?x ++ CHECK FOR VALID CHARACTERS ++Q}‹Ã(US$)²0§150b‚US²1¤Ã(US$)y‡‹UI$²Ê(US$,US,1)§ŽŒ‚Œ‘UI$²"":Ž§– ** STANDARD INPUT **¸˜‹Æ(UI$)²46§ŽÉ›‹UI$²Ç(32)§Žæ ‹Æ(UI$)³48°Æ(UI$)±57§170쥎 ª‹Æ(UI$)24™"C O M M O D O R E-6™"EDUCATIONALL8™"SOFTWAREg: ** COMMODORE LOGO **Ÿ;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0Á<¡A$:‹A$³±" "§I²Iª1:‹I³250§828å>T1$²"":T2$²"":T3$²"":T4$²"":2 499-4292" UP²1: 835:UH²1: 850= ™" ÐROGRAM ÎAME: ÐHOTOSYNTHESISe ™" ×RITTEN ÂY : ÁNDY ÇAMBLE Œ ™" ÕPGRADED ÂY : ÔOM ÆERGUSONµ ™" ÃONVERTED ÂY: ÍARILYN ÇARDNERÜ ™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒ ™" ÉF E2 LET'S BEGIN BY CHANGING THE LIGHT "&™" INTENSITY. YOU WILL VARY THIS BY "T™" SELECTING INTEGER VALUES IN THE RANGE"}(™" OF 0 TO 20 (THE UNITS FOR LIGHT "ª2™" INTENSITY ARE ERGS/SEC/CM2).":‰1390Ö<™:™" ÂY VARYING ONLY ONE FACTOR AT A"2;:‰1820椋W$²"B"§1720ð®‰1670ù¸™"“"™" INTENSITY","PHOTOSYNTHESIS"(Ì25004Ö™:2660>à™"“";Pê‹W$³±"B"§1870_™" LIGHT"n&™" INTEN"x02550‡:2670:™""D™"“"–N:Âb™:™" O.K. NOW LET'S VARY THE AMOUNT OF"ël™" CA2³65°Æ(UI$)±90§180¯Ž3´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž9»ŽF¾UI$²"":ŽW, ** MENU **a.™"“"~1™" ÍENU"­6™" --------------------------------------"Ö;™" 1. BEGIN PHOTOSYNTHESIS @™" 2. STUDENT INS2I²0î@‰300 C ** SPACE BAR PRESS **?H™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"TJXZ²0¤9:¡XZ$:‚XZkL¡UI$:‹UI$³±" "§844qNŽ‘R ** PAGE DESIGN ROUTINE **TUP²UPª1ÇW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)ö\™" -----------------2RRORS ARE NOTED, CONTACT$ ™" ÍARILYN ÇARDNERH ™" 1630 ÍADISON ÓTREETq ™" ÅVANSTON, ÉLLINOIS 60202‹ UP²2: 835:UH²1: 850°™" ÉF YOU WANT TO SUGGESTÜ™" ADDITIONAL EDUCATIONAL PROGRAMS™" TO2F™" TIME, WE ARE CONDUCTING A CONTROLLED"/P™" EXPERIMENT. ×E WILL ASSUME THAT OUR"YZ™" PLANT HAS ALL THE CARBON DIOXIDE,"‡d™" WATER AND CHLOROPHYLL THAT IT NEEDS."iŽ¸n™" YOU SHOULD CHOOSE BETWEEN 5 AND 10"åx™" LIGHT INTENSITY VALU3RBON DIOXIDE IN THE ATMOSPHERE" v™" SURROUNDING OUR PLANT.":™;€™" THIS TIME ASSUME OUR PLANT HAS ALL THE"hŠ™" LIGHT WATER AND CHLOROPHYLL THAT IT "y”™" NEEDS.":™ªž™" SELECT VALUES FOR THE CO2 CONCENTRATION";Ù¨™" TO 2 DECIMAL PLACES ONLY2TRUCTIONS"* E™" 3. TEACHER INSTRUCTIONS"F O™" 4. QUIT"u T™" --------------------------------------"¦ Y™" PRESS NUMBER KEY (1-4) THEN ";Î ^UL²1:US$²"1234":35: INPUT ROUTINEÙ `US$²""ö c‘Å(UR$)1000,400,500,32---------------------"`‹UH³±0§8709a™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "JfUH²0:™"":Žik ** PLEASE WAIT REMARK **Ÿp™È(UD$,24);" ONE MOMENT PLEASE... "¥uŽÈ„ -- LOAD AND RUN MENU PROGRAMã‰TT$²"0:SHIFT/RUN 3>™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000)äUM²53248UD$²"3 IN THE RANGE "ð²™" OF 0 TO .20 ":™¼™" THE UNITS ARE CM3 PER LITRE OF AIR.":™LÆ™" AS BEFORE, I WILL TYPE A '?' AND THEN"wЙ" YOU TYPE IN THE CO2 CONCENTRATION."¦Ú™" THIS TIME YOU MUST CHOOSE 10 DIFFERENT"Éä™" VALUES. REMEMBER RP=RATE O396ÿ h‰300@ ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **P Œ™"“":‰900[ 875:Ž|  ** STUDENT INSTRUCTIONS **… •™"“"« šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850Ø ›™" ÔHIS PROGRAM ALLOWS YOU TO DESIGN " œ™" 3 TYPES OF REGULA?21ªµ(R(I)­5ª.5));"Ñ"Ø$F ‚Þ$P Žä$Z €ê$d :ó$n 835ù$x ŽO2 "#t ™" CONC"#~ 2550+#ˆ 2670:™"">#’ ™"“"m#œ ™:™" MAKE SURE YOU KNOW WHAT'S HAPPENING"š#¦ ™"  " IN BOTH THESE CASES "©#° ™:™""´#º 835:ŽÂ#Ä ™:I²0¤3 GINCOURT, ÏNTARIO"þ™" ÃANADA Í1× 2Ë4">ÿ™" (416) 499-4292"XUP²1: 835:UH²1: 850‡™" ÐROGRAM ÎAME: ÒEG. ÐOWER ÓUPPLY"©™" ×RITTEN ÂY : ÕNKNOWNÑ™" ÕPGRADED ÂY : ÒICHARD ÓMITHú™" ÃONVERTED Â3 ":UP$²" "ˆUT$²" POWER SUPPLY      ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!*** 800: TITLE SCREEN· ‰300: MENU SCREENÓ# +++ INPUT SECTION +++å(UR$²"":UI$²""õ*‹UL²0§UL²80-™"3 Fáî™" PHOTOSYNTHESIS."êó835 ™"“ CARBON DIOXIDE CONC."& I²0¤20:V(I)²«1:‚2 I²1¤10I ™" [CO2]? ";v *UL²3:US$²"0123456789.Q":35:‹UR$²"Q"§300ƒ /W²Å(UR$)‘ >‹W³0§2200  H‹W±.2§2200¬ RQ²100¬WÊ \‹¶(Q«µ(Qª.5))±.00001§3 TED POWER SUPPLIES."6 Ÿ™" ÙOU WILL BE GIVEN A CHOICE OF CIRCUITS"f ¤™" ,VOLTAGES, AND AMPERAGE. ÔHE CIRCUITS"• ¥™" WILL THEN BE DRAWN AND SPECIFICATIONS"Ä ¦™" WILL BE GIVEN. ÉF YOU HAVE A PRINTER,"ô §™" YOU MAY TRANSFER THE PLANS ONTO PAP3 OGO **;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0@<¡A$:‹A$³±" "§I²Iª1:‹I³250§828d>T1$²"":T2$²"":T3$²"":T4$²"":I²0m@‰300‰C ** SPACE BAR PRESS **¾H™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"ÓJZZ²0¤9:¡ZZ$:‚ZZêL¡UI$:‹3Y: ÍARILYN ÇARDNER!™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒI ™" ÉF ERRORS ARE NOTED, CONTACTi ™" ÍARILYN ÇARDNER ™" 1630 ÍADISON ÓTREET¶ ™" ÅVANSTON, ÉLLINOIS 60202Ð UP²2: 835:UH²1: 850õ™" ÉF YOU W3 ";2¡UI$:‹UI$²""§50:7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85M<‹UI$²Ç(20)§105a>‹ Ã(UR$)²±UL§50†A120: CHECK FOR VALID CHARACTER–FUR$²UR$ªUI$ K™UI$;¨P‰50®U:´Z:º_:ÀdŽÙf ++ CHECK DELETE ++êi‹Ã(UR$)³1§50nUR$²È(UR$,Ã32200Ü fQ²µ(100¬Wª.5)ç pV(Q)²W!zR(Q)²µ(175¬(1«½(«28¬V(Q)))ª.005)­174¬1253!„™"RP="µ(R(Q)ª.5)=!Ž‰2230k!˜™" INPUT VALUES BETWEEN 0 AND .2 TO TWO"™!¢™" TWO DECIMAL PLACES ONLY. TRY AGAIN! "ª!£Z9²1¤1500:‚Ä!¤™"‘‘"UP$:™UP$:™"‘‘‘‘"3ER."$ ¨™" ÉF THE PRINTOUT COMES OUT JUMBLED, END"T ©™" THE PROGRAM, TYPE '5001' THEN RETURN’"] ®835k ³UH²1:850˜ ¸™"ÎOTE: ÔHE LETTERS Ö, Ð, ETC. ARE "Ä ½™"STANDARD ABREVIATIONS FOR VOLTAGE,"æ ™"POWER, RESISTANCE, ETC.." Ñ™"3UI$³±" "§844ðNŽR ** PAGE DESIGN ROUTINE **TUP²UPª1FW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)u\™" --------------------------------------"„`‹UH³±0§870¸a™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "ÉfUH²0:™"":Žèk ** PLEASE WA3ANT TO SUGGEST!™" ADDITIONAL EDUCATIONAL PROGRAMSI™" TO BE WRITTEN FOR THE Â128"e™" PLEASE CONTACT"…™" ÍARILYN ÇARDNER©™" 1630 ÍADISON ÓTREETÒ™" ÅVANSTON, ÉLLINOIS 60202Û835áN:ç3(UR$)«1)s™" ";:‰50;x ++ CHECK FOR VALID CHARACTERS ++M}‹Ã(US$)²0§150^‚US²1¤Ã(US$)u‡‹UI$²Ê(US$,US,1)§Ž{Œ‚ˆ‘UI$²"":Ž£– ** STANDARD INPUT **´˜‹Æ(UI$)²46§ŽÅ›‹UI$²Ç(32)§Žâ ‹Æ(UI$)³48°Æ(UI$)±57§170襎ª‹Æ(UI$)³65°3Î!¬‰2080Ô!¶‚Ú!À™"Ê™" TABLE, GRAPH OR BOTH (T/G/B) ";-"ÏUL²1:US$²"TGBQ":35:W$²UR$:‹UR$²"Q"§300?"Ô‹W$²"T" §2300P"Þ‹W$²"G"§2400a"è‹W$²"B"§2300k"ò‰2250t"ü™"“"" ™"CO2 CONC","RATE OF PHOTOSYNTHESIS"Æ" ™"££££££££","£££££££££££££££££££3ÉT IS ASSUMED THAT YOU HAVE A "6 Ö™"FAIRLY STRONG UNDERSTANDING OF"b Û™"BASIC ELECTRONICS TO ENABLE YOU TO"† à™"USE THIS PROGRAM PROPERLY." å835• ê:› óŽ¼ ô ** TEACHER INSTRUCTIONS **Å õ™"“"ë öUP²0:UG$²"ÔEACHER ÉNST":UH²1:8503IT REMARK **p™È(UD$,24);" ONE MOMENT PLEASE... "$uŽG„ -- LOAD AND RUN MENU PROGRAMb‰TT$²"0:SHIFT/RUN MENU"nŽ™Ç(147)t“™z˜™›™"LOAD";Ç(34);TT$;Ç(34);",8"¡¢™§§™­¬™³±™¿¶™ "RUN"ËÀ™ Ç(19)ÖÊ—209,2âÔ3WŽ X ** PROGRAM MODIFICATION INST **Y™"“";]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850D”835J²:P»Žp  ** T I T L E P A G E **}"™"“";“$I²1¤38:™"¦’";:‚«&I²1¤22:™"¦’";:‚Ã(I²1¤37:™"¦’";:‚Û*I²1¤22:™"‘¦’";:‚,™"3Æ(UI$)±90§180 ¯Ž/´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž5»ŽB¾UI$²"":ŽS, ** MENU **].™"“"z1™" ÍENU"©6™" --------------------------------------"Ö;™" " 1. BEGIN REG. POWER SUPPLY" @™" 2. STUDENT INS3£££"Ð" 2500â"$ ‹W$³±"B"§2440ì". 2660ö"` ™"“";#j ™" CO2 "#t ™" CONC"#~ 2550+#ˆ 2670:™"">#’ ™"“"m#œ ™:™" MAKE SURE YOU KNOW WHAT'S HAPPENING"š#¦ ™"  IN BOTH THESE CASES "©#° ™:™""´#º 835:ŽÂ#Ä ™:I²0¤3÷™" ÔO THE BEST OF OUR KNOWLEDGE,"Bø™" THIS PROGRAM IS IN THE PUBLIC"nù™" DOMAIN. ÉF THIS IS NOT THE CASE"‹ú™" PLEASE CONTACT:"µû™" ÃOMMODORE ÂUSINESS ÍACHINES"Øü™" 3370 ÐHARMACY ÁVE.üý™" Á4—939,13îÞ—940,13ôç€è‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **%éŒ@L™"“Ž":UP²0:UG$²"":850jV™"DESIGNING A BASIC POWER SUPPLY"¤~™"1. A BASIC TRANSFORMER AND BRIDGE SUPPLYªˆ:Í’™"2. A REGULATED SUPPLY ONLYù¦™"3.3© ’".™" ’  ’©C0™" ’ £ßa2™"ß ’‰4™"C O M M O D O R E¬6™"EDUCATIONALË8™"SOFTWAREæ: ** COMMODORE L3TRUCTIONS"* E™" 3. TEACHER INSTRUCTIONS"F O™" 4. QUIT"u T™" --------------------------------------"¦ Y™" PRESS NUMBER KEY (1-4) THEN ";Î ^UL²1:US$²"1234":35: INPUT ROUTINEÙ `US$²""ö c‘Å(UR$)1000,400,500,3320Ó#Î ‹V(I)³0§2530è#Ø ™V(I)£19ª21)R(I)î#â ‚ô#ì Ž$ö ™"Ž"£7ª21)" RATE OF PHOTOSYNTHESIS"H$ ™£7ª21)"0 25 50 75 100 125"p$ ™£7ª21)"Û±±±±Ú±±±±Ú±±±±Ú±±±±Ú±±±±Ú"|$ I²0¤20Ž$ ‹V(I)±²0§2620$( ™£7ª21)"³"§$2 ‰2630Ò$< ™V(I)£7ª21)"³";£7ª4 BOTH REGULATED AND BRIDGE SUPPLYC°™"WHICH DO YOU WANT TO DESIGN? ";:US$²"Q123":UL²1:35:‹UR$²"Q"§300U±A²Å(UR$):™"“"gº‹ A²1 §‰ 1390yÄ‹ A²2 §‰ 1240؈â850¶ì™"WHICH REG. WOULD YOU LIKE TO DESIGN"æ™"A. FEEDBACK REGULATOR 4º¥ ¥ PZ=";PZþ"î™ "§Ï££¥ ¥ Q2 Í Î££¥ VQ1=";V1)#ø™ "§¥Z ¥   ¥ ½Î ¥ VQ2=";V2T#™ "°½ Î ¥ £ÐÏ£ ¥ VQ3=";V3# ™ "ÎÍ Í Ì¤¤¤¤¤¤¤¤¤¤º¥ ¥ PQ1=";Q1ª#™ "ÐÏ Î R3 § ¥ PQ1=";Q1Õ# ™ "§¥ ÍÎ Q4 "Q1 AND Q2 ARE PNP AND Q3 IS AN NPN"š‹ B$²"A"§ ‰ 1930 ¤™6®™ "££££Ï£££Ï£££Ï£££ÍQ1Σ£££Ï +R1=";R1`¸™ " + ¥ ¥ ¥ ½Î ¥ R2=";R2ŠÂ™ " ¥ Î Î ££Ï£ ¥ R3=";R3µÌ™ " ¥ Í Í ¥ ¥ PR1=";P1àÖ™ " ¥R2Î R1Î 4(’ ‹ B$²"C"§ ˆ VO²VI:IO²II:PO²PI)œ VI²µ((2ªVO)¬100)­100:I1²µ(5¬IO)­100:PO²µ(VO¬IO¬100)­100:PZ².1¬POY)¦ R1²µ(((.9¬VO«.5)­(VO¬.05))¬100)­100:VZ²µ((VO«.5)¬100)­100)° Q1²VI:II²µ(IO¬120)­102:P1²µ(IO¬120¬VI)­100 :PI²µ(VI¬II¬100)­100®)º ‹ U³±2§‰2410Û)Ä ™4 ÎÍ ";"VO=";VOð-Ü ™" ÐÏ ";"VI=";VI.æ ™" ºÌ ";"PO=";POH.ð ™" ÍÍÍ ";"PI=";PIj.ú ™ "PR=";PR;"IIN=";II;"IO=";IOu. ‰ 3100{. ™¦. ™ "THIS IS A BASIC TRANSFORMER SUPPLY"¬."4 WITH PROTECTION" ™"B. FEEDBACK REGULATOR ONLY7(™"C. OVERLOAD PROTECTION W/ZENER DIODE"f<™"D. ZENER REGULATOR W/EXTEND TRANSISTOR‰P™"E. ZENER REGULATED SUPPLY"¿ZUS$²"ABCDEQ":UL²1:™:™"";:35:B$²UR$:‹UR$²"Q"§300 n850:™:™"OUTPU4 3 Î ¥ PQ3=";Q3ÿ#*™ "§¥ ÎÍ£££ÐÏ£££Ì¤¤¤ºÎ ¥ VO=";VO)$4™ "§¥ Í ºÌ §Í ¥ IO=";IOS$>™ " ££Ð ÕÉ ½ ¥ PI=";PI}$H™ " º¤ ºÌ ££££ VI=";VI§$R™ " ÍÍÍ ÍÍÍ VZ=";VZ²$\‰ 3100Ì$f™ "IIN=4 ¥ ¥ PR2=";P2 à™ " ¥ Í Í ¥ ¥ PR3=";P35ê™ " ¥ Î Î ¥ ¥ VZ=";VZ_ô™ " ¥ Í Í ¥ ¥ PZ=";PZŠþ™ " ¥ ¥ ̤¤¤¤º ¥ VQ1=";V1µ™ " ¥ ¥ Q2 Í Î££¥ VQ2=";V2à™ " ¥   ¥ 4 " ££££ÐÏ££Í  ®£££££££ + ";"VQ1=";Q1*Î ™ " Î ÍÎ Q1 ";"PQ1=";P14*Ø ™ " Í £ÐÏ£ ";"R1=";R1`*â ™ " Î §¥ ";"PZ=";PZŒ*ì ™ " R1 Í §¥ ";"VZ=";VZ¸*ö ™ " Î §¥ ";"V4 ™í., VS²µ(100¬VO­1.3)­100:TP²µ(150¬VO¬IO)­100:RL²µ(100¬VO­IO)­100/6 VC²µ(150¬VO)­100:RS²µ(((VC«VO)­IO)¬100)­100™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000)å: †A$(5) UD$²"5 DESIGN? ";:US$²"YNQ":UL²1:35:X$²UR$:‹UR$²"Q"§300í2: ‹ X$²"Y"§™"“":‰ 1100ü2D ‹ X$²"N"§Ž3N 3‡€3ˆŸ4,43A²0¤23*3œB²21¤60=3¦U²Â(UMª80¬AªB)L3°‹U²32§5070c3º‹U³32§U²Uª64:‰5070{3Ä‹U±63¯U³127§U²Uª128ˆ3Θ4,Ç(U);•3Ø‚B:˜4:‚A°3âŸ10,4,50,400,500,396 h‰300K ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **[ Œ™"“":‰900f 875:Ž‡  ** STUDENT INSTRUCTIONS ** •™"“"¶ šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850å œ™" ÔHIS IS A DRILL ON THE CONVERSION" ž™" OF 5 ÔO THE BEST OF OUR KNOWLEDGE,"8ø™" THIS PROGRAM IS IN THE PUBLIC"dù™" DOMAIN. ÉF THIS IS NOT THE CASE"ú™" PLEASE CONTACT:"«û™" ÃOMMODORE ÂUSINESS ÍACHINGS"Îü™" 3370 ÐHARMACY ÁVE.òý™" ÁGINCOURT5 *: ™" CORRECT, THEN YOU ADVANCE TO THE"=,: ™" NEXT TYPE OF QUESTION. ÉF IT IS"l.: ™" WRONG, THEN HINTS WILL BE GIVEN."yL: 835N:…WŽ«X ** PROGRAM MODIFICATION INST **´Y™"“"Ù]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850â”5 ";UP$²" "‰: UT$²" Ó. É. ÃÏÎÖÅÒÓÉÏΠ ": PLACE PROGRAM TITLE HERE!!!!!!!!!!!!!!!***¡800: TITLE SCREEN¸ ‰300: MENU SCREENÔ# +++ INPUT SECTION +++æ(UR$²"":UI$²""ö*‹UL²0§UL²80-™10:˜10: 10: 4: 6¶3쎉 1480Ò1 ‹ X$²"N"§Žã1 TC²Å(TI$)ª16ù1& ‹TC±Å(TI$) §‰3110C2' ™"DO YOU WANT THIS ON THE PRINTER? ";:US$²"YNQ":UL²1:35:‹UR$²"Q"§300u2( ™:™"‘ "ˆ2* ‹UR$²"Y"§5000Ô20 ™"DO YOU WANT ANOTHER5 METRIC UNITS OF MASS, LENGTH"% Ÿ™" AND VOLUME."S  ™" ÆOR THIS PROGRAM WE SOMETIMES USE"w ¢™" NUMBERS LIKE THIS: 1.5E-03… ¤™£46);"^"® ¦™" ÔHIS MEANS; SEE THIS THREE?..Û ¨™" ÍOVE THE DECIMAL BETWEEN THE 1 AND" ª™" 5 THREE’ P5 , ÏNTARIO"þ™" ÃANADA Í1× 2Ë4"4ÿ™" (416) 499-4292"NUP²1: 835:UH²1: 850z™" ÐROGRAM ÎAME: Ó. É. ÃONVERSION»™" ×RITTEN ÂY : ÐROGRAMS FOR ":™£40);"ÌEARNING, ÉNC."ß™" ÕPGRADED ÂY : ÄEREK ÌEE™"5835è²:  ** T I T L E P A G E **"™"“";1$I²1¤38:™"¦’";:‚I&I²1¤22:™"¦’";:‚a(I²1¤37:™"¦’";:‚y*I²1¤22:™"‘¦’";:‚ž,™"© ’À.™" ’  ’©á0™" ’5" ";2¡UI$:‹UI$²""§50;7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85N<‹UI$²Ç(20)§105b>‹ Ã(UR$)²±UL§50‡A120: CHECK FOR VALID CHARACTER—FUR$²UR$ªUI$¡K™UI$;©P‰50¯U:µZ:»_:ÁdŽÚf ++ CHECK DELETE ++ëi‹Ã(UR$)³1§50nUR$²È(UR$,5UN MENU PROGRAM‰TT$²"0:SHIFT/RUN MENU" Ž™Ç(147)“™˜™9™"LOAD";Ç(34);TT$;Ç(34);",8"?¢™E§™K¬™Q±™]¶™ "RUN"iÀ™ Ç(19)tÊ—209,2€Ô—939,13ŒÞ—940,13’瀽è‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **Éé™"“";:ŒÒÜ™"“"é5LACES TO THE LEFT. ÓO..."0 ¬™" THE NUMBER REALLY IS 0.0015."F ®™" ÓIMILARLY,i ¯™" 4.67E-04 MEANS 0.000467Ÿ °™" 7.615E-06 MEANS 0.000007615":835:UH²1:850Ì ²™" ÒEMEMBER TO HIT AFTER"ù ´™" TYPING YOUR ANSWER. ÙOU5 ÃONVERTED ÂY: ÍARILYN ÇARDNER/™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒW ™" ÉF ERRORS ARE NOTED, CONTACTw ™" ÍARILYN ÇARDNER› ™" 1630 ÍADISON ÓTREETÄ ™" ÅVANSTON, ÉLLINOIS 60202Þ UP²2: 835:UH²1: 850™5 £ßÿ2™"ß ’'4™"C O M M O D O R EJ6™"EDUCATIONALi8™"SOFTWARE„: ** COMMODORE LOGO **¼;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0Þ<¡A$:‹A$³±" "§I²Iª1:‹I³2505Ã(UR$)«1)s™" ";:‰50<x ++ CHECK FOR VALID CHARACTERS ++N}‹Ã(US$)²0§150_‚US²1¤Ã(US$)v‡‹UI$²Ê(US$,US,1)§Ž|Œ‚‰‘UI$²"":Ž¤– ** STANDARD INPUT **µ˜‹Æ(UI$)²46§ŽÆ›‹UI$²Ç(32)§Žã ‹Æ(UI$)³48°Æ(UI$)±57§170饎ª‹Æ(UI$)³655ðŒ:C²0:Q²0:X²0:875ÿ¸ I²1¤5:‡A$(I):‚IƒA,B,C,D,EÌI²1 ¤ 80ÖQ(I)²µ(»(1)¬8ª1)@à‹I²1 § 1800Pê J²1 ¤ I«1fô‹ Q(I)²Q(J)§ 1750nþ‚ Ju‚IC²Cª1‘‹ C²11 § 1840¡!UG$²"ÄRILL"Þ&‘Q(C) ‰1890,2040,2260,2430,2520,2700,2830,295 CAN ERASE"" ¶™" ERRORS WITH THE KEY"E ¸™" BEFORE YOU HIT ."ˆ ¼™" ÎOW, WHAT DOES 2.1E-02 MEAN? ";:US$²".0123456789":UL²0š ½35:Z5²Å(UR$)Ê ¾‹Z5².021§™" ÇOOD!..’ ÌET'S GO!":‰485ñ À™" ÎO; IT MEANS .021 OR 5" ÉF YOU WANT TO SUGGEST/™" ADDITIONAL EDUCATIONAL PROGRAMSW™" TO BE WRITTEN FOR THE Â128"s™" PLEASE CONTACT"“™" ÍARILYN ÇARDNER·™" 1630 ÍADISON ÓTREETà™" ÅVANSTON, ÉLLINOIS 60202é5§828>T1$²"":T2$²"":T3$²"":T4$²"":I²0 @‰300'C ** SPACE BAR PRESS **\H™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"qJZZ²0¤9:¡ZZ$:‚ZZˆL¡UI$:‹UI$³±" "§844ŽNŽ®R ** PAGE DESIGN ROUTINE **ºTUP²UPª1äW™"“"È(UT$ªUP$,21);É(UP$ªU5°Æ(UI$)±90§180 ¯Ž0´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Ž6»ŽC¾UI$²"":ŽT, ** MENU **^.™"“"{1™" ÍENU"ª6™" --------------------------------------"Ó;: ™" 1. S. I. CONVERSION"ý@™" 2. STUDENT INSTRU560,3130,3140ú+UG$²"ÓUMMARY":UP²0:850,0™" ×ELL, YOU MADE ";X;"ERROR(S)"Q:™" OUT OF ";Q;" QUESTIONS!"ŠD‹ X­Q±.25 § ™" ÂETTER TRY SOME MORE SOME TIME!"®N‹ X­Q³.1 § ™" ÅXCELLENT!!"¹X835:ŽÎb!QUESTION TYPE1á50.021™" ÒEMEMBER, MOVE THE DECIMAL 2"AÄ™" PLACES LEFT. ÍAKE SURE YOU"gÆ™" UNDERSTAND THIS BEFORE YOU"|È™" CONTINUE."…å835‹ê:‘óŽ²ô ** TEACHER INSTRUCTIONS **»õ™"“"áöUP²0:UG$²"ÔEACHER ÉNST":UH²1:850÷™"5835ú: UH²1:850( : ™" ÔHIS PROGRAM DRILLS STUDENTS"W": ™" ON CONVERSIONS BETWEEN ÓÉ UNITS."„$: ™" ÔHERE ARE 8 TYPES OF QUESTIONS"°&: ™" POSSIBLE (NUMBERED AT THE TOP"à(: ™" RIGHT CORNER). ×HEN THE ANSWER IS"5 G$ªÄ(UP),18)\™" --------------------------------------""`‹UH³±0§870Va™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "gfUH²0:™"":Ž†k ** PLEASE WAIT REMARK **¼p™È(UD$,24);" ONE MOMENT PLEASE... "ÂuŽå„ -- LOAD AND R5CTIONS"' E™" 3. TEACHER INSTRUCTIONS"F O: ™" 4. QUIT"u T™" --------------------------------------"¦ Y™" PRESS NUMBER KEY (1-4) THEN ";Ö ^: UL²1:WS$²"1234":35:---INPUT ROUTINE---á `US$²"" c: ‘Å(UR$)1006gUP²Q(C)«1:850ël3160õv3200"€K²N­1000:A(1)²N­100:A(2)²N­10:A(3)²N¬1002ŠA(4)²N¬1000X”™" ÈOW MANY METRES IN ";N;"MM?"bž3250‹¨‹ Z$²K$ § ™" ÃORRECT!":835:‰1810Ȳ™:™"“ ÎO’! ":™:™:™" ÈOW MANY MM IN A METRE? ";þ¼U63Ú ÙUP²Q(C)«1:850ê Þ3160:3200!è™" ÈOW MANY LITRES IN ";N;"ML?"2!òK²N­1000:A(1)²N­100:A(2)²N­10M!üA(3)²N¬100:A(4)²N¬1000W! 3250†! ‹ Z$²K$ § ™" ÙOU ARE RIGHT!":835:‰1810Î! ™"“ ÎOPE! ÈOW MANY ML IN A LITRE? ";:US$²".01234566²Xª1Ó%P ‹Z$²"M" § 2670ç%Z ‹ Z$³±"D"§ 2620 &d ™" ÎO, YOU SHOULD MULTIPLY,"8&n ™:™" ÓO THE CORRECT ANSWER IS ";N¬1000B&x 3400L&‚ ‰2520V&Œ Q#6i&‘ UP²Q(C)«1:850y&– 3160:3200Ÿ&  ™" ÃONVERT ";N;" CM TO METRES."Ö&ª K²N­100:A(1)²N­10:A(2)6 ÎO - 100 CG = 1 G"ê*Ö ™" AND 1000 MG = 1 G" +à ™:™" ÔHUS WHICH IS LARGER,"T+å ™" A 'CG' OR AN 'MG'? ";:US$²"CMGQ":UL²2:35:Z$²UR$:‹UR$²"Q"§300i+ê ‹ Z$²"CG" § 3080+õ ™" ÌOOK AGAIN!!":I²1¤1000:‚»+ö ™"‘‘‘‘ 6 @™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEf ™"“"£21)Ç(15): UPPER LEFT WINDOW¥™""£60)Ç(143): LOWER RIGHT WINDOW ** SET UP VARIABLES **ÙUX$²"H":†UQ%(1000)ýUD$²""/7 --------------"8Y™" PRESS NUMBER KEY (1-3) THEN ";_^UL²1:US$²"123":35: INPUT ROUTINEj`US$²""ƒc‘Å(UR$)1000,500,396Œh‰300Í‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **ÝŒ™"“":‰900è875:Ž  ** STUD6 S$²".0123456789Q":UL²6:35:Z²Å(UR$):‹UR$²"Q"§3002Æ‹Z³±1000 § ™" ÃOME NOW - THERE ARE 1000!!"_Й:™" ÓO YOU MUST DIVIDE’ THE ";N;"MM"„Ú™" BY 1000 TO GET THE ANSWER,"—ß™" ";N­1000¡ä3400±îX²Xª1:‰1890¼ø! Q.2ÏýUP²Q(C)«1:6 789Q":UL²0ð!$ 35:Z²Å(UR$)"IFUR$="Q"THEN300$". ‹ Z³±1000 § ™" ÎÎÎÎÎÎÎÎÏ! 1 LITRE = 1000 ML"G"8 ™:™" ÓO YOU MUST "|"B ™:™" DIVIDE’ DIVIDE DIVIDE’ DIVIDE DIVIDE’"§"L ™:™" THE ";N;"ML BY 1000 TO GET THE"Í"V ™" ANSWER, ";N­10006 ²N­1000:A(3)²N¬100:A(4)²N¬10à&´ 3250 '¾ ‹ Z$²K$ § ™" ÅXCELLENT!!":835:‰1810:'È ™"“ ÎO! ÎO! Á THOUSAND TIMES NO!"~'Ò ™:™" ÌOOK! ÈOW MANY CM IN A METRE? ";:US$²".0123456789Q":UL²0œ'Ü 35:Z²Å(UR$):‹UR$²"Q"§300Î'á ‹Z³±100 § ™" ÎO, NOT6 "å+÷ ™" ",ø ™" ‘‘‘‘‘":‰3040G,þ ™" ÐLEASE ANSWER 'CG' OR 'MG'!":‰3040–, ™" ÈOW MANY TIMES? ";:US$²".0123456789Q":UL²0:35:Z²Å(UR$):‹UR$²"Q"§300¾, ‹ Z³±10 § ™" ÎO!6UP$²" "HUT$²" ÓPECIFIC ÈEAT"`800: TITLE SCREENw ‰300: MENU SCREEN“# +++ INPUT SECTION +++¥(UR$²"":UI$²""µ*‹UL²0§UL²80Â-™" ";Ö2¡UI$:‹UI$²""§50ú7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85 <6850ß3160:3200ì K²N¬1000A(1)²N­1000:A(2)²N¬100:A(3)²N¬10 A(4)²N­10C*™" ÃHANGE ";N;"KM TO METRES."M43250{>‹ Z$²K$ § ™" ÔHAT'S RIGHT!":835:‰1810­H™"“ ÎO! ×HICH IS LARGER, A KILOMETRE"ÎR™" OR A METRE (K OR M)6;" LITRES!"×"` 3400á"j X²Xª1ë"t ‰2260ô"~ Q#4#ƒ UP²Q(C)«1:850#ˆ 3160:3200M#’ K²N:A(1)²N­1000:A(2)²N­100:A(3)²N¬100:A(4)²N¬1000t#œ ™" ÃONVERT ";N;"CUBIC CM TO ML."~#¦ 3250¤#° ‹Z$²K$ § ™" ÒIGHT!":835:‰1810®#º X²Xª1Ü#Ä ™" ÎO- A C6 ";Z;", 1 M = 100 CM!"ý'æ ™:™" ÓO YOU MUST D I V I D E’ ";N;" CM"*(ð ™:™" BY 100 TO GET THE ANSWER, ";N­1004(ú 3400D( X²Xª1:‰2700M( Q.7`( UP²Q(C)«1:850p( 3160:3200¨(" K²N¬1000:A(1)²N¬100:A(2)²N¬10:A(3)²N­1000:A(4)²N­10Ï(, ™" ÈOW 6 1 CG = 10 MG!!"æ, ™:™" ÓO ";N;" CG = ";N¬10;" MG!!"ð,& 3400-0 X²Xª1:‰2960-X !QUESTION COUNTER;-v ™:™:Q²Qª1:™" ÑUESTION ";Q:™:ŽQ-€ SELECT A NUMBERe-Š N²µ(»(1)¬70ª11)u-” E²µ(»(1)¬4)-ž ‹ »(1)±.5 § N²N­10®E:ŽŸ-¨ N²N¬10®E:Ž¶-² ! ANSWE6‹UI$²Ç(20)§105!>‹ Ã(UR$)²±UL§50FA120: CHECK FOR VALID CHARACTERVFUR$²UR$ªUI$`K™UI$;hP‰50nU:tZ:z_:€dŽ™f ++ CHECK DELETE ++ªi‹Ã(UR$)³1§50ÂnUR$²È(UR$,Ã(UR$)«1)Ôs™" ";:‰50ûx ++ CHECK FOR VALID CHARACTERS ++6? ";ù\US$²"KMQ":UL²1:35:Z$²UR$:‹UR$²"Q"§300 f‹ Z$²"K" § 2190;p‹ Z$³±"M" § ™"PLEASE ANSWER K OR M":‰2140hz™:™" ÎO - A METRE IS ABOUT 3 FEET AND"“„™" A KILOMETRE IS OVER HALF A MILE!"¿Ž™:™" ÎOW: HOW MANY TIMES LARGER IS A"ÿ˜™" 6UBIC CENTIMETRE IS THE SAME"$Î ™" AS A MILLILITRE, SO TRY AGAIN.";:835:‰2430$Ø Q#5.$Ý UP²Q(C)«1:850>$â 3160:3200d$ì ™" ÈOW MANY MG IN ";N;" GRAMS?"œ$ö K²N¬1000:A(1)²N¬10:A(2)²N¬10:A(3)²N­100:A(4)²N­1000¦$ 3250Ï$ ‹Z$²K$ § ™" ÃOR6MANY ML IN ";N;" LITRES?"Ù(6 3250)@ ‹Z$²K$ § ™" ÒIGHT ON!":835:‰1810()J ™"“ ÔHAT IS NOT CORRECT!"U)T ™:™" Á LITRE IS 1000 X AS BIG AS A ML"ƒ)^ ™" THAT MEANS YOU MUST MULTIPLY’ THE"­)h ™" ";N;"LITERS BY 1000, TO GET THE"Ò)r ™:6R SCRAMBLEÂ-¼ J²1:P²0Ð-Æ I²1 ¤ 5ë-Ð ™:™" [";A$(I);"] ";.Ú ‹ I²5 § ‹ P²0 § ™K:K$²A$(J):‰3340".ä ‹ P²1 § 3320H.î ‹ »(1)±.6 § ™K:K$²A$(J):P²1:‰3340R.ø ™A(J)\. J²Jª1d. ‚ Ij. ›­. ™" ÙOUR ANSWER? ";:US$²"ABCDEQ":UL²1:35:Z$²UR$:‹UR$²"Q"§6 }‹Ã(US$)²0§150‚US²1¤Ã(US$)5‡‹UI$²Ê(US$,US,1)§Ž;Œ‚H‘UI$²"":Žc– ** STANDARD INPUT **t˜‹Æ(UI$)²46§Ž…›‹UI$²Ç(32)§Ž¢ ‹Æ(UI$)³48°Æ(UI$)±57§170¨¥ŽÅª‹Æ(UI$)³65°Æ(UI$)±90§180˯Žï´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":Žõ»Ž¾6 KILO’METRE THAN A METRE? ";:US$²".0123456789Q":UL²0 ¢35:Z²Å(UR$):‹ UR$²"Q"§300P §‹ Z³±1000 § ™ " ÎO- KILO’ MEANS 1000!!"| ¬™:™" ÓO YOU MUST MULTIPLY’ ";N;" BY"¢ ¶™" 1000! ÔHE ANSWER IS ";N¬1000¬ À3400¼ ÊX²Xª1:‰2040Ç Ô! Q.6RECT’":835:‰1810ê$ ™"“ ×RONG!!!!’"% ™:™" ÔHERE ARE 1000 MG IN A GRAM; "B%( ™:™" SO WHICH SHOULD YOU DO - MULTIPLY"q%2 ™:™" OR DIVIDE THE ";N;" GRAMS BY 1000,"¶%< ™" "(ANSWER M OR D)? ";:US$²"MDQ":UL²1:35:Z$²UR$:‹UR$²"Q"§300À%F X6™" ANSWER, WHICH IS ";N¬1000Ü)| 3400ì)† X²Xª1:‰2830÷) ! Q#8 *• UP²Q(C)«1:850*š 3160:3200Q*¤ K²N¬10:A(1)²N¬1000:A(2)²N¬100:A(3)²N­10:A(4)²N­100r*® ™" ÃHANGE ";N;" CG TO MG."|*¸ 3250©* ‹ Z$²K$ § ™" ÔHAT'S IT!!!":835:‰1810Ì*Ì ™"“g300³.> ŽÇ.H !PAUSE ROUTINEï.R ™:™" ÓTUDY THIS BEFORE GOING ON!"ø.\ 835þ.f Ž/p ™"“" /z €TER;-v ™:™:Q²Qª1:™" ÑUESTION ";Q:™:ŽQ-€ SELECT A NUMBERe-Š N²µ(»(1)¬70ª11)u-” E²µ(»(1)¬4)-ž ‹ »(1)±.5 § N²N­10®E:ŽŸ-¨ N²N¬10®E:Ž¶-² ! ANSWE6UI$²"":Ž, ** MENU **.™"“":1™" ÍENU"i6™" --------------------------------------"’;™" 1. BEGIN SPECIFIC HEAT"¼E™" 2. TEACHER INSTRUCTIONS"ØO™" 3. QUIT"T™" ------------------------7,™"“":850:™:™" ÁRE YOU WORKING WITH GRAMS OR"E6™" KILOGRAMS? (G OR K) ";:UL²1:US$²"GKQ":35:I$²UR$:‹UR$²"Q"§300n@‹ I$²"G" § W²4.2 :U$²"J/GRAM-DEGREE"•J‹ I$²"K" § W²4200:U$²"J/KG-DEGREE"ªTQ ² M1¬(T3«T1)¬WÁ^C ² Q­(M2¬(T2«T3))ÊcUH²1h7ED IN ADVANCE FOR ALL OF THE"â™" LAB REPORTS? ";:ìUL²1:US$²"YNQ":35:I$²UR$:‹UR$²"Q"§300Nö‹ I$²"N" § 1500‡™"“":850:™:™" ÉF ANY OF THE FOLLOWING QUANTITIES"µ ™" CAN BE ENTERED IN ADVANCE FOR ALL OF"ã™" THE REPORTS, TYPE IN THE A7--------------------------------"`‹UH³±0§870Ha™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "YfUH²0:™"":Žxk ** PLEASE WAIT REMARK **®p™È(UD$,24);" ONE MOMENT PLEASE... "´uŽ×„ -- LOAD AND RUN MENU PROGRAMò‰TT$²"07 FOR THE Â128" ™" PLEASE CONTACT"9 ™" ÍARILYN ÇARDNER] ™" 1630 ÍADISON ÓTREET† ™" ÅVANSTON, ÉLLINOIS 60202 835 !UH²1:850É "™" ÔHIS PROGRAM IS DESIGNED TO HELP"ò $™" TEACHERS MARK A LAB REPORT8 ÈEAT GAINED BY WATER = ";Q1;" J"1D™:™" ÈEAT GAINED BY CALORIMETER =";Q2;" J"\N™:™" ÔOTAL HEAT GAINED =";(Q1ªQ2);" J"ŒX™:™" ÔEMP CHANGE FOR METAL = ";(T2«T3);" C"Íb™:™" ÓPECIFIC HEAT OF METAL = "µ(1000¬7 UP²0:UG$²"ÃHART":850:™:™" ÔEMP CHANGE FOR WATER = ";(T3«T1);" C"Er™:™" ÈEAT GAINED BY WATER = ";Q;"J"u|™:™" ÔEMP CHANGE FOR METAL = ";(T2«T3);"C"µ†™:™" ÓPECIFIC HEAT OF METAL = " µ(1000¬C)­1000;U$ÅD²(C«A1)­A1ÙšD17 PPROPRIATE" ™" VALUE. ÉF NOT, ANSWER 'N'.":™""(835-850E2P$²A1$:US$²"0123456789.QN": 1970S<A1²V:F0²FeFP$²M1$: 1970sPM1²V:F1²FšZP$²T1$:US$²"0123456789.QN-": 1970¨dT1²V:F2²FÏnP$²M2$:US$²"0123456789.QN-": 1970ÝxM27 :SHIFT/RUN MENU"þŽ™Ç(147)“™ ˜™+™"LOAD";Ç(34);TT$;Ç(34);",8"1¢™7§™=¬™C±™O¶™ "RUN"[À™ Ç(19)fÊ—209,2rÔ—939,13~Þ—940,13„瀯è‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **»é™"“";:ŒÁòŒü "SPECIFIC HEAT" WRITTEN 7 OF A"! &™" STUDENT'S EXPERIMENT TO DETERMINE THE"K (™" THE SPECIFIC HEAT CAPACITY OF AN"b *™" UNKOWN SOLID."k ,835q N:w WŽ X ** PROGRAM MODIFICATION INST **¦ Y™"“"Ë ]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850Ô ”835Ú ²:à »Ž  ** 7ENT INSTRUCTIONS **•™"“"8šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850Aå835Gê:MóŽnô ** TEACHER INSTRUCTIONS **wõ™"“"öUP²0:UG$²"ÔEACHER ÉNST":UH²1:850Ë÷™" ÔO THE BEST OF OUR KNOWLEDGE,"ôø™" THIS PROGRAM IS IN THE PUBLIC"7²µ(1000¬D)­10¤™:™" ÐERCENTAGE DIFFERENCE = ";D1;"%"5®™:™" ÄO YOU HAVE ANY MORE CALCULATIONS? ";`¸UL²1:US$²"YNQ":35:I$²UR$:‹UR$²"Q"§300t‹ I$²"Y" § 1500‡Ì‹ I$²"N" § 300±Ñ‹ F6³±0 ¯ F7³±0 § 850:™:™"";:‰1770ºÒ850ÖÖUL²3:US$²"07²V:F3²F‚P$²T2$:US$²"0123456789.QN-": 1970ŒT2²V:F4²F$–P$²T3$: 1970O›‹Å(V$)«T2²0¯È(V$,1)³±"N"§™"‘‘‘‘":‰1430] T3²V:F5²Fnª‹ L²1 § 1500™´850:P$²C1$:US$²".0123456789QN": 1970§¾C1²V:F6²F¹ÈP$²C2$: 1970ÇÒC2²V:F7²FÜÜ850: 27BY MALCOLM COUTTS,D RIVERDALE COLLEGIATE INSTITUTE, TORONTO, MARCH, 1981.iBUH²1:UP²0:UG$²"ÓET-UP ÐG.":850–L™:™" ÄO YOU WISH TO CONSIDER THE HEAT"½V™" ABSORBED BY THE CALORIMETER? ";è`UL²1:US$²"YNQ":35:I$²UR$:‹U7T I T L E P A G E ** "™"“";# $I²1¤38:™"¦’";:‚; &I²1¤22:™"¦’";:‚S (I²1¤37:™"¦’";:‚k *I²1¤22:™"‘¦’";:‚ ,™"© ’² .™" ’  ’©Ó 0™" ’ £ßñ 2™"7 ù™" DOMAIN. ÉF THIS IS NOT THE CASE"=ú™" PLEASE CONTACT:"gû™" ÃOMMODORE ÂUSINESS ÍACHINES"Šü™" 3370 ÐHARMACY ÁVE.®ý™" ÁGINCOURT, ÏNTARIO"Ðþ™" ÃANADA Í1× 2Ë4"ðÿ™" (416) 499-4292" 7123456789.Q"Û‹F6²0§™:™" ";C1$:™" ";:35:C1²Å(UR$):‹UR$²"Q"§300,àUL²3:US$²"0123456789.Q"få‹F7²0§™:™" ";C2$:™" ";:35:C2²Å(UR$):‹UR$²"Q"§300ê™:™" ÁRE YOU WORKING WITH GRAMS OR"Ôô™" KILOGRAMS (G OR K)? ";:UL²1:US$²"GKQ":35:I$²UR$:7080:835á‹F0²0°F1²0°F2²0°F3²0°F4²0°F5²0§850,âSP$²" ":US$²"0123456789.Q"cæ‹F0²0§™:™A1$:™SP$;:UL²3:35:A1²Å(UR$):‹UR$²"Q"§300šð‹F1²0§™:™M1$:™SP$;:UL²3:35:M1²Å(UR$):‹UR$²"Q"§300Ñú‹F2²0§™:™T1$:™SP$;:UL²3:35:T1²Å(UR$):‹UR$²"Q"§3007R$²"Q"§300ûj‹ I$²"Y" § L²2t‹ I$²"N" § L²1]~A1$ ² " 1. ÁCCEPTED VALUE FOR SPECIFIC HEAT CAPACITY OF THE SAMPLE"€ˆM1$ ² " 2. ÍASS OF COLD WATER"±’T1$ ² " 3. ÉNITIAL TEMPERATURE OF THE WATER"ÜœM2$ ² " 4. ÍASS OF THE UNKNOWN SAMPLE"7ß ’ 4™"C O M M O D O R E< 6™"EDUCATIONAL[ 8™"SOFTWAREv : ** COMMODORE LOGO **® ;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0Ð <¡A$:‹A$³±" "§I²Iª1:‹I³250§828ô >T1$²"":T2$²"":T3$7UP²1: 835:UH²1: 8504™" ÐROGRAM ÎAME: ÓPECIFIC ÈEAT]™" ×RITTEN ÂY : ÍALCOLM ÃOUTTS…™" ÕPGRADED ÂY : ÌYNDA ÂONANNO®™" ÃONVERTED ÂY: ÍARILYN ÇARDNERÕ™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒý ™" ÉF ERRORS ARE N7‹UR$²"Q"§300ýþ‹ I$²"G" § W²4.2 :U$²"J/GRAM-DEGREE"$‹ I$²"K" § W²4200:U$²"J/KG-DEGREE":Q1 ² M1¬(T3«T1)¬WQQ2 ² C1¬(T3«T1)¬C2n&C ² (Q1ªQ2)­(M2¬(T2«T3))w+UH²1½0UP²0:UG$²"ÃHART":850:™:™" ÔEMP CHANGE FOR WATER = ";(T3«T1);" C"ò:™:™"7‹F3²0§™:™M2$:™SP$;:UL²3:35:M2²Å(UR$):‹UR$²"Q"§300S‹F4²0§™:™T2$:™SP$;:UL²3:US$²".0123456789Q-":35:T2²Å(UR$):‹UR$²"Q"§300ž‹F5²0§™:™T3$:™SP$;:UL²3:US$²".0123456789Q-":35:T3²Å(UR$):‹UR$²"Q"§300¹‹T3«T2²0§™"‘‘‘";:‰1560Í"‘ L ‰ 1580,17457¦T2$ ² " 5. ÉNITIAL TEMPERATURE OF THE SAMPLE"?°T3$ ² " 6. ÆINAL TEMPERATURE OF THE MIXTURE"gºC1$ ² " 7. ÍASS OF THE CALORIMETER"˜ÄC2$ ² " 8. ÓPECIFIC HEAT OF THE CALORIMETER"ÊΙ:™" ÁRE THERE ANY FIXED VALUES WHICH CAN"øØ™" BE ENTER7²"":T4$²"":I²0ý @‰300C ** SPACE BAR PRESS **NH™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"cJZZ²0¤9:¡ZZ$:‚ZZzL¡UI$:‹UI$³±" "§844€NŽ R ** PAGE DESIGN ROUTINE **¬TUP²UPª1ÖW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)\™" ------7OTED, CONTACT ™" ÍARILYN ÇARDNERA ™" 1630 ÍADISON ÓTREETj ™" ÅVANSTON, ÉLLINOIS 60202„ UP²2: 835:UH²1: 850© ™" ÉF YOU WANT TO SUGGESTÕ ™" ADDITIONAL EDUCATIONAL PROGRAMSý ™" TO BE WRITTEN8>™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£61)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000)ò†E$(36),R$(30):DEL²500UD$²"8T INSTRUCTIONS"/ E™" 3. TEACHER INSTRUCTIONS"K O™" 4. QUIT"z T™" --------------------------------------"« Y™" PRESS NUMBER KEY (1-4) THEN ";Ó ^UL²1:US$²"1234":35: INPUT ROUTINEÞ `US$²""û c‘Å(UR$)1000,400,8: 835:UH²1: 850"™" ÉF YOU WANT TO SUGGESTN™" ADDITIONAL EDUCATIONAL PROGRAMSv™" TO BE WRITTEN FOR THE Â128"’™" PLEASE CONTACT"²™" ÍARILYN ÇARDNERÖ™" 1630 ÍADISON ÓTREETÿ™" ÅVA8N>"öfUH²0:™"":Žk ** PLEASE WAIT REMARK **Kp™È(UD$,24);" ONE MOMENT PLEASE... "QuŽt„ -- LOAD AND RUN MENU PROGRAM‰TT$²"0:SHIFT/RUN MENU"›Ž™Ç(147)¡“™§˜™È™"LOAD";Ç(34);TT$;Ç(34);",8"΢™Ô§™Ú¬™à±™8 ¥ò<™"¢¢¢¢¢¢¢¢¢¢¢¢¢¢";øFŽ4P™"’ÑÑ Ý ’ÑÖ’Ñ":ŽnZ™"’ Ñ Ñ ’Ñ×’ "‰d™"n™" ´x™" ":ŽÞ‚™"8 "HUP$²" "•UT$²" TITRATION       ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!***­800: TITLE SCREENÄ ‰300: MENU SCREENà# +++ INPUT SECTION +++ò(UR$²"":UI$²""*‹UL²08 500,396 h‰300E ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **U Œ™"“":‰900` 875:Ž  ** STUDENT INSTRUCTIONS **Š •™"“"° šUH²1:UP²0:UG$²"STUDENT INST":850» ½‰50000Ä å835Ê ê:Ð óŽñ ô ** TEACHER INSTRUCTIONS **8 NSTON, ÉLLINOIS 60202835N:WŽ:X ** PROGRAM MODIFICATION INST **CY™"“"h]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850q”835w²:}»Ž  ** T I T L E P A G E **ª"™"“";À$I²1¤38:™"¦’";:‚Ø&I²1¤22:™"¦’";:‚ð(I²1¤37:™"8 춙 "RUN"øÀ™ Ç(19)Ê—209,2Ô—939,13Þ—940,13!ç€Lè‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **Xé™"“";:Œbò™"“Ž"’üNOKY²255:SPC²6:ZER²10:EQU²1:KBD²151:DEL²500ËBUF²158:**IFPEEK(50003)=160THENSPC=32:ZER=48:EQU=61**POKE50003,08C)­1000U$ÝlD²(C«A1)­A1ñvD1²µ(1000¬D)­10€™:™" ÐERCENTAGE DIFFERENCE = ";D1;"%"JŠ™:™" ÄO YOU HAVE ANY MORE CALCULATIONS? ";u”UL²1:US$²"YNQ":35:I$²UR$:‹UR$²"Q"§300‰ž‹ I$²"Y" § 1500œ¨‹ I$²"N" § 300´²™:™" ";P$:™" ";Õ¼UL²6:35:8§UL²80-™" ";#2¡UI$:‹UI$²""§50G7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85Z<‹UI$²Ç(20)§105n>‹ Ã(UR$)²±UL§50“A120: CHECK FOR VALID CHARACTER£FUR$²UR$ªUI$­K™UI$;µP‰50»U:ÁZ:Ç_:ÍdŽæf ++ CHECK DELETE ++÷i‹Ã(UR$)³1§508ú õ™"“" öUP²0:UG$²"ÔEACHER ÉNST":UH²1:850N ÷™" ÔO THE BEST OF OUR KNOWLEDGE,"w ø™" THIS PROGRAM IS IN THE PUBLIC"£ ù™" DOMAIN. ÉF THIS IS NOT THE CASE"À ú™" PLEASE CONTACT:"ê û™" ÃOMMODORE ÂUSINESS ÍACHINES" ü™8¦’";:‚*I²1¤22:™"‘¦’";:‚-,™"© ’O.™" ’  ’©p0™" ’ £ßŽ2™"ß ’¶4™"C O M M O D O R EÙ6™"EDUCATIONALø8™"8:IFPEEK(50003)=0THENNOKY=64:SPC=60:ZER=35:EQU=53:KBD=203:BUF=198(2010.$b.™"“":SS²0:M²4:N²1:FD²0:SD²0:EP²µ(128¬»(Å(TI$)))µ8**POKE50003,0:IFPEEK(50003)=0THENNOKY=64:SPC=60:ZER=35:EQU=53:KBD=203:BUF=198ËB1100:1910:‰1510ßL™" Ù¢8V$²UR$:‹UR$²"Q"§300áÆB²Æ(V$)íÐV²0:F²0 Ú‹ B²46 § V²Å(V$):F²1' ä‹ B±47 ¯ B³58 § V²Å(V$):F²1- îŽx ‹ F2²0 § ™:™" ";T1$:UL²3:US$²"0123456789.Q":35:T1²Å(UR$):‹UR$²"Q"§300¥ ™" ÎO UNITS WILL BE SPECIFIED. ÉT IS"Ò *™" ASSUMED THAT YOU W8nUR$²È(UR$,Ã(UR$)«1)!s™" ";:‰50Hx ++ CHECK FOR VALID CHARACTERS ++Z}‹Ã(US$)²0§150k‚US²1¤Ã(US$)‚‡‹UI$²Ê(US$,US,1)§ŽˆŒ‚•‘UI$²"":Ž°– ** STANDARD INPUT **Á˜‹Æ(UI$)²46§ŽÒ›‹UI$²Ç(32)§Žï ‹Æ(UI$)³48°Æ(UI$)±57§170õ¥Ž8" 3370 ÐHARMACY ÁVE.1 ý™" ÁGINCOURT, ÏNTARIO"S þ™" ÃANADA Í1× 2Ë4"s ÿ™" (416) 499-4292" UP²1: 835:UH²1: 850³ ™" ÐROGRAM ÎAME: ÔITRATION× ™" ×RITTEN ÂY : Ç Ê ÆLYNNþ ™" ÕPGRADED ÂY8SOFTWARE: ** COMMODORE LOGO **K;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0m<¡A$:‹A$³±" "§I²Iª1:‹I³250§828‘>T1$²"":T2$²"":T3$²"":T4$²"":I²0š@‰300¶C ** SPACE BAR PRESS **ëH™È(UD$,24);"PRESS SPACE BAR TO CON8ÔÀ0óV™" Ù ’ÔÀ `™" ¡’ Ù ’ÔÀ1 j™" ¡’ Ù ’ÔÀ7t™" ¡’ Ù ’ÔÀ2M~™" ¡’ Ù ’ÔÀdˆ™" ¡’ Ù ’ÔÀ3z’™" ¡’ÀÀÀÀÀª ´’À‘œ™" ¡’ Ù ’ÔÀ4§¦™" ¡’ Ù ’ÔÀ¾°™" ¡’ Ù ’ÔÀ5Ôº™" ¡’ Ù ’ÔÀëÄ™dILL BE CONSISTENT"!4™" IN THE SELECTION OF UNITS THROUGHOUT"!>™" THE CALCULATION." !HŽ YOU HAVE ANY MORE CALCULATIONS? ";u”UL²1:US$²"YNQ":35:I$²UR$:‹UR$²"Q"§300‰ž‹ I$²"Y" § 1500œ¨‹ I$²"N" § 300´²™:™" ";P$:™" ";Õ¼UL²6:35:8ª‹Æ(UI$)³65°Æ(UI$)±90§180¯Ž<´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":ŽB»ŽO¾UI$²"":Ž`, ** MENU **j.™"“"‡1™" ÍENU"¶6™" --------------------------------------"Û;™" 1. BEGIN TITRATION" @™" 2. STUDEN8 : ÃARY ÈEATHER' ™" ÃONVERTED ÂY: ÍARILYN ÇARDNERN ™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒv ™" ÉF ERRORS ARE NOTED, CONTACT– ™" ÍARILYN ÇARDNERº ™" 1630"ÍADISON ÓTREETã ™" ÅVANSTON, ÉLLINOIS 60202ý UP²28TINUE’"JZZ²0¤9:¡ZZ$:‚ZZL¡UI$:‹UI$³±" "§844NŽ=R ** PAGE DESIGN ROUTINE **ITUP²UPª1sW™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)¢\™" --------------------------------------"±`‹UH³±0§870åa™È(UD$,24);È(UP$,7);"QUIT - PRESS Q ƒ"¢","¢¢¢¨","¨¢¢¢¨¦¨¦","ÀÀÀÀÀ "} ƒ"¢","¢¢¢¨","¨¨¨¨¨¦¦¦¦¦","ÀÀÀÀÀ     "¾*ƒ"¢","¢¢¢ ","¨¢¢¢¨¦¦¨’¦¦","ÀÀÀÀÀ     "ÿ4ƒ"¢",91360:DL²1ú"™",™"Ý"6™"Ý6@™"ÝcJFD²FDª1:1630:K²Â(KBD):‹K²SPC§1610 :***uT1410:1370:ŽŽ^M²Mª1:‹M²8§N²Nª1:M²0§h‹SS²0§SS²1:TS²Å(TI$)½r‹N±17§1370:‰1060Ï|™"";÷9 >™"“Ž": CLEAR ANY WINDOWS AND SCREEN; SET GRAPHIC MODEd ™"“"£21)Ç(15): UPPER LEFT WINDOW£™""£60)Ç(143): LOWER RIGHT WINDOWÀ ** SET UP VARIABLES **×UX$²"H":†UQ%(1000)ý† QU$(250),AN$(250),B(10),M(4,16)9 )hÄP²1¤5¬DEL:‚Pà)rÄ™Q$"¨¨¨¨¨¦¦¦¦¦"ò)|ÄP²1¤3¬DEL:‚P0*†Ä**PRINTH$B$B$B$B$H$"IF WE ADD TOO MUCH ACID, WE GO PAST"a*‹Ä™H$"IF WE ADD TOO MUCH ACID, WE GO PAST "‘*Ä™" THE 'POINT' OF THE REACTION... "Á*•Ä™" 9 V ‹R³60§V²2:‰2430ã$` ‹R³85§V²3:‰2430÷$j ‹R³95§V²4:‰2430ÿ$t V²5%~ ™£18ª21)""R$(5¬Vª5¬»(1)ª1)0%ˆ **POKEBUF,0B%’ P²1¤2¬DEL:‚Pe%œ ™£19ª21)" TRY AGAIN? ";y%¦ ¡Z$:‹Z$²""§2470Š%° ‹Z$²"Y"§1070œ%º ‹Z$³±"N"§2470¢%Ø Ž»%v™"IT TAKES TO REACH"9 "¢¢¢ ","¢¢¢¢¢¦¨ ¨’¦","¨¨¨¨¨¦¦¦¦¦"# >ƒ"¢¢¢¢¢ ","","",""9 HI²1¤30:‡R$(I):‚I€ Rƒ" NOT AT END POINT! "," .....IS THAT ALL? "," STOPPED TOO SOON! "Ç \ƒ" YOU STILL THERE? ","BETTER TRY NURSING!"," YOU LEFT HANDED? 9 †J²1¤N:™"";:‚J:™"‘";:‹M²0§™"‘ ";™L$(M)šDD²EP«FD«SDH¤ML²µ((FDªSD)­.16)­100:™""£17ª21);MLX®‹DD±25§1830m¸‹DD±16§X²0:‰1810‚‹DD±11§X²1:‰1810–Ì‹DD±8§X²2:‰1810ªÖ‹DD±5§X²3:‰1810¾à‹DD±3§X²4:‰1810Òê‹DD±1§X²5:‰189!UD$²""SUP$²" "¡UT$²" ÕÓ ÐÏÐÕÌÁÔÉÏΠ    ": PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!***¹800: TITLE SCREENÐ ‰300: MENU SCREENì# +++ INPUT SECTION +++þ(UR$²"":UI$²9 "Ó*šÄP²1¤4¬DEL:‚Pð*¤Ä™Q$"¢¢¢¢¢ "+®ÄP²1¤3¬DEL:‚P1+¸Ä™H$"WHAT WE DO IS DETERMINE HOW MUCH ACID"^+ºÄ™" IT TAKES TO REACH THE 'END POINT'..."Š+ÂÄ™" THEN BY KNOWING THE STRENGTH OF THE"Å+ÌÄ™" ACIDWE CALCULATE THE STRENGTH9é%PÃQ$²""þ%ZÃH$²"",&dÃB$²" "Z&nÙ"Ž":™"THE PROBLEM IS TO DETERMINE THE"Š&xÙ"STRENGTH OF A CAUSTIC (NAOH) SOLUTION."œ&‚ÃP²1¤3¬DEL:‚P¿&ŒÃ™H$"WE TAKE A SMALL BEAKE9"!fƒ" ARE YOU SURE??? "," PAST END POINT! "," YOU BLEW THAT ONE!"U!pƒ"EASY!..LEAD FINGERS"," SNZZZZ! TOO SLOW! ","DON'T TAKE ALL DAY!"œ!zƒ" ARE YOU KIDDING? "," TRY ANOTHER JOB! "," DRIP! DRIP! DRIP! "ã!„ƒ" BETTER TRY AGAIN! "," YOU NEED P910æô‹DD±0§X²6:‰1810úþ‹DD²0§X²7:‰1810X²8=E²X¬4ª1¤X¬4ª4:™""E$(E)OP²1¤DL:‚P:‚EU&Že01360:DL²50‰:SD²SDª1:™""¼DD²1¤3:™".";:P²1¤40:‚P:™" ":‚D:1410ÆN1630èXK²Â9""*‹UL²0§UL²80-™" ";/2¡UI$:‹UI$²""§50S7‹UI$²Ç(13)¯Ã(UR$)±²1§™" ";:‰85f<‹UI$²Ç(20)§105z>‹ Ã(UR$)²±UL§50ŸA120: CHECK FOR VALID CHARACTER¯FUR$²UR$ªUI$¹K™UI$;ÁP‰50ÇU:ÍZ:Ó_:ÙdŽòf ++ CHECK DELETE ++i‹Ã(M OF THE":™" CAUSTIC."á+ÖÄ™Q$"¨¨¨¨¨¦¦¦¦¦"ê+àÄ835ó+åÄ™""ù+êÄŽ$B$B$B$B$H$"IF WE ADD TOO MUCH ACID, WE GO PAST"a*‹Ä™H$"IF WE ADD TOO MUCH ACID, WE GO PAST "‘*Ä™" THE 'POINT' OF THE REACTION... "Á*•Ä™" 9R..."Ñ&–ÃP²1¤2¬DEL:‚P ' Ã™Q$"§ Χ ¥§ ¥£££££"'ªÃP²1¤3¬DEL:‚PJ'´Ã™H$"AND PUT IN 10 ML OF THE CAUSTIC..."\'¾ÃP²1¤2¬DEL:‚Pn'ÈÙQ$"ÀÀÀÀÀ"€'ÒÃP²1¤3¬DEL:‚P²'ÜÙH$"THEN WE ADD SOME WATER (H2O)... " Ä'æÃ9RACTICE!","NOT BAD--NOT GOOD!!"*"Žƒ" I'VE SEEN WORSE! "," ...YOU FEELING OK?"," THAT'S THE IDEA! "q"˜ƒ" ....LOOKING GOOD! "," COULD BE FASTER ","....NEARLY PERFECT!"¸"¢ƒ" ...GETTING BETTER!","IS THAT YOU, GARRY?"," LOOKING FOR A JOB?"ÿ"¬ƒ"PER9(KBD):‹K²ZER§1850:*******ôb1370:Ž#v™"’ ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤"H€™£18ª21)" COMPUTER TITRATOR "jŠ™£18ª21)"TO OPERATE BURETTE"Š”™£19ª21)"PRESS (AND HOLD):"Ÿž™£16ª21)"¤¤¤¤¤Ä¨™£15ª21)" SPACE’....FOR FULL FLOWë²™£19UR$)³1§50nUR$²È(UR$,Ã(UR$)«1)-s™" ";:‰50Tx ++ CHECK FOR VALID CHARACTERS ++f}‹Ã(US$)²0§150w‚US²1¤Ã(US$)Ž‡‹UI$²Ê(US$,US,1)§Ž”Œ‚¡‘UI$²"":Ž¼– ** STANDARD INPUT **͘‹Æ(UI$)²46§ŽÞ›‹UI$²Ç(32)§Žû ‹Æ(UI$)³48°Æ(UI$)±57§: 2. STUDENT INSTRUCTIONS"@ E™" 3. TEACHER INSTRUCTIONS"\ O™" 4. QUIT"‹ T™" --------------------------------------"¼ Y™" PRESS NUMBER KEY (1-4) THEN ";ä ^UL²1:US$²"1234":35: INPUT ROUTINEï `US$²"" c9P²1¤2¬DEL:‚Pà'ðÙQ$"ÀÀÀÀÀ "ò'úÃP²1¤3¬DEL:‚P(Ä™H$"NOW, ACID (HCL) REACTS WITH CAUSTIC"L(Ä™"TO PRODUCE SALT (NACL) AND WATER..."^(ÄP²1¤4¬DEL:‚P‚("Ä*********** PRINVH$B$:PRINTB$±(,Ä™H$" NAOH + HCL ÃÃÃ> NACL + H2O "à(6Ä9FECT..WELL DONE!"," GREAT WORK! ","COULDN'T BE BETTER!"#¶Ž"#ÀTM²µ((Å(TI$)«TS)­10):R²0H#Ê‹X²7§R²µ((FD«SDª1)­(FDªSD«1)¬100){#Ô™""£18ª21)"¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤"ž#Þ™£18ª21)" ANALYSIS COMPLETE "®#èP²1¤500:‚Pë#ò™"‘‘‘"£17ª21)95ª21)" 0’.....FOR DROPS ONLY¼™£15ª21)" =’.....WHEN FINISHED/Æ™£23ª21)"ML 1.000 N HCL5ÐŽqÚI²1¤8:‡L$(I):‚I:ƒ"£’","·’","¸’","¢","¹","¯","¤"," "‡äI²1¤36:‡E$(I):‚Iœîƒ"¨","À","À","À"±øƒ"¢","¨","¨","À"σ"¢","¨¢¨","¨¨¨","9170¥Žª‹Æ(UI$)³65°Æ(UI$)±90§180$¯ŽH´‹Æ(UI$)³193°Æ(UI$)±218§UI$²"":ŽN»Ž[¾UI$²"":Žl, ** MENU **v.™"“"“1™" ÍENU"Â6™" --------------------------------------"ì;™" 1. BEGIN U S POPULATION" @™" :‘Å(UR$)1000,400,500,396 h‰300V ‹ ** REMOVE WINDOW, CLEAR SCREEN, AND LOAD SHIFT/RUN MENU **f Œ™"“":‰900q 875:Ž’  ** STUDENT INSTRUCTIONS **› •™"“"Á šUH²1:UP²0:UG$²"ÓTUDENT ÉNST":850ò Ÿ™" ";"ÔHIS PROGRAM LETS YOU TYPE IN FACTORS":E" ú™" PLEASE CONTACT:"4û™" ÃOMMODORE ÂUSINESS ÍACHINES"Wü™" 3370 ÐHARMACY ÁVE.{ý™" ÁGINCOURT, ÏNTARIO"þ™" ÃANADA Í1× 2Ë4"½ÿ™" (416) 499-4292"×UP²1: 835:UH²1: 850™" ÐRO:™"EDUCATIONAL8™"SOFTWARE9: ** COMMODORE LOGO **q;™È(UD$,24);"PRESS SPACE BAR OR WAIT’":I²0“<¡A$:‹A$³±" "§I²Iª1:‹I³250§828·>T1$²"":T2$²"":T3$²"":T4$²"":I²0À@‰300ÜC ** SPACE BAR PRESS **:ßœ 875妌ù°‡Y1,F2,J,T,F,I9 ºƒ 0,0,0,0,0,0ć B2 ÎN²3¤10+؇ B(N)2â‚N9ì‡MDöN²1¤4R N1²1¤16` ‡ M(N,N1)h‚N1o‚Ny(3840·2UH²1:UG$²"SET UP!":UP²0:850:UH²0:™" ÄO YOU WANT REPORTS"Û<™" 1) ÅVERY 5 YEAR I: "§300Û™ "“"å 875ïˆ F²1&‹(R«1)¬(R«2)¬(R«3)¬(R«4)¬(R«5)³±0§1790(0‹R²5§37906:‹R³4§1880@D2600JN‰1770YX‹Y1²0§2220gb‹Z²1§1960vl‹F2²1§1950‡v‹Y3±²Y1§1930€ˆJ²0ŠˆB2²B2ªJ§”‰1960²žˆ F2²0èˆB²(B2ªB1)­2̲ˆQ: &  ™" ";"THAT WILL CAUSE THE HUMAN POPULATION TO"R £™" ";"EXPAND, DWINDLE OR STAY STABLE."~ ¤™" ";"×HEN YOU RUN THE PROGRAM, THE "© ©™" ";"COMPUTER WILL PRINT THE FACTOR"Û ®™" ";"AND ASK YOU IF YOU WANT TO ASSUME " ³™" ";"THAT THE : GRAM ÎAME: Õ Ó ÐOPULATION$™" ×RITTEN ÂY : ÕNKNOWNM™" ÃONVERTED ÂY: ÍARILYN ÇARDNERt™" ÆÏÒ ÔÈÅ Â128 ÃÏÍÐÕÔÅÒœ ™" ÉF ERRORS ARE NOTED, CONTACT¼ ™" ÍARILYN ÇARDNERà ™" 1630 ÍADISON ÓTREET  ™: H™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"&JZZ²0¤9:¡ZZ$:‚ZZ=L¡UI$:‹UI$³±" "§844CNŽcR ** PAGE DESIGN ROUTINE **oTUP²UPª1™W™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)È\™" --------------------------------------"×`‹UH³±0§870 a: NTERVALùF™" 2) ÓELECTED YEARS"K™"  ";4PUS$²"12Q":UL²1:35:F1²Å(UR$):‹UR$²"Q"§300RZ‹ (F1«1)¬(F1«2)³±0 § 1330\_ 850ƒd™" ÙEAR AT START OF PROJECTION ";°nUS$²"1023456789.Q":UL²4:35:‹UR$²"Q"§300¾sY2²Å(UR$)Èv 850öx™" ÄO:²0ؼN²3¤10ïƈQ²QªB¬M(1,N)¬B(N)öЂNÚˆQ²Qª174845äˆI9²2667=îˆM(2,16)²M(4,16)¬(M(2,16)ªM(2,15)ªI9)gøˆM(1,16)²M(3,16)¬(M(1,16)ªM(2,15)ªI9)~ˆT²M(2,16)ªM(1,16)Š N²0¤13˜‹N±1§2100¥ ˆI9²2667°*‰ 2140¾4‹N±7§2130Ì>ˆI9²3:FACTOR IS STANDARD. ÔHE "? ¸™" ";"STANDARDS ARE FOR THE Õ.Ó.Á. ÔO PREDICT"o º™" ";"THE POPULATION FOR ANOTHER COUNTRY,"œ ™" ";"RESEARCH THE STANDARD MORTALITY,"¯ Ã835:UH²1:850â Ä™" ";"FERTILITY,BIRTH DISTRIBUTION,SEX RATIO" Å™" ";":" ÅVANSTON, ÉLLINOIS 60202# UP²2: 835:UH²1: 850H™" ÉF YOU WANT TO SUGGESTt™" ADDITIONAL EDUCATIONAL PROGRAMSœ™" TO BE WRITTEN FOR THE Â128"¸™" PLEASE CONTACT"Ø™" ÍARILYN ÇARDNERü™" :™È(UD$,24);È(UP$,7);"QUIT - PRESS Q "fUH²0:™"":Ž;k ** PLEASE WAIT REMARK **qp™È(UD$,24);" ONE MOMENT PLEASE... "wuŽš„ -- LOAD AND RUN MENU PROGRAMµ‰TT$²"0:SHIFT/RUN MENU"ÁŽ™Ç(147)Ç“™Í˜™î™"LOAD";: YOU ASSUME STANDARD FERTILITY? "Œ9000  2750ª™¯ 850?´™" ÓTANDARD BIRTH DISTRIBUTION?"IÈ9000ZÒ‹Q$²"Y"§1520`Üjæ3020tð 850ú™" ÄO YOU ASSUME STANDARD SEX RATIO"§9000¹‹Q$²"Y" §1590Ä, 2970Î6 850÷:5100ÖH‰2140åRˆI9²116200 \ˆ M(2,15«N)²M(4,15«N)¬(M(2,14«N)ªI9)7 fˆ M(1,15«N)²M(3,15«N)¬(M(1,14«N)ªI9)T pˆT²TªM(2,15«N)ªM(1,15«N)[ z‚Nr „ˆM(2,1)²M¬Q¬M(4,1) ŽˆM(1,1)²(1«M)¬Q¬M(3,1)¤ ˜ˆT²TªM(1,1)ªM(2,1)» ¢‹Y2ªY1¬5ª4³R9§2560Á ¬™Õ ±:AND POPULATION. ×HEN THE COMPUTER ASKS"H Æ™" ";"YOU IF IT SHOULD ASSUME STANDARD FERT-"| Ç™" ";"ILITY FOR EXAMPLE, THEN PRESS N FOR NO."­ È™" ";"THE COMPUTER WILL THEN PROMPT YOU TO"× É™" ";"ENTERTHE DATA THAT YOU HAVE "ï Ê™" ";"RESEARCHE: 1630 ÍADISON ÓTREET%™" ÅVANSTON, ÉLLINOIS 60202.8354N::WŽ`X ** PROGRAM MODIFICATION INST **iY™"“"Ž]UH²1:UP²0:UG$²"ÐROGRAM ÍOD":850—”835²:£»ŽÃ  ** T I T L E P A G E **Ð"™"“";æ$I²1¤38:™"¦’:Ç(34);TT$;Ç(34);",8"ô¢™ú§™¬™±™¶™ "RUN"À™ Ç(19))Ê—209,25Ô—939,13AÞ—940,13Gç€rè‹UZ²1§UZ²0: ** PROGRAM STARTS HERE **~é™"“";:ŒžL™"“":™£21ª17)"ÕÓÐÏÐ’"ÏV™" ÃOPYRIGHT, ÓUNY ÓTONY ÂROOK, 1978"Ø[835:@™" ÄO YOU ASSUME STANDARD MORTALITY"T9000^‹Q$²"Y"§1660r3170"|™L†™" ÄO YOU ASSUME STANDARD POPULATION"Vš9000h¤‹Q$²"Y" §1730s¸ 3240€Â N²1¤16—̈T²TªM(1.N)ªM(2,N)žÖ‚N¯à‹ F²1 § 1880¹ê3840àïUH²1:UG$²"ÒEPORT:UH²1: 850:UH²0ò ¶™" ÙEAR";Y2ªY1¬5;"ÐOP=";!À‹T³1E6§2270!Ê™ µ(T­1E5ª.5)­10;"!Ô‰22801!Þ™ µ(Tª.5);E!è™"ÆERTILITY";B2N!òˆF²0b!ü‹T¬(R«1)²0§2500q! ‹R³±3§2350! ™£21ª20);"PCT. TOTAL POP."ž! ™" 75+‘"¨!$ ‰2360Û!. ™" ÁGES";£21ª10);"ÆEMAL:D."ø å835æ****POKE59468,12ê:óŽ;ô ** TEACHER INSTRUCTIONS **Dõ™"“"jöUP²0:UG$²"ÔEACHER ÉNST":UH²1:850˜÷™" ÔO THE BEST OF OUR KNOWLEDGE,"Áø™" THIS PROGRAM IS IN THE PUBLIC"íù™" DOMAIN. ÉF THIS IS NOT THE CAS:";:‚þ&I²1¤22:™"¦’";:‚(I²1¤37:™"¦’";:‚.*I²1¤22:™"‘¦’";:‚S,™"© ’u.™" ’  ’©–0™" ’ £ß´2™"ß ’Ü4™"C O M M O D O R Eÿ6:ó`UG$²"":UP²0:UH²1: 850$j™" ÔHE ÈUNTINGTON ÉÉ ÓIMULATION, Õ Ó ÐOP, "Ut™" HAS BEEN ADAPTED FOR THE Â128. ÐLEASE "†~™" USE THE DIRECTIONS IN THE ÈUNTINGTON ÉÉ "·ˆ™" MANUAL, SUPPLIED BY ÄIGITAL ÅQUIPMENT, "Å’™" ÃORP."Õ— 835:™ "“":S":UP²0: 850:UH²0 ô™" ÒEPORT: (POPULATION IN MILLIONS) ")þ PRINT" 1. ÓHORT"Dÿ™" 1. ÐOPULATION"Z™" 2. ÇRAPH"}™" 3. ÃHANGE ÁSSUMPTIONS"’™" 4. ÑUIT"Ñ™ £21ª5);"";:US$²"1234Q":UL²1:35:R²Å(UR$)ª1:‹UR$²"Q;ES ÍALES ÐCT.ÔOTAL"ç!8 N²1¤16ö!B ‹N²16§2400"L ™Ä((N«1)¬5);" -";N¬5«1;"V ‰2410/"` ™" 75 & OVER";="j ‹R²3§2460m"t ™£21ª11);µ(M(1,N)­1E5)­10,µ(M(2,N)­1E5)­10,"~ ™µ((M(1,N)ªM(2,N))¬1000­T)­10™"ˆ ‰2470¨" ™ " 75+";Ý"œ ™£21ª10);".";£21ª10ª2;€*NB ÆILENAME "ÁNNOTATD ÄIRCTRY" €*LM1:RM79 0 "PUB DOM ED SCI B" E3 2C 14 "SHIFT/RUN MENU" PRG LOADS PROGRAMS; PROGRAMS RETURN HERE 1 "--SCIENCE III---" PRG 42 "INTERFERENCE" PRG DEMONSTRATION OF INTERFERENCE OF WAVES 29 "ION" ;10," ";À,¬ ‰ 3520ß,¶ ™ µ(M(I,N)­1E5ª.5)­10," "; -À US$²"0123456789.Q":UL²3:35:‹UR$²"Q"§300-Å Z2²Å(UR$)(-Ê ‹I±2§35701-Ô 835D-Þ ˆM(I,N)²Z2¬1E6N-è ‰3620d-ò ˆ M(I,N)²1«Z2­1E3x-ü ‹M(I,N)³²1§3600†-ˆM(I,N)²1š-‹M(I,N)±²0§3620¨-ˆM(I,N)²0¯-$;3;" ? ";î'^ US$²"0123456789.Q":UL²5:35:‹UR$²"Q"§300ü'c Y3²Å(UR$) (h ‹Y3³²0§2900$(r ‹Y3¬2³±µ(Y3¬2)§2900:(| ˆJ²(B3«B2)­(Y3¬2)J(† ˆY3²Y3¬2ªY1P( Žr(š ™:™" PERCENT FEMALE BIRTHS ";Ÿ(¤ US$²"0123456789.Q":UL²3:35:‹UR$²"Q"§300¬(© M²Å(UR$)»(® ˆM²1«;00¬(M(1,N)ªM(2,N))­T­5);"*"ä"¦ ‚Nó"° ‹R³±3§2495#º ™£21ª10);"0.........5........10""#¿ 8352#Ä ‹ F1²1§2570<#É 850[#Î ™" ÙEAR FOR NEXT REPORT ";‡#Ø US$²"0123456789Q":UL²5:35:‹UR$²"Q"§300•#Ý R9²Å(UR$)¬#â ‹ Y2ªY1¬5³R9 §2570¶#ç 850à#ì ™" ÙE; WATER 49 "REG PWR SUPPLY" PRG DESIGN POWER SUPPLIES, OPTIONAL PRINTOUT 69 "REMEDIAL NOMENCL" PRG DRILL ON CHEMICAL NOMENCLATURES 44 "S.I. CONVERSIONS" PRG DRILL ON METRIC CONVERSIONS 34 "SPECIFIC HEAT" PRG FACILITATES GRADING OF; PRG QUIZ ON ION CHARGES AND FORMULAE 32 "LOCKEY" PRG LOCK AND KEY HYPOTHESIS STUDY OF AN ENZYME 45 "METER READ" PRG DEMO OF READING A PHOTOGRAPHIC LIGHT METER 48 "METRIC VOLUME" PRG QUIZ ON CONVERTING ONE M; ‚Nµ-.Ž¿-8ƒ2.45ì-Bƒ.002,.143,.338,.285,.147,.066,.018,.001ö-Lƒ.515,.Vƒ8.430E6,9.749E6,10.209E6,9.492E6,8.531E6,6.931E6a.`ƒ5.834E6,5.703E6,6.116E6,6.293E6,5.747E6,5.221E6†.jƒ4.612E6,3.756E6,3.263E6,4.697E6½.tƒ8.753E6,10.127E6,10.596E6,9.79; M­100Ñ(¸ ‹ ¶(M«.5)±.5§2970×( Žá(Ç 850)Ì ™" % FERTILITY OCCURING IN FEMALES AGES:")Ö ˆT²0%)à N²3¤106)ê ‹N²10 § 3080N)ô ™(N«1)¬5;"-";N¬5«1;X)þ ‰3090n) ™" 45 AND OLDER";›) US$²"0123456789.Q":UL²3:35:‹UR$²"Q"§300«) B(N)²Å(UR$)¾) ˆB(N; AR MUST BE GREATER THAN";Y2ªY1¬5ê#ö ‰2510õ#ú ‰ 2470$ YEAR COUNTER$ ˆ Y1²Y1ª1!$ ˆB1²B2,$ ‰ 17602$( ™W$2 ™"“WHAT DO YOU WANT TO CHANGE?"o$< ™" 1. FERTILITY"$= ™" 2. BIRTH DISTRIBUTION"¨$> ™" 3. SEX RATIO"À$? ™" 4. MORTALIT; LAB TEST ON SP.HT. 31 "STOICH" PRG SOLVING STOICHIOMETRIC EQUATIONS 49 "TEMP CONVERSION" PRG QUIZ ON ËELVIN/ÃELSIUS CONVERSIONS 41 "TITRATE" PRG GRAPHIC SIMULATION 46 "USPOP" PRG POPULATION GROWTH SIMUL;ETRIC UNIT TO ANOTHER 57 "MICROSCOPY" PRG TUTORIAL ON MICROSCOPE OPERATION 27 "MOLAR" PRG MOLAR CALCULATIONS WITH USER-INPUT MASS 35 "MOTORCYJUMP" PRG SIMULATION WITH DISTANCE, ANGLE, SPEED VARIABLE 52 "NOMENCLATURE;3E6,8.645E6,6.827E6ò.~ƒ5.686E6,5.505E6,5.802E6,5.917E6,5.312E6,4.771E6/ˆƒ4.044E6,3.075E6,2.372E6,2.994E6L/’ƒ.982188,.997241,.998528,.997810,.996649,.996013y/œƒ.994799,.992589,.988883,.983307,.975232¦/¦ƒ.965217,.948579,.921060,.878601,.662675Ó;)²B(N)­100Ì)& ˆT²TªB(N)Ó)0 ‚Nè): ‹¶(T«1)³.02§3160*D ™"TOTAL MUST BE 100"*I ™"‘‘‘‘‘‘‘‘‘‘"*N ‰3030#*X Ž,*b ˆI²3]*l ™:™"CHANGE IN MORTALITY OCCURING IN FEMALES"g*v 3290p*€ ˆI²4Ÿ*Š ™:™"CHANGE IN MORTALITY OCCURING IN MALES"ª*” 3290°*ž Ž¾;Y"Ù$@ ™" 5. POPULATION"ó$A ™" ";#%P US$²"12345Q":UL²1:35:Q²Å(UR$):‹UR$²"Q"§3008%Z ‹µ(¶(Q))³±Q§2620K%d ‹¶(Q«3)±2§2620Y%n ‹Q±1§2690c%x ‰2760q%‚ ‹Q±2§2710{%Œ ‰3020‰%– ‹Q±3§2730“%  ‰2970¡%ª ‹Q±4§3240«%´ ‰3170¼%¾ ‹Q$²"Y"§2810èATION 33 "YOUNG" PRG SIMULATION OF ÙOUNG'S DOUBLE SLIT EXPERIMENT 24 "PUB DOM NOTES" SEQ NOTES ON THIS SERIES OF PROGRAMS 8 "ÁNNOTATD ÄIRCTRY" SEQ WHAT YOU ARE READING NOW 935 BLOCKS FREE. FACILITATES GRADING OF;" PRG DRILL WITH RADICALS, ACIDS, OUS-IC COMPOUNDS 82 "NUCLEAR REACTOR" PRG GRAPHIC SIMULATION OF NUCLEAR POWER PLANT 27 "PERCENT" PRG CALCULATES PERCENT COMPOSITION BY MASS 28 "PERIODIC TABLE" PRG ELEMENTS, SYMBOLS, AND;/°ƒ.977536,.996465,.997803,.995070,.9903840ºƒ.989478,.989692,.987119,.981037,.970752,.95488350ă.930882,.893099,.843550,.779330,.590070?0Î 850[0Ø™ " ÁNOTHER PROJECTION"e0â9000v0ì‹Q$²"Y"§11900ö‰300…0‹0Žª0(#™"  YES OR NO (Y/;*¨ 850:I²1ã*² ™:™"CHANGE IN FEMALE POPULATION"î*¼ 3290÷*Æ ˆI²2+Ð ™:™"CHANGE IN MALE POPULATION">+Ú ™:™"GROUPS (FROM AGE, TO AGE)";H+ä 9500W+î ‹Q²Q1§3630g+ø ˆQ²µ(Q­5)ª1y+ ˆQ1²µ(Q1­5)ª1ˆ+ ‹Q1³Q§3290–+ ‹Q³1§3290¦+ ‹Q1³16§3380±+* ˆQ1²1;Ü%È ™:™" FERTILITY IN";Y2ªY1¬5;ë%Ò ‹Y1²0§2790õ%Ü ˆF2²1"&æ US$²".0123456789Q":UL²3:35:‹UR$²"Q"§3000&ë B2²Å(UR$)?&ð ‹B2³0§2760I&õ 850b&ú ™:™" WILL FERTILITY}& ™"  (1)STAY AT";B2;"¨& ™"  (2)CHANGE SLOWLY TO A NEW LEVEL"â& ™£21ª4);"";:; VALENCES 1 "---SCIENCE IV---" PRG 86 "PH PROBLEMS" PRG DRILL ON FINDING PH OF VARIOUS SOLUTIONS 34 "PHOTOSYNTHESIS" PRG SIMULATION OF PHOTSYNTHESIS EXPERIMENTS 49 "POLLUTION" PRG SIMULATES WASTE/OXYGEN CONTENT OF BODY OFmN)";Õ0+#US$²"YNQ":UL²1:35:Q$²UR$:‹UR$²"Q"§300Û0-#Ž 1%US$²"0123456789,Q":UL²12:35:‹UR$²"Q"§3001&%Ž6L/’ƒ.982188,.997241,.998528,.997810,.996649,.996013y/œƒ.994799,.992589,.9888:3,.983307,.975232¦/¦ƒ.965217,.948579,.921060,.878601,.662675Ó;6Ô+4 ™"GROUP","CURRENT","NEW VALUE"å+> ‹ I³3 § 3420û+H ™" ","DEATH/1000",R ‰ 3430(,\ ™£21ª9);"POPULATION MILLIONS"4,f N²Q¤Q1C,p ‹N²16§3470[,z ™(N«1)¬5;"-";N¬5«1,e,„ ‰3480v,Ž ™" 75+ ",‡,˜ ‹ I³3 § 3510µ,¢ ™µ(10¬(1000«µ(M(I,N)¬1E4ª.5)­10))­;US$²"12Q":UL²1:35:Z²Å(UR$):‹UR$²"Q"§300û&" ‹(Z«1)¬(Z«2)³±0§2810 ', ‹Z³±2§29604'6 ™:™" WHAT FERTILITY WILL BE STABLE ";a'@ US$²"0123456789.Q":UL²3:35:‹UR$²"Q"§300o'E B3²Å(UR$)~'J ‹B3³0§2870Á'T ™:™" ÈOW MANY DECADES UNTIL FERTILITY":™" REACHES ";B