HYPO. AUTO.C3
FILE INFORMATION
FILENAME(S): HYPO. AUTO.C3
FILE TYPE(S): PRG
FILE SIZE: 15.3K
FIRST SEEN: 2025-11-30 01:08:28
APPEARS ON: 4 disk(s)
FILE HASH
d6ee5e097cb7a94e8928ee7b645efe5c8e31cacdafdeedfcae2ad091819f1bdd
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT NR | HYPO. AUTO.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 10 | 0 | DOWNLOAD FILE |
| FREESOFT NR | HYPO. AUTO.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 4 | 7 | DOWNLOAD FILE |
| FREESOFT DISK NR | HYPO. AUTO.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 4 | 7 | DOWNLOAD FILE |
| PD DISK 17 | HYPO. AUTO.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 10 | 0 | 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 C8 08 0A 00 8F 20 2A 2A |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 20 2A 2A 00 CE 08 0F 00 3A 00 D4 |UTINE **.....:..|
000000D0: 08 1E 00 3A 00 F0 08 23 00 8F 20 2B 2B 2B 20 49 |...:...#.. +++ I|
000000E0: 4E 50 55 54 20 53 45 43 54 49 4F 4E 20 2B 2B 2B |NPUT SECTION +++|
000000F0: 00 08 09 28 00 55 52 24 B2 22 22 3A 55 49 24 B2 |...(.UR$."":UI$.|
00000100: 22 22 3A 97 55 4F 2C 30 00 18 09 2A 00 8B 55 4C |"":.UO,0...*..UL|
00000110: B2 30 A7 55 4C B2 38 30 00 2B 09 2D 00 99 22 20 |.0.UL.80.+.-.." |
00000120: 20 9D 9D 22 3B 3A 97 55 43 2C 30 00 3F 09 32 00 | ..";:.UC,0.?.2.|
00000130: A1 55 49 24 3A 8B 55 49 24 B2 22 22 A7 35 30 00 |.UI$:.UI$."".50.|
00000140: 69 09 37 00 8B 55 49 24 B2 C7 28 31 33 29 AF C3 |i.7..UI$..(13)..|
00000150: 28 55 52 24 29 B1 B2 31 A7 97 55 43 2C 31 3A 99 |(UR$)..1..UC,1:.|
00000160: 22 20 9D 22 3B 3A 89 38 35 00 7C 09 3C 00 8B 55 |" .";:.85.|.<..U|
00000170: 49 24 B2 C7 28 32 30 29 A7 31 30 35 00 90 09 3E |I$..(20).105...>|
00000180: 00 8B 20 C3 28 55 52 24 29 B2 B1 55 4C A7 35 30 |.. .(UR$)..UL.50|
00000190: 00 B5 09 41 00 8D 31 32 30 3A 8F 20 43 48 45 43 |...A..120:. CHEC|
000001A0: 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 41 52 |K FOR VALID CHAR|
000001B0: 41 43 54 45 52 00 C5 09 46 00 55 52 24 B2 55 52 |ACTER...F.UR$.UR|
000001C0: 24 AA 55 49 24 00 CF 09 4B 00 99 55 49 24 3B 00 |$.UI$...K..UI$;.|
000001D0: D7 09 50 00 89 35 30 00 FC 09 55 00 8F 20 2B 2B |..P..50...U.. ++|
000001E0: 2B 20 43 48 45 43 4B 20 46 4F 52 20 48 45 4C 50 |+ CHECK FOR HELP|
000001F0: 20 52 45 51 55 45 53 54 20 2B 2B 2B 00 24 0A 5A | REQUEST +++.$.Z|
00000200: 00 8B 55 52 24 B2 55 58 24 A7 31 39 35 3A 8F 20 |..UR$.UX$.195:. |
00000210: 45 58 49 54 20 54 4F 20 48 45 4C 50 20 52 4F 55 |EXIT TO HELP ROU|
00000220: 54 49 4E 45 00 33 0A 5F 00 8B 55 46 B2 31 A7 8D |TINE.3._..UF.1..|
00000230: 32 34 30 00 40 0A 64 00 55 46 B2 30 3A 99 3A 8E |240.@.d.UF.0:.:.|
00000240: 00 59 0A 66 00 8F 20 2B 2B 20 43 48 45 43 4B 20 |.Y.f.. ++ CHECK |
00000250: 44 45 4C 45 54 45 20 2B 2B 00 6A 0A 69 00 8B C3 |DELETE ++.j.i...|
00000260: 28 55 52 24 29 B3 31 A7 35 30 00 82 0A 6E 00 55 |(UR$).1.50...n.U|
00000270: 52 24 B2 C8 28 55 52 24 2C C3 28 55 52 24 29 AB |R$..(UR$,.(UR$).|
00000280: 31 29 00 94 0A 73 00 99 22 9D 20 20 9D 9D 22 3B |1)...s..". ..";|
00000290: 3A 89 35 30 00 BB 0A 78 00 8F 20 2B 2B 20 43 48 |:.50...x.. ++ CH|
000002A0: 45 43 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 |ECK FOR VALID CH|
000002B0: 41 52 41 43 54 45 52 53 20 2B 2B 00 CD 0A 7D 00 |ARACTERS ++...}.|
000002C0: 8B C3 28 55 53 24 29 B2 30 A7 31 35 30 00 DE 0A |..(US$).0.150...|
000002D0: 82 00 81 55 53 B2 31 A4 C3 28 55 53 24 29 00 F5 |...US.1..(US$)..|
000002E0: 0A 87 00 8B 55 49 24 B2 CA 28 55 53 24 2C 55 53 |....UI$..(US$,US|
000002F0: 2C 31 29 A7 8E 00 FB 0A 8C 00 82 00 08 0B 91 00 |,1).............|
00000300: 55 49 24 B2 22 22 3A 8E 00 23 0B 96 00 8F 20 2A |UI$."":..#.... *|
00000310: 2A 20 53 54 41 4E 44 41 52 44 20 49 4E 50 55 54 |* STANDARD INPUT|
00000320: 20 2A 2A 00 3A 0B 97 00 8B 55 49 24 B2 22 2F 22 | **.:....UI$."/"|
00000330: B0 55 49 24 B2 22 2A 22 A7 8E 00 4B 0B 98 00 8B |.UI$."*"...K....|
00000340: C6 28 55 49 24 29 B2 34 36 A7 8E 00 5C 0B 9B 00 |.(UI$).46...\...|
00000350: 8B 55 49 24 B2 C7 28 33 32 29 A7 8E 00 79 0B A0 |.UI$..(32)...y..|
00000360: 00 8B C6 28 55 49 24 29 B3 34 38 B0 C6 28 55 49 |...(UI$).48..(UI|
00000370: 24 29 B1 35 37 A7 31 37 30 00 7F 0B A5 00 8E 00 |$).57.170.......|
00000380: 9C 0B AA 00 8B C6 28 55 49 24 29 B3 36 35 B0 C6 |......(UI$).65..|
00000390: 28 55 49 24 29 B1 39 30 A7 31 38 30 00 A2 0B AF |(UI$).90.180....|
000003A0: 00 8E 00 C6 0B B4 00 8B C6 28 55 49 24 29 B3 31 |.........(UI$).1|
000003B0: 39 33 B0 C6 28 55 49 24 29 B1 32 31 38 A7 55 49 |93..(UI$).218.UI|
000003C0: 24 B2 22 22 3A 8E 00 E9 0B B9 00 8B C2 28 55 54 |$."":........(UT|
000003D0: 29 B2 55 55 25 A7 55 49 24 B2 C7 28 C6 28 55 49 |).UU%.UI$..(.(UI|
000003E0: 24 29 AB 31 32 38 29 3A 8E 00 EF 0B BB 00 8E 00 |$).128):........|
000003F0: FC 0B BE 00 55 49 24 B2 22 22 3A 8E 00 21 0C C3 |....UI$."":..!..|
00000400: 00 55 46 B2 31 3A 8F 20 2B 2B 2B 20 48 45 4C 50 |.UF.1:. +++ HELP|
00000410: 20 52 4F 55 54 49 4E 45 20 45 58 49 54 20 2B 2B | ROUTINE EXIT ++|
00000420: 2B 00 2A 0C C5 00 8D 32 35 30 00 33 0C C8 00 8D |+.*....250.3....|
00000430: 32 34 35 00 52 0C CD 00 81 55 51 B2 55 42 A4 28 |245.R....UQ.UB.(|
00000440: 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 AB |U2%.256.U1%.U3%.|
00000450: 32 29 00 6E 0C D2 00 55 51 25 28 55 51 AB 55 42 |2).n...UQ%(UQ.UB|
00000460: 29 B2 C2 28 55 51 29 3A 82 3A 99 22 93 22 00 81 |)..(UQ):.:."."..|
00000470: 0C D7 00 55 5A B2 31 3A 55 56 25 B2 C2 28 55 54 |...UZ.1:UV%..(UT|
00000480: 29 00 8A 0C D8 00 89 33 30 30 00 AF 0C D9 00 55 |)......300.....U|
00000490: 5A B2 30 3A 55 53 24 B2 55 4A 24 3A 55 47 24 B2 |Z.0:US$.UJ$:UG$.|
000004A0: 55 4B 24 3A 55 50 B2 55 4A 3A 55 4C B2 55 4B 00 |UK$:UP.UJ:UL.UK.|
000004B0: E6 0C DA 00 8B C2 28 35 30 30 30 33 29 B2 30 A7 |......(50003).0.|
000004C0: 97 35 33 32 38 31 2C 31 3A 99 22 93 22 3B 3A 97 |.53281,1:.".";:.|
000004D0: 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 |53281,6:.53280,1|
000004E0: 34 3A 89 32 32 30 00 F0 0C DB 00 99 22 93 22 3B |4:.220......".";|
000004F0: 00 1F 0D DC 00 55 54 24 B2 55 4C 24 3A 97 55 54 |.....UT$.UL$:.UT|
00000500: 2C 55 56 25 3A 81 55 51 B2 55 42 A4 28 55 32 25 |,UV%:.UQ.UB.(U2%|
00000510: AC 32 35 36 AA 55 31 25 AA 55 33 25 AB 33 29 00 |.256.U1%.U3%.3).|
00000520: 34 0D E1 00 97 55 51 2C 55 51 25 28 55 51 AB 55 |4....UQ,UQ%(UQ.U|
00000530: 42 29 3A 82 00 40 0D E6 00 97 55 31 2C 55 31 25 |B):..@....U1,U1%|
00000540: 00 4C 0D E8 00 97 55 32 2C 55 32 25 00 58 0D E9 |.L....U2,U2%.X..|
00000550: 00 97 55 34 2C 55 34 25 00 66 0D EA 00 97 55 33 |..U4,U4%.f....U3|
00000560: 2C 55 33 25 AB 31 00 6E 0D EB 00 89 33 35 00 A0 |,U3%.1.n....35..|
00000570: 0D F0 00 55 44 25 B2 28 28 55 32 25 AC 32 35 36 |...UD%.((U2%.256|
00000580: AA 55 31 25 AA 55 33 25 29 AB 55 42 29 AD 34 30 |.U1%.U3%).UB).40|
00000590: 3A 99 C8 28 55 44 24 2C 55 44 25 AA 31 29 3A 8E |:..(UD$,UD%.1):.|
000005A0: 00 DB 0D F5 00 99 C8 28 55 44 24 2C 32 34 29 3B |.......(UD$,24);|
000005B0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
000005C0: 20 20 20 20 20 20 20 12 20 48 45 4C 50 20 43 4F | . HELP CO|
000005D0: 4D 49 4E 47 20 92 20 20 22 3A 8E 00 07 0E FA 00 |MING . ":......|
000005E0: 55 31 25 B2 C2 28 55 31 29 3A 55 32 25 B2 C2 28 |U1%..(U1):U2%..(|
000005F0: 55 32 29 3A 55 33 25 B2 C2 28 55 33 29 3A 55 34 |U2):U3%..(U3):U4|
00000600: 25 B2 C2 28 55 34 29 00 2F 0E FB 00 55 4A 24 B2 |%..(U4)./...UJ$.|
00000610: 55 53 24 3A 55 4B 24 B2 55 47 24 3A 55 4C 24 B2 |US$:UK$.UG$:UL$.|
00000620: 55 54 24 3A 55 4A B2 55 50 3A 55 4B B2 55 4C 00 |UT$:UJ.UP:UK.UL.|
00000630: 35 0E FF 00 8E 00 46 0E 2C 01 8F 20 2A 2A 20 4D |5.....F.,.. ** M|
00000640: 45 4E 55 20 2A 2A 00 4C 0E 2D 01 3A 00 7B 0E 2E |ENU **.L.-.:.{..|
00000650: 01 99 22 93 22 3A 97 55 54 2C 55 55 25 3A 8B C2 |..".":.UT,UU%:..|
00000660: 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 |(50003).0..53281|
00000670: 2C 39 3A 97 35 33 32 38 30 2C 38 00 81 0E 2F 01 |,9:.53280,8.../.|
00000680: 3A 00 9E 0E 31 01 99 22 13 20 20 20 20 20 20 20 |:...1..". |
00000690: 20 20 20 20 20 20 20 20 20 4D 45 4E 55 22 00 CD | MENU"..|
000006A0: 0E 36 01 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.6.." ----------|
000006B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 EC 0E |------------"...|
000006D0: 3B 01 99 22 11 11 20 20 20 20 20 20 20 31 2E 20 |;..".. 1. |
000006E0: 20 20 42 45 47 49 4E 20 48 59 50 4F 00 16 0F 40 | BEGIN HYPO...@|
000006F0: 01 99 22 11 11 20 20 20 20 20 20 20 32 2E 20 20 |..".. 2. |
00000700: 20 53 54 55 44 45 4E 54 20 49 4E 53 54 52 55 43 | STUDENT INSTRUC|
00000710: 54 49 4F 4E 53 22 00 40 0F 45 01 99 22 11 11 20 |TIONS".@.E..".. |
00000720: 20 20 20 20 20 20 33 2E 20 20 20 54 45 41 43 48 | 3. TEACH|
00000730: 45 52 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 |ER INSTRUCTIONS"|
00000740: 00 5C 0F 4F 01 99 22 11 11 20 20 20 20 20 20 20 |.\.O..".. |
00000750: 34 2E 20 20 20 51 55 49 54 11 11 22 00 8B 0F 54 |4. QUIT.."...T|
00000760: 01 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.." ------------|
00000770: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000780: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 B6 0F 59 01 |----------"...Y.|
00000790: 99 22 11 11 20 20 20 20 20 20 20 50 52 45 53 53 |.".. PRESS|
000007A0: 20 41 20 4E 55 4D 42 45 52 20 4B 45 59 20 28 31 | A NUMBER KEY (1|
000007B0: 2D 34 29 20 22 3B 00 DE 0F 5E 01 55 4C B2 31 3A |-4) ";...^.UL.1:|
000007C0: 55 53 24 B2 22 31 32 33 34 22 3A 8D 33 35 3A 8F |US$."1234":.35:.|
000007D0: 20 49 4E 50 55 54 20 52 4F 55 54 49 4E 45 00 E9 | INPUT ROUTINE..|
000007E0: 0F 60 01 55 53 24 B2 22 22 00 06 10 63 01 91 C5 |.`.US$.""...c...|
000007F0: 28 55 52 24 29 8D 31 30 30 30 2C 34 30 30 2C 35 |(UR$).1000,400,5|
00000800: 30 30 2C 33 39 36 00 0F 10 68 01 89 33 30 30 00 |00,396...h..300.|
00000810: 36 10 8B 01 8F 20 2A 2A 20 52 45 2D 45 4E 41 42 |6.... ** RE-ENAB|
00000820: 4C 45 20 53 54 4F 50 20 4B 45 59 20 41 4E 44 20 |LE STOP KEY AND |
00000830: 45 4E 44 20 2A 2A 00 65 10 8C 01 8B C2 28 35 30 |END **.e.....(50|
00000840: 30 30 33 29 B3 B1 31 AF C2 28 35 30 30 30 33 29 |003)..1..(50003)|
00000850: B3 B1 31 36 30 AF C2 28 35 30 30 30 33 29 B3 B1 |..160..(50003)..|
00000860: 30 A7 33 39 39 00 8F 10 8D 01 9E 55 55 AA 37 31 |0.399......UU.71|
00000870: 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 |:..(50003).0..53|
00000880: 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 |281,6:.53280,14.|
00000890: 9B 10 8E 01 99 22 9A 93 22 3A 80 00 A6 10 8F 01 |....."..":......|
000008A0: 8D 38 37 35 3A 8E 00 C7 10 90 01 8F 20 2A 2A 20 |.875:....... ** |
000008B0: 53 54 55 44 45 4E 54 20 49 4E 53 54 52 55 43 54 |STUDENT INSTRUCT|
000008C0: 49 4F 4E 53 20 2A 2A 00 F6 10 95 01 99 22 93 22 |IONS **......"."|
000008D0: 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 30 |:.UT,UL%:..(5000|
000008E0: 33 29 B2 30 A7 97 35 33 32 38 31 2C 30 3A 97 35 |3).0..53281,0:.5|
000008F0: 33 32 38 30 2C 30 00 17 11 9A 01 55 50 B2 30 3A |3280,0.....UP.0:|
00000900: 55 47 24 B2 22 D3 54 55 44 45 4E 54 20 C9 4E 53 |UG$.".TUDENT .NS|
00000910: 54 22 3A 8D 38 35 30 00 22 11 9F 01 8D 20 34 30 |T":.850.".... 40|
00000920: 30 30 00 36 11 EA 01 8B 55 5A B2 31 A7 9E 55 50 |00.6....UZ.1..UP|
00000930: 25 3A 89 32 31 37 00 3C 11 F3 01 8E 00 5D 11 F4 |%:.217.<.....]..|
00000940: 01 8F 20 2A 2A 20 54 45 41 43 48 45 52 20 49 4E |.. ** TEACHER IN|
00000950: 53 54 52 55 43 54 49 4F 4E 53 20 2A 2A 00 8D 11 |STRUCTIONS **...|
00000960: F5 01 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B |...".":.UT,UL%:.|
00000970: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
00000980: 31 2C 32 3A 97 35 33 32 38 30 2C 31 30 00 AE 11 |1,2:.53280,10...|
00000990: F6 01 55 50 B2 30 3A 55 47 24 B2 22 D4 45 41 43 |..UP.0:UG$.".EAC|
000009A0: 48 45 52 20 C9 4E 53 54 22 3A 8D 38 35 30 00 DC |HER .NST":.850..|
000009B0: 11 F7 01 99 22 11 11 20 20 20 20 20 20 D4 4F 20 |....".. .O |
000009C0: 54 48 45 20 42 45 53 54 20 4F 46 20 4F 55 52 20 |THE BEST OF OUR |
000009D0: 4B 4E 4F 57 4C 45 44 47 45 2C 11 22 00 05 12 F8 |KNOWLEDGE,."....|
000009E0: 01 99 22 20 20 20 54 48 49 53 20 50 52 4F 47 52 |.." THIS PROGR|
000009F0: 41 4D 20 49 53 20 49 4E 20 54 48 45 20 50 55 42 |AM IS IN THE PUB|
00000A00: 4C 49 43 11 22 00 31 12 F9 01 99 22 20 20 20 44 |LIC.".1...." D|
00000A10: 4F 4D 41 49 4E 2E 20 20 C9 46 20 54 48 49 53 20 |OMAIN. .F THIS |
00000A20: 49 53 20 4E 4F 54 20 54 48 45 20 43 41 53 45 11 |IS NOT THE CASE.|
00000A30: 22 00 4E 12 FA 01 99 22 20 20 20 50 4C 45 41 53 |".N...." PLEAS|
00000A40: 45 20 43 4F 4E 54 41 43 54 3A 11 11 11 22 00 78 |E CONTACT:...".x|
00000A50: 12 FB 01 99 22 20 20 20 20 20 20 C3 4F 4D 4D 4F |...." .OMMO|
00000A60: 44 4F 52 45 20 C2 55 53 49 4E 45 53 53 20 CD 41 |DORE .USINESS .A|
00000A70: 43 48 49 4E 45 53 11 22 00 9B 12 FC 01 99 22 20 |CHINES."......" |
00000A80: 20 20 20 20 20 20 20 20 20 33 33 37 30 20 D0 48 | 3370 .H|
00000A90: 41 52 4D 41 43 59 20 C1 56 45 2E 00 BF 12 FD 01 |ARMACY .VE......|
00000AA0: 99 22 20 20 20 20 20 20 20 20 20 20 C1 47 49 4E |." .GIN|
00000AB0: 43 4F 55 52 54 2C 20 CF 4E 54 41 52 49 4F 22 00 |COURT, .NTARIO".|
00000AC0: E1 12 FE 01 99 22 20 20 20 20 20 20 20 20 20 20 |....." |
00000AD0: C3 41 4E 41 44 41 20 20 20 CD 31 D7 20 32 CB 34 |.ANADA .1. 2.4|
00000AE0: 22 00 01 13 FF 01 99 22 20 20 20 20 20 20 20 20 |"......" |
00000AF0: 20 20 28 34 31 36 29 20 34 39 39 2D 34 32 39 32 | (416) 499-4292|
00000B00: 22 00 17 13 00 02 55 50 B2 31 3A 8D 20 38 33 35 |".....UP.1:. 835|
00000B10: 3A 8D 20 38 35 30 3A 00 41 13 01 02 99 22 20 20 |:. 850:.A...." |
00000B20: 20 20 20 11 11 D0 52 4F 47 52 41 4D 20 CE 41 4D | ...ROGRAM .AM|
00000B30: 45 3A 20 C8 59 50 4F 20 20 20 20 20 20 20 20 20 |E: .YPO |
00000B40: 11 00 63 13 02 02 99 22 20 20 20 20 20 D7 52 49 |..c...." .RI|
00000B50: 54 54 45 4E 20 C2 59 20 20 3A 20 D5 4E 4B 4E 4F |TTEN .Y : .NKNO|
00000B60: 57 4E 11 00 86 13 03 02 99 22 20 20 20 20 20 D5 |WN......." .|
00000B70: 50 47 52 41 44 45 44 20 C2 59 20 3A 20 20 20 20 |PGRADED .Y : |
00000B80: 20 20 20 20 20 11 00 B1 13 04 02 99 22 20 20 20 | ......." |
00000B90: 20 20 11 D4 48 49 53 20 50 52 4F 47 52 41 4D 20 | ..HIS PROGRAM |
00000BA0: 57 49 4C 4C 20 52 55 4E 20 4F 4E 20 41 4E 59 11 |WILL RUN ON ANY.|
00000BB0: 11 00 D0 13 07 02 99 22 20 20 20 20 20 20 20 20 |......." |
00000BC0: 20 D0 C5 D4 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 | ... 64 ........|
00000BD0: 00 F5 13 08 02 99 22 20 20 20 20 20 20 20 20 20 |......" |
00000BE0: C3 CF CD CD CF C4 CF D2 C5 20 36 34 20 C3 CF CD |......... 64 ...|
00000BF0: D0 D5 D4 C5 D2 00 FE 13 09 02 8D 38 33 35 00 12 |...........835..|
00000C00: 14 4E 02 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 |.N..UZ.1..UP%:.2|
00000C10: 31 37 00 18 14 57 02 8E 00 3E 14 58 02 8F 20 2A |17...W...>.X.. *|
00000C20: 2A 20 50 52 4F 47 52 41 4D 20 4D 4F 44 49 46 49 |* PROGRAM MODIFI|
00000C30: 43 41 54 49 4F 4E 20 49 4E 53 54 20 2A 2A 00 4F |CATION INST **.O|
00000C40: 14 59 02 99 22 93 22 3A 97 55 54 2C 55 4C 25 00 |.Y..".":.UT,UL%.|
00000C50: 6F 14 5D 02 55 50 B2 30 3A 55 47 24 B2 22 D0 52 |o.].UP.0:UG$.".R|
00000C60: 4F 47 52 41 4D 20 CD 4F 44 22 3A 8D 38 35 30 00 |OGRAM .OD":.850.|
00000C70: 78 14 94 02 8D 38 33 35 00 8C 14 B2 02 8B 55 5A |x....835......UZ|
00000C80: B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 92 14 BB |.1..UP%:.217....|
00000C90: 02 8E 00 B7 14 BC 02 8F 20 2A 2A 20 54 4F 20 55 |........ ** TO U|
00000CA0: 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 42 4D |SE 8032 LOAD CBM|
00000CB0: 34 30 33 32 20 2A 2A 00 ED 14 C6 02 99 22 93 11 |4032 **......"..|
00000CC0: 11 11 05 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E |...BEFORE RUNNIN|
00000CD0: 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 4F |G THIS PROGRAM O|
00000CE0: 4E 20 41 4E 20 38 30 33 32 20 20 11 11 00 23 15 |N AN 8032 ...#.|
00000CF0: D0 02 99 22 20 20 20 20 20 20 4C 4F 41 44 20 54 |..." LOAD T|
00000D00: 48 45 20 27 43 42 4D 20 34 30 33 32 27 20 50 52 |HE 'CBM 4032' PR|
00000D10: 4F 47 52 41 4D 11 11 11 11 11 11 11 11 11 11 11 |OGRAM...........|
00000D20: 11 11 22 00 2E 15 DA 02 9E 55 55 AA 37 31 00 34 |.."......UU.71.4|
00000D30: 15 E4 02 80 00 54 15 20 03 8F 20 2A 2A 20 54 20 |.....T. .. ** T |
00000D40: 49 20 54 20 4C 20 45 20 20 20 50 20 41 20 47 20 |I T L E P A G |
00000D50: 45 20 2A 2A 00 88 15 22 03 99 22 93 11 1D 05 22 |E **...".."...."|
00000D60: 3B 3A 97 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 |;:.UT,UU%:..(500|
00000D70: 30 33 29 B2 30 A7 97 35 33 32 38 30 2C 31 34 3A |03).0..53280,14:|
00000D80: 97 35 33 32 38 31 2C 36 00 9E 15 24 03 81 49 B2 |.53281,6...$..I.|
00000D90: 31 A4 33 38 3A 99 22 12 A6 92 22 3B 3A 82 00 B6 |1.38:."...";:...|
00000DA0: 15 26 03 81 49 B2 31 A4 32 32 3A 99 22 11 9D 12 |.&..I.1.22:."...|
00000DB0: A6 92 22 3B 3A 82 00 CE 15 28 03 81 49 B2 31 A4 |..";:....(..I.1.|
00000DC0: 33 37 3A 99 22 9D 9D 12 A6 92 22 3B 3A 82 00 E6 |37:.".....";:...|
00000DD0: 15 2A 03 81 49 B2 31 A4 32 32 3A 99 22 91 9D 12 |.*..I.1.22:."...|
00000DE0: A6 92 22 3B 3A 82 00 0B 16 2C 03 99 22 13 11 11 |..";:....,.."...|
00000DF0: 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000E00: 1D 1D 1D 1D 1D 1D 12 A9 20 20 92 00 2D 16 2E 03 |........ ..-...|
00000E10: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00000E20: 1D 1D 1D 1D 12 20 92 20 20 12 20 92 A9 00 4E 16 |..... . . ...N.|
00000E30: 30 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |0.."............|
00000E40: 1D 1D 1D 1D 1D 1D 12 20 92 20 20 12 A3 DF 00 6C |....... . ....l|
00000E50: 16 32 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.2.."...........|
00000E60: 1D 1D 1D 1D 1D 1D 1D DF 12 20 20 92 00 94 16 34 |......... ....4|
00000E70: 03 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..".............|
00000E80: 1D 43 20 4F 20 4D 20 4D 20 4F 20 44 20 4F 20 52 |.C O M M O D O R|
00000E90: 20 45 11 11 00 B7 16 36 03 99 22 1D 1D 1D 1D 1D | E.....6..".....|
00000EA0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 |..........EDUCAT|
00000EB0: 49 4F 4E 41 4C 11 11 00 D6 16 38 03 99 22 1D 1D |IONAL.....8.."..|
00000EC0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F |..............SO|
00000ED0: 46 54 57 41 52 45 00 F1 16 3A 03 8F 20 2A 2A 20 |FTWARE...:.. ** |
00000EE0: 43 4F 4D 4D 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A |COMMODORE LOGO *|
00000EF0: 2A 00 29 17 3B 03 99 C8 28 55 44 24 2C 32 34 29 |*.).;...(UD$,24)|
00000F00: 3B 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 |;"..........PRES|
00000F10: 53 20 53 50 41 43 45 20 42 41 52 20 4F 52 20 57 |S SPACE BAR OR W|
00000F20: 41 49 54 92 22 3A 49 B2 30 00 4B 17 3C 03 A1 41 |AIT.":I.0.K.<..A|
00000F30: 24 3A 8B 41 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 |$:.A$.." ".I.I.1|
00000F40: 3A 8B 49 B3 32 35 30 A7 38 32 38 00 6F 17 3E 03 |:.I.250.828.o.>.|
00000F50: 54 31 24 B2 22 22 3A 54 32 24 B2 22 22 3A 54 33 |T1$."":T2$."":T3|
00000F60: 24 B2 22 22 3A 54 34 24 B2 22 22 3A 49 B2 30 00 |$."":T4$."":I.0.|
00000F70: 78 17 40 03 89 33 30 30 00 94 17 43 03 8F 20 2A |x.@..300...C.. *|
00000F80: 2A 20 53 50 41 43 45 20 42 41 52 20 50 52 45 53 |* SPACE BAR PRES|
00000F90: 53 20 2A 2A 00 CF 17 48 03 99 C8 28 55 44 24 2C |S **...H...(UD$,|
00000FA0: 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 52 45 53 |24);".......PRES|
00000FB0: 53 20 53 50 41 43 45 20 42 41 52 20 54 4F 20 43 |S SPACE BAR TO C|
00000FC0: 4F 4E 54 49 4E 55 45 92 22 3A 97 55 4F 2C 30 00 |ONTINUE.":.UO,0.|
00000FD0: E6 17 4C 03 A1 55 49 24 3A 8B 55 49 24 B3 B1 22 |..L..UI$:.UI$.."|
00000FE0: 20 22 A7 38 34 34 00 EC 17 4E 03 8E 00 0C 18 52 | ".844...N.....R|
00000FF0: 03 8F 20 2A 2A 20 50 41 47 45 20 44 45 53 49 47 |.. ** PAGE DESIG|
00001000: 4E 20 52 4F 55 54 49 4E 45 20 2A 2A 00 18 18 54 |N ROUTINE **...T|
00001010: 03 55 50 B2 55 50 AA 31 00 42 18 57 03 99 22 93 |.UP.UP.1.B.W..".|
00001020: 22 C8 28 55 54 24 AA 55 50 24 2C 32 31 29 3B C9 |".(UT$.UP$,21);.|
00001030: 28 55 50 24 AA 55 47 24 AA C4 28 55 50 29 2C 31 |(UP$.UG$..(UP),1|
00001040: 38 29 00 71 18 5C 03 99 22 20 2D 2D 2D 2D 2D 2D |8).q.\.." ------|
00001050: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001060: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001070: 22 00 80 18 60 03 8B 55 48 B3 B1 30 A7 38 37 30 |"...`..UH..0.870|
00001080: 00 B4 18 61 03 99 C8 28 55 44 24 2C 32 34 29 3B |...a...(UD$,24);|
00001090: C8 28 55 50 24 2C 37 29 3B 22 48 45 4C 50 20 2D |.(UP$,7);"HELP -|
000010A0: 20 50 52 45 53 53 20 20 20 48 20 3C 52 45 54 55 | PRESS H <RETU|
000010B0: 52 4E 3E 22 00 C5 18 66 03 55 48 B2 30 3A 99 22 |RN>"...f.UH.0:."|
000010C0: 13 11 22 3A 8E 00 E4 18 6B 03 8F 20 2A 2A 20 50 |..":....k.. ** P|
000010D0: 4C 45 41 53 45 20 57 41 49 54 20 52 45 4D 41 52 |LEASE WAIT REMAR|
000010E0: 4B 20 2A 2A 00 1A 19 70 03 99 C8 28 55 44 24 2C |K **...p...(UD$,|
000010F0: 32 34 29 3B 22 20 20 20 20 20 20 20 20 20 20 20 |24);" |
00001100: 4F 4E 45 20 4D 4F 4D 45 4E 54 20 50 4C 45 41 53 |ONE MOMENT PLEAS|
00001110: 45 2E 2E 2E 20 20 20 20 20 22 00 20 19 75 03 8E |E... ". .u..|
00001120: 00 3D 19 84 03 8F 20 2A 2A 20 53 45 54 20 55 50 |.=.... ** SET UP|
00001130: 20 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 88 19 | VARIABLES **...|
00001140: 85 03 55 58 24 B2 22 48 22 3A 86 55 51 25 28 31 |..UX$."H":.UQ%(1|
00001150: 30 30 30 29 3A 55 42 B2 33 32 37 36 38 3A 55 31 |000):UB.32768:U1|
00001160: B2 31 39 36 3A 55 32 B2 31 39 37 3A 55 33 B2 31 |.196:U2.197:U3.1|
00001170: 39 38 3A 55 34 B2 32 31 36 3A 55 43 B2 31 36 37 |98:U4.216:UC.167|
00001180: 3A 55 55 B2 31 30 32 34 00 C6 19 86 03 55 54 B2 |:UU.1024.....UT.|
00001190: 35 39 34 36 38 3A 55 55 25 B2 31 32 3A 55 4C 25 |59468:UU%.12:UL%|
000011A0: B2 31 34 3A 55 50 25 B2 31 31 34 36 3A 55 4D B2 |.14:UP%.1146:UM.|
000011B0: 33 32 37 36 38 3A 97 20 35 30 30 30 33 2C 30 3A |32768:. 50003,0:|
000011C0: 55 4F B2 31 35 38 00 09 1A 87 03 8B C2 28 35 30 |UO.158.......(50|
000011D0: 30 30 33 29 B2 30 A7 55 42 B2 31 30 32 34 3A 55 |003).0.UB.1024:U|
000011E0: 31 B2 32 30 39 3A 55 32 B2 32 31 30 3A 55 33 B2 |1.209:U2.210:U3.|
000011F0: 32 31 31 3A 55 34 B2 32 31 34 3A 55 43 B2 32 30 |211:U4.214:UC.20|
00001200: 34 3A 55 55 B2 32 30 34 38 00 48 1A 88 03 8B C2 |4:UU.2048.H.....|
00001210: 28 35 30 30 30 33 29 B2 30 A7 55 54 B2 35 33 32 |(50003).0.UT.532|
00001220: 37 32 3A 55 55 25 B2 32 31 3A 55 4C 25 B2 32 33 |72:UU%.21:UL%.23|
00001230: 3A 55 50 25 B2 32 31 33 39 3A 55 4D B2 31 30 32 |:UP%.2139:UM.102|
00001240: 34 3A 55 4F B2 31 39 38 00 6C 1A 89 03 55 44 24 |4:UO.198.l...UD$|
00001250: B2 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
00001260: 11 11 11 11 11 11 11 11 11 11 11 22 00 9E 1A 8A |..........."....|
00001270: 03 55 50 24 B2 22 20 20 20 20 20 20 20 20 20 20 |.UP$." |
00001280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001290: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 EC | "..|
000012A0: 1A 8B 03 55 54 24 B2 22 20 C8 59 50 4F 20 20 20 |...UT$." .YPO |
000012B0: 20 20 20 20 20 A0 A0 A0 A0 A0 A0 22 3A 8F 20 50 | ......":. P|
000012C0: 4C 41 43 45 20 50 52 4F 47 52 41 4D 20 54 49 54 |LACE PROGRAM TIT|
000012D0: 4C 45 20 48 45 52 45 20 21 21 21 21 21 21 21 21 |LE HERE !!!!!!!!|
000012E0: 21 21 21 21 21 21 21 21 21 2A 2A 2A 00 1E 1B 8C |!!!!!!!!!***....|
000012F0: 03 86 20 4D 45 25 28 34 39 29 2C 44 41 25 28 32 |.. ME%(49),DA%(2|
00001300: 30 29 2C 4F 43 25 28 31 38 29 3A 81 49 B2 31 A4 |0),OC%(18):.I.1.|
00001310: 31 38 3A 87 4F 43 25 28 49 29 3A 82 3A 8E 00 38 |18:.OC%(I):.:..8|
00001320: 1B 8E 03 8F 20 2A 2A 20 53 45 54 20 56 41 52 49 |.... ** SET VARI|
00001330: 41 42 4C 45 53 20 2A 2A 00 41 1B 93 03 8D 39 30 |ABLES **.A....90|
00001340: 30 00 5C 1B 98 03 8F 20 2A 2A 20 43 48 45 43 4B |0.\.... ** CHECK|
00001350: 20 46 4F 52 20 38 30 33 32 20 2A 2A 00 7A 1B 9D | FOR 8032 **.z..|
00001360: 03 99 22 93 22 3A 99 22 A0 22 3A 8F 20 53 48 49 |..".":.".":. SHI|
00001370: 46 54 45 44 20 53 50 41 43 45 00 91 1B A2 03 8B |FTED SPACE......|
00001380: C2 28 55 42 AA 34 30 29 B3 B1 39 36 A7 8D 37 30 |.(UB.40)..96..70|
00001390: 30 00 AA 1B A3 03 8F 20 2A 2A 20 4D 45 4D 4F 52 |0...... ** MEMOR|
000013A0: 59 20 43 48 45 43 4B 20 2A 2A 00 BE 1B A4 03 8B |Y CHECK **......|
000013B0: 20 B8 28 30 29 B1 32 30 30 30 A7 39 33 37 00 EC | .(0).2000.937..|
000013C0: 1B A5 03 99 22 93 11 11 05 54 48 49 53 20 4D 41 |...."....THIS MA|
000013D0: 43 48 49 4E 45 20 44 4F 45 53 20 4E 4F 54 20 48 |CHINE DOES NOT H|
000013E0: 41 56 45 20 45 4E 4F 55 47 48 11 22 00 10 1C A6 |AVE ENOUGH."....|
000013F0: 03 99 22 4D 45 4D 4F 52 59 20 54 4F 20 52 55 4E |.."MEMORY TO RUN|
00001400: 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 21 22 | THIS PROGRAM !"|
00001410: 00 1B 1C A7 03 9E 55 55 AA 37 31 00 21 1C A8 03 |......UU.71.!...|
00001420: 80 00 3B 1C A9 03 99 22 93 05 22 3A 8B C2 28 35 |..;...."..":..(5|
00001430: 30 30 30 33 29 B2 30 A7 39 36 32 00 6A 1C AC 03 |0003).0.962.j...|
00001440: 8F 20 2A 2A 20 42 41 53 49 43 20 32 2E 30 20 20 |. ** BASIC 2.0 |
00001450: 4F 52 20 20 34 2E 30 20 20 4F 52 20 20 43 2D 36 |OR 4.0 OR C-6|
00001460: 34 20 53 45 54 55 50 20 2A 2A 00 A8 1C AD 03 97 |4 SETUP **......|
00001470: 31 30 37 35 2C 31 33 33 3A 97 31 30 37 36 2C 31 |1075,133:.1076,1|
00001480: 34 34 3A 97 31 30 37 37 2C 32 33 34 3A 97 31 30 |44:.1077,234:.10|
00001490: 37 39 2C 34 3A 97 31 30 38 30 2C 31 33 33 3A 97 |79,4:.1080,133:.|
000014A0: 31 30 38 31 2C 31 34 35 00 DE 1C AE 03 97 31 30 |1081,145......10|
000014B0: 39 31 2C 31 35 35 3A 97 31 30 39 38 2C 31 33 33 |91,155:.1098,133|
000014C0: 3A 97 31 30 39 39 2C 31 34 34 3A 97 31 31 30 30 |:.1099,144:.1100|
000014D0: 2C 32 33 34 3A 97 31 31 30 33 2C 31 33 33 00 00 |,234:.1103,133..|
000014E0: 1D AF 03 97 31 31 30 34 2C 31 34 35 3A 97 31 31 |....1104,145:.11|
000014F0: 30 35 2C 32 33 34 3A 97 31 30 38 32 2C 32 33 34 |05,234:.1082,234|
00001500: 00 17 1D B1 03 8B C2 28 35 30 30 30 33 29 B3 B1 |.......(50003)..|
00001510: 31 36 30 A7 39 35 35 00 46 1D B6 03 97 31 30 39 |160.955.F....109|
00001520: 33 2C 38 38 3A 97 31 30 39 34 2C 32 32 38 3A 97 |3,88:.1094,228:.|
00001530: 31 30 39 37 2C 38 35 3A 97 31 31 30 32 2C 32 32 |1097,85:.1102,22|
00001540: 38 3A 89 39 36 35 00 5B 1D BB 03 8B C2 28 35 30 |8:.965.[.....(50|
00001550: 30 30 33 29 B3 B1 31 A7 39 39 30 00 8A 1D C0 03 |003)..1.990.....|
00001560: 97 31 30 39 33 2C 34 39 3A 97 31 30 39 34 2C 32 |.1093,49:.1094,2|
00001570: 33 30 3A 97 31 30 39 37 2C 34 36 3A 97 31 31 30 |30:.1097,46:.110|
00001580: 32 2C 32 33 30 3A 89 39 36 35 00 C4 1D C2 03 97 |2,230:.965......|
00001590: 32 30 39 39 2C 31 34 31 3A 97 32 31 30 30 2C 32 |2099,141:.2100,2|
000015A0: 30 3A 97 32 31 30 31 2C 33 3A 97 32 31 30 33 2C |0:.2101,3:.2103,|
000015B0: 38 3A 97 32 31 30 34 2C 31 34 31 3A 97 32 31 30 |8:.2104,141:.210|
000015C0: 35 2C 32 31 00 00 1E C3 03 97 32 31 30 36 2C 33 |5,21......2106,3|
000015D0: 3A 97 32 31 31 35 2C 31 34 35 3A 97 32 31 31 37 |:.2115,145:.2117|
000015E0: 2C 35 32 3A 97 32 31 31 38 2C 32 33 34 3A 97 32 |,52:.2118,234:.2|
000015F0: 31 32 31 2C 34 39 3A 97 32 31 32 32 2C 31 34 31 |121,49:.2122,141|
00001600: 00 3A 1E C4 03 97 32 31 32 33 2C 32 30 3A 97 32 |.:....2123,20:.2|
00001610: 31 32 34 2C 33 3A 97 32 31 32 36 2C 32 33 34 3A |124,3:.2126,234:|
00001620: 97 32 31 32 37 2C 31 34 31 3A 97 32 31 32 38 2C |.2127,141:.2128,|
00001630: 32 31 3A 97 32 31 32 39 2C 33 00 58 1E C5 03 9E |21:.2129,3.X....|
00001640: 55 55 AA 34 38 3A 8F 20 44 49 53 41 42 4C 45 20 |UU.48:. DISABLE |
00001650: 53 54 4F 50 20 4B 45 59 00 69 1E CA 03 8D 38 30 |STOP KEY.i....80|
00001660: 30 3A 8F 20 54 49 54 4C 45 00 79 1E D4 03 89 33 |0:. TITLE.y....3|
00001670: 30 30 3A 8F 20 4D 45 4E 55 00 AA 1E DE 03 99 22 |00:. MENU......"|
00001680: 93 54 48 45 20 50 47 4D 20 57 49 4C 4C 20 4E 4F |.THE PGM WILL NO|
00001690: 54 20 57 4F 52 4B 20 4F 4E 20 54 48 49 53 20 4D |T WORK ON THIS M|
000016A0: 41 43 48 49 4E 45 21 22 3A 80 00 DF 1E E8 03 8B |ACHINE!":.......|
000016B0: 55 5A B2 31 A7 9E 55 50 25 3A 9E 55 50 25 3A 55 |UZ.1..UP%:.UP%:U|
000016C0: 5A B2 30 3A 8F 20 2A 2A 20 50 52 4F 47 52 41 4D |Z.0:. ** PROGRAM|
000016D0: 20 53 54 41 52 54 53 20 48 45 52 45 20 2A 2A 00 | STARTS HERE **.|
000016E0: 0A 1F E9 03 99 22 93 05 22 3B 3A 8C 3A 8B C2 28 |....."..";:.:..(|
000016F0: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
00001700: 36 3A 97 35 33 32 38 30 2C 36 00 1A 1F EA 03 55 |6:.53280,6.....U|
00001710: 47 24 B2 22 22 3A 55 50 B2 30 00 23 1F F2 03 46 |G$."":UP.0.#...F|
00001720: 4C B2 30 00 56 1F FC 03 83 33 30 2C 33 31 2C 31 |L.0.V....30,31,1|
00001730: 30 2C 31 31 2C 31 32 2C 31 33 2C 32 30 2C 32 31 |0,11,12,13,20,21|
00001740: 2C 32 32 2C 32 33 2C 33 2C 31 2C 32 2C 36 2C 38 |,22,23,3,1,2,6,8|
00001750: 2C 37 2C 35 2C 30 00 6D 1F 1A 04 81 49 B2 30 A4 |,7,5,0.m....I.0.|
00001760: 34 39 3A 4D 45 25 28 49 29 B2 30 3A 82 00 99 1F |49:ME%(I).0:....|
00001770: 24 04 49 41 B2 30 3A 49 52 B2 30 3A 53 41 B2 30 |$.IA.0:IR.0:SA.0|
00001780: 3A 53 52 B2 30 3A 41 43 B2 30 3A 4D 51 B2 30 3A |:SR.0:AC.0:MQ.0:|
00001790: 4E 44 B2 30 3A 4C 44 B2 30 00 C2 1F 2E 04 99 22 |ND.0:LD.0......"|
000017A0: 93 20 20 20 20 20 20 12 54 48 45 20 48 59 50 4F |. .THE HYPO|
000017B0: 54 48 45 54 49 43 41 4C 20 4D 41 43 48 49 4E 45 |THETICAL MACHINE|
000017C0: 92 22 00 E1 1F 38 04 99 22 B0 22 3B 3A 81 49 B2 |."...8..".";:.I.|
000017D0: 31 A4 33 35 3A 99 22 B2 22 3B 3A 82 3A 99 22 AE |1.35:.".";:.:.".|
000017E0: 22 00 EF 1F 42 04 81 49 B2 30 A4 34 39 A9 35 00 |"...B..I.0.49.5.|
000017F0: 0D 20 4C 04 99 22 DD 22 3B 3A 81 4A B2 31 A4 35 |. L..".";:.J.1.5|
00001800: 3A 99 22 30 30 30 30 30 DD 22 3B 3A 82 00 34 20 |:."00000.";:..4 |
00001810: 56 04 49 24 B2 C4 28 49 29 3A 49 24 B2 C9 28 49 |V.I$..(I):I$..(I|
00001820: 24 2C C3 28 49 24 29 AB 31 29 3A 49 24 B2 22 30 |$,.(I$).1):I$."0|
00001830: 22 AA 49 24 00 5D 20 60 04 4A 24 B2 C4 28 49 AA |".I$.] `.J$..(I.|
00001840: 34 29 3A 4A 24 B2 C9 28 4A 24 2C C3 28 4A 24 29 |4):J$..(J$,.(J$)|
00001850: AB 31 29 3A 4A 24 B2 22 30 22 AA 4A 24 00 71 20 |.1):J$."0".J$.q |
00001860: 6A 04 8B 49 B1 39 A7 49 24 B2 C9 28 49 24 2C 32 |j..I.9.I$..(I$,2|
00001870: 29 00 87 20 74 04 8B 49 AA 34 B1 39 A7 4A 24 B2 |).. t..I.4.9.J$.|
00001880: C9 28 4A 24 2C 32 29 00 A6 20 7E 04 99 C8 28 49 |.(J$,2).. ~...(I|
00001890: 24 2C 32 29 3B 22 2D 22 3B C8 28 4A 24 2C 33 29 |$,2);"-";.(J$,3)|
000018A0: 3B 22 DD 22 3A 82 00 C5 20 88 04 99 22 AD 22 3B |;".":... ...".";|
000018B0: 3A 81 49 B2 31 A4 33 35 3A 99 22 B1 22 3B 3A 82 |:.I.1.35:.".";:.|
000018C0: 3A 99 22 BD 22 00 DB 20 92 04 99 A3 31 39 29 3B |:.".".. ....19);|
000018D0: 22 9D 91 DB 9D 11 DD 9D 11 DD 22 00 11 21 9C 04 |"........."..!..|
000018E0: 99 22 91 B0 22 3B 3A 81 49 B2 31 A4 31 37 3A 99 |."..";:.I.1.17:.|
000018F0: 22 C0 22 3B 3A 82 3A 99 22 DB 22 3B 3A 81 49 B2 |".";:.:.".";:.I.|
00001900: 31 A4 31 37 3A 99 22 C0 22 3B 3A 82 3A 99 22 AE |1.17:.".";:.:.".|
00001910: 22 00 3E 21 A6 04 99 22 DD 4F 55 54 50 55 54 3D |".>!...".OUTPUT=|
00001920: 20 20 20 20 20 20 20 20 20 20 DD 49 4E 50 55 54 | .INPUT|
00001930: 3D 20 20 20 20 20 20 20 20 20 20 20 DD 22 00 73 |= .".s|
00001940: 21 B0 04 99 22 AD 22 3B 3A 81 49 B2 31 A4 31 37 |!...".";:.I.1.17|
00001950: 3A 99 22 C0 22 3B 3A 82 3A 99 22 DB 22 3B 3A 81 |:.".";:.:.".";:.|
00001960: 49 B2 31 A4 31 37 3A 99 22 C0 22 3B 3A 82 3A 99 |I.1.17:.".";:.:.|
00001970: 22 BD 22 00 81 21 BA 04 99 A3 31 38 29 3B 22 DD |"."..!....18);".|
00001980: 22 00 B7 21 C4 04 99 22 91 B0 22 3B 3A 81 49 B2 |"..!..."..";:.I.|
00001990: 31 A4 31 37 3A 99 22 C0 22 3B 3A 82 3A 99 22 B1 |1.17:.".";:.:.".|
000019A0: 22 3B 3A 81 49 B2 31 A4 31 37 3A 99 22 C0 22 3B |";:.I.1.17:.".";|
000019B0: 3A 82 3A 99 22 AE 22 00 E4 21 CE 04 99 22 DD 49 |:.:."."..!...".I|
000019C0: 41 52 3D 30 30 20 20 20 49 52 3D 30 30 30 30 30 |AR=00 IR=00000|
000019D0: 20 53 41 52 3D 30 30 20 20 20 53 52 3D 30 30 30 | SAR=00 SR=000|
000019E0: 30 30 DD 22 00 11 22 D8 04 99 22 DD 20 20 20 41 |00.".."...". A|
000019F0: 43 3D 30 30 30 30 30 20 20 20 20 20 20 20 20 20 |C=00000 |
00001A00: 20 20 4D 51 3D 30 30 30 30 30 20 20 20 20 20 DD | MQ=00000 .|
00001A10: 22 00 30 22 E2 04 99 22 AD 22 3B 3A 81 49 B2 31 |".0"...".";:.I.1|
00001A20: A4 33 35 3A 99 22 C0 22 3B 3A 82 3A 99 22 BD 22 |.35:.".";:.:."."|
00001A30: 00 45 22 EC 04 4C 49 B2 32 33 3A 53 50 B2 30 3A |.E"..LI.23:SP.0:|
00001A40: 8D 32 36 39 30 00 6B 22 F6 04 99 22 45 4E 54 45 |.2690.k"..."ENTE|
00001A50: 52 20 50 52 4F 47 52 41 4D 20 28 2F 2A 3D 45 4E |R PROGRAM (/*=EN|
00001A60: 44 29 20 4C 4F 43 20 30 30 3D 22 00 78 22 00 05 |D) LOC 00=".x"..|
00001A70: 81 53 41 B2 30 A4 34 39 00 96 22 0A 05 49 24 B2 |.SA.0.49.."..I$.|
00001A80: C4 28 53 41 29 3A 49 24 B2 C9 28 49 24 2C C3 28 |.(SA):I$..(I$,.(|
00001A90: 49 24 29 AB 31 29 00 AD 22 14 05 8B C3 28 49 24 |I$).1).."....(I$|
00001AA0: 29 B3 32 A7 49 24 B2 22 30 22 AA 49 24 00 CF 22 |).2.I$."0".I$.."|
00001AB0: 1E 05 53 50 B2 32 34 3A 8D 32 36 39 30 3A 99 22 |..SP.24:.2690:."|
00001AC0: 4C 4F 43 20 22 3B 49 24 3B 22 3D 20 20 22 3B 00 |LOC ";I$;"= ";.|
00001AD0: EE 22 28 05 8D 32 38 38 30 3A 8B C8 28 56 55 24 |."(..2880:..(VU$|
00001AE0: 2C 32 29 B2 22 2F 2A 22 A7 20 31 34 33 30 00 FC |,2)."/*". 1430..|
00001AF0: 22 32 05 56 55 B2 C5 28 56 55 24 29 00 1B 23 3C |"2.VU..(VU$)..#<|
00001B00: 05 8B 56 55 B1 B2 AB 33 32 37 36 38 AF 56 55 B3 |..VU...32768.VU.|
00001B10: B2 33 32 37 36 37 A7 31 33 36 30 00 4C 23 46 05 |.32767.1360.L#F.|
00001B20: 53 50 B2 33 37 3A 8D 32 36 39 30 3A 99 22 28 45 |SP.37:.2690:."(E|
00001B30: 29 22 3B 3A 53 50 B2 33 32 3A 8D 32 36 39 30 3A |)";:SP.32:.2690:|
00001B40: 8D 20 32 37 34 30 3A 89 31 33 31 30 00 60 23 50 |. 2740:.1310.`#P|
00001B50: 05 8B 56 55 B3 B1 B5 28 56 55 29 A7 31 33 35 30 |..VU...(VU).1350|
00001B60: 00 6F 23 5A 05 56 53 B2 35 3A 8D 32 36 33 30 00 |.o#Z.VS.5:.2630.|
00001B70: 79 23 64 05 8D 32 37 36 30 00 83 23 6E 05 8D 32 |y#d..2760..#n..2|
00001B80: 36 39 30 00 97 23 78 05 8B B4 28 56 55 29 B2 AB |690..#x...(VU)..|
00001B90: 31 A7 99 22 12 22 3B 00 B1 23 82 05 99 56 55 24 |1..".";..#...VU$|
00001BA0: 3A 4C 49 B2 32 33 3A 4D 45 25 28 53 41 29 B2 56 |:LI.23:ME%(SA).V|
00001BB0: 55 00 B7 23 8C 05 82 00 C7 23 96 05 8D 32 37 37 |U..#.....#...277|
00001BC0: 30 3A 89 32 32 36 30 00 DC 23 A0 05 56 55 B2 49 |0:.2260..#..VU.I|
00001BD0: 41 3A 56 53 B2 32 3A 8D 32 36 33 30 00 EB 23 AA |A:VS.2:.2630..#.|
00001BE0: 05 4C 49 B2 31 39 3A 53 50 B2 36 00 F5 23 B4 05 |.LI.19:SP.6..#..|
00001BF0: 8D 32 36 31 30 00 09 24 BE 05 A1 59 24 3A 8B 59 |.2610..$...Y$:.Y|
00001C00: 24 B2 22 22 A7 31 35 30 30 00 1D 24 C8 05 8B C6 |$."".1500..$....|
00001C10: 28 59 24 29 B3 B1 32 30 A7 31 35 30 30 00 3F 24 |(Y$)..20.1500.?$|
00001C20: D2 05 98 35 2C 22 49 4E 54 45 52 52 55 50 54 20 |...5,"INTERRUPT |
00001C30: 52 45 51 55 45 53 54 22 3B 3A 89 32 32 34 30 00 |REQUEST";:.2240.|
00001C40: 54 24 DC 05 8B 4D 45 25 28 49 41 29 B2 B1 30 A7 |T$...ME%(IA)..0.|
00001C50: 31 35 32 30 00 73 24 E6 05 98 35 2C 22 4E 45 47 |1520.s$...5,"NEG|
00001C60: 41 54 49 56 45 20 56 41 4C 55 45 22 3B 3A 89 32 |ATIVE VALUE";:.2|
00001C70: 32 34 30 00 A5 24 F0 05 56 55 B2 4D 45 25 28 49 |240..$..VU.ME%(I|
00001C80: 41 29 3A 56 53 B2 35 3A 8D 32 36 33 30 3A 4C 49 |A):VS.5:.2630:LI|
00001C90: B2 31 39 3A 53 50 B2 31 34 3A 8D 32 36 31 30 3A |.19:SP.14:.2610:|
00001CA0: 49 52 B2 56 55 00 E2 24 FA 05 56 55 B2 56 55 AB |IR.VU..$..VU.VU.|
00001CB0: B5 28 56 55 AD 31 30 30 30 29 AC 31 30 30 30 3A |.(VU.1000).1000:|
00001CC0: 56 53 B2 32 3A 8D 32 36 33 30 3A 4C 49 B2 31 39 |VS.2:.2630:LI.19|
00001CD0: 3A 53 50 B2 32 34 3A 8D 32 36 31 30 3A 53 41 B2 |:SP.24:.2610:SA.|
00001CE0: 56 55 00 F9 24 04 06 8B 53 41 B1 B2 30 AF 53 41 |VU..$...SA..0.SA|
00001CF0: B3 B2 34 39 A7 31 35 36 30 00 27 25 0E 06 98 35 |..49.1560.'%...5|
00001D00: 2C 22 1D 1D 42 41 44 20 41 44 44 52 45 53 53 20 |,"..BAD ADDRESS |
00001D10: 28 22 3B CA 28 C4 28 53 41 29 2C 32 29 22 29 22 |(";.(.(SA),2)")"|
00001D20: 3B 3A 89 32 32 34 30 00 59 25 18 06 56 55 B2 4D |;:.2240.Y%..VU.M|
00001D30: 45 25 28 53 41 29 3A 56 53 B2 35 3A 8D 32 36 33 |E%(SA):VS.5:.263|
00001D40: 30 3A 4C 49 B2 31 39 3A 53 50 B2 33 32 3A 8D 32 |0:LI.19:SP.32:.2|
00001D50: 36 31 30 3A 53 52 B2 56 55 00 8A 25 22 06 49 41 |610:SR.VU..%".IA|
00001D60: 52 B2 49 41 52 AA 31 3A 56 55 B2 49 41 52 3A 56 |R.IAR.1:VU.IAR:V|
00001D70: 53 B2 32 3A 8D 32 36 33 30 3A 4C 49 B2 31 39 3A |S.2:.2630:LI.19:|
00001D80: 53 50 B2 36 3A 8D 32 36 31 30 00 AD 25 2C 06 4F |SP.6:.2610..%,.O|
00001D90: 50 B2 B5 28 49 52 AD 31 30 30 30 29 3A 4C 49 B2 |P..(IR.1000):LI.|
00001DA0: 32 34 3A 53 50 B2 30 3A 8D 32 36 39 30 00 BD 25 |24:SP.0:.2690..%|
00001DB0: 36 06 8B 4F 50 B3 B1 30 A7 31 36 31 30 00 E9 25 |6..OP..0.1610..%|
00001DC0: 40 06 98 35 2C 22 53 54 4F 50 20 49 4E 53 54 52 |@..5,"STOP INSTR|
00001DD0: 55 43 54 49 4F 4E 20 45 4E 43 4F 55 4E 54 45 52 |UCTION ENCOUNTER|
00001DE0: 45 44 22 3A 89 32 32 36 30 00 FA 25 4A 06 8B 4F |ED":.2260..%J..O|
00001DF0: 50 B3 B1 33 30 A7 31 36 37 30 00 10 26 54 06 4C |P..30.1670..&T.L|
00001E00: 49 B2 31 36 3A 53 50 B2 32 36 3A 8D 32 36 39 30 |I.16:SP.26:.2690|
00001E10: 00 29 26 5E 06 4C 44 B2 4C 44 AA 31 3A 8B 4C 44 |.)&^.LD.LD.1:.LD|
00001E20: B3 B2 4E 44 A7 31 36 35 30 00 45 26 68 06 98 35 |..ND.1650.E&h..5|
00001E30: 2C 22 4F 55 54 20 4F 46 20 44 41 54 41 22 3B 3A |,"OUT OF DATA";:|
00001E40: 89 32 32 34 30 00 5E 26 72 06 56 55 B2 44 41 25 |.2240.^&r.VU.DA%|
00001E50: 28 4C 44 29 3A 99 56 55 3A 8D 32 37 36 30 00 84 |(LD):.VU:.2760..|
00001E60: 26 7C 06 4D 45 25 28 53 41 29 B2 56 55 3A 56 53 |&|.ME%(SA).VU:VS|
00001E70: B2 35 3A 8D 32 36 33 30 3A 8D 32 36 31 30 3A 89 |.5:.2630:.2610:.|
00001E80: 31 34 34 30 00 95 26 86 06 8B 4F 50 B3 B1 33 31 |1440..&...OP..31|
00001E90: A7 31 37 32 30 00 9F 26 90 06 98 35 2C 53 52 00 |.1720..&...5,SR.|
00001EA0: B4 26 9A 06 4C 49 B2 31 36 3A 53 50 B2 39 3A 8D |.&..LI.16:SP.9:.|
00001EB0: 32 36 39 30 00 C3 26 A4 06 56 55 B2 53 52 3A 99 |2690..&..VU.SR:.|
00001EC0: 56 55 3B 00 E4 26 AE 06 8D 32 37 36 30 3A 56 53 |VU;..&...2760:VS|
00001ED0: B2 35 3A 8D 32 36 33 30 3A 8D 32 36 31 30 3A 89 |.5:.2630:.2610:.|
00001EE0: 31 34 34 30 00 F5 26 B8 06 8B 4F 50 B3 B1 31 30 |1440..&...OP..10|
00001EF0: A7 31 37 35 30 00 0A 27 C2 06 4C 49 B2 32 30 3A |.1750..'..LI.20:|
00001F00: 53 50 B2 38 3A 8D 32 36 39 30 00 31 27 CC 06 41 |SP.8:.2690.1'..A|
00001F10: 43 B2 53 52 3A 56 55 B2 53 52 3A 56 53 B2 35 3A |C.SR:VU.SR:VS.5:|
00001F20: 8D 32 36 33 30 3A 8D 32 36 31 30 3A 89 31 34 34 |.2630:.2610:.144|
00001F30: 30 00 42 27 D6 06 8B 4F 50 B3 B1 31 31 A7 31 37 |0.B'...OP..11.17|
00001F40: 37 30 00 7A 27 E0 06 4D 45 25 28 53 41 29 B2 41 |70.z'..ME%(SA).A|
00001F50: 43 3A 56 55 B2 41 43 3A 56 53 B2 35 3A 8D 32 37 |C:VU.AC:VS.5:.27|
00001F60: 36 30 3A 8D 32 36 39 30 3A 8D 32 36 33 30 3A 8D |60:.2690:.2630:.|
00001F70: 32 36 31 30 3A 89 31 34 34 30 00 8B 27 EA 06 8B |2610:.1440..'...|
00001F80: 4F 50 B3 B1 31 32 A7 31 38 30 30 00 A1 27 F4 06 |OP..12.1800..'..|
00001F90: 4C 49 B2 32 30 3A 53 50 B2 32 37 3A 8D 32 36 39 |LI.20:SP.27:.269|
00001FA0: 30 00 C8 27 FE 06 4D 51 B2 53 52 3A 56 55 B2 53 |0..'..MQ.SR:VU.S|
00001FB0: 52 3A 56 53 B2 35 3A 8D 32 36 33 30 3A 8D 32 36 |R:VS.5:.2630:.26|
00001FC0: 31 30 3A 89 31 34 34 30 00 D9 27 08 07 8B 4F 50 |10:.1440..'...OP|
00001FD0: B3 B1 31 33 A7 31 38 32 30 00 11 28 12 07 4D 45 |..13.1820..(..ME|
00001FE0: 25 28 53 41 29 B2 4D 51 3A 56 55 B2 4D 51 3A 56 |%(SA).MQ:VU.MQ:V|
00001FF0: 53 B2 35 3A 8D 32 37 36 30 3A 8D 32 36 39 30 3A |S.5:.2760:.2690:|
00002000: 8D 32 36 33 30 3A 8D 32 36 31 30 3A 89 31 34 34 |.2630:.2610:.144|
00002010: 30 00 22 28 1C 07 8B 4F 50 B3 B1 32 30 A7 31 38 |0."(...OP..20.18|
00002020: 37 30 00 4A 28 26 07 56 55 B2 41 43 AA 53 52 3A |70.J(&.VU.AC.SR:|
00002030: 8B 56 55 B2 B1 AB 33 32 37 36 37 AF 56 55 B2 B3 |.VU...32767.VU..|
00002040: 33 32 37 36 37 A7 31 38 35 30 00 6F 28 30 07 98 |32767.1850.o(0..|
00002050: 35 2C 22 52 45 53 55 4C 54 20 4F 55 54 20 4F 46 |5,"RESULT OUT OF|
00002060: 20 42 4F 55 4E 44 53 22 3B 3A 89 32 32 34 30 00 | BOUNDS";:.2240.|
00002070: 84 28 3A 07 4C 49 B2 32 30 3A 53 50 B2 38 3A 8D |.(:.LI.20:SP.8:.|
00002080: 32 36 39 30 00 A5 28 44 07 41 43 B2 56 55 3A 56 |2690..(D.AC.VU:V|
00002090: 53 B2 35 3A 8D 32 36 33 30 3A 8D 32 36 31 30 3A |S.5:.2630:.2610:|
000020A0: 89 31 34 34 30 00 B6 28 4E 07 8B 4F 50 B3 B1 32 |.1440..(N..OP..2|
000020B0: 31 A7 31 39 30 30 00 DE 28 58 07 56 55 B2 41 43 |1.1900..(X.VU.AC|
000020C0: AB 53 52 3A 8B 56 55 B2 B1 AB 33 32 37 36 37 AF |.SR:.VU...32767.|
000020D0: 56 55 B2 B3 33 32 37 36 37 A7 31 38 35 30 00 E8 |VU..32767.1850..|
000020E0: 28 62 07 89 31 38 34 30 00 F9 28 6C 07 8B 4F 50 |(b..1840..(l..OP|
000020F0: B3 B1 32 32 A7 31 39 35 30 00 21 29 76 07 56 55 |..22.1950.!)v.VU|
00002100: B2 4D 51 AC 53 52 3A 8B 56 55 B2 B1 AB 33 32 37 |.MQ.SR:.VU...327|
00002110: 36 37 AF 56 55 B2 B3 33 32 37 36 37 A7 31 39 33 |67.VU..32767.193|
00002120: 30 00 2B 29 80 07 89 31 38 34 30 00 41 29 8A 07 |0.+)...1840.A)..|
00002130: 4C 49 B2 32 30 3A 53 50 B2 32 37 3A 8D 32 36 39 |LI.20:SP.27:.269|
00002140: 30 00 62 29 94 07 4D 51 B2 56 55 3A 56 53 B2 35 |0.b)..MQ.VU:VS.5|
00002150: 3A 8D 32 36 33 30 3A 8D 32 36 31 30 3A 89 31 34 |:.2630:.2610:.14|
00002160: 34 30 00 73 29 9E 07 8B 4F 50 B3 B1 32 33 A7 32 |40.s)...OP..23.2|
00002170: 30 33 30 00 83 29 A8 07 8B 53 52 B3 B1 30 A7 31 |030..)...SR..0.1|
00002180: 39 38 30 00 A4 29 B2 07 98 35 2C 22 44 49 56 49 |980..)...5,"DIVI|
00002190: 53 49 4F 4E 20 42 59 20 5A 45 52 4F 22 3B 3A 89 |SION BY ZERO";:.|
000021A0: 32 32 34 30 00 C0 29 BC 07 56 55 B2 B5 28 4D 51 |2240..)..VU..(MQ|
000021B0: AD 53 52 29 3A 41 43 B2 4D 51 AB 56 55 AC 53 52 |.SR):AC.MQ.VU.SR|
000021C0: 00 D6 29 C6 07 4C 49 B2 32 30 3A 53 50 B2 32 37 |..)..LI.20:SP.27|
000021D0: 3A 8D 32 36 39 30 00 F1 29 D0 07 4D 51 B2 56 55 |:.2690..)..MQ.VU|
000021E0: 3A 56 53 B2 35 3A 8D 32 36 33 30 3A 8D 32 36 31 |:VS.5:.2630:.261|
000021F0: 30 00 06 2A DA 07 4C 49 B2 32 30 3A 53 50 B2 38 |0..*..LI.20:SP.8|
00002200: 3A 8D 32 36 39 30 00 27 2A E4 07 56 55 B2 41 43 |:.2690.'*..VU.AC|
00002210: 3A 56 53 B2 35 3A 8D 32 36 33 30 3A 8D 32 36 31 |:VS.5:.2630:.261|
00002220: 30 3A 89 31 34 34 30 00 37 2A EE 07 8B 4F 50 B3 |0:.1440.7*...OP.|
00002230: B1 33 A7 32 30 36 30 00 4A 2A F8 07 8B 20 41 43 |.3.2060.J*... AC|
00002240: B3 4F 20 A7 20 49 41 B2 53 41 00 76 2A 02 08 56 |.O . IA.SA.v*..V|
00002250: 55 B2 49 41 3A 56 53 B2 32 3A 8D 32 36 33 30 3A |U.IA:VS.2:.2630:|
00002260: 4C 49 B2 31 39 3A 53 50 B2 36 3A 8D 32 36 31 30 |LI.19:SP.6:.2610|
00002270: 3A 89 31 34 34 30 00 86 2A 0C 08 8B 4F 50 B3 B1 |:.1440..*...OP..|
00002280: 31 A7 32 30 39 30 00 96 2A 16 08 8B 41 43 B2 4F |1.2090..*...AC.O|
00002290: A7 49 41 B2 53 41 00 A0 2A 20 08 89 32 30 35 30 |.IA.SA..* ..2050|
000022A0: 00 B0 2A 2A 08 8B 4F 50 B3 B1 32 A7 32 31 32 30 |..**..OP..2.2120|
000022B0: 00 C0 2A 34 08 8B 41 43 B1 4F A7 49 41 B2 53 41 |..*4..AC.O.IA.SA|
000022C0: 00 CA 2A 3E 08 89 32 30 35 30 00 DA 2A 48 08 8B |..*>..2050..*H..|
000022D0: 4F 50 B3 B1 36 A7 32 31 35 30 00 EB 2A 52 08 8B |OP..6.2150..*R..|
000022E0: 41 43 B3 B2 4F A7 49 41 B2 53 41 00 F5 2A 5C 08 |AC..O.IA.SA..*\.|
000022F0: 89 32 30 35 30 00 05 2B 66 08 8B 4F 50 B3 B1 38 |.2050..+f..OP..8|
00002300: A7 32 31 38 30 00 16 2B 70 08 8B 41 43 B1 B2 4F |.2180..+p..AC..O|
00002310: A7 49 41 B2 53 41 00 20 2B 7A 08 89 32 30 35 30 |.IA.SA. +z..2050|
00002320: 00 30 2B 84 08 8B 4F 50 B3 B1 37 A7 32 32 31 30 |.0+...OP..7.2210|
00002330: 00 41 2B 8E 08 8B 41 43 B3 B1 4F A7 49 41 B2 53 |.A+...AC..O.IA.S|
00002340: 41 00 4B 2B 98 08 89 32 30 35 30 00 5B 2B A2 08 |A.K+...2050.[+..|
00002350: 8B 4F 50 B3 B1 35 A7 32 32 33 30 00 6B 2B AC 08 |.OP..5.2230.k+..|
00002360: 49 41 B2 53 41 3A 89 32 30 35 30 00 8A 2B B6 08 |IA.SA:.2050..+..|
00002370: 98 35 2C 22 49 4E 56 41 4C 49 44 20 4F 50 43 4F |.5,"INVALID OPCO|
00002380: 44 45 22 3B 3A 89 32 32 34 30 00 B1 2B C0 08 98 |DE";:.2240..+...|
00002390: 35 2C 22 2D 2D 50 52 4F 47 52 41 4D 20 41 42 4F |5,"--PROGRAM ABO|
000023A0: 52 54 45 44 22 3A 8B 46 4C B2 30 A7 89 32 32 36 |RTED":.FL.0..226|
000023B0: 30 00 F5 2B CA 08 98 35 2C 22 49 41 52 3D 22 3B |0..+...5,"IAR=";|
000023C0: 49 41 3B 22 20 49 52 3D 22 3B 49 52 3B 22 20 53 |IA;" IR=";IR;" S|
000023D0: 41 52 3D 22 3B 53 41 3B 22 20 53 52 3D 22 3B 53 |AR=";SA;" SR=";S|
000023E0: 52 3B 22 20 41 43 3D 22 3B 41 43 3B 22 20 4D 51 |R;" AC=";AC;" MQ|
000023F0: 3D 22 3B 4D 51 00 16 2C D4 08 99 22 13 22 3A A0 |=";MQ..,...".":.|
00002400: 35 3A 9F 35 2C 33 3A 81 49 B2 31 A4 38 32 30 3A |5:.5,3:.I.1.820:|
00002410: 82 3A 46 4C B2 30 00 4D 2C DE 08 8D 32 36 30 30 |.:FL.0.M,...2600|
00002420: 3A 99 22 4E 3D 4E 45 57 20 4D 3D 4D 4F 44 49 46 |:."N=NEW M=MODIF|
00002430: 59 20 52 3D 52 55 4E 20 47 3D 47 4F 54 4F 20 53 |Y R=RUN G=GOTO S|
00002440: 3D 53 54 4F 50 20 20 20 20 20 20 22 3B 00 68 2C |=STOP ";.h,|
00002450: E8 08 99 22 4C 3D 4C 49 53 54 20 44 3D 4E 45 57 |..."L=LIST D=NEW|
00002460: 20 44 41 54 41 20 22 3B 00 8A 2C F2 08 55 4C B2 | DATA ";..,..UL.|
00002470: 31 3A 55 53 24 B2 22 4E 4D 52 47 53 4C 44 22 3A |1:US$."NMRGSLD":|
00002480: 8D 33 35 3A 59 24 B2 55 52 24 00 9B 2C FC 08 8B |.35:Y$.UR$..,...|
00002490: 59 24 B2 22 4E 22 A7 31 30 35 30 00 AC 2C 01 09 |Y$."N".1050..,..|
000024A0: 8B 20 59 24 B2 22 53 22 20 A7 20 8E 00 BD 2C 06 |. Y$."S" . ...,.|
000024B0: 09 8B 59 24 B2 22 4D 22 A7 32 35 30 30 00 CF 2C |..Y$."M".2500..,|
000024C0: 10 09 8B 59 24 B3 B1 22 52 22 A7 32 34 30 30 00 |...Y$.."R".2400.|
000024D0: FA 2C 1A 09 8D 32 36 30 30 3A 4C 44 B2 4F 3A 55 |.,...2600:LD.O:U|
000024E0: B2 30 3A 99 22 4F 55 54 50 55 54 20 54 4F 20 50 |.0:."OUTPUT TO P|
000024F0: 52 49 4E 54 45 52 3F 20 22 3B 00 18 2D 1F 09 55 |RINTER? ";..-..U|
00002500: 4C B2 31 3A 55 53 24 B2 22 59 4E 22 3A 8D 33 35 |L.1:US$."YN":.35|
00002510: 3A 56 55 24 B2 55 52 24 00 30 2D 24 09 8B C8 28 |:VU$.UR$.0-$...(|
00002520: 56 55 24 2C 31 29 B3 B1 22 59 22 A7 32 34 35 30 |VU$,1).."Y".2450|
00002530: 00 51 2D 2E 09 46 4C B2 31 3A A0 35 3A 9F 35 2C |.Q-..FL.1:.5:.5,|
00002540: 34 3A 55 B2 35 3A 8B 4E 44 B3 B2 4F A7 32 33 38 |4:U.5:.ND..O.238|
00002550: 30 00 65 2D 38 09 98 35 3A 98 35 2C 22 44 41 54 |0.e-8..5:.5,"DAT|
00002560: 41 22 3A 98 35 00 7F 2D 42 09 81 58 58 B2 31 A4 |A":.5..-B..XX.1.|
00002570: 4E 44 3A 98 35 2C 44 41 25 28 58 58 29 3A 82 00 |ND:.5,DA%(XX):..|
00002580: 9D 2D 4C 09 8B 55 B2 35 A7 98 35 3A 98 35 2C 22 |.-L..U.5..5:.5,"|
00002590: 45 58 45 43 55 54 49 4F 4E 22 3A 98 35 00 A7 2D |EXECUTION":.5..-|
000025A0: 56 09 89 32 34 35 30 00 B8 2D 60 09 8B 59 24 B2 |V..2450..-`..Y$.|
000025B0: 22 47 22 A7 32 34 36 30 00 DA 2D 6A 09 8B 59 24 |"G".2460..-j..Y$|
000025C0: B2 22 44 22 A7 4E 44 B2 30 3A 4C 44 B2 31 3A 8D |."D".ND.0:LD.1:.|
000025D0: 32 37 37 30 3A 89 32 32 36 30 00 EB 2D 74 09 8B |2770:.2260..-t..|
000025E0: 59 24 B2 22 4C 22 A7 33 30 30 30 00 FD 2D 7E 09 |Y$."L".3000..-~.|
000025F0: 8B 59 24 B3 B1 22 53 22 A7 32 32 36 30 00 18 2E |.Y$.."S".2260...|
00002600: 88 09 8D 32 36 30 30 3A 4C 49 B2 32 31 3A 53 50 |...2600:LI.21:SP|
00002610: B2 30 3A 8D 32 36 39 30 00 27 2E 92 09 49 41 B2 |.0:.2690.'...IA.|
00002620: 30 3A 89 31 34 34 30 00 45 2E 9C 09 8D 32 36 30 |0:.1440.E....260|
00002630: 30 3A 99 22 47 4F 54 4F 20 4C 4F 43 20 22 3B 3A |0:."GOTO LOC ";:|
00002640: 8D 32 38 38 30 00 64 2E A6 09 56 55 B2 C5 28 56 |.2880.d...VU..(V|
00002650: 55 24 29 3A 8B 56 55 B3 30 B0 56 55 B1 34 39 A7 |U$):.VU.0.VU.49.|
00002660: 32 34 36 30 00 79 2E B0 09 8B 56 55 B3 B1 B5 28 |2460.y....VU...(|
00002670: 56 55 29 A7 20 32 34 36 30 00 89 2E BA 09 49 41 |VU). 2460.....IA|
00002680: B2 56 55 3A 89 31 34 34 30 00 B3 2E C4 09 8D 32 |.VU:.1440......2|
00002690: 36 30 30 3A 99 22 4D 4F 44 49 46 59 20 4C 4F 43 |600:."MODIFY LOC|
000026A0: 20 28 2F 2A 3D 45 4E 44 29 3A 20 22 3B 3A 8D 32 | (/*=END): ";:.2|
000026B0: 38 38 30 00 CC 2E CE 09 8B C8 28 56 55 24 2C 32 |880.......(VU$,2|
000026C0: 29 B2 22 2F 2A 22 A7 20 32 32 36 30 00 EB 2E D8 |)."/*". 2260....|
000026D0: 09 56 4C B2 C5 28 56 55 24 29 3A 8B 56 4C B3 30 |.VL..(VU$):.VL.0|
000026E0: B0 56 4C B1 34 39 A7 32 35 30 30 00 FF 2E E2 09 |.VL.49.2500.....|
000026F0: 8B 56 4C B3 B1 B5 28 56 4C 29 A7 32 35 30 30 00 |.VL...(VL).2500.|
00002700: 1E 2F EC 09 8D 32 36 30 30 3A 99 22 4C 4F 43 22 |./...2600:."LOC"|
00002710: 3B 56 4C 3B 22 3D 22 3B 3A 8D 32 38 38 30 00 45 |;VL;"=";:.2880.E|
00002720: 2F F6 09 56 55 B2 C5 28 56 55 24 29 3A 8B 56 55 |/..VU..(VU$):.VU|
00002730: B3 AB 33 32 37 36 37 B0 56 55 B1 33 32 37 36 37 |..32767.VU.32767|
00002740: A7 32 35 34 30 00 59 2F 00 0A 8B 56 55 B3 B1 B5 |.2540.Y/...VU...|
00002750: 28 56 55 29 A7 32 35 34 30 00 75 2F 0A 0A 53 58 |(VU).2540.u/..SX|
00002760: B2 53 41 3A 53 41 B2 56 4C 3A 8D 32 37 36 30 3A |.SA:SA.VL:.2760:|
00002770: 53 41 B2 53 58 00 84 2F 14 0A 4D 45 25 28 56 4C |SA.SX../..ME%(VL|
00002780: 29 B2 56 55 00 9F 2F 1E 0A 56 53 B2 35 3A 8D 32 |).VU../..VS.5:.2|
00002790: 36 33 30 3A 8D 32 36 31 30 3A 89 32 35 30 30 00 |630:.2610:.2500.|
000027A0: CD 2F 28 0A 4C 49 B2 32 33 3A 53 50 B2 30 3A 8D |./(.LI.23:SP.0:.|
000027B0: 32 36 39 30 3A 81 58 58 B2 31 A4 38 30 3A 99 22 |2690:.XX.1.80:."|
000027C0: 20 22 3B 3A 82 3A 8D 32 36 39 30 3A 8E 00 E3 2F | ";:.:.2690:.../|
000027D0: 32 0A 8D 32 36 39 30 3A 8B 56 55 B3 30 A7 99 22 |2..2690:.VU.0.."|
000027E0: 12 22 3B 00 EE 2F 3C 0A 99 56 55 24 3A 8E 00 10 |.";../<..VU$:...|
000027F0: 30 46 0A 56 55 24 B2 C4 28 56 55 29 3A 56 55 24 |0F.VU$..(VU):VU$|
00002800: B2 C9 28 56 55 24 2C C3 28 56 55 24 29 AB 31 29 |..(VU$,.(VU$).1)|
00002810: 00 2E 30 50 0A 8B 20 C3 28 56 55 24 29 B1 56 53 |..0P.. .(VU$).VS|
00002820: A7 56 55 24 B2 C9 28 56 55 24 2C 56 53 29 00 3F |.VU$..(VU$,VS).?|
00002830: 30 5A 0A 8B C3 28 56 55 24 29 B2 56 53 A7 8E 00 |0Z...(VU$).VS...|
00002840: 53 30 64 0A 81 58 59 B2 31 A4 56 53 AB C3 28 56 |S0d..XY.1.VS..(V|
00002850: 55 24 29 00 63 30 6E 0A 56 55 24 B2 22 30 22 AA |U$).c0n.VU$."0".|
00002860: 56 55 24 00 6B 30 78 0A 82 3A 8E 00 87 30 82 0A |VU$.k0x..:...0..|
00002870: 99 22 13 22 3B 3A 8B 4C 49 B3 B2 31 B0 4C 49 B1 |.".";:.LI..1.LI.|
00002880: 32 34 A7 32 37 31 30 00 9E 30 8C 0A 81 58 58 B2 |24.2710..0...XX.|
00002890: 31 A4 4C 49 AB 31 3A 99 22 11 22 3B 3A 82 00 B4 |1.LI.1:.".";:...|
000028A0: 30 96 0A 8B 53 50 B3 B2 31 B0 53 50 B1 34 30 A7 |0...SP..1.SP.40.|
000028B0: 32 37 33 30 00 CB 30 A0 0A 81 58 58 B2 31 A4 53 |2730..0...XX.1.S|
000028C0: 50 AB 31 3A 99 22 1D 22 3B 3A 82 00 E0 30 AA 0A |P.1:.".";:...0..|
000028D0: 99 22 20 20 20 20 20 9D 9D 9D 9D 9D 22 3B 3A 8E |." .....";:.|
000028E0: 00 FC 30 B4 0A 55 4C B2 35 3A 55 53 24 B2 5A 5A |..0..UL.5:US$.ZZ|
000028F0: 24 3A 8D 33 35 3A 58 24 B2 55 52 24 00 02 31 BE |$:.35:X$.UR$..1.|
00002900: 0A 8E 00 2D 31 C8 0A 4C 49 B2 B5 28 53 41 AD 35 |...-1..LI..(SA.5|
00002910: 29 AA 33 3A 53 50 B2 28 53 41 AB 28 B5 28 53 41 |).3:SP.(SA.(.(SA|
00002920: AD 35 29 AC 35 29 29 AC 36 AA 32 3A 8E 00 58 31 |.5).5)).6.2:..X1|
00002930: D2 0A 8D 32 36 30 30 3A 99 22 45 4E 54 45 52 20 |...2600:."ENTER |
00002940: 44 41 54 41 20 28 2F 2A 3D 45 4E 44 29 20 49 54 |DATA (/*=END) IT|
00002950: 45 4D 20 30 30 20 3D 22 00 78 31 DC 0A 49 24 B2 |EM 00 =".x1..I$.|
00002960: C4 28 4E 44 AA 31 29 3A 49 24 B2 C9 28 49 24 2C |.(ND.1):I$..(I$,|
00002970: C3 28 49 24 29 AB 31 29 00 8F 31 E6 0A 8B C3 28 |.(I$).1)..1....(|
00002980: 49 24 29 B3 32 A7 49 24 B2 22 30 22 AA 49 24 00 |I$).2.I$."0".I$.|
00002990: AF 31 F0 0A 53 50 B2 32 36 3A 8D 32 36 39 30 3A |.1..SP.26:.2690:|
000029A0: 99 49 24 3B 22 3D 20 22 3B 3A 8D 32 38 38 30 00 |.I$;"= ";:.2880.|
000029B0: C4 31 FA 0A 8B C8 28 56 55 24 2C 32 29 B2 22 2F |.1....(VU$,2)."/|
000029C0: 2A 22 A7 8E 00 D2 31 04 0B 56 55 B2 C5 28 56 55 |*"....1..VU..(VU|
000029D0: 24 29 00 F1 31 0E 0B 8B 56 55 B1 B2 AB 33 32 37 |$)..1...VU...327|
000029E0: 36 38 AF 56 55 B3 B2 33 32 37 36 37 A7 32 38 35 |68.VU..32767.285|
000029F0: 30 00 0D 32 18 0B 53 50 B2 33 30 3A 8D 32 36 39 |0..2..SP.30:.269|
00002A00: 30 3A 8D 32 37 34 30 3A 89 32 38 30 30 00 21 32 |0:.2740:.2800.!2|
00002A10: 22 0B 8B 56 55 B3 B1 B5 28 56 55 29 A7 32 38 34 |"..VU...(VU).284|
00002A20: 30 00 41 32 2C 0B 4E 44 B2 4E 44 AA 31 3A 44 41 |0.A2,.ND.ND.1:DA|
00002A30: 25 28 4E 44 29 B2 56 55 3A 8B 4E 44 B2 32 30 A7 |%(ND).VU:.ND.20.|
00002A40: 8E 00 4B 32 36 0B 89 32 37 38 30 00 68 32 40 0B |..K26..2780.h2@.|
00002A50: 99 22 20 20 20 20 20 20 20 20 20 20 9D 9D 9D 9D |." ....|
00002A60: 9D 9D 9D 9D 9D 9D 22 3B 00 75 32 4A 0B 81 49 4A |......";.u2J..IJ|
00002A70: B2 31 A4 31 30 00 A8 32 54 0B 8F 3A 20 46 4F 52 |.1.10..2T..: FOR|
00002A80: 49 4B 3D 31 54 4F 35 30 3A 4E 45 58 54 3A 50 52 |IK=1TO50:NEXT:PR|
00002A90: 49 4E 54 22 3F 22 3B 3A 46 4F 52 49 4B 3D 31 54 |INT"?";:FORIK=1T|
00002AA0: 4F 35 30 3A 4E 45 58 54 00 C5 32 5E 0B 55 4C B2 |O50:NEXT..2^.UL.|
00002AB0: 35 3A 55 53 24 B2 5A 5A 24 3A 8D 33 35 3A 56 55 |5:US$.ZZ$:.35:VU|
00002AC0: 24 B2 55 52 24 00 05 33 68 0B 8F 20 20 5A 41 3D |$.UR$..3h.. ZA=|
00002AD0: 41 53 43 28 56 55 24 28 49 4A 29 29 3A 49 46 5A |ASC(VU$(IJ)):IFZ|
00002AE0: 41 3D 33 4F 52 5A 41 3D 31 33 31 54 48 45 4E 50 |A=3ORZA=131THENP|
00002AF0: 52 49 4E 54 22 9D 12 3F 92 9D 22 3B 3A 47 4F 54 |RINT"..?..";:GOT|
00002B00: 4F 32 39 30 30 00 3A 33 72 0B 8F 20 49 46 49 4A |O2900.:3r.. IFIJ|
00002B10: 3D 31 41 4E 44 56 55 24 28 31 29 3D 43 48 52 24 |=1ANDVU$(1)=CHR$|
00002B20: 28 32 30 29 54 48 45 4E 50 52 49 4E 54 22 9D 22 |(20)THENPRINT"."|
00002B30: 3B 3A 47 4F 54 4F 32 39 30 30 00 69 33 7C 0B 8F |;:GOTO2900.i3|..|
00002B40: 20 49 46 56 55 24 28 49 4A 29 3D 43 48 52 24 28 | IFVU$(IJ)=CHR$(|
00002B50: 31 33 29 54 48 45 4E 50 52 49 4E 54 22 9D 20 22 |13)THENPRINT". "|
00002B60: 3A 47 4F 54 4F 32 39 38 30 00 A5 33 86 0B 8F 20 |:GOTO2980..3... |
00002B70: 20 49 46 56 55 24 28 49 4A 29 3D 43 48 52 24 28 | IFVU$(IJ)=CHR$(|
00002B80: 32 30 29 54 48 45 4E 50 52 49 4E 54 22 9D 20 9D |20)THENPRINT". .|
00002B90: 9D 3F 22 3B 3A 49 4A 3D 49 4A 2D 31 3A 47 4F 54 |.?";:IJ=IJ-1:GOT|
00002BA0: 4F 32 39 31 30 00 BD 33 90 0B 8F 20 50 52 49 4E |O2910..3... PRIN|
00002BB0: 54 22 9D 22 3B 56 55 24 28 49 4A 29 3B 00 CB 33 |T".";VU$(IJ);..3|
00002BC0: 9A 0B 8F 20 20 4E 45 58 54 49 4A 00 FB 33 A4 0B |... NEXTIJ..3..|
00002BD0: 8F 20 56 55 24 3D 22 22 3A 46 4F 52 49 4B 3D 31 |. VU$="":FORIK=1|
00002BE0: 54 4F 49 4A 2D 31 3A 56 55 24 3D 56 55 24 2B 56 |TOIJ-1:VU$=VU$+V|
00002BF0: 55 24 28 49 4B 29 3A 4E 45 58 54 00 01 34 AE 0B |U$(IK):NEXT..4..|
00002C00: 8E 00 3C 34 B8 0B 8D 32 36 30 30 3A 99 22 52 45 |..<4...2600:."RE|
00002C10: 41 44 59 20 50 52 49 4E 54 45 52 2E 2E 2E 53 50 |ADY PRINTER...SP|
00002C20: 41 43 45 20 42 41 52 20 54 4F 20 43 4F 4E 54 49 |ACE BAR TO CONTI|
00002C30: 4E 55 45 22 3A 8D 38 34 34 3A A0 35 00 73 34 C2 |NUE":.844:.5.s4.|
00002C40: 0B 9F 35 2C 34 3A 98 35 2C 22 54 48 45 20 48 59 |..5,4:.5,"THE HY|
00002C50: 50 4F 54 48 45 54 49 43 41 4C 20 4D 41 43 48 49 |POTHETICAL MACHI|
00002C60: 4E 45 20 20 20 56 31 4D 30 20 52 45 56 3D 34 22 |NE V1M0 REV=4"|
00002C70: 3A 98 35 00 83 34 CC 0B 98 35 2C 22 4D 45 4D 4F |:.5..4...5,"MEMO|
00002C80: 52 59 22 00 B3 34 D6 0B 98 35 2C 22 4C 4F 43 41 |RY"..4...5,"LOCA|
00002C90: 54 49 4F 4E 20 20 20 43 4F 4E 54 45 4E 54 53 20 |TION CONTENTS |
00002CA0: 20 20 20 20 49 4E 54 45 52 50 52 45 54 41 54 49 | INTERPRETATI|
00002CB0: 4F 4E 22 00 CD 34 E0 0B 81 58 58 B2 31 A4 36 35 |ON"..4...XX.1.65|
00002CC0: 3A 98 35 2C 22 3D 22 3B 3A 82 3A 98 35 00 EA 34 |:.5,"=";:.:.5..4|
00002CD0: EA 0B 81 58 58 B2 30 A4 34 39 3A 8B 4D 45 25 28 |...XX.0.49:.ME%(|
00002CE0: 58 58 29 B2 30 A7 33 31 37 30 00 FE 34 F4 0B 8B |XX).0.3170..4...|
00002CF0: 4D 45 25 28 58 58 29 B3 30 A7 33 31 30 30 00 27 |ME%(XX).0.3100.'|
00002D00: 35 FE 0B 4F 50 25 B2 4D 45 25 28 58 58 29 AD 31 |5..OP%.ME%(XX).1|
00002D10: 30 30 30 3A 53 41 B2 4D 45 25 28 58 58 29 AB 4F |000:SA.ME%(XX).O|
00002D20: 50 25 AC 31 30 30 30 00 46 35 08 0C 81 59 59 B2 |P%.1000.F5...YY.|
00002D30: 31 A4 31 37 3A 8B 4F 50 25 B2 4F 43 25 28 59 59 |1.17:.OP%.OC%(YY|
00002D40: 29 A7 33 31 31 30 00 4E 35 12 0C 82 59 59 00 58 |).3110.N5...YY.X|
00002D50: 35 1C 0C 59 59 B2 31 38 00 84 35 26 0C 56 53 B2 |5..YY.18..5&.VS.|
00002D60: 33 3A 56 55 B2 58 58 3A 8D 32 36 33 30 3A 98 35 |3:VU.XX:.2630:.5|
00002D70: 2C 22 20 20 22 3B 56 55 24 3B 22 20 20 20 20 20 |," ";VU$;" |
00002D80: 20 20 22 3B 00 B0 35 30 0C 56 53 B2 35 3A 56 55 | ";..50.VS.5:VU|
00002D90: B2 4D 45 25 28 58 58 29 3A 8D 32 36 33 30 3A 98 |.ME%(XX):.2630:.|
00002DA0: 35 2C 56 55 24 3B 22 20 20 20 20 20 20 20 22 3B |5,VU$;" ";|
00002DB0: 00 E3 35 3A 0C 8B 59 59 B1 B2 31 31 AF 59 59 B3 |..5:..YY..11.YY.|
00002DC0: B2 31 36 A7 98 35 2C 22 42 52 41 4E 43 48 20 54 |.16..5,"BRANCH T|
00002DD0: 4F 20 4C 4F 43 22 3B 53 41 3B 22 20 49 46 20 41 |O LOC";SA;" IF A|
00002DE0: 43 22 3B 00 1A 36 44 0C 8B 59 59 B3 B2 38 A7 91 |C";..6D..YY..8..|
00002DF0: 59 59 8D 33 31 39 30 2C 33 32 30 30 2C 33 32 31 |YY.3190,3200,321|
00002E00: 30 2C 33 32 32 30 2C 33 32 33 30 2C 33 32 34 30 |0,3220,3230,3240|
00002E10: 2C 33 32 35 30 2C 33 32 36 30 00 2A 36 4E 0C 8B |,3250,3260.*6N..|
00002E20: 59 59 B3 B2 38 A7 33 31 37 30 00 66 36 58 0C 91 |YY..8.3170.f6X..|
00002E30: 59 59 AB 38 8D 33 32 37 30 2C 33 32 38 30 2C 33 |YY.8.3270,3280,3|
00002E40: 32 39 30 2C 33 33 30 30 2C 33 33 31 30 2C 33 33 |290,3300,3310,33|
00002E50: 32 30 2C 33 33 33 30 2C 33 33 34 30 2C 33 33 35 |20,3330,3340,335|
00002E60: 30 2C 33 33 36 30 00 6E 36 62 0C 82 58 58 00 80 |0,3360.n6b..XX..|
00002E70: 36 6C 0C A0 35 3A 9F 35 2C 33 3A 89 32 32 36 30 |6l..5:.5,3:.2260|
00002E80: 00 A5 36 76 0C 98 35 2C 22 49 4E 50 55 54 20 44 |..6v..5,"INPUT D|
00002E90: 41 54 41 20 54 4F 20 4C 4F 43 41 54 49 4F 4E 22 |ATA TO LOCATION"|
00002EA0: 3B 53 41 3A 8E 00 CA 36 80 0C 98 35 2C 22 4F 55 |;SA:...6...5,"OU|
00002EB0: 54 50 55 54 20 43 4F 4E 54 45 4E 54 53 20 4F 46 |TPUT CONTENTS OF|
00002EC0: 20 4C 4F 43 22 3B 53 41 3A 8E 00 F5 36 8A 0C 98 | LOC";SA:...6...|
00002ED0: 35 2C 22 4C 4F 41 44 20 41 43 20 57 49 54 48 20 |5,"LOAD AC WITH |
00002EE0: 43 4F 4E 54 45 4E 54 53 20 4F 46 20 4C 4F 43 22 |CONTENTS OF LOC"|
00002EF0: 3B 53 41 3A 8E 00 1F 37 94 0C 98 35 2C 22 53 54 |;SA:...7...5,"ST|
00002F00: 4F 52 45 20 43 4F 4E 54 45 4E 54 53 20 4F 46 20 |ORE CONTENTS OF |
00002F10: 41 43 20 41 54 20 4C 4F 43 22 3B 53 41 3A 8E 00 |AC AT LOC";SA:..|
00002F20: 4A 37 9E 0C 98 35 2C 22 4C 4F 41 44 20 4D 51 20 |J7...5,"LOAD MQ |
00002F30: 57 49 54 48 20 43 4F 4E 54 45 4E 54 53 20 4F 46 |WITH CONTENTS OF|
00002F40: 20 4C 4F 43 22 3B 53 41 3A 8E 00 74 37 A8 0C 98 | LOC";SA:..t7...|
00002F50: 35 2C 22 53 54 4F 52 45 20 43 4F 4E 54 45 4E 54 |5,"STORE CONTENT|
00002F60: 53 20 4F 46 20 4D 51 20 41 54 20 4C 4F 43 22 3B |S OF MQ AT LOC";|
00002F70: 53 41 3A 8E 00 9F 37 B2 0C 98 35 2C 22 41 44 44 |SA:...7...5,"ADD|
00002F80: 20 43 4F 4E 54 45 4E 54 53 20 4F 46 20 4C 4F 43 | CONTENTS OF LOC|
00002F90: 22 3B 53 41 3B 22 20 54 4F 20 41 43 22 3A 8E 00 |";SA;" TO AC":..|
00002FA0: D1 37 BC 0C 98 35 2C 22 53 55 42 54 52 41 43 54 |.7...5,"SUBTRACT|
00002FB0: 20 43 4F 4E 54 45 4E 54 53 20 4F 46 20 4C 4F 43 | CONTENTS OF LOC|
00002FC0: 22 3B 53 41 3B 22 20 46 52 4F 4D 20 41 43 22 3A |";SA;" FROM AC":|
00002FD0: 8E 00 FE 37 C6 0C 98 35 2C 22 4D 55 4C 54 49 50 |...7...5,"MULTIP|
00002FE0: 4C 59 20 4D 51 20 42 59 20 43 4F 4E 54 45 4E 54 |LY MQ BY CONTENT|
00002FF0: 53 20 4F 46 20 4C 4F 43 22 3B 53 41 3A 8E 00 29 |S OF LOC";SA:..)|
00003000: 38 D0 0C 98 35 2C 22 44 49 56 49 44 45 20 4D 51 |8...5,"DIVIDE MQ|
00003010: 20 42 59 20 43 4F 4E 54 45 4E 54 53 20 4F 46 20 | BY CONTENTS OF |
00003020: 4C 4F 43 22 3B 53 41 3A 8E 00 37 38 DA 0C 98 35 |LOC";SA:..78...5|
00003030: 2C 22 3C 30 22 3A 8E 00 45 38 E4 0C 98 35 2C 22 |,"<0":..E8...5,"|
00003040: 3D 30 22 3A 8E 00 53 38 EE 0C 98 35 2C 22 3E 30 |=0":..S8...5,">0|
00003050: 22 3A 8E 00 62 38 F8 0C 98 35 2C 22 3C 3D 30 22 |":..b8...5,"<=0"|
00003060: 3A 8E 00 71 38 02 0D 98 35 2C 22 3E 3D 30 22 3A |:..q8...5,">=0":|
00003070: 8E 00 80 38 0C 0D 98 35 2C 22 3C 3E 30 22 3A 8E |...8...5,"<>0":.|
00003080: 00 98 38 16 0D 98 35 2C 22 47 4F 20 54 4F 20 4C |..8...5,"GO TO L|
00003090: 4F 43 22 3B 53 41 3A 8E 00 B0 38 20 0D 98 35 2C |OC";SA:...8 ..5,|
000030A0: 22 44 41 54 41 20 45 4C 45 4D 45 4E 54 22 3A 8E |"DATA ELEMENT":.|
000030B0: 00 CB 38 A0 0F 8F 20 53 54 55 44 45 4E 54 20 49 |..8... STUDENT I|
000030C0: 4E 53 54 52 55 43 54 49 4F 4E 53 00 FC 38 AA 0F |NSTRUCTIONS..8..|
000030D0: 99 22 11 20 D4 48 49 53 20 50 52 4F 47 52 41 4D |.". .HIS PROGRAM|
000030E0: 20 53 49 4D 55 4C 41 54 45 53 20 54 48 45 20 48 | SIMULATES THE H|
000030F0: 59 50 4F 54 48 45 54 49 43 41 4C 22 00 28 39 B4 |YPOTHETICAL".(9.|
00003100: 0F 99 22 20 43 4F 4D 50 55 54 45 52 2E 20 D4 48 |.." COMPUTER. .H|
00003110: 49 53 20 43 4F 4D 50 55 54 45 52 20 49 53 20 41 |IS COMPUTER IS A|
00003120: 20 4D 41 43 48 49 4E 45 00 55 39 BE 0F 99 22 11 | MACHINE.U9...".|
00003130: 20 4C 41 4E 47 55 41 47 45 20 4F 4E 4C 59 20 43 | LANGUAGE ONLY C|
00003140: 4F 4D 50 55 54 45 52 2E 20 D4 48 45 20 43 4F 4D |OMPUTER. .HE COM|
00003150: 4D 41 4E 44 53 00 63 39 C8 0F 99 22 11 20 41 52 |MANDS.c9...". AR|
00003160: 45 3A 22 00 92 39 D2 0F 99 22 11 20 33 30 58 58 |E:"..9...". 30XX|
00003170: 58 20 20 C9 4E 50 55 54 20 41 20 56 41 4C 55 45 |X .NPUT A VALUE|
00003180: 20 54 4F 20 4C 4F 43 41 54 49 4F 4E 20 58 58 58 | TO LOCATION XXX|
00003190: 2E 22 00 C4 39 DC 0F 99 22 11 20 33 31 58 58 58 |."..9...". 31XXX|
000031A0: 20 20 D0 52 49 4E 54 20 54 48 45 20 56 41 4C 55 | .RINT THE VALU|
000031B0: 45 20 49 4E 20 4C 4F 43 41 54 49 4F 4E 20 58 58 |E IN LOCATION XX|
000031C0: 58 2E 22 3B 00 ED 39 E6 0F 99 22 11 20 31 30 58 |X.";..9...". 10X|
000031D0: 58 58 20 20 C3 4C 45 41 52 20 54 48 45 20 41 43 |XX .LEAR THE AC|
000031E0: 43 55 4D 55 4C 41 54 4F 52 20 41 4E 44 00 1A 3A |CUMULATOR AND..:|
000031F0: F0 0F 99 22 11 20 20 20 20 20 20 20 20 4C 4F 41 |...". LOA|
00003200: 44 20 54 48 45 20 C1 C3 20 57 49 54 48 20 54 48 |D THE .. WITH TH|
00003210: 45 20 43 4F 4E 54 45 4E 54 53 00 3B 3A FA 0F 99 |E CONTENTS.;:...|
00003220: 22 11 20 20 20 20 20 20 20 20 4F 46 20 4C 4F 43 |". OF LOC|
00003230: 41 54 49 4F 4E 20 58 58 58 2E 22 00 49 3A FF 0F |ATION XXX.".I:..|
00003240: 8D 38 33 35 3A 8D 38 35 30 00 86 3A 04 10 99 22 |.835:.850..:..."|
00003250: 11 20 32 30 58 58 58 20 C1 44 44 20 54 48 45 20 |. 20XXX .DD THE |
00003260: 43 4F 4E 54 45 4E 54 53 20 4F 46 20 58 58 58 20 |CONTENTS OF XXX |
00003270: 54 4F 20 54 48 45 22 3A 99 22 11 20 20 20 20 20 |TO THE":.". |
00003280: 20 20 C1 C3 2E 22 00 B2 3A 0E 10 99 22 11 20 32 | ..."..:...". 2|
00003290: 31 58 58 58 20 D3 55 42 54 52 41 43 54 20 54 48 |1XXX .UBTRACT TH|
000032A0: 45 20 43 4F 4E 54 45 4E 54 53 20 4F 46 20 58 58 |E CONTENTS OF XX|
000032B0: 58 22 00 CE 3A 18 10 99 22 11 20 20 20 20 20 20 |X"..:...". |
000032C0: 20 46 52 4F 4D 20 54 48 45 20 C1 C3 2E 22 00 FE | FROM THE ..."..|
000032D0: 3A 22 10 99 22 11 20 31 31 58 58 58 20 D4 52 41 |:"..". 11XXX .RA|
000032E0: 4E 53 46 45 52 20 54 48 45 20 C1 C3 20 54 4F 20 |NSFER THE .. TO |
000032F0: 4C 4F 43 41 54 49 4F 4E 20 58 58 58 2E 22 00 30 |LOCATION XXX.".0|
00003300: 3B 36 10 99 22 11 20 31 32 58 58 58 20 CC 4F 41 |;6..". 12XXX .OA|
00003310: 44 20 54 48 45 20 4D 55 4C 54 49 50 4C 49 45 52 |D THE MULTIPLIER|
00003320: 2D 51 55 4F 54 49 45 4E 54 20 28 CD D1 29 22 3B |-QUOTIENT (..)";|
00003330: 00 59 3B 40 10 99 22 11 20 20 20 20 20 20 20 57 |.Y;@..". W|
00003340: 49 54 48 20 54 48 45 20 43 4F 4E 54 45 4E 54 53 |ITH THE CONTENTS|
00003350: 20 4F 46 20 58 58 58 2E 22 00 87 3B 4A 10 99 22 | OF XXX."..;J.."|
00003360: 11 20 32 32 58 58 58 20 CD 55 4C 54 49 50 4C 59 |. 22XXX .ULTIPLY|
00003370: 20 54 48 45 20 CD D1 20 42 59 20 54 48 45 20 43 | THE .. BY THE C|
00003380: 4F 4E 54 45 4E 54 53 00 A7 3B 54 10 99 22 11 20 |ONTENTS..;T..". |
00003390: 20 20 20 20 20 20 4F 46 20 4C 4F 43 41 54 49 4F | OF LOCATIO|
000033A0: 4E 20 58 58 58 2E 22 00 B5 3B 59 10 8D 38 33 35 |N XXX."..;Y..835|
000033B0: 3A 8D 38 35 30 00 E1 3B 5E 10 99 22 11 20 32 33 |:.850..;^..". 23|
000033C0: 58 58 58 20 C4 49 56 49 44 45 20 54 48 45 20 CD |XXX .IVIDE THE .|
000033D0: D1 20 42 59 20 54 48 45 20 43 4F 4E 54 45 4E 54 |. BY THE CONTENT|
000033E0: 53 00 0E 3C 68 10 99 22 11 20 20 20 20 20 20 20 |S..<h..". |
000033F0: 4F 46 20 4C 4F 43 41 54 49 4F 4E 20 58 58 58 2E |OF LOCATION XXX.|
00003400: 20 D4 48 45 20 52 45 4D 41 49 4E 44 45 52 00 2A | .HE REMAINDER.*|
00003410: 3C 72 10 99 22 11 20 20 20 20 20 20 20 49 53 20 |<r..". IS |
00003420: 49 4E 20 54 48 45 20 C1 C3 2E 00 5A 3C 73 10 99 |IN THE ....Z<s..|
00003430: 22 11 20 31 33 58 58 58 20 D4 52 41 4E 53 46 45 |". 13XXX .RANSFE|
00003440: 52 20 54 48 45 20 CD D1 20 54 4F 20 4C 4F 43 41 |R THE .. TO LOCA|
00003450: 54 49 4F 4E 20 58 58 58 2E 22 00 69 3C 77 10 8D |TION XXX.".i<w..|
00003460: 38 33 35 3A 8D 20 38 35 30 00 93 3C 86 10 99 22 |835:. 850..<..."|
00003470: 11 20 30 31 58 58 58 20 C7 4F 54 4F 20 58 58 58 |. 01XXX .OTO XXX|
00003480: 20 49 46 20 54 48 45 20 C1 C3 20 49 53 20 5A 45 | IF THE .. IS ZE|
00003490: 52 4F 2E 00 C1 3C 90 10 99 22 11 20 30 32 58 58 |RO...<...". 02XX|
000034A0: 58 20 C7 4F 54 4F 20 58 58 58 20 49 46 20 54 48 |X .OTO XXX IF TH|
000034B0: 45 20 C1 C3 20 49 53 20 50 4F 53 49 54 49 56 45 |E .. IS POSITIVE|
000034C0: 2E 00 EF 3C 9A 10 99 22 11 20 30 33 58 58 58 20 |...<...". 03XXX |
000034D0: C7 4F 54 4F 20 58 58 58 20 49 46 20 54 48 45 20 |.OTO XXX IF THE |
000034E0: C1 C3 20 49 53 20 4E 45 47 41 54 49 56 45 2E 00 |.. IS NEGATIVE..|
000034F0: 07 3D A4 10 99 22 11 20 30 35 58 58 58 20 C7 4F |.=...". 05XXX .O|
00003500: 54 4F 20 58 58 58 2E 00 35 3D AE 10 99 22 11 20 |TO XXX..5=...". |
00003510: 30 36 58 58 58 20 C7 4F 54 4F 20 58 58 58 20 49 |06XXX .OTO XXX I|
00003520: 46 20 54 48 45 20 C1 C3 20 49 53 20 4E 45 47 41 |F THE .. IS NEGA|
00003530: 54 49 56 45 22 00 4D 3D B8 10 99 22 11 20 20 20 |TIVE".M=...". |
00003540: 20 20 20 20 4F 52 20 5A 45 52 4F 2E 22 00 7B 3D | OR ZERO.".{=|
00003550: C2 10 99 22 11 20 30 37 58 58 58 20 C7 4F 54 4F |...". 07XXX .OTO|
00003560: 20 58 58 58 20 49 46 20 54 48 45 20 C1 C3 20 49 | XXX IF THE .. I|
00003570: 53 20 4E 4F 54 20 5A 45 52 4F 2E 00 90 3D D6 10 |S NOT ZERO...=..|
00003580: 99 22 11 20 30 30 58 58 58 20 D3 54 4F 50 2E 22 |.". 00XXX .TOP."|
00003590: 00 9F 3D DB 10 8D 38 33 35 3A 8D 20 38 35 30 00 |..=...835:. 850.|
000035A0: CA 3D E0 10 99 22 11 20 C5 41 43 48 20 49 4E 53 |.=...". .ACH INS|
000035B0: 54 52 55 43 54 49 4F 4E 20 49 53 20 45 4E 54 45 |TRUCTION IS ENTE|
000035C0: 52 45 44 20 41 53 20 41 20 35 00 E1 3D EA 10 99 |RED AS A 5..=...|
000035D0: 22 11 20 44 49 47 49 54 20 4E 55 4D 42 45 52 2E |". DIGIT NUMBER.|
000035E0: 22 00 0E 3E F4 10 99 22 11 20 C1 44 44 52 45 53 |"..>...". .DDRES|
000035F0: 53 45 53 20 46 52 4F 4D 20 30 30 30 20 54 4F 20 |SES FROM 000 TO |
00003600: 30 34 39 20 41 52 45 20 4C 45 47 41 4C 22 00 3C |049 ARE LEGAL".<|
00003610: 3E FE 10 99 22 11 20 D7 48 45 4E 20 59 4F 55 20 |>...". .HEN YOU |
00003620: 48 41 56 45 20 46 49 4E 49 53 48 45 44 20 45 4E |HAVE FINISHED EN|
00003630: 54 45 52 49 4E 47 20 59 4F 55 52 22 00 62 3E 08 |TERING YOUR".b>.|
00003640: 11 99 22 11 20 50 52 4F 47 52 41 4D 2C 20 54 59 |..". PROGRAM, TY|
00003650: 50 45 20 2F 2A 20 41 53 20 59 4F 55 52 20 4C 41 |PE /* AS YOUR LA|
00003660: 53 54 00 78 3E 12 11 99 22 11 20 49 4E 53 54 52 |ST.x>...". INSTR|
00003670: 55 43 54 49 4F 4E 2E 22 00 A7 3E 1C 11 99 22 11 |UCTION."..>...".|
00003680: 20 D4 48 45 20 50 52 4F 47 52 41 4D 20 57 49 4C | .HE PROGRAM WIL|
00003690: 4C 20 41 53 4B 20 59 4F 55 20 54 4F 20 49 4E 50 |L ASK YOU TO INP|
000036A0: 55 54 20 44 41 54 41 00 D4 3E 26 11 99 22 11 20 |UT DATA..>&..". |
000036B0: 56 41 4C 55 45 53 2E 20 C1 47 41 49 4E 2C 20 45 |VALUES. .GAIN, E|
000036C0: 4E 44 20 54 48 45 20 44 41 54 41 20 57 49 54 48 |ND THE DATA WITH|
000036D0: 20 2F 2A 2E 00 E3 3E 2B 11 8D 38 33 35 3A 8D 20 | /*...>+..835:. |
000036E0: 38 35 30 00 0B 3F 30 11 99 22 11 20 D9 4F 55 20 |850..?0..". .OU |
000036F0: 43 41 4E 20 54 48 45 4E 20 52 55 4E 20 59 4F 55 |CAN THEN RUN YOU|
00003700: 52 20 50 52 4F 47 52 41 4D 2E 22 00 38 3F 3A 11 |R PROGRAM.".8?:.|
00003710: 99 22 11 20 C9 46 20 59 4F 55 20 48 41 56 45 20 |.". .F YOU HAVE |
00003720: 41 20 50 52 49 4E 54 45 52 2C 20 59 4F 55 20 43 |A PRINTER, YOU C|
00003730: 41 4E 20 47 45 54 20 41 00 62 3F 44 11 99 22 11 |AN GET A.b?D..".|
00003740: 20 27 48 41 52 44 43 4F 50 59 27 20 4F 46 20 54 | 'HARDCOPY' OF T|
00003750: 48 45 20 4C 49 53 54 49 4E 47 20 41 4E 44 2F 4F |HE LISTING AND/O|
00003760: 52 22 00 76 3F 4E 11 99 22 11 20 45 58 45 43 55 |R".v?N..". EXECU|
00003770: 54 49 4F 4E 2E 22 00 7F 3F 53 11 8D 38 33 35 00 |TION."..?S..835.|
00003780: 85 3F 58 11 8E 00 A1 3F 88 13 8F 20 54 45 41 43 |.?X....?... TEAC|
00003790: 48 45 52 53 20 49 4E 53 54 52 55 43 54 49 4F 4E |HERS INSTRUCTION|
000037A0: 53 00 B3 3F 92 13 99 22 11 12 C8 59 50 4F 20 C1 |S..?..."...YPO .|
000037B0: 55 54 4F 00 E1 3F 9C 13 99 22 11 C8 59 50 4F 20 |UTO..?..."..YPO |
000037C0: 49 53 20 42 4F 54 48 20 41 20 43 4F 4D 50 55 54 |IS BOTH A COMPUT|
000037D0: 45 52 20 41 4E 44 20 41 20 4C 41 4E 47 55 41 47 |ER AND A LANGUAG|
000037E0: 45 00 0A 40 A6 13 99 22 11 55 53 45 44 20 54 4F |E..@...".USED TO|
000037F0: 20 49 4E 54 52 4F 44 55 43 45 20 53 54 55 44 45 | INTRODUCE STUDE|
00003800: 4E 54 53 20 54 4F 20 54 48 45 00 38 40 B0 13 99 |NTS TO THE.8@...|
00003810: 22 11 57 4F 52 4B 49 4E 47 20 4F 46 20 41 20 43 |".WORKING OF A C|
00003820: 4F 4D 50 55 54 45 52 20 41 54 20 54 48 45 20 4D |OMPUTER AT THE M|
00003830: 41 43 48 49 4E 45 27 53 00 46 40 BA 13 99 22 11 |ACHINE'S.F@...".|
00003840: 4C 45 56 45 4C 2E 00 59 40 BF 13 8D 38 33 35 3A |LEVEL..Y@...835:|
00003850: 55 50 B2 32 3A 8D 38 35 30 00 7D 40 C4 13 99 22 |UP.2:.850.}@..."|
00003860: 11 12 C3 4C 41 53 53 49 46 49 43 41 54 49 4F 4E |...LASSIFICATION|
00003870: 92 3A 20 D3 49 4D 55 4C 41 54 49 4F 4E 00 A8 40 |.: .IMULATION..@|
00003880: CE 13 99 22 11 12 C1 4E 43 49 4C 4C 41 52 59 20 |..."...NCILLARY |
00003890: CD 41 54 45 52 49 41 4C 53 92 3A 20 D4 48 45 20 |.ATERIALS.: .HE |
000038A0: 43 4F 4D 4D 41 4E 44 53 00 D3 40 D8 13 99 22 11 |COMMANDS..@...".|
000038B0: 28 4F 50 2D 43 4F 44 45 53 29 20 53 48 4F 55 4C |(OP-CODES) SHOUL|
000038C0: 44 20 42 45 20 4D 41 44 45 20 41 56 41 49 4C 41 |D BE MADE AVAILA|
000038D0: 42 4C 45 00 FB 40 E2 13 99 22 11 54 4F 20 54 48 |BLE..@...".TO TH|
000038E0: 45 20 53 54 55 44 45 4E 54 20 4F 4E 20 50 41 50 |E STUDENT ON PAP|
000038F0: 45 52 20 46 4F 52 20 45 41 53 59 00 0D 41 EC 13 |ER FOR EASY..A..|
00003900: 99 22 11 52 45 46 45 52 45 4E 43 45 2E 00 36 41 |.".REFERENCE..6A|
00003910: F6 13 99 22 11 C1 20 50 52 49 4E 54 45 52 20 57 |...".. PRINTER W|
00003920: 49 4C 4C 20 41 4C 4C 4F 57 20 48 41 52 44 20 43 |ILL ALLOW HARD C|
00003930: 4F 50 59 20 4F 46 00 5F 41 00 14 99 22 11 50 52 |OPY OF._A...".PR|
00003940: 4F 47 52 41 4D 20 4C 49 53 54 49 4E 47 53 20 41 |OGRAM LISTINGS A|
00003950: 4E 44 20 45 58 45 43 55 54 49 4F 4E 53 2E 22 00 |ND EXECUTIONS.".|
00003960: 89 41 01 14 99 22 11 D4 48 45 52 45 20 41 52 45 |.A..."..HERE ARE|
00003970: 20 4F 54 48 45 52 20 48 59 50 4F 20 50 52 4F 47 | OTHER HYPO PROG|
00003980: 52 41 4D 53 20 41 4C 53 4F 00 AD 41 02 14 99 22 |RAMS ALSO..A..."|
00003990: 11 41 56 41 49 4C 41 42 4C 45 20 57 49 54 48 20 |.AVAILABLE WITH |
000039A0: 54 48 49 53 20 50 41 43 4B 41 47 45 2E 00 C1 41 |THIS PACKAGE...A|
000039B0: 0A 14 8D 20 38 33 35 3A 55 50 B2 33 3A 8D 38 35 |... 835:UP.3:.85|
000039C0: 30 00 E6 41 14 14 99 22 11 12 CF 42 4A 45 43 54 |0..A..."...BJECT|
000039D0: 49 56 45 53 92 3A 20 54 4F 20 41 4C 4C 4F 57 20 |IVES.: TO ALLOW |
000039E0: 54 48 45 20 53 54 00 0E 42 1E 14 99 22 11 54 4F |THE ST..B...".TO|
000039F0: 20 50 52 4F 47 52 41 4D 20 41 20 43 4F 4D 50 55 | PROGRAM A COMPU|
00003A00: 54 45 52 20 49 4E 20 50 53 45 55 44 4F 2D 00 36 |TER IN PSEUDO-.6|
00003A10: 42 28 14 99 22 11 4D 41 43 48 49 4E 45 20 4C 41 |B(..".MACHINE LA|
00003A20: 4E 47 55 41 47 45 20 41 4E 44 20 4F 42 53 45 52 |NGUAGE AND OBSER|
00003A30: 56 45 20 54 48 45 00 65 42 32 14 99 22 11 53 54 |VE THE.eB2..".ST|
00003A40: 45 50 2D 42 59 2D 53 54 45 50 20 45 58 45 43 55 |EP-BY-STEP EXECU|
00003A50: 54 49 4F 4E 20 4F 46 20 54 48 45 20 50 52 4F 47 |TION OF THE PROG|
00003A60: 52 41 4D 2E 22 00 91 42 3C 14 99 22 11 12 D3 54 |RAM."..B<.."...T|
00003A70: 55 44 45 4E 54 20 C1 43 54 49 56 49 54 49 45 53 |UDENT .CTIVITIES|
00003A80: 92 3A 20 D7 52 49 54 49 4E 47 20 53 49 4D 50 4C |.: .RITING SIMPL|
00003A90: 45 00 AB 42 46 14 99 22 11 43 4F 4D 50 55 54 45 |E..BF..".COMPUTE|
00003AA0: 52 20 50 52 4F 47 52 41 4D 53 2E 00 C6 42 50 14 |R PROGRAMS...BP.|
00003AB0: 99 22 11 C4 45 42 55 47 47 49 4E 47 20 50 52 4F |."..EBUGGING PRO|
00003AC0: 47 52 41 4D 53 2E 00 E3 42 5A 14 99 22 11 D4 52 |GRAMS...BZ.."..R|
00003AD0: 41 43 49 4E 47 20 50 52 4F 47 52 41 4D 20 46 4C |ACING PROGRAM FL|
00003AE0: 4F 57 2E 00 0E 43 64 14 99 22 11 C1 50 50 4C 59 |OW...Cd.."..PPLY|
00003AF0: 49 4E 47 20 54 48 45 20 43 4F 4E 43 45 50 54 20 |ING THE CONCEPT |
00003B00: 4F 46 20 42 52 41 4E 43 48 49 4E 47 2E 22 00 21 |OF BRANCHING.".!|
00003B10: 43 6E 14 8D 38 33 35 3A 55 50 B2 34 3A 8D 38 35 |Cn..835:UP.4:.85|
00003B20: 30 00 50 43 78 14 99 22 11 C8 59 50 4F 20 49 53 |0.PCx.."..YPO IS|
00003B30: 20 53 55 47 47 45 53 54 45 44 20 46 4F 52 20 55 | SUGGESTED FOR U|
00003B40: 53 45 20 57 49 54 48 20 43 4F 4D 50 55 54 45 52 |SE WITH COMPUTER|
00003B50: 00 79 43 82 14 99 22 11 41 57 41 52 45 4E 45 53 |.yC...".AWARENES|
00003B60: 53 20 4F 52 20 49 4E 46 4F 52 4D 41 54 49 43 53 |S OR INFORMATICS|
00003B70: 20 43 4F 55 52 53 45 53 2E 00 A3 43 8C 14 99 22 | COURSES...C..."|
00003B80: 11 D4 45 41 43 48 45 52 53 20 4D 41 59 20 41 4C |..EACHERS MAY AL|
00003B90: 53 4F 20 46 49 4E 44 20 C8 59 50 4F 20 55 53 45 |SO FIND .YPO USE|
00003BA0: 46 55 4C 00 D2 43 96 14 99 22 11 46 4F 52 20 49 |FUL..C...".FOR I|
00003BB0: 4E 54 52 4F 44 55 43 49 4E 47 20 54 48 45 20 43 |NTRODUCING THE C|
00003BC0: 4F 4E 43 45 50 54 53 20 4F 46 20 4D 41 43 48 49 |ONCEPTS OF MACHI|
00003BD0: 4E 45 00 FF 43 A0 14 99 22 11 4C 41 4E 47 55 41 |NE..C...".LANGUA|
00003BE0: 47 45 20 54 4F 20 43 4F 4D 50 55 54 45 52 20 53 |GE TO COMPUTER S|
00003BF0: 43 49 45 4E 43 45 20 43 4C 41 53 53 45 53 2E 00 |CIENCE CLASSES..|
00003C00: 12 44 AA 14 8D 38 33 35 3A 55 50 B2 35 3A 8D 38 |.D...835:UP.5:.8|
00003C10: 35 30 00 36 44 B4 14 99 22 11 12 D0 52 45 52 45 |50.6D..."...RERE|
00003C20: 51 55 49 53 49 54 45 53 92 3A 20 D4 48 45 20 53 |QUISITES.: .HE S|
00003C30: 54 55 44 45 4E 54 00 60 44 BE 14 99 22 11 43 4F |TUDENT.`D...".CO|
00003C40: 4E 43 45 50 54 53 20 4F 46 20 50 52 4F 47 52 41 |NCEPTS OF PROGRA|
00003C50: 4D 4D 49 4E 47 20 41 20 43 4F 4D 50 55 54 45 52 |MMING A COMPUTER|
00003C60: 00 85 44 C8 14 99 22 11 57 49 54 48 20 49 4E 44 |..D...".WITH IND|
00003C70: 49 56 49 44 55 41 4C 20 49 4E 53 54 52 55 43 54 |IVIDUAL INSTRUCT|
00003C80: 49 4F 4E 53 2E 00 B4 44 D2 14 99 22 11 D4 48 45 |IONS...D..."..HE|
00003C90: 20 43 4F 4E 43 45 50 54 20 4F 46 20 4F 50 2D 43 | CONCEPT OF OP-C|
00003CA0: 4F 44 45 2C 20 41 44 44 52 45 53 53 2C 20 42 52 |ODE, ADDRESS, BR|
00003CB0: 41 4E 43 48 00 E1 44 DC 14 99 22 11 41 4E 44 20 |ANCH..D...".AND |
00003CC0: 53 45 51 55 45 4E 54 49 41 4C 20 45 58 45 43 55 |SEQUENTIAL EXECU|
00003CD0: 54 49 4F 4E 20 4D 55 53 54 20 41 4C 53 4F 20 42 |TION MUST ALSO B|
00003CE0: 45 00 F4 44 E6 14 99 22 11 49 4E 54 52 4F 44 55 |E..D...".INTRODU|
00003CF0: 43 45 44 2E 00 00 45 F0 14 8D 20 38 33 35 3A 8E |CED...E... 835:.|
00003D00: 00 00 00 |... |
.......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 **.H.... **GENERAL INPUT ROUTINE **
.N...:.T...:...#.. +++ INPUT SECTION +++
...(.UR$."":UI$."":.UO,0...*..UL.0.UL.80
.+.-.." ..";:.UC,0.?.2..UI$:.UI$."".50.
I.7..UI$.G(13).C(UR$)..1..UC,1:." .";:.8
5.|.<..UI$.G(20).105...>.. C(UR$)..UL.50
...A..120:. CHECK FOR VALID CHARACTER.E.
F.UR$.UR$.UI$.O.K..UI$;.W.P..50...U.. ++
+ CHECK FOR HELP REQUEST +++.$.Z..UR$.UX
$.195:. EXIT TO HELP ROUTINE.3._..UF.1..
240.@.D.UF.0:.:..Y.F.. ++ CHECK DELETE +
+.J.I..C(UR$).1.50...N.UR$.H(UR$,C(UR$).
1)...S..". ..";:.50...X.. ++ CHECK FOR
VALID CHARACTERS ++.M.}..C(US$).0.150...
...US.1.C(US$)......UI$.J(US$,US,1).....
........UI$."":..#.... ** STANDARD INPUT
**.:....UI$."/".UI$."*"...K....F(UI$).4
6...\....UI$.G(32)...Y. ..F(UI$).48.F(UI
$).57.170...........F(UI$).65.F(UI$).90
.180.......F....F(UI$).193.F(UI$).218.UI
$."":.......B(UT).UU%.UI$.G(F(UI$).128):
............UI$."":..!.C.UF.1:. +++ HELP
ROUTINE EXIT +++.*.E..250.3.H..245.R.M.
.UQ.UB.(U2%.256.U1%.U3%.2).N.R.UQ%(UQ.UB
).B(UQ):.:."."...W.UZ.1:UV%.B(UT)...X..3
00...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).4....UQ,
UQ%(UQ.UB):..@....U1,U1%.L....U2,U2%.X..
..U4,U4%.F....U3,U3%.1.N....35. ...UD%.(
(U2%.256.U1%.U3%).UB).40:.H(UD$,UD%.1):.
......H(UD$,24);" .
HELP COMING . ":......U1%.B(U1):U2%.B(
U2):U3%.B(U3):U4%.B(U4)./...UJ$.US$:UK$.
UG$:UL$.UT$:UJ.UP:UK.UL.5.....F.,.. ** M
ENU **.L.-.:.{....".":.UT,UU%:.B(50003).
0..53281,9:.53280,8.../.:...1..".
MENU".M.6.." ------------------
--------------------"...;..".. 1.
BEGIN HYPO...@..".. 2. STUDENT
INSTRUCTIONS".@.E..".. 3. TEACH
ER INSTRUCTIONS".\.O..".. 4. QUI
T.."...T.." ----------------------------
----------"...Y..".. PRESS A NUMBE
R KEY (1-4) ";...^.UL.1:US$."1234":.35:.
INPUT ROUTINE...`.US$.""...C..E(UR$).10
00,400,500,396...H..300.6.... ** RE-ENAB
LE STOP KEY AND END **.E....B(50003)..1.
B(50003)..160.B(50003)..0.399......UU.71
:.B(50003).0..53281,6:.53280,14......"..
":.......875:..G.... ** STUDENT INSTRUCT
IONS **......".":.UT,UL%:.B(50003).0..53
281,0:.53280,0.....UP.0:UG$."STUDENT INS
T":.850.".... 4000.6....UZ.1..UP%:.217.<
.....].... ** TEACHER INSTRUCTIONS **...
...".":.UT,UL%:.B(50003).0..53281,2:.532
80,10.....UP.0:UG$."TEACHER INST":.850..
....".. TO THE BEST OF OUR KNOWLEDG
E,."......" THIS PROGRAM IS IN THE PUB
LIC.".1...." DOMAIN. IF THIS IS NOT T
HE CASE.".N...." PLEASE CONTACT:...".X
...." COMMODORE BUSINESS MACHINES."
......" 3370 PHARMACY AVE......
." AGINCOURT, ONTARIO"......"
CANADA M1W 2K4"......"
(416) 499-4292".....UP.1:. 835:. 850:.
A...." ..PROGRAM NAME: HYPO
..C...." WRITTEN BY : UNKNOWN......
." UPGRADED BY : ......."
.THIS PROGRAM WILL RUN ON ANY...P...."
PET 64 COMPUTER......"
COMMODORE 64 COMPUTER......835...N..UZ.1
..UP%:.217...W...>.X.. ** PROGRAM MODIFI
CATION INST **.O.Y..".":.UT,UL%.O.].UP.0
:UG$."PROGRAM MOD":.850.X....835......UZ
.1..UP%:.217............ ** TO USE 8032
LOAD CBM4032 **...F..".....BEFORE RUNNIN
G THIS PROGRAM ON AN 8032 ...#.P.."
LOAD THE 'CBM 4032' PROGRAM...........
.."...Z..UU.71.4.....T. .. ** T I T L E
P A G E **...".."....";:.UT,UU%:.B(500
03).0..53280,14:.53281,6...$..I.1.38:.".
..";:....&..I.1.22:.".....";:..N.(..I.1.
37:.".....";:....*..I.1.22:.".....";:...
.,.."........................... ..-...
."................... . . ...N.0.."....
............... . ....L.2.."...........
......... ....4.."..............C O M M
O D O R E.....6.."...............EDUCAT
IONAL...V.8.."................SOFTWARE..
.:.. ** COMMODORE LOGO **.).;..H(UD$,24)
;"..........PRESS SPACE BAR OR WAIT.":I.
0.K.<..A$:.A$.." ".I.I.1:.I.250.828.O.>.
T1$."":T2$."":T3$."":T4$."":I.0.X.@..300
...C.. ** SPACE BAR PRESS **.O.H..H(UD$,
24);".......PRESS SPACE BAR TO CONTINUE.
":.UO,0...L..UI$:.UI$.." ".844...N.....R
.. ** PAGE DESIGN ROUTINE **...T.UP.UP.1
.B.W.."."H(UT$.UP$,21);I(UP$.UG$.D(UP),1
8).Q.\.." ------------------------------
--------"...`..UH..0.870...A..H(UD$,24);
H(UP$,7);"HELP - PRESS H <RETURN>".E.F
.UH.0:."..":....K.. ** PLEASE WAIT REMAR
K **...P..H(UD$,24);" ONE MOME
NT PLEASE... ". .U...=.... ** SET UP
VARIABLES **.....UX$."H":.UQ%(1000):UB.
32768:U1.196:U2.197:U3.198:U4.216:UC.167
:UU.1024.F...UT.59468:UU%.12:UL%.14:UP%.
1146:UM.32768:. 50003,0:UO.158......B(50
003).0.UB.1024:U1.209:U2.210:U3.211:U4.2
14:UC.204:UU.2048.H....B(50003).0.UT.532
72:UU%.21:UL%.23:UP%.2139:UM.1024:UO.198
.L...UD$."........................."....
.UP$."
".....UT$." HYPO ":. P
LACE PROGRAM TITLE HERE !!!!!!!!!!!!!!!!
!***...... ME%(49),DA%(20),OC%(18):.I.1.
18:.OC%(I):.:..8.... ** SET VARIABLES **
.A....900.\.... ** CHECK FOR 8032 **.Z..
..".":." ":. SHIFTED SPACE......B(UB.40)
..96..700...... ** MEMORY CHECK **......
.(0).2000.937......"....THIS MACHINE DO
ES NOT HAVE ENOUGH."......"MEMORY TO RUN
THIS PROGRAM !"......UU.71.!.....;...."
..":.B(50003).0.962.J.... ** BASIC 2.0
OR 4.0 OR C-64 SETUP **......1075,133
:.1076,144:.1077,234:.1079,4:.1080,133:.
1081,145......1091,155:.1098,133:.1099,1
44:.1100,234:.1103,133......1104,145:.11
05,234:.1082,234......B(50003)..160.955.
F....1093,88:.1094,228:.1097,85:.1102,22
8:.965.[....B(50003)..1.990......1093,49
:.1094,230:.1097,46:.1102,230:.965.D.B..
2099,141:.2100,20:.2101,3:.2103,8:.2104,
141:.2105,21...C..2106,3:.2115,145:.2117
,52:.2118,234:.2121,49:.2122,141.:.D..21
23,20:.2124,3:.2126,234:.2127,141:.2128,
21:.2129,3.X.E..UU.48:. DISABLE STOP KEY
.I.J..800:. TITLE.Y.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,6.....UG$."":UP.0.#...F
L.0.V....30,31,10,11,12,13,20,21,22,23,3
,1,2,6,8,7,5,0.M....I.0.49:ME%(I).0:....
$.IA.0:IR.0:SA.0:SR.0:AC.0:MQ.0:ND.0:LD.
0.B....". .THE HYPOTHETICAL MACHINE
."...8..".";:.I.1.35:.".";:.:."."...B..I
.0.49.5.. L..".";:.J.1.5:."00000.";:..4
V.I$.D(I):I$.I(I$,C(I$).1):I$."0".I$.] `
.J$.D(I.4):J$.I(J$,C(J$).1):J$."0".J$.Q
J..I.9.I$.I(I$,2).. T..I.4.9.J$.I(J$,2).
. ~..H(I$,2);"-";H(J$,3);".":..E ...".";
:.I.1.35:.".";:.:.".".. ....19);".......
.."..!..."..";:.I.1.17:.".";:.:.".";:.I.
1.17:.".";:.:.".".>!...".OUTPUT=
.INPUT= .".S!...".";:.I.1.17
:.".";:.:.".";:.I.1.17:.".";:.:."."..!..
..18);"."..!D.."..";:.I.1.17:.".";:.:.".
";:.I.1.17:.".";:.:."."..!N..".IAR=00
IR=00000 SAR=00 SR=00000.".."X..". A
C=00000 MQ=00000 .".0"..."
.";:.I.1.35:.".";:.:.".".E"..LI.23:SP.0:
.2690.K"..."ENTER PROGRAM (/*=END) LOC 0
0=".X"...SA.0.49.."..I$.D(SA):I$.I(I$,C(
I$).1).."...C(I$).2.I$."0".I$.O"..SP.24:
.2690:."LOC ";I$;"= ";.."(..2880:.H(VU$
,2)."/*". 1430.."2.VU.E(VU$)..#<..VU...3
2768.VU..32767.1360.L#F.SP.37:.2690:."(E
)";:SP.32:.2690:. 2740:.1310.`#P..VU...(
VU).1350.O#Z.VS.5:.2630.Y#D..2760..#N..2
690..#X...(VU)..1..".";..#...VU$:LI.23:M
E%(SA).VU..#....G#...2770:.2260..# .VU.I
A:VS.2:.2630..#..LI.19:SP.6..#...2610..$
...Y$:.Y$."".1500..$H..F(Y$)..20.1500.?$
R..5,"INTERRUPT REQUEST";:.2240.T$...ME%
(IA)..0.1520.S$...5,"NEGATIVE VALUE";:.2
240..$..VU.ME%(IA):VS.5:.2630:LI.19:SP.1
4:.2610:IR.VU..$..VU.VU..(VU.1000).1000:
VS.2:.2630:LI.19:SP.24:.2610:SA.VU..$...
SA..0.SA..49.1560.'%...5,"..BAD ADDRESS
(";J(D(SA),2)")";:.2240.Y%..VU.ME%(SA):V
S.5:.2630:LI.19:SP.32:.2610:SR.VU..%".IA
R.IAR.1:VU.IAR:VS.2:.2630:LI.19:SP.6:.26
10..%,.OP..(IR.1000):LI.24:SP.0:.2690..%
6..OP..0.1610..%@..5,"STOP INSTRUCTION E
NCOUNTERED":.2260..%J..OP..30.1670..&T.L
I.16:SP.26:.2690.)&^.LD.LD.1:.LD..ND.165
0.E&H..5,"OUT OF DATA";:.2240.^&R.VU.DA%
(LD):.VU:.2760..&|.ME%(SA).VU:VS.5:.2630
:.2610:.1440..&...OP..31.1720..&...5,SR.
.&..LI.16:SP.9:.2690.C&..VU.SR:.VU;..&..
.2760:VS.5:.2630:.2610:.1440..&...OP..10
.1750..'B.LI.20:SP.8:.2690.1'L.AC.SR:VU.
SR:VS.5:.2630:.2610:.1440.B'V..OP..11.17
70.Z'..ME%(SA).AC:VU.AC:VS.5:.2760:.2690
:.2630:.2610:.1440..'...OP..12.1800..'..
LI.20:SP.27:.2690.H'..MQ.SR:VU.SR:VS.5:.
2630:.2610:.1440.Y'...OP..13.1820..(..ME
%(SA).MQ:VU.MQ:VS.5:.2760:.2690:.2630:.2
610:.1440."(...OP..20.1870.J(&.VU.AC.SR:
.VU...32767.VU..32767.1850.O(0..5,"RESUL
T OUT OF BOUNDS";:.2240..(:.LI.20:SP.8:.
2690..(D.AC.VU:VS.5:.2630:.2610:.1440..(
N..OP..21.1900..(X.VU.AC.SR:.VU...32767.
VU..32767.1850..(B..1840..(L..OP..22.195
0.!)V.VU.MQ.SR:.VU...32767.VU..32767.193
0.+)...1840.A)..LI.20:SP.27:.2690.B)..MQ
.VU:VS.5:.2630:.2610:.1440.S)...OP..23.2
030..)...SR..0.1980..)...5,"DIVISION BY
ZERO";:.2240..)..VU..(MQ.SR):AC.MQ.VU.SR
.V)F.LI.20:SP.27:.2690..)P.MQ.VU:VS.5:.2
630:.2610..*Z.LI.20:SP.8:.2690.'*..VU.AC
:VS.5:.2630:.2610:.1440.7*...OP..3.2060.
J*... AC.O . IA.SA.V*..VU.IA:VS.2:.2630:
LI.19:SP.6:.2610:.1440..*...OP..1.2090..
*...AC.O.IA.SA. * ..2050..**..OP..2.2120
..*4..AC.O.IA.SA.J*>..2050.Z*H..OP..6.21
50..*R..AC..O.IA.SA..*\..2050..+F..OP..8
.2180..+P..AC..O.IA.SA. +Z..2050.0+...OP
..7.2210.A+...AC..O.IA.SA.K+...2050.[+..
.OP..5.2230.K+..IA.SA:.2050..+...5,"INVA
LID OPCODE";:.2240..+...5,"--PROGRAM ABO
RTED":.FL.0..2260..+J..5,"IAR=";IA;" IR=
";IR;" SAR=";SA;" SR=";SR;" AC=";AC;" MQ
=";MQ..,T..".": 5:.5,3:.I.1.820:.:FL.0.M
,...2600:."N=NEW M=MODIFY R=RUN G=GOTO S
=STOP ";.H,..."L=LIST D=NEW DATA ";
..,..UL.1:US$."NMRGSLD":.35:Y$.UR$..,...
Y$."N".1050..,... Y$."S" . ...,...Y$."M"
.2500.O,...Y$.."R".2400..,...2600:LD.O:U
.0:."OUTPUT TO PRINTER? ";..-..UL.1:US$.
"YN":.35:VU$.UR$.0-$..H(VU$,1).."Y".2450
.Q-..FL.1: 5:.5,4:U.5:.ND..O.2380.E-8..5
:.5,"DATA":.5.-B..XX.1.ND:.5,DA%(XX):..
.-L..U.5..5:.5,"EXECUTION":.5..-V..2450.
.-`..Y$."G".2460.Z-J..Y$."D".ND.0:LD.1:.
2770:.2260..-T..Y$."L".3000..-~..Y$.."S"
.2260......2600:LI.21:SP.0:.2690.'...IA.
0:.1440.E....2600:."GOTO LOC ";:.2880.D.
..VU.E(VU$):.VU.0.VU.49.2460.Y....VU...(
VU). 2460.....IA.VU:.1440...D..2600:."MO
DIFY LOC (/*=END): ";:.2880.L.N..H(VU$,2
)."/*". 2260...X.VL.E(VU$):.VL.0.VL.49.2
500......VL...(VL).2500../...2600:."LOC"
;VL;"=";:.2880.E/..VU.E(VU$):.VU..32767.
VU.32767.2540.Y/...VU...(VU).2540.U/..SX
.SA:SA.VL:.2760:SA.SX../..ME%(VL).VU../.
.VS.5:.2630:.2610:.2500.M/(.LI.23:SP.0:.
2690:.XX.1.80:." ";:.:.2690:.../2..2690:
.VU.0..".";../<..VU$:...0F.VU$.D(VU):VU$
.I(VU$,C(VU$).1)..0P.. C(VU$).VS.VU$.I(V
U$,VS).?0Z..C(VU$).VS...S0D..XY.1.VS.C(V
U$).C0N.VU$."0".VU$.K0X..:...0...".";:.L
I..1.LI.24.2710..0...XX.1.LI.1:.".";:...
0...SP..1.SP.40.2730.K0 ..XX.1.SP.1:."."
;:...0..." .....";:...0..UL.5:US$.ZZ
$:.35:X$.UR$..1....-1H.LI..(SA.5).3:SP.(
SA.(.(SA.5).5)).6.2:..X1R..2600:."ENTER
DATA (/*=END) ITEM 00 =".X1..I$.D(ND.1):
I$.I(I$,C(I$).1)..1...C(I$).2.I$."0".I$.
.1..SP.26:.2690:.I$;"= ";:.2880.D1...H(V
U$,2)."/*"...R1..VU.E(VU$)..1...VU...327
68.VU..32767.2850..2..SP.30:.2690:.2740:
.2800.!2"..VU...(VU).2840.A2,.ND.ND.1:DA
%(ND).VU:.ND.20...K26..2780.H2@.."
..........";.U2J..IJ.1.10..2T..: FOR
IK=1TO50:NEXT:PRINT"?";:FORIK=1TO50:NEXT
.E2^.UL.5:US$.ZZ$:.35:VU$.UR$..3H.. ZA=
ASC(VU$(IJ)):IFZA=3ORZA=131THENPRINT"..?
..";:GOTO2900.:3R.. IFIJ=1ANDVU$(1)=CHR$
(20)THENPRINT".";:GOTO2900.I3|.. IFVU$(I
J)=CHR$(13)THENPRINT". ":GOTO2980..3...
IFVU$(IJ)=CHR$(20)THENPRINT". ..?";:IJ=
IJ-1:GOTO2910..3... PRINT".";VU$(IJ);.K3
... NEXTIJ..3... VU$="":FORIK=1TOIJ-1:V
U$=VU$+VU$(IK):NEXT..4....<4...2600:."RE
ADY PRINTER...SPACE BAR TO CONTINUE":.84
4: 5.S4B..5,4:.5,"THE HYPOTHETICAL MACHI
NE V1M0 REV=4":.5..4L..5,"MEMORY"..4V.
.5,"LOCATION CONTENTS INTERPRETATI
ON".M4...XX.1.65:.5,"=";:.:.5..4...XX.0.
49:.ME%(XX).0.3170..4...ME%(XX).0.3100.'
5..OP%.ME%(XX).1000:SA.ME%(XX).OP%.1000.
F5...YY.1.17:.OP%.OC%(YY).3110.N5...YY.X
5..YY.18..5&.VS.3:VU.XX:.2630:.5," ";VU
$;" ";..50.VS.5:VU.ME%(XX):.2630:.
5,VU$;" ";..5:..YY..11.YY..16..5,"
BRANCH TO LOC";SA;" IF AC";..6D..YY..8..
YY.3190,3200,3210,3220,3230,3240,3250,32
60.*6N..YY..8.3170.F6X..YY.8.3270,3280,3
290,3300,3310,3320,3330,3340,3350,3360.N
6B..XX..6L. 5:.5,3:.2260..6V..5,"INPUT D
ATA TO LOCATION";SA:..J6...5,"OUTPUT CON
TENTS OF LOC";SA:...6...5,"LOAD AC WITH
CONTENTS OF LOC";SA:...7...5,"STORE CONT
ENTS OF AC AT LOC";SA:..J7...5,"LOAD MQ
WITH CONTENTS OF LOC";SA:..T7...5,"STORE
CONTENTS OF MQ AT LOC";SA:...7...5,"ADD
CONTENTS OF LOC";SA;" TO AC":..Q7...5,"
SUBTRACT CONTENTS OF LOC";SA;" FROM AC":
...7F..5,"MULTIPLY MQ BY CONTENTS OF LOC
";SA:..)8P..5,"DIVIDE MQ BY CONTENTS OF
LOC";SA:..78Z..5,"<0":..E8...5,"=0":..S8
...5,">0":..B8...5,"<=0":..Q8...5,">=0":
...8...5,"<>0":...8...5,"GO TO LOC";SA:.
..8 ..5,"DATA ELEMENT":..K8 .. STUDENT I
NSTRUCTIONS..8...". THIS PROGRAM SIMULAT
ES THE HYPOTHETICAL".(9..." COMPUTER. TH
IS COMPUTER IS A MACHINE.U9...". LANGUAG
E ONLY COMPUTER. THE COMMANDS.C9H..". AR
E:"..9R..". 30XXX INPUT A VALUE TO LOCA
TION XXX.".D9...". 31XXX PRINT THE VALU
E IN LOCATION XXX.";..9...". 10XXX CLEA
R THE ACCUMULATOR AND..:...". LOA
D THE AC WITH THE CONTENTS.;:...".
OF LOCATION XXX.".I:...835:.850..:..."
. 20XXX ADD THE CONTENTS OF XXX TO THE":
.". AC."..:...". 21XXX SUBTRACT TH
E CONTENTS OF XXX".N:...". FROM TH
E AC."..:"..". 11XXX TRANSFER THE AC TO
LOCATION XXX.".0;6..". 12XXX LOAD THE MU
LTIPLIER-QUOTIENT (MQ)";.Y;@..". W
ITH THE CONTENTS OF XXX."..;J..". 22XXX
MULTIPLY THE MQ BY THE CONTENTS..;T..".
OF LOCATION XXX."..;Y..835:.850..;
^..". 23XXX DIVIDE THE MQ BY THE CONTENT
S..<H..". OF LOCATION XXX. THE REM
AINDER.*<R..". IS IN THE AC..Z<S..
". 13XXX TRANSFER THE MQ TO LOCATION XXX
.".I<W..835:. 850..<...". 01XXX GOTO XXX
IF THE AC IS ZERO..A<...". 02XXX GOTO X
XX IF THE AC IS POSITIVE...<...". 03XXX
GOTO XXX IF THE AC IS NEGATIVE...=...".
05XXX GOTO XXX..5=...". 06XXX GOTO XXX I
F THE AC IS NEGATIVE".M=...". OR Z
ERO.".{=B..". 07XXX GOTO XXX IF THE AC I
S NOT ZERO...=V..". 00XXX STOP."..=...83
5:. 850.J=...". EACH INSTRUCTION IS ENTE
RED AS A 5..=...". DIGIT NUMBER."..>..."
. ADDRESSES FROM 000 TO 049 ARE LEGAL".<
>...". WHEN YOU HAVE FINISHED ENTERING Y
OUR".B>...". PROGRAM, TYPE /* AS YOUR LA
ST.X>...". INSTRUCTION."..>...". THE PRO
GRAM WILL ASK YOU TO INPUT DATA.T>&..".
VALUES. AGAIN, END THE DATA WITH /*...>+
..835:. 850..?0..". YOU CAN THEN RUN YOU
R PROGRAM.".8?:..". IF YOU HAVE A PRINTE
R, YOU CAN GET A.B?D..". 'HARDCOPY' OF T
HE LISTING AND/OR".V?N..". EXECUTION.".
?S..835..?X....?... TEACHERS INSTRUCTION
S..?..."..HYPO AUTO..?...".HYPO IS BOTH
A COMPUTER AND A LANGUAGE..@...".USED TO
INTRODUCE STUDENTS TO THE.8@...".WORKIN
G OF A COMPUTER AT THE MACHINE'S.F@...".
LEVEL..Y@...835:UP.2:.850.}@D.."..CLASSI
FICATION.: SIMULATION..@N.."..ANCILLARY
MATERIALS.: THE COMMANDS.S@X..".(OP-CODE
S) SHOULD BE MADE AVAILABLE..@...".TO TH
E STUDENT ON PAPER FOR EASY..A...".REFER
ENCE..6A...".A PRINTER WILL ALLOW HARD C
OPY OF._A...".PROGRAM LISTINGS AND EXECU
TIONS."..A...".THERE ARE OTHER HYPO PROG
RAMS ALSO..A...".AVAILABLE WITH THIS PAC
KAGE..AA... 835:UP.3:.850..A..."..OBJECT
IVES.: TO ALLOW THE ST..B...".TO PROGRAM
A COMPUTER IN PSEUDO-.6B(..".MACHINE LA
NGUAGE AND OBSERVE THE.EB2..".STEP-BY-ST
EP EXECUTION OF THE PROGRAM."..B<.."..ST
UDENT ACTIVITIES.: WRITING SIMPLE..BF.."
.COMPUTER PROGRAMS..FBP..".DEBUGGING PRO
GRAMS...BZ..".TRACING PROGRAM FLOW...CD.
.".APPLYING THE CONCEPT OF BRANCHING.".!
CN..835:UP.4:.850.PCX..".HYPO IS SUGGEST
ED FOR USE WITH COMPUTER.YC...".AWARENES
S OR INFORMATICS COURSES...C...".TEACHER
S MAY ALSO FIND HYPO USEFUL.RC...".FOR I
NTRODUCING THE CONCEPTS OF MACHINE..C ..
".LANGUAGE TO COMPUTER SCIENCE CLASSES..
.D...835:UP.5:.850.6D..."..PREREQUISITES
.: THE STUDENT.`D...".CONCEPTS OF PROGRA
MMING A COMPUTER..DH..".WITH INDIVIDUAL
INSTRUCTIONS...DR..".THE CONCEPT OF OP-C
ODE, ADDRESS, BRANCH..D...".AND SEQUENTI
AL EXECUTION MUST ALSO BE..D...".INTRODU
CED...E... 835:....
> CLICK IMAGE PREVIEW FOR FULL MODAL