Home » Personal collection » Acorn tapes » Commercial_Releases » micropower_tape01a_acorn_which_salt.wav » SALT

SALT

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Acorn tapes » Commercial_Releases » micropower_tape01a_acorn_which_salt.wav
Filename: SALT
Read OK:
File size: 3F3C bytes
Load address: 0E00
Exec address: 8023
Duplicates

There are 5 duplicate copies of this file in the archive:

File contents
   10REM"MAINPROG"
   20ON ERROR RUN
   30PROCI
   40REPEAT
   50PROCS:MODE5:PROCH:MODE5:PROCF:MODE5:PROCHT:MODE5:PROCA:MODE5:PROCN:MODE4:PROCW:MODE4:PROCE
   60UNTIL FALSE:END
   80DEFPROCS:IFG%=1THENB%=R%(1)-1:PROCR:ENDPROC
   90X=RND(-TIME):H%=RND(G%):B%=R%(H%)-1:FORJ%=H%TOG%-1:R%(J%)=R%(J%+1):NEXT:G%=G%-1:IFB%=0THENA%=1
  100IFB%>0ANDB%<6THENA%=2
  110IFB%>5ANDB%<11THENA%=3
  120IFB%>10ANDB%<14THENA%=4
  130IFB%>13ANDB%<20THENA%=5
  140IFB%>19ANDB%<22THENA%=6
  150IFB%>21THENA%=7     
  160C%=ASC(N$(B%))-48:E%=ASC(MID$(N$(B%),2,1))-48:S%=100:IFC%=1ORC%=3THENF%=C%:D%=C%ELSEIFC%=2THENF%=2:D%=5ELSEIFC%=4THENF%=6:D%=6ELSEF%=7:D%=8
  170ENDPROC
  180DEFPROCR:G%=24:FORJ%=1TO25:R%(J%)=J%:NEXT:ENDPROC
  190DEFPROCH:IFE%=7THENVDU19,0,4;0;ELSEVDU19,3,0;0;19,0,7;0;
  200PRINTTAB(6,1)"ANALYSIS"TAB(6,2)STRING$(8,CHR$240):MOVE516,634:DRAW516,864:DRAW540,884:DRAW540,904:PLOT85,700,904:MOVE540,884:PLOT85,700,884:DRAW720,864:DRAW720,634:DRAW516,634:PRINTTAB(6,2)STRING$(8,CHR$240)
  210MOVE516,634:DRAW516,864:DRAW540,884:DRAW540,904:PLOT85,700,904:MOVE540,884:PLOT85,700,884:DRAW720,864:DRAW720,634:DRAW516,634:VDU18,0,2,19,2,E%;0;23,1,0;0;0;0;:MOVE524,638:MOVE712,638:PLOT85,524,744:PLOT85,712,694
  220PRINTTAB(0,13)"The bottle contains an ionic compound.Itis ";D$(E%);" powder"':IF B%<5THEN PRINT "It does not dissolvein water"'ELSE PRINT"It is soluble in    water"'
  230PRINT"Use the following   tests to name the   compound"''''" Initial score=100"''"  Each extra test"'"  costs 10 points"
  240VDU17,1,19,1,15;0;:PRINTTAB(1,31)"CONTINUE-SPACE BAR";:*FX15,1 
  250REPEAT:I%=GET:UNTILI%=32:ENDPROC
  260DEFPROCF:VDU23,1,0;0;0;0;17,0,17,131,24,0;348;1279;860;19,3,0;0;19,0,7;0;12,16:PRINTTAB(4,2)"FLAME TEST"TAB(4,3)STRING$(10,CHR$240)
  270MOVE240,560:DRAW216,640:DRAW208,660:DRAW216,700:DRAW304,840:DRAW392,700:DRAW400,660:DRAW392,620:DRAW368,560:DRAW304,640:DRAW248,560:MOVE248,556:DRAW360,556:PLOT85,248,352:MOVE360,352:PLOT85,360,556:VDU18,3,3
  280PROCWIRE(768):PROCP(100):W%=768:REPEAT:PROCWIRE(W%):W%=W%-16:PROCWIRE(W%):PROCP(5):UNTIL W%=368:PRINTTAB(1,24)"The flame shows"TAB(1,25)D$(D%);" colour"TAB(5,30)"SPACE BAR":VDU18,0,2,19,2,F%;0;:MOVE276,656:MOVE368,656:PLOT85,304,832
  290*FX15,1
  300REPEAT:VDU19,2,7;0;:I%=INKEY(1):VDU19,2,F%;0;:I%=INKEY(20):UNTIL I%=32:ENDPROC
  310DEFPROCWIRE(X%):MOVEX%,656:PLOT9,-68,8:PLOT9,-24,-12:PLOT9,250,0:PLOT9,0,12:PLOT9,200,0:PLOT9,0,-24:PLOT9,-200,0:PLOT9,0,12:ENDPROC
  320DEFPROCHT:P%=1:VDU23,1,0;0;0;0;19,2,E%;0;:PRINTTAB(3,1)"ACTION OF HEAT"TAB(3,2)STRING$(14,CHR$240):PROCTT(720,850):IFB%=0THENPROCFILL(720,850,240,3,2)ELSEPROCFILL(720,850,240,2,2)
  330PRINTTAB(2,5)"Heat"TAB(1,6)"gives..":IFB%=19ORB%=21PROCSUB:GOTO500
  340PROCP(200):IFB%=0OR B%=5 OR B%>12THENPRINTTAB(0,12)"NO CHEMICAL"TAB(2,13)"CHANGE":GOTO500
  350IFC%=2PRINTTAB(1,8)"a black":K%=0
  360IFC%=1ORB%=6ORB%=11PRINTTAB(1,8)"a white":K%=7
  370IFC%=4ORC%=6PRINTTAB(1,8)"a yellow":K%=3
  380IFB%=12THENPRINTTAB(1,8)"a reddish":K%=1 
  390PRINTTAB(0,9)"residue in"TAB(1,10)"the tube":PROCFILL(720,850,240,0,0):VDU19,2,K%;0;:IFC%=2THENPROCFILL(720,850,280,3,2)ELSEPROCFILL(720,850,280,2,2)
  400IFC%=6PROCP(200):PRINTTAB(0,12)"-goes white"TAB(0,13)"on cooling":VDU19,2,7;0;:PROCFILL(720,850,280,2,2)
  410IFB%=11THENPROCP(250):PRINTTAB(0,12)"Blackens on"TAB(0,13)"more heat":VDU19,2,0;0;:PROCFILL(720,850,280,3,2)
  420PROCP(100):IFB%>6ANDB%<11 THENPRINTTAB(3,16)"BROWN"ELSEPRINTTAB(0,16)"COLOURLESS"
  430PRINTTAB(0,17)"GAS EVOLVED"TAB(0,19)"WHICH TEST?"TAB(0,21)"1.Universal"TAB(0,23)"2.Limewater"TAB(0,25)"3.Glowing"TAB(2,26)"splint"TAB(3,30)"SPACEBAR TO END"     
  440REPEAT:*FX15,1
  450J%=GET
  460IFJ%=49PROCUNIV(720,850):S%=S%-10
  470IFJ%=50PROCLIME(720,850):S%=S%-10
  480IFJ%=51PROCSPL:S%=S%-10
  490UNTILJ%=32:ENDPROC
  500REPEAT:I%=GET:UNTILI%=32:ENDPROC
  510DEFPROCTT(X%,Y%):MOVEX%,Y%:DRAWX%,Y%-300:DRAWX%+32,Y%-340:DRAWX%+56,Y%-340:DRAWX%+88,Y%-300:DRAWX%+88,Y%:ENDPROC
  520DEFPROCFILL(X%,Y%,L%,M1%,M2%):VDU18,0,M1%:MOVEX%+80,Y%-L%:DRAWX%+8,Y%-L%:VDU18,0,M2%:MOVEX%+80,Y%-L%-4:MOVEX%+80,Y%-304:PLOT85,X%+8,Y%-L%-4:PLOT85,X%+8,Y%-304:PLOT85,X%+32,Y%-336:PLOT85,X%+80,Y%-304:PLOT85,X%+56,Y%-336:VDU18,0,3:ENDPROC
  530DEFPROCDEL(X%,Y%):MOVEX%+8,Y%:DRAWX%+28,Y%:MOVEX%+60,Y%:DRAWX%+80,Y%:MOVEX%+8,Y%-32:DRAWX%+28,Y%-32:MOVEX%+60,Y%-32:DRAWX%+80,Y%-32:MOVEX%+36,Y%-48:DRAWX%+36,Y%+48:DRAWX%+452,Y%+48:DRAWX%+452,Y%-280
  540MOVEX%+52,Y%-48:DRAWX%+52,Y%+40:DRAWX%+436,Y%+40:DRAWX%+436,Y%-280:ENDPROC
  550DEFPROCUNIV(X%,Y%):VDU18,0,1,19,1,2;0;:MOVE X%+28,Y%-20:DRAWX%+68,Y%-20:PLOT85,X%+28,Y%+60:PLOT85,X%+68,Y%+60:PROCP(200)
  560IFB%>0ANDB%<5THENPRINTTAB(13,20)"slight"TAB(12,21)"-red pH4"ELSE IF B%>6ANDB%<13PRINTTAB(12,21)"-red pH1"ELSEPRINTTAB(13,20)"neutral"TAB(12,21)"- pH7" 
  570IF B%<>6THEN VDU19,1,1;0;
  580PROCP(150):VDU18,0,0:MOVE X%+28,Y%-20:DRAWX%+68,Y%-20:PLOT85,X%+28,Y%+60:PLOT85,X%+68,Y%+60:VDU18,0,3:ENDPROC
  590DEFPROCSPL:J%=1000:PROCDRSPL(1):PROCP(50):REPEATPROCDRSPL(1):J%=J%-8:PROCDRSPL(1):PROCP(5):UNTILJ%=800:PROCP(100):IFA%=3THENVDU18,0,1,19,1,3;0;:PLOT85,760,920:PRINTTAB(12,25)"-lights" ELSE VDU19,1,7;0;:PRINTTAB(12,26)"-put out"
  600PROCP(150):PROCDRSPL(7):VDU18,0,0:PLOT85,760,920:VDU18,0,3:ENDPROC
  610DEFPROCSUB:PRINTTAB(0,13)"Substance"TAB(0,14)"disappears"TAB(0,15)"from hot"TAB(0,16)"part of tube":FORJ%=240TO304STEP4:PROCFILL(720,850,J%,0,3):IFJ%=264MOVE728,800:DRAW728,700:MOVE800,800:DRAW800,700
  620IFJ%=288MOVE736,720:DRAW736,790:MOVE792,790:DRAW792,720
  630PROCP(10):NEXT:PRINTTAB(13,6)"and"TAB(13,7)"reforms"TAB(13,8)"on cool"TAB(13,9)"part":ENDPROC
  640DEFPROCP(J%):T%=TIME+J%:REPEATUNTILTIME>=T%:ENDPROC
  650DEFPROCDRSPL(K%):VDU18,3,3:MOVEJ%,858:PLOT9,256,0:PLOT9,0,4:PLOT9,-264,0:VDU18,3,1,19,1,K%;0;:PLOT9,-56,0:PLOT9,0,-4:PLOT9,64,0:ENDPROC
  660DEFPROCA:VDU23,1,0;0;0;0;12:IFC%=2ORC%=7ORC%=8ORC%=9 THENVDU19,0,7;0;19,3,0;0;
  670PRINTTAB(0,1)"ADD ALKALI-to soln."TAB(0,2)STRING$(10,CHR$240):IFB%>4PRINTTAB(11,2)"in water"ELSEPRINTTAB(11,2)"in HCl"
  680IFC%=9THENPROCAMM:ENDPROC
  690PRINTTAB(0,4)"a)SODIUM HYDROXIDE"TAB(0,5)STRING$(18,CHR$241)TAB(0,17)"b)AMMONIA SOLUTION"TAB(0,18)STRING$(18,CHR$241)TAB(5,31)"SPACE BAR";
  700PROCTT(8,832):PROCTT(648,832):PROCTT(8,416):PROCTT(648,416):PRINTTAB(2,6)"Add"TAB(2,7)"small"TAB(2,8)"amount-"TAB(12,6)"Add"TAB(12,7)"excess-"TAB(2,19)"Add"TAB(2,20)"small"TAB(2,21)"amount-"TAB(12,19)"Add"TAB(12,20)"excess-"
  710IFC%=7THENVDU19,1,2;0;ELSEIFC%=8VDU19,1,3;0;ELSEIFC%=2VDU19,1,6;0;ELSEVDU19,1,7;0;
  720IFC%=3PRINTTAB(2,11)"clear"TAB(2,12)"soln.":PROCFILL(8,832,200,1,0):GOTO750 
  730IFC%=7PRINTTAB(2,10)"dirty"TAB(2,11)"green"ELSE IF C%=8PRINTTAB(2,10)"orange-"TAB(2,11)"yellow"ELSEIFC%=2PRINTTAB(2,10)"pale"TAB(2,11)"blue"ELSEPRINTTAB(2,11)"white"
  740PROCFILL(8,832,200,1,1):PRINTTAB(2,12)"ppte."
  750IFC%>2ANDC%<7PRINTTAB(12,11)"clear"TAB(12,12)"soln.":PROCFILL(648,832,100,1,0):GOTO780
  760IFC%=7PRINTTAB(12,10)"dirty"TAB(12,11)"green"ELSE IF C%=8PRINTTAB(12,10)"orange-"TAB(12,11)"yellow"ELSEIFC%=2PRINTTAB(12,10)"pale"TAB(12,11)"blue"ELSEIFC%=1PRINTTAB(12,11)"white"
  770PRINTTAB(12,12)"ppte.":PROCFILL(648,832,100,1,1)
  780IF C%=3 OR C%=1THEN PRINTTAB(2,24)"clear"TAB(2,25)"soln.":PROCFILL(8,416,200,1,0):GOTO810 
  790IFC%=7PRINTTAB(2,23)"dirty"TAB(2,24)"green"ELSE IF C%=8PRINTTAB(2,23)"orange-"TAB(2,24)"yellow"ELSEIFC%=2PRINTTAB(2,23)"pale"TAB(2,24)"blue"ELSEPRINTTAB(2,24)"white"
  800PRINTTAB(2,25)"ppte.":PROCFILL(8,416,200,1,1)
  810IFC%=6ORC%=3 OR C%=1THEN PRINTTAB(12,24)"clear"TAB(12,25)"soln.":PROCFILL(648,416,100,1,0):GOTO850
  820IFC%=7PRINTTAB(12,23)"dirty"TAB(12,24)"green"ELSE IF C%=8PRINTTAB(12,23)"orange-"TAB(12,24)"yellow"ELSEIFC%=2PRINTTAB(12,23)"deep"TAB(12,24)"blue"ELSEPRINTTAB(12,24)"white"
  830IFC%=2PRINTTAB(12,25)"soln.":VDU19,2,4;0;:PROCFILL(648,416,100,2,2):GOTO850
  840PRINTTAB(12,25)"ppte.":PROCFILL(648,416,100,1,1)
  850REPEAT:I%=GET:UNTILI%=32:ENDPROC
  860DEFPROCAMM:Q%=1:PROCTT(16,860):PROCFILL(16,860,280,3,0):PROCP(100):PRINTTAB(2,5)"Addition of dilute"TAB(2,6)"sodium hydroxide-":PROCFILL(16,860,220,3,0):PROCP(100):PRINTTAB(2,9)"gives off a "TAB(2,10)"pungent gas"
  870PRINTTAB(0,17)"Press(1)to test gas"TAB(2,30)"SPACE BAR TO END":*FX15,1
  880REPEAT:I%=GET:IFI%=49THENPROCBLUE(16,860):S%=S%-10
  890UNTILI%=32:ENDPROC
  900DEFPROCBLUE(X%,Y%):VDU17,1,18,0,1,19,1,2;0;:MOVE X%+28,Y%-20:DRAWX%+68,Y%-20:PLOT85,X%+28,Y%+60:PLOT85,X%+68,Y%+60:IFQ%=0ENDPROC
  910PRINTTAB(0,21)"It turns universal"TAB(0,22)"paper":PROCP(200):VDU19,1,4;0;:PRINTTAB(6,22)"blue":ENDPROC
  920DEFPROCLIME(X%,Y%):PROCTT(X%+400,Y%):PROCFILL(X%+400,Y%,180,3,0):PROCDEL(X%,Y%):VDU18,3,3:T%=TIME:REPEAT:MOVEX%+468,Y%-286:FORJ%=Y%-282TOY%-182STEP4:DRAWX%+468,J%:MOVEX%+468,J%-4:DRAWX%+468,J%:NEXT:UNTILTIME>=T%+400:VDU18,0,3
  930IFP%=0ANDB%=5THENPROCFILL(X%+400,Y%,180,3,3)
  940IFB%>0ANDB%<5THENPROCFILL(X%+400,Y%,180,3,3)
  950IFP%=0ENDPROC 
  960IFB%>0ANDB%<5PRINTTAB(12,23)"-white"TAB(13,24)"ppte."ELSEPRINTTAB(12,23)"-nothing"
  970PROCP(200):VDU18,0,0:PROCDEL(720,850):PROCTT(1120,850):PROCFILL(1120,850,180,0,0):VDU18,0,3:ENDPROC
  980DEFPROCN:PRINT'"TESTS FOR ANIONS"'STRING$(16,CHR$240)'"1)Hydrochloric acid 2)Silver nitrate"'"3)Barium chloride"'"4)Chlorine water"'"5)Sodium hydroxide"'"   and zinc powder"TAB(2,31)"SPACE BAR TO END";
  990VDU24,0;128;1184;700;23,1,0;0;0;0;:*FX15,1
 1000REPEAT:I%=GET:IFI%=49PROCACID:S%=S%-10
 1010IFI%=50PROCAG:S%=S%-10
 1020IFI%=51PROCBA:S%=S%-10
 1030IFI%=52PROCCL:S%=S%-10   
 1040IFI%=53PROCZN:S%=S%-10 
 1050UNTILI%=32:ENDPROC
 1060DEFPROCACID:IFE%<>7ANDA%<>2VDU18,0,0,18,0,131ELSEVDU18,0,3,18,0,128
 1070VDU5,19,1,E%;0;16:PROCTT(480,576):PROCFILL(480,576,290,1,1)
 1080IFE%<>7ANDA%<>2VDU18,0,0 
 1090IFB%=0VDU19,2,4;0;:N%=2ELSEN%=1  
 1100IFE%=7ORA%=2O%=0ELSEO%=3
 1110MOVE0,608:PRINT"Add":MOVE0,576:PRINT"dilute":MOVE0,544:PRINT"HCl-":PROCP(100):PROCFILL(480,576,210,N%,O%):IFE%<>7ANDB%<>1VDU18,0,0  
 1120IF B%=0MOVE640,608:PRINT"blue":MOVE640,576:PRINT"solution":ENDPROC
 1130IFA%<>2MOVE640,608:PRINT"clear":MOVE640,576:PRINT"solution":ENDPROC
 1140MOVE0,480:PRINT"gas":MOVE0,448:PRINT"evolved":T%=TIME+300:REPEATPROCB:UNTIL TIME>T%:MOVE0,700:PRINT"6)Test gas evolved":*FX15,1
 1150I%=GET:IFI%=54P%=0:PROCLIME(480,576):MOVE8,224:PRINT"White precipitate":MOVE8,192:PRINT"with limewater":S%=S%-10ELSEGOTO 1010
 1160ENDPROC
 1170DEFPROCB:VDU18,3,3:FORJ%=264TO360STEP4:PLOT69,508,J%:PLOT69,532,J%+4:PLOT69,524,J%-20:PLOT69,548,J%-16:PLOT69,508,J%:PLOT69,532,J%+4:PLOT69,524,J%-20:PLOT69,548,J%-16:NEXT:ENDPROC
 1180DEFPROCAG:VDU18,0,3,18,0,128,16,5,19,1,E%;0;:PROCTT(480,576):PROCFILL(480,576,290,1,1):MOVE0,576:PRINT"Add":MOVE0,544:PRINT"dilute":MOVE0,512:PRINT"nitric":MOVE0,480:PRINT"acid":IFB%=0VDU19,2,4;0;:N%=2ELSEN%=1
 1190PROCP(100):PROCFILL(480,576,210,N%,0):IFA%=2THENT%=TIME+200:REPEATPROCB:UNTILTIME>T%:ELSEPROCP(100):MOVE0,416:PRINT"then":MOVE0,384:PRINT"silver":MOVE0,352:PRINT"nitrate":IFA%=5ORA%=6PROCFILL(480,576,130,3,3)
 1200IFA%=7VDU19,2,3:PROCFILL(480,576,130,2,2)
 1210IFA%<5PROCFILL(480,576,130,N%,0) 
 1220MOVE640,576:IFA%=5PRINT"white"ELSEIFA%=6PRINT"cream"ELSEIFA%=7PRINT"yellow"
 1230IFA%>4MOVE640,544:PRINT"ppte.":ENDPROC 
 1240PRINT"clear":MOVE640,544:PRINT"solution":ENDPROC
 1250DEFPROCBA:VDU18,0,3,18,0,128,16,5,19,1,E%;0;:PROCTT(480,576):PROCFILL(480,576,290,1,1):IFB%=0VDU19,2,4;0;:N%=2ELSEN%=1
 1260MOVE0,608:PRINT"Add":MOVE0,576:PRINT"dilute":MOVE0,544:PRINT"HCl-":PROCP(100):PROCFILL(480,576,210,N%,0):IFA%=2THENT%=TIME+200:REPEATPROCB:UNTILTIME>T%ELSEPROCP(100)
 1270MOVE640,608:PRINT"then":MOVE640,576:PRINT"barium":MOVE640,544:PRINT"chloride":IFA%=4THENPROCFILL(480,576,130,3,3):MOVE640,480:PRINT"white":MOVE640,448:PRINT"ppte.":ENDPROC
 1280PROCFILL(480,576,130,N%,0):MOVE640,480:PRINT"clear":MOVE640,448:PRINT"solution":ENDPROC
 1290DEFPROCCL:VDU18,0,0,18,0,131,16,5,19,1,E%;0;:PROCTT(480,576):PROCFILL(480,576,290,0,1):PROCP(100):IFB%=0VDU19,2,4;0;:N%=2ELSEIFE%=7N%=0ELSEN%=1
 1300VDU18,0,0:MOVE0,640:PRINT"Dissolve":MOVE0,608:PRINT"in ";:IFB%<5PRINT"HCl"ELSEPRINT"water"
 1310PROCFILL(480,576,210,N%,3):IFB%<5ANDA%=2THENT%=TIME+200:REPEATPROCB:UNTILTIME>T%ELSEPROCP(100)
 1320VDU18,0,0:MOVE576,640:PRINT"-then add":MOVE640,608:PRINT"chlorine":MOVE640,576:PRINT"water":PROCFILL(480,576,150,N%,3):VDU18,0,0:PROCP(100):IFB%<20ANDC%<>7MOVE576,512:PRINT "-no":MOVE640,480:PRINT "reaction":ENDPROC
 1330VDU18,0,0:IFA%=7VDU19,2,0;0;:MOVE640,512:PRINT"dark":MOVE640,480:PRINT "colour"
 1340IFA%=6ORC%=7VDU19,2,3;0;:MOVE640,512:PRINT"yellow":MOVE640,480:PRINT "colour"
 1350MOVE0,158:PRINT"6)Test solution":PROCFILL(480,576,150,2,2):VDU18,0,0:*FX15,1
 1360I%=GET:IFI%=54PROCTEST:S%=S%-10
 1370ENDPROC
 1380DEFPROCTEST:IFC%=7MOVE0,288:PRINT"Add":MOVE0,256:PRINT"sodium":MOVE0,224:PRINT"hydroxide":PROCP(100):MOVE640,288:PRINT"yellow":MOVE640,256:PRINT"orange":MOVE640,224:PRINT"ppte.":ENDPROC
 1390MOVE0,352:PRINT"Shake":MOVE0,320:PRINT"with":MOVE0,288:PRINT"tetra-":MOVE0,256:PRINT"chloro-":MOVE0,224:PRINT"methane"
 1400IFA%=7:PROCFILL(480,576,150,0,3):VDU19,2,5;0;:PROCFILL(480,576,300,2,2):VDU18,0,0:MOVE640,288:PRINT"purple":MOVE640,256:PRINT"organic":MOVE640,224:PRINT"layer":ENDPROC 
 1410PROCFILL(480,576,150,0,3):VDU19,1,1;0;:PROCFILL(480,576,300,1,1):VDU18,0,0:MOVE640,288:PRINT"red":MOVE640,256:PRINT"organic":MOVE640,224:PRINT"layer":ENDPROC
 1420DEFPROCZN:VDU18,0,3,18,0,128,16,5,19,2,E%;0;:PROCTT(480,576):PROCFILL(480,576,290,2,2)
 1430MOVE128,576:PRINT"Boil":MOVE128,544:PRINT"with":MOVE128,512:PRINT"zinc":MOVE576,576:PRINT"and":MOVE576,544:PRINT"sodium":MOVE576,512:PRINT"hydroxide" 
 1440PROCP(100):PROCFILL(480,576,210,2,0):IFB%=0VDU19,2,4;0;
 1450VDU18,0,3:IF C%=9 OR A%=3 THEN T%=TIME+200:REPEAT:PROCB:UNTILTIME>T%:MOVE0,160:PRINT"6)Test gas evolved":ELSEPROCP(100):MOVE132,160:PRINT"Nothing happens":ENDPROC
 1460*FX15,1  
 1470I%=GET:IFI%=54Q%=0:PROCBLUE(480,576):MOVE576,448:PRINT"Universal":MOVE576,416:PRINT"turns":PROCP(100):VDU19,1,4;0;:MOVE576,384:PRINT"blue"
 1480ENDPROC
 1490DEFPROCW:VDU23;8202;0;0;0;19,0,4;0;:WR%=0:IFS%<0S%=0 
 1500PRINTTAB(7,1)"Choose the correct"TAB(26,1)"CATION"TAB(7,3)"By pressing the space bar"TAB(10,27)"SCORE SO FAR = ";S%;" ";
 1510GCOL0,129:VDU24,244;260;1000;792;16:GCOL0,128:VDU24,284;300;960;752;16
 1511MOVE292,548:DRAW952,548:MOVE952,504:DRAW292,504
 1530PRINTTAB(9,15)">"TAB(29,15)"<":FORJ%=1TO9:S$(J%)=C$(J%):NEXT
 1540REPEAT:PROCSPIN(9,10):FORJ%=2TO8:PRINTTAB(10,2*J%+5)S$(J%):NEXT:*FX15,1
 1545I%=INKEY(100):UNTIL I%=32
 1550IFS$(5)=C$(C%)PRINTTAB(26,1)" ANION"TAB(3,5)"  CORRECT - now what's the anion?   "ELSEPROCWRONG:GOTO1540
 1570FORJ%=1TO7
 1580S$(J%)=A$(J%)
 1590NEXT
 1600REPEAT:PROCSPIN(7,20):FORJ%=1TO7:PRINTTAB(20,2*J%+7)S$(J%):NEXT:*FX15,1
 1605I%=INKEY(100):UNTIL I%=32
 1610IFS$(4)=A$(A%)PRINTTAB(5,1)"CORRECT - "ELSEPROCWRONG:GOTO1600
 1620IFWR%=0PRINTTAB(15,1)"- GOT IT FIRST TRY"ELSEPRINTTAB(15,1)"YOU TOOK ";WR%+1;" ATTEMPTS"
 1625PRINTTAB(7,3)SPC26TAB(9,4)SPC26TAB(3,5)SPC35
 1630PRINTTAB(4,29)"CHEMISTRY RATING.......";R$(S%/10)
 1635PROCP(100):PRINTTAB(9,4)"SPACE BAR TO CONTINUE":*FX15
 1640REPEAT:I%=GET:UNTILI%=32:ENDPROC
 1650DEFPROCSPIN(NO%,TB%):S$(0)=S$(NO%):FORJ%=NO%TO1STEP-1:S$(J%)=S$(J%-1):NEXT
 1651ENDPROC
 1670DEFPROCWRONG
 1680PRINTTAB(3,5)"WRONG - LOSE 10 POINTS - TRY AGAIN"
 1690WR%=WR%+1:S%=S%-10:IFS%<0S%=0
 1700PROCP(100):PRINTTAB(3,5)SPC35TAB(25,27);S%;" ";
 1710ENDPROC
 1720DEFPROCI:D2$=CHR$255+CHR$8+CHR$10+CHR$253+CHR$11:D3$=CHR$255+CHR$8+CHR$10+CHR$252+CHR$11:D4$=CHR$254+CHR$8+CHR$10+CHR$251+CHR$11:U$=CHR$242+CHR$8+CHR$11+CHR$244+CHR$10:U2$=CHR$253+CHR$242+CHR$11+CHR$8+CHR$8+CHR$255+CHR$244+CHR$10
 1730U2$=CHR$253+CHR$242+CHR$11+CHR$8+CHR$8+CHR$255+CHR$244+CHR$10:U3$=CHR$252+CHR$242+CHR$11+CHR$8+CHR$8+CHR$255+CHR$244+CHR$10:UN$=CHR$243:UN2$=CHR$11+CHR$255+CHR$10+CHR$8+CHR$253+CHR$243
 1740DIMR%(25):PROCR:DIM N$(23):DIM C$(9):DIM R$(10):DIM A$(7):DIM S$(9):DIM D$(8):DIM M$(9):FORJ%=0TO10:READR$(J%):NEXT:FORJ%=0TO23:READN$(J%):NEXT:FORJ%=0TO8:READD$(J%):NEXT:FORJ%=1TO9:READC$(J%):READM$(J%):NEXT:FORJ%=1TO7:READA$(J%):NEXT
 1750DATA SEEK ADVICE,THINK !    ,TRY HARDER ,REVISE     ,NOT BAD    ,GOOD       ,VERY GOOD  ,BOFFIN     ,GENIUS     ,EINSTEIN   ,"CHEAT      "
 1760DATA20copper oxide,22copper carbonate,17calcium carbonate,67zinc carbonate,47lead carbonate,37sodium carbonate,37sodium nitrate,17calcium nitrate,67zinc nitrate,47lead nitrate,24copper nitrate,24copper sulphate,72iron(II)sulphate
 1770DATA57aluminium sulphate,17calcium chloride,67zinc chloride,37sodium chloride,83iron(III)chloride,72iron(II)chloride,97ammonium chloride,83iron(III)bromide,97ammonium bromide,37sodium iodide,57aluminium iodide
 1780DATAa black,a red,a green,a yellow,a blue,a blue-green,a grey-blue,a white,no
 1790DATA calcium   ,Ca,copper    ,Cu,sodium    ,Na,lead      ,Pb,aluminium ,Al,zinc      ,Zn,iron(II)  ,Fe,iron(III) ,Fe,ammonium  ,NH,oxide    ,carbonate,nitrate  ,sulphate ,chloride ,bromide  ,iodide   , 
 1800ENDPROC
 1810DEFPROCE
 1820VDU23,1,0;0;0;0;12
 1830PRINT'"The compound is - - - ";MID$(N$(B%),3,LEN(N$(B%))-2)' 
 1840IFB%<5THENPRINT"It is insoluble in water but reacts withacid:"ELSE PRINT"It dissolves in water"   
 1850IF A%=3PRINTTAB(22,3)"like all nitrates"  
 1860IFB%=0THENPRINTTAB(8)"CuO + 2HCl = CuCl"D2$" + H"D2$"O"
 1870IFB%>0ANDB%<5PRINTTAB(6)M$(C%);"CO"D3$" + 2HCl = ";M$(C%);"Cl"D2$" +H"D2$"O + CO"D2$
 1880IFB%=4PRINT'"Lead chloride dissolves in hot water"
 1890PRINT
 1900PRINT"In the flame test compounds of ";MID$(C$(C%),1,9);
 1910PRINT"produce ";D$(D%);" colour"'
 1920IFA%=2PRINT"Most carbonates decompose on heating" 
 1930IFB%=5PRINT"but sodium carbonate is stable"':GOTO1950
 1940IFA%=2PRINT"strongly:"'TAB(11)M$(C%);"C0"D3$" = ";M$(C%)"O + CO"D2$'
 1950IFB%=6PRINT"Heating sodium nitrate gives sodium     nitrite and oxygen:"'TAB(20)"2NaNO"D3$" = 2NaNO"D2$" + O"D2$':GOTO1970
 1960IFA%=3PRINT"It decomposes to brown nitrogen dioxide and oxygen:"'TAB(11)"2";M$(C%);"(NO"D3$")"D2$" = 2";M$(C%);"O + 4NO"D2$" +O"D2$'
 1970IFB%=11PRINT"Copper sulphate first turns white on    gentle heating. The ANHYDROUS sulphate  decomposes easily:"''TAB(9)"CuSO"D4$" = CuO + SO"D3$'
 1980IFB%=12PRINT"Iron(II)sulphate gives a REDOX change onheating, leaving iron(III)oxide as a redresidue:"'TAB(9)"2FeSO"D4$" = Fe"D2$"O"D3$" + SO"D2$" + SO"D3$'
 1990IFC%=6ANDB%<9PRINT"Zinc oxide is yellow hot and white cold"'
 2000IFB%=7ORB%=2PRINT"White calcium oxide (quicklime) remains"'
 2010IFC%=2PRINT"Copper oxide is a black powder"'
 2020IFC%=4PRINT"The residue of lead oxide is yellow"'
 2030IF A%=5X$="Cl"ELSEIFA%=6X$="Br"ELSEX$="I"
 2040IFC%=9PRINT"Ammonium compounds dissociate on heating-they seem to sublime:"''TAB(9)"NH"D4$X$"(s) = H"X$"(g) + NH"D3$"(g)"'
 2050IFB%=0ORB%>12ANDC%<>9PRINT"It is not decomposed by the action of   heat"'
 2060IFC%=9PRINT"They give off ammonia with strong alkali"'"     NaOH + NH"D4$X$;" = Na";X$;" + H"D2$"O + NH"D3$'
 2070IF C%=3PRINT"All sodium compounds are soluble - thereis no precipitate with alkali"'
 2080IFC%<9ANDC%<>3PRINT"Addition of hydroxide ions to "C$(C%)"ions gives a precipitate of insoluble   metal hydroxide:"' 
 2090IFC%=1ORC%=2ORC%=4ORC%=6ORC%=7PRINTTAB(4)M$(C%)U2$"(aq) + 2OH"UN$"(aq) = "M$(C%)"(OH)"D2$"(s)"
 2100IFC%=5ORC%=8PRINTTAB(6)M$(C%)U3$"(aq) + 3OH"UN$"(aq) = "M$(C%)"(OH)"D3$"(s)"
 2110IFC%=1PRINT'"Ammonia does not give enough hydroxide  ions to precipitate the slightly solublecalcium hydroxide"'
 2120IFC%=4ORC%=5PRINT'"The AMPHOTERIC hydroxide dissolves in   excess strong alkali"'
 2130IFC%=6PRINT'"The AMPHOTERIC hydroxide dissolves in   excess strong alkali, and it forms a    soluble COMPLEX ION with excess ammonia"'
 2140IFC%=2PRINT'"Copper ions form a deep blue COMPLEX IONwith excess ammonia"'
 2150IFC%=7ORC%=8PRINT'"There is no change with excess alkali"'
 2160IFC%=7PRINT"Iron(II) is oxidised to iron(III) by    chlorine:"'TAB(9)"2Fe"U2$" + Cl"D2$" = 2Fe"U3$" + 2Cl"UN$'
 2170IF A%=2PRINT"Carbon dioxide is evolved with dilute   acid - test for a carbonate"'
 2180IFB%=5PRINTTAB(3)"Na"D2$"CO"D3$" + 2HCl = 2NaCl + H"D2$"O + CO"D2$''
 2190IFA%=3PRINT"Zinc and sodium hydroxide give hydrogen -this reduces a nitrate,giving ammonia"'
 2200IFA%=4PRINT"Sulphates give a white precipitate with barium chloride:"'
 2210IF A%=4PRINTTAB(4)"SO"D4$UN2$"(aq) + Ba"U2$"(aq) = BaSO"D4$"(s)"'
 2220IFA%=5PRINT"Chlorides give a white precipitate with silver nitrate:"'
 2230IFA%=6PRINT"Bromides give a cream precipitate with  silver nitrate:"'
 2240IFA%=7PRINT"Iodides give a yellow precipitate with  silver nitrate:"'
 2250IFA%>4PRINTTAB(7)X$UN$"(aq) + Ag"U$"(aq) = Ag"X$"(s)"'
 2260IFA%=6PRINT"Addition of chlorine water DISPLACES theless reactive bromine:"'
 2270IFA%=7PRINT"Addition of chlorine water DISPLACES theless reactive iodine:"'
 2280IFA%>5PRINTTAB(8)"Cl"D2$" + 2"X$UN$" = 2Cl"UN$" + "X$D2$'
 2290PRINT'TAB(8)"SPACE BAR to try again";:I%=GET:ENDPROC

�"MAINPROG"
	� � �
�I
(�
21�S:�5:�H:�5:�F:�5:�HT:�5:�A:�5:�N:�4:�W:�4:�E
<	� �:�
P��S:�G%=1�B%=R%(1)-1:�R:�
ZQX=�(-�):H%=�(G%):B%=R%(H%)-1:�J%=H%�G%-1:R%(J%)=R%(J%+1):�:G%=G%-1:�B%=0�A%=1
d�B%>0�B%<6�A%=2
n�B%>5�B%<11�A%=3
x�B%>10�B%<14�A%=4
��B%>13�B%<20�A%=5
��B%>19�B%<22�A%=6
��B%>21�A%=7     
�qC%=�(N$(B%))-48:E%=�(�N$(B%),2,1))-48:S%=100:�C%=1�C%=3�F%=C%:D%=C%��C%=2�F%=2:D%=5��C%=4�F%=6:D%=6�F%=7:D%=8
��
�$��R:G%=24:�J%=1�25:R%(J%)=J%:�:�
�,��H:�E%=7��19,0,4;0;��19,3,0;0;19,0,7;0;
Ȑ�6,1)"ANALYSIS"�6,2)�8,�240):�516,634:�516,864:�540,884:�540,904:�85,700,904:�540,884:�85,700,884:�720,864:�720,634:�516,634:�6,2)�8,�240)
ҭ�516,634:�516,864:�540,884:�540,904:�85,700,904:�540,884:�85,700,884:�720,864:�720,634:�516,634:�18,0,2,19,2,E%;0;23,1,0;0;0;0;:�524,638:�712,638:�85,524,744:�85,712,694
ܓ�0,13)"The bottle contains an ionic compound.Itis ";D$(E%);" powder"':� B%<5� � "It does not dissolvein water"'� �"It is soluble in    water"'
�x�"Use the following   tests to name the   compound"''''" Initial score=100"''"  Each extra test"'"  costs 10 points"
�:�17,1,19,1,15;0;:�1,31)"CONTINUE-SPACE BAR";:*FX15,1 
��:I%=�:�I%=32:�
l��F:�23,1,0;0;0;0;17,0,17,131,24,0;348;1279;860;19,3,0;0;19,0,7;0;12,16:�4,2)"FLAME TEST"�4,3)�10,�240)
��240,560:�216,640:�208,660:�216,700:�304,840:�392,700:�400,660:�392,620:�368,560:�304,640:�248,560:�248,556:�360,556:�85,248,352:�360,352:�85,360,556:�18,3,3
��WIRE(768):�P(100):W%=768:�:�WIRE(W%):W%=W%-16:�WIRE(W%):�P(5):� W%=368:�1,24)"The flame shows"�1,25)D$(D%);" colour"�5,30)"SPACE BAR":�18,0,2,19,2,F%;0;:�276,656:�368,656:�85,304,832
"*FX15,1
,7�:�19,2,7;0;:I%=�(1):�19,2,F%;0;:I%=�(20):� I%=32:�
6a��WIRE(X%):�X%,656:�9,-68,8:�9,-24,-12:�9,250,0:�9,0,12:�9,200,0:�9,0,-24:�9,-200,0:�9,0,12:�
@���HT:P%=1:�23,1,0;0;0;0;19,2,E%;0;:�3,1)"ACTION OF HEAT"�3,2)�14,�240):�TT(720,850):�B%=0��FILL(720,850,240,3,2)��FILL(720,850,240,2,2)
J5�2,5)"Heat"�1,6)"gives..":�B%=19�B%=21�SUB:�dtA
TH�P(200):�B%=0� B%=5 � B%>12��0,12)"NO CHEMICAL"�2,13)"CHANGE":�dtA
^�C%=2�1,8)"a black":K%=0
h(�C%=1�B%=6�B%=11�1,8)"a white":K%=7
r#�C%=4�C%=6�1,8)"a yellow":K%=3
|"�B%=12��1,8)"a reddish":K%=1 
�}�0,9)"residue in"�1,10)"the tube":�FILL(720,850,240,0,0):�19,2,K%;0;:�C%=2��FILL(720,850,280,3,2)��FILL(720,850,280,2,2)
�Y�C%=6�P(200):�0,12)"-goes white"�0,13)"on cooling":�19,2,7;0;:�FILL(720,850,280,2,2)
�Z�B%=11��P(250):�0,12)"Blackens on"�0,13)"more heat":�19,2,0;0;:�FILL(720,850,280,3,2)
�;�P(100):�B%>6�B%<11 ��3,16)"BROWN"��0,16)"COLOURLESS"
���0,17)"GAS EVOLVED"�0,19)"WHICH TEST?"�0,21)"1.Universal"�0,23)"2.Limewater"�0,25)"3.Glowing"�2,26)"splint"�3,30)"SPACEBAR TO END"     
�
�:*FX15,1
�J%=�
�!�J%=49�UNIV(720,850):S%=S%-10
�!�J%=50�LIME(720,850):S%=S%-10
��J%=51�SPL:S%=S%-10
��J%=32:�
��:I%=�:�I%=32:�
�W��TT(X%,Y%):�X%,Y%:�X%,Y%-300:�X%+32,Y%-340:�X%+56,Y%-340:�X%+88,Y%-300:�X%+88,Y%:�
���FILL(X%,Y%,L%,M1%,M2%):�18,0,M1%:�X%+80,Y%-L%:�X%+8,Y%-L%:�18,0,M2%:�X%+80,Y%-L%-4:�X%+80,Y%-304:�85,X%+8,Y%-L%-4:�85,X%+8,Y%-304:�85,X%+32,Y%-336:�85,X%+80,Y%-304:�85,X%+56,Y%-336:�18,0,3:�
���DEL(X%,Y%):�X%+8,Y%:�X%+28,Y%:�X%+60,Y%:�X%+80,Y%:�X%+8,Y%-32:�X%+28,Y%-32:�X%+60,Y%-32:�X%+80,Y%-32:�X%+36,Y%-48:�X%+36,Y%+48:�X%+452,Y%+48:�X%+452,Y%-280
<�X%+52,Y%-48:�X%+52,Y%+40:�X%+436,Y%+40:�X%+436,Y%-280:�
&f��UNIV(X%,Y%):�18,0,1,19,1,2;0;:� X%+28,Y%-20:�X%+68,Y%-20:�85,X%+28,Y%+60:�85,X%+68,Y%+60:�P(200)
0q�B%>0�B%<5��13,20)"slight"�12,21)"-red pH4"� � B%>6�B%<13�12,21)"-red pH1"��13,20)"neutral"�12,21)"- pH7" 
:� B%<>6� �19,1,1;0;
DX�P(150):�18,0,0:� X%+28,Y%-20:�X%+68,Y%-20:�85,X%+28,Y%+60:�85,X%+68,Y%+60:�18,0,3:�
N���SPL:J%=1000:�DRSPL(1):�P(50):��DRSPL(1):J%=J%-8:�DRSPL(1):�P(5):�J%=800:�P(100):�A%=3��18,0,1,19,1,3;0;:�85,760,920:�12,25)"-lights" � �19,1,7;0;:�12,26)"-put out"
X3�P(150):�DRSPL(7):�18,0,0:�85,760,920:�18,0,3:�
b���SUB:�0,13)"Substance"�0,14)"disappears"�0,15)"from hot"�0,16)"part of tube":�J%=240�304�4:�FILL(720,850,J%,0,3):�J%=264�728,800:�728,700:�800,800:�800,700
l.�J%=288�736,720:�736,790:�792,790:�792,720
vE�P(10):�:�13,6)"and"�13,7)"reforms"�13,8)"on cool"�13,9)"part":�
���P(J%):T%=�+J%:���>=T%:�
�g��DRSPL(K%):�18,3,3:�J%,858:�9,256,0:�9,0,4:�9,-264,0:�18,3,1,19,1,K%;0;:�9,-56,0:�9,0,-4:�9,64,0:�
�B��A:�23,1,0;0;0;0;12:�C%=2�C%=7�C%=8�C%=9 ��19,0,7;0;19,3,0;0;
�T�0,1)"ADD ALKALI-to soln."�0,2)�10,�240):�B%>4�11,2)"in water"��11,2)"in HCl"
��C%=9��AMM:�
�g�0,4)"a)SODIUM HYDROXIDE"�0,5)�18,�241)�0,17)"b)AMMONIA SOLUTION"�0,18)�18,�241)�5,31)"SPACE BAR";
���TT(8,832):�TT(648,832):�TT(8,416):�TT(648,416):�2,6)"Add"�2,7)"small"�2,8)"amount-"�12,6)"Add"�12,7)"excess-"�2,19)"Add"�2,20)"small"�2,21)"amount-"�12,19)"Add"�12,20)"excess-"
�?�C%=7��19,1,2;0;��C%=8�19,1,3;0;��C%=2�19,1,6;0;��19,1,7;0;
�@�C%=3�2,11)"clear"�2,12)"soln.":�FILL(8,832,200,1,0):�dnB 
�x�C%=7�2,10)"dirty"�2,11)"green"� � C%=8�2,10)"orange-"�2,11)"yellow"��C%=2�2,10)"pale"�2,11)"blue"��2,11)"white"
�'�FILL(8,832,200,1,1):�2,12)"ppte."
�H�C%>2�C%<7�12,11)"clear"�12,12)"soln.":�FILL(648,832,100,1,0):�TLC
���C%=7�12,10)"dirty"�12,11)"green"� � C%=8�12,10)"orange-"�12,11)"yellow"��C%=2�12,10)"pale"�12,11)"blue"��C%=1�12,11)"white"
*�12,12)"ppte.":�FILL(648,832,100,1,1)
J� C%=3 � C%=1� �2,24)"clear"�2,25)"soln.":�FILL(8,416,200,1,0):�TjC 
x�C%=7�2,23)"dirty"�2,24)"green"� � C%=8�2,23)"orange-"�2,24)"yellow"��C%=2�2,23)"pale"�2,24)"blue"��2,24)"white"
 '�2,25)"ppte.":�FILL(8,416,200,1,1)
*Q�C%=6�C%=3 � C%=1� �12,24)"clear"�12,25)"soln.":�FILL(648,416,100,1,0):�DRC
4�C%=7�12,23)"dirty"�12,24)"green"� � C%=8�12,23)"orange-"�12,24)"yellow"��C%=2�12,23)"deep"�12,24)"blue"��12,24)"white"
>@�C%=2�12,25)"soln.":�19,2,4;0;:�FILL(648,416,100,2,2):�DRC
H*�12,25)"ppte.":�FILL(648,416,100,1,1)
R�:I%=�:�I%=32:�
\���AMM:Q%=1:�TT(16,860):�FILL(16,860,280,3,0):�P(100):�2,5)"Addition of dilute"�2,6)"sodium hydroxide-":�FILL(16,860,220,3,0):�P(100):�2,9)"gives off a "�2,10)"pungent gas"
f@�0,17)"Press(1)to test gas"�2,30)"SPACE BAR TO END":*FX15,1
p(�:I%=�:�I%=49��BLUE(16,860):S%=S%-10
z�I%=32:�
�j��BLUE(X%,Y%):�17,1,18,0,1,19,1,2;0;:� X%+28,Y%-20:�X%+68,Y%-20:�85,X%+28,Y%+60:�85,X%+68,Y%+60:�Q%=0�
�O�0,21)"It turns universal"�0,22)"paper":�P(200):�19,1,4;0;:�6,22)"blue":�
����LIME(X%,Y%):�TT(X%+400,Y%):�FILL(X%+400,Y%,180,3,0):�DEL(X%,Y%):�18,3,3:T%=�:�:�X%+468,Y%-286:�J%=Y%-282�Y%-182�4:�X%+468,J%:�X%+468,J%-4:�X%+468,J%:�:��>=T%+400:�18,0,3
�'�P%=0�B%=5��FILL(X%+400,Y%,180,3,3)
�'�B%>0�B%<5��FILL(X%+400,Y%,180,3,3)
��P%=0� 
�?�B%>0�B%<5�12,23)"-white"�13,24)"ppte."��12,23)"-nothing"
�Q�P(200):�18,0,0:�DEL(720,850):�TT(1120,850):�FILL(1120,850,180,0,0):�18,0,3:�
Է��N:�'"TESTS FOR ANIONS"'�16,�240)'"1)Hydrochloric acid 2)Silver nitrate"'"3)Barium chloride"'"4)Chlorine water"'"5)Sodium hydroxide"'"   and zinc powder"�2,31)"SPACE BAR TO END";
�,�24,0;128;1184;700;23,1,0;0;0;0;:*FX15,1
��:I%=�:�I%=49�ACID:S%=S%-10
��I%=50�AG:S%=S%-10
��I%=51�BA:S%=S%-10
�I%=52�CL:S%=S%-10   
�I%=53�ZN:S%=S%-10 
�I%=32:�
$8��ACID:�E%<>7�A%<>2�18,0,0,18,0,131��18,0,3,18,0,128
.7�5,19,1,E%;0;16:�TT(480,576):�FILL(480,576,290,1,1)
8�E%<>7�A%<>2�18,0,0 
B�B%=0�19,2,4;0;:N%=2�N%=1  
L�E%=7�A%=2O%=0�O%=3
Vh�0,608:�"Add":�0,576:�"dilute":�0,544:�"HCl-":�P(100):�FILL(480,576,210,N%,O%):�E%<>7�B%<>1�18,0,0  
`1� B%=0�640,608:�"blue":�640,576:�"solution":�
j2�A%<>2�640,608:�"clear":�640,576:�"solution":�
t\�0,480:�"gas":�0,448:�"evolved":T%=�+300:��B:� �>T%:�0,700:�"6)Test gas evolved":*FX15,1
~gI%=�:�I%=54P%=0:�LIME(480,576):�8,224:�"White precipitate":�8,192:�"with limewater":S%=S%-10�� �drC
��
����B:�18,3,3:�J%=264�360�4:�69,508,J%:�69,532,J%+4:�69,524,J%-20:�69,548,J%-16:�69,508,J%:�69,532,J%+4:�69,524,J%-20:�69,548,J%-16:�:�
����AG:�18,0,3,18,0,128,16,5,19,1,E%;0;:�TT(480,576):�FILL(480,576,290,1,1):�0,576:�"Add":�0,544:�"dilute":�0,512:�"nitric":�0,480:�"acid":�B%=0�19,2,4;0;:N%=2�N%=1
���P(100):�FILL(480,576,210,N%,0):�A%=2�T%=�+200:��B:��>T%:��P(100):�0,416:�"then":�0,384:�"silver":�0,352:�"nitrate":�A%=5�A%=6�FILL(480,576,130,3,3)
�'�A%=7�19,2,3:�FILL(480,576,130,2,2)
�!�A%<5�FILL(480,576,130,N%,0) 
�7�640,576:�A%=5�"white"��A%=6�"cream"��A%=7�"yellow"
��A%>4�640,544:�"ppte.":� 
�#�"clear":�640,544:�"solution":�
�g��BA:�18,0,3,18,0,128,16,5,19,1,E%;0;:�TT(480,576):�FILL(480,576,290,1,1):�B%=0�19,2,4;0;:N%=2�N%=1
�r�0,608:�"Add":�0,576:�"dilute":�0,544:�"HCl-":�P(100):�FILL(480,576,210,N%,0):�A%=2�T%=�+200:��B:��>T%��P(100)
��640,608:�"then":�640,576:�"barium":�640,544:�"chloride":�A%=4��FILL(480,576,130,3,3):�640,480:�"white":�640,448:�"ppte.":�
D�FILL(480,576,130,N%,0):�640,480:�"clear":�640,448:�"solution":�

y��CL:�18,0,0,18,0,131,16,5,19,1,E%;0;:�TT(480,576):�FILL(480,576,290,0,1):�P(100):�B%=0�19,2,4;0;:N%=2��E%=7N%=0�N%=1
B�18,0,0:�0,640:�"Dissolve":�0,608:�"in ";:�B%<5�"HCl"��"water"
A�FILL(480,576,210,N%,3):�B%<5�A%=2�T%=�+200:��B:��>T%��P(100)
(��18,0,0:�576,640:�"-then add":�640,608:�"chlorine":�640,576:�"water":�FILL(480,576,150,N%,3):�18,0,0:�P(100):�B%<20�C%<>7�576,512:� "-no":�640,480:� "reaction":�
2@�18,0,0:�A%=7�19,2,0;0;:�640,512:�"dark":�640,480:� "colour"
<?�A%=6�C%=7�19,2,3;0;:�640,512:�"yellow":�640,480:� "colour"
FD�0,158:�"6)Test solution":�FILL(480,576,150,2,2):�18,0,0:*FX15,1
PI%=�:�I%=54�TEST:S%=S%-10
Z�
d���TEST:�C%=7�0,288:�"Add":�0,256:�"sodium":�0,224:�"hydroxide":�P(100):�640,288:�"yellow":�640,256:�"orange":�640,224:�"ppte.":�
nW�0,352:�"Shake":�0,320:�"with":�0,288:�"tetra-":�0,256:�"chloro-":�0,224:�"methane"
x��A%=7:�FILL(480,576,150,0,3):�19,2,5;0;:�FILL(480,576,300,2,2):�18,0,0:�640,288:�"purple":�640,256:�"organic":�640,224:�"layer":� 
�|�FILL(480,576,150,0,3):�19,1,1;0;:�FILL(480,576,300,1,1):�18,0,0:�640,288:�"red":�640,256:�"organic":�640,224:�"layer":�
�M��ZN:�18,0,3,18,0,128,16,5,19,2,E%;0;:�TT(480,576):�FILL(480,576,290,2,2)
�p�128,576:�"Boil":�128,544:�"with":�128,512:�"zinc":�576,576:�"and":�576,544:�"sodium":�576,512:�"hydroxide" 
�2�P(100):�FILL(480,576,210,2,0):�B%=0�19,2,4;0;
�s�18,0,3:� C%=9 � A%=3 � T%=�+200:�:�B:��>T%:�0,160:�"6)Test gas evolved":��P(100):�132,160:�"Nothing happens":�
�
*FX15,1  
�nI%=�:�I%=54Q%=0:�BLUE(480,576):�576,448:�"Universal":�576,416:�"turns":�P(100):�19,1,4;0;:�576,384:�"blue"
��
�1��W:�23;8202;0;0;0;19,0,4;0;:WR%=0:�S%<0S%=0 
�l�7,1)"Choose the correct"�26,1)"CATION"�7,3)"By pressing the space bar"�10,27)"SCORE SO FAR = ";S%;" ";
�@�0,129:�24,244;260;1000;792;16:�0,128:�24,284;300;960;752;16
�'�292,548:�952,548:�952,504:�292,504
�0�9,15)">"�29,15)"<":�J%=1�9:S$(J%)=C$(J%):�
6�:�SPIN(9,10):�J%=2�8:�10,2*J%+5)S$(J%):�:*FX15,1
	I%=�(100):� I%=32
X�S$(5)=C$(C%)�26,1)" ANION"�3,5)"  CORRECT - now what's the anion?   "��WRONG:�TDF
"�J%=1�7
,S$(J%)=A$(J%)
6�
@6�:�SPIN(7,20):�J%=1�7:�20,2*J%+7)S$(J%):�:*FX15,1
EI%=�(100):� I%=32
J0�S$(4)=A$(A%)�5,1)"CORRECT - "��WRONG:�D@F
TJ�WR%=0�15,1)"- GOT IT FIRST TRY"��15,1)"YOU TOOK ";WR%+1;" ATTEMPTS"
Y�7,3)�26�9,4)�26�3,5)�35
^.�4,29)"CHEMISTRY RATING.......";R$(S%/10)
c/�P(100):�9,4)"SPACE BAR TO CONTINUE":*FX15
h�:I%=�:�I%=32:�
r@��SPIN(NO%,TB%):S$(0)=S$(NO%):�J%=NO%�1�-1:S$(J%)=S$(J%-1):�
s�
���WRONG
�.�3,5)"WRONG - LOSE 10 POINTS - TRY AGAIN"
� WR%=WR%+1:S%=S%-10:�S%<0S%=0
�$�P(100):�3,5)�35�25,27);S%;" ";
��
����I:D2$=�255+�8+�10+�253+�11:D3$=�255+�8+�10+�252+�11:D4$=�254+�8+�10+�251+�11:U$=�242+�8+�11+�244+�10:U2$=�253+�242+�11+�8+�8+�255+�244+�10
�wU2$=�253+�242+�11+�8+�8+�255+�244+�10:U3$=�252+�242+�11+�8+�8+�255+�244+�10:UN$=�243:UN2$=�11+�255+�10+�8+�253+�243
̬�R%(25):�R:� N$(23):� C$(9):� R$(10):� A$(7):� S$(9):� D$(8):� M$(9):�J%=0�10:�R$(J%):�:�J%=0�23:�N$(J%):�:�J%=0�8:�D$(J%):�:�J%=1�9:�C$(J%):�M$(J%):�:�J%=1�7:�A$(J%):�
֋� SEEK ADVICE,THINK !    ,TRY HARDER ,REVISE     ,NOT BAD    ,GOOD       ,VERY GOOD  ,BOFFIN     ,GENIUS     ,EINSTEIN   ,"CHEAT      "
���20copper oxide,22copper carbonate,17calcium carbonate,67zinc carbonate,47lead carbonate,37sodium carbonate,37sodium nitrate,17calcium nitrate,67zinc nitrate,47lead nitrate,24copper nitrate,24copper sulphate,72iron(II)sulphate
���57aluminium sulphate,17calcium chloride,67zinc chloride,37sodium chloride,83iron(III)chloride,72iron(II)chloride,97ammonium chloride,83iron(III)bromide,97ammonium bromide,37sodium iodide,57aluminium iodide
�N�a black,a red,a green,a yellow,a blue,a blue-green,a grey-blue,a white,no
��� calcium   ,Ca,copper    ,Cu,sodium    ,Na,lead      ,Pb,aluminium ,Al,zinc      ,Zn,iron(II)  ,Fe,iron(III) ,Fe,ammonium  ,NH,oxide    ,carbonate,nitrate  ,sulphate ,chloride ,bromide  ,iodide   , 
�
��E
�23,1,0;0;0;0;12
&7�'"The compound is - - - ";�N$(B%),3,�(N$(B%))-2)' 
0W�B%<5��"It is insoluble in water but reacts withacid:"� �"It dissolves in water"   
:&� A%=3�22,3)"like all nitrates"  
D0�B%=0��8)"CuO + 2HCl = CuCl"D2$" + H"D2$"O"
NN�B%>0�B%<5�6)M$(C%);"CO"D3$" + 2HCl = ";M$(C%);"Cl"D2$" +H"D2$"O + CO"D2$
X1�B%=4�'"Lead chloride dissolves in hot water"
b�
l4�"In the flame test compounds of ";�C$(C%),1,9);
v!�"produce ";D$(D%);" colour"'
�1�A%=2�"Most carbonates decompose on heating" 
�1�B%=5�"but sodium carbonate is stable"':�t^G
�@�A%=2�"strongly:"'�11)M$(C%);"C0"D3$" = ";M$(C%)"O + CO"D2$'
�s�B%=6�"Heating sodium nitrate gives sodium     nitrite and oxygen:"'�20)"2NaNO"D3$" = 2NaNO"D2$" + O"D2$':�trG
���A%=3�"It decomposes to brown nitrogen dioxide and oxygen:"'�11)"2";M$(C%);"(NO"D3$")"D2$" = 2";M$(C%);"O + 4NO"D2$" +O"D2$'
���B%=11�"Copper sulphate first turns white on    gentle heating. The ANHYDROUS sulphate  decomposes easily:"''�9)"CuSO"D4$" = CuO + SO"D3$'
���B%=12�"Iron(II)sulphate gives a REDOX change onheating, leaving iron(III)oxide as a redresidue:"'�9)"2FeSO"D4$" = Fe"D2$"O"D3$" + SO"D2$" + SO"D3$'
�9�C%=6�B%<9�"Zinc oxide is yellow hot and white cold"'
�9�B%=7�B%=2�"White calcium oxide (quicklime) remains"'
�+�C%=2�"Copper oxide is a black powder"'
�0�C%=4�"The residue of lead oxide is yellow"'
�%� A%=5X$="Cl"��A%=6X$="Br"�X$="I"
�v�C%=9�"Ammonium compounds dissociate on heating-they seem to sublime:"''�9)"NH"D4$X$"(s) = H"X$"(g) + NH"D3$"(g)"'
E�B%=0�B%>12�C%<>9�"It is not decomposed by the action of   heat"'
k�C%=9�"They give off ammonia with strong alkali"'"     NaOH + NH"D4$X$;" = Na";X$;" + H"D2$"O + NH"D3$'
S� C%=3�"All sodium compounds are soluble - thereis no precipitate with alkali"'
 r�C%<9�C%<>3�"Addition of hydroxide ions to "C$(C%)"ions gives a precipitate of insoluble   metal hydroxide:"' 
*V�C%=1�C%=2�C%=4�C%=6�C%=7�4)M$(C%)U2$"(aq) + 2OH"UN$"(aq) = "M$(C%)"(OH)"D2$"(s)"
4G�C%=5�C%=8�6)M$(C%)U3$"(aq) + 3OH"UN$"(aq) = "M$(C%)"(OH)"D3$"(s)"
>o�C%=1�'"Ammonia does not give enough hydroxide  ions to precipitate the slightly solublecalcium hydroxide"'
HO�C%=4�C%=5�'"The AMPHOTERIC hydroxide dissolves in   excess strong alkali"'
R��C%=6�'"The AMPHOTERIC hydroxide dissolves in   excess strong alkali, and it forms a    soluble COMPLEX ION with excess ammonia"'
\I�C%=2�'"Copper ions form a deep blue COMPLEX IONwith excess ammonia"'
f8�C%=7�C%=8�'"There is no change with excess alkali"'
pj�C%=7�"Iron(II) is oxidised to iron(III) by    chlorine:"'�9)"2Fe"U2$" + Cl"D2$" = 2Fe"U3$" + 2Cl"UN$'
zQ� A%=2�"Carbon dioxide is evolved with dilute   acid - test for a carbonate"'
�@�B%=5�3)"Na"D2$"CO"D3$" + 2HCl = 2NaCl + H"D2$"O + CO"D2$''
�[�A%=3�"Zinc and sodium hydroxide give hydrogen -this reduces a nitrate,giving ammonia"'
�E�A%=4�"Sulphates give a white precipitate with barium chloride:"'
�=� A%=4�4)"SO"D4$UN2$"(aq) + Ba"U2$"(aq) = BaSO"D4$"(s)"'
�D�A%=5�"Chlorides give a white precipitate with silver nitrate:"'
�D�A%=6�"Bromides give a cream precipitate with  silver nitrate:"'
�D�A%=7�"Iodides give a yellow precipitate with  silver nitrate:"'
�2�A%>4�7)X$UN$"(aq) + Ag"U$"(aq) = Ag"X$"(s)"'
�K�A%=6�"Addition of chlorine water DISPLACES theless reactive bromine:"'
�J�A%=7�"Addition of chlorine water DISPLACES theless reactive iodine:"'
�5�A%>5�8)"Cl"D2$" + 2"X$UN$" = 2Cl"UN$" + "X$D2$'
�)�'�8)"SPACE BAR to try again";:I%=�:�
�
00000000  0d 00 0a 0f f4 22 4d 41  49 4e 50 52 4f 47 22 0d  |....."MAINPROG".|
00000010  00 14 09 ee 20 85 20 f9  0d 00 1e 06 f2 49 0d 00  |.... . ......I..|
00000020  28 05 f5 0d 00 32 31 f2  53 3a eb 35 3a f2 48 3a  |(....21.S:.5:.H:|
00000030  eb 35 3a f2 46 3a eb 35  3a f2 48 54 3a eb 35 3a  |.5:.F:.5:.HT:.5:|
00000040  f2 41 3a eb 35 3a f2 4e  3a eb 34 3a f2 57 3a eb  |.A:.5:.N:.4:.W:.|
00000050  34 3a f2 45 0d 00 3c 09  fd 20 a3 3a e0 0d 00 50  |4:.E..<.. .:...P|
00000060  1d dd f2 53 3a e7 47 25  3d 31 8c 42 25 3d 52 25  |...S:.G%=1.B%=R%|
00000070  28 31 29 2d 31 3a f2 52  3a e1 0d 00 5a 51 58 3d  |(1)-1:.R:...ZQX=|
00000080  b3 28 2d 91 29 3a 48 25  3d b3 28 47 25 29 3a 42  |.(-.):H%=.(G%):B|
00000090  25 3d 52 25 28 48 25 29  2d 31 3a e3 4a 25 3d 48  |%=R%(H%)-1:.J%=H|
000000a0  25 b8 47 25 2d 31 3a 52  25 28 4a 25 29 3d 52 25  |%.G%-1:R%(J%)=R%|
000000b0  28 4a 25 2b 31 29 3a ed  3a 47 25 3d 47 25 2d 31  |(J%+1):.:G%=G%-1|
000000c0  3a e7 42 25 3d 30 8c 41  25 3d 31 0d 00 64 13 e7  |:.B%=0.A%=1..d..|
000000d0  42 25 3e 30 80 42 25 3c  36 8c 41 25 3d 32 0d 00  |B%>0.B%<6.A%=2..|
000000e0  6e 14 e7 42 25 3e 35 80  42 25 3c 31 31 8c 41 25  |n..B%>5.B%<11.A%|
000000f0  3d 33 0d 00 78 15 e7 42  25 3e 31 30 80 42 25 3c  |=3..x..B%>10.B%<|
00000100  31 34 8c 41 25 3d 34 0d  00 82 15 e7 42 25 3e 31  |14.A%=4.....B%>1|
00000110  33 80 42 25 3c 32 30 8c  41 25 3d 35 0d 00 8c 15  |3.B%<20.A%=5....|
00000120  e7 42 25 3e 31 39 80 42  25 3c 32 32 8c 41 25 3d  |.B%>19.B%<22.A%=|
00000130  36 0d 00 96 14 e7 42 25  3e 32 31 8c 41 25 3d 37  |6.....B%>21.A%=7|
00000140  20 20 20 20 20 0d 00 a0  71 43 25 3d 97 28 4e 24  |     ...qC%=.(N$|
00000150  28 42 25 29 29 2d 34 38  3a 45 25 3d 97 28 c1 4e  |(B%))-48:E%=.(.N|
00000160  24 28 42 25 29 2c 32 2c  31 29 29 2d 34 38 3a 53  |$(B%),2,1))-48:S|
00000170  25 3d 31 30 30 3a e7 43  25 3d 31 84 43 25 3d 33  |%=100:.C%=1.C%=3|
00000180  8c 46 25 3d 43 25 3a 44  25 3d 43 25 8b e7 43 25  |.F%=C%:D%=C%..C%|
00000190  3d 32 8c 46 25 3d 32 3a  44 25 3d 35 8b e7 43 25  |=2.F%=2:D%=5..C%|
000001a0  3d 34 8c 46 25 3d 36 3a  44 25 3d 36 8b 46 25 3d  |=4.F%=6:D%=6.F%=|
000001b0  37 3a 44 25 3d 38 0d 00  aa 05 e1 0d 00 b4 24 dd  |7:D%=8........$.|
000001c0  f2 52 3a 47 25 3d 32 34  3a e3 4a 25 3d 31 b8 32  |.R:G%=24:.J%=1.2|
000001d0  35 3a 52 25 28 4a 25 29  3d 4a 25 3a ed 3a e1 0d  |5:R%(J%)=J%:.:..|
000001e0  00 be 2c dd f2 48 3a e7  45 25 3d 37 8c ef 31 39  |..,..H:.E%=7..19|
000001f0  2c 30 2c 34 3b 30 3b 8b  ef 31 39 2c 33 2c 30 3b  |,0,4;0;..19,3,0;|
00000200  30 3b 31 39 2c 30 2c 37  3b 30 3b 0d 00 c8 90 f1  |0;19,0,7;0;.....|
00000210  8a 36 2c 31 29 22 41 4e  41 4c 59 53 49 53 22 8a  |.6,1)"ANALYSIS".|
00000220  36 2c 32 29 c4 38 2c bd  32 34 30 29 3a ec 35 31  |6,2).8,.240):.51|
00000230  36 2c 36 33 34 3a df 35  31 36 2c 38 36 34 3a df  |6,634:.516,864:.|
00000240  35 34 30 2c 38 38 34 3a  df 35 34 30 2c 39 30 34  |540,884:.540,904|
00000250  3a f0 38 35 2c 37 30 30  2c 39 30 34 3a ec 35 34  |:.85,700,904:.54|
00000260  30 2c 38 38 34 3a f0 38  35 2c 37 30 30 2c 38 38  |0,884:.85,700,88|
00000270  34 3a df 37 32 30 2c 38  36 34 3a df 37 32 30 2c  |4:.720,864:.720,|
00000280  36 33 34 3a df 35 31 36  2c 36 33 34 3a f1 8a 36  |634:.516,634:..6|
00000290  2c 32 29 c4 38 2c bd 32  34 30 29 0d 00 d2 ad ec  |,2).8,.240).....|
000002a0  35 31 36 2c 36 33 34 3a  df 35 31 36 2c 38 36 34  |516,634:.516,864|
000002b0  3a df 35 34 30 2c 38 38  34 3a df 35 34 30 2c 39  |:.540,884:.540,9|
000002c0  30 34 3a f0 38 35 2c 37  30 30 2c 39 30 34 3a ec  |04:.85,700,904:.|
000002d0  35 34 30 2c 38 38 34 3a  f0 38 35 2c 37 30 30 2c  |540,884:.85,700,|
000002e0  38 38 34 3a df 37 32 30  2c 38 36 34 3a df 37 32  |884:.720,864:.72|
000002f0  30 2c 36 33 34 3a df 35  31 36 2c 36 33 34 3a ef  |0,634:.516,634:.|
00000300  31 38 2c 30 2c 32 2c 31  39 2c 32 2c 45 25 3b 30  |18,0,2,19,2,E%;0|
00000310  3b 32 33 2c 31 2c 30 3b  30 3b 30 3b 30 3b 3a ec  |;23,1,0;0;0;0;:.|
00000320  35 32 34 2c 36 33 38 3a  ec 37 31 32 2c 36 33 38  |524,638:.712,638|
00000330  3a f0 38 35 2c 35 32 34  2c 37 34 34 3a f0 38 35  |:.85,524,744:.85|
00000340  2c 37 31 32 2c 36 39 34  0d 00 dc 93 f1 8a 30 2c  |,712,694......0,|
00000350  31 33 29 22 54 68 65 20  62 6f 74 74 6c 65 20 63  |13)"The bottle c|
00000360  6f 6e 74 61 69 6e 73 20  61 6e 20 69 6f 6e 69 63  |ontains an ionic|
00000370  20 63 6f 6d 70 6f 75 6e  64 2e 49 74 69 73 20 22  | compound.Itis "|
00000380  3b 44 24 28 45 25 29 3b  22 20 70 6f 77 64 65 72  |;D$(E%);" powder|
00000390  22 27 3a e7 20 42 25 3c  35 8c 20 f1 20 22 49 74  |"':. B%<5. . "It|
000003a0  20 64 6f 65 73 20 6e 6f  74 20 64 69 73 73 6f 6c  | does not dissol|
000003b0  76 65 69 6e 20 77 61 74  65 72 22 27 8b 20 f1 22  |vein water"'. ."|
000003c0  49 74 20 69 73 20 73 6f  6c 75 62 6c 65 20 69 6e  |It is soluble in|
000003d0  20 20 20 20 77 61 74 65  72 22 27 0d 00 e6 78 f1  |    water"'...x.|
000003e0  22 55 73 65 20 74 68 65  20 66 6f 6c 6c 6f 77 69  |"Use the followi|
000003f0  6e 67 20 20 20 74 65 73  74 73 20 74 6f 20 6e 61  |ng   tests to na|
00000400  6d 65 20 74 68 65 20 20  20 63 6f 6d 70 6f 75 6e  |me the   compoun|
00000410  64 22 27 27 27 27 22 20  49 6e 69 74 69 61 6c 20  |d"''''" Initial |
00000420  73 63 6f 72 65 3d 31 30  30 22 27 27 22 20 20 45  |score=100"''"  E|
00000430  61 63 68 20 65 78 74 72  61 20 74 65 73 74 22 27  |ach extra test"'|
00000440  22 20 20 63 6f 73 74 73  20 31 30 20 70 6f 69 6e  |"  costs 10 poin|
00000450  74 73 22 0d 00 f0 3a ef  31 37 2c 31 2c 31 39 2c  |ts"...:.17,1,19,|
00000460  31 2c 31 35 3b 30 3b 3a  f1 8a 31 2c 33 31 29 22  |1,15;0;:..1,31)"|
00000470  43 4f 4e 54 49 4e 55 45  2d 53 50 41 43 45 20 42  |CONTINUE-SPACE B|
00000480  41 52 22 3b 3a 2a 46 58  31 35 2c 31 20 0d 00 fa  |AR";:*FX15,1 ...|
00000490  13 f5 3a 49 25 3d a5 3a  fd 49 25 3d 33 32 3a e1  |..:I%=.:.I%=32:.|
000004a0  0d 01 04 6c dd f2 46 3a  ef 32 33 2c 31 2c 30 3b  |...l..F:.23,1,0;|
000004b0  30 3b 30 3b 30 3b 31 37  2c 30 2c 31 37 2c 31 33  |0;0;0;17,0,17,13|
000004c0  31 2c 32 34 2c 30 3b 33  34 38 3b 31 32 37 39 3b  |1,24,0;348;1279;|
000004d0  38 36 30 3b 31 39 2c 33  2c 30 3b 30 3b 31 39 2c  |860;19,3,0;0;19,|
000004e0  30 2c 37 3b 30 3b 31 32  2c 31 36 3a f1 8a 34 2c  |0,7;0;12,16:..4,|
000004f0  32 29 22 46 4c 41 4d 45  20 54 45 53 54 22 8a 34  |2)"FLAME TEST".4|
00000500  2c 33 29 c4 31 30 2c bd  32 34 30 29 0d 01 0e a1  |,3).10,.240)....|
00000510  ec 32 34 30 2c 35 36 30  3a df 32 31 36 2c 36 34  |.240,560:.216,64|
00000520  30 3a df 32 30 38 2c 36  36 30 3a df 32 31 36 2c  |0:.208,660:.216,|
00000530  37 30 30 3a df 33 30 34  2c 38 34 30 3a df 33 39  |700:.304,840:.39|
00000540  32 2c 37 30 30 3a df 34  30 30 2c 36 36 30 3a df  |2,700:.400,660:.|
00000550  33 39 32 2c 36 32 30 3a  df 33 36 38 2c 35 36 30  |392,620:.368,560|
00000560  3a df 33 30 34 2c 36 34  30 3a df 32 34 38 2c 35  |:.304,640:.248,5|
00000570  36 30 3a ec 32 34 38 2c  35 35 36 3a df 33 36 30  |60:.248,556:.360|
00000580  2c 35 35 36 3a f0 38 35  2c 32 34 38 2c 33 35 32  |,556:.85,248,352|
00000590  3a ec 33 36 30 2c 33 35  32 3a f0 38 35 2c 33 36  |:.360,352:.85,36|
000005a0  30 2c 35 35 36 3a ef 31  38 2c 33 2c 33 0d 01 18  |0,556:.18,3,3...|
000005b0  bc f2 57 49 52 45 28 37  36 38 29 3a f2 50 28 31  |..WIRE(768):.P(1|
000005c0  30 30 29 3a 57 25 3d 37  36 38 3a f5 3a f2 57 49  |00):W%=768:.:.WI|
000005d0  52 45 28 57 25 29 3a 57  25 3d 57 25 2d 31 36 3a  |RE(W%):W%=W%-16:|
000005e0  f2 57 49 52 45 28 57 25  29 3a f2 50 28 35 29 3a  |.WIRE(W%):.P(5):|
000005f0  fd 20 57 25 3d 33 36 38  3a f1 8a 31 2c 32 34 29  |. W%=368:..1,24)|
00000600  22 54 68 65 20 66 6c 61  6d 65 20 73 68 6f 77 73  |"The flame shows|
00000610  22 8a 31 2c 32 35 29 44  24 28 44 25 29 3b 22 20  |".1,25)D$(D%);" |
00000620  63 6f 6c 6f 75 72 22 8a  35 2c 33 30 29 22 53 50  |colour".5,30)"SP|
00000630  41 43 45 20 42 41 52 22  3a ef 31 38 2c 30 2c 32  |ACE BAR":.18,0,2|
00000640  2c 31 39 2c 32 2c 46 25  3b 30 3b 3a ec 32 37 36  |,19,2,F%;0;:.276|
00000650  2c 36 35 36 3a ec 33 36  38 2c 36 35 36 3a f0 38  |,656:.368,656:.8|
00000660  35 2c 33 30 34 2c 38 33  32 0d 01 22 0b 2a 46 58  |5,304,832..".*FX|
00000670  31 35 2c 31 0d 01 2c 37  f5 3a ef 31 39 2c 32 2c  |15,1..,7.:.19,2,|
00000680  37 3b 30 3b 3a 49 25 3d  a6 28 31 29 3a ef 31 39  |7;0;:I%=.(1):.19|
00000690  2c 32 2c 46 25 3b 30 3b  3a 49 25 3d a6 28 32 30  |,2,F%;0;:I%=.(20|
000006a0  29 3a fd 20 49 25 3d 33  32 3a e1 0d 01 36 61 dd  |):. I%=32:...6a.|
000006b0  f2 57 49 52 45 28 58 25  29 3a ec 58 25 2c 36 35  |.WIRE(X%):.X%,65|
000006c0  36 3a f0 39 2c 2d 36 38  2c 38 3a f0 39 2c 2d 32  |6:.9,-68,8:.9,-2|
000006d0  34 2c 2d 31 32 3a f0 39  2c 32 35 30 2c 30 3a f0  |4,-12:.9,250,0:.|
000006e0  39 2c 30 2c 31 32 3a f0  39 2c 32 30 30 2c 30 3a  |9,0,12:.9,200,0:|
000006f0  f0 39 2c 30 2c 2d 32 34  3a f0 39 2c 2d 32 30 30  |.9,0,-24:.9,-200|
00000700  2c 30 3a f0 39 2c 30 2c  31 32 3a e1 0d 01 40 8c  |,0:.9,0,12:...@.|
00000710  dd f2 48 54 3a 50 25 3d  31 3a ef 32 33 2c 31 2c  |..HT:P%=1:.23,1,|
00000720  30 3b 30 3b 30 3b 30 3b  31 39 2c 32 2c 45 25 3b  |0;0;0;0;19,2,E%;|
00000730  30 3b 3a f1 8a 33 2c 31  29 22 41 43 54 49 4f 4e  |0;:..3,1)"ACTION|
00000740  20 4f 46 20 48 45 41 54  22 8a 33 2c 32 29 c4 31  | OF HEAT".3,2).1|
00000750  34 2c bd 32 34 30 29 3a  f2 54 54 28 37 32 30 2c  |4,.240):.TT(720,|
00000760  38 35 30 29 3a e7 42 25  3d 30 8c f2 46 49 4c 4c  |850):.B%=0..FILL|
00000770  28 37 32 30 2c 38 35 30  2c 32 34 30 2c 33 2c 32  |(720,850,240,3,2|
00000780  29 8b f2 46 49 4c 4c 28  37 32 30 2c 38 35 30 2c  |)..FILL(720,850,|
00000790  32 34 30 2c 32 2c 32 29  0d 01 4a 35 f1 8a 32 2c  |240,2,2)..J5..2,|
000007a0  35 29 22 48 65 61 74 22  8a 31 2c 36 29 22 67 69  |5)"Heat".1,6)"gi|
000007b0  76 65 73 2e 2e 22 3a e7  42 25 3d 31 39 84 42 25  |ves..":.B%=19.B%|
000007c0  3d 32 31 f2 53 55 42 3a  e5 8d 64 74 41 0d 01 54  |=21.SUB:..dtA..T|
000007d0  48 f2 50 28 32 30 30 29  3a e7 42 25 3d 30 84 20  |H.P(200):.B%=0. |
000007e0  42 25 3d 35 20 84 20 42  25 3e 31 32 8c f1 8a 30  |B%=5 . B%>12...0|
000007f0  2c 31 32 29 22 4e 4f 20  43 48 45 4d 49 43 41 4c  |,12)"NO CHEMICAL|
00000800  22 8a 32 2c 31 33 29 22  43 48 41 4e 47 45 22 3a  |".2,13)"CHANGE":|
00000810  e5 8d 64 74 41 0d 01 5e  1d e7 43 25 3d 32 f1 8a  |..dtA..^..C%=2..|
00000820  31 2c 38 29 22 61 20 62  6c 61 63 6b 22 3a 4b 25  |1,8)"a black":K%|
00000830  3d 30 0d 01 68 28 e7 43  25 3d 31 84 42 25 3d 36  |=0..h(.C%=1.B%=6|
00000840  84 42 25 3d 31 31 f1 8a  31 2c 38 29 22 61 20 77  |.B%=11..1,8)"a w|
00000850  68 69 74 65 22 3a 4b 25  3d 37 0d 01 72 23 e7 43  |hite":K%=7..r#.C|
00000860  25 3d 34 84 43 25 3d 36  f1 8a 31 2c 38 29 22 61  |%=4.C%=6..1,8)"a|
00000870  20 79 65 6c 6c 6f 77 22  3a 4b 25 3d 33 0d 01 7c  | yellow":K%=3..||
00000880  22 e7 42 25 3d 31 32 8c  f1 8a 31 2c 38 29 22 61  |".B%=12...1,8)"a|
00000890  20 72 65 64 64 69 73 68  22 3a 4b 25 3d 31 20 0d  | reddish":K%=1 .|
000008a0  01 86 7d f1 8a 30 2c 39  29 22 72 65 73 69 64 75  |..}..0,9)"residu|
000008b0  65 20 69 6e 22 8a 31 2c  31 30 29 22 74 68 65 20  |e in".1,10)"the |
000008c0  74 75 62 65 22 3a f2 46  49 4c 4c 28 37 32 30 2c  |tube":.FILL(720,|
000008d0  38 35 30 2c 32 34 30 2c  30 2c 30 29 3a ef 31 39  |850,240,0,0):.19|
000008e0  2c 32 2c 4b 25 3b 30 3b  3a e7 43 25 3d 32 8c f2  |,2,K%;0;:.C%=2..|
000008f0  46 49 4c 4c 28 37 32 30  2c 38 35 30 2c 32 38 30  |FILL(720,850,280|
00000900  2c 33 2c 32 29 8b f2 46  49 4c 4c 28 37 32 30 2c  |,3,2)..FILL(720,|
00000910  38 35 30 2c 32 38 30 2c  32 2c 32 29 0d 01 90 59  |850,280,2,2)...Y|
00000920  e7 43 25 3d 36 f2 50 28  32 30 30 29 3a f1 8a 30  |.C%=6.P(200):..0|
00000930  2c 31 32 29 22 2d 67 6f  65 73 20 77 68 69 74 65  |,12)"-goes white|
00000940  22 8a 30 2c 31 33 29 22  6f 6e 20 63 6f 6f 6c 69  |".0,13)"on cooli|
00000950  6e 67 22 3a ef 31 39 2c  32 2c 37 3b 30 3b 3a f2  |ng":.19,2,7;0;:.|
00000960  46 49 4c 4c 28 37 32 30  2c 38 35 30 2c 32 38 30  |FILL(720,850,280|
00000970  2c 32 2c 32 29 0d 01 9a  5a e7 42 25 3d 31 31 8c  |,2,2)...Z.B%=11.|
00000980  f2 50 28 32 35 30 29 3a  f1 8a 30 2c 31 32 29 22  |.P(250):..0,12)"|
00000990  42 6c 61 63 6b 65 6e 73  20 6f 6e 22 8a 30 2c 31  |Blackens on".0,1|
000009a0  33 29 22 6d 6f 72 65 20  68 65 61 74 22 3a ef 31  |3)"more heat":.1|
000009b0  39 2c 32 2c 30 3b 30 3b  3a f2 46 49 4c 4c 28 37  |9,2,0;0;:.FILL(7|
000009c0  32 30 2c 38 35 30 2c 32  38 30 2c 33 2c 32 29 0d  |20,850,280,3,2).|
000009d0  01 a4 3b f2 50 28 31 30  30 29 3a e7 42 25 3e 36  |..;.P(100):.B%>6|
000009e0  80 42 25 3c 31 31 20 8c  f1 8a 33 2c 31 36 29 22  |.B%<11 ...3,16)"|
000009f0  42 52 4f 57 4e 22 8b f1  8a 30 2c 31 36 29 22 43  |BROWN"...0,16)"C|
00000a00  4f 4c 4f 55 52 4c 45 53  53 22 0d 01 ae 8c f1 8a  |OLOURLESS"......|
00000a10  30 2c 31 37 29 22 47 41  53 20 45 56 4f 4c 56 45  |0,17)"GAS EVOLVE|
00000a20  44 22 8a 30 2c 31 39 29  22 57 48 49 43 48 20 54  |D".0,19)"WHICH T|
00000a30  45 53 54 3f 22 8a 30 2c  32 31 29 22 31 2e 55 6e  |EST?".0,21)"1.Un|
00000a40  69 76 65 72 73 61 6c 22  8a 30 2c 32 33 29 22 32  |iversal".0,23)"2|
00000a50  2e 4c 69 6d 65 77 61 74  65 72 22 8a 30 2c 32 35  |.Limewater".0,25|
00000a60  29 22 33 2e 47 6c 6f 77  69 6e 67 22 8a 32 2c 32  |)"3.Glowing".2,2|
00000a70  36 29 22 73 70 6c 69 6e  74 22 8a 33 2c 33 30 29  |6)"splint".3,30)|
00000a80  22 53 50 41 43 45 42 41  52 20 54 4f 20 45 4e 44  |"SPACEBAR TO END|
00000a90  22 20 20 20 20 20 0d 01  b8 0d f5 3a 2a 46 58 31  |"     .....:*FX1|
00000aa0  35 2c 31 0d 01 c2 08 4a  25 3d a5 0d 01 cc 21 e7  |5,1....J%=....!.|
00000ab0  4a 25 3d 34 39 f2 55 4e  49 56 28 37 32 30 2c 38  |J%=49.UNIV(720,8|
00000ac0  35 30 29 3a 53 25 3d 53  25 2d 31 30 0d 01 d6 21  |50):S%=S%-10...!|
00000ad0  e7 4a 25 3d 35 30 f2 4c  49 4d 45 28 37 32 30 2c  |.J%=50.LIME(720,|
00000ae0  38 35 30 29 3a 53 25 3d  53 25 2d 31 30 0d 01 e0  |850):S%=S%-10...|
00000af0  17 e7 4a 25 3d 35 31 f2  53 50 4c 3a 53 25 3d 53  |..J%=51.SPL:S%=S|
00000b00  25 2d 31 30 0d 01 ea 0c  fd 4a 25 3d 33 32 3a e1  |%-10.....J%=32:.|
00000b10  0d 01 f4 13 f5 3a 49 25  3d a5 3a fd 49 25 3d 33  |.....:I%=.:.I%=3|
00000b20  32 3a e1 0d 01 fe 57 dd  f2 54 54 28 58 25 2c 59  |2:....W..TT(X%,Y|
00000b30  25 29 3a ec 58 25 2c 59  25 3a df 58 25 2c 59 25  |%):.X%,Y%:.X%,Y%|
00000b40  2d 33 30 30 3a df 58 25  2b 33 32 2c 59 25 2d 33  |-300:.X%+32,Y%-3|
00000b50  34 30 3a df 58 25 2b 35  36 2c 59 25 2d 33 34 30  |40:.X%+56,Y%-340|
00000b60  3a df 58 25 2b 38 38 2c  59 25 2d 33 30 30 3a df  |:.X%+88,Y%-300:.|
00000b70  58 25 2b 38 38 2c 59 25  3a e1 0d 02 08 c4 dd f2  |X%+88,Y%:.......|
00000b80  46 49 4c 4c 28 58 25 2c  59 25 2c 4c 25 2c 4d 31  |FILL(X%,Y%,L%,M1|
00000b90  25 2c 4d 32 25 29 3a ef  31 38 2c 30 2c 4d 31 25  |%,M2%):.18,0,M1%|
00000ba0  3a ec 58 25 2b 38 30 2c  59 25 2d 4c 25 3a df 58  |:.X%+80,Y%-L%:.X|
00000bb0  25 2b 38 2c 59 25 2d 4c  25 3a ef 31 38 2c 30 2c  |%+8,Y%-L%:.18,0,|
00000bc0  4d 32 25 3a ec 58 25 2b  38 30 2c 59 25 2d 4c 25  |M2%:.X%+80,Y%-L%|
00000bd0  2d 34 3a ec 58 25 2b 38  30 2c 59 25 2d 33 30 34  |-4:.X%+80,Y%-304|
00000be0  3a f0 38 35 2c 58 25 2b  38 2c 59 25 2d 4c 25 2d  |:.85,X%+8,Y%-L%-|
00000bf0  34 3a f0 38 35 2c 58 25  2b 38 2c 59 25 2d 33 30  |4:.85,X%+8,Y%-30|
00000c00  34 3a f0 38 35 2c 58 25  2b 33 32 2c 59 25 2d 33  |4:.85,X%+32,Y%-3|
00000c10  33 36 3a f0 38 35 2c 58  25 2b 38 30 2c 59 25 2d  |36:.85,X%+80,Y%-|
00000c20  33 30 34 3a f0 38 35 2c  58 25 2b 35 36 2c 59 25  |304:.85,X%+56,Y%|
00000c30  2d 33 33 36 3a ef 31 38  2c 30 2c 33 3a e1 0d 02  |-336:.18,0,3:...|
00000c40  12 a1 dd f2 44 45 4c 28  58 25 2c 59 25 29 3a ec  |....DEL(X%,Y%):.|
00000c50  58 25 2b 38 2c 59 25 3a  df 58 25 2b 32 38 2c 59  |X%+8,Y%:.X%+28,Y|
00000c60  25 3a ec 58 25 2b 36 30  2c 59 25 3a df 58 25 2b  |%:.X%+60,Y%:.X%+|
00000c70  38 30 2c 59 25 3a ec 58  25 2b 38 2c 59 25 2d 33  |80,Y%:.X%+8,Y%-3|
00000c80  32 3a df 58 25 2b 32 38  2c 59 25 2d 33 32 3a ec  |2:.X%+28,Y%-32:.|
00000c90  58 25 2b 36 30 2c 59 25  2d 33 32 3a df 58 25 2b  |X%+60,Y%-32:.X%+|
00000ca0  38 30 2c 59 25 2d 33 32  3a ec 58 25 2b 33 36 2c  |80,Y%-32:.X%+36,|
00000cb0  59 25 2d 34 38 3a df 58  25 2b 33 36 2c 59 25 2b  |Y%-48:.X%+36,Y%+|
00000cc0  34 38 3a df 58 25 2b 34  35 32 2c 59 25 2b 34 38  |48:.X%+452,Y%+48|
00000cd0  3a df 58 25 2b 34 35 32  2c 59 25 2d 32 38 30 0d  |:.X%+452,Y%-280.|
00000ce0  02 1c 3c ec 58 25 2b 35  32 2c 59 25 2d 34 38 3a  |..<.X%+52,Y%-48:|
00000cf0  df 58 25 2b 35 32 2c 59  25 2b 34 30 3a df 58 25  |.X%+52,Y%+40:.X%|
00000d00  2b 34 33 36 2c 59 25 2b  34 30 3a df 58 25 2b 34  |+436,Y%+40:.X%+4|
00000d10  33 36 2c 59 25 2d 32 38  30 3a e1 0d 02 26 66 dd  |36,Y%-280:...&f.|
00000d20  f2 55 4e 49 56 28 58 25  2c 59 25 29 3a ef 31 38  |.UNIV(X%,Y%):.18|
00000d30  2c 30 2c 31 2c 31 39 2c  31 2c 32 3b 30 3b 3a ec  |,0,1,19,1,2;0;:.|
00000d40  20 58 25 2b 32 38 2c 59  25 2d 32 30 3a df 58 25  | X%+28,Y%-20:.X%|
00000d50  2b 36 38 2c 59 25 2d 32  30 3a f0 38 35 2c 58 25  |+68,Y%-20:.85,X%|
00000d60  2b 32 38 2c 59 25 2b 36  30 3a f0 38 35 2c 58 25  |+28,Y%+60:.85,X%|
00000d70  2b 36 38 2c 59 25 2b 36  30 3a f2 50 28 32 30 30  |+68,Y%+60:.P(200|
00000d80  29 0d 02 30 71 e7 42 25  3e 30 80 42 25 3c 35 8c  |)..0q.B%>0.B%<5.|
00000d90  f1 8a 31 33 2c 32 30 29  22 73 6c 69 67 68 74 22  |..13,20)"slight"|
00000da0  8a 31 32 2c 32 31 29 22  2d 72 65 64 20 70 48 34  |.12,21)"-red pH4|
00000db0  22 8b 20 e7 20 42 25 3e  36 80 42 25 3c 31 33 f1  |". . B%>6.B%<13.|
00000dc0  8a 31 32 2c 32 31 29 22  2d 72 65 64 20 70 48 31  |.12,21)"-red pH1|
00000dd0  22 8b f1 8a 31 33 2c 32  30 29 22 6e 65 75 74 72  |"...13,20)"neutr|
00000de0  61 6c 22 8a 31 32 2c 32  31 29 22 2d 20 70 48 37  |al".12,21)"- pH7|
00000df0  22 20 0d 02 3a 17 e7 20  42 25 3c 3e 36 8c 20 ef  |" ..:.. B%<>6. .|
00000e00  31 39 2c 31 2c 31 3b 30  3b 0d 02 44 58 f2 50 28  |19,1,1;0;..DX.P(|
00000e10  31 35 30 29 3a ef 31 38  2c 30 2c 30 3a ec 20 58  |150):.18,0,0:. X|
00000e20  25 2b 32 38 2c 59 25 2d  32 30 3a df 58 25 2b 36  |%+28,Y%-20:.X%+6|
00000e30  38 2c 59 25 2d 32 30 3a  f0 38 35 2c 58 25 2b 32  |8,Y%-20:.85,X%+2|
00000e40  38 2c 59 25 2b 36 30 3a  f0 38 35 2c 58 25 2b 36  |8,Y%+60:.85,X%+6|
00000e50  38 2c 59 25 2b 36 30 3a  ef 31 38 2c 30 2c 33 3a  |8,Y%+60:.18,0,3:|
00000e60  e1 0d 02 4e ab dd f2 53  50 4c 3a 4a 25 3d 31 30  |...N...SPL:J%=10|
00000e70  30 30 3a f2 44 52 53 50  4c 28 31 29 3a f2 50 28  |00:.DRSPL(1):.P(|
00000e80  35 30 29 3a f5 f2 44 52  53 50 4c 28 31 29 3a 4a  |50):..DRSPL(1):J|
00000e90  25 3d 4a 25 2d 38 3a f2  44 52 53 50 4c 28 31 29  |%=J%-8:.DRSPL(1)|
00000ea0  3a f2 50 28 35 29 3a fd  4a 25 3d 38 30 30 3a f2  |:.P(5):.J%=800:.|
00000eb0  50 28 31 30 30 29 3a e7  41 25 3d 33 8c ef 31 38  |P(100):.A%=3..18|
00000ec0  2c 30 2c 31 2c 31 39 2c  31 2c 33 3b 30 3b 3a f0  |,0,1,19,1,3;0;:.|
00000ed0  38 35 2c 37 36 30 2c 39  32 30 3a f1 8a 31 32 2c  |85,760,920:..12,|
00000ee0  32 35 29 22 2d 6c 69 67  68 74 73 22 20 8b 20 ef  |25)"-lights" . .|
00000ef0  31 39 2c 31 2c 37 3b 30  3b 3a f1 8a 31 32 2c 32  |19,1,7;0;:..12,2|
00000f00  36 29 22 2d 70 75 74 20  6f 75 74 22 0d 02 58 33  |6)"-put out"..X3|
00000f10  f2 50 28 31 35 30 29 3a  f2 44 52 53 50 4c 28 37  |.P(150):.DRSPL(7|
00000f20  29 3a ef 31 38 2c 30 2c  30 3a f0 38 35 2c 37 36  |):.18,0,0:.85,76|
00000f30  30 2c 39 32 30 3a ef 31  38 2c 30 2c 33 3a e1 0d  |0,920:.18,0,3:..|
00000f40  02 62 a1 dd f2 53 55 42  3a f1 8a 30 2c 31 33 29  |.b...SUB:..0,13)|
00000f50  22 53 75 62 73 74 61 6e  63 65 22 8a 30 2c 31 34  |"Substance".0,14|
00000f60  29 22 64 69 73 61 70 70  65 61 72 73 22 8a 30 2c  |)"disappears".0,|
00000f70  31 35 29 22 66 72 6f 6d  20 68 6f 74 22 8a 30 2c  |15)"from hot".0,|
00000f80  31 36 29 22 70 61 72 74  20 6f 66 20 74 75 62 65  |16)"part of tube|
00000f90  22 3a e3 4a 25 3d 32 34  30 b8 33 30 34 88 34 3a  |":.J%=240.304.4:|
00000fa0  f2 46 49 4c 4c 28 37 32  30 2c 38 35 30 2c 4a 25  |.FILL(720,850,J%|
00000fb0  2c 30 2c 33 29 3a e7 4a  25 3d 32 36 34 ec 37 32  |,0,3):.J%=264.72|
00000fc0  38 2c 38 30 30 3a df 37  32 38 2c 37 30 30 3a ec  |8,800:.728,700:.|
00000fd0  38 30 30 2c 38 30 30 3a  df 38 30 30 2c 37 30 30  |800,800:.800,700|
00000fe0  0d 02 6c 2e e7 4a 25 3d  32 38 38 ec 37 33 36 2c  |..l..J%=288.736,|
00000ff0  37 32 30 3a df 37 33 36  2c 37 39 30 3a ec 37 39  |720:.736,790:.79|
00001000  32 2c 37 39 30 3a df 37  39 32 2c 37 32 30 0d 02  |2,790:.792,720..|
00001010  76 45 f2 50 28 31 30 29  3a ed 3a f1 8a 31 33 2c  |vE.P(10):.:..13,|
00001020  36 29 22 61 6e 64 22 8a  31 33 2c 37 29 22 72 65  |6)"and".13,7)"re|
00001030  66 6f 72 6d 73 22 8a 31  33 2c 38 29 22 6f 6e 20  |forms".13,8)"on |
00001040  63 6f 6f 6c 22 8a 31 33  2c 39 29 22 70 61 72 74  |cool".13,9)"part|
00001050  22 3a e1 0d 02 80 1d dd  f2 50 28 4a 25 29 3a 54  |":.......P(J%):T|
00001060  25 3d 91 2b 4a 25 3a f5  fd 91 3e 3d 54 25 3a e1  |%=.+J%:...>=T%:.|
00001070  0d 02 8a 67 dd f2 44 52  53 50 4c 28 4b 25 29 3a  |...g..DRSPL(K%):|
00001080  ef 31 38 2c 33 2c 33 3a  ec 4a 25 2c 38 35 38 3a  |.18,3,3:.J%,858:|
00001090  f0 39 2c 32 35 36 2c 30  3a f0 39 2c 30 2c 34 3a  |.9,256,0:.9,0,4:|
000010a0  f0 39 2c 2d 32 36 34 2c  30 3a ef 31 38 2c 33 2c  |.9,-264,0:.18,3,|
000010b0  31 2c 31 39 2c 31 2c 4b  25 3b 30 3b 3a f0 39 2c  |1,19,1,K%;0;:.9,|
000010c0  2d 35 36 2c 30 3a f0 39  2c 30 2c 2d 34 3a f0 39  |-56,0:.9,0,-4:.9|
000010d0  2c 36 34 2c 30 3a e1 0d  02 94 42 dd f2 41 3a ef  |,64,0:....B..A:.|
000010e0  32 33 2c 31 2c 30 3b 30  3b 30 3b 30 3b 31 32 3a  |23,1,0;0;0;0;12:|
000010f0  e7 43 25 3d 32 84 43 25  3d 37 84 43 25 3d 38 84  |.C%=2.C%=7.C%=8.|
00001100  43 25 3d 39 20 8c ef 31  39 2c 30 2c 37 3b 30 3b  |C%=9 ..19,0,7;0;|
00001110  31 39 2c 33 2c 30 3b 30  3b 0d 02 9e 54 f1 8a 30  |19,3,0;0;...T..0|
00001120  2c 31 29 22 41 44 44 20  41 4c 4b 41 4c 49 2d 74  |,1)"ADD ALKALI-t|
00001130  6f 20 73 6f 6c 6e 2e 22  8a 30 2c 32 29 c4 31 30  |o soln.".0,2).10|
00001140  2c bd 32 34 30 29 3a e7  42 25 3e 34 f1 8a 31 31  |,.240):.B%>4..11|
00001150  2c 32 29 22 69 6e 20 77  61 74 65 72 22 8b f1 8a  |,2)"in water"...|
00001160  31 31 2c 32 29 22 69 6e  20 48 43 6c 22 0d 02 a8  |11,2)"in HCl"...|
00001170  10 e7 43 25 3d 39 8c f2  41 4d 4d 3a e1 0d 02 b2  |..C%=9..AMM:....|
00001180  67 f1 8a 30 2c 34 29 22  61 29 53 4f 44 49 55 4d  |g..0,4)"a)SODIUM|
00001190  20 48 59 44 52 4f 58 49  44 45 22 8a 30 2c 35 29  | HYDROXIDE".0,5)|
000011a0  c4 31 38 2c bd 32 34 31  29 8a 30 2c 31 37 29 22  |.18,.241).0,17)"|
000011b0  62 29 41 4d 4d 4f 4e 49  41 20 53 4f 4c 55 54 49  |b)AMMONIA SOLUTI|
000011c0  4f 4e 22 8a 30 2c 31 38  29 c4 31 38 2c bd 32 34  |ON".0,18).18,.24|
000011d0  31 29 8a 35 2c 33 31 29  22 53 50 41 43 45 20 42  |1).5,31)"SPACE B|
000011e0  41 52 22 3b 0d 02 bc b6  f2 54 54 28 38 2c 38 33  |AR";.....TT(8,83|
000011f0  32 29 3a f2 54 54 28 36  34 38 2c 38 33 32 29 3a  |2):.TT(648,832):|
00001200  f2 54 54 28 38 2c 34 31  36 29 3a f2 54 54 28 36  |.TT(8,416):.TT(6|
00001210  34 38 2c 34 31 36 29 3a  f1 8a 32 2c 36 29 22 41  |48,416):..2,6)"A|
00001220  64 64 22 8a 32 2c 37 29  22 73 6d 61 6c 6c 22 8a  |dd".2,7)"small".|
00001230  32 2c 38 29 22 61 6d 6f  75 6e 74 2d 22 8a 31 32  |2,8)"amount-".12|
00001240  2c 36 29 22 41 64 64 22  8a 31 32 2c 37 29 22 65  |,6)"Add".12,7)"e|
00001250  78 63 65 73 73 2d 22 8a  32 2c 31 39 29 22 41 64  |xcess-".2,19)"Ad|
00001260  64 22 8a 32 2c 32 30 29  22 73 6d 61 6c 6c 22 8a  |d".2,20)"small".|
00001270  32 2c 32 31 29 22 61 6d  6f 75 6e 74 2d 22 8a 31  |2,21)"amount-".1|
00001280  32 2c 31 39 29 22 41 64  64 22 8a 31 32 2c 32 30  |2,19)"Add".12,20|
00001290  29 22 65 78 63 65 73 73  2d 22 0d 02 c6 3f e7 43  |)"excess-"...?.C|
000012a0  25 3d 37 8c ef 31 39 2c  31 2c 32 3b 30 3b 8b e7  |%=7..19,1,2;0;..|
000012b0  43 25 3d 38 ef 31 39 2c  31 2c 33 3b 30 3b 8b e7  |C%=8.19,1,3;0;..|
000012c0  43 25 3d 32 ef 31 39 2c  31 2c 36 3b 30 3b 8b ef  |C%=2.19,1,6;0;..|
000012d0  31 39 2c 31 2c 37 3b 30  3b 0d 02 d0 40 e7 43 25  |19,1,7;0;...@.C%|
000012e0  3d 33 f1 8a 32 2c 31 31  29 22 63 6c 65 61 72 22  |=3..2,11)"clear"|
000012f0  8a 32 2c 31 32 29 22 73  6f 6c 6e 2e 22 3a f2 46  |.2,12)"soln.":.F|
00001300  49 4c 4c 28 38 2c 38 33  32 2c 32 30 30 2c 31 2c  |ILL(8,832,200,1,|
00001310  30 29 3a e5 8d 64 6e 42  20 0d 02 da 78 e7 43 25  |0):..dnB ...x.C%|
00001320  3d 37 f1 8a 32 2c 31 30  29 22 64 69 72 74 79 22  |=7..2,10)"dirty"|
00001330  8a 32 2c 31 31 29 22 67  72 65 65 6e 22 8b 20 e7  |.2,11)"green". .|
00001340  20 43 25 3d 38 f1 8a 32  2c 31 30 29 22 6f 72 61  | C%=8..2,10)"ora|
00001350  6e 67 65 2d 22 8a 32 2c  31 31 29 22 79 65 6c 6c  |nge-".2,11)"yell|
00001360  6f 77 22 8b e7 43 25 3d  32 f1 8a 32 2c 31 30 29  |ow"..C%=2..2,10)|
00001370  22 70 61 6c 65 22 8a 32  2c 31 31 29 22 62 6c 75  |"pale".2,11)"blu|
00001380  65 22 8b f1 8a 32 2c 31  31 29 22 77 68 69 74 65  |e"...2,11)"white|
00001390  22 0d 02 e4 27 f2 46 49  4c 4c 28 38 2c 38 33 32  |"...'.FILL(8,832|
000013a0  2c 32 30 30 2c 31 2c 31  29 3a f1 8a 32 2c 31 32  |,200,1,1):..2,12|
000013b0  29 22 70 70 74 65 2e 22  0d 02 ee 48 e7 43 25 3e  |)"ppte."...H.C%>|
000013c0  32 80 43 25 3c 37 f1 8a  31 32 2c 31 31 29 22 63  |2.C%<7..12,11)"c|
000013d0  6c 65 61 72 22 8a 31 32  2c 31 32 29 22 73 6f 6c  |lear".12,12)"sol|
000013e0  6e 2e 22 3a f2 46 49 4c  4c 28 36 34 38 2c 38 33  |n.":.FILL(648,83|
000013f0  32 2c 31 30 30 2c 31 2c  30 29 3a e5 8d 54 4c 43  |2,100,1,0):..TLC|
00001400  0d 02 f8 84 e7 43 25 3d  37 f1 8a 31 32 2c 31 30  |.....C%=7..12,10|
00001410  29 22 64 69 72 74 79 22  8a 31 32 2c 31 31 29 22  |)"dirty".12,11)"|
00001420  67 72 65 65 6e 22 8b 20  e7 20 43 25 3d 38 f1 8a  |green". . C%=8..|
00001430  31 32 2c 31 30 29 22 6f  72 61 6e 67 65 2d 22 8a  |12,10)"orange-".|
00001440  31 32 2c 31 31 29 22 79  65 6c 6c 6f 77 22 8b e7  |12,11)"yellow"..|
00001450  43 25 3d 32 f1 8a 31 32  2c 31 30 29 22 70 61 6c  |C%=2..12,10)"pal|
00001460  65 22 8a 31 32 2c 31 31  29 22 62 6c 75 65 22 8b  |e".12,11)"blue".|
00001470  e7 43 25 3d 31 f1 8a 31  32 2c 31 31 29 22 77 68  |.C%=1..12,11)"wh|
00001480  69 74 65 22 0d 03 02 2a  f1 8a 31 32 2c 31 32 29  |ite"...*..12,12)|
00001490  22 70 70 74 65 2e 22 3a  f2 46 49 4c 4c 28 36 34  |"ppte.":.FILL(64|
000014a0  38 2c 38 33 32 2c 31 30  30 2c 31 2c 31 29 0d 03  |8,832,100,1,1)..|
000014b0  0c 4a e7 20 43 25 3d 33  20 84 20 43 25 3d 31 8c  |.J. C%=3 . C%=1.|
000014c0  20 f1 8a 32 2c 32 34 29  22 63 6c 65 61 72 22 8a  | ..2,24)"clear".|
000014d0  32 2c 32 35 29 22 73 6f  6c 6e 2e 22 3a f2 46 49  |2,25)"soln.":.FI|
000014e0  4c 4c 28 38 2c 34 31 36  2c 32 30 30 2c 31 2c 30  |LL(8,416,200,1,0|
000014f0  29 3a e5 8d 54 6a 43 20  0d 03 16 78 e7 43 25 3d  |):..TjC ...x.C%=|
00001500  37 f1 8a 32 2c 32 33 29  22 64 69 72 74 79 22 8a  |7..2,23)"dirty".|
00001510  32 2c 32 34 29 22 67 72  65 65 6e 22 8b 20 e7 20  |2,24)"green". . |
00001520  43 25 3d 38 f1 8a 32 2c  32 33 29 22 6f 72 61 6e  |C%=8..2,23)"oran|
00001530  67 65 2d 22 8a 32 2c 32  34 29 22 79 65 6c 6c 6f  |ge-".2,24)"yello|
00001540  77 22 8b e7 43 25 3d 32  f1 8a 32 2c 32 33 29 22  |w"..C%=2..2,23)"|
00001550  70 61 6c 65 22 8a 32 2c  32 34 29 22 62 6c 75 65  |pale".2,24)"blue|
00001560  22 8b f1 8a 32 2c 32 34  29 22 77 68 69 74 65 22  |"...2,24)"white"|
00001570  0d 03 20 27 f1 8a 32 2c  32 35 29 22 70 70 74 65  |.. '..2,25)"ppte|
00001580  2e 22 3a f2 46 49 4c 4c  28 38 2c 34 31 36 2c 32  |.":.FILL(8,416,2|
00001590  30 30 2c 31 2c 31 29 0d  03 2a 51 e7 43 25 3d 36  |00,1,1)..*Q.C%=6|
000015a0  84 43 25 3d 33 20 84 20  43 25 3d 31 8c 20 f1 8a  |.C%=3 . C%=1. ..|
000015b0  31 32 2c 32 34 29 22 63  6c 65 61 72 22 8a 31 32  |12,24)"clear".12|
000015c0  2c 32 35 29 22 73 6f 6c  6e 2e 22 3a f2 46 49 4c  |,25)"soln.":.FIL|
000015d0  4c 28 36 34 38 2c 34 31  36 2c 31 30 30 2c 31 2c  |L(648,416,100,1,|
000015e0  30 29 3a e5 8d 44 52 43  0d 03 34 7f e7 43 25 3d  |0):..DRC..4..C%=|
000015f0  37 f1 8a 31 32 2c 32 33  29 22 64 69 72 74 79 22  |7..12,23)"dirty"|
00001600  8a 31 32 2c 32 34 29 22  67 72 65 65 6e 22 8b 20  |.12,24)"green". |
00001610  e7 20 43 25 3d 38 f1 8a  31 32 2c 32 33 29 22 6f  |. C%=8..12,23)"o|
00001620  72 61 6e 67 65 2d 22 8a  31 32 2c 32 34 29 22 79  |range-".12,24)"y|
00001630  65 6c 6c 6f 77 22 8b e7  43 25 3d 32 f1 8a 31 32  |ellow"..C%=2..12|
00001640  2c 32 33 29 22 64 65 65  70 22 8a 31 32 2c 32 34  |,23)"deep".12,24|
00001650  29 22 62 6c 75 65 22 8b  f1 8a 31 32 2c 32 34 29  |)"blue"...12,24)|
00001660  22 77 68 69 74 65 22 0d  03 3e 40 e7 43 25 3d 32  |"white"..>@.C%=2|
00001670  f1 8a 31 32 2c 32 35 29  22 73 6f 6c 6e 2e 22 3a  |..12,25)"soln.":|
00001680  ef 31 39 2c 32 2c 34 3b  30 3b 3a f2 46 49 4c 4c  |.19,2,4;0;:.FILL|
00001690  28 36 34 38 2c 34 31 36  2c 31 30 30 2c 32 2c 32  |(648,416,100,2,2|
000016a0  29 3a e5 8d 44 52 43 0d  03 48 2a f1 8a 31 32 2c  |):..DRC..H*..12,|
000016b0  32 35 29 22 70 70 74 65  2e 22 3a f2 46 49 4c 4c  |25)"ppte.":.FILL|
000016c0  28 36 34 38 2c 34 31 36  2c 31 30 30 2c 31 2c 31  |(648,416,100,1,1|
000016d0  29 0d 03 52 13 f5 3a 49  25 3d a5 3a fd 49 25 3d  |)..R..:I%=.:.I%=|
000016e0  33 32 3a e1 0d 03 5c b1  dd f2 41 4d 4d 3a 51 25  |32:...\...AMM:Q%|
000016f0  3d 31 3a f2 54 54 28 31  36 2c 38 36 30 29 3a f2  |=1:.TT(16,860):.|
00001700  46 49 4c 4c 28 31 36 2c  38 36 30 2c 32 38 30 2c  |FILL(16,860,280,|
00001710  33 2c 30 29 3a f2 50 28  31 30 30 29 3a f1 8a 32  |3,0):.P(100):..2|
00001720  2c 35 29 22 41 64 64 69  74 69 6f 6e 20 6f 66 20  |,5)"Addition of |
00001730  64 69 6c 75 74 65 22 8a  32 2c 36 29 22 73 6f 64  |dilute".2,6)"sod|
00001740  69 75 6d 20 68 79 64 72  6f 78 69 64 65 2d 22 3a  |ium hydroxide-":|
00001750  f2 46 49 4c 4c 28 31 36  2c 38 36 30 2c 32 32 30  |.FILL(16,860,220|
00001760  2c 33 2c 30 29 3a f2 50  28 31 30 30 29 3a f1 8a  |,3,0):.P(100):..|
00001770  32 2c 39 29 22 67 69 76  65 73 20 6f 66 66 20 61  |2,9)"gives off a|
00001780  20 22 8a 32 2c 31 30 29  22 70 75 6e 67 65 6e 74  | ".2,10)"pungent|
00001790  20 67 61 73 22 0d 03 66  40 f1 8a 30 2c 31 37 29  | gas"..f@..0,17)|
000017a0  22 50 72 65 73 73 28 31  29 74 6f 20 74 65 73 74  |"Press(1)to test|
000017b0  20 67 61 73 22 8a 32 2c  33 30 29 22 53 50 41 43  | gas".2,30)"SPAC|
000017c0  45 20 42 41 52 20 54 4f  20 45 4e 44 22 3a 2a 46  |E BAR TO END":*F|
000017d0  58 31 35 2c 31 0d 03 70  28 f5 3a 49 25 3d a5 3a  |X15,1..p(.:I%=.:|
000017e0  e7 49 25 3d 34 39 8c f2  42 4c 55 45 28 31 36 2c  |.I%=49..BLUE(16,|
000017f0  38 36 30 29 3a 53 25 3d  53 25 2d 31 30 0d 03 7a  |860):S%=S%-10..z|
00001800  0c fd 49 25 3d 33 32 3a  e1 0d 03 84 6a dd f2 42  |..I%=32:....j..B|
00001810  4c 55 45 28 58 25 2c 59  25 29 3a ef 31 37 2c 31  |LUE(X%,Y%):.17,1|
00001820  2c 31 38 2c 30 2c 31 2c  31 39 2c 31 2c 32 3b 30  |,18,0,1,19,1,2;0|
00001830  3b 3a ec 20 58 25 2b 32  38 2c 59 25 2d 32 30 3a  |;:. X%+28,Y%-20:|
00001840  df 58 25 2b 36 38 2c 59  25 2d 32 30 3a f0 38 35  |.X%+68,Y%-20:.85|
00001850  2c 58 25 2b 32 38 2c 59  25 2b 36 30 3a f0 38 35  |,X%+28,Y%+60:.85|
00001860  2c 58 25 2b 36 38 2c 59  25 2b 36 30 3a e7 51 25  |,X%+68,Y%+60:.Q%|
00001870  3d 30 e1 0d 03 8e 4f f1  8a 30 2c 32 31 29 22 49  |=0....O..0,21)"I|
00001880  74 20 74 75 72 6e 73 20  75 6e 69 76 65 72 73 61  |t turns universa|
00001890  6c 22 8a 30 2c 32 32 29  22 70 61 70 65 72 22 3a  |l".0,22)"paper":|
000018a0  f2 50 28 32 30 30 29 3a  ef 31 39 2c 31 2c 34 3b  |.P(200):.19,1,4;|
000018b0  30 3b 3a f1 8a 36 2c 32  32 29 22 62 6c 75 65 22  |0;:..6,22)"blue"|
000018c0  3a e1 0d 03 98 af dd f2  4c 49 4d 45 28 58 25 2c  |:.......LIME(X%,|
000018d0  59 25 29 3a f2 54 54 28  58 25 2b 34 30 30 2c 59  |Y%):.TT(X%+400,Y|
000018e0  25 29 3a f2 46 49 4c 4c  28 58 25 2b 34 30 30 2c  |%):.FILL(X%+400,|
000018f0  59 25 2c 31 38 30 2c 33  2c 30 29 3a f2 44 45 4c  |Y%,180,3,0):.DEL|
00001900  28 58 25 2c 59 25 29 3a  ef 31 38 2c 33 2c 33 3a  |(X%,Y%):.18,3,3:|
00001910  54 25 3d 91 3a f5 3a ec  58 25 2b 34 36 38 2c 59  |T%=.:.:.X%+468,Y|
00001920  25 2d 32 38 36 3a e3 4a  25 3d 59 25 2d 32 38 32  |%-286:.J%=Y%-282|
00001930  b8 59 25 2d 31 38 32 88  34 3a df 58 25 2b 34 36  |.Y%-182.4:.X%+46|
00001940  38 2c 4a 25 3a ec 58 25  2b 34 36 38 2c 4a 25 2d  |8,J%:.X%+468,J%-|
00001950  34 3a df 58 25 2b 34 36  38 2c 4a 25 3a ed 3a fd  |4:.X%+468,J%:.:.|
00001960  91 3e 3d 54 25 2b 34 30  30 3a ef 31 38 2c 30 2c  |.>=T%+400:.18,0,|
00001970  33 0d 03 a2 27 e7 50 25  3d 30 80 42 25 3d 35 8c  |3...'.P%=0.B%=5.|
00001980  f2 46 49 4c 4c 28 58 25  2b 34 30 30 2c 59 25 2c  |.FILL(X%+400,Y%,|
00001990  31 38 30 2c 33 2c 33 29  0d 03 ac 27 e7 42 25 3e  |180,3,3)...'.B%>|
000019a0  30 80 42 25 3c 35 8c f2  46 49 4c 4c 28 58 25 2b  |0.B%<5..FILL(X%+|
000019b0  34 30 30 2c 59 25 2c 31  38 30 2c 33 2c 33 29 0d  |400,Y%,180,3,3).|
000019c0  03 b6 0b e7 50 25 3d 30  e1 20 0d 03 c0 3f e7 42  |....P%=0. ...?.B|
000019d0  25 3e 30 80 42 25 3c 35  f1 8a 31 32 2c 32 33 29  |%>0.B%<5..12,23)|
000019e0  22 2d 77 68 69 74 65 22  8a 31 33 2c 32 34 29 22  |"-white".13,24)"|
000019f0  70 70 74 65 2e 22 8b f1  8a 31 32 2c 32 33 29 22  |ppte."...12,23)"|
00001a00  2d 6e 6f 74 68 69 6e 67  22 0d 03 ca 51 f2 50 28  |-nothing"...Q.P(|
00001a10  32 30 30 29 3a ef 31 38  2c 30 2c 30 3a f2 44 45  |200):.18,0,0:.DE|
00001a20  4c 28 37 32 30 2c 38 35  30 29 3a f2 54 54 28 31  |L(720,850):.TT(1|
00001a30  31 32 30 2c 38 35 30 29  3a f2 46 49 4c 4c 28 31  |120,850):.FILL(1|
00001a40  31 32 30 2c 38 35 30 2c  31 38 30 2c 30 2c 30 29  |120,850,180,0,0)|
00001a50  3a ef 31 38 2c 30 2c 33  3a e1 0d 03 d4 b7 dd f2  |:.18,0,3:.......|
00001a60  4e 3a f1 27 22 54 45 53  54 53 20 46 4f 52 20 41  |N:.'"TESTS FOR A|
00001a70  4e 49 4f 4e 53 22 27 c4  31 36 2c bd 32 34 30 29  |NIONS"'.16,.240)|
00001a80  27 22 31 29 48 79 64 72  6f 63 68 6c 6f 72 69 63  |'"1)Hydrochloric|
00001a90  20 61 63 69 64 20 32 29  53 69 6c 76 65 72 20 6e  | acid 2)Silver n|
00001aa0  69 74 72 61 74 65 22 27  22 33 29 42 61 72 69 75  |itrate"'"3)Bariu|
00001ab0  6d 20 63 68 6c 6f 72 69  64 65 22 27 22 34 29 43  |m chloride"'"4)C|
00001ac0  68 6c 6f 72 69 6e 65 20  77 61 74 65 72 22 27 22  |hlorine water"'"|
00001ad0  35 29 53 6f 64 69 75 6d  20 68 79 64 72 6f 78 69  |5)Sodium hydroxi|
00001ae0  64 65 22 27 22 20 20 20  61 6e 64 20 7a 69 6e 63  |de"'"   and zinc|
00001af0  20 70 6f 77 64 65 72 22  8a 32 2c 33 31 29 22 53  | powder".2,31)"S|
00001b00  50 41 43 45 20 42 41 52  20 54 4f 20 45 4e 44 22  |PACE BAR TO END"|
00001b10  3b 0d 03 de 2c ef 32 34  2c 30 3b 31 32 38 3b 31  |;...,.24,0;128;1|
00001b20  31 38 34 3b 37 30 30 3b  32 33 2c 31 2c 30 3b 30  |184;700;23,1,0;0|
00001b30  3b 30 3b 30 3b 3a 2a 46  58 31 35 2c 31 0d 03 e8  |;0;0;:*FX15,1...|
00001b40  1f f5 3a 49 25 3d a5 3a  e7 49 25 3d 34 39 f2 41  |..:I%=.:.I%=49.A|
00001b50  43 49 44 3a 53 25 3d 53  25 2d 31 30 0d 03 f2 16  |CID:S%=S%-10....|
00001b60  e7 49 25 3d 35 30 f2 41  47 3a 53 25 3d 53 25 2d  |.I%=50.AG:S%=S%-|
00001b70  31 30 0d 03 fc 16 e7 49  25 3d 35 31 f2 42 41 3a  |10.....I%=51.BA:|
00001b80  53 25 3d 53 25 2d 31 30  0d 04 06 19 e7 49 25 3d  |S%=S%-10.....I%=|
00001b90  35 32 f2 43 4c 3a 53 25  3d 53 25 2d 31 30 20 20  |52.CL:S%=S%-10  |
00001ba0  20 0d 04 10 17 e7 49 25  3d 35 33 f2 5a 4e 3a 53  | .....I%=53.ZN:S|
00001bb0  25 3d 53 25 2d 31 30 20  0d 04 1a 0c fd 49 25 3d  |%=S%-10 .....I%=|
00001bc0  33 32 3a e1 0d 04 24 38  dd f2 41 43 49 44 3a e7  |32:...$8..ACID:.|
00001bd0  45 25 3c 3e 37 80 41 25  3c 3e 32 ef 31 38 2c 30  |E%<>7.A%<>2.18,0|
00001be0  2c 30 2c 31 38 2c 30 2c  31 33 31 8b ef 31 38 2c  |,0,18,0,131..18,|
00001bf0  30 2c 33 2c 31 38 2c 30  2c 31 32 38 0d 04 2e 37  |0,3,18,0,128...7|
00001c00  ef 35 2c 31 39 2c 31 2c  45 25 3b 30 3b 31 36 3a  |.5,19,1,E%;0;16:|
00001c10  f2 54 54 28 34 38 30 2c  35 37 36 29 3a f2 46 49  |.TT(480,576):.FI|
00001c20  4c 4c 28 34 38 30 2c 35  37 36 2c 32 39 30 2c 31  |LL(480,576,290,1|
00001c30  2c 31 29 0d 04 38 18 e7  45 25 3c 3e 37 80 41 25  |,1)..8..E%<>7.A%|
00001c40  3c 3e 32 ef 31 38 2c 30  2c 30 20 0d 04 42 1f e7  |<>2.18,0,0 ..B..|
00001c50  42 25 3d 30 ef 31 39 2c  32 2c 34 3b 30 3b 3a 4e  |B%=0.19,2,4;0;:N|
00001c60  25 3d 32 8b 4e 25 3d 31  20 20 0d 04 4c 17 e7 45  |%=2.N%=1  ..L..E|
00001c70  25 3d 37 84 41 25 3d 32  4f 25 3d 30 8b 4f 25 3d  |%=7.A%=2O%=0.O%=|
00001c80  33 0d 04 56 68 ec 30 2c  36 30 38 3a f1 22 41 64  |3..Vh.0,608:."Ad|
00001c90  64 22 3a ec 30 2c 35 37  36 3a f1 22 64 69 6c 75  |d":.0,576:."dilu|
00001ca0  74 65 22 3a ec 30 2c 35  34 34 3a f1 22 48 43 6c  |te":.0,544:."HCl|
00001cb0  2d 22 3a f2 50 28 31 30  30 29 3a f2 46 49 4c 4c  |-":.P(100):.FILL|
00001cc0  28 34 38 30 2c 35 37 36  2c 32 31 30 2c 4e 25 2c  |(480,576,210,N%,|
00001cd0  4f 25 29 3a e7 45 25 3c  3e 37 80 42 25 3c 3e 31  |O%):.E%<>7.B%<>1|
00001ce0  ef 31 38 2c 30 2c 30 20  20 0d 04 60 31 e7 20 42  |.18,0,0  ..`1. B|
00001cf0  25 3d 30 ec 36 34 30 2c  36 30 38 3a f1 22 62 6c  |%=0.640,608:."bl|
00001d00  75 65 22 3a ec 36 34 30  2c 35 37 36 3a f1 22 73  |ue":.640,576:."s|
00001d10  6f 6c 75 74 69 6f 6e 22  3a e1 0d 04 6a 32 e7 41  |olution":...j2.A|
00001d20  25 3c 3e 32 ec 36 34 30  2c 36 30 38 3a f1 22 63  |%<>2.640,608:."c|
00001d30  6c 65 61 72 22 3a ec 36  34 30 2c 35 37 36 3a f1  |lear":.640,576:.|
00001d40  22 73 6f 6c 75 74 69 6f  6e 22 3a e1 0d 04 74 5c  |"solution":...t\|
00001d50  ec 30 2c 34 38 30 3a f1  22 67 61 73 22 3a ec 30  |.0,480:."gas":.0|
00001d60  2c 34 34 38 3a f1 22 65  76 6f 6c 76 65 64 22 3a  |,448:."evolved":|
00001d70  54 25 3d 91 2b 33 30 30  3a f5 f2 42 3a fd 20 91  |T%=.+300:..B:. .|
00001d80  3e 54 25 3a ec 30 2c 37  30 30 3a f1 22 36 29 54  |>T%:.0,700:."6)T|
00001d90  65 73 74 20 67 61 73 20  65 76 6f 6c 76 65 64 22  |est gas evolved"|
00001da0  3a 2a 46 58 31 35 2c 31  0d 04 7e 67 49 25 3d a5  |:*FX15,1..~gI%=.|
00001db0  3a e7 49 25 3d 35 34 50  25 3d 30 3a f2 4c 49 4d  |:.I%=54P%=0:.LIM|
00001dc0  45 28 34 38 30 2c 35 37  36 29 3a ec 38 2c 32 32  |E(480,576):.8,22|
00001dd0  34 3a f1 22 57 68 69 74  65 20 70 72 65 63 69 70  |4:."White precip|
00001de0  69 74 61 74 65 22 3a ec  38 2c 31 39 32 3a f1 22  |itate":.8,192:."|
00001df0  77 69 74 68 20 6c 69 6d  65 77 61 74 65 72 22 3a  |with limewater":|
00001e00  53 25 3d 53 25 2d 31 30  8b e5 20 8d 64 72 43 0d  |S%=S%-10.. .drC.|
00001e10  04 88 05 e1 0d 04 92 89  dd f2 42 3a ef 31 38 2c  |..........B:.18,|
00001e20  33 2c 33 3a e3 4a 25 3d  32 36 34 b8 33 36 30 88  |3,3:.J%=264.360.|
00001e30  34 3a f0 36 39 2c 35 30  38 2c 4a 25 3a f0 36 39  |4:.69,508,J%:.69|
00001e40  2c 35 33 32 2c 4a 25 2b  34 3a f0 36 39 2c 35 32  |,532,J%+4:.69,52|
00001e50  34 2c 4a 25 2d 32 30 3a  f0 36 39 2c 35 34 38 2c  |4,J%-20:.69,548,|
00001e60  4a 25 2d 31 36 3a f0 36  39 2c 35 30 38 2c 4a 25  |J%-16:.69,508,J%|
00001e70  3a f0 36 39 2c 35 33 32  2c 4a 25 2b 34 3a f0 36  |:.69,532,J%+4:.6|
00001e80  39 2c 35 32 34 2c 4a 25  2d 32 30 3a f0 36 39 2c  |9,524,J%-20:.69,|
00001e90  35 34 38 2c 4a 25 2d 31  36 3a ed 3a e1 0d 04 9c  |548,J%-16:.:....|
00001ea0  a6 dd f2 41 47 3a ef 31  38 2c 30 2c 33 2c 31 38  |...AG:.18,0,3,18|
00001eb0  2c 30 2c 31 32 38 2c 31  36 2c 35 2c 31 39 2c 31  |,0,128,16,5,19,1|
00001ec0  2c 45 25 3b 30 3b 3a f2  54 54 28 34 38 30 2c 35  |,E%;0;:.TT(480,5|
00001ed0  37 36 29 3a f2 46 49 4c  4c 28 34 38 30 2c 35 37  |76):.FILL(480,57|
00001ee0  36 2c 32 39 30 2c 31 2c  31 29 3a ec 30 2c 35 37  |6,290,1,1):.0,57|
00001ef0  36 3a f1 22 41 64 64 22  3a ec 30 2c 35 34 34 3a  |6:."Add":.0,544:|
00001f00  f1 22 64 69 6c 75 74 65  22 3a ec 30 2c 35 31 32  |."dilute":.0,512|
00001f10  3a f1 22 6e 69 74 72 69  63 22 3a ec 30 2c 34 38  |:."nitric":.0,48|
00001f20  30 3a f1 22 61 63 69 64  22 3a e7 42 25 3d 30 ef  |0:."acid":.B%=0.|
00001f30  31 39 2c 32 2c 34 3b 30  3b 3a 4e 25 3d 32 8b 4e  |19,2,4;0;:N%=2.N|
00001f40  25 3d 31 0d 04 a6 98 f2  50 28 31 30 30 29 3a f2  |%=1.....P(100):.|
00001f50  46 49 4c 4c 28 34 38 30  2c 35 37 36 2c 32 31 30  |FILL(480,576,210|
00001f60  2c 4e 25 2c 30 29 3a e7  41 25 3d 32 8c 54 25 3d  |,N%,0):.A%=2.T%=|
00001f70  91 2b 32 30 30 3a f5 f2  42 3a fd 91 3e 54 25 3a  |.+200:..B:..>T%:|
00001f80  8b f2 50 28 31 30 30 29  3a ec 30 2c 34 31 36 3a  |..P(100):.0,416:|
00001f90  f1 22 74 68 65 6e 22 3a  ec 30 2c 33 38 34 3a f1  |."then":.0,384:.|
00001fa0  22 73 69 6c 76 65 72 22  3a ec 30 2c 33 35 32 3a  |"silver":.0,352:|
00001fb0  f1 22 6e 69 74 72 61 74  65 22 3a e7 41 25 3d 35  |."nitrate":.A%=5|
00001fc0  84 41 25 3d 36 f2 46 49  4c 4c 28 34 38 30 2c 35  |.A%=6.FILL(480,5|
00001fd0  37 36 2c 31 33 30 2c 33  2c 33 29 0d 04 b0 27 e7  |76,130,3,3)...'.|
00001fe0  41 25 3d 37 ef 31 39 2c  32 2c 33 3a f2 46 49 4c  |A%=7.19,2,3:.FIL|
00001ff0  4c 28 34 38 30 2c 35 37  36 2c 31 33 30 2c 32 2c  |L(480,576,130,2,|
00002000  32 29 0d 04 ba 21 e7 41  25 3c 35 f2 46 49 4c 4c  |2)...!.A%<5.FILL|
00002010  28 34 38 30 2c 35 37 36  2c 31 33 30 2c 4e 25 2c  |(480,576,130,N%,|
00002020  30 29 20 0d 04 c4 37 ec  36 34 30 2c 35 37 36 3a  |0) ...7.640,576:|
00002030  e7 41 25 3d 35 f1 22 77  68 69 74 65 22 8b e7 41  |.A%=5."white"..A|
00002040  25 3d 36 f1 22 63 72 65  61 6d 22 8b e7 41 25 3d  |%=6."cream"..A%=|
00002050  37 f1 22 79 65 6c 6c 6f  77 22 0d 04 ce 1d e7 41  |7."yellow".....A|
00002060  25 3e 34 ec 36 34 30 2c  35 34 34 3a f1 22 70 70  |%>4.640,544:."pp|
00002070  74 65 2e 22 3a e1 20 0d  04 d8 23 f1 22 63 6c 65  |te.":. ...#."cle|
00002080  61 72 22 3a ec 36 34 30  2c 35 34 34 3a f1 22 73  |ar":.640,544:."s|
00002090  6f 6c 75 74 69 6f 6e 22  3a e1 0d 04 e2 67 dd f2  |olution":....g..|
000020a0  42 41 3a ef 31 38 2c 30  2c 33 2c 31 38 2c 30 2c  |BA:.18,0,3,18,0,|
000020b0  31 32 38 2c 31 36 2c 35  2c 31 39 2c 31 2c 45 25  |128,16,5,19,1,E%|
000020c0  3b 30 3b 3a f2 54 54 28  34 38 30 2c 35 37 36 29  |;0;:.TT(480,576)|
000020d0  3a f2 46 49 4c 4c 28 34  38 30 2c 35 37 36 2c 32  |:.FILL(480,576,2|
000020e0  39 30 2c 31 2c 31 29 3a  e7 42 25 3d 30 ef 31 39  |90,1,1):.B%=0.19|
000020f0  2c 32 2c 34 3b 30 3b 3a  4e 25 3d 32 8b 4e 25 3d  |,2,4;0;:N%=2.N%=|
00002100  31 0d 04 ec 72 ec 30 2c  36 30 38 3a f1 22 41 64  |1...r.0,608:."Ad|
00002110  64 22 3a ec 30 2c 35 37  36 3a f1 22 64 69 6c 75  |d":.0,576:."dilu|
00002120  74 65 22 3a ec 30 2c 35  34 34 3a f1 22 48 43 6c  |te":.0,544:."HCl|
00002130  2d 22 3a f2 50 28 31 30  30 29 3a f2 46 49 4c 4c  |-":.P(100):.FILL|
00002140  28 34 38 30 2c 35 37 36  2c 32 31 30 2c 4e 25 2c  |(480,576,210,N%,|
00002150  30 29 3a e7 41 25 3d 32  8c 54 25 3d 91 2b 32 30  |0):.A%=2.T%=.+20|
00002160  30 3a f5 f2 42 3a fd 91  3e 54 25 8b f2 50 28 31  |0:..B:..>T%..P(1|
00002170  30 30 29 0d 04 f6 7f ec  36 34 30 2c 36 30 38 3a  |00).....640,608:|
00002180  f1 22 74 68 65 6e 22 3a  ec 36 34 30 2c 35 37 36  |."then":.640,576|
00002190  3a f1 22 62 61 72 69 75  6d 22 3a ec 36 34 30 2c  |:."barium":.640,|
000021a0  35 34 34 3a f1 22 63 68  6c 6f 72 69 64 65 22 3a  |544:."chloride":|
000021b0  e7 41 25 3d 34 8c f2 46  49 4c 4c 28 34 38 30 2c  |.A%=4..FILL(480,|
000021c0  35 37 36 2c 31 33 30 2c  33 2c 33 29 3a ec 36 34  |576,130,3,3):.64|
000021d0  30 2c 34 38 30 3a f1 22  77 68 69 74 65 22 3a ec  |0,480:."white":.|
000021e0  36 34 30 2c 34 34 38 3a  f1 22 70 70 74 65 2e 22  |640,448:."ppte."|
000021f0  3a e1 0d 05 00 44 f2 46  49 4c 4c 28 34 38 30 2c  |:....D.FILL(480,|
00002200  35 37 36 2c 31 33 30 2c  4e 25 2c 30 29 3a ec 36  |576,130,N%,0):.6|
00002210  34 30 2c 34 38 30 3a f1  22 63 6c 65 61 72 22 3a  |40,480:."clear":|
00002220  ec 36 34 30 2c 34 34 38  3a f1 22 73 6f 6c 75 74  |.640,448:."solut|
00002230  69 6f 6e 22 3a e1 0d 05  0a 79 dd f2 43 4c 3a ef  |ion":....y..CL:.|
00002240  31 38 2c 30 2c 30 2c 31  38 2c 30 2c 31 33 31 2c  |18,0,0,18,0,131,|
00002250  31 36 2c 35 2c 31 39 2c  31 2c 45 25 3b 30 3b 3a  |16,5,19,1,E%;0;:|
00002260  f2 54 54 28 34 38 30 2c  35 37 36 29 3a f2 46 49  |.TT(480,576):.FI|
00002270  4c 4c 28 34 38 30 2c 35  37 36 2c 32 39 30 2c 30  |LL(480,576,290,0|
00002280  2c 31 29 3a f2 50 28 31  30 30 29 3a e7 42 25 3d  |,1):.P(100):.B%=|
00002290  30 ef 31 39 2c 32 2c 34  3b 30 3b 3a 4e 25 3d 32  |0.19,2,4;0;:N%=2|
000022a0  8b e7 45 25 3d 37 4e 25  3d 30 8b 4e 25 3d 31 0d  |..E%=7N%=0.N%=1.|
000022b0  05 14 42 ef 31 38 2c 30  2c 30 3a ec 30 2c 36 34  |..B.18,0,0:.0,64|
000022c0  30 3a f1 22 44 69 73 73  6f 6c 76 65 22 3a ec 30  |0:."Dissolve":.0|
000022d0  2c 36 30 38 3a f1 22 69  6e 20 22 3b 3a e7 42 25  |,608:."in ";:.B%|
000022e0  3c 35 f1 22 48 43 6c 22  8b f1 22 77 61 74 65 72  |<5."HCl".."water|
000022f0  22 0d 05 1e 41 f2 46 49  4c 4c 28 34 38 30 2c 35  |"...A.FILL(480,5|
00002300  37 36 2c 32 31 30 2c 4e  25 2c 33 29 3a e7 42 25  |76,210,N%,3):.B%|
00002310  3c 35 80 41 25 3d 32 8c  54 25 3d 91 2b 32 30 30  |<5.A%=2.T%=.+200|
00002320  3a f5 f2 42 3a fd 91 3e  54 25 8b f2 50 28 31 30  |:..B:..>T%..P(10|
00002330  30 29 0d 05 28 a5 ef 31  38 2c 30 2c 30 3a ec 35  |0)..(..18,0,0:.5|
00002340  37 36 2c 36 34 30 3a f1  22 2d 74 68 65 6e 20 61  |76,640:."-then a|
00002350  64 64 22 3a ec 36 34 30  2c 36 30 38 3a f1 22 63  |dd":.640,608:."c|
00002360  68 6c 6f 72 69 6e 65 22  3a ec 36 34 30 2c 35 37  |hlorine":.640,57|
00002370  36 3a f1 22 77 61 74 65  72 22 3a f2 46 49 4c 4c  |6:."water":.FILL|
00002380  28 34 38 30 2c 35 37 36  2c 31 35 30 2c 4e 25 2c  |(480,576,150,N%,|
00002390  33 29 3a ef 31 38 2c 30  2c 30 3a f2 50 28 31 30  |3):.18,0,0:.P(10|
000023a0  30 29 3a e7 42 25 3c 32  30 80 43 25 3c 3e 37 ec  |0):.B%<20.C%<>7.|
000023b0  35 37 36 2c 35 31 32 3a  f1 20 22 2d 6e 6f 22 3a  |576,512:. "-no":|
000023c0  ec 36 34 30 2c 34 38 30  3a f1 20 22 72 65 61 63  |.640,480:. "reac|
000023d0  74 69 6f 6e 22 3a e1 0d  05 32 40 ef 31 38 2c 30  |tion":...2@.18,0|
000023e0  2c 30 3a e7 41 25 3d 37  ef 31 39 2c 32 2c 30 3b  |,0:.A%=7.19,2,0;|
000023f0  30 3b 3a ec 36 34 30 2c  35 31 32 3a f1 22 64 61  |0;:.640,512:."da|
00002400  72 6b 22 3a ec 36 34 30  2c 34 38 30 3a f1 20 22  |rk":.640,480:. "|
00002410  63 6f 6c 6f 75 72 22 0d  05 3c 3f e7 41 25 3d 36  |colour"..<?.A%=6|
00002420  84 43 25 3d 37 ef 31 39  2c 32 2c 33 3b 30 3b 3a  |.C%=7.19,2,3;0;:|
00002430  ec 36 34 30 2c 35 31 32  3a f1 22 79 65 6c 6c 6f  |.640,512:."yello|
00002440  77 22 3a ec 36 34 30 2c  34 38 30 3a f1 20 22 63  |w":.640,480:. "c|
00002450  6f 6c 6f 75 72 22 0d 05  46 44 ec 30 2c 31 35 38  |olour"..FD.0,158|
00002460  3a f1 22 36 29 54 65 73  74 20 73 6f 6c 75 74 69  |:."6)Test soluti|
00002470  6f 6e 22 3a f2 46 49 4c  4c 28 34 38 30 2c 35 37  |on":.FILL(480,57|
00002480  36 2c 31 35 30 2c 32 2c  32 29 3a ef 31 38 2c 30  |6,150,2,2):.18,0|
00002490  2c 30 3a 2a 46 58 31 35  2c 31 0d 05 50 1d 49 25  |,0:*FX15,1..P.I%|
000024a0  3d a5 3a e7 49 25 3d 35  34 f2 54 45 53 54 3a 53  |=.:.I%=54.TEST:S|
000024b0  25 3d 53 25 2d 31 30 0d  05 5a 05 e1 0d 05 64 84  |%=S%-10..Z....d.|
000024c0  dd f2 54 45 53 54 3a e7  43 25 3d 37 ec 30 2c 32  |..TEST:.C%=7.0,2|
000024d0  38 38 3a f1 22 41 64 64  22 3a ec 30 2c 32 35 36  |88:."Add":.0,256|
000024e0  3a f1 22 73 6f 64 69 75  6d 22 3a ec 30 2c 32 32  |:."sodium":.0,22|
000024f0  34 3a f1 22 68 79 64 72  6f 78 69 64 65 22 3a f2  |4:."hydroxide":.|
00002500  50 28 31 30 30 29 3a ec  36 34 30 2c 32 38 38 3a  |P(100):.640,288:|
00002510  f1 22 79 65 6c 6c 6f 77  22 3a ec 36 34 30 2c 32  |."yellow":.640,2|
00002520  35 36 3a f1 22 6f 72 61  6e 67 65 22 3a ec 36 34  |56:."orange":.64|
00002530  30 2c 32 32 34 3a f1 22  70 70 74 65 2e 22 3a e1  |0,224:."ppte.":.|
00002540  0d 05 6e 57 ec 30 2c 33  35 32 3a f1 22 53 68 61  |..nW.0,352:."Sha|
00002550  6b 65 22 3a ec 30 2c 33  32 30 3a f1 22 77 69 74  |ke":.0,320:."wit|
00002560  68 22 3a ec 30 2c 32 38  38 3a f1 22 74 65 74 72  |h":.0,288:."tetr|
00002570  61 2d 22 3a ec 30 2c 32  35 36 3a f1 22 63 68 6c  |a-":.0,256:."chl|
00002580  6f 72 6f 2d 22 3a ec 30  2c 32 32 34 3a f1 22 6d  |oro-":.0,224:."m|
00002590  65 74 68 61 6e 65 22 0d  05 78 86 e7 41 25 3d 37  |ethane"..x..A%=7|
000025a0  3a f2 46 49 4c 4c 28 34  38 30 2c 35 37 36 2c 31  |:.FILL(480,576,1|
000025b0  35 30 2c 30 2c 33 29 3a  ef 31 39 2c 32 2c 35 3b  |50,0,3):.19,2,5;|
000025c0  30 3b 3a f2 46 49 4c 4c  28 34 38 30 2c 35 37 36  |0;:.FILL(480,576|
000025d0  2c 33 30 30 2c 32 2c 32  29 3a ef 31 38 2c 30 2c  |,300,2,2):.18,0,|
000025e0  30 3a ec 36 34 30 2c 32  38 38 3a f1 22 70 75 72  |0:.640,288:."pur|
000025f0  70 6c 65 22 3a ec 36 34  30 2c 32 35 36 3a f1 22  |ple":.640,256:."|
00002600  6f 72 67 61 6e 69 63 22  3a ec 36 34 30 2c 32 32  |organic":.640,22|
00002610  34 3a f1 22 6c 61 79 65  72 22 3a e1 20 0d 05 82  |4:."layer":. ...|
00002620  7c f2 46 49 4c 4c 28 34  38 30 2c 35 37 36 2c 31  ||.FILL(480,576,1|
00002630  35 30 2c 30 2c 33 29 3a  ef 31 39 2c 31 2c 31 3b  |50,0,3):.19,1,1;|
00002640  30 3b 3a f2 46 49 4c 4c  28 34 38 30 2c 35 37 36  |0;:.FILL(480,576|
00002650  2c 33 30 30 2c 31 2c 31  29 3a ef 31 38 2c 30 2c  |,300,1,1):.18,0,|
00002660  30 3a ec 36 34 30 2c 32  38 38 3a f1 22 72 65 64  |0:.640,288:."red|
00002670  22 3a ec 36 34 30 2c 32  35 36 3a f1 22 6f 72 67  |":.640,256:."org|
00002680  61 6e 69 63 22 3a ec 36  34 30 2c 32 32 34 3a f1  |anic":.640,224:.|
00002690  22 6c 61 79 65 72 22 3a  e1 0d 05 8c 4d dd f2 5a  |"layer":....M..Z|
000026a0  4e 3a ef 31 38 2c 30 2c  33 2c 31 38 2c 30 2c 31  |N:.18,0,3,18,0,1|
000026b0  32 38 2c 31 36 2c 35 2c  31 39 2c 32 2c 45 25 3b  |28,16,5,19,2,E%;|
000026c0  30 3b 3a f2 54 54 28 34  38 30 2c 35 37 36 29 3a  |0;:.TT(480,576):|
000026d0  f2 46 49 4c 4c 28 34 38  30 2c 35 37 36 2c 32 39  |.FILL(480,576,29|
000026e0  30 2c 32 2c 32 29 0d 05  96 70 ec 31 32 38 2c 35  |0,2,2)...p.128,5|
000026f0  37 36 3a f1 22 42 6f 69  6c 22 3a ec 31 32 38 2c  |76:."Boil":.128,|
00002700  35 34 34 3a f1 22 77 69  74 68 22 3a ec 31 32 38  |544:."with":.128|
00002710  2c 35 31 32 3a f1 22 7a  69 6e 63 22 3a ec 35 37  |,512:."zinc":.57|
00002720  36 2c 35 37 36 3a f1 22  61 6e 64 22 3a ec 35 37  |6,576:."and":.57|
00002730  36 2c 35 34 34 3a f1 22  73 6f 64 69 75 6d 22 3a  |6,544:."sodium":|
00002740  ec 35 37 36 2c 35 31 32  3a f1 22 68 79 64 72 6f  |.576,512:."hydro|
00002750  78 69 64 65 22 20 0d 05  a0 32 f2 50 28 31 30 30  |xide" ...2.P(100|
00002760  29 3a f2 46 49 4c 4c 28  34 38 30 2c 35 37 36 2c  |):.FILL(480,576,|
00002770  32 31 30 2c 32 2c 30 29  3a e7 42 25 3d 30 ef 31  |210,2,0):.B%=0.1|
00002780  39 2c 32 2c 34 3b 30 3b  0d 05 aa 73 ef 31 38 2c  |9,2,4;0;...s.18,|
00002790  30 2c 33 3a e7 20 43 25  3d 39 20 84 20 41 25 3d  |0,3:. C%=9 . A%=|
000027a0  33 20 8c 20 54 25 3d 91  2b 32 30 30 3a f5 3a f2  |3 . T%=.+200:.:.|
000027b0  42 3a fd 91 3e 54 25 3a  ec 30 2c 31 36 30 3a f1  |B:..>T%:.0,160:.|
000027c0  22 36 29 54 65 73 74 20  67 61 73 20 65 76 6f 6c  |"6)Test gas evol|
000027d0  76 65 64 22 3a 8b f2 50  28 31 30 30 29 3a ec 31  |ved":..P(100):.1|
000027e0  33 32 2c 31 36 30 3a f1  22 4e 6f 74 68 69 6e 67  |32,160:."Nothing|
000027f0  20 68 61 70 70 65 6e 73  22 3a e1 0d 05 b4 0d 2a  | happens":.....*|
00002800  46 58 31 35 2c 31 20 20  0d 05 be 6e 49 25 3d a5  |FX15,1  ...nI%=.|
00002810  3a e7 49 25 3d 35 34 51  25 3d 30 3a f2 42 4c 55  |:.I%=54Q%=0:.BLU|
00002820  45 28 34 38 30 2c 35 37  36 29 3a ec 35 37 36 2c  |E(480,576):.576,|
00002830  34 34 38 3a f1 22 55 6e  69 76 65 72 73 61 6c 22  |448:."Universal"|
00002840  3a ec 35 37 36 2c 34 31  36 3a f1 22 74 75 72 6e  |:.576,416:."turn|
00002850  73 22 3a f2 50 28 31 30  30 29 3a ef 31 39 2c 31  |s":.P(100):.19,1|
00002860  2c 34 3b 30 3b 3a ec 35  37 36 2c 33 38 34 3a f1  |,4;0;:.576,384:.|
00002870  22 62 6c 75 65 22 0d 05  c8 05 e1 0d 05 d2 31 dd  |"blue"........1.|
00002880  f2 57 3a ef 32 33 3b 38  32 30 32 3b 30 3b 30 3b  |.W:.23;8202;0;0;|
00002890  30 3b 31 39 2c 30 2c 34  3b 30 3b 3a 57 52 25 3d  |0;19,0,4;0;:WR%=|
000028a0  30 3a e7 53 25 3c 30 53  25 3d 30 20 0d 05 dc 6c  |0:.S%<0S%=0 ...l|
000028b0  f1 8a 37 2c 31 29 22 43  68 6f 6f 73 65 20 74 68  |..7,1)"Choose th|
000028c0  65 20 63 6f 72 72 65 63  74 22 8a 32 36 2c 31 29  |e correct".26,1)|
000028d0  22 43 41 54 49 4f 4e 22  8a 37 2c 33 29 22 42 79  |"CATION".7,3)"By|
000028e0  20 70 72 65 73 73 69 6e  67 20 74 68 65 20 73 70  | pressing the sp|
000028f0  61 63 65 20 62 61 72 22  8a 31 30 2c 32 37 29 22  |ace bar".10,27)"|
00002900  53 43 4f 52 45 20 53 4f  20 46 41 52 20 3d 20 22  |SCORE SO FAR = "|
00002910  3b 53 25 3b 22 20 22 3b  0d 05 e6 40 e6 30 2c 31  |;S%;" ";...@.0,1|
00002920  32 39 3a ef 32 34 2c 32  34 34 3b 32 36 30 3b 31  |29:.24,244;260;1|
00002930  30 30 30 3b 37 39 32 3b  31 36 3a e6 30 2c 31 32  |000;792;16:.0,12|
00002940  38 3a ef 32 34 2c 32 38  34 3b 33 30 30 3b 39 36  |8:.24,284;300;96|
00002950  30 3b 37 35 32 3b 31 36  0d 05 e7 27 ec 32 39 32  |0;752;16...'.292|
00002960  2c 35 34 38 3a df 39 35  32 2c 35 34 38 3a ec 39  |,548:.952,548:.9|
00002970  35 32 2c 35 30 34 3a df  32 39 32 2c 35 30 34 0d  |52,504:.292,504.|
00002980  05 fa 30 f1 8a 39 2c 31  35 29 22 3e 22 8a 32 39  |..0..9,15)">".29|
00002990  2c 31 35 29 22 3c 22 3a  e3 4a 25 3d 31 b8 39 3a  |,15)"<":.J%=1.9:|
000029a0  53 24 28 4a 25 29 3d 43  24 28 4a 25 29 3a ed 0d  |S$(J%)=C$(J%):..|
000029b0  06 04 36 f5 3a f2 53 50  49 4e 28 39 2c 31 30 29  |..6.:.SPIN(9,10)|
000029c0  3a e3 4a 25 3d 32 b8 38  3a f1 8a 31 30 2c 32 2a  |:.J%=2.8:..10,2*|
000029d0  4a 25 2b 35 29 53 24 28  4a 25 29 3a ed 3a 2a 46  |J%+5)S$(J%):.:*F|
000029e0  58 31 35 2c 31 0d 06 09  15 49 25 3d a6 28 31 30  |X15,1....I%=.(10|
000029f0  30 29 3a fd 20 49 25 3d  33 32 0d 06 0e 58 e7 53  |0):. I%=32...X.S|
00002a00  24 28 35 29 3d 43 24 28  43 25 29 f1 8a 32 36 2c  |$(5)=C$(C%)..26,|
00002a10  31 29 22 20 41 4e 49 4f  4e 22 8a 33 2c 35 29 22  |1)" ANION".3,5)"|
00002a20  20 20 43 4f 52 52 45 43  54 20 2d 20 6e 6f 77 20  |  CORRECT - now |
00002a30  77 68 61 74 27 73 20 74  68 65 20 61 6e 69 6f 6e  |what's the anion|
00002a40  3f 20 20 20 22 8b f2 57  52 4f 4e 47 3a e5 8d 54  |?   "..WRONG:..T|
00002a50  44 46 0d 06 22 0b e3 4a  25 3d 31 b8 37 0d 06 2c  |DF.."..J%=1.7..,|
00002a60  11 53 24 28 4a 25 29 3d  41 24 28 4a 25 29 0d 06  |.S$(J%)=A$(J%)..|
00002a70  36 05 ed 0d 06 40 36 f5  3a f2 53 50 49 4e 28 37  |6....@6.:.SPIN(7|
00002a80  2c 32 30 29 3a e3 4a 25  3d 31 b8 37 3a f1 8a 32  |,20):.J%=1.7:..2|
00002a90  30 2c 32 2a 4a 25 2b 37  29 53 24 28 4a 25 29 3a  |0,2*J%+7)S$(J%):|
00002aa0  ed 3a 2a 46 58 31 35 2c  31 0d 06 45 15 49 25 3d  |.:*FX15,1..E.I%=|
00002ab0  a6 28 31 30 30 29 3a fd  20 49 25 3d 33 32 0d 06  |.(100):. I%=32..|
00002ac0  4a 30 e7 53 24 28 34 29  3d 41 24 28 41 25 29 f1  |J0.S$(4)=A$(A%).|
00002ad0  8a 35 2c 31 29 22 43 4f  52 52 45 43 54 20 2d 20  |.5,1)"CORRECT - |
00002ae0  22 8b f2 57 52 4f 4e 47  3a e5 8d 44 40 46 0d 06  |"..WRONG:..D@F..|
00002af0  54 4a e7 57 52 25 3d 30  f1 8a 31 35 2c 31 29 22  |TJ.WR%=0..15,1)"|
00002b00  2d 20 47 4f 54 20 49 54  20 46 49 52 53 54 20 54  |- GOT IT FIRST T|
00002b10  52 59 22 8b f1 8a 31 35  2c 31 29 22 59 4f 55 20  |RY"...15,1)"YOU |
00002b20  54 4f 4f 4b 20 22 3b 57  52 25 2b 31 3b 22 20 41  |TOOK ";WR%+1;" A|
00002b30  54 54 45 4d 50 54 53 22  0d 06 59 1d f1 8a 37 2c  |TTEMPTS"..Y...7,|
00002b40  33 29 89 32 36 8a 39 2c  34 29 89 32 36 8a 33 2c  |3).26.9,4).26.3,|
00002b50  35 29 89 33 35 0d 06 5e  2e f1 8a 34 2c 32 39 29  |5).35..^...4,29)|
00002b60  22 43 48 45 4d 49 53 54  52 59 20 52 41 54 49 4e  |"CHEMISTRY RATIN|
00002b70  47 2e 2e 2e 2e 2e 2e 2e  22 3b 52 24 28 53 25 2f  |G.......";R$(S%/|
00002b80  31 30 29 0d 06 63 2f f2  50 28 31 30 30 29 3a f1  |10)..c/.P(100):.|
00002b90  8a 39 2c 34 29 22 53 50  41 43 45 20 42 41 52 20  |.9,4)"SPACE BAR |
00002ba0  54 4f 20 43 4f 4e 54 49  4e 55 45 22 3a 2a 46 58  |TO CONTINUE":*FX|
00002bb0  31 35 0d 06 68 13 f5 3a  49 25 3d a5 3a fd 49 25  |15..h..:I%=.:.I%|
00002bc0  3d 33 32 3a e1 0d 06 72  40 dd f2 53 50 49 4e 28  |=32:...r@..SPIN(|
00002bd0  4e 4f 25 2c 54 42 25 29  3a 53 24 28 30 29 3d 53  |NO%,TB%):S$(0)=S|
00002be0  24 28 4e 4f 25 29 3a e3  4a 25 3d 4e 4f 25 b8 31  |$(NO%):.J%=NO%.1|
00002bf0  88 2d 31 3a 53 24 28 4a  25 29 3d 53 24 28 4a 25  |.-1:S$(J%)=S$(J%|
00002c00  2d 31 29 3a ed 0d 06 73  05 e1 0d 06 86 0b dd f2  |-1):...s........|
00002c10  57 52 4f 4e 47 0d 06 90  2e f1 8a 33 2c 35 29 22  |WRONG......3,5)"|
00002c20  57 52 4f 4e 47 20 2d 20  4c 4f 53 45 20 31 30 20  |WRONG - LOSE 10 |
00002c30  50 4f 49 4e 54 53 20 2d  20 54 52 59 20 41 47 41  |POINTS - TRY AGA|
00002c40  49 4e 22 0d 06 9a 20 57  52 25 3d 57 52 25 2b 31  |IN"... WR%=WR%+1|
00002c50  3a 53 25 3d 53 25 2d 31  30 3a e7 53 25 3c 30 53  |:S%=S%-10:.S%<0S|
00002c60  25 3d 30 0d 06 a4 24 f2  50 28 31 30 30 29 3a f1  |%=0...$.P(100):.|
00002c70  8a 33 2c 35 29 89 33 35  8a 32 35 2c 32 37 29 3b  |.3,5).35.25,27);|
00002c80  53 25 3b 22 20 22 3b 0d  06 ae 05 e1 0d 06 b8 90  |S%;" ";.........|
00002c90  dd f2 49 3a 44 32 24 3d  bd 32 35 35 2b bd 38 2b  |..I:D2$=.255+.8+|
00002ca0  bd 31 30 2b bd 32 35 33  2b bd 31 31 3a 44 33 24  |.10+.253+.11:D3$|
00002cb0  3d bd 32 35 35 2b bd 38  2b bd 31 30 2b bd 32 35  |=.255+.8+.10+.25|
00002cc0  32 2b bd 31 31 3a 44 34  24 3d bd 32 35 34 2b bd  |2+.11:D4$=.254+.|
00002cd0  38 2b bd 31 30 2b bd 32  35 31 2b bd 31 31 3a 55  |8+.10+.251+.11:U|
00002ce0  24 3d bd 32 34 32 2b bd  38 2b bd 31 31 2b bd 32  |$=.242+.8+.11+.2|
00002cf0  34 34 2b bd 31 30 3a 55  32 24 3d bd 32 35 33 2b  |44+.10:U2$=.253+|
00002d00  bd 32 34 32 2b bd 31 31  2b bd 38 2b bd 38 2b bd  |.242+.11+.8+.8+.|
00002d10  32 35 35 2b bd 32 34 34  2b bd 31 30 0d 06 c2 77  |255+.244+.10...w|
00002d20  55 32 24 3d bd 32 35 33  2b bd 32 34 32 2b bd 31  |U2$=.253+.242+.1|
00002d30  31 2b bd 38 2b bd 38 2b  bd 32 35 35 2b bd 32 34  |1+.8+.8+.255+.24|
00002d40  34 2b bd 31 30 3a 55 33  24 3d bd 32 35 32 2b bd  |4+.10:U3$=.252+.|
00002d50  32 34 32 2b bd 31 31 2b  bd 38 2b bd 38 2b bd 32  |242+.11+.8+.8+.2|
00002d60  35 35 2b bd 32 34 34 2b  bd 31 30 3a 55 4e 24 3d  |55+.244+.10:UN$=|
00002d70  bd 32 34 33 3a 55 4e 32  24 3d bd 31 31 2b bd 32  |.243:UN2$=.11+.2|
00002d80  35 35 2b bd 31 30 2b bd  38 2b bd 32 35 33 2b bd  |55+.10+.8+.253+.|
00002d90  32 34 33 0d 06 cc ac de  52 25 28 32 35 29 3a f2  |243.....R%(25):.|
00002da0  52 3a de 20 4e 24 28 32  33 29 3a de 20 43 24 28  |R:. N$(23):. C$(|
00002db0  39 29 3a de 20 52 24 28  31 30 29 3a de 20 41 24  |9):. R$(10):. A$|
00002dc0  28 37 29 3a de 20 53 24  28 39 29 3a de 20 44 24  |(7):. S$(9):. D$|
00002dd0  28 38 29 3a de 20 4d 24  28 39 29 3a e3 4a 25 3d  |(8):. M$(9):.J%=|
00002de0  30 b8 31 30 3a f3 52 24  28 4a 25 29 3a ed 3a e3  |0.10:.R$(J%):.:.|
00002df0  4a 25 3d 30 b8 32 33 3a  f3 4e 24 28 4a 25 29 3a  |J%=0.23:.N$(J%):|
00002e00  ed 3a e3 4a 25 3d 30 b8  38 3a f3 44 24 28 4a 25  |.:.J%=0.8:.D$(J%|
00002e10  29 3a ed 3a e3 4a 25 3d  31 b8 39 3a f3 43 24 28  |):.:.J%=1.9:.C$(|
00002e20  4a 25 29 3a f3 4d 24 28  4a 25 29 3a ed 3a e3 4a  |J%):.M$(J%):.:.J|
00002e30  25 3d 31 b8 37 3a f3 41  24 28 4a 25 29 3a ed 0d  |%=1.7:.A$(J%):..|
00002e40  06 d6 8b dc 20 53 45 45  4b 20 41 44 56 49 43 45  |.... SEEK ADVICE|
00002e50  2c 54 48 49 4e 4b 20 21  20 20 20 20 2c 54 52 59  |,THINK !    ,TRY|
00002e60  20 48 41 52 44 45 52 20  2c 52 45 56 49 53 45 20  | HARDER ,REVISE |
00002e70  20 20 20 20 2c 4e 4f 54  20 42 41 44 20 20 20 20  |    ,NOT BAD    |
00002e80  2c 47 4f 4f 44 20 20 20  20 20 20 20 2c 56 45 52  |,GOOD       ,VER|
00002e90  59 20 47 4f 4f 44 20 20  2c 42 4f 46 46 49 4e 20  |Y GOOD  ,BOFFIN |
00002ea0  20 20 20 20 2c 47 45 4e  49 55 53 20 20 20 20 20  |    ,GENIUS     |
00002eb0  2c 45 49 4e 53 54 45 49  4e 20 20 20 2c 22 43 48  |,EINSTEIN   ,"CH|
00002ec0  45 41 54 20 20 20 20 20  20 22 0d 06 e0 e6 dc 32  |EAT      ".....2|
00002ed0  30 63 6f 70 70 65 72 20  6f 78 69 64 65 2c 32 32  |0copper oxide,22|
00002ee0  63 6f 70 70 65 72 20 63  61 72 62 6f 6e 61 74 65  |copper carbonate|
00002ef0  2c 31 37 63 61 6c 63 69  75 6d 20 63 61 72 62 6f  |,17calcium carbo|
00002f00  6e 61 74 65 2c 36 37 7a  69 6e 63 20 63 61 72 62  |nate,67zinc carb|
00002f10  6f 6e 61 74 65 2c 34 37  6c 65 61 64 20 63 61 72  |onate,47lead car|
00002f20  62 6f 6e 61 74 65 2c 33  37 73 6f 64 69 75 6d 20  |bonate,37sodium |
00002f30  63 61 72 62 6f 6e 61 74  65 2c 33 37 73 6f 64 69  |carbonate,37sodi|
00002f40  75 6d 20 6e 69 74 72 61  74 65 2c 31 37 63 61 6c  |um nitrate,17cal|
00002f50  63 69 75 6d 20 6e 69 74  72 61 74 65 2c 36 37 7a  |cium nitrate,67z|
00002f60  69 6e 63 20 6e 69 74 72  61 74 65 2c 34 37 6c 65  |inc nitrate,47le|
00002f70  61 64 20 6e 69 74 72 61  74 65 2c 32 34 63 6f 70  |ad nitrate,24cop|
00002f80  70 65 72 20 6e 69 74 72  61 74 65 2c 32 34 63 6f  |per nitrate,24co|
00002f90  70 70 65 72 20 73 75 6c  70 68 61 74 65 2c 37 32  |pper sulphate,72|
00002fa0  69 72 6f 6e 28 49 49 29  73 75 6c 70 68 61 74 65  |iron(II)sulphate|
00002fb0  0d 06 ea d2 dc 35 37 61  6c 75 6d 69 6e 69 75 6d  |.....57aluminium|
00002fc0  20 73 75 6c 70 68 61 74  65 2c 31 37 63 61 6c 63  | sulphate,17calc|
00002fd0  69 75 6d 20 63 68 6c 6f  72 69 64 65 2c 36 37 7a  |ium chloride,67z|
00002fe0  69 6e 63 20 63 68 6c 6f  72 69 64 65 2c 33 37 73  |inc chloride,37s|
00002ff0  6f 64 69 75 6d 20 63 68  6c 6f 72 69 64 65 2c 38  |odium chloride,8|
00003000  33 69 72 6f 6e 28 49 49  49 29 63 68 6c 6f 72 69  |3iron(III)chlori|
00003010  64 65 2c 37 32 69 72 6f  6e 28 49 49 29 63 68 6c  |de,72iron(II)chl|
00003020  6f 72 69 64 65 2c 39 37  61 6d 6d 6f 6e 69 75 6d  |oride,97ammonium|
00003030  20 63 68 6c 6f 72 69 64  65 2c 38 33 69 72 6f 6e  | chloride,83iron|
00003040  28 49 49 49 29 62 72 6f  6d 69 64 65 2c 39 37 61  |(III)bromide,97a|
00003050  6d 6d 6f 6e 69 75 6d 20  62 72 6f 6d 69 64 65 2c  |mmonium bromide,|
00003060  33 37 73 6f 64 69 75 6d  20 69 6f 64 69 64 65 2c  |37sodium iodide,|
00003070  35 37 61 6c 75 6d 69 6e  69 75 6d 20 69 6f 64 69  |57aluminium iodi|
00003080  64 65 0d 06 f4 4e dc 61  20 62 6c 61 63 6b 2c 61  |de...N.a black,a|
00003090  20 72 65 64 2c 61 20 67  72 65 65 6e 2c 61 20 79  | red,a green,a y|
000030a0  65 6c 6c 6f 77 2c 61 20  62 6c 75 65 2c 61 20 62  |ellow,a blue,a b|
000030b0  6c 75 65 2d 67 72 65 65  6e 2c 61 20 67 72 65 79  |lue-green,a grey|
000030c0  2d 62 6c 75 65 2c 61 20  77 68 69 74 65 2c 6e 6f  |-blue,a white,no|
000030d0  0d 06 fe cb dc 20 63 61  6c 63 69 75 6d 20 20 20  |..... calcium   |
000030e0  2c 43 61 2c 63 6f 70 70  65 72 20 20 20 20 2c 43  |,Ca,copper    ,C|
000030f0  75 2c 73 6f 64 69 75 6d  20 20 20 20 2c 4e 61 2c  |u,sodium    ,Na,|
00003100  6c 65 61 64 20 20 20 20  20 20 2c 50 62 2c 61 6c  |lead      ,Pb,al|
00003110  75 6d 69 6e 69 75 6d 20  2c 41 6c 2c 7a 69 6e 63  |uminium ,Al,zinc|
00003120  20 20 20 20 20 20 2c 5a  6e 2c 69 72 6f 6e 28 49  |      ,Zn,iron(I|
00003130  49 29 20 20 2c 46 65 2c  69 72 6f 6e 28 49 49 49  |I)  ,Fe,iron(III|
00003140  29 20 2c 46 65 2c 61 6d  6d 6f 6e 69 75 6d 20 20  |) ,Fe,ammonium  |
00003150  2c 4e 48 2c 6f 78 69 64  65 20 20 20 20 2c 63 61  |,NH,oxide    ,ca|
00003160  72 62 6f 6e 61 74 65 2c  6e 69 74 72 61 74 65 20  |rbonate,nitrate |
00003170  20 2c 73 75 6c 70 68 61  74 65 20 2c 63 68 6c 6f  | ,sulphate ,chlo|
00003180  72 69 64 65 20 2c 62 72  6f 6d 69 64 65 20 20 2c  |ride ,bromide  ,|
00003190  69 6f 64 69 64 65 20 20  20 2c 20 0d 07 08 05 e1  |iodide   , .....|
000031a0  0d 07 12 07 dd f2 45 0d  07 1c 14 ef 32 33 2c 31  |......E.....23,1|
000031b0  2c 30 3b 30 3b 30 3b 30  3b 31 32 0d 07 26 37 f1  |,0;0;0;0;12..&7.|
000031c0  27 22 54 68 65 20 63 6f  6d 70 6f 75 6e 64 20 69  |'"The compound i|
000031d0  73 20 2d 20 2d 20 2d 20  22 3b c1 4e 24 28 42 25  |s - - - ";.N$(B%|
000031e0  29 2c 33 2c a9 28 4e 24  28 42 25 29 29 2d 32 29  |),3,.(N$(B%))-2)|
000031f0  27 20 0d 07 30 57 e7 42  25 3c 35 8c f1 22 49 74  |' ..0W.B%<5.."It|
00003200  20 69 73 20 69 6e 73 6f  6c 75 62 6c 65 20 69 6e  | is insoluble in|
00003210  20 77 61 74 65 72 20 62  75 74 20 72 65 61 63 74  | water but react|
00003220  73 20 77 69 74 68 61 63  69 64 3a 22 8b 20 f1 22  |s withacid:". ."|
00003230  49 74 20 64 69 73 73 6f  6c 76 65 73 20 69 6e 20  |It dissolves in |
00003240  77 61 74 65 72 22 20 20  20 0d 07 3a 26 e7 20 41  |water"   ..:&. A|
00003250  25 3d 33 f1 8a 32 32 2c  33 29 22 6c 69 6b 65 20  |%=3..22,3)"like |
00003260  61 6c 6c 20 6e 69 74 72  61 74 65 73 22 20 20 0d  |all nitrates"  .|
00003270  07 44 30 e7 42 25 3d 30  8c f1 8a 38 29 22 43 75  |.D0.B%=0...8)"Cu|
00003280  4f 20 2b 20 32 48 43 6c  20 3d 20 43 75 43 6c 22  |O + 2HCl = CuCl"|
00003290  44 32 24 22 20 2b 20 48  22 44 32 24 22 4f 22 0d  |D2$" + H"D2$"O".|
000032a0  07 4e 4e e7 42 25 3e 30  80 42 25 3c 35 f1 8a 36  |.NN.B%>0.B%<5..6|
000032b0  29 4d 24 28 43 25 29 3b  22 43 4f 22 44 33 24 22  |)M$(C%);"CO"D3$"|
000032c0  20 2b 20 32 48 43 6c 20  3d 20 22 3b 4d 24 28 43  | + 2HCl = ";M$(C|
000032d0  25 29 3b 22 43 6c 22 44  32 24 22 20 2b 48 22 44  |%);"Cl"D2$" +H"D|
000032e0  32 24 22 4f 20 2b 20 43  4f 22 44 32 24 0d 07 58  |2$"O + CO"D2$..X|
000032f0  31 e7 42 25 3d 34 f1 27  22 4c 65 61 64 20 63 68  |1.B%=4.'"Lead ch|
00003300  6c 6f 72 69 64 65 20 64  69 73 73 6f 6c 76 65 73  |loride dissolves|
00003310  20 69 6e 20 68 6f 74 20  77 61 74 65 72 22 0d 07  | in hot water"..|
00003320  62 05 f1 0d 07 6c 34 f1  22 49 6e 20 74 68 65 20  |b....l4."In the |
00003330  66 6c 61 6d 65 20 74 65  73 74 20 63 6f 6d 70 6f  |flame test compo|
00003340  75 6e 64 73 20 6f 66 20  22 3b c1 43 24 28 43 25  |unds of ";.C$(C%|
00003350  29 2c 31 2c 39 29 3b 0d  07 76 21 f1 22 70 72 6f  |),1,9);..v!."pro|
00003360  64 75 63 65 20 22 3b 44  24 28 44 25 29 3b 22 20  |duce ";D$(D%);" |
00003370  63 6f 6c 6f 75 72 22 27  0d 07 80 31 e7 41 25 3d  |colour"'...1.A%=|
00003380  32 f1 22 4d 6f 73 74 20  63 61 72 62 6f 6e 61 74  |2."Most carbonat|
00003390  65 73 20 64 65 63 6f 6d  70 6f 73 65 20 6f 6e 20  |es decompose on |
000033a0  68 65 61 74 69 6e 67 22  20 0d 07 8a 31 e7 42 25  |heating" ...1.B%|
000033b0  3d 35 f1 22 62 75 74 20  73 6f 64 69 75 6d 20 63  |=5."but sodium c|
000033c0  61 72 62 6f 6e 61 74 65  20 69 73 20 73 74 61 62  |arbonate is stab|
000033d0  6c 65 22 27 3a e5 8d 74  5e 47 0d 07 94 40 e7 41  |le"':..t^G...@.A|
000033e0  25 3d 32 f1 22 73 74 72  6f 6e 67 6c 79 3a 22 27  |%=2."strongly:"'|
000033f0  8a 31 31 29 4d 24 28 43  25 29 3b 22 43 30 22 44  |.11)M$(C%);"C0"D|
00003400  33 24 22 20 3d 20 22 3b  4d 24 28 43 25 29 22 4f  |3$" = ";M$(C%)"O|
00003410  20 2b 20 43 4f 22 44 32  24 27 0d 07 9e 73 e7 42  | + CO"D2$'...s.B|
00003420  25 3d 36 f1 22 48 65 61  74 69 6e 67 20 73 6f 64  |%=6."Heating sod|
00003430  69 75 6d 20 6e 69 74 72  61 74 65 20 67 69 76 65  |ium nitrate give|
00003440  73 20 73 6f 64 69 75 6d  20 20 20 20 20 6e 69 74  |s sodium     nit|
00003450  72 69 74 65 20 61 6e 64  20 6f 78 79 67 65 6e 3a  |rite and oxygen:|
00003460  22 27 8a 32 30 29 22 32  4e 61 4e 4f 22 44 33 24  |"'.20)"2NaNO"D3$|
00003470  22 20 3d 20 32 4e 61 4e  4f 22 44 32 24 22 20 2b  |" = 2NaNO"D2$" +|
00003480  20 4f 22 44 32 24 27 3a  e5 8d 74 72 47 0d 07 a8  | O"D2$':..trG...|
00003490  80 e7 41 25 3d 33 f1 22  49 74 20 64 65 63 6f 6d  |..A%=3."It decom|
000034a0  70 6f 73 65 73 20 74 6f  20 62 72 6f 77 6e 20 6e  |poses to brown n|
000034b0  69 74 72 6f 67 65 6e 20  64 69 6f 78 69 64 65 20  |itrogen dioxide |
000034c0  61 6e 64 20 6f 78 79 67  65 6e 3a 22 27 8a 31 31  |and oxygen:"'.11|
000034d0  29 22 32 22 3b 4d 24 28  43 25 29 3b 22 28 4e 4f  |)"2";M$(C%);"(NO|
000034e0  22 44 33 24 22 29 22 44  32 24 22 20 3d 20 32 22  |"D3$")"D2$" = 2"|
000034f0  3b 4d 24 28 43 25 29 3b  22 4f 20 2b 20 34 4e 4f  |;M$(C%);"O + 4NO|
00003500  22 44 32 24 22 20 2b 4f  22 44 32 24 27 0d 07 b2  |"D2$" +O"D2$'...|
00003510  8e e7 42 25 3d 31 31 f1  22 43 6f 70 70 65 72 20  |..B%=11."Copper |
00003520  73 75 6c 70 68 61 74 65  20 66 69 72 73 74 20 74  |sulphate first t|
00003530  75 72 6e 73 20 77 68 69  74 65 20 6f 6e 20 20 20  |urns white on   |
00003540  20 67 65 6e 74 6c 65 20  68 65 61 74 69 6e 67 2e  | gentle heating.|
00003550  20 54 68 65 20 41 4e 48  59 44 52 4f 55 53 20 73  | The ANHYDROUS s|
00003560  75 6c 70 68 61 74 65 20  20 64 65 63 6f 6d 70 6f  |ulphate  decompo|
00003570  73 65 73 20 65 61 73 69  6c 79 3a 22 27 27 8a 39  |ses easily:"''.9|
00003580  29 22 43 75 53 4f 22 44  34 24 22 20 3d 20 43 75  |)"CuSO"D4$" = Cu|
00003590  4f 20 2b 20 53 4f 22 44  33 24 27 0d 07 bc 98 e7  |O + SO"D3$'.....|
000035a0  42 25 3d 31 32 f1 22 49  72 6f 6e 28 49 49 29 73  |B%=12."Iron(II)s|
000035b0  75 6c 70 68 61 74 65 20  67 69 76 65 73 20 61 20  |ulphate gives a |
000035c0  52 45 44 4f 58 20 63 68  61 6e 67 65 20 6f 6e 68  |REDOX change onh|
000035d0  65 61 74 69 6e 67 2c 20  6c 65 61 76 69 6e 67 20  |eating, leaving |
000035e0  69 72 6f 6e 28 49 49 49  29 6f 78 69 64 65 20 61  |iron(III)oxide a|
000035f0  73 20 61 20 72 65 64 72  65 73 69 64 75 65 3a 22  |s a redresidue:"|
00003600  27 8a 39 29 22 32 46 65  53 4f 22 44 34 24 22 20  |'.9)"2FeSO"D4$" |
00003610  3d 20 46 65 22 44 32 24  22 4f 22 44 33 24 22 20  |= Fe"D2$"O"D3$" |
00003620  2b 20 53 4f 22 44 32 24  22 20 2b 20 53 4f 22 44  |+ SO"D2$" + SO"D|
00003630  33 24 27 0d 07 c6 39 e7  43 25 3d 36 80 42 25 3c  |3$'...9.C%=6.B%<|
00003640  39 f1 22 5a 69 6e 63 20  6f 78 69 64 65 20 69 73  |9."Zinc oxide is|
00003650  20 79 65 6c 6c 6f 77 20  68 6f 74 20 61 6e 64 20  | yellow hot and |
00003660  77 68 69 74 65 20 63 6f  6c 64 22 27 0d 07 d0 39  |white cold"'...9|
00003670  e7 42 25 3d 37 84 42 25  3d 32 f1 22 57 68 69 74  |.B%=7.B%=2."Whit|
00003680  65 20 63 61 6c 63 69 75  6d 20 6f 78 69 64 65 20  |e calcium oxide |
00003690  28 71 75 69 63 6b 6c 69  6d 65 29 20 72 65 6d 61  |(quicklime) rema|
000036a0  69 6e 73 22 27 0d 07 da  2b e7 43 25 3d 32 f1 22  |ins"'...+.C%=2."|
000036b0  43 6f 70 70 65 72 20 6f  78 69 64 65 20 69 73 20  |Copper oxide is |
000036c0  61 20 62 6c 61 63 6b 20  70 6f 77 64 65 72 22 27  |a black powder"'|
000036d0  0d 07 e4 30 e7 43 25 3d  34 f1 22 54 68 65 20 72  |...0.C%=4."The r|
000036e0  65 73 69 64 75 65 20 6f  66 20 6c 65 61 64 20 6f  |esidue of lead o|
000036f0  78 69 64 65 20 69 73 20  79 65 6c 6c 6f 77 22 27  |xide is yellow"'|
00003700  0d 07 ee 25 e7 20 41 25  3d 35 58 24 3d 22 43 6c  |...%. A%=5X$="Cl|
00003710  22 8b e7 41 25 3d 36 58  24 3d 22 42 72 22 8b 58  |"..A%=6X$="Br".X|
00003720  24 3d 22 49 22 0d 07 f8  76 e7 43 25 3d 39 f1 22  |$="I"...v.C%=9."|
00003730  41 6d 6d 6f 6e 69 75 6d  20 63 6f 6d 70 6f 75 6e  |Ammonium compoun|
00003740  64 73 20 64 69 73 73 6f  63 69 61 74 65 20 6f 6e  |ds dissociate on|
00003750  20 68 65 61 74 69 6e 67  2d 74 68 65 79 20 73 65  | heating-they se|
00003760  65 6d 20 74 6f 20 73 75  62 6c 69 6d 65 3a 22 27  |em to sublime:"'|
00003770  27 8a 39 29 22 4e 48 22  44 34 24 58 24 22 28 73  |'.9)"NH"D4$X$"(s|
00003780  29 20 3d 20 48 22 58 24  22 28 67 29 20 2b 20 4e  |) = H"X$"(g) + N|
00003790  48 22 44 33 24 22 28 67  29 22 27 0d 08 02 45 e7  |H"D3$"(g)"'...E.|
000037a0  42 25 3d 30 84 42 25 3e  31 32 80 43 25 3c 3e 39  |B%=0.B%>12.C%<>9|
000037b0  f1 22 49 74 20 69 73 20  6e 6f 74 20 64 65 63 6f  |."It is not deco|
000037c0  6d 70 6f 73 65 64 20 62  79 20 74 68 65 20 61 63  |mposed by the ac|
000037d0  74 69 6f 6e 20 6f 66 20  20 20 68 65 61 74 22 27  |tion of   heat"'|
000037e0  0d 08 0c 6b e7 43 25 3d  39 f1 22 54 68 65 79 20  |...k.C%=9."They |
000037f0  67 69 76 65 20 6f 66 66  20 61 6d 6d 6f 6e 69 61  |give off ammonia|
00003800  20 77 69 74 68 20 73 74  72 6f 6e 67 20 61 6c 6b  | with strong alk|
00003810  61 6c 69 22 27 22 20 20  20 20 20 4e 61 4f 48 20  |ali"'"     NaOH |
00003820  2b 20 4e 48 22 44 34 24  58 24 3b 22 20 3d 20 4e  |+ NH"D4$X$;" = N|
00003830  61 22 3b 58 24 3b 22 20  2b 20 48 22 44 32 24 22  |a";X$;" + H"D2$"|
00003840  4f 20 2b 20 4e 48 22 44  33 24 27 0d 08 16 53 e7  |O + NH"D3$'...S.|
00003850  20 43 25 3d 33 f1 22 41  6c 6c 20 73 6f 64 69 75  | C%=3."All sodiu|
00003860  6d 20 63 6f 6d 70 6f 75  6e 64 73 20 61 72 65 20  |m compounds are |
00003870  73 6f 6c 75 62 6c 65 20  2d 20 74 68 65 72 65 69  |soluble - therei|
00003880  73 20 6e 6f 20 70 72 65  63 69 70 69 74 61 74 65  |s no precipitate|
00003890  20 77 69 74 68 20 61 6c  6b 61 6c 69 22 27 0d 08  | with alkali"'..|
000038a0  20 72 e7 43 25 3c 39 80  43 25 3c 3e 33 f1 22 41  | r.C%<9.C%<>3."A|
000038b0  64 64 69 74 69 6f 6e 20  6f 66 20 68 79 64 72 6f  |ddition of hydro|
000038c0  78 69 64 65 20 69 6f 6e  73 20 74 6f 20 22 43 24  |xide ions to "C$|
000038d0  28 43 25 29 22 69 6f 6e  73 20 67 69 76 65 73 20  |(C%)"ions gives |
000038e0  61 20 70 72 65 63 69 70  69 74 61 74 65 20 6f 66  |a precipitate of|
000038f0  20 69 6e 73 6f 6c 75 62  6c 65 20 20 20 6d 65 74  | insoluble   met|
00003900  61 6c 20 68 79 64 72 6f  78 69 64 65 3a 22 27 20  |al hydroxide:"' |
00003910  0d 08 2a 56 e7 43 25 3d  31 84 43 25 3d 32 84 43  |..*V.C%=1.C%=2.C|
00003920  25 3d 34 84 43 25 3d 36  84 43 25 3d 37 f1 8a 34  |%=4.C%=6.C%=7..4|
00003930  29 4d 24 28 43 25 29 55  32 24 22 28 61 71 29 20  |)M$(C%)U2$"(aq) |
00003940  2b 20 32 4f 48 22 55 4e  24 22 28 61 71 29 20 3d  |+ 2OH"UN$"(aq) =|
00003950  20 22 4d 24 28 43 25 29  22 28 4f 48 29 22 44 32  | "M$(C%)"(OH)"D2|
00003960  24 22 28 73 29 22 0d 08  34 47 e7 43 25 3d 35 84  |$"(s)"..4G.C%=5.|
00003970  43 25 3d 38 f1 8a 36 29  4d 24 28 43 25 29 55 33  |C%=8..6)M$(C%)U3|
00003980  24 22 28 61 71 29 20 2b  20 33 4f 48 22 55 4e 24  |$"(aq) + 3OH"UN$|
00003990  22 28 61 71 29 20 3d 20  22 4d 24 28 43 25 29 22  |"(aq) = "M$(C%)"|
000039a0  28 4f 48 29 22 44 33 24  22 28 73 29 22 0d 08 3e  |(OH)"D3$"(s)"..>|
000039b0  6f e7 43 25 3d 31 f1 27  22 41 6d 6d 6f 6e 69 61  |o.C%=1.'"Ammonia|
000039c0  20 64 6f 65 73 20 6e 6f  74 20 67 69 76 65 20 65  | does not give e|
000039d0  6e 6f 75 67 68 20 68 79  64 72 6f 78 69 64 65 20  |nough hydroxide |
000039e0  20 69 6f 6e 73 20 74 6f  20 70 72 65 63 69 70 69  | ions to precipi|
000039f0  74 61 74 65 20 74 68 65  20 73 6c 69 67 68 74 6c  |tate the slightl|
00003a00  79 20 73 6f 6c 75 62 6c  65 63 61 6c 63 69 75 6d  |y solublecalcium|
00003a10  20 68 79 64 72 6f 78 69  64 65 22 27 0d 08 48 4f  | hydroxide"'..HO|
00003a20  e7 43 25 3d 34 84 43 25  3d 35 f1 27 22 54 68 65  |.C%=4.C%=5.'"The|
00003a30  20 41 4d 50 48 4f 54 45  52 49 43 20 68 79 64 72  | AMPHOTERIC hydr|
00003a40  6f 78 69 64 65 20 64 69  73 73 6f 6c 76 65 73 20  |oxide dissolves |
00003a50  69 6e 20 20 20 65 78 63  65 73 73 20 73 74 72 6f  |in   excess stro|
00003a60  6e 67 20 61 6c 6b 61 6c  69 22 27 0d 08 52 85 e7  |ng alkali"'..R..|
00003a70  43 25 3d 36 f1 27 22 54  68 65 20 41 4d 50 48 4f  |C%=6.'"The AMPHO|
00003a80  54 45 52 49 43 20 68 79  64 72 6f 78 69 64 65 20  |TERIC hydroxide |
00003a90  64 69 73 73 6f 6c 76 65  73 20 69 6e 20 20 20 65  |dissolves in   e|
00003aa0  78 63 65 73 73 20 73 74  72 6f 6e 67 20 61 6c 6b  |xcess strong alk|
00003ab0  61 6c 69 2c 20 61 6e 64  20 69 74 20 66 6f 72 6d  |ali, and it form|
00003ac0  73 20 61 20 20 20 20 73  6f 6c 75 62 6c 65 20 43  |s a    soluble C|
00003ad0  4f 4d 50 4c 45 58 20 49  4f 4e 20 77 69 74 68 20  |OMPLEX ION with |
00003ae0  65 78 63 65 73 73 20 61  6d 6d 6f 6e 69 61 22 27  |excess ammonia"'|
00003af0  0d 08 5c 49 e7 43 25 3d  32 f1 27 22 43 6f 70 70  |..\I.C%=2.'"Copp|
00003b00  65 72 20 69 6f 6e 73 20  66 6f 72 6d 20 61 20 64  |er ions form a d|
00003b10  65 65 70 20 62 6c 75 65  20 43 4f 4d 50 4c 45 58  |eep blue COMPLEX|
00003b20  20 49 4f 4e 77 69 74 68  20 65 78 63 65 73 73 20  | IONwith excess |
00003b30  61 6d 6d 6f 6e 69 61 22  27 0d 08 66 38 e7 43 25  |ammonia"'..f8.C%|
00003b40  3d 37 84 43 25 3d 38 f1  27 22 54 68 65 72 65 20  |=7.C%=8.'"There |
00003b50  69 73 20 6e 6f 20 63 68  61 6e 67 65 20 77 69 74  |is no change wit|
00003b60  68 20 65 78 63 65 73 73  20 61 6c 6b 61 6c 69 22  |h excess alkali"|
00003b70  27 0d 08 70 6a e7 43 25  3d 37 f1 22 49 72 6f 6e  |'..pj.C%=7."Iron|
00003b80  28 49 49 29 20 69 73 20  6f 78 69 64 69 73 65 64  |(II) is oxidised|
00003b90  20 74 6f 20 69 72 6f 6e  28 49 49 49 29 20 62 79  | to iron(III) by|
00003ba0  20 20 20 20 63 68 6c 6f  72 69 6e 65 3a 22 27 8a  |    chlorine:"'.|
00003bb0  39 29 22 32 46 65 22 55  32 24 22 20 2b 20 43 6c  |9)"2Fe"U2$" + Cl|
00003bc0  22 44 32 24 22 20 3d 20  32 46 65 22 55 33 24 22  |"D2$" = 2Fe"U3$"|
00003bd0  20 2b 20 32 43 6c 22 55  4e 24 27 0d 08 7a 51 e7  | + 2Cl"UN$'..zQ.|
00003be0  20 41 25 3d 32 f1 22 43  61 72 62 6f 6e 20 64 69  | A%=2."Carbon di|
00003bf0  6f 78 69 64 65 20 69 73  20 65 76 6f 6c 76 65 64  |oxide is evolved|
00003c00  20 77 69 74 68 20 64 69  6c 75 74 65 20 20 20 61  | with dilute   a|
00003c10  63 69 64 20 2d 20 74 65  73 74 20 66 6f 72 20 61  |cid - test for a|
00003c20  20 63 61 72 62 6f 6e 61  74 65 22 27 0d 08 84 40  | carbonate"'...@|
00003c30  e7 42 25 3d 35 f1 8a 33  29 22 4e 61 22 44 32 24  |.B%=5..3)"Na"D2$|
00003c40  22 43 4f 22 44 33 24 22  20 2b 20 32 48 43 6c 20  |"CO"D3$" + 2HCl |
00003c50  3d 20 32 4e 61 43 6c 20  2b 20 48 22 44 32 24 22  |= 2NaCl + H"D2$"|
00003c60  4f 20 2b 20 43 4f 22 44  32 24 27 27 0d 08 8e 5b  |O + CO"D2$''...[|
00003c70  e7 41 25 3d 33 f1 22 5a  69 6e 63 20 61 6e 64 20  |.A%=3."Zinc and |
00003c80  73 6f 64 69 75 6d 20 68  79 64 72 6f 78 69 64 65  |sodium hydroxide|
00003c90  20 67 69 76 65 20 68 79  64 72 6f 67 65 6e 20 2d  | give hydrogen -|
00003ca0  74 68 69 73 20 72 65 64  75 63 65 73 20 61 20 6e  |this reduces a n|
00003cb0  69 74 72 61 74 65 2c 67  69 76 69 6e 67 20 61 6d  |itrate,giving am|
00003cc0  6d 6f 6e 69 61 22 27 0d  08 98 45 e7 41 25 3d 34  |monia"'...E.A%=4|
00003cd0  f1 22 53 75 6c 70 68 61  74 65 73 20 67 69 76 65  |."Sulphates give|
00003ce0  20 61 20 77 68 69 74 65  20 70 72 65 63 69 70 69  | a white precipi|
00003cf0  74 61 74 65 20 77 69 74  68 20 62 61 72 69 75 6d  |tate with barium|
00003d00  20 63 68 6c 6f 72 69 64  65 3a 22 27 0d 08 a2 3d  | chloride:"'...=|
00003d10  e7 20 41 25 3d 34 f1 8a  34 29 22 53 4f 22 44 34  |. A%=4..4)"SO"D4|
00003d20  24 55 4e 32 24 22 28 61  71 29 20 2b 20 42 61 22  |$UN2$"(aq) + Ba"|
00003d30  55 32 24 22 28 61 71 29  20 3d 20 42 61 53 4f 22  |U2$"(aq) = BaSO"|
00003d40  44 34 24 22 28 73 29 22  27 0d 08 ac 44 e7 41 25  |D4$"(s)"'...D.A%|
00003d50  3d 35 f1 22 43 68 6c 6f  72 69 64 65 73 20 67 69  |=5."Chlorides gi|
00003d60  76 65 20 61 20 77 68 69  74 65 20 70 72 65 63 69  |ve a white preci|
00003d70  70 69 74 61 74 65 20 77  69 74 68 20 73 69 6c 76  |pitate with silv|
00003d80  65 72 20 6e 69 74 72 61  74 65 3a 22 27 0d 08 b6  |er nitrate:"'...|
00003d90  44 e7 41 25 3d 36 f1 22  42 72 6f 6d 69 64 65 73  |D.A%=6."Bromides|
00003da0  20 67 69 76 65 20 61 20  63 72 65 61 6d 20 70 72  | give a cream pr|
00003db0  65 63 69 70 69 74 61 74  65 20 77 69 74 68 20 20  |ecipitate with  |
00003dc0  73 69 6c 76 65 72 20 6e  69 74 72 61 74 65 3a 22  |silver nitrate:"|
00003dd0  27 0d 08 c0 44 e7 41 25  3d 37 f1 22 49 6f 64 69  |'...D.A%=7."Iodi|
00003de0  64 65 73 20 67 69 76 65  20 61 20 79 65 6c 6c 6f  |des give a yello|
00003df0  77 20 70 72 65 63 69 70  69 74 61 74 65 20 77 69  |w precipitate wi|
00003e00  74 68 20 20 73 69 6c 76  65 72 20 6e 69 74 72 61  |th  silver nitra|
00003e10  74 65 3a 22 27 0d 08 ca  32 e7 41 25 3e 34 f1 8a  |te:"'...2.A%>4..|
00003e20  37 29 58 24 55 4e 24 22  28 61 71 29 20 2b 20 41  |7)X$UN$"(aq) + A|
00003e30  67 22 55 24 22 28 61 71  29 20 3d 20 41 67 22 58  |g"U$"(aq) = Ag"X|
00003e40  24 22 28 73 29 22 27 0d  08 d4 4b e7 41 25 3d 36  |$"(s)"'...K.A%=6|
00003e50  f1 22 41 64 64 69 74 69  6f 6e 20 6f 66 20 63 68  |."Addition of ch|
00003e60  6c 6f 72 69 6e 65 20 77  61 74 65 72 20 44 49 53  |lorine water DIS|
00003e70  50 4c 41 43 45 53 20 74  68 65 6c 65 73 73 20 72  |PLACES theless r|
00003e80  65 61 63 74 69 76 65 20  62 72 6f 6d 69 6e 65 3a  |eactive bromine:|
00003e90  22 27 0d 08 de 4a e7 41  25 3d 37 f1 22 41 64 64  |"'...J.A%=7."Add|
00003ea0  69 74 69 6f 6e 20 6f 66  20 63 68 6c 6f 72 69 6e  |ition of chlorin|
00003eb0  65 20 77 61 74 65 72 20  44 49 53 50 4c 41 43 45  |e water DISPLACE|
00003ec0  53 20 74 68 65 6c 65 73  73 20 72 65 61 63 74 69  |S theless reacti|
00003ed0  76 65 20 69 6f 64 69 6e  65 3a 22 27 0d 08 e8 35  |ve iodine:"'...5|
00003ee0  e7 41 25 3e 35 f1 8a 38  29 22 43 6c 22 44 32 24  |.A%>5..8)"Cl"D2$|
00003ef0  22 20 2b 20 32 22 58 24  55 4e 24 22 20 3d 20 32  |" + 2"X$UN$" = 2|
00003f00  43 6c 22 55 4e 24 22 20  2b 20 22 58 24 44 32 24  |Cl"UN$" + "X$D2$|
00003f10  27 0d 08 f2 29 f1 27 8a  38 29 22 53 50 41 43 45  |'...).'.8)"SPACE|
00003f20  20 42 41 52 20 74 6f 20  74 72 79 20 61 67 61 69  | BAR to try agai|
00003f30  6e 22 3b 3a 49 25 3d a5  3a e1 0d ff              |n";:I%=.:...|
00003f3c
SALT.m0
SALT.m1
SALT.m2
SALT.m4
SALT.m5