METER READING.C3
FILE INFORMATION
FILENAME(S): METER READING.C3
FILE TYPE(S): PRG
FILE SIZE: 12.2K
FIRST SEEN: 2025-11-02 16:26:32
APPEARS ON: 1 disk(s)
FILE HASH
99ddd13c4ad68e8fd9ae52180eeb3739a67e082d6dd5c97c2b228c4932ad82db
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SCHU LERN 9 | METER READING.C3 | PRG | Treasure Chest - Murdock | 15 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 89 39 31 30 00 2A 08 02 00 8F |.......910.*....|
00000010: 20 2A 2A 20 4D 4C 20 53 54 4F 50 20 4B 45 59 20 | ** ML STOP KEY |
00000020: 44 49 53 41 42 4C 45 20 2A 2A 00 55 08 03 00 99 |DISABLE **.U....|
00000030: 22 78 A9 3D 8D 14 03 A9 08 8D 15 03 58 60 20 EA |"x.=........X` .|
00000040: FF A9 FF 85 91 4C 34 EA 78 A9 31 8D 14 03 A9 EA |.....L4.x.1.....|
00000050: 8D 15 03 58 60 00 74 08 04 00 99 22 78 68 68 68 |...X`.t...."xhhh|
00000060: AA 68 A8 68 68 68 68 68 68 68 98 48 8A 48 58 60 |.h.hhhhhhh.H.HX`|
00000070: 31 31 31 22 00 85 08 05 00 99 22 68 68 68 68 68 |111"......"hhhhh|
00000080: 68 68 60 31 22 00 A7 08 06 00 8F 20 2A 2A 20 34 |hh`1"...... ** 4|
00000090: 20 2D 20 50 4F 50 20 4D 4C 20 53 55 42 52 4F 55 | - POP ML SUBROU|
000000A0: 54 49 4E 45 20 2A 2A 00 C9 08 0A 00 8F 2D 2D 2D |TINE **......---|
000000B0: 47 45 4E 45 52 41 4C 20 49 4E 50 55 54 20 52 4F |GENERAL INPUT RO|
000000C0: 55 54 49 4E 45 2D 2D 2D 2D 00 CF 08 0F 00 3A 00 |UTINE----.....:.|
000000D0: F3 08 14 00 8F 20 2A 2A 20 54 4F 20 4F 55 52 20 |..... ** TO OUR |
000000E0: 42 45 53 54 20 4B 4E 4F 57 4C 45 44 47 45 20 54 |BEST KNOWLEDGE T|
000000F0: 48 49 53 00 10 09 15 00 8F 20 20 20 20 50 52 4F |HIS...... PRO|
00000100: 47 52 41 4D 20 49 53 20 46 52 45 45 20 46 4F 52 |GRAM IS FREE FOR|
00000110: 00 30 09 16 00 8F 20 20 20 20 44 55 50 4C 49 43 |.0.... DUPLIC|
00000120: 41 54 49 4F 4E 20 49 4E 20 43 41 4E 41 44 41 2E |ATION IN CANADA.|
00000130: 00 4E 09 17 00 8F 20 20 20 20 49 46 20 59 4F 55 |.N.... IF YOU|
00000140: 20 48 41 56 45 20 43 4F 4E 54 52 41 52 59 00 6B | HAVE CONTRARY.k|
00000150: 09 18 00 8F 20 20 20 20 49 4E 46 4F 52 4D 41 54 |.... INFORMAT|
00000160: 49 4F 4E 2C 20 50 4C 45 41 53 45 00 91 09 19 00 |ION, PLEASE.....|
00000170: 8F 20 20 20 20 43 4F 4E 54 41 43 54 20 43 4F 4D |. CONTACT COM|
00000180: 4D 4F 44 4F 52 45 20 43 41 4E 41 44 41 20 41 4E |MODORE CANADA AN|
00000190: 44 00 B7 09 1A 00 8F 20 20 20 20 45 56 45 52 59 |D...... EVERY|
000001A0: 20 45 46 46 4F 52 54 20 57 49 4C 4C 20 42 45 20 | EFFORT WILL BE |
000001B0: 4D 41 44 45 20 54 4F 00 D8 09 1B 00 8F 20 20 20 |MADE TO...... |
000001C0: 20 57 49 54 48 44 52 41 57 20 43 4F 50 49 45 53 | WITHDRAW COPIES|
000001D0: 20 4F 46 20 54 48 49 53 00 EA 09 1C 00 8F 20 20 | OF THIS...... |
000001E0: 20 20 50 52 4F 47 52 41 4D 2E 00 F0 09 1E 00 3A | PROGRAM......:|
000001F0: 00 0D 0A 23 00 8F 2D 2D 2D 2D 2D 49 4E 50 55 54 |...#..-----INPUT|
00000200: 20 53 45 43 54 49 4F 4E 2D 2D 2D 2D 2D 00 22 0A | SECTION-----.".|
00000210: 28 00 3A 20 20 55 52 24 B2 22 22 3A 55 49 24 B2 |(.: UR$."":UI$.|
00000220: 22 22 00 36 0A 2A 00 3A 20 20 8B 20 55 4C B2 30 |"".6.*.: . UL.0|
00000230: A7 55 4C B2 38 30 00 49 0A 2D 00 99 22 20 20 9D |.UL.80.I.-.." .|
00000240: 9D 22 3B 3A 97 55 43 2C 30 00 60 0A 32 00 3A 20 |.";:.UC,0.`.2.: |
00000250: 20 A1 55 49 24 3A 8B 55 49 24 B2 22 22 A7 35 30 | .UI$:.UI$."".50|
00000260: 00 8D 0A 37 00 3A 20 20 8B 55 49 24 B2 C7 28 31 |...7.: .UI$..(1|
00000270: 33 29 AF C3 28 55 52 24 29 B1 B2 31 A7 97 55 43 |3)..(UR$)..1..UC|
00000280: 2C 31 3A 99 22 20 9D 22 3B 3A 89 38 35 00 A3 0A |,1:." .";:.85...|
00000290: 3C 00 3A 20 20 8B 55 49 24 B2 C7 28 32 30 29 A7 |<.: .UI$..(20).|
000002A0: 31 30 35 00 BB 0A 3E 00 3A 20 20 8B 20 C3 28 55 |105...>.: . .(U|
000002B0: 52 24 29 B2 B1 55 4C 20 A7 35 30 00 E3 0A 41 00 |R$)..UL .50...A.|
000002C0: 3A 20 20 8D 31 32 30 3A 8F 20 43 48 45 43 4B 20 |: .120:. CHECK |
000002D0: 46 4F 52 20 56 41 4C 49 44 20 43 48 41 52 41 43 |FOR VALID CHARAC|
000002E0: 54 45 52 00 F6 0A 46 00 3A 20 20 55 52 24 B2 55 |TER...F.: UR$.U|
000002F0: 52 24 AA 55 49 24 00 03 0B 4B 00 3A 20 20 99 55 |R$.UI$...K.: .U|
00000300: 49 24 3B 00 0E 0B 50 00 3A 20 20 89 35 30 00 34 |I$;...P.: .50.4|
00000310: 0B 55 00 8F 2D 2D 2D 2D 2D 43 48 45 43 4B 20 46 |.U..-----CHECK F|
00000320: 4F 52 20 48 45 4C 50 20 52 45 51 55 45 53 54 2D |OR HELP REQUEST-|
00000330: 2D 2D 2D 2D 00 5F 0B 5A 00 3A 20 20 8B 55 52 24 |----._.Z.: .UR$|
00000340: B2 55 58 24 A7 31 39 35 3A 8F 20 45 58 49 54 20 |.UX$.195:. EXIT |
00000350: 54 4F 20 48 45 4C 50 20 52 4F 55 54 49 4E 45 00 |TO HELP ROUTINE.|
00000360: 71 0B 5F 00 3A 20 20 8B 55 46 B2 31 A7 8D 32 34 |q._.: .UF.1..24|
00000370: 30 00 80 0B 64 00 3A 20 55 46 B2 30 3A 99 3A 8E |0...d.: UF.0:.:.|
00000380: 00 9C 0B 66 00 8F 2D 2D 2D 2D 2D 43 48 45 43 4B |...f..-----CHECK|
00000390: 20 44 45 4C 45 54 45 2D 2D 2D 2D 2D 00 AF 0B 69 | DELETE-----...i|
000003A0: 00 3A 20 8B C3 28 55 52 24 29 B3 31 A7 35 30 00 |.: ..(UR$).1.50.|
000003B0: C9 0B 6E 00 3A 20 55 52 24 B2 C8 28 55 52 24 2C |..n.: UR$..(UR$,|
000003C0: C3 28 55 52 24 29 AB 31 29 00 DD 0B 73 00 3A 20 |.(UR$).1)...s.: |
000003D0: 99 22 9D 20 20 9D 9D 22 3B 3A 89 35 30 00 07 0C |.". ..";:.50...|
000003E0: 78 00 8F 2D 2D 2D 2D 2D 43 48 45 43 4B 20 46 4F |x..-----CHECK FO|
000003F0: 52 20 56 41 4C 49 44 20 43 48 41 52 41 43 54 45 |R VALID CHARACTE|
00000400: 52 53 2D 2D 2D 2D 2D 00 1C 0C 7D 00 3A 20 20 8B |RS-----...}.: .|
00000410: C3 28 55 53 24 29 B2 30 A7 31 35 30 00 2C 0C 7F |.(US$).0.150.,..|
00000420: 00 55 53 24 B2 55 53 24 AA 55 58 24 00 40 0C 82 |.US$.US$.UX$.@..|
00000430: 00 3A 20 20 81 55 53 B2 31 A4 C3 28 55 53 24 29 |.: .US.1..(US$)|
00000440: 00 5C 0C 87 00 3A 20 20 20 20 8B 55 49 24 B2 CA |.\...: .UI$..|
00000450: 28 55 53 24 2C 55 53 2C 31 29 A7 8E 00 65 0C 8C |(US$,US,1)...e..|
00000460: 00 3A 20 20 82 00 75 0C 91 00 3A 20 20 55 49 24 |.: ..u...: UI$|
00000470: B2 22 22 3A 8E 00 93 0C 96 00 8F 2D 2D 2D 2D 2D |."":.......-----|
00000480: 53 54 41 4E 44 41 52 44 20 49 4E 50 55 54 2D 2D |STANDARD INPUT--|
00000490: 2D 2D 2D 00 A8 0C 98 00 3A 20 20 8B C6 28 55 49 |---.....: ..(UI|
000004A0: 24 29 B2 34 36 A7 20 8E 00 BD 0C 9B 00 3A 20 20 |$).46. ......: |
000004B0: 8B 55 49 24 B2 C7 28 33 32 29 A7 20 8E 00 DF 0C |.UI$..(32). ....|
000004C0: A0 00 3A 20 20 8B C6 28 55 49 24 29 B3 34 38 20 |..: ..(UI$).48 |
000004D0: B0 20 C6 28 55 49 24 29 B1 35 37 A7 31 37 30 00 |. .(UI$).57.170.|
000004E0: E8 0C A5 00 3A 20 20 8E 00 0A 0D AA 00 3A 20 20 |....: ......: |
000004F0: 8B C6 28 55 49 24 29 B3 36 35 20 B0 20 C6 28 55 |..(UI$).65 . .(U|
00000500: 49 24 29 B1 39 30 A7 31 38 30 00 13 0D AF 00 3A |I$).90.180.....:|
00000510: 20 20 8E 00 3C 0D B4 00 3A 20 20 8B C6 28 55 49 | ..<...: ..(UI|
00000520: 24 29 B3 31 39 33 20 B0 20 C6 28 55 49 24 29 B1 |$).193 . .(UI$).|
00000530: 32 31 38 A7 55 49 24 B2 22 22 3A 8E 00 6A 0D B9 |218.UI$."":..j..|
00000540: 00 3A 20 20 8B C2 28 55 54 29 B2 31 32 B0 C2 28 |.: ..(UT).12..(|
00000550: 55 54 29 B2 32 31 A7 55 49 24 B2 C7 28 C6 28 55 |UT).21.UI$..(.(U|
00000560: 49 24 29 AB 31 32 38 29 3A 8E 00 73 0D BB 00 3A |I$).128):..s...:|
00000570: 20 20 8E 00 83 0D BE 00 3A 20 20 55 49 24 B2 22 | ......: UI$."|
00000580: 22 3A 8E 00 AC 0D C3 00 3A 20 20 55 46 B2 31 3A |":......: UF.1:|
00000590: 8F 2D 2D 2D 2D 2D 48 45 4C 50 20 52 4F 55 54 49 |.-----HELP ROUTI|
000005A0: 4E 45 20 45 58 49 54 2D 2D 2D 2D 2D 00 B8 0D C5 |NE EXIT-----....|
000005B0: 00 3A 20 20 8D 32 35 30 00 C4 0D C8 00 3A 20 20 |.: .250.....: |
000005C0: 8D 32 34 35 00 E6 0D CD 00 3A 20 20 81 55 51 B2 |.245.....: .UQ.|
000005D0: 55 42 A4 28 55 32 25 AC 32 35 36 AA 55 31 25 AA |UB.(U2%.256.U1%.|
000005E0: 55 33 25 AB 32 29 00 05 0E D2 00 3A 20 20 55 51 |U3%.2).....: UQ|
000005F0: 25 28 55 51 AB 55 42 29 B2 C2 28 55 51 29 3A 82 |%(UQ.UB)..(UQ):.|
00000600: 3A 99 22 93 22 00 1B 0E D7 00 3A 20 20 55 5A B2 |:.".".....: UZ.|
00000610: 31 3A 55 56 25 B2 C2 28 55 54 29 00 27 0E D8 00 |1:UV%..(UT).'...|
00000620: 3A 20 20 89 33 30 30 00 4C 0E D9 00 55 5A B2 30 |: .300.L...UZ.0|
00000630: 3A 55 53 24 B2 55 4A 24 3A 55 47 24 B2 55 4B 24 |:US$.UJ$:UG$.UK$|
00000640: 3A 55 50 B2 55 4A 3A 55 4C B2 55 4B 00 83 0E DA |:UP.UJ:UL.UK....|
00000650: 00 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 |...(50003).0..53|
00000660: 32 38 31 2C 31 3A 99 22 93 22 3B 3A 97 35 33 32 |281,1:.".";:.532|
00000670: 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 3A 89 |81,6:.53280,14:.|
00000680: 32 32 30 00 8D 0E DB 00 99 22 93 22 3B 00 BC 0E |220......".";...|
00000690: DC 00 55 54 24 B2 55 4C 24 3A 97 55 54 2C 55 56 |..UT$.UL$:.UT,UV|
000006A0: 25 3A 81 55 51 B2 55 42 A4 28 55 32 25 AC 32 35 |%:.UQ.UB.(U2%.25|
000006B0: 36 AA 55 31 25 AA 55 33 25 AB 33 29 00 D4 0E E1 |6.U1%.U3%.3)....|
000006C0: 00 3A 20 20 97 55 51 2C 55 51 25 28 55 51 AB 55 |.: .UQ,UQ%(UQ.U|
000006D0: 42 29 3A 82 00 E3 0E E6 00 3A 20 20 97 55 31 2C |B):......: .U1,|
000006E0: 55 31 25 00 F2 0E E8 00 3A 20 20 97 55 32 2C 55 |U1%.....: .U2,U|
000006F0: 32 25 00 01 0F E9 00 3A 20 20 97 55 34 2C 55 34 |2%.....: .U4,U4|
00000700: 25 00 12 0F EA 00 3A 20 20 97 55 33 2C 55 33 25 |%.....: .U3,U3%|
00000710: AB 31 00 1D 0F EB 00 3A 20 20 89 33 35 00 52 0F |.1.....: .35.R.|
00000720: F0 00 3A 20 20 55 44 25 B2 28 28 55 32 25 AC 32 |..: UD%.((U2%.2|
00000730: 35 36 AA 55 31 25 AA 55 33 25 29 AB 55 42 29 AD |56.U1%.U3%).UB).|
00000740: 34 30 3A 99 C8 28 55 44 24 2C 55 44 25 AA 31 29 |40:..(UD$,UD%.1)|
00000750: 3A 8E 00 90 0F F5 00 3A 20 20 99 C8 28 55 44 24 |:......: ..(UD$|
00000760: 2C 32 34 29 3B 22 20 20 20 20 20 20 20 20 20 20 |,24);" |
00000770: 20 20 20 20 20 20 20 20 20 20 20 20 12 20 48 45 | . HE|
00000780: 4C 50 20 43 4F 4D 49 4E 47 20 92 20 20 22 3A 8E |LP COMING . ":.|
00000790: 00 BF 0F FA 00 3A 20 20 55 31 25 B2 C2 28 55 31 |.....: U1%..(U1|
000007A0: 29 3A 55 32 25 B2 C2 28 55 32 29 3A 55 33 25 B2 |):U2%..(U2):U3%.|
000007B0: C2 28 55 33 29 3A 55 34 25 B2 C2 28 55 34 29 00 |.(U3):U4%..(U4).|
000007C0: D1 0F FB 00 55 4A 24 B2 55 53 24 3A 55 4A B2 55 |....UJ$.US$:UJ.U|
000007D0: 4C 00 F4 0F FC 00 3A 20 20 55 4A 24 B2 55 53 24 |L.....: UJ$.US$|
000007E0: 3A 55 4B 24 B2 55 47 24 3A 55 4A B2 55 50 3A 55 |:UK$.UG$:UJ.UP:U|
000007F0: 4B B2 55 4C 00 FD 0F FF 00 3A 20 20 8E 00 11 10 |K.UL.....: ....|
00000800: 2C 01 8F 2D 2D 2D 2D 2D 4D 45 4E 55 2D 2D 2D 2D |,..-----MENU----|
00000810: 2D 00 17 10 2D 01 3A 00 49 10 2E 01 3A 20 20 99 |-...-.:.I...: .|
00000820: 22 93 22 3A 97 55 54 2C 55 55 25 3A 8B C2 28 35 |".":.UT,UU%:..(5|
00000830: 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 39 |0003).0..53281,9|
00000840: 3A 97 35 33 32 38 30 2C 38 00 4F 10 2F 01 3A 00 |:.53280,8.O./.:.|
00000850: 6F 10 31 01 3A 20 20 99 22 93 20 20 20 20 20 20 |o.1.: .". |
00000860: 20 20 20 20 20 20 20 20 20 20 4D 45 4E 55 22 00 | MENU".|
00000870: A1 10 36 01 3A 20 20 99 22 20 2D 2D 2D 2D 2D 2D |..6.: ." ------|
00000880: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000890: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000008A0: 22 00 C6 10 3B 01 3A 20 20 99 22 11 11 20 20 20 |"...;.: .".. |
000008B0: 20 20 20 20 31 2E 20 20 20 4D 45 54 45 52 20 52 | 1. METER R|
000008C0: 45 41 44 49 4E 47 00 F3 10 40 01 3A 20 20 99 22 |EADING...@.: ."|
000008D0: 11 11 20 20 20 20 20 20 20 32 2E 20 20 20 53 54 |.. 2. ST|
000008E0: 55 44 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F |UDENT INSTRUCTIO|
000008F0: 4E 53 22 00 20 11 45 01 3A 20 20 99 22 11 11 20 |NS". .E.: .".. |
00000900: 20 20 20 20 20 20 33 2E 20 20 20 54 45 41 43 48 | 3. TEACH|
00000910: 45 52 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 |ER INSTRUCTIONS"|
00000920: 00 3F 11 4F 01 3A 20 20 99 22 11 11 20 20 20 20 |.?.O.: .".. |
00000930: 20 20 20 34 2E 20 20 20 51 55 49 54 11 11 22 00 | 4. QUIT..".|
00000940: 71 11 54 01 3A 20 20 99 22 20 2D 2D 2D 2D 2D 2D |q.T.: ." ------|
00000950: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000960: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000970: 22 00 9F 11 59 01 3A 20 20 99 22 11 11 20 20 20 |"...Y.: .".. |
00000980: 20 20 20 20 50 52 45 53 53 20 41 20 4E 55 4D 42 | PRESS A NUMB|
00000990: 45 52 20 4B 45 59 20 28 31 2D 34 29 20 22 3B 00 |ER KEY (1-4) ";.|
000009A0: CF 11 5E 01 3A 20 20 55 4C B2 31 3A 55 53 24 B2 |..^.: UL.1:US$.|
000009B0: 22 31 32 33 34 22 3A 8D 33 35 3A 8F 2D 2D 2D 49 |"1234":.35:.---I|
000009C0: 4E 50 55 54 20 52 4F 55 54 49 4E 45 2D 2D 2D 00 |NPUT ROUTINE---.|
000009D0: E1 11 5F 01 8B C3 28 55 52 24 29 B1 31 A7 33 30 |.._...(UR$).1.30|
000009E0: 30 00 EF 11 60 01 3A 20 20 55 53 24 B2 22 22 00 |0...`.: US$."".|
000009F0: 0F 12 63 01 3A 20 20 91 C5 28 55 52 24 29 8D 31 |..c.: ..(UR$).1|
00000A00: 30 30 30 2C 34 30 30 2C 35 30 30 2C 33 39 36 00 |000,400,500,396.|
00000A10: 1B 12 68 01 3A 20 20 89 33 30 30 00 45 12 8B 01 |..h.: .300.E...|
00000A20: 8F 2D 2D 2D 2D 2D 52 45 2D 45 4E 41 42 4C 45 20 |.-----RE-ENABLE |
00000A30: 53 54 4F 50 20 4B 45 59 20 41 4E 44 20 45 4E 44 |STOP KEY AND END|
00000A40: 2D 2D 2D 2D 2D 00 77 12 8C 01 3A 20 20 8B C2 28 |-----.w...: ..(|
00000A50: 35 30 30 30 33 29 B3 B1 31 AF C2 28 35 30 30 30 |50003)..1..(5000|
00000A60: 33 29 B3 B1 31 36 30 AF C2 28 35 30 30 30 33 29 |3)..160..(50003)|
00000A70: B3 B1 30 A7 33 39 39 00 A4 12 8D 01 3A 20 20 9E |..0.399.....: .|
00000A80: 55 55 AA 37 31 3A 8B C2 28 35 30 30 30 33 29 B2 |UU.71:..(50003).|
00000A90: 30 A7 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 |0..53281,6:.5328|
00000AA0: 30 2C 31 34 00 B3 12 8E 01 3A 20 20 99 22 9A 93 |0,14.....: ."..|
00000AB0: 22 3A 80 00 C1 12 8F 01 3A 20 20 8D 38 37 35 3A |":......: .875:|
00000AC0: 8E 00 E5 12 90 01 8F 2D 2D 2D 2D 2D 53 54 55 44 |.......-----STUD|
00000AD0: 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 |ENT INSTRUCTIONS|
00000AE0: 2D 2D 2D 2D 2D 00 17 13 95 01 3A 20 20 99 22 93 |-----.....: .".|
00000AF0: 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 |":.UT,UL%:..(500|
00000B00: 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 30 3A 97 |03).0..53281,0:.|
00000B10: 35 33 32 38 30 2C 30 00 38 13 9A 01 55 50 B2 30 |53280,0.8...UP.0|
00000B20: 3A 55 47 24 B2 22 D3 54 55 44 45 4E 54 20 C9 4E |:UG$.".TUDENT .N|
00000B30: 53 54 22 3A 8D 38 35 30 00 64 13 A3 01 99 22 20 |ST":.850.d...." |
00000B40: 20 20 11 11 1D 1D 1D 1D D0 4C 45 41 53 45 20 46 | .......LEASE F|
00000B50: 4F 4C 4C 4F 57 20 49 4E 53 54 52 55 43 54 49 4F |OLLOW INSTRUCTIO|
00000B60: 4E 53 2E 11 00 91 13 A4 01 99 22 20 20 20 C9 46 |NS........" .F|
00000B70: 20 C9 20 53 41 59 20 54 4F 20 50 52 45 53 53 20 | . SAY TO PRESS |
00000B80: 53 4F 4D 45 20 4C 45 54 54 45 52 2C 20 54 48 45 |SOME LETTER, THE|
00000B90: 4E 00 BE 13 A5 01 99 22 20 20 20 54 48 41 54 20 |N......" THAT |
00000BA0: 49 53 20 41 4C 4C 20 59 4F 55 20 4E 45 45 44 20 |IS ALL YOU NEED |
00000BB0: 54 4F 20 44 4F 2E 20 20 C9 46 20 59 4F 55 00 EA |TO DO. .F YOU..|
00000BC0: 13 A6 01 99 22 20 20 20 41 52 45 20 41 4E 53 57 |...." ARE ANSW|
00000BD0: 45 52 49 4E 47 20 41 20 51 55 45 53 54 49 4F 4E |ERING A QUESTION|
00000BE0: 2C 20 59 4F 55 20 4D 55 53 54 00 13 14 A7 01 99 |, YOU MUST......|
00000BF0: 22 20 20 20 54 59 50 45 20 59 4F 55 52 20 41 4E |" TYPE YOUR AN|
00000C00: 53 57 45 52 20 41 4E 44 20 54 48 45 4E 20 50 52 |SWER AND THEN PR|
00000C10: 45 53 53 00 3D 14 A8 01 99 22 20 20 20 54 48 45 |ESS.=...." THE|
00000C20: 20 4B 45 59 20 4D 41 52 4B 45 44 20 3C 52 45 54 | KEY MARKED <RET|
00000C30: 55 52 4E 3E 2E 20 20 C9 46 20 59 4F 55 00 6A 14 |URN>. .F YOU.j.|
00000C40: A9 01 99 22 20 20 20 44 4F 20 4E 4F 54 20 44 4F |..." DO NOT DO|
00000C50: 20 54 48 49 53 2C 20 C9 20 57 4F 4E 27 54 20 52 | THIS, . WON'T R|
00000C60: 45 43 45 49 56 45 20 54 48 45 00 98 14 AA 01 99 |ECEIVE THE......|
00000C70: 22 20 20 20 41 4E 53 57 45 52 20 41 4E 44 20 C9 |" ANSWER AND .|
00000C80: 20 57 49 4C 4C 20 4A 55 53 54 20 53 49 54 20 41 | WILL JUST SIT A|
00000C90: 4E 44 20 57 41 49 54 2E 00 C3 14 AB 01 99 22 20 |ND WAIT......." |
00000CA0: 20 20 C9 46 20 59 4F 55 20 4D 41 4B 45 20 41 20 | .F YOU MAKE A |
00000CB0: 54 59 50 49 4E 47 20 4D 49 53 54 41 4B 45 2C 20 |TYPING MISTAKE, |
00000CC0: 59 4F 55 00 E9 14 AC 01 99 22 20 20 20 43 41 4E |YOU......" CAN|
00000CD0: 20 45 52 41 53 45 20 49 54 20 42 59 20 50 52 45 | ERASE IT BY PRE|
00000CE0: 53 53 49 4E 47 20 54 48 45 00 12 15 AD 01 99 22 |SSING THE......"|
00000CF0: 20 20 20 3C 49 4E 53 54 20 44 45 4C 3E 20 4B 45 | <INST DEL> KE|
00000D00: 59 2E 20 20 28 4F 4E 43 45 20 46 4F 52 20 45 41 |Y. (ONCE FOR EA|
00000D10: 43 48 00 24 15 AE 01 99 22 20 20 20 4C 45 54 54 |CH.$...." LETT|
00000D20: 45 52 29 22 00 44 15 AF 01 8D 20 38 33 35 3A 55 |ER)".D.... 835:U|
00000D30: 50 B2 55 50 AA 31 3A 8D 20 38 35 30 3A 55 50 B2 |P.UP.1:. 850:UP.|
00000D40: 55 50 AA 31 00 72 15 B0 01 99 22 20 20 20 11 11 |UP.1.r...." ..|
00000D50: 11 D4 48 45 20 50 55 52 50 4F 53 45 20 4F 46 20 |..HE PURPOSE OF |
00000D60: 54 48 49 53 20 50 52 4F 47 52 41 4D 20 49 53 20 |THIS PROGRAM IS |
00000D70: 54 4F 00 A0 15 B1 01 99 22 20 20 20 47 49 56 45 |TO......" GIVE|
00000D80: 20 59 4F 55 20 50 52 41 43 54 49 43 45 20 52 45 | YOU PRACTICE RE|
00000D90: 41 44 49 4E 47 20 45 4C 45 43 54 52 49 43 41 4C |ADING ELECTRICAL|
00000DA0: 00 CE 15 B2 01 99 22 20 20 20 4D 45 54 45 52 53 |......" METERS|
00000DB0: 2E 20 20 CD 4F 53 54 20 45 4C 45 43 54 52 49 43 |. .OST ELECTRIC|
00000DC0: 41 4C 20 4D 45 54 45 52 53 20 48 41 56 45 00 F7 |AL METERS HAVE..|
00000DD0: 15 B3 01 99 22 20 20 20 54 48 52 45 45 20 4F 52 |...." THREE OR|
00000DE0: 20 4D 4F 52 45 20 53 43 41 4C 45 53 20 41 4E 44 | MORE SCALES AND|
00000DF0: 20 32 20 4F 52 20 33 00 23 16 B4 01 99 22 20 20 | 2 OR 3.#...." |
00000E00: 20 52 41 4E 47 45 53 20 46 4F 52 20 45 41 43 48 | RANGES FOR EACH|
00000E10: 20 53 43 41 4C 45 2E 20 20 D4 48 45 20 53 43 41 | SCALE. .HE SCA|
00000E20: 4C 45 53 00 4E 16 B5 01 99 22 20 20 20 55 53 55 |LES.N...." USU|
00000E30: 41 4C 4C 59 20 47 4F 20 46 52 4F 4D 20 30 20 54 |ALLY GO FROM 0 T|
00000E40: 4F 20 31 2C 20 32 2E 35 20 4F 52 20 35 2E 00 7A |O 1, 2.5 OR 5..z|
00000E50: 16 B7 01 99 22 20 20 20 D4 48 45 20 52 41 4E 47 |...." .HE RANG|
00000E60: 45 53 20 4F 46 20 54 48 45 20 52 45 41 44 49 4E |ES OF THE READIN|
00000E70: 47 53 20 57 49 4C 4C 20 42 45 00 A8 16 B8 01 99 |GS WILL BE......|
00000E80: 22 20 20 20 54 48 45 20 4D 41 58 20 53 43 41 4C |" THE MAX SCAL|
00000E90: 45 20 56 41 4C 55 45 20 4F 52 20 54 48 45 20 4D |E VALUE OR THE M|
00000EA0: 41 58 20 56 41 4C 55 45 00 D2 16 B9 01 99 22 20 |AX VALUE......" |
00000EB0: 20 20 4D 55 4C 54 49 50 4C 49 45 44 20 42 59 20 | MULTIPLIED BY |
00000EC0: 31 30 20 4F 52 20 31 30 30 20 4F 52 20 31 30 30 |10 OR 100 OR 100|
00000ED0: 30 2E 00 00 17 BA 01 99 22 20 20 20 D4 48 55 53 |0......." .HUS|
00000EE0: 20 41 20 4D 45 54 45 52 20 57 49 54 48 20 54 48 | A METER WITH TH|
00000EF0: 45 20 33 20 53 43 41 4C 45 53 20 47 49 56 45 4E |E 3 SCALES GIVEN|
00000F00: 00 2B 17 BB 01 99 22 20 20 20 41 42 4F 56 45 20 |.+...." ABOVE |
00000F10: 43 4F 55 4C 44 20 4D 45 41 53 55 52 45 20 56 41 |COULD MEASURE VA|
00000F20: 4C 55 45 53 20 49 4E 20 54 48 45 00 55 17 BC 01 |LUES IN THE.U...|
00000F30: 99 22 20 20 20 52 41 4E 47 45 20 30 20 54 4F 20 |." RANGE 0 TO |
00000F40: 31 20 4F 52 20 55 50 20 54 4F 20 30 20 54 4F 20 |1 OR UP TO 0 TO |
00000F50: 35 30 30 30 2C 00 81 17 BD 01 99 22 20 20 20 44 |5000,......" D|
00000F60: 45 50 45 4E 44 49 4E 47 20 4F 4E 20 54 48 45 20 |EPENDING ON THE |
00000F70: 53 43 41 4C 45 20 4D 55 4C 54 49 50 4C 49 45 52 |SCALE MULTIPLIER|
00000F80: 2E 00 AE 17 BE 01 99 22 20 20 20 C9 20 57 49 4C |......." . WIL|
00000F90: 4C 20 4E 4F 57 20 53 48 4F 57 20 59 4F 55 20 41 |L NOW SHOW YOU A|
00000FA0: 20 54 59 50 49 43 41 4C 20 4D 45 54 45 52 00 CF | TYPICAL METER..|
00000FB0: 17 BF 01 99 22 20 20 20 46 41 43 45 20 57 49 54 |...." FACE WIT|
00000FC0: 48 20 49 54 53 20 33 20 53 43 41 4C 45 53 2E 00 |H ITS 3 SCALES..|
00000FD0: EE 17 C0 01 8D 20 38 33 35 3A 8D 20 38 35 30 3A |..... 835:. 850:|
00000FE0: 55 50 B2 55 50 AA 31 3A 8D 20 32 34 38 30 00 18 |UP.UP.1:. 2480..|
00000FF0: 18 C1 01 99 22 20 20 20 11 CE 4F 54 49 43 45 20 |...." ..OTICE |
00001000: 54 48 45 20 54 48 52 45 45 20 53 43 41 4C 45 53 |THE THREE SCALES|
00001010: 20 45 41 43 48 20 4F 46 00 43 18 C2 01 99 22 20 | EACH OF.C...." |
00001020: 20 20 57 48 49 43 48 20 53 54 41 52 54 53 20 41 | WHICH STARTS A|
00001030: 54 20 5A 45 52 4F 20 4F 4E 20 54 48 45 20 4C 45 |T ZERO ON THE LE|
00001040: 46 54 2E 00 70 18 C3 01 99 22 20 20 20 D3 49 4E |FT..p...." .IN|
00001050: 43 45 20 54 48 45 20 53 43 41 4C 45 53 20 41 52 |CE THE SCALES AR|
00001060: 45 20 44 49 46 46 45 52 45 4E 54 2C 20 54 48 45 |E DIFFERENT, THE|
00001070: 00 9D 18 C4 01 99 22 20 20 20 56 41 4C 55 45 20 |......" VALUE |
00001080: 4F 46 20 54 48 45 20 53 4D 41 4C 4C 45 53 54 20 |OF THE SMALLEST |
00001090: 44 49 56 49 53 49 4F 4E 20 57 49 4C 4C 00 C3 18 |DIVISION WILL...|
000010A0: C5 01 99 22 20 20 20 42 45 20 44 49 46 46 45 52 |..." BE DIFFER|
000010B0: 45 4E 54 20 46 4F 52 20 45 41 43 48 20 53 43 41 |ENT FOR EACH SCA|
000010C0: 4C 45 2E 00 DB 18 C6 01 8D 20 38 33 35 3A 8D 20 |LE....... 835:. |
000010D0: 38 35 30 3A 55 50 B2 55 50 AA 31 00 0B 19 C7 01 |850:UP.UP.1.....|
000010E0: 99 22 20 20 20 11 11 D4 48 45 20 4E 45 58 54 20 |." ...HE NEXT |
000010F0: 54 48 49 4E 47 20 49 53 20 54 4F 20 52 45 41 44 |THING IS TO READ|
00001100: 20 54 48 45 20 4D 45 54 45 52 2E 00 23 19 C9 01 | THE METER..#...|
00001110: 99 22 20 20 20 D4 48 45 20 53 54 45 50 53 20 41 |." .HE STEPS A|
00001120: 52 45 3A 00 51 19 CA 01 99 22 20 20 20 20 20 20 |RE:.Q...." |
00001130: 31 2E 20 C4 45 54 45 52 4D 49 4E 45 20 54 48 45 |1. .ETERMINE THE|
00001140: 20 53 43 41 4C 45 20 42 45 49 4E 47 20 55 53 45 | SCALE BEING USE|
00001150: 44 00 7A 19 CB 01 99 22 20 20 20 20 20 20 32 2E |D.z...." 2.|
00001160: 20 C4 45 54 45 52 4D 49 4E 45 20 54 48 45 20 53 | .ETERMINE THE S|
00001170: 49 5A 45 20 4F 46 20 54 48 45 00 A4 19 CC 01 99 |IZE OF THE......|
00001180: 22 20 20 20 20 20 20 20 20 20 53 4D 41 4C 4C 45 |" SMALLE|
00001190: 53 54 20 44 49 56 49 53 49 4F 4E 20 46 4F 52 20 |ST DIVISION FOR |
000011A0: 54 48 41 54 00 BB 19 CD 01 99 20 22 20 20 20 20 |THAT...... " |
000011B0: 20 20 20 20 20 53 43 41 4C 45 22 00 01 1A CE 01 | SCALE".....|
000011C0: 99 22 20 20 20 20 20 20 33 2E 20 C1 44 44 20 54 |." 3. .DD T|
000011D0: 48 45 20 44 49 56 49 53 49 4F 4E 53 20 54 4F 20 |HE DIVISIONS TO |
000011E0: 47 45 54 20 54 48 45 20 20 20 20 20 20 20 20 20 |GET THE |
000011F0: 20 20 20 4D 45 54 45 52 20 52 45 41 44 49 4E 47 | METER READING|
00001200: 2E 00 2A 1A CF 01 99 22 20 20 20 C9 4E 20 54 48 |..*...." .N TH|
00001210: 45 20 50 52 41 43 54 49 43 45 20 54 48 41 54 20 |E PRACTICE THAT |
00001220: 46 4F 4C 4C 4F 57 53 2C 20 41 00 54 1A D0 01 99 |FOLLOWS, A.T....|
00001230: 22 20 20 20 56 4F 4C 54 4D 45 54 45 52 20 57 49 |" VOLTMETER WI|
00001240: 4C 4C 20 42 45 20 44 52 41 57 4E 2C 20 41 4E 44 |LL BE DRAWN, AND|
00001250: 20 59 4F 55 00 80 1A D1 01 99 22 20 20 20 57 49 | YOU......" WI|
00001260: 4C 4C 20 42 45 20 41 53 4B 45 44 20 54 4F 20 47 |LL BE ASKED TO G|
00001270: 49 56 45 20 54 48 45 20 52 45 41 44 49 4E 47 2E |IVE THE READING.|
00001280: 00 AD 1A D2 01 99 22 20 20 20 C4 4F 20 4E 4F 54 |......" .O NOT|
00001290: 20 47 49 56 45 20 55 4E 49 54 53 20 57 49 54 48 | GIVE UNITS WITH|
000012A0: 20 59 4F 55 52 20 41 4E 53 57 45 52 2C 00 DB 1A | YOUR ANSWER,...|
000012B0: D3 01 99 22 20 20 20 4F 4E 4C 59 20 47 49 56 45 |..." ONLY GIVE|
000012C0: 20 54 48 45 20 4E 55 4D 45 52 49 43 41 4C 20 56 | THE NUMERICAL V|
000012D0: 41 4C 55 45 20 4F 46 20 54 48 45 00 ED 1A D4 01 |ALUE OF THE.....|
000012E0: 99 22 20 20 20 52 45 41 44 49 4E 47 2E 00 17 1B |." READING....|
000012F0: D5 01 99 22 20 20 20 D4 48 45 20 44 52 49 4C 4C |..." .HE DRILL|
00001300: 20 57 49 4C 4C 20 45 4E 44 20 57 49 54 48 20 31 | WILL END WITH 1|
00001310: 30 20 52 49 47 48 54 00 2A 1B D6 01 99 22 20 20 |0 RIGHT.*...." |
00001320: 20 41 4E 53 57 45 52 53 2E 22 00 34 1B DB 01 8D | ANSWERS.".4....|
00001330: 20 38 33 35 00 4B 1B EA 01 3A 20 20 8B 55 5A B2 | 835.K...: .UZ.|
00001340: 31 A7 9E 55 50 25 3A 89 32 31 37 00 54 1B F3 01 |1..UP%:.217.T...|
00001350: 3A 20 20 8E 00 78 1B F4 01 8F 2D 2D 2D 2D 2D 54 |: ..x....-----T|
00001360: 45 41 43 48 45 52 20 49 4E 53 54 52 55 43 54 49 |EACHER INSTRUCTI|
00001370: 4F 4E 53 2D 2D 2D 2D 2D 00 AB 1B F5 01 3A 20 20 |ONS-----.....: |
00001380: 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 |.".":.UT,UL%:..(|
00001390: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
000013A0: 32 3A 97 35 33 32 38 30 2C 31 30 00 D0 1B F6 01 |2:.53280,10.....|
000013B0: 3A 20 20 55 50 B2 30 3A 55 47 24 B2 22 D4 45 41 |: UP.0:UG$.".EA|
000013C0: 43 48 45 52 20 C9 4E 53 54 2E 22 3A 8D 38 35 30 |CHER .NST.":.850|
000013D0: 00 01 1C F7 01 3A 20 20 99 22 11 11 20 20 20 20 |.....: .".. |
000013E0: 20 20 D4 4F 20 54 48 45 20 42 45 53 54 20 4F 46 | .O THE BEST OF|
000013F0: 20 4F 55 52 20 4B 4E 4F 57 4C 45 44 47 45 2C 11 | OUR KNOWLEDGE,.|
00001400: 22 00 2D 1C F8 01 3A 20 20 99 22 20 20 20 54 48 |".-...: ." TH|
00001410: 49 53 20 50 52 4F 47 52 41 4D 20 49 53 20 49 4E |IS PROGRAM IS IN|
00001420: 20 54 48 45 20 50 55 42 4C 49 43 11 22 00 5C 1C | THE PUBLIC.".\.|
00001430: F9 01 3A 20 20 99 22 20 20 20 44 4F 4D 41 49 4E |..: ." DOMAIN|
00001440: 2E 20 20 C9 46 20 54 48 49 53 20 49 53 20 4E 4F |. .F THIS IS NO|
00001450: 54 20 54 48 45 20 43 41 53 45 11 22 00 7C 1C FA |T THE CASE.".|..|
00001460: 01 3A 20 20 99 22 20 20 20 50 4C 45 41 53 45 20 |.: ." PLEASE |
00001470: 43 4F 4E 54 41 43 54 3A 11 11 11 22 00 A9 1C FB |CONTACT:..."....|
00001480: 01 3A 20 20 99 22 20 20 20 20 20 20 C3 4F 4D 4D |.: ." .OMM|
00001490: 4F 44 4F 52 45 20 C2 55 53 49 4E 45 53 53 20 CD |ODORE .USINESS .|
000014A0: 41 43 48 49 4E 45 53 11 22 00 CF 1C FC 01 3A 20 |ACHINES.".....: |
000014B0: 20 99 22 20 20 20 20 20 20 20 20 20 20 33 33 37 | ." 337|
000014C0: 30 20 D0 48 41 52 4D 41 43 59 20 C1 56 45 2E 00 |0 .HARMACY .VE..|
000014D0: F6 1C FD 01 3A 20 20 99 22 20 20 20 20 20 20 20 |....: ." |
000014E0: 20 20 20 C1 47 49 4E 43 4F 55 52 54 2C 20 CF 4E | .GINCOURT, .N|
000014F0: 54 41 52 49 4F 22 00 1B 1D FE 01 3A 20 20 99 22 |TARIO".....: ."|
00001500: 20 20 20 20 20 20 20 20 20 20 C3 41 4E 41 44 41 | .ANADA|
00001510: 20 20 20 CD 31 D7 20 32 CB 34 22 00 3E 1D FF 01 | .1. 2.4".>...|
00001520: 3A 20 20 99 22 20 20 20 20 20 20 20 20 20 20 28 |: ." (|
00001530: 34 31 36 29 20 34 39 39 2D 34 32 39 32 22 00 54 |416) 499-4292".T|
00001540: 1D 00 02 55 50 B2 31 3A 8D 20 38 33 35 3A 8D 20 |...UP.1:. 835:. |
00001550: 38 35 30 3A 00 7E 1D 01 02 99 22 20 20 20 20 20 |850:.~...." |
00001560: 11 11 D0 52 4F 47 52 41 4D 20 CE 41 4D 45 3A 20 |...ROGRAM .AME: |
00001570: CD 45 54 45 52 20 D2 45 41 44 49 4E 47 11 00 A2 |.ETER .EADING...|
00001580: 1D 02 02 99 22 20 20 20 20 20 D7 52 49 54 54 45 |...." .RITTE|
00001590: 4E 20 C2 59 20 20 3A 20 D2 2E D7 2E 20 C4 52 41 |N .Y : .... .RA|
000015A0: 59 11 00 C8 1D 03 02 99 22 20 20 20 20 20 D5 50 |Y......." .P|
000015B0: 47 52 41 44 45 44 20 C2 59 20 3A 20 D0 2E D3 20 |GRADED .Y : ... |
000015C0: D3 43 48 4D 49 44 54 11 00 F3 1D 04 02 99 22 20 |.CHMIDT......." |
000015D0: 20 20 20 20 11 D4 48 49 53 20 50 52 4F 47 52 41 | ..HIS PROGRA|
000015E0: 4D 20 57 49 4C 4C 20 52 55 4E 20 4F 4E 20 41 4E |M WILL RUN ON AN|
000015F0: 59 11 11 00 17 1E 07 02 99 22 20 20 20 20 20 20 |Y........" |
00001600: 20 20 20 D0 C5 D4 20 36 34 20 C3 CF CD D0 D5 D4 | ... 64 ......|
00001610: C5 D2 A0 A0 A0 A0 A0 00 3C 1E 08 02 99 22 20 20 |........<...." |
00001620: 20 20 20 20 20 20 20 C3 CF CD CD CF C4 CF D2 C5 | .........|
00001630: 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 4F 1E 1A | 64 .........O..|
00001640: 02 55 50 B2 33 3A 8D 38 33 35 3A 8D 38 35 30 00 |.UP.3:.835:.850.|
00001650: 7F 1E 1C 02 99 22 11 11 11 20 20 20 20 D4 48 49 |....."... .HI|
00001660: 53 20 50 52 4F 47 52 41 4D 20 49 53 20 54 4F 20 |S PROGRAM IS TO |
00001670: 41 53 53 49 53 54 20 53 54 55 44 45 4E 54 53 00 |ASSIST STUDENTS.|
00001680: AD 1E 21 02 99 22 11 20 20 20 49 4E 20 4D 45 54 |..!..". IN MET|
00001690: 45 52 20 52 45 41 44 49 4E 47 2E 20 20 D4 48 45 |ER READING. .HE|
000016A0: 20 51 55 45 53 54 49 4F 4E 53 20 20 22 00 DB 1E | QUESTIONS "...|
000016B0: 26 02 99 22 11 20 20 20 41 52 45 20 47 49 56 45 |&..". ARE GIVE|
000016C0: 4E 20 41 53 20 41 20 47 52 4F 55 50 20 57 49 54 |N AS A GROUP WIT|
000016D0: 48 20 54 48 45 20 20 20 20 20 22 00 09 1F 2B 02 |H THE "...+.|
000016E0: 99 22 11 20 20 20 43 4F 4D 50 55 54 45 52 20 45 |.". COMPUTER E|
000016F0: 4E 43 4F 55 52 41 47 49 4E 47 20 54 48 45 20 53 |NCOURAGING THE S|
00001700: 54 55 44 45 4E 54 2E 20 22 00 33 1F 30 02 99 22 |TUDENT. ".3.0.."|
00001710: 11 20 20 20 D4 48 45 52 45 20 49 53 20 4E 4F 20 |. .HERE IS NO |
00001720: 46 49 4E 41 4C 20 53 43 4F 52 45 20 47 49 56 45 |FINAL SCORE GIVE|
00001730: 4E 2E 22 00 3C 1F 44 02 8D 38 33 35 00 53 1F 4E |N.".<.D..835.S.N|
00001740: 02 3A 20 20 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 |.: .UZ.1..UP%:.|
00001750: 32 31 37 00 5C 1F 57 02 3A 20 20 8E 00 85 1F 58 |217.\.W.: ....X|
00001760: 02 8F 2D 2D 2D 2D 2D 50 52 4F 47 52 41 4D 20 4D |..-----PROGRAM M|
00001770: 4F 44 49 46 49 43 41 54 49 4F 4E 20 49 4E 53 54 |ODIFICATION INST|
00001780: 2D 2D 2D 2D 2D 00 99 1F 59 02 3A 20 20 99 22 93 |-----...Y.: .".|
00001790: 22 3A 97 55 54 2C 55 4C 25 00 BC 1F 5D 02 3A 20 |":.UT,UL%...].: |
000017A0: 20 55 50 B2 30 3A 55 47 24 B2 22 D0 52 4F 47 52 | UP.0:UG$.".ROGR|
000017B0: 41 4D 20 CD 4F 44 22 3A 8D 38 35 30 00 C8 1F 94 |AM .OD":.850....|
000017C0: 02 3A 20 20 8D 38 33 35 00 DF 1F B2 02 3A 20 20 |.: .835.....: |
000017D0: 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 |.UZ.1..UP%:.217.|
000017E0: E8 1F BB 02 3A 20 20 8E 00 10 20 BC 02 8F 2D 2D |....: ... ...--|
000017F0: 2D 2D 2D 54 4F 20 55 53 45 20 38 30 33 32 20 4C |---TO USE 8032 L|
00001800: 4F 41 44 20 43 42 4D 34 30 33 32 2D 2D 2D 2D 2D |OAD CBM4032-----|
00001810: 00 46 20 C6 02 99 22 93 11 11 11 05 42 45 46 4F |.F ...".....BEFO|
00001820: 52 45 20 52 55 4E 4E 49 4E 47 20 54 48 49 53 20 |RE RUNNING THIS |
00001830: 50 52 4F 47 52 41 4D 20 4F 4E 20 41 4E 20 38 30 |PROGRAM ON AN 80|
00001840: 33 32 20 20 11 11 00 7C 20 D0 02 99 22 20 20 20 |32 ...| ..." |
00001850: 20 20 20 4C 4F 41 44 20 54 48 45 20 27 43 42 4D | LOAD THE 'CBM|
00001860: 20 34 30 33 32 27 20 50 52 4F 47 52 41 4D 11 11 | 4032' PROGRAM..|
00001870: 11 11 11 11 11 11 11 11 11 11 11 22 00 8A 20 DA |...........".. .|
00001880: 02 3A 20 20 9E 55 55 AA 37 31 00 93 20 E4 02 3A |.: .UU.71.. ..:|
00001890: 20 20 80 00 B8 20 1D 03 8F 20 2A 2A 20 54 4F 20 | ... ... ** TO |
000018A0: 55 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 42 |USE 8032 LOAD CB|
000018B0: 4D 34 30 33 32 20 2A 2A 00 03 21 1E 03 99 22 93 |M4032 **..!...".|
000018C0: 11 11 11 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E |...BEFORE RUNNIN|
000018D0: 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 4F |G THIS PROGRAM O|
000018E0: 4E 20 41 4E 20 38 30 33 32 20 20 11 11 4C 4F 41 |N AN 8032 ..LOA|
000018F0: 44 20 43 42 4D 20 34 30 33 32 20 50 52 4F 47 52 |D CBM 4032 PROGR|
00001900: 41 4D 22 00 0F 21 1F 03 9E 31 30 39 33 3A 80 00 |AM"..!...1093:..|
00001910: 2F 21 20 03 8F 20 2A 2A 20 54 20 49 20 54 20 4C |/! .. ** T I T L|
00001920: 20 45 20 20 20 50 20 41 20 47 20 45 20 2A 2A 00 | E P A G E **.|
00001930: 63 21 22 03 99 22 93 11 1D 05 22 3B 3A 97 55 54 |c!".."....";:.UT|
00001940: 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 |,UU%:..(50003).0|
00001950: A7 97 35 33 32 38 30 2C 31 34 3A 97 35 33 32 38 |..53280,14:.5328|
00001960: 31 2C 36 00 79 21 24 03 81 49 B2 31 A4 33 38 3A |1,6.y!$..I.1.38:|
00001970: 99 22 12 A6 92 22 3B 3A 82 00 91 21 26 03 81 49 |."...";:...!&..I|
00001980: B2 31 A4 32 32 3A 99 22 11 9D 12 A6 92 22 3B 3A |.1.22:.".....";:|
00001990: 82 00 A9 21 28 03 81 49 B2 31 A4 33 37 3A 99 22 |...!(..I.1.37:."|
000019A0: 9D 9D 12 A6 92 22 3B 3A 82 00 C1 21 2A 03 81 49 |.....";:...!*..I|
000019B0: B2 31 A4 32 32 3A 99 22 91 9D 12 A6 92 22 3B 3A |.1.22:.".....";:|
000019C0: 82 00 E6 21 2C 03 99 22 13 11 11 11 11 11 11 1D |...!,.."........|
000019D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000019E0: 1D 12 A9 20 20 92 00 08 22 2E 03 99 22 1D 1D 1D |... ..."..."...|
000019F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 |................|
00001A00: 20 92 20 20 12 20 92 A9 00 29 22 30 03 99 22 1D | . . ...)"0..".|
00001A10: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001A20: 1D 12 20 92 20 20 12 A3 DF 00 47 22 32 03 99 22 |.. . ....G"2.."|
00001A30: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001A40: 1D 1D DF 12 20 20 92 00 6F 22 34 03 99 22 11 11 |.... ..o"4.."..|
00001A50: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 20 4F 20 |............C O |
00001A60: 4D 20 4D 20 4F 20 44 20 4F 20 52 20 45 11 11 00 |M M O D O R E...|
00001A70: 92 22 36 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."6.."..........|
00001A80: 1D 1D 1D 1D 1D 45 44 55 43 41 54 49 4F 4E 41 4C |.....EDUCATIONAL|
00001A90: 11 11 00 B1 22 38 03 99 22 1D 1D 1D 1D 1D 1D 1D |...."8..".......|
00001AA0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 46 54 57 41 52 |.........SOFTWAR|
00001AB0: 45 00 CC 22 3A 03 8F 20 2A 2A 20 43 4F 4D 4D 4F |E..":.. ** COMMO|
00001AC0: 44 4F 52 45 20 4C 4F 47 4F 20 2A 2A 00 04 23 3B |DORE LOGO **..#;|
00001AD0: 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D |...(UD$,24);"...|
00001AE0: 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 41 |.......PRESS SPA|
00001AF0: 43 45 20 42 41 52 20 4F 52 20 57 41 49 54 92 22 |CE BAR OR WAIT."|
00001B00: 3A 49 B2 30 00 26 23 3C 03 A1 41 24 3A 8B 41 24 |:I.0.&#<..A$:.A$|
00001B10: B3 B1 22 20 22 A7 49 B2 49 AA 31 3A 8B 49 B3 32 |.." ".I.I.1:.I.2|
00001B20: 35 30 A7 38 32 38 00 4D 23 3E 03 3A 20 20 54 31 |50.828.M#>.: T1|
00001B30: 24 B2 22 22 3A 54 32 24 B2 22 22 3A 54 33 24 B2 |$."":T2$."":T3$.|
00001B40: 22 22 3A 54 34 24 B2 22 22 3A 49 B2 30 00 59 23 |"":T4$."":I.0.Y#|
00001B50: 40 03 3A 20 20 89 33 30 30 00 78 23 43 03 8F 2D |@.: .300.x#C..-|
00001B60: 2D 2D 2D 2D 53 50 41 43 45 20 42 41 52 20 50 52 |----SPACE BAR PR|
00001B70: 45 53 53 2D 2D 2D 2D 2D 00 B0 23 48 03 3A 20 20 |ESS-----..#H.: |
00001B80: 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D |..(UD$,24);"....|
00001B90: 1D 1D 12 50 52 45 53 53 20 53 50 41 43 45 20 42 |...PRESS SPACE B|
00001BA0: 41 52 20 54 4F 20 43 4F 4E 54 49 4E 55 45 92 22 |AR TO CONTINUE."|
00001BB0: 00 CA 23 4C 03 3A 20 20 A1 55 49 24 3A 8B 55 49 |..#L.: .UI$:.UI|
00001BC0: 24 B3 B1 22 20 22 A7 38 34 34 00 D3 23 4E 03 3A |$.." ".844..#N.:|
00001BD0: 20 20 8E 00 F6 23 52 03 8F 2D 2D 2D 2D 2D 50 41 | ...#R..-----PA|
00001BE0: 47 45 20 44 45 53 49 47 4E 20 52 4F 55 54 49 4E |GE DESIGN ROUTIN|
00001BF0: 45 2D 2D 2D 2D 2D 00 05 24 54 03 3A 20 20 55 50 |E-----..$T.: UP|
00001C00: B2 55 50 AA 31 00 2F 24 57 03 3A 20 20 99 22 93 |.UP.1./$W.: .".|
00001C10: 22 C8 28 55 54 24 AA 55 50 24 2C 32 31 29 3B C8 |".(UT$.UP$,21);.|
00001C20: 28 55 47 24 AA 55 50 24 2C 31 34 29 3B 55 50 00 |(UG$.UP$,14);UP.|
00001C30: 61 24 5C 03 3A 20 20 99 22 20 2D 2D 2D 2D 2D 2D |a$\.: ." ------|
00001C40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001C50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001C60: 22 00 98 24 61 03 3A 20 20 99 C8 28 55 44 24 2C |"..$a.: ..(UD$,|
00001C70: 32 34 29 3B C8 28 55 50 24 2C 36 29 3B 22 48 45 |24);.(UP$,6);"HE|
00001C80: 4C 50 20 2D 20 50 52 45 53 53 20 20 20 48 20 3C |LP - PRESS H <|
00001C90: 52 45 54 55 52 4E 3E 22 00 A7 24 66 03 3A 20 20 |RETURN>"..$f.: |
00001CA0: 99 22 13 11 22 3A 8E 00 C9 24 6B 03 8F 2D 2D 2D |."..":...$k..---|
00001CB0: 2D 2D 50 4C 45 41 53 45 20 57 41 49 54 20 52 45 |--PLEASE WAIT RE|
00001CC0: 4D 41 52 4B 2D 2D 2D 2D 2D 00 02 25 70 03 3A 20 |MARK-----..%p.: |
00001CD0: 20 99 C8 28 55 44 24 2C 32 34 29 3B 22 20 20 20 | ..(UD$,24);" |
00001CE0: 20 20 20 20 20 20 20 20 4F 4E 45 20 4D 4F 4D 45 | ONE MOME|
00001CF0: 4E 54 20 50 4C 45 41 53 45 2E 2E 2E 20 20 20 20 |NT PLEASE... |
00001D00: 20 22 00 0B 25 75 03 3A 20 20 8E 00 2B 25 84 03 | "..%u.: ..+%..|
00001D10: 8F 2D 2D 2D 2D 2D 53 45 54 20 55 50 20 56 41 52 |.-----SET UP VAR|
00001D20: 49 41 42 4C 45 53 2D 2D 2D 2D 2D 00 79 25 85 03 |IABLES-----.y%..|
00001D30: 3A 20 20 55 58 24 B2 22 48 22 3A 86 55 51 25 28 |: UX$."H":.UQ%(|
00001D40: 31 30 30 30 29 3A 55 42 B2 33 32 37 36 38 3A 55 |1000):UB.32768:U|
00001D50: 31 B2 31 39 36 3A 55 32 B2 31 39 37 3A 55 33 B2 |1.196:U2.197:U3.|
00001D60: 31 39 38 3A 55 34 B2 32 31 36 3A 55 43 B2 31 36 |198:U4.216:UC.16|
00001D70: 37 3A 55 55 B2 31 30 32 34 00 B2 25 86 03 3A 20 |7:UU.1024..%..: |
00001D80: 20 55 54 B2 35 39 34 36 38 3A 55 55 25 B2 31 32 | UT.59468:UU%.12|
00001D90: 3A 55 4C 25 B2 31 34 3A 55 50 25 B2 31 31 34 36 |:UL%.14:UP%.1146|
00001DA0: 3A 55 4D B2 33 32 37 36 38 3A 97 35 30 30 30 33 |:UM.32768:.50003|
00001DB0: 2C 30 00 F5 25 87 03 8B C2 28 35 30 30 30 33 29 |,0..%....(50003)|
00001DC0: B2 30 A7 55 42 B2 31 30 32 34 3A 55 31 B2 32 30 |.0.UB.1024:U1.20|
00001DD0: 39 3A 55 32 B2 32 31 30 3A 55 33 B2 32 31 31 3A |9:U2.210:U3.211:|
00001DE0: 55 34 B2 32 31 34 3A 55 43 B2 32 30 34 3A 55 55 |U4.214:UC.204:UU|
00001DF0: B2 32 30 34 38 00 2D 26 88 03 8B C2 28 35 30 30 |.2048.-&....(500|
00001E00: 30 33 29 B2 30 A7 55 54 B2 35 33 32 37 32 3A 55 |03).0.UT.53272:U|
00001E10: 55 25 B2 32 31 3A 55 4C 25 B2 32 33 3A 55 50 25 |U%.21:UL%.23:UP%|
00001E20: B2 32 31 33 39 3A 55 4D B2 31 30 32 34 00 54 26 |.2139:UM.1024.T&|
00001E30: 89 03 3A 20 20 55 44 24 B2 22 13 11 11 11 11 11 |..: UD$."......|
00001E40: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001E50: 11 11 11 22 00 89 26 8A 03 3A 20 20 55 50 24 B2 |..."..&..: UP$.|
00001E60: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00001E70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001E80: 20 20 20 20 20 20 20 20 22 00 C0 26 8B 03 3A 20 | "..&..: |
00001E90: 20 55 54 24 B2 22 20 CD 45 54 45 52 20 D2 45 41 | UT$." .ETER .EA|
00001EA0: 44 49 4E 47 22 3A 8F 20 50 4C 41 43 45 20 50 52 |DING":. PLACE PR|
00001EB0: 4F 47 52 41 4D 20 54 49 54 4C 45 20 48 45 52 45 |OGRAM TITLE HERE|
00001EC0: 00 C9 26 8C 03 3A 20 20 8E 00 E6 26 8E 03 8F 2D |..&..: ...&...-|
00001ED0: 2D 2D 2D 2D 53 45 54 20 56 41 52 49 41 42 4C 45 |----SET VARIABLE|
00001EE0: 53 2D 2D 2D 2D 2D 00 F2 26 93 03 3A 20 20 8D 39 |S-----..&..: .9|
00001EF0: 30 30 00 06 27 94 03 86 20 43 24 28 32 35 29 2C |00..'... C$(25),|
00001F00: 46 4C 28 31 35 29 00 0C 27 95 03 3A 00 2A 27 98 |FL(15)..'..:.*'.|
00001F10: 03 8F 2D 2D 2D 2D 2D 43 48 45 43 4B 20 46 4F 52 |..-----CHECK FOR|
00001F20: 20 38 30 33 32 2D 2D 2D 2D 2D 00 4B 27 9D 03 3A | 8032-----.K'..:|
00001F30: 20 20 99 22 93 22 3A 99 22 A0 22 3A 8F 20 53 48 | .".":.".":. SH|
00001F40: 49 46 54 45 44 20 53 50 41 43 45 00 65 27 A2 03 |IFTED SPACE.e'..|
00001F50: 3A 20 20 8B C2 28 55 42 AA 34 30 29 B3 B1 39 36 |: ..(UB.40)..96|
00001F60: A7 8D 37 30 30 00 81 27 A3 03 8F 2D 2D 2D 2D 2D |..700..'...-----|
00001F70: 4D 45 4D 4F 52 59 20 43 48 45 43 4B 2D 2D 2D 2D |MEMORY CHECK----|
00001F80: 2D 00 98 27 A4 03 3A 20 20 8B 20 B8 28 30 29 B1 |-..'..: . .(0).|
00001F90: 32 30 30 30 A7 39 33 37 00 C9 27 A5 03 3A 20 20 |2000.937..'..: |
00001FA0: 99 22 93 11 11 05 54 48 49 53 20 4D 41 43 48 49 |."....THIS MACHI|
00001FB0: 4E 45 20 44 4F 45 53 20 4E 4F 54 20 48 41 56 45 |NE DOES NOT HAVE|
00001FC0: 20 45 4E 4F 55 47 48 11 22 00 F0 27 A6 03 3A 20 | ENOUGH."..'..: |
00001FD0: 20 99 22 4D 45 4D 4F 52 59 20 54 4F 20 52 55 4E | ."MEMORY TO RUN|
00001FE0: 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 21 22 | THIS PROGRAM !"|
00001FF0: 00 FE 27 A7 03 3A 20 20 9E 55 55 AA 37 31 00 07 |..'..: .UU.71..|
00002000: 28 A8 03 3A 20 20 80 00 24 28 A9 03 3A 20 20 99 |(..: ..$(..: .|
00002010: 22 93 05 22 3A 8B C2 28 35 30 30 30 33 29 B2 30 |"..":..(50003).0|
00002020: A7 39 36 32 00 56 28 AC 03 8F 2D 2D 2D 2D 2D 42 |.962.V(...-----B|
00002030: 41 53 49 43 20 32 2E 30 20 20 4F 52 20 20 34 2E |ASIC 2.0 OR 4.|
00002040: 30 20 20 4F 52 20 20 43 2D 36 34 20 53 45 54 55 |0 OR C-64 SETU|
00002050: 50 2D 2D 2D 2D 2D 00 94 28 AD 03 97 31 30 37 35 |P-----..(...1075|
00002060: 2C 31 33 33 3A 97 31 30 37 36 2C 31 34 34 3A 97 |,133:.1076,144:.|
00002070: 31 30 37 37 2C 32 33 34 3A 97 31 30 37 39 2C 34 |1077,234:.1079,4|
00002080: 3A 97 31 30 38 30 2C 31 33 33 3A 97 31 30 38 31 |:.1080,133:.1081|
00002090: 2C 31 34 35 00 CA 28 AE 03 97 31 30 39 31 2C 31 |,145..(...1091,1|
000020A0: 35 35 3A 97 31 30 39 38 2C 31 33 33 3A 97 31 30 |55:.1098,133:.10|
000020B0: 39 39 2C 31 34 34 3A 97 31 31 30 30 2C 32 33 34 |99,144:.1100,234|
000020C0: 3A 97 31 31 30 33 2C 31 33 33 00 EC 28 AF 03 97 |:.1103,133..(...|
000020D0: 31 31 30 34 2C 31 34 35 3A 97 31 31 30 35 2C 32 |1104,145:.1105,2|
000020E0: 33 34 3A 97 31 30 38 32 2C 32 33 34 00 06 29 B1 |34:.1082,234..).|
000020F0: 03 3A 20 20 8B C2 28 35 30 30 30 33 29 B3 B1 31 |.: ..(50003)..1|
00002100: 36 30 A7 39 35 35 00 38 29 B6 03 3A 20 20 97 31 |60.955.8)..: .1|
00002110: 30 39 33 2C 38 38 3A 97 31 30 39 34 2C 32 32 38 |093,88:.1094,228|
00002120: 3A 97 31 30 39 37 2C 38 35 3A 97 31 31 30 32 2C |:.1097,85:.1102,|
00002130: 32 32 38 3A 89 39 36 35 00 50 29 BB 03 3A 20 20 |228:.965.P)..: |
00002140: 8B C2 28 35 30 30 30 33 29 B3 B1 31 A7 39 39 30 |..(50003)..1.990|
00002150: 00 82 29 C0 03 3A 20 20 97 31 30 39 33 2C 34 39 |..)..: .1093,49|
00002160: 3A 97 31 30 39 34 2C 32 33 30 3A 97 31 30 39 37 |:.1094,230:.1097|
00002170: 2C 34 36 3A 97 31 31 30 32 2C 32 33 30 3A 89 39 |,46:.1102,230:.9|
00002180: 36 35 00 BC 29 C2 03 97 32 30 39 39 2C 31 34 31 |65..)...2099,141|
00002190: 3A 97 32 31 30 30 2C 32 30 3A 97 32 31 30 31 2C |:.2100,20:.2101,|
000021A0: 33 3A 97 32 31 30 33 2C 38 3A 97 32 31 30 34 2C |3:.2103,8:.2104,|
000021B0: 31 34 31 3A 97 32 31 30 35 2C 32 31 00 F8 29 C3 |141:.2105,21..).|
000021C0: 03 97 32 31 30 36 2C 33 3A 97 32 31 31 35 2C 31 |..2106,3:.2115,1|
000021D0: 34 35 3A 97 32 31 31 37 2C 35 32 3A 97 32 31 31 |45:.2117,52:.211|
000021E0: 38 2C 32 33 34 3A 97 32 31 32 31 2C 34 39 3A 97 |8,234:.2121,49:.|
000021F0: 32 31 32 32 2C 31 34 31 00 32 2A C4 03 97 32 31 |2122,141.2*...21|
00002200: 32 33 2C 32 30 3A 97 32 31 32 34 2C 33 3A 97 32 |23,20:.2124,3:.2|
00002210: 31 32 36 2C 32 33 34 3A 97 32 31 32 37 2C 31 34 |126,234:.2127,14|
00002220: 31 3A 97 32 31 32 38 2C 32 31 3A 97 32 31 32 39 |1:.2128,21:.2129|
00002230: 2C 33 00 53 2A C5 03 3A 20 20 9E 55 55 AA 34 38 |,3.S*..: .UU.48|
00002240: 3A 8F 20 44 49 53 41 42 4C 45 20 53 54 4F 50 20 |:. DISABLE STOP |
00002250: 4B 45 59 00 67 2A CA 03 3A 20 20 8D 38 30 30 3A |KEY.g*..: .800:|
00002260: 8F 20 54 49 54 4C 45 00 7A 2A D4 03 3A 20 20 89 |. TITLE.z*..: .|
00002270: 33 30 30 3A 8F 20 4D 45 4E 55 00 AE 2A DE 03 3A |300:. MENU..*..:|
00002280: 20 20 99 22 93 54 48 45 20 50 47 4D 20 57 49 4C | .".THE PGM WIL|
00002290: 4C 20 4E 4F 54 20 57 4F 52 4B 20 4F 4E 20 54 48 |L NOT WORK ON TH|
000022A0: 49 53 20 4D 41 43 48 49 4E 45 21 22 3A 80 00 E8 |IS MACHINE!":...|
000022B0: 2A E8 03 3A 20 8B 55 5A B2 31 A7 9E 55 50 25 3A |*..: .UZ.1..UP%:|
000022C0: 9E 55 50 25 3A 55 5A B2 30 3A 8F 2D 2D 2D 2D 2D |.UP%:UZ.0:.-----|
000022D0: 50 52 4F 47 52 41 4D 20 53 54 41 52 54 53 20 48 |PROGRAM STARTS H|
000022E0: 45 52 45 2D 2D 2D 2D 2D 00 12 2B E9 03 99 22 93 |ERE-----..+...".|
000022F0: 05 22 3B 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |.";:..(50003).0.|
00002300: 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C |.53281,6:.53280,|
00002310: 31 34 00 23 2B ED 03 99 22 93 22 3A 97 55 54 2C |14.#+...".":.UT,|
00002320: 55 4C 25 00 47 2B F2 03 8F 20 52 45 41 44 49 4E |UL%.G+... READIN|
00002330: 47 20 45 4C 45 43 54 52 49 43 41 4C 20 4D 45 54 |G ELECTRICAL MET|
00002340: 45 52 53 20 20 42 59 00 7F 2B FC 03 8F 20 52 2E |ERS BY..+... R.|
00002350: 57 2E 44 52 41 59 20 20 20 52 2E 52 2E 23 32 20 |W.DRAY R.R.#2 |
00002360: 50 45 54 45 52 42 4F 52 4F 55 47 48 20 4F 4E 54 |PETERBOROUGH ONT|
00002370: 2E 20 4B 39 4A 20 36 58 33 20 20 31 39 38 31 00 |. K9J 6X3 1981.|
00002380: 88 2B 06 04 99 22 93 22 00 8E 2B 10 04 8C 00 B1 |.+..."."..+.....|
00002390: 2B 4C 04 43 44 24 B2 22 11 11 11 11 11 11 11 11 |+L.CD$."........|
000023A0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000023B0: 22 00 E4 2B 56 04 43 4C 24 B2 22 20 20 20 20 20 |"..+V.CL$." |
000023C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000023D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000023E0: 20 20 20 22 00 F8 2B 60 04 81 49 B2 31 A4 34 3A | "..+`..I.1.4:|
000023F0: 87 43 24 28 49 29 3A 82 00 1B 2C 6A 04 83 22 20 |.C$(I):...,j.." |
00002400: 20 20 C3 4F 52 52 45 43 54 2E 22 2C 22 20 20 20 | .ORRECT."," |
00002410: D6 45 52 59 20 C7 4F 4F 44 2E 22 00 4B 2C 74 04 |.ERY .OOD.".K,t.|
00002420: 83 22 20 20 20 CF 4B 41 59 2E 22 2C 22 20 20 20 |." .KAY."," |
00002430: C8 41 56 45 20 59 4F 55 20 44 4F 4E 45 20 54 48 |.AVE YOU DONE TH|
00002440: 49 53 20 42 45 46 4F 52 45 2E 22 00 78 2C 7E 04 |IS BEFORE.".x,~.|
00002450: 83 22 20 20 20 C9 27 44 20 42 45 20 53 48 4F 43 |." .'D BE SHOC|
00002460: 4B 45 44 20 49 46 20 59 4F 55 20 57 45 52 45 20 |KED IF YOU WERE |
00002470: 57 52 4F 4E 47 2E 20 22 00 8D 2C 83 04 83 22 20 |WRONG. "..,..." |
00002480: 20 20 D7 45 4C 4C 20 C4 4F 4E 45 2E 22 00 BB 2C | .ELL .ONE."..,|
00002490: 88 04 83 22 20 20 20 D2 49 47 48 54 2E 22 2C 22 |..." .IGHT.","|
000024A0: 20 20 20 D9 4F 55 27 56 45 20 47 4F 54 20 41 20 | .OU'VE GOT A |
000024B0: 47 4F 4F 44 20 45 59 45 21 20 22 00 EC 2C 92 04 |GOOD EYE! "..,..|
000024C0: 83 22 20 20 20 CE 45 56 45 52 20 41 20 4E 45 47 |." .EVER A NEG|
000024D0: 41 54 49 56 45 20 52 45 53 50 4F 4E 53 45 21 20 |ATIVE RESPONSE! |
000024E0: 22 2C 22 20 20 20 C7 4F 4F 44 2E 22 00 0B 2D 9C |"," .OOD."..-.|
000024F0: 04 83 22 20 20 20 D9 4F 55 56 27 45 20 47 4F 54 |.." .OUV'E GOT|
00002500: 20 54 48 41 54 20 4F 4E 45 2E 22 00 3D 2D A6 04 | THAT ONE.".=-..|
00002510: 83 22 20 20 20 D9 4F 55 20 4D 55 53 54 20 42 45 |." .OU MUST BE|
00002520: 20 56 45 52 59 20 54 41 4C 45 4E 54 45 44 2E 20 | VERY TALENTED. |
00002530: 22 2C 22 20 20 20 D2 49 47 48 54 2E 22 00 6C 2D |"," .IGHT.".l-|
00002540: B0 04 83 22 20 20 20 D7 45 4C 4C 20 C4 4F 4E 45 |..." .ELL .ONE|
00002550: 2E 22 2C 22 20 20 20 C4 4F 4E 27 54 20 59 4F 55 |."," .ON'T YOU|
00002560: 20 45 56 45 52 20 4D 49 53 53 2E 22 00 9B 2D F2 | EVER MISS."..-.|
00002570: 08 43 B2 31 35 3A 55 50 B2 30 3A 55 47 24 B2 22 |.C.15:UP.0:UG$."|
00002580: D1 55 45 53 54 49 4F 4E 20 20 20 20 23 22 3A 99 |.UESTION #":.|
00002590: 22 93 22 3A 97 55 54 2C 55 4C 25 00 B1 2D FC 08 |".":.UT,UL%..-..|
000025A0: 8D 32 34 37 30 3A 8D 32 36 32 30 3A 8D 32 37 39 |.2470:.2620:.279|
000025B0: 30 00 C6 2D 06 09 44 B2 30 2E 30 3A 8D 32 39 33 |0..-..D.0.0:.293|
000025C0: 30 3A 54 52 B2 30 00 DA 2D 10 09 99 22 13 22 3B |0:TR.0..-...".";|
000025D0: C8 28 43 44 24 2C 31 35 29 3B 00 06 2E 1A 09 99 |.(CD$,15);......|
000025E0: 22 20 20 20 11 11 D7 48 41 54 20 49 53 20 54 48 |" ...HAT IS TH|
000025F0: 45 20 52 45 41 44 49 4E 47 20 4F 4E 20 54 48 45 |E READING ON THE|
00002600: 20 22 3B 53 43 24 00 19 2E 24 09 99 22 20 20 20 | ";SC$...$.." |
00002610: 53 43 41 4C 45 3F 20 22 3B 00 4E 2E 29 09 55 53 |SCALE? ";.N.).US|
00002620: 24 B2 22 31 32 33 34 35 36 37 38 39 30 2E 22 3A |$."1234567890.":|
00002630: 55 4C B2 35 3A 8D 33 35 3A 41 4E B2 C5 28 55 52 |UL.5:.35:AN..(UR|
00002640: 24 29 3A 8B 20 50 B2 30 20 A7 20 50 B2 31 00 6B |$):. P.0 . P.1.k|
00002650: 2E 2E 09 8B B6 28 41 4E AB 43 41 29 B3 28 43 41 |.....(AN.CA).(CA|
00002660: AD 50 AC 2E 32 29 A7 32 34 34 30 00 82 2E 38 09 |.P..2).2440...8.|
00002670: 54 52 B2 54 52 AA 31 3A 8B 54 52 B1 32 A7 32 34 |TR.TR.1:.TR.2.24|
00002680: 31 30 00 B2 2E 42 09 99 22 20 20 20 11 D9 4F 55 |10...B.." ..OU|
00002690: 52 20 41 4E 53 57 45 52 20 49 53 20 49 4E 43 4F |R ANSWER IS INCO|
000026A0: 52 52 45 43 54 2C 20 54 52 59 20 41 47 41 49 4E |RRECT, TRY AGAIN|
000026B0: 2E 22 00 BC 2E 4C 09 8D 20 38 33 35 00 C6 2E 56 |."...L.. 835...V|
000026C0: 09 8D 33 31 38 30 00 D0 2E 60 09 89 32 33 32 30 |..3180...`..2320|
000026D0: 00 E5 2E 6A 09 43 41 B2 B5 28 31 30 30 AC 43 41 |...j.CA..(100.CA|
000026E0: 29 AD 31 30 30 00 0E 2F 74 09 99 22 20 20 20 11 |).100../t.." .|
000026F0: CE 4F 2C 20 54 48 45 20 43 4F 52 52 45 43 54 20 |.O, THE CORRECT |
00002700: 52 45 41 44 49 4E 47 20 49 53 22 3B 43 41 00 1E |READING IS";CA..|
00002710: 2F 7E 09 8D 20 38 33 35 3A 89 32 33 30 30 00 45 |/~.. 835:.2300.E|
00002720: 2F 88 09 8D 33 31 33 30 3A 8D 32 39 35 30 3A 8D |/...3130:.2950:.|
00002730: 20 38 33 35 3A 43 B2 43 AA 31 3A 8B 43 B2 32 35 | 835:C.C.1:.C.25|
00002740: A7 33 32 35 30 00 4F 2F 92 09 89 32 33 30 30 00 |.3250.O/...2300.|
00002750: 59 2F 9C 09 89 32 33 30 30 00 6B 2F A6 09 55 50 |Y/...2300.k/..UP|
00002760: B2 55 50 AA 31 3A 8D 20 38 35 30 00 96 2F B0 09 |.UP.1:. 850../..|
00002770: 99 22 20 20 B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |." ............|
00002780: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00002790: C0 C0 C0 C0 C0 AE 00 C1 2F BA 09 99 22 20 20 DD |......../..." .|
000027A0: 20 20 20 30 20 20 20 20 32 20 20 20 20 34 20 20 | 0 2 4 |
000027B0: 20 20 36 20 20 20 20 38 20 20 20 31 30 20 20 20 | 6 8 10 |
000027C0: DD 00 EC 2F C4 09 99 22 20 20 DD 20 20 20 30 20 |.../..." . 0 |
000027D0: 20 20 2E 35 20 20 20 20 31 20 20 20 31 2E 35 20 | .5 1 1.5 |
000027E0: 20 20 32 20 20 20 32 2E 35 20 20 DD 00 17 30 CE | 2 2.5 ...0.|
000027F0: 09 99 22 20 20 DD 20 20 20 30 20 20 20 20 31 20 |.." . 0 1 |
00002800: 20 20 20 32 20 20 20 20 33 20 20 20 20 34 20 20 | 2 3 4 |
00002810: 20 20 35 20 20 20 DD 00 42 30 D8 09 99 22 20 20 | 5 ..B0..." |
00002820: DD 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00002830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002840: 20 DD 00 6D 30 E2 09 99 22 20 20 DD 20 20 20 A5 | ..m0..." . .|
00002850: A0 A0 A0 A0 A5 A0 A0 A0 A0 A5 A0 A0 A0 A0 A5 A0 |................|
00002860: A0 A0 A0 A5 A0 A0 A0 A0 A5 20 20 20 DD 00 98 30 |......... ...0|
00002870: EC 09 99 22 20 20 DD 20 20 20 A5 A5 A5 A5 A5 A5 |..." . ......|
00002880: A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 A5 |................|
00002890: A5 A5 A5 A5 20 20 20 DD 00 C3 30 F6 09 99 22 20 |.... ...0..." |
000028A0: 20 DD 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | . |
000028B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000028C0: 20 20 DD 00 EE 30 00 0A 99 22 20 20 DD 20 20 20 | ...0..." . |
000028D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000028E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 DD 00 19 | ...|
000028F0: 31 0A 0A 99 22 20 20 DD 20 20 20 20 20 20 20 20 |1..." . |
00002900: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002910: 20 20 20 20 20 20 20 20 DD 00 44 31 14 0A 99 22 | ..D1..."|
00002920: 20 20 DD 20 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00002930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002940: 20 20 20 DD 00 6F 31 1E 0A 99 22 20 20 DD 20 20 | ..o1..." . |
00002950: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002960: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DD 00 | ..|
00002970: 9A 31 28 0A 99 22 20 20 AD C0 C0 C0 C0 C0 C0 C0 |.1(.." ........|
00002980: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00002990: C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 00 A0 31 32 0A 8E |............12..|
000029A0: 00 BE 31 3C 0A 8F 20 53 45 4C 45 43 54 49 4E 47 |..1<.. SELECTING|
000029B0: 20 4D 45 54 45 52 20 52 45 41 44 49 4E 47 00 D4 | METER READING..|
000029C0: 31 41 0A 8B 20 5A B2 31 20 A7 20 89 32 37 34 30 |1A.. Z.1 . .2740|
000029D0: 3A 5A B2 30 00 F3 31 46 0A 50 B2 B5 28 32 34 AC |:Z.0..1F.P..(24.|
000029E0: BB 28 54 49 29 29 3A 8B 20 50 B2 30 20 A7 20 32 |.(TI)):. P.0 . 2|
000029F0: 36 33 30 00 07 32 50 0A 50 50 B2 38 AC 28 50 AB |630..2P.PP.8.(P.|
00002A00: B5 28 50 29 29 AA 31 00 3A 32 5A 0A 91 20 50 50 |.(P)).1.:2Z.. PP|
00002A10: 20 89 20 32 36 36 30 2C 32 36 37 30 2C 32 36 38 | . 2660,2670,268|
00002A20: 30 2C 32 36 39 30 2C 32 37 30 30 2C 32 37 31 30 |0,2690,2700,2710|
00002A30: 2C 32 37 32 30 2C 32 37 33 30 00 4B 32 64 0A 4E |,2720,2730.K2d.N|
00002A40: 50 B2 31 30 31 3A 89 32 37 34 30 00 5B 32 6E 0A |P.101:.2740.[2n.|
00002A50: 4E 50 B2 38 34 3A 89 32 37 34 30 00 6B 32 78 0A |NP.84:.2740.k2x.|
00002A60: 4E 50 B2 37 31 3A 89 32 37 34 30 00 7B 32 82 0A |NP.71:.2740.{2..|
00002A70: 4E 50 B2 36 36 3A 89 32 37 34 30 00 8B 32 8C 0A |NP.66:.2740..2..|
00002A80: 4E 50 B2 39 33 3A 89 32 37 34 30 00 9B 32 96 0A |NP.93:.2740..2..|
00002A90: 4E 50 B2 37 32 3A 89 32 37 34 30 00 AB 32 A0 0A |NP.72:.2740..2..|
00002AA0: 4E 50 B2 38 39 3A 89 32 37 34 30 00 BC 32 AA 0A |NP.89:.2740..2..|
00002AB0: 4E 50 B2 31 30 33 3A 89 32 37 34 30 00 D7 32 B4 |NP.103:.2740..2.|
00002AC0: 0A 8F 20 44 52 41 57 49 4E 47 20 4D 45 54 45 52 |.. DRAWING METER|
00002AD0: 20 4E 45 45 44 4C 45 00 E2 32 BE 0A 81 49 B2 31 | NEEDLE..2...I.1|
00002AE0: A4 34 00 FA 32 C8 0A 97 55 4D AA 32 38 36 AA 50 |.4..2...UM.286.P|
00002AF0: AA 28 49 AC 34 30 29 2C 4E 50 00 01 33 D2 0A 82 |.(I.40),NP..3...|
00002B00: 49 00 07 33 DC 0A 8E 00 30 33 E6 0A 8F 20 53 45 |I..3....03... SE|
00002B10: 4C 45 43 54 49 4E 47 20 53 43 41 4C 45 20 41 4E |LECTING SCALE AN|
00002B20: 44 20 43 4F 52 52 45 43 54 20 41 4E 53 57 45 52 |D CORRECT ANSWER|
00002B30: 00 51 33 F0 0A 53 43 B2 B5 28 39 AC BB 28 54 49 |.Q3..SC..(9..(TI|
00002B40: 29 AA 31 29 3A 8B 53 43 B2 53 44 20 A7 32 38 30 |).1):.SC.SD .280|
00002B50: 30 00 5B 33 FA 0A 53 44 B2 53 43 00 93 33 04 0B |0.[3..SD.SC..3..|
00002B60: 91 20 53 43 20 89 32 38 33 30 2C 32 38 34 30 2C |. SC .2830,2840,|
00002B70: 32 38 35 30 2C 32 38 36 30 2C 32 38 37 30 2C 32 |2850,2860,2870,2|
00002B80: 38 38 30 2C 32 38 39 30 2C 32 39 30 30 2C 32 39 |880,2890,2900,29|
00002B90: 31 30 2C 00 B3 33 0E 0B 53 43 24 B2 22 31 20 56 |10,..3..SC$."1 V|
00002BA0: 4F 4C 54 22 3A 43 41 B2 50 AC 2E 30 34 3A 89 32 |OLT":CA.P..04:.2|
00002BB0: 39 32 30 00 D4 33 18 0B 53 43 24 B2 22 32 2E 35 |920..3..SC$."2.5|
00002BC0: 20 56 4F 4C 54 22 3A 43 41 B2 50 AC 2E 31 3A 89 | VOLT":CA.P..1:.|
00002BD0: 32 39 32 30 00 F3 33 22 0B 53 43 24 B2 22 35 20 |2920..3".SC$."5 |
00002BE0: 56 4F 4C 54 22 3A 43 41 B2 50 AC 2E 32 3A 89 32 |VOLT":CA.P..2:.2|
00002BF0: 39 32 30 00 13 34 2C 0B 53 43 24 B2 22 31 30 20 |920..4,.SC$."10 |
00002C00: 56 4F 4C 54 22 3A 43 41 B2 50 AC 2E 34 3A 89 32 |VOLT":CA.P..4:.2|
00002C10: 39 32 30 00 32 34 36 0B 53 43 24 B2 22 32 35 20 |920.246.SC$."25 |
00002C20: 56 4F 4C 54 22 3A 43 41 B2 50 AC 31 3A 89 32 39 |VOLT":CA.P.1:.29|
00002C30: 32 30 00 51 34 40 0B 53 43 24 B2 22 35 30 20 56 |20.Q4@.SC$."50 V|
00002C40: 4F 4C 54 22 3A 43 41 B2 50 AC 32 3A 89 32 39 32 |OLT":CA.P.2:.292|
00002C50: 30 00 71 34 4A 0B 53 43 24 B2 22 31 30 30 20 56 |0.q4J.SC$."100 V|
00002C60: 4F 4C 54 22 3A 43 41 B2 50 AC 34 3A 89 32 39 32 |OLT":CA.P.4:.292|
00002C70: 30 00 92 34 54 0B 53 43 24 B2 22 32 35 30 20 56 |0..4T.SC$."250 V|
00002C80: 4F 4C 54 22 3A 43 41 B2 50 AC 31 30 3A 89 32 39 |OLT":CA.P.10:.29|
00002C90: 32 30 00 B3 34 5E 0B 53 43 24 B2 22 35 30 30 20 |20..4^.SC$."500 |
00002CA0: 56 4F 4C 54 22 3A 43 41 B2 50 AC 32 30 3A 89 32 |VOLT":CA.P.20:.2|
00002CB0: 39 32 30 00 B9 34 68 0B 8E 00 CA 34 72 0B 8F 20 |920..4h....4r.. |
00002CC0: 54 49 4D 45 20 44 45 4C 41 59 00 DF 34 7C 0B 81 |TIME DELAY..4|..|
00002CD0: 44 31 B2 31 A4 44 AC 31 30 30 30 3A 82 3A 8E 00 |D1.1.D.1000:.:..|
00002CE0: FF 34 86 0B 8F 20 50 52 49 4E 54 20 43 4F 4D 4D |.4... PRINT COMM|
00002CF0: 45 4E 54 20 46 4F 52 20 43 4F 52 52 45 43 54 00 |ENT FOR CORRECT.|
00002D00: 13 35 90 0B 99 22 13 22 3B C8 28 43 44 24 2C 32 |.5...".";.(CD$,2|
00002D10: 30 29 3B 00 26 35 9A 0B 81 20 49 B2 31 A4 C3 28 |0);.&5... I.1..(|
00002D20: 43 24 28 4A 29 29 00 3C 35 A4 0B 99 20 CA 28 43 |C$(J)).<5... .(C|
00002D30: 24 28 4A 29 2C 49 2C 31 29 3B 3A 82 00 42 35 D6 |$(J),I,1);:..B5.|
00002D40: 0B 8E 00 4D 35 EA 0B 81 4B B2 31 A4 34 00 54 35 |...M5...K.1.4.T5|
00002D50: 08 0C 82 4B 00 66 35 12 0C 44 B2 30 30 30 3A 8D |...K.f5..D.000:.|
00002D60: 32 39 33 30 3A 8E 00 74 35 1C 0C 44 B2 30 3A 8D |2930:..t5..D.0:.|
00002D70: 32 39 33 30 00 8C 35 26 0C 99 22 13 22 3B C8 28 |2930..5&..".";.(|
00002D80: 43 44 24 2C 32 30 29 3B 43 4C 24 3B 00 96 35 30 |CD$,20);CL$;..50|
00002D90: 0C 89 33 30 32 30 00 B8 35 3A 0C 8F 20 53 45 4C |..3020..5:.. SEL|
00002DA0: 45 43 54 20 43 4F 4D 4D 45 4E 54 20 26 20 43 48 |ECT COMMENT & CH|
00002DB0: 45 43 4B 20 46 4C 41 47 00 CC 35 44 0C 4A B2 B5 |ECK FLAG..5D.J..|
00002DC0: 28 20 34 AC BB 28 54 49 29 AA 31 29 00 ED 35 4E |( 4..(TI).1)..5N|
00002DD0: 0C 46 4C 28 4A 29 B2 31 3A 4E 43 B2 4E 43 AA 31 |.FL(J).1:NC.NC.1|
00002DE0: 3A 8B 4E 43 B1 31 32 A7 8D 33 31 37 30 00 F3 35 |:.NC.12..3170..5|
00002DF0: 58 0C 8E 00 10 36 62 0C 81 44 B2 31 A4 31 35 3A |X....6b..D.1.15:|
00002E00: 46 4C 28 44 29 B2 30 3A 82 3A 4E 43 B2 30 3A 8E |FL(D).0:.:NC.0:.|
00002E10: 00 35 36 6C 0C 8F 20 43 4C 45 41 52 20 57 52 4F |.56l.. CLEAR WRO|
00002E20: 4E 47 20 41 4E 53 57 45 52 20 46 52 4F 4D 20 53 |NG ANSWER FROM S|
00002E30: 43 52 45 45 4E 00 60 36 76 0C 99 20 22 13 22 3B |CREEN.`6v.. ".";|
00002E40: C8 28 43 44 24 2C 31 35 29 3A 81 44 B2 31 A4 38 |.(CD$,15):.D.1.8|
00002E50: 3A 99 20 C8 28 43 4C 24 2C 33 39 29 3A 82 3A 8E |:. .(CL$,39):.:.|
00002E60: 00 80 36 80 0C 99 22 11 20 50 52 45 53 53 20 27 |..6...". PRESS '|
00002E70: 43 27 20 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 22 |C' TO CONTINUE."|
00002E80: 00 98 36 8A 0C A1 47 24 3A 8B 47 24 B3 B1 C7 28 |..6...G$:.G$...(|
00002E90: 36 37 29 A7 33 32 31 30 00 9E 36 94 0C 8E 00 C7 |67).3210..6.....|
00002EA0: 36 9E 0C 8F 20 43 4C 45 41 52 2C 20 44 52 41 57 |6... CLEAR, DRAW|
00002EB0: 20 4D 45 54 45 52 2C 20 50 4F 53 49 54 49 4F 4E | METER, POSITION|
00002EC0: 20 43 55 52 53 4F 52 00 E9 36 A8 0C 99 22 93 22 | CURSOR..6..."."|
00002ED0: 3B 3A 8D 32 34 37 30 3A 99 22 13 22 3B C8 28 43 |;:.2470:.".";.(C|
00002EE0: 44 24 2C 31 34 29 3B 3A 8E 00 00 37 B2 0C 99 22 |D$,14);:...7..."|
00002EF0: 93 22 3A 8B 4E 41 24 B3 B1 22 22 A7 33 32 38 30 |.":.NA$.."".3280|
00002F00: 00 25 37 BC 0C 46 31 24 B2 22 57 45 4C 4C 20 59 |.%7..F1$."WELL Y|
00002F10: 4F 55 20 53 45 45 4D 20 54 4F 20 42 45 20 41 42 |OU SEEM TO BE AB|
00002F20: 4C 45 20 5C 22 00 2F 37 C6 0C 89 33 33 30 30 00 |LE \"./7...3300.|
00002F30: 5C 37 D0 0C 4D 24 B2 22 57 45 4C 4C 20 22 3A 4D |\7..M$."WELL ":M|
00002F40: 31 24 B2 22 2C 20 59 4F 55 20 53 45 45 4D 20 54 |1$.", YOU SEEM T|
00002F50: 4F 20 42 45 20 41 42 4C 45 20 5C 22 00 6F 37 DA |O BE ABLE \".o7.|
00002F60: 0C 46 31 24 B2 4D 24 AA 4E 41 24 AA 4D 31 24 00 |.F1$.M$.NA$.M1$.|
00002F70: 96 37 E4 0C 46 32 24 B2 22 54 4F 20 52 45 41 44 |.7..F2$."TO READ|
00002F80: 20 4D 45 54 45 52 53 20 51 55 49 54 45 20 57 45 | METERS QUITE WE|
00002F90: 4C 4C 2E 20 5C 22 00 DD 37 EE 0C 46 33 24 B2 22 |LL. \"..7..F3$."|
00002FA0: 49 54 20 48 41 53 20 42 45 45 4E 20 46 55 4E 20 |IT HAS BEEN FUN |
00002FB0: 57 4F 52 4B 49 4E 47 20 57 49 54 48 20 59 4F 55 |WORKING WITH YOU|
00002FC0: 2E 20 5C 47 4F 4F 44 42 59 45 20 55 4E 54 49 4C |. \GOODBYE UNTIL|
00002FD0: 20 4E 45 58 54 20 54 49 4D 45 2E 20 22 00 F4 37 | NEXT TIME. "..7|
00002FE0: F8 0C 43 24 28 32 30 29 B2 46 31 24 AA 46 32 24 |..C$(20).F1$.F2$|
00002FF0: AA 46 33 24 00 FD 37 02 0D 4A B2 32 30 00 03 38 |.F3$..7..J.20..8|
00003000: 5C 0D 8F 00 09 38 66 0D 8F 00 14 38 70 0D 81 4B |\....8f....8p..K|
00003010: B2 31 A4 34 00 1B 38 8E 0D 82 4B 00 2B 38 98 0D |.1.4..8...K.+8..|
00003020: 44 B2 30 3A 8D 32 39 33 30 3A 8E 00 39 38 A2 0D |D.0:.2930:..98..|
00003030: 44 B2 30 3A 8D 32 39 33 30 00 64 38 AC 0D 8F 20 |D.0:.2930.d8... |
00003040: 20 43 4C 24 3D 22 22 3A 50 52 49 4E 54 22 91 22 | CL$="":PRINT"."|
00003050: 3A 50 52 49 4E 54 43 4C 24 3A 50 52 49 4E 54 22 |:PRINTCL$:PRINT"|
00003060: 91 91 91 22 00 6E 38 B6 0D 89 33 34 31 30 00 A5 |...".n8...3410..|
00003070: 38 C0 0D 8F 20 52 2E 57 2E 44 52 41 59 20 20 52 |8... R.W.DRAY R|
00003080: 2E 52 2E 23 32 20 50 45 54 45 52 42 4F 52 4F 55 |.R.#2 PETERBOROU|
00003090: 47 48 20 4F 4E 54 2E 20 4B 39 4A 20 36 58 33 20 |GH ONT. K9J 6X3 |
000030A0: 20 31 39 38 31 00 00 00 FF | 1981.... |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......L4.X.1.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.I....---GENERAL INPUT ROUTINE---
-.O...:...... ** TO OUR BEST KNOWLEDGE T
HIS...... PROGRAM IS FREE FOR.0....
DUPLICATION IN CANADA..N.... IF YOU
HAVE CONTRARY.K.... INFORMATION, PLE
ASE...... CONTACT COMMODORE CANADA AN
D...... EVERY EFFORT WILL BE MADE TO.
X.... WITHDRAW COPIES OF THIS......
PROGRAM......:...#..-----INPUT SECTION
-----.".(.: UR$."":UI$."".6.*.: . UL.0
.UL.80.I.-.." ..";:.UC,0.`.2.: .UI$:.U
I$."".50...7.: .UI$.G(13).C(UR$)..1..UC
,1:." .";:.85...<.: .UI$.G(20).105...>.
: . C(UR$)..UL .50...A.: .120:. CHECK
FOR VALID CHARACTER...F.: UR$.UR$.UI$..
.K.: .UI$;...P.: .50.4.U..-----CHECK F
OR HELP REQUEST-----._.Z.: .UR$.UX$.195
:. EXIT TO HELP ROUTINE.Q._.: .UF.1..24
0...D.: UF.0:.:....F..-----CHECK DELETE-
----...I.: .C(UR$).1.50.I.N.: UR$.H(UR$,
C(UR$).1)...S.: .". ..";:.50...X..-----
CHECK FOR VALID CHARACTERS-----...}.: .
C(US$).0.150.,..US$.US$.UX$.@...: .US.
1.C(US$).\...: .UI$.J(US$,US,1)...E..
.: ..U...: UI$."":.......-----STANDARD
INPUT-----.....: .F(UI$).46. ......:
.UI$.G(32). .... .: .F(UI$).48 . F(UI$)
.57.170.....: ......: .F(UI$).65 . F(U
I$).90.180.....: ..<...: .F(UI$).193 .
F(UI$).218.UI$."":..J...: .B(UT).12.B(
UT).21.UI$.G(F(UI$).128):..S...: ......
: UI$."":....C.: UF.1:.-----HELP ROUTI
NE EXIT-----...E.: .250.D.H.: .245...M
.: .UQ.UB.(U2%.256.U1%.U3%.2)...R.: UQ
%(UQ.UB).B(UQ):.:."."...W.: UZ.1:UV%.B(
UT).'.X.: .300.L.Y.UZ.0:US$.UJ$:UG$.UK$
:UP.UJ:UL.UK...Z..B(50003).0..53281,1:."
.";:.53281,6:.53280,14:.220......".";...
..UT$.UL$:.UT,UV%:.UQ.UB.(U2%.256.U1%.U3
%.3).T...: .UQ,UQ%(UQ.UB):......: .U1,
U1%.....: .U2,U2%.....: .U4,U4%.....:
.U3,U3%.1.....: .35.R...: UD%.((U2%.2
56.U1%.U3%).UB).40:.H(UD$,UD%.1):......:
.H(UD$,24);" . HE
LP COMING . ":......: U1%.B(U1):U2%.B(
U2):U3%.B(U3):U4%.B(U4).Q...UJ$.US$:UJ.U
L.....: UJ$.US$:UK$.UG$:UJ.UP:UK.UL....
.: ....,..-----MENU-----...-.:.I...: .
".":.UT,UU%:.B(50003).0..53281,9:.53280,
8.O./.:.O.1.: .". MENU".
..6.: ." ------------------------------
--------".F.;.: .".. 1. METER R
EADING...@.: .".. 2. STUDENT IN
STRUCTIONS". .E.: .".. 3. TEACH
ER INSTRUCTIONS".?.O.: .".. 4.
QUIT..".Q.T.: ." ----------------------
----------------"...Y.: .".. PRES
S A NUMBER KEY (1-4) ";.O.^.: UL.1:US$.
"1234":.35:.---INPUT ROUTINE---..._..C(U
R$).1.300...`.: US$.""...C.: .E(UR$).1
000,400,500,396...H.: .300.E....-----RE
-ENABLE STOP KEY AND END-----.W...: .B(
50003)..1.B(50003)..160.B(50003)..0.399.
....: .UU.71:.B(50003).0..53281,6:.5328
0,14.....: ."..":..A...: .875:.......-
----STUDENT INSTRUCTIONS-----.....: .".
":.UT,UL%:.B(50003).0..53281,0:.53280,0.
8...UP.0:UG$."STUDENT INST":.850.D...."
......PLEASE FOLLOW INSTRUCTIONS......
.." IF I SAY TO PRESS SOME LETTER, THE
N......" THAT IS ALL YOU NEED TO DO.
IF YOU......" ARE ANSWERING A QUESTION
, YOU MUST......" TYPE YOUR ANSWER AND
THEN PRESS.=...." THE KEY MARKED <RET
URN>. IF YOU.J...." DO NOT DO THIS, I
WON'T RECEIVE THE......" ANSWER AND I
WILL JUST SIT AND WAIT..C...." IF YOU
MAKE A TYPING MISTAKE, YOU......" CAN
ERASE IT BY PRESSING THE......" <INST
DEL> KEY. (ONCE FOR EACH.$...." LETT
ER)".D.... 835:UP.UP.1:. 850:UP.UP.1.R..
.." ...THE PURPOSE OF THIS PROGRAM IS
TO. ...." GIVE YOU PRACTICE READING EL
ECTRICAL.N...." METERS. MOST ELECTRIC
AL METERS HAVE......" THREE OR MORE SC
ALES AND 2 OR 3.#...." RANGES FOR EACH
SCALE. THE SCALES.N...." USUALLY GO
FROM 0 TO 1, 2.5 OR 5..Z...." THE RANG
ES OF THE READINGS WILL BE......" THE
MAX SCALE VALUE OR THE MAX VALUE.R...."
MULTIPLIED BY 10 OR 100 OR 1000.......
" THUS A METER WITH THE 3 SCALES GIVEN
.+...." ABOVE COULD MEASURE VALUES IN
THE.U...." RANGE 0 TO 1 OR UP TO 0 TO
5000,......" DEPENDING ON THE SCALE MU
LTIPLIER......." I WILL NOW SHOW YOU A
TYPICAL METER.O...." FACE WITH ITS 3
SCALES....... 835:. 850:UP.UP.1:. 2480..
.A.." .NOTICE THE THREE SCALES EACH OF
.C.B.." WHICH STARTS AT ZERO ON THE LE
FT..P.C.." SINCE THE SCALES ARE DIFFER
ENT, THE...D.." VALUE OF THE SMALLEST
DIVISION WILL.C.E.." BE DIFFERENT FOR
EACH SCALE....F.. 835:. 850:UP.UP.1...G.
." ..THE NEXT THING IS TO READ THE MET
ER..#.I.." THE STEPS ARE:.Q.J.."
1. DETERMINE THE SCALE BEING USED.Z.K.."
2. DETERMINE THE SIZE OF THE...L..
" SMALLEST DIVISION FOR THAT...M
.. " SCALE"...N.." 3. ADD T
HE DIVISIONS TO GET THE METER
READING..*.O.." IN THE PRACTICE THAT
FOLLOWS, A.T.P.." VOLTMETER WILL BE DR
AWN, AND YOU...Q.." WILL BE ASKED TO G
IVE THE READING....R.." DO NOT GIVE UN
ITS WITH YOUR ANSWER,...S.." ONLY GIVE
THE NUMERICAL VALUE OF THE...T.." REA
DING....U.." THE DRILL WILL END WITH 1
0 RIGHT.*.V.." ANSWERS.".4.... 835.K..
.: .UZ.1..UP%:.217.T...: ..X....-----T
EACHER INSTRUCTIONS-----.....: .".":.UT
,UL%:.B(50003).0..53281,2:.53280,10.P...
: UP.0:UG$."TEACHER INST.":.850.....:
.".. TO THE BEST OF OUR KNOWLEDGE,.
".-...: ." THIS PROGRAM IS IN THE PUB
LIC.".\...: ." DOMAIN. IF THIS IS NO
T THE CASE.".|...: ." PLEASE CONTACT:
...".....: ." COMMODORE BUSINESS M
ACHINES.".O...: ." 3370 PHARMA
CY AVE......: ." AGINCOURT, ON
TARIO".....: ." CANADA M1W 2
K4".>...: ." (416) 499-4292".T
...UP.1:. 835:. 850:.~...." ..PROGRA
M NAME: METER READING......." WRITTE
N BY : R.W. DRAY..H...." UPGRADED B
Y : P.S SCHMIDT......." .THIS PROGRA
M WILL RUN ON ANY........" PET 6
4 COMPUTER .<...." COMMODORE
64 COMPUTER.O...UP.3:.835:.850....."..
. THIS PROGRAM IS TO ASSIST STUDENTS.
..!..". IN METER READING. THE QUESTIO
NS "...&..". ARE GIVEN AS A GROUP WIT
H THE "...+..". COMPUTER ENCOURAGI
NG THE STUDENT. ".3.0..". THERE IS NO
FINAL SCORE GIVEN.".<.D..835.S.N.: .UZ.
1..UP%:.217.\.W.: ....X..-----PROGRAM M
ODIFICATION INST-----...Y.: .".":.UT,UL
%...].: UP.0:UG$."PROGRAM MOD":.850.H..
.: .835.....: .UZ.1..UP%:.217.....: .
.. ...-----TO USE 8032 LOAD CBM4032-----
.F F..".....BEFORE RUNNING THIS PROGRAM
ON AN 8032 ...| P.." LOAD THE 'CBM
4032' PROGRAM.............".. Z.: .UU.
71.. ..: ... ... ** TO USE 8032 LOAD CB
M4032 **..!..."....BEFORE RUNNING THIS P
ROGRAM ON AN 8032 ..LOAD CBM 4032 PROGR
AM"..!...1093:../! .. ** T I T L E P A
G E **.C!".."....";:.UT,UU%:.B(50003).0
..53280,14:.53281,6.Y!$..I.1.38:."...";:
...!&..I.1.22:.".....";:...!(..I.1.37:."
.....";:..A!*..I.1.22:.".....";:...!,.."
........................... ..."..."...
................ . . ...)"0..".........
.......... . ....G"2.."................
.... ..O"4.."..............C O M M O D
O R E...."6.."...............EDUCATIONAL
...."8.."................SOFTWARE.L":..
** COMMODORE LOGO **..#;..H(UD$,24);"...
.......PRESS SPACE BAR OR WAIT.":I.0.&#<
..A$:.A$.." ".I.I.1:.I.250.828.M#>.: T1
$."":T2$."":T3$."":T4$."":I.0.Y#@.: .30
0.X#C..-----SPACE BAR PRESS-----..#H.:
.H(UD$,24);".......PRESS SPACE BAR TO CO
NTINUE.".J#L.: .UI$:.UI$.." ".844.S#N.:
...#R..-----PAGE DESIGN ROUTINE-----..
$T.: UP.UP.1./$W.: ."."H(UT$.UP$,21);H
(UG$.UP$,14);UP.A$\.: ." --------------
------------------------"..$A.: .H(UD$,
24);H(UP$,6);"HELP - PRESS H <RETURN>"
..$F.: ."..":..I$K..-----PLEASE WAIT RE
MARK-----..%P.: .H(UD$,24);"
ONE MOMENT PLEASE... "..%U.: ..+%..
.-----SET UP VARIABLES-----.Y%..: UX$."
H":.UQ%(1000):UB.32768:U1.196:U2.197:U3.
198:U4.216:UC.167:UU.1024..%..: UT.5946
8:UU%.12:UL%.14:UP%.1146:UM.32768:.50003
,0..%...B(50003).0.UB.1024:U1.209:U2.210
:U3.211:U4.214:UC.204:UU.2048.-&...B(500
03).0.UT.53272:UU%.21:UL%.23:UP%.2139:UM
.1024.T&..: UD$."......................
..."..&..: UP$."
"..&..: UT$." METER REA
DING":. PLACE PROGRAM TITLE HERE.I&..:
...&...-----SET VARIABLES-----..&..: .9
00..'... C$(25),FL(15)..'..:.*'...-----C
HECK FOR 8032-----.K'..: .".":." ":. SH
IFTED SPACE.E'..: .B(UB.40)..96..700..'
...-----MEMORY CHECK-----..'..: . .(0).
2000.937.I'..: ."....THIS MACHINE DOES
NOT HAVE ENOUGH."..'..: ."MEMORY TO RUN
THIS PROGRAM !"..'..: .UU.71..(..: ..
$(..: ."..":.B(50003).0.962.V(...-----B
ASIC 2.0 OR 4.0 OR C-64 SETUP-----..
(...1075,133:.1076,144:.1077,234:.1079,4
:.1080,133:.1081,145.J(...1091,155:.1098
,133:.1099,144:.1100,234:.1103,133..(...
1104,145:.1105,234:.1082,234..)..: .B(5
0003)..160.955.8)..: .1093,88:.1094,228
:.1097,85:.1102,228:.965.P)..: .B(50003
)..1.990..)..: .1093,49:.1094,230:.1097
,46:.1102,230:.965..)B..2099,141:.2100,2
0:.2101,3:.2103,8:.2104,141:.2105,21..)C
..2106,3:.2115,145:.2117,52:.2118,234:.2
121,49:.2122,141.2*D..2123,20:.2124,3:.2
126,234:.2127,141:.2128,21:.2129,3.S*E.:
.UU.48:. DISABLE STOP KEY.G*J.: .800:
. TITLE.Z*T.: .300:. MENU..*..: .".THE
PGM WILL NOT WORK ON THIS MACHINE!":...
*..: .UZ.1..UP%:.UP%:UZ.0:.-----PROGRAM
STARTS HERE-----..+..."..";:.B(50003).0.
.53281,6:.53280,14.#+...".":.UT,UL%.G+..
. READING ELECTRICAL METERS BY.+... R.
W.DRAY R.R.#2 PETERBOROUGH ONT. K9J 6X
3 1981..+..."."..+.....+L.CD$."........
................"..+V.CL$."
"..+`..I.1.4:
.C$(I):...,J.." CORRECT."," VERY GOO
D.".K,T.." OKAY."," HAVE YOU DONE TH
IS BEFORE.".X,~.." I'D BE SHOCKED IF Y
OU WERE WRONG. "..,..." WELL DONE."..,
..." RIGHT."," YOU'VE GOT A GOOD EYE
! "..,..." NEVER A NEGATIVE RESPONSE!
"," GOOD."..-..." YOUV'E GOT THAT ON
E.".=-..." YOU MUST BE VERY TALENTED.
"," RIGHT.".L-..." WELL DONE."," D
ON'T YOU EVER MISS."..-..C.15:UP.0:UG$."
QUESTION #":.".":.UT,UL%..-...2470:.2
620:.2790.F-..D.0.0:.2930:TR.0.Z-...".";
H(CD$,15);......" ..WHAT IS THE READIN
G ON THE ";SC$...$.." SCALE? ";.N.).US
$."1234567890.":UL.5:.35:AN.E(UR$):. P.0
. P.1.K.....(AN.CA).(CA.P..2).2440...8.
TR.TR.1:.TR.2.2410...B.." .YOUR ANSWER
IS INCORRECT, TRY AGAIN."...L.. 835.F.V
..3180.P.`..2320...J.CA..(100.CA).100../
T.." .NO, THE CORRECT READING IS";CA..
/~.. 835:.2300.E/...3130:.2950:. 835:C.C
.1:.C.25.3250.O/...2300.Y/...2300.K/..UP
.UP.1:. 850../..." ....................
...............A/..." . 0 2 4
6 8 10 .../D.." . 0 .5
1 1.5 2 2.5 ...0N.." . 0 1
2 3 4 5 ..B0X.." .
..M0..." . .
. . . . . ...0..." .
.......................... ..C0..."
. ...0..
." . ...
1..." .
..D1..." .
..O1..." .
...1(.." ........................
........... 12....1<.. SELECTING METER R
EADING.T1A.. Z.1 . .2740:Z.0..1F.P..(24.
.(TI)):. P.0 . 2630..2P.PP.8.(P..(P)).1.
:2Z.. PP . 2660,2670,2680,2690,2700,2710
,2720,2730.K2D.NP.101:.2740.[2N.NP.84:.2
740.K2X.NP.71:.2740.{2..NP.66:.2740..2..
NP.93:.2740..2..NP.72:.2740..2 .NP.89:.2
740..2..NP.103:.2740.W2... DRAWING METER
NEEDLE..2...I.1.4..2H..UM.286.P.(I.40),
NP..3R..I..3....03... SELECTING SCALE AN
D CORRECT ANSWER.Q3..SC..(9..(TI).1):.SC
.SD .2800.[3..SD.SC..3... SC .2830,2840,
2850,2860,2870,2880,2890,2900,2910,..3..
SC$."1 VOLT":CA.P..04:.2920.T3..SC$."2.5
VOLT":CA.P..1:.2920..3".SC$."5 VOLT":CA
.P..2:.2920..4,.SC$."10 VOLT":CA.P..4:.2
920.246.SC$."25 VOLT":CA.P.1:.2920.Q4@.S
C$."50 VOLT":CA.P.2:.2920.Q4J.SC$."100 V
OLT":CA.P.4:.2920..4T.SC$."250 VOLT":CA.
P.10:.2920..4^.SC$."500 VOLT":CA.P.20:.2
920..4H...J4R.. TIME DELAY..4|..D1.1.D.1
000:.:...4... PRINT COMMENT FOR CORRECT.
.5...".";H(CD$,20);.&5... I.1.C(C$(J)).<
5... J(C$(J),I,1);:..B5V...M5...K.1.4.T5
...K.F5..D.000:.2930:..T5..D.0:.2930..5&
..".";H(CD$,20);CL$;..50..3020..5:.. SEL
ECT COMMENT & CHECK FLAG.L5D.J..( 4..(TI
).1)..5N.FL(J).1:NC.NC.1:.NC.12..3170..5
X....6B..D.1.15:FL(D).0:.:NC.0:..56L.. C
LEAR WRONG ANSWER FROM SCREEN.`6V.. ".";
H(CD$,15):.D.1.8:. H(CL$,39):.:...6...".
PRESS 'C' TO CONTINUE."..6...G$:.G$..G(
67).3210..6....G6... CLEAR, DRAW METER,
POSITION CURSOR..6...".";:.2470:.".";H(C
D$,14);:...7...".":.NA$.."".3280.%7..F1$
."WELL YOU SEEM TO BE ABLE \"./7F..3300.
\7P.M$."WELL ":M1$.", YOU SEEM TO BE ABL
E \".O7Z.F1$.M$.NA$.M1$..7..F2$."TO READ
METERS QUITE WELL. \"..7..F3$."IT HAS B
EEN FUN WORKING WITH YOU. \GOODBYE UNTIL
NEXT TIME. "..7..C$(20).F1$.F2$.F3$..7.
.J.20..8\....8F....8P..K.1.4..8...K.+8..
D.0:.2930:..98..D.0:.2930.D8... CL$="":
PRINT".":PRINTCL$:PRINT"...".N8...3410..
8... R.W.DRAY R.R.#2 PETERBOROUGH ONT.
K9J 6X3 1981....
> CLICK IMAGE PREVIEW FOR FULL MODAL