Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_10.ADF » CON1
CON1
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 ADFS disks » Electron_User_Group » EUG_10.ADF |
Filename: | CON1 |
Read OK: | ✔ |
File size: | 1307 bytes |
Load address: | FFFF1D00 |
Exec address: | FFFF8023 |
File contents
10REM $.CON1 20MODE4:VDU23,1,0;0;0;0;:GCOL0,129:CLG:GCOL0,0:COLOUR129:COLOUR0 30PROCdouble("MEASURING",15,2):PROCdouble("C O N D U C T I V I T Y",8,5):PROCdouble("_______________________",8,7) 40PRINTTAB(12,10)"By David Humphreys" 50PROCfrank:X=18:Y=20 60PRINTTAB(X,Y)CHR$224;CHR$225;CHR$226;CHR$227TAB(X,Y+1)CHR$228;CHR$229;CHR$230;CHR$231TAB(X,Y+2)CHR$232;CHR$233;CHR$234;CHR$235 70PRINTTAB(X,Y+3)CHR$236;CHR$237;CHR$238;CHR$239;TAB(X,Y+4)CHR$240;CHR$241;CHR$242;CHR$243TAB(X,Y+5)CHR$244;CHR$245;CHR$246;CHR$247 80PROCface 90PROCbuzz 100PRINTTAB(10,29)"Please press <SPACE>" 110REPEAT:PROCin:M$=INKEY$0:PROCout:UNTIL M$=" " 120MODE3:VDU23,1,0;0;0;0;:VDU14:PRINT''"PRESS <SHIFT> TO SCROLL"'' 130PROCtext 140REPEAT 150PRINT'"PLEASE PRESS <P> TO PRINT TEXT <C> TO LOAD PROGRAM <M> FOR MAIN MENU" 160REPEAT: A$=GET$:UNTIL A$="P" OR A$="C" OR A$="M" 170IF A$="C" THEN CHAIN"$.CON2" 180IF A$="M" THEN CHAIN"$.MENU" 190VDU15:VDU2:PROCtext:VDU3 200UNTIL FALSE 210END 220 DEF PROCfrank 230 VDU23,224,0,21,43,87,174,93,186,117 240 VDU23,225,128,192,232,244,188,94,190,254 250 VDU23,226,1,3,23,47,93,42,125,47 260 VDU23,227,0,168,212,234,117,186,93,174 270 VDU23,228,235,215,175,91,225,64,160,95 280 VDU23,229,254,182,254,214,158,54,110,214 290 VDU23,230,127,46,127,43,121,44,118,43 300 VDU23,231,215,235,245,218,135,2,5,250 310 VDU23,232,175,213,106,55,28,0,112,8 320 VDU23,233,190,110,218,20,56,60,95,67 330 VDU23,234,125,38,115,40,20,44,58,194 340 VDU23,235,245,171,86,236,56,0,14,16 350 VDU23,236,1,3,3,3,7,14,13,14 360 VDU23,237,213,170,64,128,64,128,0,42 370 VDU23,238,75,165,2,1,2,1,0,170 380 VDU23,239,0,0,128,128,192,64,160,96 390 VDU23,240,28,58,52,59,28,24,52,56 400 VDU23,241,127,213,128,64,0,0,0,10 410 VDU23,242,254,87,1,2,0,0,0,128 420 VDU23,243,48,112,40,152,48,16,40,24 430 VDU23,244,28,10,5,2,5,0,0,0 440 VDU23,245,85,170,84,40,0,0,0,0 450 VDU23,246,80,0,0,0,0,0,0,0 460 VDU23,247,0,0,0,0,0,0,0,0 470 ENDPROC 480DEF PROCface 490MOVE572,332 500DRAW564,300 510DRAW580,272 520DRAW580,216 530DRAW608,188 540DRAW660,188 550DRAW684,212 560DRAW692,272 570DRAW704,288 580DRAW708,300 590DRAW704,332 600DRAW704,412 610DRAW692,396 620DRAW684,416 630DRAW672,396 640DRAW664,412 650DRAW656,396 660DRAW644,412 670DRAW636,396 680DRAW624,412 690DRAW616,400 700DRAW604,416 710DRAW596,396 720DRAW588,416 730DRAW584,396 740DRAW572,416 750DRAW572,336 760DRAW560,456 770DRAW712,456 780DRAW708,360 790MOVE688,252 800DRAW704,168 810MOVE580,252 820DRAW568,168 830MOVE572,192 840DRAW544,192 850DRAW544,168 860DRAW524,168 870DRAW524,220 880DRAW544,220 890DRAW544,208 900DRAW572,208 910MOVE696,208 920DRAW724,208 930DRAW724,220 940DRAW724,224 950DRAW740,224 960DRAW740,180 970DRAW740,172 980DRAW724,172 990DRAW724,192 1000DRAW700,192 1010ENDPROC 1020 DEF PROCbuzz 1030 VDU23,224,119,85,85,85,85,213,21,29 1040 VDU23,225,119,85,85,85,84,84,84,220 1050 VDU23,226,0,0,0,0,255,0,0,0 1060Z$=CHR$226+CHR$224+CHR$225 1070 ENDPROC 1080DEF PROCin 1090Y=25:FOR X=0 TO 13:PRINTTAB(X,Y);Z$:PROCd:NEXT:PRINTTAB(X,Y);CHR$226;CHR$226 1100SOUND0,-15,6,2:SOUND0,-15,7,2:FOR R=5 TO 7:VDU19,0,R,0,0,0:PROCd:PROCd:NEXT:VDU19,0,0,0,0,0 1110ENDPROC 1120DEF PROCout 1130Y=25:FOR X=24 TO 37:PRINTTAB(X,Y);Z$:PROCd:NEXT:PRINTTAB(X,Y);CHR$226;CHR$226 1140ENDPROC 1150DEF PROCd:FOR D=1 TO 50:NEXT:ENDPROC 1160 DEF PROCdouble(A$,K,L) 1170LOCAL N 1180A%=135 1190A%=&A:X%=0:Y%=&A 1200D=&A00 1210FOR N=1 TO LEN(A$) 1220B$=MID$(A$,N,1) 1230?D=ASC(B$) 1240CALL (&FFF1) 1250VDU23,240,D?1,D?1,D?2,D?2,D?3,D?3,D?4,D?4 1260VDU23,241,D?5,D?5,D?6,D?6,D?7,D?7,D?8,D?8 1270PRINTTAB(K+N,L);CHR$240;TAB(K+N,L+1);CHR$241 1280NEXT N 1290ENDPROC 1300DEF PROCtext 1310PRINT"This program will read the conductivity of any object and then plot a" 1320PRINT"graph showing this property as a percentage. What use is this, you may" 1330PRINT"ask. To be honest, I've no idea, although it can be fun to hold a probe in" 1340PRINT"each hand and compare notes with your family, etc. I'm sure it could be" 1350PRINT"put to more serious use, but for now let's regard it as a toy!" 1360PRINT 1370PRINT"All that is needed is an Electron, PLUS-1, AP1, ROMBOX or ROMBOX+ to begin" 1380PRINT"with. Then you need a couple of 'probes', two old forks would do (no Will," 1390PRINT"NOT the plastic 'picnic' variety....)! on suitably long leads." 1400PRINT 1410PRINT"You will need a 15-pin D-type plug to fit the A/D (joystick) port. Solder" 1420PRINT"one of the leads to pin-15 (Analogue channel 0) and one to pin-11 or" 1430PRINT"pin-14 (Analogue Voltage reference, Vref 1.8v) depending on which you find" 1440PRINT"easier - consult the Plus1 User Guide if in doubt. Now simply connect the" 1450PRINT"D-type plug to the PLUS-1 and you're ready to go! Nothing could be easier!" 1460PRINT 1470PRINT"The next thing to do is to connect the probes to whatever you want to" 1480PRINT"measure. A good test item to start with would be yourself. Hold a probe in" 1490PRINT"each hand. If you can type with both hands full you're OK. If not, put" 1500PRINT"them down and grab them again on the title screen and run the program. You" 1510PRINT"will see the aforementioned title screen. After 10 seconds everything" 1520PRINT"starts to happen. Just leave the probes in place and a graph will be" 1530PRINT"plotted of your conductivity. When the graph is finished, the program will" 1540PRINT"calculate your average conductivity as a percentage. Just type 'Y' to exit" 1550PRINT"the program or any other key to begin again." 1560PRINT 1570PRINT"This is quite a lot of fun when finding out just how much of granny really" 1580PRINT"is solid steel, but I am convinced that it can be used in a more useful" 1590PRINT"way. If you have any suggestions, I would be pleased to hear them. Happy" 1600PRINT"measuring!" 1610ENDPROC
� $.CON1 +�4:�23,1,0;0;0;0;:�0,129:�:�0,0:�129:�0 k�double("MEASURING",15,2):�double("C O N D U C T I V I T Y",8,5):�double("_______________________",8,7) ( �12,10)"By David Humphreys" 2�frank:X=18:Y=20 <Q�X,Y)�224;�225;�226;�227�X,Y+1)�228;�229;�230;�231�X,Y+2)�232;�233;�234;�235 FT�X,Y+3)�236;�237;�238;�239;�X,Y+4)�240;�241;�242;�243�X,Y+5)�244;�245;�246;�247 P �face Z �buzz d"�10,29)"Please press <SPACE>" n�:�in:M$=�0:�out:� M$=" " x8�3:�23,1,0;0;0;0;:�14:�''"PRESS <SHIFT> TO SCROLL"'' � �text �� �L�'"PLEASE PRESS <P> TO PRINT TEXT <C> TO LOAD PROGRAM <M> FOR MAIN MENU" �&�: A$=�:� A$="P" � A$="C" � A$="M" �� A$="C" � �"$.CON2" �� A$="M" � �"$.MENU" ��15:�2:�text:�3 �� � �� � � �frank �& �23,224,0,21,43,87,174,93,186,117 �+ �23,225,128,192,232,244,188,94,190,254 �# �23,226,1,3,23,47,93,42,125,47 ) �23,227,0,168,212,234,117,186,93,174 ) �23,228,235,215,175,91,225,64,160,95 + �23,229,254,182,254,214,158,54,110,214 "( �23,230,127,46,127,43,121,44,118,43 ,( �23,231,215,235,245,218,135,2,5,250 6& �23,232,175,213,106,55,28,0,112,8 @' �23,233,190,110,218,20,56,60,95,67 J' �23,234,125,38,115,40,20,44,58,194 T& �23,235,245,171,86,236,56,0,14,16 ^ �23,236,1,3,3,3,7,14,13,14 h' �23,237,213,170,64,128,64,128,0,42 r! �23,238,75,165,2,1,2,1,0,170 |& �23,239,0,0,128,128,192,64,160,96 �$ �23,240,28,58,52,59,28,24,52,56 �$ �23,241,127,213,128,64,0,0,0,10 �! �23,242,254,87,1,2,0,0,0,128 �& �23,243,48,112,40,152,48,16,40,24 � �23,244,28,10,5,2,5,0,0,0 �! �23,245,85,170,84,40,0,0,0,0 � �23,246,80,0,0,0,0,0,0,0 � �23,247,0,0,0,0,0,0,0,0 � � �� �face ��572,332 ��564,300 ��580,272 �580,216 �608,188 �660,188 &�684,212 0�692,272 :�704,288 D�708,300 N�704,332 X�704,412 b�692,396 l�684,416 v�672,396 ��664,412 ��656,396 ��644,412 ��636,396 ��624,412 ��616,400 ��604,416 ��596,396 ��588,416 ��584,396 ��572,416 ��572,336 ��560,456 �712,456 �708,360 �688,252 �704,168 *�580,252 4�568,168 >�572,192 H�544,192 R�544,168 \�524,168 f�524,220 p�544,220 z�544,208 ��572,208 ��696,208 ��724,208 ��724,220 ��724,224 ��740,224 ��740,180 ��740,172 ��724,172 ��724,192 ��700,192 �� � � �buzz & �23,224,119,85,85,85,85,213,21,29 & �23,225,119,85,85,85,84,84,84,220 �23,226,0,0,0,0,255,0,0,0 $Z$=�226+�224+�225 . � 8 � �in B3Y=25:� X=0 � 13:�X,Y);Z$:�d:�:�X,Y);�226;�226 LG�0,-15,6,2:�0,-15,7,2:� R=5 � 7:�19,0,R,0,0,0:�d:�d:�:�19,0,0,0,0,0 V� ` � �out j4Y=25:� X=24 � 37:�X,Y);Z$:�d:�:�X,Y);�226;�226 t� ~� �d:� D=1 � 50:�:� � � �double(A$,K,L) �� N � A%=135 �A%=&A:X%=0:Y%=&A � D=&A00 �� N=1 � �(A$) �B$=�A$,N,1) �?D=�(B$) � � (&FFF1) �+�23,240,D?1,D?1,D?2,D?2,D?3,D?3,D?4,D?4 �+�23,241,D?5,D?5,D?6,D?6,D?7,D?7,D?8,D?8 � �K+N,L);�240;�K+N,L+1);�241 � N � � �text L�"This program will read the conductivity of any object and then plot a" (M�"graph showing this property as a percentage. What use is this, you may" 2Q�"ask. To be honest, I've no idea, although it can be fun to hold a probe in" <N�"each hand and compare notes with your family, etc. I'm sure it could be" FE�"put to more serious use, but for now let's regard it as a toy!" P� ZQ�"All that is needed is an Electron, PLUS-1, AP1, ROMBOX or ROMBOX+ to begin" dQ�"with. Then you need a couple of 'probes', two old forks would do (no Will," nE�"NOT the plastic 'picnic' variety....)! on suitably long leads." x� �P�"You will need a 15-pin D-type plug to fit the A/D (joystick) port. Solder" �K�"one of the leads to pin-15 (Analogue channel 0) and one to pin-11 or" �Q�"pin-14 (Analogue Voltage reference, Vref 1.8v) depending on which you find" �Q�"easier - consult the Plus1 User Guide if in doubt. Now simply connect the" �Q�"D-type plug to the PLUS-1 and you're ready to go! Nothing could be easier!" �� �L�"The next thing to do is to connect the probes to whatever you want to" �Q�"measure. A good test item to start with would be yourself. Hold a probe in" �N�"each hand. If you can type with both hands full you're OK. If not, put" �Q�"them down and grab them again on the title screen and run the program. You" �L�"will see the aforementioned title screen. After 10 seconds everything" �K�"starts to happen. Just leave the probes in place and a graph will be" �Q�"plotted of your conductivity. When the graph is finished, the program will" Q�"calculate your average conductivity as a percentage. Just type 'Y' to exit" 3�"the program or any other key to begin again." � "Q�"This is quite a lot of fun when finding out just how much of granny really" ,N�"is solid steel, but I am convinced that it can be used in a more useful" 6O�"way. If you have any suggestions, I would be pleased to hear them. Happy" @�"measuring!" J� �
00000000 0d 00 0a 0c f4 20 24 2e 43 4f 4e 31 0d 00 14 2b |..... $.CON1...+| 00000010 eb 34 3a ef 32 33 2c 31 2c 30 3b 30 3b 30 3b 30 |.4:.23,1,0;0;0;0| 00000020 3b 3a e6 30 2c 31 32 39 3a da 3a e6 30 2c 30 3a |;:.0,129:.:.0,0:| 00000030 fb 31 32 39 3a fb 30 0d 00 1e 6b f2 64 6f 75 62 |.129:.0...k.doub| 00000040 6c 65 28 22 4d 45 41 53 55 52 49 4e 47 22 2c 31 |le("MEASURING",1| 00000050 35 2c 32 29 3a f2 64 6f 75 62 6c 65 28 22 43 20 |5,2):.double("C | 00000060 4f 20 4e 20 44 20 55 20 43 20 54 20 49 20 56 20 |O N D U C T I V | 00000070 49 20 54 20 59 22 2c 38 2c 35 29 3a f2 64 6f 75 |I T Y",8,5):.dou| 00000080 62 6c 65 28 22 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f |ble("___________| 00000090 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 22 2c 38 2c |____________",8,| 000000a0 37 29 0d 00 28 20 f1 8a 31 32 2c 31 30 29 22 42 |7)..( ..12,10)"B| 000000b0 79 20 44 61 76 69 64 20 48 75 6d 70 68 72 65 79 |y David Humphrey| 000000c0 73 22 0d 00 32 14 f2 66 72 61 6e 6b 3a 58 3d 31 |s"..2..frank:X=1| 000000d0 38 3a 59 3d 32 30 0d 00 3c 51 f1 8a 58 2c 59 29 |8:Y=20..<Q..X,Y)| 000000e0 bd 32 32 34 3b bd 32 32 35 3b bd 32 32 36 3b bd |.224;.225;.226;.| 000000f0 32 32 37 8a 58 2c 59 2b 31 29 bd 32 32 38 3b bd |227.X,Y+1).228;.| 00000100 32 32 39 3b bd 32 33 30 3b bd 32 33 31 8a 58 2c |229;.230;.231.X,| 00000110 59 2b 32 29 bd 32 33 32 3b bd 32 33 33 3b bd 32 |Y+2).232;.233;.2| 00000120 33 34 3b bd 32 33 35 0d 00 46 54 f1 8a 58 2c 59 |34;.235..FT..X,Y| 00000130 2b 33 29 bd 32 33 36 3b bd 32 33 37 3b bd 32 33 |+3).236;.237;.23| 00000140 38 3b bd 32 33 39 3b 8a 58 2c 59 2b 34 29 bd 32 |8;.239;.X,Y+4).2| 00000150 34 30 3b bd 32 34 31 3b bd 32 34 32 3b bd 32 34 |40;.241;.242;.24| 00000160 33 8a 58 2c 59 2b 35 29 bd 32 34 34 3b bd 32 34 |3.X,Y+5).244;.24| 00000170 35 3b bd 32 34 36 3b bd 32 34 37 0d 00 50 09 f2 |5;.246;.247..P..| 00000180 66 61 63 65 0d 00 5a 09 f2 62 75 7a 7a 0d 00 64 |face..Z..buzz..d| 00000190 22 f1 8a 31 30 2c 32 39 29 22 50 6c 65 61 73 65 |"..10,29)"Please| 000001a0 20 70 72 65 73 73 20 3c 53 50 41 43 45 3e 22 0d | press <SPACE>".| 000001b0 00 6e 1d f5 3a f2 69 6e 3a 4d 24 3d bf 30 3a f2 |.n..:.in:M$=.0:.| 000001c0 6f 75 74 3a fd 20 4d 24 3d 22 20 22 0d 00 78 38 |out:. M$=" "..x8| 000001d0 eb 33 3a ef 32 33 2c 31 2c 30 3b 30 3b 30 3b 30 |.3:.23,1,0;0;0;0| 000001e0 3b 3a ef 31 34 3a f1 27 27 22 50 52 45 53 53 20 |;:.14:.''"PRESS | 000001f0 3c 53 48 49 46 54 3e 20 54 4f 20 53 43 52 4f 4c |<SHIFT> TO SCROL| 00000200 4c 22 27 27 0d 00 82 09 f2 74 65 78 74 0d 00 8c |L"''.....text...| 00000210 05 f5 0d 00 96 4c f1 27 22 50 4c 45 41 53 45 20 |.....L.'"PLEASE | 00000220 50 52 45 53 53 20 3c 50 3e 20 54 4f 20 50 52 49 |PRESS <P> TO PRI| 00000230 4e 54 20 54 45 58 54 20 3c 43 3e 20 54 4f 20 4c |NT TEXT <C> TO L| 00000240 4f 41 44 20 50 52 4f 47 52 41 4d 20 3c 4d 3e 20 |OAD PROGRAM <M> | 00000250 46 4f 52 20 4d 41 49 4e 20 4d 45 4e 55 22 0d 00 |FOR MAIN MENU"..| 00000260 a0 26 f5 3a 20 41 24 3d be 3a fd 20 41 24 3d 22 |.&.: A$=.:. A$="| 00000270 50 22 20 84 20 41 24 3d 22 43 22 20 84 20 41 24 |P" . A$="C" . A$| 00000280 3d 22 4d 22 0d 00 aa 18 e7 20 41 24 3d 22 43 22 |="M"..... A$="C"| 00000290 20 8c 20 d7 22 24 2e 43 4f 4e 32 22 0d 00 b4 18 | . ."$.CON2"....| 000002a0 e7 20 41 24 3d 22 4d 22 20 8c 20 d7 22 24 2e 4d |. A$="M" . ."$.M| 000002b0 45 4e 55 22 0d 00 be 13 ef 31 35 3a ef 32 3a f2 |ENU".....15:.2:.| 000002c0 74 65 78 74 3a ef 33 0d 00 c8 07 fd 20 a3 0d 00 |text:.3..... ...| 000002d0 d2 05 e0 0d 00 dc 0d 20 dd 20 f2 66 72 61 6e 6b |....... . .frank| 000002e0 0d 00 e6 26 20 ef 32 33 2c 32 32 34 2c 30 2c 32 |...& .23,224,0,2| 000002f0 31 2c 34 33 2c 38 37 2c 31 37 34 2c 39 33 2c 31 |1,43,87,174,93,1| 00000300 38 36 2c 31 31 37 0d 00 f0 2b 20 ef 32 33 2c 32 |86,117...+ .23,2| 00000310 32 35 2c 31 32 38 2c 31 39 32 2c 32 33 32 2c 32 |25,128,192,232,2| 00000320 34 34 2c 31 38 38 2c 39 34 2c 31 39 30 2c 32 35 |44,188,94,190,25| 00000330 34 0d 00 fa 23 20 ef 32 33 2c 32 32 36 2c 31 2c |4...# .23,226,1,| 00000340 33 2c 32 33 2c 34 37 2c 39 33 2c 34 32 2c 31 32 |3,23,47,93,42,12| 00000350 35 2c 34 37 0d 01 04 29 20 ef 32 33 2c 32 32 37 |5,47...) .23,227| 00000360 2c 30 2c 31 36 38 2c 32 31 32 2c 32 33 34 2c 31 |,0,168,212,234,1| 00000370 31 37 2c 31 38 36 2c 39 33 2c 31 37 34 0d 01 0e |17,186,93,174...| 00000380 29 20 ef 32 33 2c 32 32 38 2c 32 33 35 2c 32 31 |) .23,228,235,21| 00000390 35 2c 31 37 35 2c 39 31 2c 32 32 35 2c 36 34 2c |5,175,91,225,64,| 000003a0 31 36 30 2c 39 35 0d 01 18 2b 20 ef 32 33 2c 32 |160,95...+ .23,2| 000003b0 32 39 2c 32 35 34 2c 31 38 32 2c 32 35 34 2c 32 |29,254,182,254,2| 000003c0 31 34 2c 31 35 38 2c 35 34 2c 31 31 30 2c 32 31 |14,158,54,110,21| 000003d0 34 0d 01 22 28 20 ef 32 33 2c 32 33 30 2c 31 32 |4.."( .23,230,12| 000003e0 37 2c 34 36 2c 31 32 37 2c 34 33 2c 31 32 31 2c |7,46,127,43,121,| 000003f0 34 34 2c 31 31 38 2c 34 33 0d 01 2c 28 20 ef 32 |44,118,43..,( .2| 00000400 33 2c 32 33 31 2c 32 31 35 2c 32 33 35 2c 32 34 |3,231,215,235,24| 00000410 35 2c 32 31 38 2c 31 33 35 2c 32 2c 35 2c 32 35 |5,218,135,2,5,25| 00000420 30 0d 01 36 26 20 ef 32 33 2c 32 33 32 2c 31 37 |0..6& .23,232,17| 00000430 35 2c 32 31 33 2c 31 30 36 2c 35 35 2c 32 38 2c |5,213,106,55,28,| 00000440 30 2c 31 31 32 2c 38 0d 01 40 27 20 ef 32 33 2c |0,112,8..@' .23,| 00000450 32 33 33 2c 31 39 30 2c 31 31 30 2c 32 31 38 2c |233,190,110,218,| 00000460 32 30 2c 35 36 2c 36 30 2c 39 35 2c 36 37 0d 01 |20,56,60,95,67..| 00000470 4a 27 20 ef 32 33 2c 32 33 34 2c 31 32 35 2c 33 |J' .23,234,125,3| 00000480 38 2c 31 31 35 2c 34 30 2c 32 30 2c 34 34 2c 35 |8,115,40,20,44,5| 00000490 38 2c 31 39 34 0d 01 54 26 20 ef 32 33 2c 32 33 |8,194..T& .23,23| 000004a0 35 2c 32 34 35 2c 31 37 31 2c 38 36 2c 32 33 36 |5,245,171,86,236| 000004b0 2c 35 36 2c 30 2c 31 34 2c 31 36 0d 01 5e 1f 20 |,56,0,14,16..^. | 000004c0 ef 32 33 2c 32 33 36 2c 31 2c 33 2c 33 2c 33 2c |.23,236,1,3,3,3,| 000004d0 37 2c 31 34 2c 31 33 2c 31 34 0d 01 68 27 20 ef |7,14,13,14..h' .| 000004e0 32 33 2c 32 33 37 2c 32 31 33 2c 31 37 30 2c 36 |23,237,213,170,6| 000004f0 34 2c 31 32 38 2c 36 34 2c 31 32 38 2c 30 2c 34 |4,128,64,128,0,4| 00000500 32 0d 01 72 21 20 ef 32 33 2c 32 33 38 2c 37 35 |2..r! .23,238,75| 00000510 2c 31 36 35 2c 32 2c 31 2c 32 2c 31 2c 30 2c 31 |,165,2,1,2,1,0,1| 00000520 37 30 0d 01 7c 26 20 ef 32 33 2c 32 33 39 2c 30 |70..|& .23,239,0| 00000530 2c 30 2c 31 32 38 2c 31 32 38 2c 31 39 32 2c 36 |,0,128,128,192,6| 00000540 34 2c 31 36 30 2c 39 36 0d 01 86 24 20 ef 32 33 |4,160,96...$ .23| 00000550 2c 32 34 30 2c 32 38 2c 35 38 2c 35 32 2c 35 39 |,240,28,58,52,59| 00000560 2c 32 38 2c 32 34 2c 35 32 2c 35 36 0d 01 90 24 |,28,24,52,56...$| 00000570 20 ef 32 33 2c 32 34 31 2c 31 32 37 2c 32 31 33 | .23,241,127,213| 00000580 2c 31 32 38 2c 36 34 2c 30 2c 30 2c 30 2c 31 30 |,128,64,0,0,0,10| 00000590 0d 01 9a 21 20 ef 32 33 2c 32 34 32 2c 32 35 34 |...! .23,242,254| 000005a0 2c 38 37 2c 31 2c 32 2c 30 2c 30 2c 30 2c 31 32 |,87,1,2,0,0,0,12| 000005b0 38 0d 01 a4 26 20 ef 32 33 2c 32 34 33 2c 34 38 |8...& .23,243,48| 000005c0 2c 31 31 32 2c 34 30 2c 31 35 32 2c 34 38 2c 31 |,112,40,152,48,1| 000005d0 36 2c 34 30 2c 32 34 0d 01 ae 1e 20 ef 32 33 2c |6,40,24.... .23,| 000005e0 32 34 34 2c 32 38 2c 31 30 2c 35 2c 32 2c 35 2c |244,28,10,5,2,5,| 000005f0 30 2c 30 2c 30 0d 01 b8 21 20 ef 32 33 2c 32 34 |0,0,0...! .23,24| 00000600 35 2c 38 35 2c 31 37 30 2c 38 34 2c 34 30 2c 30 |5,85,170,84,40,0| 00000610 2c 30 2c 30 2c 30 0d 01 c2 1d 20 ef 32 33 2c 32 |,0,0,0.... .23,2| 00000620 34 36 2c 38 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c |46,80,0,0,0,0,0,| 00000630 30 2c 30 0d 01 cc 1c 20 ef 32 33 2c 32 34 37 2c |0,0.... .23,247,| 00000640 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 0d |0,0,0,0,0,0,0,0.| 00000650 01 d6 06 20 e1 0d 01 e0 0b dd 20 f2 66 61 63 65 |... ...... .face| 00000660 0d 01 ea 0c ec 35 37 32 2c 33 33 32 0d 01 f4 0c |.....572,332....| 00000670 df 35 36 34 2c 33 30 30 0d 01 fe 0c df 35 38 30 |.564,300.....580| 00000680 2c 32 37 32 0d 02 08 0c df 35 38 30 2c 32 31 36 |,272.....580,216| 00000690 0d 02 12 0c df 36 30 38 2c 31 38 38 0d 02 1c 0c |.....608,188....| 000006a0 df 36 36 30 2c 31 38 38 0d 02 26 0c df 36 38 34 |.660,188..&..684| 000006b0 2c 32 31 32 0d 02 30 0c df 36 39 32 2c 32 37 32 |,212..0..692,272| 000006c0 0d 02 3a 0c df 37 30 34 2c 32 38 38 0d 02 44 0c |..:..704,288..D.| 000006d0 df 37 30 38 2c 33 30 30 0d 02 4e 0c df 37 30 34 |.708,300..N..704| 000006e0 2c 33 33 32 0d 02 58 0c df 37 30 34 2c 34 31 32 |,332..X..704,412| 000006f0 0d 02 62 0c df 36 39 32 2c 33 39 36 0d 02 6c 0c |..b..692,396..l.| 00000700 df 36 38 34 2c 34 31 36 0d 02 76 0c df 36 37 32 |.684,416..v..672| 00000710 2c 33 39 36 0d 02 80 0c df 36 36 34 2c 34 31 32 |,396.....664,412| 00000720 0d 02 8a 0c df 36 35 36 2c 33 39 36 0d 02 94 0c |.....656,396....| 00000730 df 36 34 34 2c 34 31 32 0d 02 9e 0c df 36 33 36 |.644,412.....636| 00000740 2c 33 39 36 0d 02 a8 0c df 36 32 34 2c 34 31 32 |,396.....624,412| 00000750 0d 02 b2 0c df 36 31 36 2c 34 30 30 0d 02 bc 0c |.....616,400....| 00000760 df 36 30 34 2c 34 31 36 0d 02 c6 0c df 35 39 36 |.604,416.....596| 00000770 2c 33 39 36 0d 02 d0 0c df 35 38 38 2c 34 31 36 |,396.....588,416| 00000780 0d 02 da 0c df 35 38 34 2c 33 39 36 0d 02 e4 0c |.....584,396....| 00000790 df 35 37 32 2c 34 31 36 0d 02 ee 0c df 35 37 32 |.572,416.....572| 000007a0 2c 33 33 36 0d 02 f8 0c df 35 36 30 2c 34 35 36 |,336.....560,456| 000007b0 0d 03 02 0c df 37 31 32 2c 34 35 36 0d 03 0c 0c |.....712,456....| 000007c0 df 37 30 38 2c 33 36 30 0d 03 16 0c ec 36 38 38 |.708,360.....688| 000007d0 2c 32 35 32 0d 03 20 0c df 37 30 34 2c 31 36 38 |,252.. ..704,168| 000007e0 0d 03 2a 0c ec 35 38 30 2c 32 35 32 0d 03 34 0c |..*..580,252..4.| 000007f0 df 35 36 38 2c 31 36 38 0d 03 3e 0c ec 35 37 32 |.568,168..>..572| 00000800 2c 31 39 32 0d 03 48 0c df 35 34 34 2c 31 39 32 |,192..H..544,192| 00000810 0d 03 52 0c df 35 34 34 2c 31 36 38 0d 03 5c 0c |..R..544,168..\.| 00000820 df 35 32 34 2c 31 36 38 0d 03 66 0c df 35 32 34 |.524,168..f..524| 00000830 2c 32 32 30 0d 03 70 0c df 35 34 34 2c 32 32 30 |,220..p..544,220| 00000840 0d 03 7a 0c df 35 34 34 2c 32 30 38 0d 03 84 0c |..z..544,208....| 00000850 df 35 37 32 2c 32 30 38 0d 03 8e 0c ec 36 39 36 |.572,208.....696| 00000860 2c 32 30 38 0d 03 98 0c df 37 32 34 2c 32 30 38 |,208.....724,208| 00000870 0d 03 a2 0c df 37 32 34 2c 32 32 30 0d 03 ac 0c |.....724,220....| 00000880 df 37 32 34 2c 32 32 34 0d 03 b6 0c df 37 34 30 |.724,224.....740| 00000890 2c 32 32 34 0d 03 c0 0c df 37 34 30 2c 31 38 30 |,224.....740,180| 000008a0 0d 03 ca 0c df 37 34 30 2c 31 37 32 0d 03 d4 0c |.....740,172....| 000008b0 df 37 32 34 2c 31 37 32 0d 03 de 0c df 37 32 34 |.724,172.....724| 000008c0 2c 31 39 32 0d 03 e8 0c df 37 30 30 2c 31 39 32 |,192.....700,192| 000008d0 0d 03 f2 05 e1 0d 03 fc 0c 20 dd 20 f2 62 75 7a |......... . .buz| 000008e0 7a 0d 04 06 26 20 ef 32 33 2c 32 32 34 2c 31 31 |z...& .23,224,11| 000008f0 39 2c 38 35 2c 38 35 2c 38 35 2c 38 35 2c 32 31 |9,85,85,85,85,21| 00000900 33 2c 32 31 2c 32 39 0d 04 10 26 20 ef 32 33 2c |3,21,29...& .23,| 00000910 32 32 35 2c 31 31 39 2c 38 35 2c 38 35 2c 38 35 |225,119,85,85,85| 00000920 2c 38 34 2c 38 34 2c 38 34 2c 32 32 30 0d 04 1a |,84,84,84,220...| 00000930 1e 20 ef 32 33 2c 32 32 36 2c 30 2c 30 2c 30 2c |. .23,226,0,0,0,| 00000940 30 2c 32 35 35 2c 30 2c 30 2c 30 0d 04 24 15 5a |0,255,0,0,0..$.Z| 00000950 24 3d bd 32 32 36 2b bd 32 32 34 2b bd 32 32 35 |$=.226+.224+.225| 00000960 0d 04 2e 06 20 e1 0d 04 38 09 dd 20 f2 69 6e 0d |.... ...8.. .in.| 00000970 04 42 33 59 3d 32 35 3a e3 20 58 3d 30 20 b8 20 |.B3Y=25:. X=0 . | 00000980 31 33 3a f1 8a 58 2c 59 29 3b 5a 24 3a f2 64 3a |13:..X,Y);Z$:.d:| 00000990 ed 3a f1 8a 58 2c 59 29 3b bd 32 32 36 3b bd 32 |.:..X,Y);.226;.2| 000009a0 32 36 0d 04 4c 47 d4 30 2c 2d 31 35 2c 36 2c 32 |26..LG.0,-15,6,2| 000009b0 3a d4 30 2c 2d 31 35 2c 37 2c 32 3a e3 20 52 3d |:.0,-15,7,2:. R=| 000009c0 35 20 b8 20 37 3a ef 31 39 2c 30 2c 52 2c 30 2c |5 . 7:.19,0,R,0,| 000009d0 30 2c 30 3a f2 64 3a f2 64 3a ed 3a ef 31 39 2c |0,0:.d:.d:.:.19,| 000009e0 30 2c 30 2c 30 2c 30 2c 30 0d 04 56 05 e1 0d 04 |0,0,0,0,0..V....| 000009f0 60 0a dd 20 f2 6f 75 74 0d 04 6a 34 59 3d 32 35 |`.. .out..j4Y=25| 00000a00 3a e3 20 58 3d 32 34 20 b8 20 33 37 3a f1 8a 58 |:. X=24 . 37:..X| 00000a10 2c 59 29 3b 5a 24 3a f2 64 3a ed 3a f1 8a 58 2c |,Y);Z$:.d:.:..X,| 00000a20 59 29 3b bd 32 32 36 3b bd 32 32 36 0d 04 74 05 |Y);.226;.226..t.| 00000a30 e1 0d 04 7e 17 dd 20 f2 64 3a e3 20 44 3d 31 20 |...~.. .d:. D=1 | 00000a40 b8 20 35 30 3a ed 3a e1 0d 04 88 16 20 dd 20 f2 |. 50:.:..... . .| 00000a50 64 6f 75 62 6c 65 28 41 24 2c 4b 2c 4c 29 0d 04 |double(A$,K,L)..| 00000a60 92 07 ea 20 4e 0d 04 9c 0a 41 25 3d 31 33 35 0d |... N....A%=135.| 00000a70 04 a6 14 41 25 3d 26 41 3a 58 25 3d 30 3a 59 25 |...A%=&A:X%=0:Y%| 00000a80 3d 26 41 0d 04 b0 0a 44 3d 26 41 30 30 0d 04 ba |=&A....D=&A00...| 00000a90 11 e3 20 4e 3d 31 20 b8 20 a9 28 41 24 29 0d 04 |.. N=1 . .(A$)..| 00000aa0 c4 0f 42 24 3d c1 41 24 2c 4e 2c 31 29 0d 04 ce |..B$=.A$,N,1)...| 00000ab0 0c 3f 44 3d 97 28 42 24 29 0d 04 d8 0d d6 20 28 |.?D=.(B$)..... (| 00000ac0 26 46 46 46 31 29 0d 04 e2 2b ef 32 33 2c 32 34 |&FFF1)...+.23,24| 00000ad0 30 2c 44 3f 31 2c 44 3f 31 2c 44 3f 32 2c 44 3f |0,D?1,D?1,D?2,D?| 00000ae0 32 2c 44 3f 33 2c 44 3f 33 2c 44 3f 34 2c 44 3f |2,D?3,D?3,D?4,D?| 00000af0 34 0d 04 ec 2b ef 32 33 2c 32 34 31 2c 44 3f 35 |4...+.23,241,D?5| 00000b00 2c 44 3f 35 2c 44 3f 36 2c 44 3f 36 2c 44 3f 37 |,D?5,D?6,D?6,D?7| 00000b10 2c 44 3f 37 2c 44 3f 38 2c 44 3f 38 0d 04 f6 20 |,D?7,D?8,D?8... | 00000b20 f1 8a 4b 2b 4e 2c 4c 29 3b bd 32 34 30 3b 8a 4b |..K+N,L);.240;.K| 00000b30 2b 4e 2c 4c 2b 31 29 3b bd 32 34 31 0d 05 00 07 |+N,L+1);.241....| 00000b40 ed 20 4e 0d 05 0a 05 e1 0d 05 14 0b dd 20 f2 74 |. N.......... .t| 00000b50 65 78 74 0d 05 1e 4c f1 22 54 68 69 73 20 70 72 |ext...L."This pr| 00000b60 6f 67 72 61 6d 20 77 69 6c 6c 20 72 65 61 64 20 |ogram will read | 00000b70 74 68 65 20 63 6f 6e 64 75 63 74 69 76 69 74 79 |the conductivity| 00000b80 20 6f 66 20 61 6e 79 20 6f 62 6a 65 63 74 20 61 | of any object a| 00000b90 6e 64 20 74 68 65 6e 20 70 6c 6f 74 20 61 22 0d |nd then plot a".| 00000ba0 05 28 4d f1 22 67 72 61 70 68 20 73 68 6f 77 69 |.(M."graph showi| 00000bb0 6e 67 20 74 68 69 73 20 70 72 6f 70 65 72 74 79 |ng this property| 00000bc0 20 61 73 20 61 20 70 65 72 63 65 6e 74 61 67 65 | as a percentage| 00000bd0 2e 20 57 68 61 74 20 75 73 65 20 69 73 20 74 68 |. What use is th| 00000be0 69 73 2c 20 79 6f 75 20 6d 61 79 22 0d 05 32 51 |is, you may"..2Q| 00000bf0 f1 22 61 73 6b 2e 20 54 6f 20 62 65 20 68 6f 6e |."ask. To be hon| 00000c00 65 73 74 2c 20 49 27 76 65 20 6e 6f 20 69 64 65 |est, I've no ide| 00000c10 61 2c 20 61 6c 74 68 6f 75 67 68 20 69 74 20 63 |a, although it c| 00000c20 61 6e 20 62 65 20 66 75 6e 20 74 6f 20 68 6f 6c |an be fun to hol| 00000c30 64 20 61 20 70 72 6f 62 65 20 69 6e 22 0d 05 3c |d a probe in"..<| 00000c40 4e f1 22 65 61 63 68 20 68 61 6e 64 20 61 6e 64 |N."each hand and| 00000c50 20 63 6f 6d 70 61 72 65 20 6e 6f 74 65 73 20 77 | compare notes w| 00000c60 69 74 68 20 79 6f 75 72 20 66 61 6d 69 6c 79 2c |ith your family,| 00000c70 20 65 74 63 2e 20 49 27 6d 20 73 75 72 65 20 69 | etc. I'm sure i| 00000c80 74 20 63 6f 75 6c 64 20 62 65 22 0d 05 46 45 f1 |t could be"..FE.| 00000c90 22 70 75 74 20 74 6f 20 6d 6f 72 65 20 73 65 72 |"put to more ser| 00000ca0 69 6f 75 73 20 75 73 65 2c 20 62 75 74 20 66 6f |ious use, but fo| 00000cb0 72 20 6e 6f 77 20 6c 65 74 27 73 20 72 65 67 61 |r now let's rega| 00000cc0 72 64 20 69 74 20 61 73 20 61 20 74 6f 79 21 22 |rd it as a toy!"| 00000cd0 0d 05 50 05 f1 0d 05 5a 51 f1 22 41 6c 6c 20 74 |..P....ZQ."All t| 00000ce0 68 61 74 20 69 73 20 6e 65 65 64 65 64 20 69 73 |hat is needed is| 00000cf0 20 61 6e 20 45 6c 65 63 74 72 6f 6e 2c 20 50 4c | an Electron, PL| 00000d00 55 53 2d 31 2c 20 41 50 31 2c 20 52 4f 4d 42 4f |US-1, AP1, ROMBO| 00000d10 58 20 6f 72 20 52 4f 4d 42 4f 58 2b 20 74 6f 20 |X or ROMBOX+ to | 00000d20 62 65 67 69 6e 22 0d 05 64 51 f1 22 77 69 74 68 |begin"..dQ."with| 00000d30 2e 20 54 68 65 6e 20 79 6f 75 20 6e 65 65 64 20 |. Then you need | 00000d40 61 20 63 6f 75 70 6c 65 20 6f 66 20 27 70 72 6f |a couple of 'pro| 00000d50 62 65 73 27 2c 20 74 77 6f 20 6f 6c 64 20 66 6f |bes', two old fo| 00000d60 72 6b 73 20 77 6f 75 6c 64 20 64 6f 20 28 6e 6f |rks would do (no| 00000d70 20 57 69 6c 6c 2c 22 0d 05 6e 45 f1 22 4e 4f 54 | Will,"..nE."NOT| 00000d80 20 74 68 65 20 70 6c 61 73 74 69 63 20 27 70 69 | the plastic 'pi| 00000d90 63 6e 69 63 27 20 76 61 72 69 65 74 79 2e 2e 2e |cnic' variety...| 00000da0 2e 29 21 20 6f 6e 20 73 75 69 74 61 62 6c 79 20 |.)! on suitably | 00000db0 6c 6f 6e 67 20 6c 65 61 64 73 2e 22 0d 05 78 05 |long leads."..x.| 00000dc0 f1 0d 05 82 50 f1 22 59 6f 75 20 77 69 6c 6c 20 |....P."You will | 00000dd0 6e 65 65 64 20 61 20 31 35 2d 70 69 6e 20 44 2d |need a 15-pin D-| 00000de0 74 79 70 65 20 70 6c 75 67 20 74 6f 20 66 69 74 |type plug to fit| 00000df0 20 74 68 65 20 41 2f 44 20 28 6a 6f 79 73 74 69 | the A/D (joysti| 00000e00 63 6b 29 20 70 6f 72 74 2e 20 53 6f 6c 64 65 72 |ck) port. Solder| 00000e10 22 0d 05 8c 4b f1 22 6f 6e 65 20 6f 66 20 74 68 |"...K."one of th| 00000e20 65 20 6c 65 61 64 73 20 74 6f 20 70 69 6e 2d 31 |e leads to pin-1| 00000e30 35 20 28 41 6e 61 6c 6f 67 75 65 20 63 68 61 6e |5 (Analogue chan| 00000e40 6e 65 6c 20 30 29 20 61 6e 64 20 6f 6e 65 20 74 |nel 0) and one t| 00000e50 6f 20 70 69 6e 2d 31 31 20 6f 72 22 0d 05 96 51 |o pin-11 or"...Q| 00000e60 f1 22 70 69 6e 2d 31 34 20 28 41 6e 61 6c 6f 67 |."pin-14 (Analog| 00000e70 75 65 20 56 6f 6c 74 61 67 65 20 72 65 66 65 72 |ue Voltage refer| 00000e80 65 6e 63 65 2c 20 56 72 65 66 20 31 2e 38 76 29 |ence, Vref 1.8v)| 00000e90 20 64 65 70 65 6e 64 69 6e 67 20 6f 6e 20 77 68 | depending on wh| 00000ea0 69 63 68 20 79 6f 75 20 66 69 6e 64 22 0d 05 a0 |ich you find"...| 00000eb0 51 f1 22 65 61 73 69 65 72 20 2d 20 63 6f 6e 73 |Q."easier - cons| 00000ec0 75 6c 74 20 74 68 65 20 50 6c 75 73 31 20 20 55 |ult the Plus1 U| 00000ed0 73 65 72 20 47 75 69 64 65 20 69 66 20 69 6e 20 |ser Guide if in | 00000ee0 64 6f 75 62 74 2e 20 4e 6f 77 20 73 69 6d 70 6c |doubt. Now simpl| 00000ef0 79 20 63 6f 6e 6e 65 63 74 20 74 68 65 22 0d 05 |y connect the"..| 00000f00 aa 51 f1 22 44 2d 74 79 70 65 20 70 6c 75 67 20 |.Q."D-type plug | 00000f10 74 6f 20 74 68 65 20 50 4c 55 53 2d 31 20 61 6e |to the PLUS-1 an| 00000f20 64 20 79 6f 75 27 72 65 20 72 65 61 64 79 20 74 |d you're ready t| 00000f30 6f 20 67 6f 21 20 4e 6f 74 68 69 6e 67 20 63 6f |o go! Nothing co| 00000f40 75 6c 64 20 62 65 20 65 61 73 69 65 72 21 22 0d |uld be easier!".| 00000f50 05 b4 05 f1 0d 05 be 4c f1 22 54 68 65 20 6e 65 |.......L."The ne| 00000f60 78 74 20 74 68 69 6e 67 20 74 6f 20 64 6f 20 69 |xt thing to do i| 00000f70 73 20 74 6f 20 63 6f 6e 6e 65 63 74 20 74 68 65 |s to connect the| 00000f80 20 70 72 6f 62 65 73 20 74 6f 20 77 68 61 74 65 | probes to whate| 00000f90 76 65 72 20 79 6f 75 20 77 61 6e 74 20 74 6f 22 |ver you want to"| 00000fa0 0d 05 c8 51 f1 22 6d 65 61 73 75 72 65 2e 20 41 |...Q."measure. A| 00000fb0 20 67 6f 6f 64 20 74 65 73 74 20 69 74 65 6d 20 | good test item | 00000fc0 74 6f 20 73 74 61 72 74 20 77 69 74 68 20 77 6f |to start with wo| 00000fd0 75 6c 64 20 62 65 20 79 6f 75 72 73 65 6c 66 2e |uld be yourself.| 00000fe0 20 48 6f 6c 64 20 61 20 70 72 6f 62 65 20 69 6e | Hold a probe in| 00000ff0 22 0d 05 d2 4e f1 22 65 61 63 68 20 68 61 6e 64 |"...N."each hand| 00001000 2e 20 20 49 66 20 79 6f 75 20 63 61 6e 20 74 79 |. If you can ty| 00001010 70 65 20 77 69 74 68 20 62 6f 74 68 20 68 61 6e |pe with both han| 00001020 64 73 20 66 75 6c 6c 20 79 6f 75 27 72 65 20 4f |ds full you're O| 00001030 4b 2e 20 49 66 20 6e 6f 74 2c 20 70 75 74 22 0d |K. If not, put".| 00001040 05 dc 51 f1 22 74 68 65 6d 20 64 6f 77 6e 20 61 |..Q."them down a| 00001050 6e 64 20 67 72 61 62 20 74 68 65 6d 20 61 67 61 |nd grab them aga| 00001060 69 6e 20 6f 6e 20 74 68 65 20 74 69 74 6c 65 20 |in on the title | 00001070 73 63 72 65 65 6e 20 61 6e 64 20 72 75 6e 20 74 |screen and run t| 00001080 68 65 20 70 72 6f 67 72 61 6d 2e 20 59 6f 75 22 |he program. You"| 00001090 0d 05 e6 4c f1 22 77 69 6c 6c 20 73 65 65 20 74 |...L."will see t| 000010a0 68 65 20 61 66 6f 72 65 6d 65 6e 74 69 6f 6e 65 |he aforementione| 000010b0 64 20 74 69 74 6c 65 20 73 63 72 65 65 6e 2e 20 |d title screen. | 000010c0 41 66 74 65 72 20 31 30 20 73 65 63 6f 6e 64 73 |After 10 seconds| 000010d0 20 65 76 65 72 79 74 68 69 6e 67 22 0d 05 f0 4b | everything"...K| 000010e0 f1 22 73 74 61 72 74 73 20 74 6f 20 68 61 70 70 |."starts to happ| 000010f0 65 6e 2e 20 4a 75 73 74 20 6c 65 61 76 65 20 74 |en. Just leave t| 00001100 68 65 20 70 72 6f 62 65 73 20 69 6e 20 70 6c 61 |he probes in pla| 00001110 63 65 20 61 6e 64 20 61 20 67 72 61 70 68 20 77 |ce and a graph w| 00001120 69 6c 6c 20 62 65 22 0d 05 fa 51 f1 22 70 6c 6f |ill be"...Q."plo| 00001130 74 74 65 64 20 6f 66 20 79 6f 75 72 20 63 6f 6e |tted of your con| 00001140 64 75 63 74 69 76 69 74 79 2e 20 57 68 65 6e 20 |ductivity. When | 00001150 74 68 65 20 67 72 61 70 68 20 69 73 20 66 69 6e |the graph is fin| 00001160 69 73 68 65 64 2c 20 74 68 65 20 70 72 6f 67 72 |ished, the progr| 00001170 61 6d 20 77 69 6c 6c 22 0d 06 04 51 f1 22 63 61 |am will"...Q."ca| 00001180 6c 63 75 6c 61 74 65 20 79 6f 75 72 20 61 76 65 |lculate your ave| 00001190 72 61 67 65 20 63 6f 6e 64 75 63 74 69 76 69 74 |rage conductivit| 000011a0 79 20 61 73 20 61 20 70 65 72 63 65 6e 74 61 67 |y as a percentag| 000011b0 65 2e 20 4a 75 73 74 20 74 79 70 65 20 27 59 27 |e. Just type 'Y'| 000011c0 20 74 6f 20 65 78 69 74 22 0d 06 0e 33 f1 22 74 | to exit"...3."t| 000011d0 68 65 20 70 72 6f 67 72 61 6d 20 6f 72 20 61 6e |he program or an| 000011e0 79 20 6f 74 68 65 72 20 6b 65 79 20 74 6f 20 62 |y other key to b| 000011f0 65 67 69 6e 20 61 67 61 69 6e 2e 22 0d 06 18 05 |egin again."....| 00001200 f1 0d 06 22 51 f1 22 54 68 69 73 20 69 73 20 71 |..."Q."This is q| 00001210 75 69 74 65 20 61 20 6c 6f 74 20 6f 66 20 66 75 |uite a lot of fu| 00001220 6e 20 77 68 65 6e 20 66 69 6e 64 69 6e 67 20 6f |n when finding o| 00001230 75 74 20 6a 75 73 74 20 68 6f 77 20 6d 75 63 68 |ut just how much| 00001240 20 6f 66 20 67 72 61 6e 6e 79 20 72 65 61 6c 6c | of granny reall| 00001250 79 22 0d 06 2c 4e f1 22 69 73 20 73 6f 6c 69 64 |y"..,N."is solid| 00001260 20 73 74 65 65 6c 2c 20 62 75 74 20 49 20 61 6d | steel, but I am| 00001270 20 63 6f 6e 76 69 6e 63 65 64 20 74 68 61 74 20 | convinced that | 00001280 69 74 20 63 61 6e 20 62 65 20 75 73 65 64 20 69 |it can be used i| 00001290 6e 20 61 20 6d 6f 72 65 20 75 73 65 66 75 6c 22 |n a more useful"| 000012a0 0d 06 36 4f f1 22 77 61 79 2e 20 49 66 20 79 6f |..6O."way. If yo| 000012b0 75 20 68 61 76 65 20 61 6e 79 20 73 75 67 67 65 |u have any sugge| 000012c0 73 74 69 6f 6e 73 2c 20 49 20 77 6f 75 6c 64 20 |stions, I would | 000012d0 62 65 20 70 6c 65 61 73 65 64 20 74 6f 20 68 65 |be pleased to he| 000012e0 61 72 20 74 68 65 6d 2e 20 48 61 70 70 79 22 0d |ar them. Happy".| 000012f0 06 40 11 f1 22 6d 65 61 73 75 72 69 6e 67 21 22 |.@.."measuring!"| 00001300 0d 06 4a 05 e1 0d ff |..J....| 00001307