METRIC M
FILE INFORMATION
FILENAME(S): METRIC M
FILE TYPE(S): PRG
FILE SIZE: 7.7K
FIRST SEEN: 2025-11-30 01:07:53
APPEARS ON: 2 disk(s)
FILE HASH
b128a4e8128777cb777771e34b27267df2e3f05b1657d7694c9995c9018bc4bb
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| L EHRNEN | METRIC M | PRG | Treasure Chest - Wolfgang Rauprich | 10 | 5 | DOWNLOAD FILE |
| FREESOFT DISK NR | METRIC M | PRG | Treasure Chest - Wolfgang Rauprich | 10 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 89 39 31 30 00 36 08 02 00 99 |.......910.6....|
00000010: 22 78 A9 1D 8D 14 03 A9 08 8D 15 03 58 60 20 EA |"x..........X` .|
00000020: FF A9 FF 85 91 4C 34 EA 78 A9 31 8D 14 03 A9 EA |.....L4.x.1.....|
00000030: 8D 15 03 58 60 20 00 61 08 03 00 99 22 78 A9 47 |...X` .a...."x.G|
00000040: 85 90 A9 04 85 91 58 60 20 EA FF A9 FF 85 9B 4C |......X` ......L|
00000050: 58 E4 78 A9 55 85 90 A9 E4 85 91 58 60 20 20 20 |X.x.U......X` |
00000060: 20 00 80 08 04 00 99 22 78 68 68 68 AA 68 A8 68 | ......"xhhh.h.h|
00000070: 68 68 68 68 68 68 98 48 8A 48 58 60 20 20 20 20 |hhhhhh.H.HX` |
00000080: 00 91 08 05 00 99 22 68 68 68 68 68 68 68 60 20 |......"hhhhhhh` |
00000090: 20 00 B8 08 06 00 99 22 A0 FF C8 84 FB A9 D8 85 | ......"........|
000000A0: FC 20 F1 B7 8A A2 04 A0 FF C8 91 FB 88 D0 FB E6 |. ..............|
000000B0: FC CA D0 F6 60 20 20 20 00 D5 08 07 00 99 22 A2 |....` ......".|
000000C0: 04 A0 FF C8 B1 FB 91 FD 88 D0 F9 E6 FC E6 FE CA |................|
000000D0: D0 F2 60 20 20 00 E6 08 23 00 8B 55 57 B2 30 A7 |..` ...#..UW.0.|
000000E0: 9E 55 55 2C 31 35 00 10 09 28 00 97 55 43 2C 30 |.UU,15...(..UC,0|
000000F0: 3A 97 55 4E 2C 30 3A 55 52 24 B2 22 22 3A 55 49 |:.UN,0:UR$."":UI|
00000100: 24 B2 22 22 3A 8B 55 4C B2 30 A7 55 4C B2 33 39 |$."":.UL.0.UL.39|
00000110: 00 24 09 2D 00 A1 55 49 24 3A 8B 55 49 24 B2 22 |.$.-..UI$:.UI$."|
00000120: 22 A7 34 35 00 59 09 32 00 55 41 B2 C6 28 55 49 |".45.Y.2.UA..(UI|
00000130: 24 29 3A 55 52 B2 C3 28 55 52 24 29 3A 8B 55 41 |$):UR..(UR$):.UA|
00000140: B2 31 33 AF 55 52 B1 30 A7 97 55 43 2C 31 3A 99 |.13.UR.0..UC,1:.|
00000150: 22 20 9D 22 3B 3A 89 37 30 00 8E 09 37 00 8B 55 |" .";:.70...7..U|
00000160: 41 B2 32 30 A7 91 AB 28 55 52 B2 30 29 89 34 35 |A.20...(UR.0).45|
00000170: 3A 55 52 24 B2 C8 28 55 52 24 2C 55 52 AB 31 29 |:UR$..(UR$,UR.1)|
00000180: 3A 99 22 9D 20 20 9D 9D 22 3B 3A 89 34 35 00 9C |:.". ..";:.45..|
00000190: 09 3C 00 8B 55 52 B2 55 4C A7 34 35 00 BA 09 41 |.<..UR.UL.45...A|
000001A0: 00 8D 39 35 3A 55 52 24 B2 55 52 24 AA 55 49 24 |..95:UR$.UR$.UI$|
000001B0: 3A 99 55 49 24 3B 3A 89 34 35 00 D3 09 46 00 8B |:.UI$;:.45...F..|
000001C0: 55 52 24 B2 55 58 24 A7 99 22 9D 20 22 3B 3A 89 |UR$.UX$..". ";:.|
000001D0: 31 34 35 00 F6 09 4B 00 81 55 49 B2 55 52 A4 31 |145...K..UI.UR.1|
000001E0: A9 AB 31 3A 8B CA 28 55 52 24 2C 55 49 2C 31 29 |..1:..(UR$,UI,1)|
000001F0: B2 22 20 22 A7 82 00 0C 0A 50 00 55 52 24 B2 C8 |." ".....P.UR$..|
00000200: 28 55 52 24 2C 55 49 29 3A 99 3A 8E 00 1E 0A 5F |(UR$,UI):.:...._|
00000210: 00 8B C3 28 55 53 24 29 B2 30 A7 31 31 30 00 4A |...(US$).0.110.J|
00000220: 0A 64 00 81 55 49 B2 31 A4 C3 28 55 53 24 29 3A |.d..UI.1..(US$):|
00000230: 8B 55 49 24 B3 B1 CA 28 55 53 24 2C 55 49 2C 31 |.UI$...(US$,UI,1|
00000240: 29 A7 82 3A 55 49 24 B2 22 22 00 50 0A 69 00 8E |)..:UI$."".P.i..|
00000250: 00 5D 0A 6E 00 8B 55 41 B2 34 36 A7 8E 00 70 0A |.].n..UA.46...p.|
00000260: 73 00 8B 55 41 B2 33 32 AF 55 52 B3 B1 30 A7 8E |s..UA.32.UR..0..|
00000270: 00 83 0A 78 00 8B 55 41 B1 34 37 AF 55 41 B3 35 |...x..UA.47.UA.5|
00000280: 38 A7 8E 00 96 0A 7D 00 8B 55 41 B1 36 34 AF 55 |8.....}..UA.64.U|
00000290: 41 B3 39 31 A7 8E 00 B2 0A 82 00 8B 55 41 B3 31 |A.91........UA.1|
000002A0: 39 33 B0 55 41 B1 32 31 38 A7 55 49 24 B2 22 22 |93.UA.218.UI$.""|
000002B0: 3A 8E 00 CF 0A 87 00 8B C2 28 55 54 29 B2 55 55 |:........(UT).UU|
000002C0: 25 A7 55 49 24 B2 C7 28 55 41 AB 31 32 38 29 00 |%.UI$..(UA.128).|
000002D0: D5 0A 8C 00 8E 00 04 0B 91 00 8D 31 37 30 3A 97 |...........170:.|
000002E0: 32 35 31 2C 30 3A 97 32 35 32 2C 55 53 AD 32 35 |251,0:.252,US.25|
000002F0: 36 3A 97 32 35 33 2C 30 3A 97 32 35 34 2C 55 46 |6:.253,0:.254,UF|
00000300: 3A 9E 55 56 00 1C 0B 96 00 55 5A B2 31 3A 55 56 |:.UV.....UZ.1:UV|
00000310: 25 B2 C2 28 55 54 29 3A 89 33 30 30 00 62 0B 9B |%..(UT):.300.b..|
00000320: 00 55 5A B2 30 3A 55 53 24 B2 55 4A 24 3A 55 47 |.UZ.0:US$.UJ$:UG|
00000330: 24 B2 55 4B 24 3A 55 54 24 B2 55 4C 24 3A 55 50 |$.UK$:UT$.UL$:UP|
00000340: B2 55 4A 3A 55 4C B2 55 4B 3A 99 22 93 22 3B 3A |.UJ:UL.UK:.".";:|
00000350: 8B 55 57 B2 30 A7 97 55 59 2C 36 3A 97 55 58 2C |.UW.0..UY,6:.UX,|
00000360: 31 34 00 A1 0B A0 00 97 55 54 2C 55 56 25 3A 97 |14......UT,UV%:.|
00000370: 32 35 31 2C 30 3A 97 32 35 32 2C 55 46 3A 97 32 |251,0:.252,UF:.2|
00000380: 35 33 2C 30 3A 97 32 35 34 2C 55 53 AD 32 35 36 |53,0:.254,US.256|
00000390: 3A 9E 55 56 3A 8B 55 57 B2 30 A7 9E 55 55 2C 31 |:.UV:.UW.0..UU,1|
000003A0: 35 00 CB 0B A5 00 97 55 31 2C 55 31 25 3A 97 55 |5......U1,U1%:.U|
000003B0: 32 2C 55 32 25 3A 97 55 33 2C 55 33 25 AB 31 3A |2,U2%:.U3,U3%.1:|
000003C0: 97 55 34 2C 55 34 25 3A 89 33 35 00 F7 0B AA 00 |.U4,U4%:.35.....|
000003D0: 55 31 25 B2 C2 28 55 31 29 3A 55 32 25 B2 C2 28 |U1%..(U1):U2%..(|
000003E0: 55 32 29 3A 55 33 25 B2 C2 28 55 33 29 3A 55 34 |U2):U3%..(U3):U4|
000003F0: 25 B2 C2 28 55 34 29 00 21 0C AF 00 55 4A 24 B2 |%..(U4).!...UJ$.|
00000400: 55 53 24 3A 55 4B 24 B2 55 47 24 3A 55 4C 24 B2 |US$:UK$.UG$:UL$.|
00000410: 55 54 24 3A 55 4A B2 55 50 3A 55 4B B2 55 4C 3A |UT$:UJ.UP:UK.UL:|
00000420: 8E 00 46 0C 2C 01 99 22 93 11 22 3A 97 55 54 2C |..F.,.."..":.UT,|
00000430: 55 55 25 3A 8B 55 57 B2 30 A7 97 55 59 2C 31 32 |UU%:.UW.0..UY,12|
00000440: 3A 97 55 58 2C 36 00 66 0C 31 01 99 22 20 20 20 |:.UX,6.f.1.." |
00000450: 20 20 20 20 20 20 20 20 20 20 20 20 20 4D 20 45 | M E|
00000460: 20 4E 20 55 11 22 00 92 0C 36 01 99 22 20 20 20 | N U."...6.." |
00000470: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00000480: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000490: 2D 22 00 B9 0C 3B 01 99 22 11 20 20 20 20 20 20 |-"...;..". |
000004A0: 20 31 2E 20 20 20 42 45 47 49 4E 20 4D 45 54 52 | 1. BEGIN METR|
000004B0: 49 43 20 4D 20 20 20 20 22 00 E3 0C 40 01 99 22 |IC M "...@.."|
000004C0: 11 11 20 20 20 20 20 20 20 32 2E 20 20 20 53 54 |.. 2. ST|
000004D0: 55 44 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F |UDENT INSTRUCTIO|
000004E0: 4E 53 22 00 0D 0D 45 01 99 22 11 11 20 20 20 20 |NS"...E..".. |
000004F0: 20 20 20 33 2E 20 20 20 54 45 41 43 48 45 52 20 | 3. TEACHER |
00000500: 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 00 28 0D |INSTRUCTIONS".(.|
00000510: 4A 01 99 22 11 11 20 20 20 20 20 20 20 34 2E 20 |J..".. 4. |
00000520: 20 20 51 55 49 54 11 22 00 54 0D 4F 01 99 22 20 | QUIT.".T.O.." |
00000530: 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | -------------|
00000540: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000550: 2D 2D 2D 22 00 7F 0D 54 01 99 22 11 11 20 20 20 |---"...T..".. |
00000560: 20 20 20 20 50 52 45 53 53 20 41 20 4E 55 4D 42 | PRESS A NUMB|
00000570: 45 52 20 4B 45 59 20 28 31 2D 34 29 20 22 3B 00 |ER KEY (1-4) ";.|
00000580: 93 0D 59 01 55 4C B2 31 3A 55 53 24 B2 22 31 32 |..Y.UL.1:US$."12|
00000590: 33 34 22 00 A2 0D 5B 01 8D 33 35 3A 55 53 24 B2 |34"...[..35:US$.|
000005A0: 22 22 00 BF 0D 5E 01 91 C5 28 55 52 24 29 8D 31 |""...^...(UR$).1|
000005B0: 30 30 30 2C 34 30 30 2C 35 30 30 2C 33 39 30 00 |000,400,500,390.|
000005C0: C8 0D 63 01 89 33 30 30 00 DC 0D 72 01 8B 55 5A |..c..300...r..UZ|
000005D0: B2 31 A7 9E 55 50 25 3A 89 31 35 35 00 E2 0D 77 |.1..UP%:.155...w|
000005E0: 01 8E 00 0A 0E 86 01 9E 55 45 3A 99 22 9A 93 22 |........UE:.".."|
000005F0: 3A 8B 55 57 B2 30 A7 97 55 59 2C 36 3A 97 55 58 |:.UW.0..UY,6:.UX|
00000600: 2C 31 34 3A 9E 55 55 2C 31 34 00 12 0E 8B 01 9C |,14:.UU,14......|
00000610: 3A 80 00 37 0E 90 01 99 22 93 22 3A 97 55 54 2C |:..7....".":.UT,|
00000620: 55 4C 25 3A 8B 55 57 B2 30 A7 97 55 59 2C 31 31 |UL%:.UW.0..UY,11|
00000630: 3A 97 55 58 2C 31 32 00 6E 0E 95 01 55 54 24 B2 |:.UX,12.n...UT$.|
00000640: 22 20 CD 45 54 52 49 43 20 CD 20 22 3A 55 48 B2 |" .ETRIC . ":UH.|
00000650: 31 3A 55 50 B2 30 3A 55 47 24 B2 22 D3 54 55 44 |1:UP.0:UG$.".TUD|
00000660: 45 4E 54 20 C9 4E 53 54 22 3A 8D 38 35 30 00 9E |ENT .NST":.850..|
00000670: 0E 9A 01 99 22 11 11 20 20 D4 48 49 53 20 45 58 |....".. .HIS EX|
00000680: 45 52 43 49 53 45 20 57 49 4C 4C 20 47 49 56 45 |ERCISE WILL GIVE|
00000690: 20 59 4F 55 20 50 52 41 43 54 49 43 45 22 00 CD | YOU PRACTICE"..|
000006A0: 0E A4 01 99 22 11 20 49 4E 20 43 4F 4E 56 45 52 |....". IN CONVER|
000006B0: 54 49 4E 47 20 46 52 4F 4D 20 4F 4E 45 20 4D 45 |TING FROM ONE ME|
000006C0: 54 52 49 43 20 55 4E 49 54 20 4F 46 22 00 F5 0E |TRIC UNIT OF"...|
000006D0: A6 01 99 22 11 20 4C 45 4E 47 54 48 20 4F 52 20 |...". LENGTH OR |
000006E0: 44 49 53 54 41 4E 43 45 20 54 4F 20 41 4E 4F 54 |DISTANCE TO ANOT|
000006F0: 48 45 52 2E 22 00 1C 0F A8 01 99 22 11 11 20 D9 |HER."......".. .|
00000700: 4F 55 20 57 49 4C 4C 20 42 45 20 47 49 56 45 4E |OU WILL BE GIVEN|
00000710: 20 54 45 4E 20 4D 45 54 52 49 43 22 00 45 0F AA | TEN METRIC".E..|
00000720: 01 99 22 11 20 43 4F 4E 56 45 52 53 49 4F 4E 20 |..". CONVERSION |
00000730: 51 55 45 53 54 49 4F 4E 53 20 54 4F 20 41 4E 53 |QUESTIONS TO ANS|
00000740: 57 45 52 2E 22 00 6D 0F AC 01 99 22 11 20 D9 4F |WER.".m....". .O|
00000750: 55 20 57 49 4C 4C 20 42 45 20 53 43 4F 52 45 44 |U WILL BE SCORED|
00000760: 20 41 54 20 54 48 45 20 45 4E 44 2E 22 00 80 0F | AT THE END."...|
00000770: AE 01 8D 38 33 35 3A 55 48 B2 31 3A 8D 38 35 30 |...835:UH.1:.850|
00000780: 00 9A 0F B0 01 99 22 13 11 11 11 11 20 20 12 D2 |......"..... ..|
00000790: C5 CD C5 CD C2 C5 D2 3A 92 22 00 B3 0F B2 01 99 |.......:."......|
000007A0: 22 11 11 11 11 11 11 11 11 11 11 11 11 11 20 20 |"............. |
000007B0: 20 A3 A3 00 DE 0F B4 01 99 22 91 91 20 20 4D 4D | ........".. MM|
000007C0: A7 20 20 31 30 4D 4D 3D 31 43 4D 22 A3 32 36 29 |. 10MM=1CM".26)|
000007D0: 22 12 31 4D 4D 3D 30 2E 30 30 31 4D 92 22 00 E7 |".1MM=0.001M."..|
000007E0: 0F B6 01 8D 34 39 37 00 09 10 B8 01 99 22 91 91 |....497......"..|
000007F0: 20 20 20 20 A7 A3 A3 22 A3 32 36 29 22 12 20 20 | ...".26)". |
00000800: 20 20 20 20 20 20 20 20 92 00 36 10 BA 01 99 22 | ..6...."|
00000810: 91 91 20 20 20 20 43 4D A7 20 20 31 30 43 4D 3D |.. CM. 10CM=|
00000820: 31 44 4D 22 A3 32 36 29 22 12 31 43 4D 3D 30 2E |1DM".26)".1CM=0.|
00000830: 30 31 4D 20 92 22 00 3F 10 BC 01 8D 34 39 37 00 |01M .".?....497.|
00000840: 64 10 BE 01 99 22 91 91 20 20 20 20 20 20 A7 A3 |d....".. ..|
00000850: A3 22 A3 32 36 29 22 12 20 20 20 20 20 20 20 20 |.".26)". |
00000860: 20 20 92 22 00 92 10 C0 01 99 22 91 91 20 20 20 | ."......".. |
00000870: 20 20 20 44 4D A7 20 20 31 30 44 4D 3D 31 4D 22 | DM. 10DM=1M"|
00000880: A3 32 36 29 22 12 31 44 4D 3D 30 2E 31 4D 20 20 |.26)".1DM=0.1M |
00000890: 92 22 00 9B 10 C2 01 8D 34 39 37 00 C3 10 C4 01 |."......497.....|
000008A0: 99 22 91 91 20 20 20 20 20 20 20 20 A7 A3 A3 20 |.".. ... |
000008B0: 22 A3 32 36 29 22 12 20 20 20 20 20 20 20 20 20 |".26)". |
000008C0: 20 92 22 00 F6 10 C6 01 99 22 91 91 20 20 20 20 | ."......".. |
000008D0: 20 20 20 20 20 12 4D 92 A7 20 20 31 30 4D 3D 31 | .M.. 10M=1|
000008E0: 44 41 4D 22 A3 32 36 29 22 12 20 20 20 20 20 20 |DAM".26)". |
000008F0: 20 20 20 20 92 22 00 FF 10 C8 01 8D 34 39 37 00 | ."......497.|
00000900: 28 11 CA 01 99 22 91 91 20 20 20 20 20 20 20 20 |(....".. |
00000910: 20 20 A7 A3 A3 22 A3 32 36 29 22 12 20 20 20 20 | ...".26)". |
00000920: 20 20 20 20 20 20 92 22 00 5C 11 CC 01 99 22 91 | .".\....".|
00000930: 91 20 20 20 20 20 20 20 20 20 44 41 4D A7 20 20 |. DAM. |
00000940: 31 30 44 41 4D 3D 31 48 4D 22 A3 32 36 29 22 12 |10DAM=1HM".26)".|
00000950: 31 44 41 4D 3D 31 30 4D 20 20 92 22 00 65 11 CE |1DAM=10M .".e..|
00000960: 01 8D 34 39 37 00 90 11 D0 01 99 22 91 91 20 20 |..497......".. |
00000970: 20 20 20 20 20 20 20 20 20 20 A7 A3 A3 22 A3 32 | ...".2|
00000980: 36 29 22 12 20 20 20 20 20 20 20 20 20 20 92 22 |6)". ."|
00000990: 00 C5 11 D2 01 99 22 91 91 20 20 20 20 20 20 20 |......".. |
000009A0: 20 20 20 20 20 48 4D A7 20 20 31 30 48 4D 3D 31 | HM. 10HM=1|
000009B0: 4B 4D 22 A3 32 36 29 22 12 31 48 4D 3D 31 30 30 |KM".26)".1HM=100|
000009C0: 4D 20 20 92 22 00 F1 11 D4 01 99 22 91 91 20 20 |M ."......".. |
000009D0: 20 20 20 20 20 20 20 20 20 20 20 20 A7 A3 A3 22 | ..."|
000009E0: A3 32 36 29 22 12 20 20 20 20 20 20 20 20 20 20 |.26)". |
000009F0: 22 00 FA 11 D6 01 8D 34 39 37 00 29 12 D8 01 99 |"......497.)....|
00000A00: 22 91 91 20 20 20 20 20 20 20 20 20 20 20 20 20 |".. |
00000A10: 20 20 4B 4D 20 20 22 A3 32 36 29 22 12 31 4B 4D | KM ".26)".1KM|
00000A20: 3D 31 30 30 30 4D 20 92 22 00 37 12 DB 01 8D 38 |=1000M .".7....8|
00000A30: 33 35 3A 8D 38 35 30 00 5E 12 DC 01 99 22 11 11 |35:.850.^...."..|
00000A40: 20 C9 46 20 59 4F 55 20 57 49 53 48 20 54 4F 20 | .F YOU WISH TO |
00000A50: 52 45 54 55 52 4E 20 54 4F 20 54 48 45 22 00 87 |RETURN TO THE"..|
00000A60: 12 DE 01 99 22 11 20 49 4E 53 54 52 55 43 54 49 |....". INSTRUCTI|
00000A70: 4F 4E 53 20 4F 52 20 54 4F 20 45 53 43 41 50 45 |ONS OR TO ESCAPE|
00000A80: 2C 20 4A 55 53 54 22 00 A4 12 E0 01 99 22 11 20 |, JUST"......". |
00000A90: 45 4E 54 45 52 20 27 48 27 20 3C D2 C5 D4 D5 D2 |ENTER 'H' <.....|
00000AA0: CE 3E 2E 22 00 AD 12 E5 01 8D 38 33 35 00 C1 12 |.>."......835...|
00000AB0: EA 01 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 31 35 |...UZ.1..UP%:.15|
00000AC0: 35 00 C7 12 EF 01 8E 00 D9 12 F1 01 81 49 B2 31 |5............I.1|
00000AD0: A4 31 30 30 3A 82 49 3A 8E 00 FD 12 F4 01 99 22 |.100:.I:......."|
00000AE0: 93 22 3A 97 55 54 2C 55 4C 25 3A 8B 55 57 B2 30 |.":.UT,UL%:.UW.0|
00000AF0: A7 97 55 59 2C 32 3A 97 55 58 2C 31 30 00 33 13 |..UY,2:.UX,10.3.|
00000B00: F5 01 55 54 24 B2 22 20 CD 45 54 52 49 43 20 CD |..UT$." .ETRIC .|
00000B10: 22 3A 55 48 B2 31 3A 55 50 B2 30 3A 55 47 24 B2 |":UH.1:UP.0:UG$.|
00000B20: 22 D4 45 41 43 48 45 52 20 C9 4E 53 54 22 3A 8D |".EACHER .NST":.|
00000B30: 38 35 30 00 60 13 F6 01 99 22 11 11 20 20 20 20 |850.`....".. |
00000B40: 20 D4 4F 20 54 48 45 20 42 45 53 54 20 4F 46 20 | .O THE BEST OF |
00000B50: 4F 55 52 20 4B 4E 4F 57 4C 45 44 47 45 2C 11 22 |OUR KNOWLEDGE,."|
00000B60: 00 8B 13 F7 01 99 22 20 20 20 20 20 54 48 49 53 |......" THIS|
00000B70: 20 50 52 4F 47 52 41 4D 20 49 53 20 49 4E 20 54 | PROGRAM IS IN T|
00000B80: 48 45 20 50 55 42 4C 49 43 11 22 00 B6 13 F8 01 |HE PUBLIC.".....|
00000B90: 99 22 20 20 20 20 20 44 4F 4D 41 49 4E 2E 20 20 |." DOMAIN. |
00000BA0: C9 46 20 54 48 49 53 20 49 53 20 4E 4F 54 20 54 |.F THIS IS NOT T|
00000BB0: 52 55 45 2C 11 22 00 D4 13 F9 01 99 22 20 20 20 |RUE,."......" |
00000BC0: 20 20 50 4C 45 41 53 45 20 43 4F 4E 54 41 43 54 | PLEASE CONTACT|
00000BD0: 3A 11 11 22 00 FD 13 FA 01 99 22 20 20 20 20 20 |:.."......" |
00000BE0: 20 C3 CF CD CD CF C4 CF D2 C5 A0 C2 D5 D3 C9 CE | ...............|
00000BF0: C5 D3 D3 A0 CD C1 C3 C8 C9 CE C5 D3 22 00 21 14 |............".!.|
00000C00: FB 01 99 22 20 20 20 20 20 20 20 20 20 20 11 33 |..." .3|
00000C10: 33 37 30 20 D0 48 41 52 4D 41 43 59 20 C1 56 45 |370 .HARMACY .VE|
00000C20: 2E 00 46 14 FC 01 99 22 20 20 20 20 20 20 20 20 |..F...." |
00000C30: 20 20 11 C1 47 49 4E 43 4F 55 52 54 2C 20 CF 4E | ..GINCOURT, .N|
00000C40: 54 41 52 49 4F 22 00 68 14 FD 01 99 22 20 20 20 |TARIO".h...." |
00000C50: 20 20 20 20 20 20 20 11 C3 41 4E 41 44 41 2C 20 | ..ANADA, |
00000C60: CD 31 D7 20 32 CB 34 22 00 89 14 FE 01 99 22 20 |.1. 2.4"......" |
00000C70: 20 20 20 20 20 20 20 20 20 11 28 34 31 36 29 20 | .(416) |
00000C80: 34 39 39 2D 34 32 39 32 22 00 9C 14 FF 01 55 48 |499-4292".....UH|
00000C90: B2 31 3A 8D 38 33 35 3A 8D 38 35 30 00 C2 14 00 |.1:.835:.850....|
00000CA0: 02 99 22 20 20 20 20 20 20 11 11 D0 52 4F 47 52 |.." ...ROGR|
00000CB0: 41 4D 20 CE 41 4D 45 3A 20 CD 45 54 52 49 43 20 |AM .AME: .ETRIC |
00000CC0: CD 22 00 EB 14 01 02 99 22 20 20 20 20 20 20 11 |."......" .|
00000CD0: D7 52 49 54 54 45 4E 20 42 59 20 20 3A 20 CA 4F |.RITTEN BY : .O|
00000CE0: 48 4E 20 D3 54 45 56 45 4E 53 22 00 13 15 02 02 |HN .TEVENS".....|
00000CF0: 99 22 20 20 20 20 20 20 11 D2 45 56 49 53 45 44 |." ..EVISED|
00000D00: 20 42 59 20 20 3A 20 CA 4F 48 4E 20 D2 49 44 4C | BY : .OHN .IDL|
00000D10: 45 52 22 00 40 15 03 02 99 22 20 20 20 20 20 20 |ER".@...." |
00000D20: 11 11 D4 48 49 53 20 50 52 4F 47 52 41 4D 20 57 |...HIS PROGRAM W|
00000D30: 49 4C 4C 20 52 55 4E 20 4F 4E 20 41 4E 59 11 11 |ILL RUN ON ANY..|
00000D40: 00 67 15 04 02 99 22 20 20 20 20 20 20 20 20 20 |.g...." |
00000D50: C2 C1 D3 C9 C3 A0 32 2E 30 20 D0 C5 D4 20 C3 4F |......2.0 ... .O|
00000D60: 4D 50 55 54 45 52 11 00 8E 15 05 02 99 22 20 20 |MPUTER......." |
00000D70: 20 20 20 20 20 20 20 C2 C1 D3 C9 C3 20 34 2E 30 | ..... 4.0|
00000D80: 20 D0 C5 D4 A0 C3 4F 4D 50 55 54 45 52 11 00 B0 | .....OMPUTER...|
00000D90: 15 06 02 99 22 20 20 20 20 20 20 20 20 20 38 30 |...." 80|
00000DA0: 33 32 20 C3 C2 CD 20 C3 4F 4D 50 55 54 45 52 11 |32 ... .OMPUTER.|
00000DB0: 00 D5 15 07 02 99 22 20 20 20 20 20 20 20 20 20 |......" |
00000DC0: C3 4F 4D 4D 4F 44 4F 52 45 20 36 34 20 C3 4F 4D |.OMMODORE 64 .OM|
00000DD0: 50 55 54 45 52 00 DE 15 49 02 8D 38 33 35 00 F2 |PUTER...I..835..|
00000DE0: 15 4E 02 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 31 |.N..UZ.1..UP%:.1|
00000DF0: 35 35 00 F8 15 53 02 8E 00 2C 16 BC 02 99 55 43 |55...S...,....UC|
00000E00: 24 22 93 11 11 11 42 45 46 4F 52 45 20 52 55 4E |$"....BEFORE RUN|
00000E10: 4E 49 4E 47 20 54 48 49 53 20 50 52 4F 47 52 41 |NING THIS PROGRA|
00000E20: 4D 20 4F 4E 20 41 4E 20 38 30 33 32 00 64 16 C1 |M ON AN 8032.d..|
00000E30: 02 99 22 20 20 20 20 20 20 4C 4F 41 44 20 54 48 |.." LOAD TH|
00000E40: 45 20 27 43 42 4D 20 34 30 33 32 27 20 50 52 4F |E 'CBM 4032' PRO|
00000E50: 47 52 41 4D 11 11 11 11 11 11 11 11 11 11 11 11 |GRAM............|
00000E60: 11 22 3A 80 00 8C 16 20 03 99 22 93 11 1D 1F 22 |.":.... .."...."|
00000E70: 3B 3A 97 55 54 2C 55 55 25 3A 8B 55 57 B2 30 A7 |;:.UT,UU%:.UW.0.|
00000E80: 97 55 59 2C 31 3A 97 55 58 2C 31 34 00 A2 16 21 |.UY,1:.UX,14...!|
00000E90: 03 81 49 B2 31 A4 33 38 3A 99 22 12 20 92 22 3B |..I.1.38:.". .";|
00000EA0: 3A 82 00 BA 16 22 03 81 49 B2 31 A4 32 32 3A 99 |:...."..I.1.22:.|
00000EB0: 22 11 9D 12 20 92 22 3B 3A 82 00 D2 16 23 03 81 |"... .";:....#..|
00000EC0: 49 B2 31 A4 33 37 3A 99 22 9D 9D 12 20 92 22 3B |I.1.37:."... .";|
00000ED0: 3A 82 00 EA 16 24 03 81 49 B2 31 A4 32 32 3A 99 |:....$..I.1.22:.|
00000EE0: 22 91 9D 12 20 92 22 3B 3A 82 00 0A 17 25 03 99 |"... .";:....%..|
00000EF0: 22 13 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D |"...............|
00000F00: 1D 1D 1D 1D 1F 12 A9 20 20 92 00 24 17 26 03 99 |....... ..$.&..|
00000F10: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 20 20 |"........... . |
00000F20: 12 20 92 A9 00 50 17 27 03 99 22 1D 1D 1D 1D 1D |. ...P.'..".....|
00000F30: 1D 1D 1D 1D 1D 12 20 92 20 20 1C 12 A3 DF 1F 92 |...... . ......|
00000F40: 20 4F 20 4D 20 4D 20 4F 20 44 20 4F 20 52 20 45 | O M M O D O R E|
00000F50: 00 66 17 28 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |.f.(..".........|
00000F60: 1D DF 12 20 20 92 00 8C 17 29 03 99 22 11 11 1D |... ....).."...|
00000F70: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1C |................|
00000F80: 45 44 55 43 41 54 49 4F 4E 41 4C 11 00 AC 17 2A |EDUCATIONAL....*|
00000F90: 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..".............|
00000FA0: 1D 1D 1D 1F 53 4F 46 54 57 41 52 45 00 CA 17 2B |....SOFTWARE...+|
00000FB0: 03 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..".............|
00000FC0: 1D 1D 1D 1D 1C 31 39 38 33 1F 00 06 18 2C 03 99 |.....1983....,..|
00000FD0: C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D |.(UD$,24);".....|
00000FE0: 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 41 43 45 |.....PRESS SPACE|
00000FF0: 20 42 41 52 20 4F 52 20 57 41 49 54 92 22 55 43 | BAR OR WAIT."UC|
00001000: 24 3A 55 49 B2 30 00 2D 18 2D 03 A1 55 49 24 3A |$:UI.0.-.-..UI$:|
00001010: 8B 55 49 24 B3 B1 22 20 22 A7 55 49 B2 55 49 AA |.UI$.." ".UI.UI.|
00001020: 31 3A 8B 55 49 B3 32 35 30 A7 38 31 33 00 36 18 |1:.UI.250.813.6.|
00001030: 2E 03 89 33 30 30 00 71 18 43 03 97 55 4E 2C 30 |...300.q.C..UN,0|
00001040: 3A 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D |:..(UD$,24);"...|
00001050: 1D 1D 1D 12 50 52 45 53 53 20 53 50 41 43 45 20 |....PRESS SPACE |
00001060: 42 41 52 20 54 4F 20 43 4F 4E 54 49 4E 55 45 92 |BAR TO CONTINUE.|
00001070: 22 00 88 18 48 03 A1 55 49 24 3A 8B 55 49 24 B3 |"...H..UI$:.UI$.|
00001080: B1 22 20 22 A7 38 34 30 00 8E 18 4D 03 8E 00 C0 |." ".840...M....|
00001090: 18 52 03 55 50 B2 55 50 AA 31 3A 99 22 93 22 C8 |.R.UP.UP.1:.".".|
000010A0: 28 55 54 24 AA 55 50 24 2C 32 31 29 3B C9 28 55 |(UT$.UP$,21);.(U|
000010B0: 50 24 AA 55 47 24 AA C4 28 55 50 29 2C 31 38 29 |P$.UG$..(UP),18)|
000010C0: 00 EF 18 57 03 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D |...W.." --------|
000010D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000010E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".|
000010F0: 29 19 5C 03 8B 55 48 B2 30 A7 99 C8 28 55 44 24 |).\..UH.0...(UD$|
00001100: 2C 32 34 29 3B C8 28 55 50 24 2C 37 29 3B 22 48 |,24);.(UP$,7);"H|
00001110: 45 4C 50 20 2D 20 50 52 45 53 53 20 20 20 48 20 |ELP - PRESS H |
00001120: 3C 52 45 54 55 52 4E 3E 22 00 3A 19 61 03 55 48 |<RETURN>".:.a.UH|
00001130: B2 30 3A 99 22 13 11 22 3A 8E 00 72 19 6B 03 99 |.0:."..":..r.k..|
00001140: C8 28 55 44 24 2C 32 34 29 3B 22 20 20 20 20 20 |.(UD$,24);" |
00001150: 20 20 20 20 20 20 4F 4E 45 20 4D 4F 4D 45 4E 54 | ONE MOMENT|
00001160: 20 50 4C 45 41 53 45 2E 2E 2E 20 20 20 20 20 22 | PLEASE... "|
00001170: 3A 8E 00 C2 19 84 03 55 58 24 B2 22 48 22 3A 55 |:......UX$."H":U|
00001180: 53 B2 33 32 37 36 38 3A 55 31 B2 31 39 36 3A 55 |S.32768:U1.196:U|
00001190: 32 B2 31 39 37 3A 55 33 B2 31 39 38 3A 55 34 B2 |2.197:U3.198:U4.|
000011A0: 32 31 36 3A 55 43 B2 31 36 37 3A 55 42 B2 31 30 |216:UC.167:UB.10|
000011B0: 32 34 3A 55 44 B2 31 30 38 34 3A 55 45 B2 31 31 |24:UD.1084:UE.11|
000011C0: 30 35 00 0B 1A 85 03 55 54 B2 35 39 34 36 38 3A |05.....UT.59468:|
000011D0: 55 55 25 B2 31 32 3A 55 4C 25 B2 31 34 3A 55 50 |UU%.12:UL%.14:UP|
000011E0: 25 B2 31 31 35 38 3A 55 4E B2 31 35 38 3A 97 35 |%.1158:UN.158:.5|
000011F0: 30 30 30 33 2C 30 3A 55 57 B2 C2 28 35 30 30 30 |0003,0:UW..(5000|
00001200: 33 29 3A 55 46 B2 C2 28 35 33 29 00 59 1A 86 03 |3):UF..(53).Y...|
00001210: 8B 55 57 B2 30 A7 55 53 B2 31 30 32 34 3A 55 31 |.UW.0.US.1024:U1|
00001220: B2 32 30 39 3A 55 32 B2 32 31 30 3A 55 33 B2 32 |.209:U2.210:U3.2|
00001230: 31 31 3A 55 34 B2 32 31 34 3A 55 43 B2 32 30 34 |11:U4.214:UC.204|
00001240: 3A 55 42 B2 32 30 34 38 3A 55 58 B2 35 33 32 38 |:UB.2048:UX.5328|
00001250: 30 3A 55 44 B2 32 30 36 34 00 A3 1A 87 03 8B 55 |0:UD.2064......U|
00001260: 57 B2 30 A7 55 54 B2 35 33 32 37 32 3A 55 55 25 |W.0.UT.53272:UU%|
00001270: B2 32 31 3A 55 4C 25 B2 32 33 3A 55 50 25 B2 32 |.21:UL%.23:UP%.2|
00001280: 31 35 31 3A 55 4E B2 31 39 38 3A 55 59 B2 35 33 |151:UN.198:UY.53|
00001290: 32 38 31 3A 55 55 B2 32 31 39 39 3A 55 45 B2 32 |281:UU.2199:UE.2|
000012A0: 30 38 37 00 CF 1A 88 03 55 43 24 B2 C7 28 31 35 |087.....UC$..(15|
000012B0: 35 29 3A 55 56 B2 31 32 31 34 3A 8B 55 57 B2 30 |5):UV.1214:.UW.0|
000012C0: A7 55 46 B2 31 39 36 3A 55 56 B2 32 32 33 38 00 |.UF.196:UV.2238.|
000012D0: 20 1B 89 03 55 44 24 B2 22 13 11 11 11 11 11 11 | ...UD$.".......|
000012E0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000012F0: 11 11 22 3A 55 50 24 B2 22 20 20 20 20 20 20 20 |..":UP$." |
00001300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001320: 00 43 1B 8B 03 55 54 24 B2 22 CD 45 54 52 49 43 |.C...UT$.".ETRIC|
00001330: 20 CD 22 3A 8F 20 50 52 4F 47 52 41 4D 20 54 49 | .":. PROGRAM TI|
00001340: 54 4C 45 00 49 1B 8D 03 8E 00 6C 1B 8E 03 8D 39 |TLE.I.....l....9|
00001350: 30 30 3A 99 22 93 22 3A 99 22 A0 22 3A 8F 20 53 |00:.".":.".":. S|
00001360: 48 49 46 54 45 44 20 53 50 41 43 45 00 82 1B 93 |HIFTED SPACE....|
00001370: 03 8B C2 28 55 53 AA 34 30 29 B3 B1 39 36 A7 37 |...(US.40)..96.7|
00001380: 30 30 00 A8 1B 98 03 8B 28 B8 28 30 29 AB 28 B4 |00......(.(0).(.|
00001390: 28 B8 28 30 29 29 B3 30 29 AC 36 35 35 33 36 29 |(.(0)).0).65536)|
000013A0: B1 35 30 30 A7 39 33 35 00 D8 1B 9D 03 99 55 43 |.500.935......UC|
000013B0: 24 22 93 11 11 54 48 49 53 20 4D 41 43 48 49 4E |$"...THIS MACHIN|
000013C0: 45 20 44 4F 45 53 20 4E 4F 54 20 48 41 56 45 20 |E DOES NOT HAVE |
000013D0: 45 4E 4F 55 47 48 11 22 00 02 1C A2 03 99 22 4D |ENOUGH."......"M|
000013E0: 45 4D 4F 52 59 20 54 4F 20 52 55 4E 20 54 48 49 |EMORY TO RUN THI|
000013F0: 53 20 50 52 4F 47 52 41 4D 20 21 22 3A 9E 55 45 |S PROGRAM !":.UE|
00001400: 3A 80 00 18 1C A7 03 99 22 93 22 55 43 24 3A 8B |:......."."UC$:.|
00001410: 55 57 B2 30 A7 39 36 35 00 35 1C AC 03 8B 55 46 |UW.0.965.5....UF|
00001420: B2 36 30 B0 55 46 B2 31 30 38 B0 55 46 B2 31 32 |.60.UF.108.UF.12|
00001430: 34 A7 39 35 30 00 4F 1C B1 03 97 35 32 2C 30 3A |4.950.O....52,0:|
00001440: 97 35 33 2C 55 46 AB 34 3A 9C 3A 8D 39 30 30 00 |.53,UF.4:.:.900.|
00001450: 86 1C B6 03 8B 55 57 B2 31 36 30 A7 97 31 31 30 |.....UW.160..110|
00001460: 33 2C 38 38 3A 97 31 31 30 34 2C 32 32 38 3A 97 |3,88:.1104,228:.|
00001470: 31 31 30 37 2C 38 35 3A 97 31 31 31 31 2C 32 32 |1107,85:.1111,22|
00001480: 38 3A 89 39 36 35 00 C3 1C BB 03 8B 55 57 B3 B1 |8:.965......UW..|
00001490: 31 A7 99 22 93 54 48 49 53 20 50 47 4D 20 57 49 |1..".THIS PGM WI|
000014A0: 4C 4C 20 4E 4F 54 20 57 4F 52 4B 20 4F 4E 20 54 |LL NOT WORK ON T|
000014B0: 48 49 53 20 4D 41 43 48 49 4E 45 21 22 3A 9E 55 |HIS MACHINE!":.U|
000014C0: 45 3A 80 00 F2 1C C0 03 97 31 31 30 33 2C 34 39 |E:.......1103,49|
000014D0: 3A 97 31 31 30 34 2C 32 33 30 3A 97 31 31 30 37 |:.1104,230:.1107|
000014E0: 2C 34 36 3A 97 31 31 31 31 2C 32 33 30 3A 89 39 |,46:.1111,230:.9|
000014F0: 36 35 00 FA 1C C5 03 9E 55 44 00 08 1D CA 03 8D |65......UD......|
00001500: 38 30 30 3A 89 33 30 30 00 21 1D E8 03 8B 55 5A |800:.300.!....UZ|
00001510: B2 31 A7 9E 55 50 25 3A 9E 55 50 25 3A 55 5A B2 |.1..UP%:.UP%:UZ.|
00001520: 30 00 43 1D E9 03 99 22 93 22 55 43 24 3B 3A 8C |0.C...."."UC$;:.|
00001530: 3A 8B 55 57 B2 30 A7 97 55 59 2C 36 3A 97 55 58 |:.UW.0..UY,6:.UX|
00001540: 2C 31 34 00 5D 1D ED 03 55 47 24 B2 22 D1 55 45 |,14.]...UG$.".UE|
00001550: 53 54 49 4F 4E 20 23 22 3A 46 4C B2 30 00 63 1D |STION #":FL.0.c.|
00001560: F2 03 8C 00 83 1D FC 03 8F 20 4D 45 54 52 49 43 |......... METRIC|
00001570: 53 2D 55 4E 49 54 53 20 4F 46 20 44 49 53 54 41 |S-UNITS OF DISTA|
00001580: 4E 43 45 00 96 1D 06 04 8F 20 4A 4F 48 4E 20 53 |NCE...... JOHN S|
00001590: 54 45 56 45 4E 53 00 AD 1D 10 04 8F 20 4E 4F 56 |TEVENS...... NOV|
000015A0: 45 4D 42 45 52 20 31 31 2C 31 39 38 31 00 B3 1D |EMBER 11,1981...|
000015B0: 1A 04 8F 00 C0 1D 24 04 97 20 55 54 2C 55 4C 25 |......$.. UT,UL%|
000015C0: 00 CB 1D 56 04 42 24 B2 22 A6 22 00 E1 1D 60 04 |...V.B$."."...`.|
000015D0: 99 22 93 22 3A 8B 55 57 B2 30 A7 9E 55 55 2C 31 |.".":.UW.0..UU,1|
000015E0: 35 00 EE 1D 6A 04 81 20 49 B2 31 A4 33 39 00 F7 |5...j.. I.1.39..|
000015F0: 1D 74 04 99 42 24 3B 00 FF 1D 7E 04 82 20 49 00 |.t..B$;...~.. I.|
00001600: 0C 1E 88 04 81 20 49 B2 31 A4 31 37 00 19 1E 92 |..... I.1.17....|
00001610: 04 99 22 9D 11 22 42 24 3B 00 20 1E 9C 04 82 49 |..".."B$;. ....I|
00001620: 00 2D 1E A6 04 81 20 49 B2 31 A4 33 38 00 3A 1E |.-.... I.1.38.:.|
00001630: B0 04 99 22 9D 9D 22 42 24 3B 00 41 1E BA 04 82 |...".."B$;.A....|
00001640: 49 00 4E 1E C4 04 81 20 49 B2 31 A4 31 37 00 5B |I.N.... I.1.17.[|
00001650: 1E CE 04 99 22 9D 91 22 42 24 3B 00 62 1E D8 04 |....".."B$;.b...|
00001660: 82 49 00 72 1E E2 04 99 22 13 11 11 11 11 11 11 |.I.r....".......|
00001670: 11 22 00 7B 1E EC 04 99 A3 38 29 00 87 1E F6 04 |.".{.....8).....|
00001680: 81 49 B2 31 A4 33 30 00 9F 1E 00 05 99 22 9D 9D |.I.1.30......"..|
00001690: 9D 9D 9D 9D 9D 20 CD C5 D4 D2 C9 C3 D3 22 3B 00 |..... .......";.|
000016A0: AE 1E 0A 05 81 4A B2 31 A4 32 30 3A 82 4A 00 B6 |.....J.1.20:.J..|
000016B0: 1E 14 05 82 20 49 00 C7 1E 1E 05 99 22 13 11 11 |.... I......"...|
000016C0: 11 11 11 11 11 11 22 00 D9 1E 28 05 81 20 58 B2 |......"...(.. X.|
000016D0: 33 30 A4 31 36 20 A9 AB 31 00 EF 1E 32 05 99 A3 |30.16 ..1...2...|
000016E0: 58 29 22 91 91 11 CD C5 D4 D2 C9 C3 D3 A0 22 00 |X)"...........".|
000016F0: FE 1E 3C 05 81 4A B2 31 A4 32 30 3A 82 4A 00 06 |..<..J.1.20:.J..|
00001700: 1F 46 05 82 20 58 00 25 1F 50 05 99 A3 31 31 29 |.F.. X.%.P...11)|
00001710: 22 11 11 55 4E 49 54 53 20 4F 46 20 44 49 53 54 |"..UNITS OF DIST|
00001720: 41 4E 43 45 22 00 35 1F 5A 05 81 20 49 B2 31 A4 |ANCE".5.Z.. I.1.|
00001730: 35 30 30 3A 82 00 6A 1F 64 05 99 A3 31 29 22 11 |500:..j.d...1)".|
00001740: 11 11 11 11 11 11 11 11 11 11 41 46 54 45 52 20 |..........AFTER |
00001750: 45 41 43 48 20 45 4E 54 52 59 20 50 52 45 53 53 |EACH ENTRY PRESS|
00001760: 20 12 D2 C5 D4 D5 D2 CE 92 22 00 79 1F 6E 05 99 | ........".y.n..|
00001770: A3 31 29 22 91 91 91 91 22 00 95 1F 78 05 8F 20 |.1)"...."...x.. |
00001780: 53 54 55 44 45 4E 54 27 53 20 4E 41 4D 45 20 49 |STUDENT'S NAME I|
00001790: 53 20 4E 4D 24 00 B7 1F 82 05 99 22 1D D7 48 41 |S NM$......"..HA|
000017A0: 54 20 49 53 20 59 4F 55 52 20 46 49 52 53 54 20 |T IS YOUR FIRST |
000017B0: 4E 41 4D 45 20 22 3B 00 EE 1F 8C 05 55 53 24 B2 |NAME ";.....US$.|
000017C0: 22 41 42 43 44 45 46 47 48 49 4A 4B 4C 4D 4E 4F |"ABCDEFGHIJKLMNO|
000017D0: 50 51 52 53 54 55 56 57 58 59 5A 22 3A 55 4C B2 |PQRSTUVWXYZ":UL.|
000017E0: 31 33 3A 8D 33 35 3A 4E 4D 24 B2 55 52 24 00 07 |13:.35:NM$.UR$..|
000017F0: 20 8E 05 55 54 24 B2 22 20 CD 45 54 52 49 43 20 | ..UT$." .ETRIC |
00001800: CD 22 3A 55 50 B2 30 00 11 20 91 05 89 31 38 34 |.":UP.0.. ...184|
00001810: 30 00 33 20 96 05 99 A3 38 29 22 C3 CF CE D6 C5 |0.3 ....8)".....|
00001820: D2 D4 C9 CE C7 A0 CD C5 D4 D2 C9 C3 A0 D5 CE C9 |................|
00001830: D4 D3 22 00 39 20 30 07 8F 00 51 20 3A 07 8F 20 |..".9 0...Q :.. |
00001840: 51 3D 51 55 45 53 54 49 4F 4E 20 4E 55 4D 42 45 |Q=QUESTION NUMBE|
00001850: 52 00 5E 20 44 07 81 20 51 B2 31 A4 31 31 00 6E |R.^ D.. Q.1.11.n|
00001860: 20 4E 07 8B 20 51 B2 31 31 A7 32 37 35 30 00 77 | N.. Q.11.2750.w|
00001870: 20 58 07 8D 38 35 30 00 96 20 62 07 8F 20 58 3D | X..850.. b.. X=|
00001880: 52 41 4E 44 4F 4D 20 4E 55 4D 42 45 52 20 2E 30 |RANDOM NUMBER .0|
00001890: 31 54 4F 31 30 30 00 B0 20 6C 07 58 B2 28 B5 28 |1TO100.. l.X.(.(|
000018A0: BB 28 31 29 AC 31 30 30 30 29 AA 31 29 AD 31 30 |.(1).1000).1).10|
000018B0: 00 D4 20 76 07 8F 20 59 3D 4D 45 54 52 49 43 20 |.. v.. Y=METRIC |
000018C0: 55 4E 49 54 20 54 4F 20 42 45 20 43 4F 4E 56 45 |UNIT TO BE CONVE|
000018D0: 52 54 45 44 00 E3 20 80 07 8F 20 59 3D 2D 33 54 |RTED.. ... Y=-3T|
000018E0: 4F 2B 33 00 F5 20 8A 07 59 B2 B5 28 BB 28 31 29 |O+3.. ..Y..(.(1)|
000018F0: AC 37 29 AB 33 00 13 21 94 07 8F 20 5A 3D 4D 45 |.7).3..!... Z=ME|
00001900: 54 52 49 43 20 55 4E 49 54 20 4F 46 20 41 4E 53 |TRIC UNIT OF ANS|
00001910: 57 45 52 00 25 21 9E 07 5A B2 B5 28 BB 28 31 29 |WER.%!..Z..(.(1)|
00001920: AC 37 29 AB 33 00 3A 21 A8 07 43 4E B2 58 AC 28 |.7).3.:!..CN.X.(|
00001930: 31 30 AE 59 AD 31 30 AE 5A 29 00 4C 21 B2 07 8B |10.Y.10.Z).L!...|
00001940: 20 59 B2 5A 20 A7 20 89 31 39 30 30 00 67 21 BC | Y.Z . .1900.g!.|
00001950: 07 8B 28 28 59 AA 33 29 AB 28 5A AA 33 29 29 B1 |..((Y.3).(Z.3)).|
00001960: 33 20 A7 31 39 30 30 00 82 21 C6 07 8B 28 28 5A |3 .1900..!...((Z|
00001970: AA 33 29 AB 28 59 AA 33 29 29 B1 33 20 A7 31 39 |.3).(Y.3)).3 .19|
00001980: 30 30 00 8B 21 DA 07 99 22 11 22 00 95 21 E4 07 |00..!..."."..!..|
00001990: 8D 32 36 37 30 00 9F 21 EE 07 8D 32 35 39 30 00 |.2670..!...2590.|
000019A0: A9 21 F8 07 99 22 11 11 22 00 C4 21 02 08 8F 20 |.!...".."..!... |
000019B0: 53 4E 20 49 53 20 53 54 55 44 45 4E 54 20 41 4E |SN IS STUDENT AN|
000019C0: 53 57 45 52 00 D8 21 0C 08 99 20 22 20 12 41 4E |SWER..!... " .AN|
000019D0: 53 57 45 52 92 20 22 3B 00 03 22 16 08 55 53 24 |SWER. ";.."..US$|
000019E0: B2 22 30 31 32 33 34 35 36 37 38 39 2E 48 22 3A |."0123456789.H":|
000019F0: 55 4C B2 31 30 3A 8D 33 35 3A 49 4E B2 C5 28 55 |UL.10:.35:IN..(U|
00001A00: 52 24 29 00 0D 22 20 08 53 4E B2 49 4E 00 22 22 |R$).." .SN.IN.""|
00001A10: 25 08 8B 46 4C B2 31 A7 46 4C B2 30 3A 89 32 31 |%..FL.1.FL.0:.21|
00001A20: 33 30 00 3C 22 2A 08 8B 20 53 4E AB 43 4E B3 31 |30.<"*.. SN.CN.1|
00001A30: 30 AE AB 34 20 A7 20 89 32 31 38 30 00 51 22 34 |0..4 . .2180.Q"4|
00001A40: 08 99 22 11 11 20 D4 52 59 20 41 47 41 49 4E 2E |..".. .RY AGAIN.|
00001A50: 22 00 89 22 3E 08 8D 38 33 35 3A 99 22 13 11 11 |"..">..835:."...|
00001A60: 11 11 22 3A 81 49 B2 31 A4 36 3A 99 22 20 20 20 |..":.I.1.6:." |
00001A70: 20 20 20 20 20 20 20 20 20 20 22 3A 82 49 3A 99 | ":.I:.|
00001A80: 22 13 11 11 11 11 11 11 22 00 98 22 48 08 46 4C |".......".."H.FL|
00001A90: B2 31 3A 89 32 30 36 30 00 B2 22 52 08 8B 20 53 |.1:.2060.."R.. S|
00001AA0: 4E AB 43 4E B3 31 30 AE AB 34 20 A7 20 89 32 32 |N.CN.10..4 . .22|
00001AB0: 32 30 00 D3 22 66 08 99 22 11 11 20 D4 48 45 20 |20.."f..".. .HE |
00001AC0: 43 4F 52 52 45 43 54 20 41 4E 53 57 45 52 20 49 |CORRECT ANSWER I|
00001AD0: 53 22 3B 00 DC 22 70 08 99 20 43 4E 00 E6 22 7A |S";.."p.. CN.."z|
00001AE0: 08 89 32 32 34 30 00 01 23 84 08 8B 20 53 4E AB |..2240..#... SN.|
00001AF0: 43 4E B3 AB 31 30 AE AB 34 20 A7 20 89 32 31 30 |CN..10..4 . .210|
00001B00: 30 00 1A 23 8E 08 8F 20 43 3D 23 43 4F 52 52 45 |0..#... C=#CORRE|
00001B10: 43 54 20 41 4E 53 57 45 52 53 00 24 23 98 08 43 |CT ANSWERS.$#..C|
00001B20: B2 43 AA 31 00 2E 23 A2 08 89 32 32 39 30 00 49 |.C.1..#...2290.I|
00001B30: 23 AC 08 8B 20 53 4E AB 43 4E B3 AB 31 30 AE AB |#... SN.CN..10..|
00001B40: 34 20 A7 20 89 32 31 35 30 00 61 23 B6 08 99 22 |4 . .2150.a#..."|
00001B50: 11 11 20 D2 C9 C7 C8 D4 20 22 4E 4D 24 22 20 21 |.. ..... "NM$" !|
00001B60: 22 00 6A 23 C0 08 8D 38 33 35 00 72 23 E8 08 82 |".j#...835.r#...|
00001B70: 20 51 00 84 23 F2 08 41 B2 B5 28 BB 28 31 29 AC | Q..#..A..(.(1).|
00001B80: 35 29 AA 31 00 8E 23 FC 08 8D 32 33 32 30 00 98 |5).1..#...2320..|
00001B90: 23 06 09 89 32 32 34 30 00 A2 23 10 09 99 22 11 |#...2240..#...".|
00001BA0: 11 22 00 C4 23 1A 09 8B 20 41 B2 31 20 A7 20 99 |."..#... A.1 . .|
00001BB0: 22 20 C7 CF CF C4 20 D7 CF D2 CB 20 22 4E 4D 24 |" .... .... "NM$|
00001BC0: 22 20 21 22 00 EE 23 24 09 8B 20 41 B2 32 20 A7 |" !"..#$.. A.2 .|
00001BD0: 20 99 20 22 20 D2 C9 C7 C8 D4 A0 C6 C9 D2 D3 D4 | . " ...........|
00001BE0: A0 D4 C9 CD C5 20 22 4E 4D 24 22 20 21 22 00 18 |..... "NM$" !"..|
00001BF0: 24 2E 09 8B 20 41 B2 33 20 A7 20 99 20 22 20 D9 |$... A.3 . . " .|
00001C00: CF D5 27 D2 C5 20 C1 C2 D3 CF CC D5 D4 C5 CC D9 |..'.. ..........|
00001C10: 20 D2 C9 C7 C8 D4 21 22 00 32 24 38 09 8B 20 41 | .....!".2$8.. A|
00001C20: B2 34 20 A7 20 99 20 22 20 D2 C9 C7 C8 D4 20 CF |.4 . . " ..... .|
00001C30: CE 22 00 4C 24 42 09 8B 20 41 B2 35 20 A7 20 99 |.".L$B.. A.5 . .|
00001C40: 20 22 20 C3 CF D2 D2 C5 C3 D4 21 22 00 52 24 4C | " .......!".R$L|
00001C50: 09 8E 00 6F 24 1E 0A 8B 20 59 B2 AB 33 20 A7 20 |...o$... Y..3 . |
00001C60: 99 22 91 22 58 22 4D 4D 20 3D 20 A4 A4 A4 22 00 |."."X"MM = ...".|
00001C70: 8C 24 28 0A 8B 20 59 B2 AB 32 20 A7 20 99 22 91 |.$(.. Y..2 . .".|
00001C80: 22 58 22 43 4D 20 3D 20 A4 A4 A4 22 00 A9 24 32 |"X"CM = ..."..$2|
00001C90: 0A 8B 20 59 B2 AB 31 20 A7 20 99 22 91 22 58 22 |.. Y..1 . ."."X"|
00001CA0: 44 4D 20 3D 20 A4 A4 A4 22 00 C4 24 3C 0A 8B 20 |DM = ..."..$<.. |
00001CB0: 59 B2 30 20 A7 20 99 22 91 22 58 22 4D 20 3D 20 |Y.0 . ."."X"M = |
00001CC0: A4 A4 A4 22 00 E2 24 46 0A 8B 20 59 B2 AA 31 20 |..."..$F.. Y..1 |
00001CD0: A7 20 99 22 91 22 58 22 44 41 4D 20 3D 20 A4 A4 |. ."."X"DAM = ..|
00001CE0: A4 22 00 FF 24 50 0A 8B 20 59 B2 AA 32 20 A7 20 |."..$P.. Y..2 . |
00001CF0: 99 22 91 22 58 22 48 4D 20 3D 20 A4 A4 A4 22 00 |."."X"HM = ...".|
00001D00: 1C 25 5A 0A 8B 20 59 B2 AA 33 20 A7 20 99 22 91 |.%Z.. Y..3 . .".|
00001D10: 22 58 22 4B 4D 20 3D 20 A4 A4 A4 22 00 22 25 64 |"X"KM = ..."."%d|
00001D20: 0A 8E 00 3D 25 6E 0A 8B 20 5A B2 AB 33 20 A7 20 |...=%n.. Z..3 . |
00001D30: 99 22 91 22 3B A3 31 37 29 22 4D 4D 22 00 58 25 |.".";.17)"MM".X%|
00001D40: 78 0A 8B 20 5A B2 AB 32 20 A7 20 99 22 91 22 3B |x.. Z..2 . .".";|
00001D50: A3 31 37 29 22 43 4D 22 00 73 25 82 0A 8B 20 5A |.17)"CM".s%... Z|
00001D60: B2 AB 31 20 A7 20 99 22 91 22 3B A3 31 37 29 22 |..1 . .".";.17)"|
00001D70: 44 4D 22 00 8C 25 8C 0A 8B 20 5A B2 30 20 A7 20 |DM"..%... Z.0 . |
00001D80: 99 22 91 22 3B A3 31 37 29 22 4D 22 00 A8 25 96 |.".";.17)"M"..%.|
00001D90: 0A 8B 20 5A B2 AA 31 20 A7 20 99 22 91 22 3B A3 |.. Z..1 . .".";.|
00001DA0: 31 37 29 22 44 41 4D 22 00 C3 25 A0 0A 8B 20 5A |17)"DAM"..%... Z|
00001DB0: B2 AA 32 20 A7 20 99 22 91 22 3B A3 31 37 29 22 |..2 . .".";.17)"|
00001DC0: 48 4D 22 00 DE 25 AA 0A 8B 20 5A B2 AA 33 20 A7 |HM"..%... Z..3 .|
00001DD0: 20 99 22 91 22 3B A3 31 37 29 22 4B 4D 22 00 E4 | .".";.17)"KM"..|
00001DE0: 25 B4 0A 8E 00 00 26 BE 0A 55 47 24 B2 22 D2 45 |%.....&..UG$.".E|
00001DF0: 53 55 4C 54 53 22 3A 55 50 B2 30 3A 8D 38 35 30 |SULTS":UP.0:.850|
00001E00: 00 10 26 C3 0A 99 22 11 20 22 4E 4D 24 22 3A 22 |..&...". "NM$":"|
00001E10: 00 3D 26 C8 0A 99 22 11 20 D9 4F 55 20 48 41 56 |.=&...". .OU HAV|
00001E20: 45 20 41 4E 53 57 45 52 45 44 22 43 22 51 55 45 |E ANSWERED"C"QUE|
00001E30: 53 54 49 4F 4E 53 20 4F 55 54 20 4F 46 00 69 26 |STIONS OUT OF.i&|
00001E40: D2 0A 99 22 11 20 31 30 20 43 4F 52 52 45 43 54 |...". 10 CORRECT|
00001E50: 4C 59 20 46 4F 52 20 41 20 53 43 4F 52 45 20 4F |LY FOR A SCORE O|
00001E60: 46 22 43 AC 31 30 22 25 22 00 82 26 DC 0A 8F 20 |F"C.10"%"..&... |
00001E70: 57 41 49 54 20 46 4F 52 20 53 50 41 43 45 20 42 |WAIT FOR SPACE B|
00001E80: 41 52 00 8B 26 E6 0A 8D 38 33 35 00 91 26 F0 0A |AR..&...835..&..|
00001E90: 8E 00 97 26 FA 0A 99 00 A9 26 04 0B 8D 32 38 36 |...&.....&...286|
00001EA0: 30 3A 49 4E 24 B2 41 42 24 00 BD 26 0E 0B 8B 20 |0:IN$.AB$..&... |
00001EB0: 41 42 24 B2 22 43 22 20 A7 32 38 35 30 00 D1 26 |AB$."C" .2850..&|
00001EC0: 18 0B 8B 20 41 42 24 B3 B1 22 43 22 A7 31 30 37 |... AB$.."C".107|
00001ED0: 30 00 DF 26 22 0B 43 B2 30 3A 89 31 38 35 30 00 |0..&".C.0:.1850.|
00001EE0: 00 00 |.. |
.......910.6...."X..........X` ......L4.
X.1........X` .A...."X.G......X` ......L
X.X.U......X` ......"XHHH.H.HHHHHHH.H
.HX` ......"HHHHHHH` ......" .H...X.
. ..... .H...P...JP.` .U....".. .H....
.P.....JP.` ...#..UW.0..UU,15...(..UC,0
:.UN,0:UR$."":UI$."":.UL.0.UL.39.$.-..UI
$:.UI$."".45.Y.2.UA.F(UI$):UR.C(UR$):.UA
.13.UR.0..UC,1:." .";:.70...7..UA.20...(
UR.0).45:UR$.H(UR$,UR.1):.". ..";:.45..
.<..UR.UL.45...A..95:UR$.UR$.UI$:.UI$;:.
45.S.F..UR$.UX$..". ";:.145...K..UI.UR.1
..1:.J(UR$,UI,1)." ".....P.UR$.H(UR$,UI)
:.:...._..C(US$).0.110.J.D..UI.1.C(US$):
.UI$..J(US$,UI,1)..:UI$."".P.I...].N..UA
.46...P.S..UA.32.UR..0.....X..UA.47.UA.5
8.....}..UA.64.UA.91........UA.193.UA.21
8.UI$."":..O....B(UT).UU%.UI$.G(UA.128).
U..........170:.251,0:.252,US.256:.253,0
:.254,UF:.UV.....UZ.1:UV%.B(UT):.300.B..
.UZ.0:US$.UJ$:UG$.UK$:UT$.UL$:UP.UJ:UL.U
K:.".";:.UW.0..UY,6:.UX,14... ..UT,UV%:.
251,0:.252,UF:.253,0:.254,US.256:.UV:.UW
.0..UU,15.K....U1,U1%:.U2,U2%:.U3,U3%.1:
.U4,U4%:.35.....U1%.B(U1):U2%.B(U2):U3%.
B(U3):U4%.B(U4).!...UJ$.US$:UK$.UG$:UL$.
UT$:UJ.UP:UK.UL:..F.,.."..":.UT,UU%:.UW.
0..UY,12:.UX,6.F.1.." M E
N U."...6.." -----------------------
---------"...;..". 1. BEGIN METR
IC M "...@..".. 2. STUDENT IN
STRUCTIONS"...E..".. 3. TEACHER
INSTRUCTIONS".(.J..".. 4. QUIT."
.T.O.." -----------------------------
---"..T..".. PRESS A NUMBER KEY (
1-4) ";...Y.UL.1:US$."1234"...[..35:US$.
""...^..E(UR$).1000,400,500,390.H.C..300
...R..UZ.1..UP%:.155...W........UE:.".."
:.UW.0..UY,6:.UX,14:.UU,14......:..7....
".":.UT,UL%:.UW.0..UY,11:.UX,12.N...UT$.
" METRIC M ":UH.1:UP.0:UG$."STUDENT INST
":.850......".. THIS EXERCISE WILL GIVE
YOU PRACTICE".M....". IN CONVERTING FRO
M ONE METRIC UNIT OF"......". LENGTH OR
DISTANCE TO ANOTHER."......".. YOU WILL
BE GIVEN TEN METRIC".E....". CONVERSION
QUESTIONS TO ANSWER.".M....". YOU WILL B
E SCORED AT THE END."......835:UH.1:.850
......"..... .REMEMBER:."......".......
...... ........".. MM. 10MM=1CM".26)
".1MM=0.001M."......497......".. ..."
.26)". ..6....".. CM. 10CM=
1DM".26)".1CM=0.01M .".?....497.D...."..
...".26)". ."......"..
DM. 10DM=1M".26)".1DM=0.1M ."...B..
497.C.D..".. ... ".26)".
."...F..".. .M.. 10M=1DAM".26)
". ."...H..497.(.J.."..
...".26)". .".\.L.."..
DAM. 10DAM=1HM".26)".1DAM=10M .".E.N
..497...P..".. ...".26)".
.".E.R..".. HM. 10HM=1
KM".26)".1HM=100M ."...T.."..
...".26)". "...V..497.).X..
".. KM ".26)".1KM=1000M .
".7....835:.850.^....".. IF YOU WISH TO
RETURN TO THE"......". INSTRUCTIONS OR T
O ESCAPE, JUST"......". ENTER 'H' <RETUR
N>."......835.A....UZ.1..UP%:.155.G.....
Y....I.1.100:.I:.......".":.UT,UL%:.UW.0
..UY,2:.UX,10.3...UT$." METRIC M":UH.1:U
P.0:UG$."TEACHER INST":.850.`...."..
TO THE BEST OF OUR KNOWLEDGE,."......"
THIS PROGRAM IS IN THE PUBLIC.".....
." DOMAIN. IF THIS IS NOT TRUE,.".T
...." PLEASE CONTACT:.."......"
COMMODORE BUSINESS MACHINES".!...."
.3370 PHARMACY AVE..F...."
.AGINCOURT, ONTARIO".H...." .
CANADA, M1W 2K4"......" .(416)
499-4292".....UH.1:.835:.850.B...."
..PROGRAM NAME: METRIC M"......" .
WRITTEN BY : JOHN STEVENS"......"
.REVISED BY : JOHN RIDLER".@...."
..THIS PROGRAM WILL RUN ON ANY...G...."
BASIC 2.0 PET COMPUTER......."
BASIC 4.0 PET COMPUTER......."
8032 CBM COMPUTER..U...."
COMMODORE 64 COMPUTER...I..835...N..UZ.1
..UP%:.155...S...,....UC$"....BEFORE RUN
NING THIS PROGRAM ON AN 8032.D.A.."
LOAD THE 'CBM 4032' PROGRAM............
.":.... .."....";:.UT,UU%:.UW.0..UY,1:.U
X,14...!..I.1.38:.". .";:...."..I.1.22:.
"... .";:..R.#..I.1.37:."... .";:....$..
I.1.22:."... .";:....%.."...............
....... ..$.&.."........... . . ...P.'
.."........... . ...... O M M O D O R E
.F.(.."............ ....).."...........
........EDUCATIONAL....*..".............
....SOFTWARE.J.+.."..................198
3....,..H(UD$,24);"..........PRESS SPACE
BAR OR WAIT."UC$:UI.0.-.-..UI$:.UI$.."
".UI.UI.1:.UI.250.813.6....300.Q.C..UN,0
:.H(UD$,24);".......PRESS SPACE BAR TO C
ONTINUE."...H..UI$:.UI$.." ".840...M....
.R.UP.UP.1:."."H(UT$.UP$,21);I(UP$.UG$.D
(UP),18)...W.." ------------------------
--------------".).\..UH.0..H(UD$,24);H(U
P$,7);"HELP - PRESS H <RETURN>".:.A.UH
.0:."..":..R.K..H(UD$,24);" ON
E MOMENT PLEASE... ":..B...UX$."H":U
S.32768:U1.196:U2.197:U3.198:U4.216:UC.1
67:UB.1024:UD.1084:UE.1105.....UT.59468:
UU%.12:UL%.14:UP%.1158:UN.158:.50003,0:U
W.B(50003):UF.B(53).Y....UW.0.US.1024:U1
.209:U2.210:U3.211:U4.214:UC.204:UB.2048
:UX.53280:UD.2064......UW.0.UT.53272:UU%
.21:UL%.23:UP%.2151:UN.198:UY.53281:UU.2
199:UE.2087.O...UC$.G(155):UV.1214:.UW.0
.UF.196:UV.2238. ...UD$."...............
..........":UP$."
".C...UT$."METRIC M":. PR
OGRAM TITLE.I.....L....900:.".":." ":. S
HIFTED SPACE......B(US.40)..96.700......
(.(0).(.(.(0)).0).65536).500.935.X....UC
$"...THIS MACHINE DOES NOT HAVE ENOUGH."
......"MEMORY TO RUN THIS PROGRAM !":.UE
:......."."UC$:.UW.0.965.5....UF.60.UF.1
08.UF.124.950.O....52,0:.53,UF.4:.:.900.
.....UW.160..1103,88:.1104,228:.1107,85:
.1111,228:.965.C....UW..1..".THIS PGM WI
LL NOT WORK ON THIS MACHINE!":.UE:......
.1103,49:.1104,230:.1107,46:.1111,230:.9
65...E..UD...J..800:.300.!....UZ.1..UP%:
.UP%:UZ.0.C...."."UC$;:.:.UW.0..UY,6:.UX
,14.]...UG$."QUESTION #":FL.0.C.........
. METRICS-UNITS OF DISTANCE...... JOHN S
TEVENS...... NOVEMBER 11,1981.........$.
. UT,UL%.K.V.B$."."...`..".":.UW.0..UU,1
5...J.. I.1.39...T..B$;...~.. I...... I.
1.17......".."B$;. ....I.-.... I.1.38.:.
...".."B$;.A....I.N.D.. I.1.17.[.N..".."
B$;.B.X..I.R...."........".{.....8).....
.I.1.30......"....... METRICS";......J.1
.20:.J...... I.G....".........".Y.(.. X.
30.16 ..1...2...X)"...METRICS "...<..J.1
.20:.J...F.. X.%.P...11)"..UNITS OF DIST
ANCE".5.Z.. I.1.500:..J.D...1)".........
..AFTER EACH ENTRY PRESS .RETURN.".Y.N..
.1)"...."...X.. STUDENT'S NAME IS NM$...
...".WHAT IS YOUR FIRST NAME ";.....US$.
"ABCDEFGHIJKLMNOPQRSTUVWXYZ":UL.13:.35:N
M$.UR$.. ..UT$." METRIC M":UP.0.. ...184
0.3 ....8)"CONVERTING METRIC UNITS".9 0.
..Q :.. Q=QUESTION NUMBER.^ D.. Q.1.11.N
N.. Q.11.2750.W X..850.. B.. X=RANDOM N
UMBER .01TO100.. L.X.(.(.(1).1000).1).10
.T V.. Y=METRIC UNIT TO BE CONVERTED.. .
.. Y=-3TO+3.. ..Y..(.(1).7).3..!... Z=ME
TRIC UNIT OF ANSWER.%!..Z..(.(1).7).3.:!
..CN.X.(10.Y.10.Z).L!... Y.Z . .1900.G!.
..((Y.3).(Z.3)).3 .1900..!F..((Z.3).(Y.3
)).3 .1900..!Z.."."..!...2670..!...2590.
.!..."..".D!... SN IS STUDENT ANSWER.X!.
.. " .ANSWER. ";.."..US$."0123456789.H":
UL.10:.35:IN.E(UR$).." .SN.IN.""%..FL.1.
FL.0:.2130.<"*.. SN.CN.10..4 . .2180.Q"4
..".. TRY AGAIN."..">..835:.".....":.I.1
.6:." ":.I:.".......".."H.FL
.1:.2060.."R.. SN.CN.10..4 . .2220.S"F..
".. THE CORRECT ANSWER IS";.."P.. CN.."Z
..2240..#... SN.CN..10..4 . .2100..#...
C=#CORRECT ANSWERS.$#..C.C.1..#...2290.I
#... SN.CN..10..4 . .2150.A#...".. RIGHT
"NM$" !".J#...835.R#... Q..#..A..(.(1).
5).1..#...2320..#...2240..#..."..".D#...
A.1 . ." GOOD WORK "NM$" !"..#$.. A.2 .
. " RIGHT FIRST TIME "NM$" !"..$... A.3
. . " YOU'RE ABSOLUTELY RIGHT!".2$8.. A
.4 . . " RIGHT ON".L$B.. A.5 . . " CORRE
CT!".R$L...O$... Y..3 . ."."X"MM = ...".
.$(.. Y..2 . ."."X"CM = ..."..$2.. Y..1
. ."."X"DM = ...".D$<.. Y.0 . ."."X"M =
..."..$F.. Y..1 . ."."X"DAM = ..."..$P..
Y..2 . ."."X"HM = ..."..%Z.. Y..3 . .".
"X"KM = ..."."%D...=%N.. Z..3 . .".";.17
)"MM".X%X.. Z..2 . .".";.17)"CM".S%... Z
..1 . .".";.17)"DM"..%... Z.0 . .".";.17
)"M"..%... Z..1 . .".";.17)"DAM".C% .. Z
..2 . .".";.17)"HM"..%... Z..3 . .".";.1
7)"KM"..%.....&..UG$."RESULTS":UP.0:.850
..&C..". "NM$":".=&H..". YOU HAVE ANSWER
ED"C"QUESTIONS OUT OF.I&R..". 10 CORRECT
LY FOR A SCORE OF"C.10"%"..&... WAIT FOR
SPACE BAR..&...835..&.....&.....&...286
0:IN$.AB$..&... AB$."C" .2850.Q&... AB$.
."C".1070..&".C.0:.1850...
> CLICK IMAGE PREVIEW FOR FULL MODAL