SIMULATION
FILE INFORMATION
FILENAME(S): SIMULATION
FILE TYPE(S): PRG
FILE SIZE: 11.8K
FIRST SEEN: 2025-11-30 21:23:44
APPEARS ON: 1 disk(s)
FILE HASH
d33e5f564d3463a924a6ec77d8f8bddf02c01010f91007b06f2be9ead11b5b42
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 SPEL 39 1 | SIMULATION | PRG | DuncanTwain | 32 | 8 | 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 97 55 4F 2C 30 3A 55 52 24 B2 22 |...(..UO,0:UR$."|
00000100: 22 3A 55 49 24 B2 22 22 00 18 09 2A 00 8B 55 4C |":UI$.""...*..UL|
00000110: B2 30 A7 55 4C B2 38 30 00 22 09 2D 00 97 55 43 |.0.UL.80.".-..UC|
00000120: 2C 30 00 36 09 32 00 A1 55 49 24 3A 8B 55 49 24 |,0.6.2..UI$:.UI$|
00000130: B2 22 22 A7 35 30 00 60 09 37 00 8B 55 49 24 B2 |."".50.`.7..UI$.|
00000140: C7 28 31 33 29 AF C3 28 55 52 24 29 B1 B2 31 A7 |.(13)..(UR$)..1.|
00000150: 97 55 43 2C 31 3A 99 22 20 9D 22 3B 3A 89 38 35 |.UC,1:." .";:.85|
00000160: 00 73 09 3C 00 8B 55 49 24 B2 C7 28 32 30 29 A7 |.s.<..UI$..(20).|
00000170: 31 30 35 00 87 09 3E 00 8B 20 C3 28 55 52 24 29 |105...>.. .(UR$)|
00000180: B2 B1 55 4C A7 35 30 00 AC 09 41 00 8D 31 32 30 |..UL.50...A..120|
00000190: 3A 8F 20 43 48 45 43 4B 20 46 4F 52 20 56 41 4C |:. CHECK FOR VAL|
000001A0: 49 44 20 43 48 41 52 41 43 54 45 52 00 BC 09 46 |ID CHARACTER...F|
000001B0: 00 55 52 24 B2 55 52 24 AA 55 49 24 00 C6 09 4B |.UR$.UR$.UI$...K|
000001C0: 00 99 55 49 24 3B 00 CE 09 50 00 89 35 30 00 F3 |..UI$;...P..50..|
000001D0: 09 55 00 8F 20 2B 2B 2B 20 43 48 45 43 4B 20 46 |.U.. +++ CHECK F|
000001E0: 4F 52 20 48 45 4C 50 20 52 45 51 55 45 53 54 20 |OR HELP REQUEST |
000001F0: 2B 2B 2B 00 1B 0A 5A 00 8B 55 52 24 B2 55 58 24 |+++...Z..UR$.UX$|
00000200: A7 31 39 35 3A 8F 20 45 58 49 54 20 54 4F 20 48 |.195:. EXIT TO H|
00000210: 45 4C 50 20 52 4F 55 54 49 4E 45 00 2A 0A 5F 00 |ELP ROUTINE.*._.|
00000220: 8B 55 46 B2 31 A7 8D 32 34 30 00 37 0A 64 00 55 |.UF.1..240.7.d.U|
00000230: 46 B2 30 3A 99 3A 8E 00 50 0A 66 00 8F 20 2B 2B |F.0:.:..P.f.. ++|
00000240: 20 43 48 45 43 4B 20 44 45 4C 45 54 45 20 2B 2B | CHECK DELETE ++|
00000250: 00 61 0A 69 00 8B C3 28 55 52 24 29 B3 31 A7 35 |.a.i...(UR$).1.5|
00000260: 30 00 79 0A 6E 00 55 52 24 B2 C8 28 55 52 24 2C |0.y.n.UR$..(UR$,|
00000270: C3 28 55 52 24 29 AB 31 29 00 8B 0A 73 00 99 22 |.(UR$).1)...s.."|
00000280: 9D 20 20 9D 9D 22 3B 3A 89 35 30 00 B2 0A 78 00 |. ..";:.50...x.|
00000290: 8F 20 2B 2B 20 43 48 45 43 4B 20 46 4F 52 20 56 |. ++ CHECK FOR V|
000002A0: 41 4C 49 44 20 43 48 41 52 41 43 54 45 52 53 20 |ALID CHARACTERS |
000002B0: 2B 2B 00 C4 0A 7D 00 8B C3 28 55 53 24 29 B2 30 |++...}...(US$).0|
000002C0: A7 31 35 30 00 D5 0A 82 00 81 55 53 B2 31 A4 C3 |.150......US.1..|
000002D0: 28 55 53 24 29 00 EC 0A 87 00 8B 55 49 24 B2 CA |(US$)......UI$..|
000002E0: 28 55 53 24 2C 55 53 2C 31 29 A7 8E 00 F2 0A 8C |(US$,US,1)......|
000002F0: 00 82 00 FF 0A 91 00 55 49 24 B2 22 22 3A 8E 00 |.......UI$."":..|
00000300: 1A 0B 96 00 8F 20 2A 2A 20 53 54 41 4E 44 41 52 |..... ** STANDAR|
00000310: 44 20 49 4E 50 55 54 20 2A 2A 00 2B 0B 98 00 8B |D INPUT **.+....|
00000320: C6 28 55 49 24 29 B2 34 36 A7 8E 00 3C 0B 9B 00 |.(UI$).46...<...|
00000330: 8B 55 49 24 B2 C7 28 33 32 29 A7 8E 00 59 0B A0 |.UI$..(32)...Y..|
00000340: 00 8B C6 28 55 49 24 29 B3 34 38 B0 C6 28 55 49 |...(UI$).48..(UI|
00000350: 24 29 B1 35 37 A7 31 37 30 00 5F 0B A5 00 8E 00 |$).57.170._.....|
00000360: 7C 0B AA 00 8B C6 28 55 49 24 29 B3 36 35 B0 C6 ||.....(UI$).65..|
00000370: 28 55 49 24 29 B1 39 30 A7 31 38 30 00 82 0B AF |(UI$).90.180....|
00000380: 00 8E 00 A6 0B B4 00 8B C6 28 55 49 24 29 B3 31 |.........(UI$).1|
00000390: 39 33 B0 C6 28 55 49 24 29 B1 32 31 38 A7 55 49 |93..(UI$).218.UI|
000003A0: 24 B2 22 22 3A 8E 00 C9 0B B9 00 8B C2 28 55 54 |$."":........(UT|
000003B0: 29 B2 55 55 25 A7 55 49 24 B2 C7 28 C6 28 55 49 |).UU%.UI$..(.(UI|
000003C0: 24 29 AB 31 32 38 29 3A 8E 00 CF 0B BB 00 8E 00 |$).128):........|
000003D0: DC 0B BE 00 55 49 24 B2 22 22 3A 8E 00 01 0C C3 |....UI$."":.....|
000003E0: 00 55 46 B2 31 3A 8F 20 2B 2B 2B 20 48 45 4C 50 |.UF.1:. +++ HELP|
000003F0: 20 52 4F 55 54 49 4E 45 20 45 58 49 54 20 2B 2B | ROUTINE EXIT ++|
00000400: 2B 00 0A 0C C5 00 8D 32 35 30 00 13 0C C8 00 8D |+......250......|
00000410: 32 34 35 00 32 0C CD 00 81 55 51 B2 55 42 A4 28 |245.2....UQ.UB.(|
00000420: 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 AB |U2%.256.U1%.U3%.|
00000430: 32 29 00 4E 0C D2 00 55 51 25 28 55 51 AB 55 42 |2).N...UQ%(UQ.UB|
00000440: 29 B2 C2 28 55 51 29 3A 82 3A 99 22 93 22 00 61 |)..(UQ):.:.".".a|
00000450: 0C D7 00 55 5A B2 31 3A 55 56 25 B2 C2 28 55 54 |...UZ.1:UV%..(UT|
00000460: 29 00 6A 0C D8 00 89 33 30 30 00 AE 0C D9 00 55 |).j....300.....U|
00000470: 5A B2 30 3A 55 53 24 B2 55 4A 24 3A 55 47 24 B2 |Z.0:US$.UJ$:UG$.|
00000480: 55 4B 24 3A 55 50 B2 55 4A 3A 55 4C B2 55 4B 3A |UK$:UP.UJ:UL.UK:|
00000490: 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 |..(50003).0..532|
000004A0: 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 E3 |81,6:.53280,14..|
000004B0: 0C DC 00 55 54 24 B2 55 4C 24 3A 99 22 93 22 3B |...UT$.UL$:.".";|
000004C0: 3A 97 55 54 2C 55 56 25 3A 81 55 51 B2 55 42 A4 |:.UT,UV%:.UQ.UB.|
000004D0: 28 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 |(U2%.256.U1%.U3%|
000004E0: AB 33 29 00 F8 0C E1 00 97 55 51 2C 55 51 25 28 |.3)......UQ,UQ%(|
000004F0: 55 51 AB 55 42 29 3A 82 00 04 0D E6 00 97 55 31 |UQ.UB):.......U1|
00000500: 2C 55 31 25 00 10 0D E8 00 97 55 32 2C 55 32 25 |,U1%......U2,U2%|
00000510: 00 1C 0D E9 00 97 55 34 2C 55 34 25 00 2A 0D EA |......U4,U4%.*..|
00000520: 00 97 55 33 2C 55 33 25 AB 31 00 32 0D EB 00 89 |..U3,U3%.1.2....|
00000530: 33 35 00 64 0D F0 00 55 44 25 B2 28 28 55 32 25 |35.d...UD%.((U2%|
00000540: AC 32 35 36 AA 55 31 25 AA 55 33 25 29 AB 55 42 |.256.U1%.U3%).UB|
00000550: 29 AD 34 30 3A 99 C8 28 55 44 24 2C 55 44 25 AA |).40:..(UD$,UD%.|
00000560: 31 29 3A 8E 00 9F 0D F5 00 99 C8 28 55 44 24 2C |1):........(UD$,|
00000570: 32 34 29 3B 22 20 20 20 20 20 20 20 20 20 20 20 |24);" |
00000580: 20 20 20 20 20 20 20 20 20 20 20 12 20 48 45 4C | . HEL|
00000590: 50 20 43 4F 4D 49 4E 47 20 92 20 20 22 3A 8E 00 |P COMING . ":..|
000005A0: CB 0D FA 00 55 31 25 B2 C2 28 55 31 29 3A 55 32 |....U1%..(U1):U2|
000005B0: 25 B2 C2 28 55 32 29 3A 55 33 25 B2 C2 28 55 33 |%..(U2):U3%..(U3|
000005C0: 29 3A 55 34 25 B2 C2 28 55 34 29 00 F3 0D FB 00 |):U4%..(U4).....|
000005D0: 55 4A 24 B2 55 53 24 3A 55 4B 24 B2 55 47 24 3A |UJ$.US$:UK$.UG$:|
000005E0: 55 4C 24 B2 55 54 24 3A 55 4A B2 55 50 3A 55 4B |UL$.UT$:UJ.UP:UK|
000005F0: B2 55 4C 00 F9 0D FF 00 8E 00 0A 0E 2C 01 8F 20 |.UL.........,.. |
00000600: 2A 2A 20 4D 45 4E 55 20 2A 2A 00 10 0E 2D 01 3A |** MENU **...-.:|
00000610: 00 3F 0E 2E 01 99 22 93 22 3A 97 55 54 2C 55 55 |.?....".":.UT,UU|
00000620: 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 |%:..(50003).0..5|
00000630: 33 32 38 31 2C 39 3A 97 35 33 32 38 30 2C 38 00 |3281,9:.53280,8.|
00000640: 45 0E 2F 01 3A 00 62 0E 31 01 99 22 13 20 20 20 |E./.:.b.1..". |
00000650: 20 20 20 20 20 20 20 20 20 20 20 20 20 4D 45 4E | MEN|
00000660: 55 22 00 91 0E 36 01 99 22 20 2D 2D 2D 2D 2D 2D |U"...6.." ------|
00000670: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000680: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000690: 22 00 B7 0E 3B 01 99 22 11 11 20 20 20 20 20 20 |"...;..".. |
000006A0: 20 31 2E 20 20 20 42 45 47 49 4E 20 53 49 4D 55 | 1. BEGIN SIMU|
000006B0: 4C 41 54 49 4F 4E 22 00 E1 0E 40 01 99 22 11 11 |LATION"...@.."..|
000006C0: 20 20 20 20 20 20 20 32 2E 20 20 20 53 54 55 44 | 2. STUD|
000006D0: 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 |ENT INSTRUCTIONS|
000006E0: 22 00 0B 0F 45 01 99 22 11 11 20 20 20 20 20 20 |"...E..".. |
000006F0: 20 33 2E 20 20 20 54 45 41 43 48 45 52 20 49 4E | 3. TEACHER IN|
00000700: 53 54 52 55 43 54 49 4F 4E 53 22 00 27 0F 4F 01 |STRUCTIONS".'.O.|
00000710: 99 22 11 11 20 20 20 20 20 20 20 34 2E 20 20 20 |.".. 4. |
00000720: 51 55 49 54 11 11 22 00 56 0F 54 01 99 22 20 2D |QUIT..".V.T.." -|
00000730: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000740: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000750: 2D 2D 2D 2D 2D 22 00 81 0F 59 01 99 22 11 11 20 |-----"...Y..".. |
00000760: 20 20 20 20 20 20 50 52 45 53 53 20 41 20 4E 55 | PRESS A NU|
00000770: 4D 42 45 52 20 4B 45 59 20 28 31 2D 34 29 20 22 |MBER KEY (1-4) "|
00000780: 3B 00 A9 0F 5E 01 55 4C B2 31 3A 55 53 24 B2 22 |;...^.UL.1:US$."|
00000790: 31 32 33 34 22 3A 8D 33 35 3A 8F 20 49 4E 50 55 |1234":.35:. INPU|
000007A0: 54 20 52 4F 55 54 49 4E 45 00 B4 0F 60 01 55 53 |T ROUTINE...`.US|
000007B0: 24 B2 22 22 00 D1 0F 63 01 91 C5 28 55 52 24 29 |$.""...c...(UR$)|
000007C0: 8D 31 30 30 30 2C 34 30 30 2C 35 30 30 2C 33 39 |.1000,400,500,39|
000007D0: 36 00 DA 0F 68 01 89 33 30 30 00 01 10 8B 01 8F |6...h..300......|
000007E0: 20 2A 2A 20 52 45 2D 45 4E 41 42 4C 45 20 53 54 | ** RE-ENABLE ST|
000007F0: 4F 50 20 4B 45 59 20 41 4E 44 20 45 4E 44 20 2A |OP KEY AND END *|
00000800: 2A 00 30 10 8C 01 8B C2 28 35 30 30 30 33 29 B3 |*.0.....(50003).|
00000810: B1 31 AF C2 28 35 30 30 30 33 29 B3 B1 31 36 30 |.1..(50003)..160|
00000820: AF C2 28 35 30 30 30 33 29 B3 B1 30 A7 33 39 39 |..(50003)..0.399|
00000830: 00 5A 10 8D 01 9E 55 55 AA 37 31 3A 8B C2 28 35 |.Z....UU.71:..(5|
00000840: 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 |0003).0..53281,6|
00000850: 3A 97 35 33 32 38 30 2C 31 34 00 66 10 8E 01 99 |:.53280,14.f....|
00000860: 22 9A 93 22 3A 80 00 71 10 8F 01 8D 38 37 35 3A |"..":..q....875:|
00000870: 8E 00 92 10 90 01 8F 20 2A 2A 20 53 54 55 44 45 |....... ** STUDE|
00000880: 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 |NT INSTRUCTIONS |
00000890: 2A 2A 00 C1 10 95 01 99 22 93 22 3A 97 55 54 2C |**......".":.UT,|
000008A0: 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |UL%:..(50003).0.|
000008B0: 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 30 2C |.53281,0:.53280,|
000008C0: 30 00 E2 10 9A 01 55 50 B2 30 3A 55 47 24 B2 22 |0.....UP.0:UG$."|
000008D0: D3 54 55 44 45 4E 54 20 C9 4E 53 54 22 3A 8D 38 |.TUDENT .NST":.8|
000008E0: 35 30 00 12 11 C8 01 99 22 11 11 11 11 11 11 20 |50......"...... |
000008F0: 20 20 20 D2 45 4D 45 4D 42 45 52 20 54 4F 20 48 | .EMEMBER TO H|
00000900: 49 54 20 3C 52 45 54 55 52 4E 3E 20 41 46 54 45 |IT <RETURN> AFTE|
00000910: 52 22 00 3D 11 CA 01 99 22 11 20 20 20 20 54 59 |R".=....". TY|
00000920: 50 49 4E 47 20 59 4F 55 52 20 41 4E 53 57 45 52 |PING YOUR ANSWER|
00000930: 2E 20 D4 48 49 53 20 54 45 4C 4C 53 22 00 69 11 |. .HIS TELLS".i.|
00000940: CC 01 99 22 11 20 20 20 20 54 48 45 20 43 4F 4D |...". THE COM|
00000950: 50 55 54 45 52 20 54 4F 20 41 43 43 45 50 54 20 |PUTER TO ACCEPT |
00000960: 57 48 41 54 20 59 4F 55 22 00 81 11 CE 01 99 22 |WHAT YOU"......"|
00000970: 11 20 20 20 20 48 41 56 45 20 54 59 50 45 44 2E |. HAVE TYPED.|
00000980: 22 00 8A 11 E5 01 8D 38 33 35 00 9E 11 EA 01 8B |"......835......|
00000990: 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 A4 |UZ.1..UP%:.217..|
000009A0: 11 F3 01 8E 00 C5 11 F4 01 8F 20 2A 2A 20 54 45 |.......... ** TE|
000009B0: 41 43 48 45 52 20 49 4E 53 54 52 55 43 54 49 4F |ACHER INSTRUCTIO|
000009C0: 4E 53 20 2A 2A 00 F5 11 F5 01 99 22 93 22 3A 97 |NS **......".":.|
000009D0: 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 |UT,UL%:..(50003)|
000009E0: B2 30 A7 97 35 33 32 38 31 2C 32 3A 97 35 33 32 |.0..53281,2:.532|
000009F0: 38 30 2C 31 30 00 16 12 F6 01 55 50 B2 30 3A 55 |80,10.....UP.0:U|
00000A00: 47 24 B2 22 D4 45 41 43 48 45 52 20 C9 4E 53 54 |G$.".EACHER .NST|
00000A10: 22 3A 8D 38 35 30 00 44 12 F7 01 99 22 11 11 20 |":.850.D....".. |
00000A20: 20 20 20 20 20 D4 4F 20 54 48 45 20 42 45 53 54 | .O THE BEST|
00000A30: 20 4F 46 20 4F 55 52 20 4B 4E 4F 57 4C 45 44 47 | OF OUR KNOWLEDG|
00000A40: 45 2C 11 22 00 6D 12 F8 01 99 22 20 20 20 54 48 |E,.".m...." TH|
00000A50: 49 53 20 50 52 4F 47 52 41 4D 20 49 53 20 49 4E |IS PROGRAM IS IN|
00000A60: 20 54 48 45 20 50 55 42 4C 49 43 11 22 00 99 12 | THE PUBLIC."...|
00000A70: F9 01 99 22 20 20 20 44 4F 4D 41 49 4E 2E 20 20 |..." DOMAIN. |
00000A80: C9 46 20 54 48 49 53 20 49 53 20 4E 4F 54 20 54 |.F THIS IS NOT T|
00000A90: 48 45 20 43 41 53 45 11 22 00 B6 12 FA 01 99 22 |HE CASE."......"|
00000AA0: 20 20 20 50 4C 45 41 53 45 20 43 4F 4E 54 41 43 | PLEASE CONTAC|
00000AB0: 54 3A 11 11 11 22 00 E0 12 FB 01 99 22 20 20 20 |T:..."......" |
00000AC0: 20 20 20 C3 4F 4D 4D 4F 44 4F 52 45 20 C2 55 53 | .OMMODORE .US|
00000AD0: 49 4E 45 53 53 20 CD 41 43 48 49 4E 45 53 11 22 |INESS .ACHINES."|
00000AE0: 00 03 13 FC 01 99 22 20 20 20 20 20 20 20 20 20 |......" |
00000AF0: 20 33 33 37 30 20 D0 48 41 52 4D 41 43 59 20 C1 | 3370 .HARMACY .|
00000B00: 56 45 2E 00 27 13 FD 01 99 22 20 20 20 20 20 20 |VE..'...." |
00000B10: 20 20 20 20 C1 47 49 4E 43 4F 55 52 54 2C 20 CF | .GINCOURT, .|
00000B20: 4E 54 41 52 49 4F 22 00 49 13 FE 01 99 22 20 20 |NTARIO".I...." |
00000B30: 20 20 20 20 20 20 20 20 C3 41 4E 41 44 41 20 20 | .ANADA |
00000B40: 20 CD 31 D7 20 32 CB 34 22 00 69 13 FF 01 99 22 | .1. 2.4".i...."|
00000B50: 20 20 20 20 20 20 20 20 20 20 28 34 31 36 29 20 | (416) |
00000B60: 34 39 39 2D 34 32 39 32 22 00 78 13 40 02 8D 38 |499-4292".x.@..8|
00000B70: 33 35 3A 8D 38 35 30 3A 00 9F 13 42 02 99 22 20 |35:.850:...B.." |
00000B80: 20 20 20 20 11 11 D0 52 4F 47 52 41 4D 20 CE 41 | ...ROGRAM .A|
00000B90: 4D 45 3A 20 D3 49 4D 55 4C 41 54 49 4F 4E 11 00 |ME: .IMULATION..|
00000BA0: C1 13 44 02 99 22 20 20 20 20 20 D7 52 49 54 54 |..D.." .RITT|
00000BB0: 45 4E 20 C2 59 20 20 3A 20 D5 4E 4B 4E 4F 57 4E |EN .Y : .NKNOWN|
00000BC0: 11 00 DC 13 46 02 99 22 20 20 20 20 20 D5 50 47 |....F.." .PG|
00000BD0: 52 41 44 45 44 20 C2 59 20 3A 20 11 00 07 14 48 |RADED .Y : ....H|
00000BE0: 02 99 22 20 20 20 20 20 11 D4 48 49 53 20 50 52 |.." ..HIS PR|
00000BF0: 4F 47 52 41 4D 20 57 49 4C 4C 20 52 55 4E 20 4F |OGRAM WILL RUN O|
00000C00: 4E 20 41 4E 59 11 11 00 2E 14 4A 02 99 22 20 20 |N ANY.....J.." |
00000C10: 20 20 20 20 20 20 20 C2 C1 D3 C9 C3 A0 32 2E 30 | ......2.0|
00000C20: 20 D0 C5 D4 20 C3 CF CD D0 D5 D4 C5 D2 11 00 55 | ... ..........U|
00000C30: 14 4C 02 99 22 20 20 20 20 20 20 20 20 20 C2 C1 |.L.." ..|
00000C40: D3 C9 C3 20 34 2E 30 20 D0 C5 D4 A0 C3 CF CD D0 |... 4.0 ........|
00000C50: D5 D4 C5 D2 11 00 77 14 4E 02 99 22 20 20 20 20 |......w.N.." |
00000C60: 20 20 20 20 20 38 30 33 32 20 C3 C2 CD 20 C3 CF | 8032 ... ..|
00000C70: CD D0 D5 D4 C5 D2 11 00 9C 14 50 02 99 22 20 20 |..........P.." |
00000C80: 20 20 20 20 20 20 20 C3 CF CD CD CF C4 CF D2 C5 | .........|
00000C90: 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 A5 14 52 | 64 ...........R|
00000CA0: 02 8D 38 33 35 00 B9 14 54 02 8B 55 5A B2 31 A7 |..835...T..UZ.1.|
00000CB0: 9E 55 50 25 3A 89 32 31 37 00 BF 14 56 02 8E 00 |.UP%:.217...V...|
00000CC0: E5 14 58 02 8F 20 2A 2A 20 50 52 4F 47 52 41 4D |..X.. ** PROGRAM|
00000CD0: 20 4D 4F 44 49 46 49 43 41 54 49 4F 4E 20 49 4E | MODIFICATION IN|
00000CE0: 53 54 20 2A 2A 00 F6 14 59 02 99 22 93 22 3A 97 |ST **...Y..".":.|
00000CF0: 55 54 2C 55 4C 25 00 16 15 5D 02 55 50 B2 30 3A |UT,UL%...].UP.0:|
00000D00: 55 47 24 B2 22 D0 52 4F 47 52 41 4D 20 CD 4F 44 |UG$.".ROGRAM .OD|
00000D10: 22 3A 8D 38 35 30 00 1F 15 94 02 8D 38 33 35 00 |":.850......835.|
00000D20: 33 15 B2 02 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 |3....UZ.1..UP%:.|
00000D30: 32 31 37 00 39 15 BB 02 8E 00 5E 15 BC 02 8F 20 |217.9.....^.... |
00000D40: 2A 2A 20 54 4F 20 55 53 45 20 38 30 33 32 20 4C |** TO USE 8032 L|
00000D50: 4F 41 44 20 43 42 4D 34 30 33 32 20 2A 2A 00 94 |OAD CBM4032 **..|
00000D60: 15 C6 02 99 22 93 11 11 11 05 42 45 46 4F 52 45 |....".....BEFORE|
00000D70: 20 52 55 4E 4E 49 4E 47 20 54 48 49 53 20 50 52 | RUNNING THIS PR|
00000D80: 4F 47 52 41 4D 20 4F 4E 20 41 4E 20 38 30 33 32 |OGRAM ON AN 8032|
00000D90: 20 20 11 11 00 CA 15 D0 02 99 22 20 20 20 20 20 | ........" |
00000DA0: 20 4C 4F 41 44 20 54 48 45 20 27 43 42 4D 20 34 | LOAD THE 'CBM 4|
00000DB0: 30 33 32 27 20 50 52 4F 47 52 41 4D 11 11 11 11 |032' PROGRAM....|
00000DC0: 11 11 11 11 11 11 11 11 11 22 00 D5 15 DA 02 9E |........."......|
00000DD0: 55 55 AA 37 31 00 DB 15 E4 02 80 00 FB 15 20 03 |UU.71......... .|
00000DE0: 8F 20 2A 2A 20 54 20 49 20 54 20 4C 20 45 20 20 |. ** T I T L E |
00000DF0: 20 50 20 41 20 47 20 45 20 2A 2A 00 2F 16 22 03 | P A G E **./.".|
00000E00: 99 22 93 11 1D 05 22 3B 3A 97 55 54 2C 55 55 25 |."....";:.UT,UU%|
00000E10: 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 |:..(50003).0..53|
00000E20: 32 38 30 2C 31 34 3A 97 35 33 32 38 31 2C 36 00 |280,14:.53281,6.|
00000E30: 45 16 24 03 81 49 B2 31 A4 33 38 3A 99 22 12 A6 |E.$..I.1.38:."..|
00000E40: 92 22 3B 3A 82 00 5D 16 26 03 81 49 B2 31 A4 32 |.";:..].&..I.1.2|
00000E50: 32 3A 99 22 11 9D 12 A6 92 22 3B 3A 82 00 75 16 |2:.".....";:..u.|
00000E60: 28 03 81 49 B2 31 A4 33 37 3A 99 22 9D 9D 12 A6 |(..I.1.37:."....|
00000E70: 92 22 3B 3A 82 00 8D 16 2A 03 81 49 B2 31 A4 32 |.";:....*..I.1.2|
00000E80: 32 3A 99 22 91 9D 12 A6 92 22 3B 3A 82 00 B2 16 |2:.".....";:....|
00000E90: 2C 03 99 22 13 11 11 11 11 11 11 1D 1D 1D 1D 1D |,.."............|
00000EA0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 A9 20 |............... |
00000EB0: 20 92 00 D4 16 2E 03 99 22 1D 1D 1D 1D 1D 1D 1D | .......".......|
00000EC0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 20 20 |............ . |
00000ED0: 12 20 92 A9 00 F5 16 30 03 99 22 1D 1D 1D 1D 1D |. .....0..".....|
00000EE0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 |.............. .|
00000EF0: 20 20 12 A3 DF 00 13 17 32 03 99 22 1D 1D 1D 1D | ......2.."....|
00000F00: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D DF 12 |................|
00000F10: 20 20 92 00 3B 17 34 03 99 22 11 11 1D 1D 1D 1D | ..;.4.."......|
00000F20: 1D 1D 1D 1D 1D 1D 1D 1D 43 20 4F 20 4D 20 4D 20 |........C O M M |
00000F30: 4F 20 44 20 4F 20 52 20 45 11 11 00 5E 17 36 03 |O D O R E...^.6.|
00000F40: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00000F50: 1D 45 44 55 43 41 54 49 4F 4E 41 4C 11 11 00 7D |.EDUCATIONAL...}|
00000F60: 17 38 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.8.."...........|
00000F70: 1D 1D 1D 1D 1D 53 4F 46 54 57 41 52 45 00 98 17 |.....SOFTWARE...|
00000F80: 3A 03 8F 20 2A 2A 20 43 4F 4D 4D 4F 44 4F 52 45 |:.. ** COMMODORE|
00000F90: 20 4C 4F 47 4F 20 2A 2A 00 D0 17 3B 03 99 C8 28 | LOGO **...;...(|
00000FA0: 55 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 1D |UD$,24);".......|
00000FB0: 1D 1D 12 50 52 45 53 53 20 53 50 41 43 45 20 42 |...PRESS SPACE B|
00000FC0: 41 52 20 4F 52 20 57 41 49 54 92 22 3A 49 B2 30 |AR OR WAIT.":I.0|
00000FD0: 00 F2 17 3C 03 A1 41 24 3A 8B 41 24 B3 B1 22 20 |...<..A$:.A$.." |
00000FE0: 22 A7 49 B2 49 AA 31 3A 8B 49 B3 32 35 30 A7 38 |".I.I.1:.I.250.8|
00000FF0: 32 38 00 16 18 3E 03 54 31 24 B2 22 22 3A 54 32 |28...>.T1$."":T2|
00001000: 24 B2 22 22 3A 54 33 24 B2 22 22 3A 54 34 24 B2 |$."":T3$."":T4$.|
00001010: 22 22 3A 49 B2 30 00 1F 18 40 03 89 33 30 30 00 |"":I.0...@..300.|
00001020: 3B 18 43 03 8F 20 2A 2A 20 53 50 41 43 45 20 42 |;.C.. ** SPACE B|
00001030: 41 52 20 50 52 45 53 53 20 2A 2A 00 77 18 48 03 |AR PRESS **.w.H.|
00001040: 97 55 4F 2C 30 3A 99 C8 28 55 44 24 2C 32 34 29 |.UO,0:..(UD$,24)|
00001050: 3B 22 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 |;".......PRESS S|
00001060: 50 41 43 45 20 42 41 52 20 54 4F 20 43 4F 4E 54 |PACE BAR TO CONT|
00001070: 49 4E 55 45 92 13 22 00 8E 18 4C 03 A1 55 49 24 |INUE.."...L..UI$|
00001080: 3A 8B 55 49 24 B3 B1 22 20 22 A7 38 34 34 00 A6 |:.UI$.." ".844..|
00001090: 18 4D 03 99 C8 28 55 44 24 2C 32 34 29 3B 55 50 |.M...(UD$,24);UP|
000010A0: 24 22 13 22 3A 8E 00 AC 18 4E 03 8E 00 CC 18 52 |$".":....N.....R|
000010B0: 03 8F 20 2A 2A 20 50 41 47 45 20 44 45 53 49 47 |.. ** PAGE DESIG|
000010C0: 4E 20 52 4F 55 54 49 4E 45 20 2A 2A 00 D8 18 54 |N ROUTINE **...T|
000010D0: 03 55 50 B2 55 50 AA 31 00 02 19 57 03 99 22 93 |.UP.UP.1...W..".|
000010E0: 22 C8 28 55 54 24 AA 55 50 24 2C 32 31 29 3B C9 |".(UT$.UP$,21);.|
000010F0: 28 55 50 24 AA 55 47 24 AA C4 28 55 50 29 2C 31 |(UP$.UG$..(UP),1|
00001100: 38 29 00 31 19 5C 03 99 22 20 2D 2D 2D 2D 2D 2D |8).1.\.." ------|
00001110: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001120: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001130: 22 00 40 19 60 03 8B 55 48 B3 B1 30 A7 38 37 30 |".@.`..UH..0.870|
00001140: 00 74 19 61 03 99 C8 28 55 44 24 2C 32 34 29 3B |.t.a...(UD$,24);|
00001150: C8 28 55 50 24 2C 37 29 3B 22 48 45 4C 50 20 2D |.(UP$,7);"HELP -|
00001160: 20 50 52 45 53 53 20 20 20 48 20 3C 52 45 54 55 | PRESS H <RETU|
00001170: 52 4E 3E 22 00 85 19 66 03 55 48 B2 30 3A 99 22 |RN>"...f.UH.0:."|
00001180: 13 11 22 3A 8E 00 A4 19 6B 03 8F 20 2A 2A 20 50 |..":....k.. ** P|
00001190: 4C 45 41 53 45 20 57 41 49 54 20 52 45 4D 41 52 |LEASE WAIT REMAR|
000011A0: 4B 20 2A 2A 00 DA 19 70 03 99 C8 28 55 44 24 2C |K **...p...(UD$,|
000011B0: 32 34 29 3B 22 20 20 20 20 20 20 20 20 20 20 20 |24);" |
000011C0: 4F 4E 45 20 4D 4F 4D 45 4E 54 20 50 4C 45 41 53 |ONE MOMENT PLEAS|
000011D0: 45 2E 2E 2E 20 20 20 20 20 22 00 E0 19 75 03 8E |E... "...u..|
000011E0: 00 FD 19 84 03 8F 20 2A 2A 20 53 45 54 20 55 50 |...... ** SET UP|
000011F0: 20 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 48 1A | VARIABLES **.H.|
00001200: 85 03 55 58 24 B2 22 48 22 3A 86 55 51 25 28 31 |..UX$."H":.UQ%(1|
00001210: 30 30 30 29 3A 55 42 B2 33 32 37 36 38 3A 55 31 |000):UB.32768:U1|
00001220: B2 31 39 36 3A 55 32 B2 31 39 37 3A 55 33 B2 31 |.196:U2.197:U3.1|
00001230: 39 38 3A 55 34 B2 32 31 36 3A 55 43 B2 31 36 37 |98:U4.216:UC.167|
00001240: 3A 55 55 B2 31 30 32 34 00 86 1A 86 03 55 54 B2 |:UU.1024.....UT.|
00001250: 35 39 34 36 38 3A 55 55 25 B2 31 32 3A 55 4C 25 |59468:UU%.12:UL%|
00001260: B2 31 34 3A 55 50 25 B2 31 31 34 36 3A 55 4D B2 |.14:UP%.1146:UM.|
00001270: 33 32 37 36 38 3A 55 4F B2 31 35 38 3A 97 20 35 |32768:UO.158:. 5|
00001280: 30 30 30 33 2C 30 00 C9 1A 87 03 8B C2 28 35 30 |0003,0.......(50|
00001290: 30 30 33 29 B2 30 A7 55 42 B2 31 30 32 34 3A 55 |003).0.UB.1024:U|
000012A0: 31 B2 32 30 39 3A 55 32 B2 32 31 30 3A 55 33 B2 |1.209:U2.210:U3.|
000012B0: 32 31 31 3A 55 34 B2 32 31 34 3A 55 43 B2 32 30 |211:U4.214:UC.20|
000012C0: 34 3A 55 55 B2 32 30 34 38 00 08 1B 88 03 8B C2 |4:UU.2048.......|
000012D0: 28 35 30 30 30 33 29 B2 30 A7 55 54 B2 35 33 32 |(50003).0.UT.532|
000012E0: 37 32 3A 55 55 25 B2 32 31 3A 55 4C 25 B2 32 33 |72:UU%.21:UL%.23|
000012F0: 3A 55 50 25 B2 32 31 33 39 3A 55 4D B2 31 30 32 |:UP%.2139:UM.102|
00001300: 34 3A 55 4F B2 31 39 38 00 2C 1B 89 03 55 44 24 |4:UO.198.,...UD$|
00001310: B2 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
00001320: 11 11 11 11 11 11 11 11 11 11 11 22 00 5E 1B 8A |...........".^..|
00001330: 03 55 50 24 B2 22 20 20 20 20 20 20 20 20 20 20 |.UP$." |
00001340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001350: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 74 | ".t|
00001360: 1B 8B 03 55 54 24 B2 22 20 D3 C9 CD D5 CC C1 D4 |...UT$." .......|
00001370: C9 CF CE 22 00 7A 1B 8C 03 8E 00 94 1B 8E 03 8F |...".z..........|
00001380: 20 2A 2A 20 53 45 54 20 56 41 52 49 41 42 4C 45 | ** SET VARIABLE|
00001390: 53 20 2A 2A 00 9D 1B 93 03 8D 39 30 30 00 B8 1B |S **......900...|
000013A0: 98 03 8F 20 2A 2A 20 43 48 45 43 4B 20 46 4F 52 |... ** CHECK FOR|
000013B0: 20 38 30 33 32 20 2A 2A 00 D6 1B 9D 03 99 22 93 | 8032 **......".|
000013C0: 22 3A 99 22 A0 22 3A 8F 20 53 48 49 46 54 45 44 |":.".":. SHIFTED|
000013D0: 20 53 50 41 43 45 00 ED 1B A2 03 8B C2 28 55 42 | SPACE.......(UB|
000013E0: AA 34 30 29 B3 B1 39 36 A7 8D 37 30 30 00 06 1C |.40)..96..700...|
000013F0: A3 03 8F 20 2A 2A 20 4D 45 4D 4F 52 59 20 43 48 |... ** MEMORY CH|
00001400: 45 43 4B 20 2A 2A 00 1A 1C A4 03 8B 20 B8 28 30 |ECK **...... .(0|
00001410: 29 B1 32 30 30 30 A7 39 33 37 00 48 1C A5 03 99 |).2000.937.H....|
00001420: 22 93 11 11 05 54 48 49 53 20 4D 41 43 48 49 4E |"....THIS MACHIN|
00001430: 45 20 44 4F 45 53 20 4E 4F 54 20 48 41 56 45 20 |E DOES NOT HAVE |
00001440: 45 4E 4F 55 47 48 11 22 00 6C 1C A6 03 99 22 4D |ENOUGH.".l...."M|
00001450: 45 4D 4F 52 59 20 54 4F 20 52 55 4E 20 54 48 49 |EMORY TO RUN THI|
00001460: 53 20 50 52 4F 47 52 41 4D 20 21 22 00 77 1C A7 |S PROGRAM !".w..|
00001470: 03 9E 55 55 AA 37 31 00 7D 1C A8 03 80 00 97 1C |..UU.71.}.......|
00001480: A9 03 99 22 93 05 22 3A 8B C2 28 35 30 30 30 33 |..."..":..(50003|
00001490: 29 B2 30 A7 39 36 32 00 C6 1C AC 03 8F 20 2A 2A |).0.962...... **|
000014A0: 20 42 41 53 49 43 20 32 2E 30 20 20 4F 52 20 20 | BASIC 2.0 OR |
000014B0: 34 2E 30 20 20 4F 52 20 20 43 2D 36 34 20 53 45 |4.0 OR C-64 SE|
000014C0: 54 55 50 20 2A 2A 00 04 1D AD 03 97 31 30 37 35 |TUP **......1075|
000014D0: 2C 31 33 33 3A 97 31 30 37 36 2C 31 34 34 3A 97 |,133:.1076,144:.|
000014E0: 31 30 37 37 2C 32 33 34 3A 97 31 30 37 39 2C 34 |1077,234:.1079,4|
000014F0: 3A 97 31 30 38 30 2C 31 33 33 3A 97 31 30 38 31 |:.1080,133:.1081|
00001500: 2C 31 34 35 00 3A 1D AE 03 97 31 30 39 31 2C 31 |,145.:....1091,1|
00001510: 35 35 3A 97 31 30 39 38 2C 31 33 33 3A 97 31 30 |55:.1098,133:.10|
00001520: 39 39 2C 31 34 34 3A 97 31 31 30 30 2C 32 33 34 |99,144:.1100,234|
00001530: 3A 97 31 31 30 33 2C 31 33 33 00 5C 1D AF 03 97 |:.1103,133.\....|
00001540: 31 31 30 34 2C 31 34 35 3A 97 31 31 30 35 2C 32 |1104,145:.1105,2|
00001550: 33 34 3A 97 31 30 38 32 2C 32 33 34 00 73 1D B1 |34:.1082,234.s..|
00001560: 03 8B C2 28 35 30 30 30 33 29 B3 B1 31 36 30 A7 |...(50003)..160.|
00001570: 39 35 35 00 A2 1D B6 03 97 31 30 39 33 2C 38 38 |955......1093,88|
00001580: 3A 97 31 30 39 34 2C 32 32 38 3A 97 31 30 39 37 |:.1094,228:.1097|
00001590: 2C 38 35 3A 97 31 31 30 32 2C 32 32 38 3A 89 39 |,85:.1102,228:.9|
000015A0: 36 35 00 B7 1D BB 03 8B C2 28 35 30 30 30 33 29 |65.......(50003)|
000015B0: B3 B1 31 A7 39 39 30 00 E6 1D C0 03 97 31 30 39 |..1.990......109|
000015C0: 33 2C 34 39 3A 97 31 30 39 34 2C 32 33 30 3A 97 |3,49:.1094,230:.|
000015D0: 31 30 39 37 2C 34 36 3A 97 31 31 30 32 2C 32 33 |1097,46:.1102,23|
000015E0: 30 3A 89 39 36 35 00 20 1E C2 03 97 32 30 39 39 |0:.965. ....2099|
000015F0: 2C 31 34 31 3A 97 32 31 30 30 2C 32 30 3A 97 32 |,141:.2100,20:.2|
00001600: 31 30 31 2C 33 3A 97 32 31 30 33 2C 38 3A 97 32 |101,3:.2103,8:.2|
00001610: 31 30 34 2C 31 34 31 3A 97 32 31 30 35 2C 32 31 |104,141:.2105,21|
00001620: 00 5C 1E C3 03 97 32 31 30 36 2C 33 3A 97 32 31 |.\....2106,3:.21|
00001630: 31 35 2C 31 34 35 3A 97 32 31 31 37 2C 35 32 3A |15,145:.2117,52:|
00001640: 97 32 31 31 38 2C 32 33 34 3A 97 32 31 32 31 2C |.2118,234:.2121,|
00001650: 34 39 3A 97 32 31 32 32 2C 31 34 31 00 96 1E C4 |49:.2122,141....|
00001660: 03 97 32 31 32 33 2C 32 30 3A 97 32 31 32 34 2C |..2123,20:.2124,|
00001670: 33 3A 97 32 31 32 36 2C 32 33 34 3A 97 32 31 32 |3:.2126,234:.212|
00001680: 37 2C 31 34 31 3A 97 32 31 32 38 2C 32 31 3A 97 |7,141:.2128,21:.|
00001690: 32 31 32 39 2C 33 00 B4 1E C5 03 9E 55 55 AA 34 |2129,3......UU.4|
000016A0: 38 3A 8F 20 44 49 53 41 42 4C 45 20 53 54 4F 50 |8:. DISABLE STOP|
000016B0: 20 4B 45 59 00 C5 1E CA 03 8D 38 30 30 3A 8F 20 | KEY......800:. |
000016C0: 54 49 54 4C 45 00 D5 1E D4 03 89 33 30 30 3A 8F |TITLE......300:.|
000016D0: 20 4D 45 4E 55 00 06 1F DE 03 99 22 93 54 48 45 | MENU......".THE|
000016E0: 20 50 47 4D 20 57 49 4C 4C 20 4E 4F 54 20 57 4F | PGM WILL NOT WO|
000016F0: 52 4B 20 4F 4E 20 54 48 49 53 20 4D 41 43 48 49 |RK ON THIS MACHI|
00001700: 4E 45 21 22 3A 80 00 3B 1F E8 03 8B 55 5A B2 31 |NE!":..;....UZ.1|
00001710: A7 9E 55 50 25 3A 9E 55 50 25 3A 55 5A B2 30 3A |..UP%:.UP%:UZ.0:|
00001720: 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 53 54 41 |. ** PROGRAM STA|
00001730: 52 54 53 20 48 45 52 45 20 2A 2A 00 67 1F E9 03 |RTS HERE **.g...|
00001740: 99 22 93 05 22 3B 3A 8C 3A 8B C2 28 35 30 30 30 |."..";:.:..(5000|
00001750: 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A 97 35 |3).0..53281,6:.5|
00001760: 33 32 38 30 2C 31 34 00 7F 1F FC 03 99 22 93 11 |3280,14......"..|
00001770: 11 22 3A 99 A3 31 33 29 22 12 A9 20 20 20 22 00 |.":..13)".. ".|
00001780: 9B 1F FE 03 99 A3 31 33 29 22 12 20 92 20 20 20 |......13)". . |
00001790: 12 49 4D 55 4C 41 54 49 4F 4E 22 00 AC 1F 00 04 |.IMULATION".....|
000017A0: 99 A3 31 33 29 22 DF 12 20 20 DF 22 00 CB 1F 06 |..13)".. ."....|
000017B0: 04 99 A3 31 33 29 22 20 20 20 12 20 22 3A 99 A3 |...13)" . ":..|
000017C0: 31 33 29 22 12 20 20 20 92 A9 22 00 F3 1F 08 04 |13)". ..".....|
000017D0: 99 22 11 11 20 20 20 20 20 20 20 48 4F 57 20 54 |.".. HOW T|
000017E0: 48 45 20 43 4F 4D 50 55 54 45 52 20 46 4F 4C 4C |HE COMPUTER FOLL|
000017F0: 4F 57 53 00 39 20 10 04 99 22 11 20 20 20 20 20 |OWS.9 ...". |
00001800: 20 20 41 20 53 49 4D 50 4C 45 20 50 52 4F 47 52 | A SIMPLE PROGR|
00001810: 41 4D 2E 22 3A 99 22 11 11 20 20 20 20 20 20 20 |AM.":.".. |
00001820: 54 48 45 20 50 52 4F 47 52 41 4D 20 54 48 41 54 |THE PROGRAM THAT|
00001830: 20 59 4F 55 20 57 49 4C 4C 00 81 20 1A 04 99 22 | YOU WILL.. ..."|
00001840: 11 20 20 20 20 20 20 20 53 45 45 20 57 49 4C 4C |. SEE WILL|
00001850: 20 41 44 44 20 54 57 4F 20 4E 55 4D 42 45 52 53 | ADD TWO NUMBERS|
00001860: 22 3A 99 22 11 20 20 20 20 20 20 20 41 4E 44 20 |":.". AND |
00001870: 50 52 49 4E 54 20 54 48 45 20 52 45 53 55 4C 54 |PRINT THE RESULT|
00001880: 2E 00 8B 20 24 04 8D 20 38 33 35 00 C6 20 2E 04 |... $.. 835.. ..|
00001890: 99 22 93 11 22 3A 44 24 B2 22 13 11 11 11 11 11 |."..":D$."......|
000018A0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000018B0: 11 11 11 11 11 22 3A 45 24 B2 22 20 12 B7 B7 B7 |.....":E$." ....|
000018C0: B7 B7 B7 92 3E 22 00 08 21 38 04 46 24 B2 22 20 |....>"..!8.F$." |
000018D0: 20 20 20 20 20 20 20 22 3A 99 22 20 20 20 20 20 | ":." |
000018E0: 20 20 20 20 20 20 20 20 D5 C0 C0 C0 C0 C0 C9 22 | ......."|
000018F0: 3A 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |:." |
00001900: DD 53 54 41 52 54 DD 22 00 3E 21 42 04 99 22 20 |.START.".>!B.." |
00001910: 20 20 20 20 20 20 20 20 20 20 20 20 CA C0 C0 B2 | ....|
00001920: C0 C0 CB 22 3A 99 22 20 20 20 20 20 20 20 20 20 |...":." |
00001930: 20 20 20 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 00 77 | ............w|
00001940: 21 4C 04 99 22 20 20 20 20 20 20 20 20 20 20 20 |!L.." |
00001950: CE 20 45 4E 54 45 52 20 54 57 4F CE 22 3A 99 22 |. ENTER TWO.":."|
00001960: 20 20 20 20 20 20 20 20 20 20 CE 20 4E 55 4D 42 | . NUMB|
00001970: 45 52 53 20 20 CE 22 00 94 21 56 04 99 22 20 20 |ERS ."..!V.." |
00001980: 20 20 20 20 20 20 20 20 C0 C0 C0 C0 C0 C0 B2 C0 | ........|
00001990: C0 C0 C0 22 00 CE 21 60 04 99 22 20 20 20 20 20 |..."..!`.." |
000019A0: 20 20 20 20 20 B0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 | ...........|
000019B0: C0 AE 22 3A 99 22 20 20 20 20 20 20 20 20 20 20 |..":." |
000019C0: DD 20 20 41 44 44 20 41 4E 44 20 20 DD 22 00 08 |. ADD AND ."..|
000019D0: 22 6A 04 99 22 20 20 20 20 20 20 20 20 20 20 DD |"j.." .|
000019E0: 20 53 54 4F 52 45 20 54 48 45 20 DD 22 3A 99 22 | STORE THE .":."|
000019F0: 20 20 20 20 20 20 20 20 20 20 DD 20 20 52 45 53 | . RES|
00001A00: 55 4C 54 20 20 20 DD 22 00 27 22 74 04 99 22 20 |ULT .".'"t.." |
00001A10: 20 20 20 20 20 20 20 20 20 AD C0 C0 C0 C0 C0 B2 | .......|
00001A20: C0 C0 C0 C0 C0 BD 22 00 5F 22 7E 04 99 22 20 20 |......"._"~.." |
00001A30: 20 20 20 20 20 20 20 20 20 C0 C0 C0 C0 C0 B1 C0 | .......|
00001A40: C0 C0 C0 C0 22 3A 99 22 20 20 20 20 20 20 20 20 |....":." |
00001A50: 20 20 CE 20 44 49 53 50 4C 41 59 20 20 CE 22 00 | . DISPLAY .".|
00001A60: 94 22 88 04 99 22 20 20 20 20 20 20 20 20 20 CE |."..." .|
00001A70: 20 20 41 4E 53 57 45 52 20 20 CE 22 3A 99 22 20 | ANSWER .":." |
00001A80: 20 20 20 20 20 20 20 20 C0 C0 C0 C0 C0 C0 C0 B2 | ........|
00001A90: C0 C0 C0 22 00 B0 22 92 04 99 22 20 20 20 20 20 |...".."..." |
00001AA0: 20 20 20 20 20 20 20 20 D5 C0 C0 B1 C0 C0 C9 22 | ......."|
00001AB0: 00 E4 22 97 04 99 22 20 20 20 20 20 20 20 20 20 |.."..." |
00001AC0: 20 20 20 20 DD 20 53 54 4F 50 DD 22 3A 99 22 20 | . STOP.":." |
00001AD0: 20 20 20 20 20 20 20 20 20 20 20 20 CA C0 C0 C0 | ....|
00001AE0: C0 C0 CB 22 00 ED 22 A6 04 8D 38 33 35 00 FD 22 |...".."...835.."|
00001AF0: B0 04 99 C8 28 44 24 2C 34 29 AA 45 24 00 06 23 |....(D$,4).E$..#|
00001B00: BA 04 8D 38 33 35 00 16 23 C4 04 99 C8 28 44 24 |...835..#....(D$|
00001B10: 2C 34 29 AA 46 24 00 49 23 C6 04 99 C8 28 44 24 |,4).F$.I#....(D$|
00001B20: 2C 37 29 AA 45 24 3B A3 32 35 29 22 31 30 20 49 |,7).E$;.25)"10 I|
00001B30: 4E 50 55 54 20 41 22 3A 99 A3 32 35 29 22 32 30 |NPUT A":..25)"20|
00001B40: 20 49 4E 50 55 54 20 42 22 00 52 23 CE 04 8D 38 | INPUT B".R#...8|
00001B50: 33 35 00 82 23 D8 04 99 C8 28 44 24 2C 37 29 AA |35..#....(D$,7).|
00001B60: 46 24 3A 99 C8 28 44 24 2C 31 32 29 AA 45 24 3B |F$:..(D$,12).E$;|
00001B70: A3 32 35 29 22 33 30 20 4C 45 54 20 43 3D 41 2B |.25)"30 LET C=A+|
00001B80: 42 22 00 8B 23 E2 04 8D 38 33 35 00 BA 23 EC 04 |B"..#...835..#..|
00001B90: 99 C8 28 44 24 2C 31 32 29 AA 46 24 3A 99 C8 28 |..(D$,12).F$:..(|
00001BA0: 44 24 2C 31 36 29 AA 45 24 3B A3 32 35 29 22 34 |D$,16).E$;.25)"4|
00001BB0: 30 20 50 52 49 4E 54 20 43 22 00 C3 23 F6 04 8D |0 PRINT C"..#...|
00001BC0: 38 33 35 00 EE 23 00 05 99 C8 28 44 24 2C 31 36 |835..#....(D$,16|
00001BD0: 29 AA 46 24 3A 99 C8 28 44 24 2C 32 30 29 AA 45 |).F$:..(D$,20).E|
00001BE0: 24 3B A3 32 35 29 22 35 30 20 45 4E 44 22 00 F8 |$;.25)"50 END"..|
00001BF0: 23 0A 05 8D 20 38 33 35 00 20 24 0F 05 99 22 93 |#... 835. $...".|
00001C00: 22 3B 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 |";:..(50003).0..|
00001C10: 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 36 |53281,6:.53280,6|
00001C20: 00 4F 24 14 05 81 49 B2 31 A4 34 3A 87 4D 43 28 |.O$...I.1.4:.MC(|
00001C30: 49 29 2C 50 31 28 49 29 3A 4D 43 28 49 29 B2 4D |I),P1(I):MC(I).M|
00001C40: 43 28 49 29 AB 33 32 37 36 38 AA 55 42 3A 82 00 |C(I).32768.UB:..|
00001C50: 90 24 1E 05 83 33 32 39 38 33 2C 31 31 34 2C 33 |.$...32983,114,3|
00001C60: 33 30 32 33 2C 39 33 2C 33 33 30 36 33 2C 39 33 |3023,93,33063,93|
00001C70: 2C 33 33 31 30 33 2C 31 31 33 3A 81 49 B2 31 A4 |,33103,113:.I.1.|
00001C80: 36 3A 49 43 28 49 29 B2 33 36 35 AA 55 42 AA 49 |6:IC(I).365.UB.I|
00001C90: 00 CD 24 28 05 43 4F 28 49 29 B2 33 37 38 AA 55 |..$(.CO(I).378.U|
00001CA0: 42 AA 49 3A 87 50 32 28 49 29 3A 50 33 28 49 29 |B.I:.P2(I):P3(I)|
00001CB0: B2 50 32 28 49 29 3A 82 3A 83 31 30 37 2C 36 34 |.P2(I):.:.107,64|
00001CC0: 2C 36 34 2C 36 34 2C 36 34 2C 31 31 35 00 07 25 |,64,64,64,115..%|
00001CD0: 32 05 81 49 B2 31 A4 35 3A 43 41 28 49 29 B2 34 |2..I.1.5:CA(I).4|
00001CE0: 31 32 AA 55 42 AA 49 AC 34 30 3A 43 50 28 49 29 |12.UB.I.40:CP(I)|
00001CF0: B2 43 41 28 49 29 AA 36 3A 87 50 34 28 49 29 2C |.CA(I).6:.P4(I),|
00001D00: 50 35 28 49 29 3A 82 00 4B 25 3C 05 83 31 31 34 |P5(I):..K%<..114|
00001D10: 2C 31 31 34 2C 39 33 2C 39 33 2C 39 33 2C 39 33 |,114,93,93,93,93|
00001D20: 2C 39 33 2C 39 33 2C 31 31 33 2C 31 31 33 3A 99 |,93,93,113,113:.|
00001D30: 22 93 22 3A 99 22 20 20 20 20 20 20 20 20 20 20 |".":." |
00001D40: 20 41 20 20 20 42 20 20 20 43 22 00 89 25 46 05 | A B C"..%F.|
00001D50: 99 22 20 20 20 20 20 20 20 20 20 B0 C0 C0 C0 B2 |." .....|
00001D60: C0 C0 C0 B2 C0 C0 C0 AE 22 3A 99 22 20 20 20 20 |........":." |
00001D70: 20 20 20 20 20 DD 20 20 20 DD 20 20 20 DD 20 20 | . . . |
00001D80: 20 DD 20 20 4D 41 49 4E 22 00 CC 25 50 05 99 22 | . MAIN"..%P.."|
00001D90: 20 20 20 20 20 20 20 20 20 DD 20 20 20 DD 20 20 | . . |
00001DA0: 20 DD 20 20 20 DD 20 4D 45 4D 4F 52 59 22 3A 99 | . . MEMORY":.|
00001DB0: 22 20 20 20 20 20 20 20 20 20 AD C0 C0 C0 B1 C0 |" ......|
00001DC0: C0 C0 B1 C0 C0 C0 BD 22 3A 99 3A 99 00 18 26 5A |.......":.:...&Z|
00001DD0: 05 99 22 B0 C0 C0 C0 C0 C0 AE 20 20 20 20 B0 C0 |.."....... ..|
00001DE0: C0 C0 C0 C0 C0 C0 AE 20 20 20 20 B0 C0 C0 C0 C0 |....... .....|
00001DF0: C0 C0 AE 22 3A 99 22 DD 20 20 20 20 20 DD 20 20 |...":.". . |
00001E00: 20 20 DD 43 4F 4E 54 52 4F 4C DD 20 20 20 20 DD | .CONTROL. .|
00001E10: 20 20 20 20 20 20 DD 22 00 64 26 64 05 99 22 DD | .".d&d..".|
00001E20: 20 20 20 20 20 DD 20 20 20 20 DD 20 20 20 20 20 | . . |
00001E30: 20 20 DD 20 20 20 20 DD 20 20 20 20 20 20 DD 22 | . . ."|
00001E40: 3A 99 22 AD C0 C0 C0 C0 C0 BD 20 20 20 20 AD C0 |:."....... ..|
00001E50: C0 C0 C0 C0 C0 C0 BD 20 20 20 20 AD C0 C0 C0 C0 |....... .....|
00001E60: C0 C0 BD 22 00 8F 26 6E 05 99 22 20 49 4E 50 55 |..."..&n.." INPU|
00001E70: 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |T |
00001E80: 20 20 20 20 4F 55 54 50 55 54 22 3A 99 3A 99 00 | OUTPUT":.:..|
00001E90: B8 26 78 05 99 22 20 20 20 20 20 B0 C0 C0 C0 C0 |.&x.." .....|
00001EA0: C0 C0 C0 AE 20 20 B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.... ..........|
00001EB0: C0 C0 C0 C0 C0 C0 AE 22 00 E1 26 82 05 99 22 20 |......."..&..." |
00001EC0: 20 20 20 20 DD 20 20 20 20 20 20 20 DD 20 20 DD | . . .|
00001ED0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DD | .|
00001EE0: 22 00 0A 27 8C 05 99 22 20 20 20 20 20 DD 20 20 |"..'..." . |
00001EF0: 20 20 20 20 20 DD 20 20 DD 20 20 20 20 20 20 20 | . . |
00001F00: 20 20 20 20 20 20 20 20 DD 22 00 33 27 96 05 99 | .".3'...|
00001F10: 22 20 20 20 20 20 AD C0 C0 C0 C0 C0 C0 C0 BD 20 |" ......... |
00001F20: 20 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ...............|
00001F30: C0 BD 22 00 5B 27 A0 05 99 22 20 20 20 20 41 43 |..".['..." AC|
00001F40: 43 55 4D 55 4C 41 54 4F 52 20 20 20 50 52 4F 47 |CUMULATOR PROG|
00001F50: 52 41 4D 20 4D 45 4D 4F 52 59 22 00 64 27 BE 05 |RAM MEMORY".d'..|
00001F60: 8D 38 33 35 00 7E 27 C8 05 8D 31 38 35 30 3A 81 |.835.~'...1850:.|
00001F70: 49 B2 31 A4 34 3A 87 50 24 28 49 29 3A 82 00 B9 |I.1.4:.P$(I):...|
00001F80: 27 D2 05 83 22 31 30 20 49 4E 50 55 54 20 41 22 |'..."10 INPUT A"|
00001F90: 2C 22 32 30 20 49 4E 50 55 54 20 42 22 2C 22 33 |,"20 INPUT B","3|
00001FA0: 30 20 4C 45 54 20 43 3D 41 2B 42 22 2C 22 34 30 |0 LET C=A+B","40|
00001FB0: 20 50 52 49 4E 54 20 43 22 00 C2 27 DC 05 8D 38 | PRINT C"..'...8|
00001FC0: 33 35 00 F9 27 E6 05 49 B2 31 3A 8D 31 38 31 30 |35..'..I.1:.1810|
00001FD0: 3A 81 49 B2 35 A4 31 A9 AB 31 3A 97 43 50 28 49 |:.I.5.1..1:.CP(I|
00001FE0: 29 2C 50 35 28 49 29 AA 31 32 38 3A 82 3A 81 49 |),P5(I).128:.:.I|
00001FF0: B2 31 A4 31 30 30 30 3A 82 00 24 28 EB 05 99 C8 |.1.1000:..$(....|
00002000: 28 55 44 24 2C 32 34 29 3B A3 39 29 22 50 4C 45 |(UD$,24);.9)"PLE|
00002010: 41 53 45 20 45 4E 54 45 52 20 41 20 4E 55 4D 42 |ASE ENTER A NUMB|
00002020: 45 52 2E 22 00 57 28 F0 05 81 49 B2 36 A4 31 A9 |ER.".W(...I.6.1.|
00002030: AB 31 3A 97 49 43 28 49 29 2C 50 32 28 49 29 AA |.1:.IC(I),P2(I).|
00002040: 31 32 38 3A 82 3A 99 22 13 11 11 11 11 11 11 11 |128:.:."........|
00002050: 11 11 1D 3F 20 22 3B 00 83 28 FA 05 55 53 24 B2 |...? ";..(..US$.|
00002060: 22 30 31 32 33 34 35 36 37 38 39 22 3A 55 4C B2 |"0123456789":UL.|
00002070: 31 3A 8D 33 35 3A 41 B2 C5 28 55 52 24 29 3A 8D |1:.35:A..(UR$):.|
00002080: 38 34 35 00 C5 28 04 06 99 22 13 11 11 11 11 11 |845..(..."......|
00002090: 11 11 11 11 1D 1D 22 3B 41 3A 8D 31 38 35 30 3A |......";A:.1850:|
000020A0: 81 49 B2 31 A4 31 30 30 30 3A 82 3A 81 49 B2 31 |.I.1.1000:.:.I.1|
000020B0: A4 36 3A 97 49 43 28 49 29 2C 50 32 28 49 29 AA |.6:.IC(I),P2(I).|
000020C0: 31 32 38 3A 82 00 06 29 0E 06 81 49 B2 31 A4 32 |128:...)...I.1.2|
000020D0: 30 30 30 3A 82 3A 81 49 B2 34 A4 31 A9 AB 31 3A |000:.:.I.4.1..1:|
000020E0: 97 4D 43 28 49 29 2C 50 31 28 49 29 AA 31 32 38 |.MC(I),P1(I).128|
000020F0: 3A 82 3A 99 22 13 11 11 11 1D 1D 1D 1D 1D 1D 1D |:.:."...........|
00002100: 1D 1D 1D 22 3B 41 00 1C 29 18 06 81 49 B2 31 A4 |...";A..)...I.1.|
00002110: 31 30 30 30 3A 82 3A 8D 31 38 35 30 00 26 29 22 |1000:.:.1850.&)"|
00002120: 06 8D 20 38 33 35 00 68 29 2C 06 99 22 13 11 11 |.. 835.h),.."...|
00002130: 11 11 11 11 11 11 11 1D 20 20 20 20 22 3A 8D 31 |........ ":.1|
00002140: 38 35 30 3A 49 B2 32 3A 8D 31 38 31 30 3A 81 49 |850:I.2:.1810:.I|
00002150: B2 35 A4 31 A9 AB 31 3A 97 43 50 28 49 29 2C 50 |.5.1..1:.CP(I),P|
00002160: 35 28 49 29 AA 31 32 38 00 97 29 36 06 82 3A 81 |5(I).128..)6..:.|
00002170: 49 B2 31 A4 31 30 30 30 3A 82 3A 81 49 B2 36 A4 |I.1.1000:.:.I.6.|
00002180: 31 A9 AB 31 3A 97 49 43 28 49 29 2C 50 32 28 49 |1..1:.IC(I),P2(I|
00002190: 29 AA 31 32 38 3A 82 00 C2 29 3B 06 99 C8 28 55 |).128:...);...(U|
000021A0: 44 24 2C 32 34 29 3B A3 39 29 22 50 4C 45 41 53 |D$,24);.9)"PLEAS|
000021B0: 45 20 45 4E 54 45 52 20 41 20 4E 55 4D 42 45 52 |E ENTER A NUMBER|
000021C0: 2E 22 00 D8 29 40 06 99 22 13 11 11 11 11 11 11 |."..)@..".......|
000021D0: 11 11 11 1D 3F 20 22 3B 00 EE 29 4A 06 8D 33 35 |....? ";..)J..35|
000021E0: 3A 42 B2 C5 28 55 52 24 29 3A 8D 38 34 35 00 1E |:B..(UR$):.845..|
000021F0: 2A 54 06 8D 31 38 35 30 3A 81 49 B2 31 A4 31 30 |*T..1850:.I.1.10|
00002200: 30 30 3A 82 3A 81 49 B2 31 A4 36 3A 97 49 43 28 |00:.:.I.1.6:.IC(|
00002210: 49 29 2C 50 32 28 49 29 AA 31 32 38 3A 82 00 63 |I),P2(I).128:..c|
00002220: 2A 5E 06 81 49 B2 31 A4 32 30 30 30 3A 82 3A 81 |*^..I.1.2000:.:.|
00002230: 49 B2 34 A4 31 A9 AB 31 3A 97 4D 43 28 49 29 2C |I.4.1..1:.MC(I),|
00002240: 50 31 28 49 29 AA 31 32 38 3A 82 3A 99 22 13 11 |P1(I).128:.:."..|
00002250: 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002260: 22 3B 42 00 79 2A 68 06 81 49 B2 31 A4 31 30 30 |";B.y*h..I.1.100|
00002270: 30 3A 82 3A 8D 31 38 35 30 00 83 2A 72 06 8D 20 |0:.:.1850..*r.. |
00002280: 38 33 35 00 C4 2A 7C 06 99 22 13 11 11 11 11 11 |835..*|.."......|
00002290: 11 11 11 11 1D 20 20 20 20 22 3A 8D 31 38 35 30 |..... ":.1850|
000022A0: 3A 49 B2 33 3A 8D 31 38 31 30 3A 81 49 B2 31 A4 |:I.3:.1810:.I.1.|
000022B0: 35 3A 97 43 50 28 49 29 2C 50 35 28 49 29 AA 31 |5:.CP(I),P5(I).1|
000022C0: 32 38 3A 82 00 00 2B 86 06 81 49 B2 31 A4 31 30 |28:...+...I.1.10|
000022D0: 30 30 3A 82 3A 8D 31 38 35 30 3A 81 49 B2 31 A4 |00:.:.1850:.I.1.|
000022E0: 34 3A 97 4D 43 28 49 29 2C 50 31 28 49 29 AA 31 |4:.MC(I),P1(I).1|
000022F0: 32 38 3A 82 3A 81 49 B2 31 A4 31 30 30 30 3A 82 |28:.:.I.1.1000:.|
00002300: 00 47 2B 90 06 81 49 B2 31 A4 35 3A 97 43 41 28 |.G+...I.1.5:.CA(|
00002310: 49 29 2C 50 34 28 49 29 AA 31 32 38 3A 82 3A 81 |I),P4(I).128:.:.|
00002320: 49 B2 31 A4 35 30 30 3A 82 3A 99 22 13 11 11 11 |I.1.500:.:."....|
00002330: 11 11 11 11 11 11 11 11 11 11 11 11 11 1D 1D 1D |................|
00002340: 1D 1D 1D 1D 22 3B 41 00 83 2B 9A 06 81 49 B2 31 |....";A..+...I.1|
00002350: A4 32 30 30 30 3A 82 3A 8D 31 38 35 30 3A 81 49 |.2000:.:.1850:.I|
00002360: B2 31 A4 31 30 30 30 3A 82 3A 81 49 B2 31 A4 34 |.1.1000:.:.I.1.4|
00002370: 3A 97 4D 43 28 49 29 2C 50 31 28 49 29 AA 31 32 |:.MC(I),P1(I).12|
00002380: 38 3A 82 00 B8 2B A4 06 81 49 B2 31 A4 31 30 30 |8:...+...I.1.100|
00002390: 30 3A 82 3A 81 49 B2 31 A4 35 3A 97 43 41 28 49 |0:.:.I.1.5:.CA(I|
000023A0: 29 2C 50 34 28 49 29 AA 31 32 38 3A 82 3A 81 49 |),P4(I).128:.:.I|
000023B0: B2 31 A4 35 30 30 3A 82 00 F9 2B AE 06 99 22 13 |.1.500:...+...".|
000023C0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000023D0: 1D 1D 1D 1D 1D 1D 1D 22 3B 41 AA 42 3A 81 49 B2 |.......";A.B:.I.|
000023E0: 31 A4 35 30 30 3A 82 3A 81 49 B2 31 A4 32 30 30 |1.500:.:.I.1.200|
000023F0: 30 3A 82 3A 8D 31 38 35 30 00 26 2C B8 06 81 49 |0:.:.1850.&,...I|
00002400: B2 35 A4 31 A9 AB 31 3A 97 43 41 28 49 29 2C 50 |.5.1..1:.CA(I),P|
00002410: 34 28 49 29 AA 31 32 38 3A 82 3A 81 49 B2 31 A4 |4(I).128:.:.I.1.|
00002420: 31 30 30 30 3A 82 00 52 2C C2 06 81 49 B2 34 A4 |1000:..R,...I.4.|
00002430: 31 A9 AB 31 3A 97 4D 43 28 49 29 2C 50 31 28 49 |1..1:.MC(I),P1(I|
00002440: 29 AA 31 32 38 3A 82 3A 81 49 B2 31 A4 35 30 30 |).128:.:.I.1.500|
00002450: 3A 82 00 7A 2C CC 06 99 22 13 11 11 11 1D 1D 1D |:..z,...".......|
00002460: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 |..............."|
00002470: 3B 41 AA 42 3A 8D 31 38 35 30 00 84 2C D6 06 8D |;A.B:.1850..,...|
00002480: 20 38 33 35 00 BE 2C E0 06 49 B2 34 3A 8D 31 38 | 835..,..I.4:.18|
00002490: 31 30 3A 81 49 B2 31 A4 35 3A 97 43 50 28 49 29 |10:.I.1.5:.CP(I)|
000024A0: 2C 50 35 28 49 29 AA 31 32 38 3A 82 3A 81 49 B2 |,P5(I).128:.:.I.|
000024B0: 31 A4 31 30 30 30 3A 82 3A 8D 31 38 35 30 00 02 |1.1000:.:.1850..|
000024C0: 2D EA 06 81 49 B2 31 A4 34 3A 97 4D 43 28 49 29 |-...I.1.4:.MC(I)|
000024D0: 2C 50 31 28 49 29 AA 31 32 38 3A 82 3A 81 49 B2 |,P1(I).128:.:.I.|
000024E0: 31 A4 31 30 30 30 3A 82 3A 81 49 B2 31 A4 36 3A |1.1000:.:.I.1.6:|
000024F0: 97 43 4F 28 49 29 2C 50 33 28 49 29 AA 31 32 38 |.CO(I),P3(I).128|
00002500: 3A 82 00 43 2D F4 06 81 49 B2 31 A4 35 30 30 3A |:..C-...I.1.500:|
00002510: 82 3A 99 22 13 11 11 11 11 11 11 11 11 11 1D 1D |.:."............|
00002520: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002530: 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 41 AA 42 3A 8D 31 |........";A.B:.1|
00002540: 38 35 30 00 7A 2D FE 06 99 22 13 11 11 11 11 11 |850.z-..."......|
00002550: 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002560: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 22 |..............."|
00002570: 3B 41 AA 42 3A 8D 20 38 33 35 00 84 2D 08 07 89 |;A.B:. 835..-...|
00002580: 31 38 37 30 00 BD 2D 12 07 99 22 13 11 11 11 11 |1870..-...".....|
00002590: 11 11 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D |................|
000025A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 AA 22 |............."."|
000025B0: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 ED 2D | "..-|
000025C0: 1C 07 99 22 13 11 11 11 11 11 11 11 11 11 11 11 |..."............|
000025D0: 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000025E0: 1D 1D 1D 1D 1D 1D 22 AA 50 24 28 49 29 00 F7 2D |......".P$(I)..-|
000025F0: 26 07 8D 20 38 33 35 00 FD 2D 30 07 8E 00 3A 2E |&.. 835..-0...:.|
00002600: 3A 07 81 49 B2 31 A4 34 3A 97 4D 43 28 49 29 2C |:..I.1.4:.MC(I),|
00002610: 50 31 28 49 29 3A 82 3A 81 49 B2 31 A4 36 3A 97 |P1(I):.:.I.1.6:.|
00002620: 49 43 28 49 29 2C 50 32 28 49 29 3A 97 43 4F 28 |IC(I),P2(I):.CO(|
00002630: 49 29 2C 50 33 28 49 29 3A 82 00 63 2E 44 07 81 |I),P3(I):..c.D..|
00002640: 49 B2 31 A4 35 3A 97 43 41 28 49 29 2C 50 34 28 |I.1.5:.CA(I),P4(|
00002650: 49 29 3A 97 43 50 28 49 29 2C 50 35 28 49 29 3A |I):.CP(I),P5(I):|
00002660: 82 3A 8E 00 82 2E 4E 07 99 22 93 22 3A 81 49 B2 |.:....N..".":.I.|
00002670: 31 A4 34 3A 87 4D 43 28 49 29 2C 50 31 28 49 29 |1.4:.MC(I),P1(I)|
00002680: 3A 82 00 C2 2E 58 07 83 33 32 39 38 33 2C 31 31 |:....X..32983,11|
00002690: 34 2C 33 33 30 32 33 2C 39 33 2C 33 33 30 36 33 |4,33023,93,33063|
000026A0: 2C 39 33 2C 33 33 31 30 33 2C 31 31 33 3A 81 49 |,93,33103,113:.I|
000026B0: B2 31 A4 36 3A 49 43 28 49 29 B2 33 33 31 33 33 |.1.6:IC(I).33133|
000026C0: AA 49 00 FE 2E 62 07 43 4F 28 49 29 B2 33 33 31 |.I...b.CO(I).331|
000026D0: 34 36 AA 49 3A 87 50 32 28 49 29 3A 50 33 28 49 |46.I:.P2(I):P3(I|
000026E0: 29 B2 50 32 28 49 29 3A 82 3A 83 31 30 37 2C 36 |).P2(I):.:.107,6|
000026F0: 34 2C 36 34 2C 36 34 2C 36 34 2C 31 31 35 00 37 |4,64,64,64,115.7|
00002700: 2F 6C 07 81 49 B2 31 A4 35 3A 43 41 28 49 29 B2 |/l..I.1.5:CA(I).|
00002710: 33 33 31 38 30 AA 49 AC 34 30 3A 43 50 28 49 29 |33180.I.40:CP(I)|
00002720: B2 43 41 28 49 29 AA 36 3A 87 50 34 28 49 29 2C |.CA(I).6:.P4(I),|
00002730: 50 35 28 49 29 3A 82 00 7B 2F 76 07 83 31 31 34 |P5(I):..{/v..114|
00002740: 2C 31 31 34 2C 39 33 2C 39 33 2C 39 33 2C 39 33 |,114,93,93,93,93|
00002750: 2C 39 33 2C 39 33 2C 31 31 33 2C 31 31 33 3A 99 |,93,93,113,113:.|
00002760: 22 93 22 3A 99 22 20 20 20 20 20 20 20 20 20 20 |".":." |
00002770: 20 41 20 20 20 42 20 20 20 43 22 00 B9 2F 80 07 | A B C"../..|
00002780: 99 22 20 20 20 20 20 20 20 20 20 B0 C0 C0 C0 B2 |." .....|
00002790: C0 C0 C0 B2 C0 C0 C0 AE 22 3A 99 22 20 20 20 20 |........":." |
000027A0: 20 20 20 20 20 DD 20 20 20 DD 20 20 20 DD 20 20 | . . . |
000027B0: 20 DD 20 20 4D 41 49 4E 22 00 FC 2F 8A 07 99 22 | . MAIN"../..."|
000027C0: 20 20 20 20 20 20 20 20 20 DD 20 20 20 DD 20 20 | . . |
000027D0: 20 DD 20 20 20 DD 20 4D 45 4D 4F 52 59 22 3A 99 | . . MEMORY":.|
000027E0: 22 20 20 20 20 20 20 20 20 20 AD C0 C0 C0 B1 C0 |" ......|
000027F0: C0 C0 B1 C0 C0 C0 BD 22 3A 99 3A 99 00 48 30 94 |.......":.:..H0.|
00002800: 07 99 22 B0 C0 C0 C0 C0 C0 AE 20 20 20 20 B0 C0 |.."....... ..|
00002810: C0 C0 C0 C0 C0 C0 AE 20 20 20 20 B0 C0 C0 C0 C0 |....... .....|
00002820: C0 C0 AE 22 3A 99 22 DD 20 20 20 20 20 DD 20 20 |...":.". . |
00002830: 20 20 DD 43 4F 4E 54 52 4F 4C DD 20 20 20 20 DD | .CONTROL. .|
00002840: 20 20 20 20 20 20 DD 22 00 94 30 9E 07 99 22 DD | ."..0...".|
00002850: 20 20 20 20 20 DD 20 20 20 20 DD 20 20 20 20 20 | . . |
00002860: 20 20 DD 20 20 20 20 DD 20 20 20 20 20 20 DD 22 | . . ."|
00002870: 3A 99 22 AD C0 C0 C0 C0 C0 BD 20 20 20 20 AD C0 |:."....... ..|
00002880: C0 C0 C0 C0 C0 C0 BD 20 20 20 20 AD C0 C0 C0 C0 |....... .....|
00002890: C0 C0 BD 22 00 BF 30 A8 07 99 22 20 49 4E 50 55 |..."..0..." INPU|
000028A0: 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |T |
000028B0: 20 20 20 20 4F 55 54 50 55 54 22 3A 99 3A 99 00 | OUTPUT":.:..|
000028C0: E8 30 B2 07 99 22 20 20 20 20 20 B0 C0 C0 C0 C0 |.0..." .....|
000028D0: C0 C0 C0 AE 20 20 B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.... ..........|
000028E0: C0 C0 C0 C0 C0 C0 AE 22 00 11 31 BC 07 99 22 20 |......."..1..." |
000028F0: 20 20 20 20 DD 20 20 20 20 20 20 20 DD 20 20 DD | . . .|
00002900: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DD | .|
00002910: 22 00 3A 31 C6 07 99 22 20 20 20 20 20 DD 20 20 |".:1..." . |
00002920: 20 20 20 20 20 DD 20 20 DD 20 20 20 20 20 20 20 | . . |
00002930: 20 20 20 20 20 20 20 20 DD 22 00 63 31 D0 07 99 | .".c1...|
00002940: 22 20 20 20 20 20 AD C0 C0 C0 C0 C0 C0 C0 BD 20 |" ......... |
00002950: 20 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ...............|
00002960: C0 BD 22 00 91 31 DA 07 99 22 20 20 20 20 41 43 |.."..1..." AC|
00002970: 43 55 4D 55 4C 41 54 4F 52 20 20 20 50 52 4F 47 |CUMULATOR PROG|
00002980: 52 41 4D 20 4D 45 4D 4F 52 59 22 3A 8D 32 32 39 |RAM MEMORY":.229|
00002990: 30 00 9B 31 E4 07 8D 20 38 33 35 00 AF 31 EE 07 |0..1... 835..1..|
000029A0: 81 49 B2 31 A4 34 3A 87 50 24 28 49 29 3A 82 00 |.I.1.4:.P$(I):..|
000029B0: F4 31 F8 07 83 22 31 30 20 49 4E 50 55 54 20 41 |.1..."10 INPUT A|
000029C0: 22 2C 22 32 30 20 49 4E 50 55 54 20 42 22 2C 22 |","20 INPUT B","|
000029D0: 33 30 20 4C 45 54 20 43 3D 41 2B 42 22 2C 22 34 |30 LET C=A+B","4|
000029E0: 30 20 50 52 49 4E 54 20 43 22 3A 49 B2 31 3A 8D |0 PRINT C":I.1:.|
000029F0: 32 32 37 30 00 30 32 02 08 81 49 B2 35 A4 31 A9 |2270.02...I.5.1.|
00002A00: AB 31 3A 97 43 50 28 49 29 2C 50 35 28 49 29 AA |.1:.CP(I),P5(I).|
00002A10: 31 32 38 3A 82 3A 81 49 B2 36 A4 31 A9 AB 31 3A |128:.:.I.6.1..1:|
00002A20: 97 49 43 28 49 29 2C 50 32 28 49 29 AA 31 32 38 |.IC(I),P2(I).128|
00002A30: 00 5B 32 07 08 99 C8 28 55 44 24 2C 32 34 29 3B |.[2....(UD$,24);|
00002A40: A3 39 29 22 50 4C 45 41 53 45 20 45 4E 54 45 52 |.9)"PLEASE ENTER|
00002A50: 20 41 20 4E 55 4D 42 45 52 2E 22 00 73 32 0C 08 | A NUMBER.".s2..|
00002A60: 82 3A 99 22 13 11 11 11 11 11 11 11 11 11 1D 3F |.:."...........?|
00002A70: 20 22 3B 00 89 32 16 08 8D 33 35 3A 41 B2 C5 28 | ";..2...35:A..(|
00002A80: 55 52 24 29 3A 8D 38 34 35 00 AD 32 20 08 8D 32 |UR$):.845..2 ..2|
00002A90: 32 39 30 3A 81 49 B2 31 A4 36 3A 97 49 43 28 49 |290:.I.1.6:.IC(I|
00002AA0: 29 2C 50 32 28 49 29 AA 31 32 38 3A 82 00 F5 32 |),P2(I).128:...2|
00002AB0: 2A 08 81 49 B2 34 A4 31 A9 AB 31 3A 97 4D 43 28 |*..I.4.1..1:.MC(|
00002AC0: 49 29 2C 50 31 28 49 29 AA 31 32 38 3A 82 3A 99 |I),P1(I).128:.:.|
00002AD0: 22 13 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 |".............."|
00002AE0: 3B 41 3A 99 22 13 11 11 11 11 11 11 11 11 11 1D |;A:."...........|
00002AF0: 20 20 20 20 22 00 30 33 34 08 8D 32 32 39 30 3A | ".034..2290:|
00002B00: 49 B2 32 3A 8D 32 32 37 30 3A 81 49 B2 35 A4 31 |I.2:.2270:.I.5.1|
00002B10: A9 AB 31 3A 97 43 50 28 49 29 2C 50 35 28 49 29 |..1:.CP(I),P5(I)|
00002B20: AA 31 32 38 3A 82 3A 81 49 B2 36 A4 31 A9 AB 31 |.128:.:.I.6.1..1|
00002B30: 00 5B 33 39 08 99 C8 28 55 44 24 2C 32 34 29 3B |.[39...(UD$,24);|
00002B40: A3 39 29 22 50 4C 45 41 53 45 20 45 4E 54 45 52 |.9)"PLEASE ENTER|
00002B50: 20 41 20 4E 55 4D 42 45 52 2E 22 00 84 33 3E 08 | A NUMBER."..3>.|
00002B60: 97 49 43 28 49 29 2C 50 32 28 49 29 AA 31 32 38 |.IC(I),P2(I).128|
00002B70: 3A 82 3A 99 22 13 11 11 11 11 11 11 11 11 11 1D |:.:."...........|
00002B80: 3F 20 22 3B 00 9A 33 48 08 8D 33 35 3A 42 B2 C5 |? ";..3H..35:B..|
00002B90: 28 55 52 24 29 3A 8D 38 34 35 00 BE 33 52 08 8D |(UR$):.845..3R..|
00002BA0: 32 32 39 30 3A 81 49 B2 31 A4 36 3A 97 49 43 28 |2290:.I.1.6:.IC(|
00002BB0: 49 29 2C 50 32 28 49 29 AA 31 32 38 3A 82 00 F7 |I),P2(I).128:...|
00002BC0: 33 5C 08 81 49 B2 34 A4 31 A9 AB 31 3A 97 4D 43 |3\..I.4.1..1:.MC|
00002BD0: 28 49 29 2C 50 31 28 49 29 AA 31 32 38 3A 82 3A |(I),P1(I).128:.:|
00002BE0: 99 22 13 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00002BF0: 1D 1D 1D 1D 22 3B 42 00 3E 34 66 08 99 22 13 11 |....";B.>4f.."..|
00002C00: 11 11 11 11 11 11 11 11 1D 20 20 20 20 22 3A 8D |......... ":.|
00002C10: 32 32 39 30 3A 49 B2 33 3A 8D 32 32 37 30 3A 81 |2290:I.3:.2270:.|
00002C20: 49 B2 31 A4 35 3A 97 43 50 28 49 29 2C 50 35 28 |I.1.5:.CP(I),P5(|
00002C30: 49 29 AA 31 32 38 3A 82 3A 8D 32 32 39 30 00 76 |I).128:.:.2290.v|
00002C40: 34 70 08 81 49 B2 31 A4 34 3A 97 4D 43 28 49 29 |4p..I.1.4:.MC(I)|
00002C50: 2C 50 31 28 49 29 AA 31 32 38 3A 82 3A 81 49 B2 |,P1(I).128:.:.I.|
00002C60: 31 A4 35 3A 97 43 41 28 49 29 2C 50 34 28 49 29 |1.5:.CA(I),P4(I)|
00002C70: AA 31 32 38 3A 82 00 B8 34 7A 08 99 22 13 11 11 |.128:...4z.."...|
00002C80: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 1D 1D |................|
00002C90: 1D 1D 1D 1D 1D 22 3B 41 3A 8D 32 32 39 30 3A 81 |.....";A:.2290:.|
00002CA0: 49 B2 31 A4 34 3A 97 4D 43 28 49 29 2C 50 31 28 |I.1.4:.MC(I),P1(|
00002CB0: 49 29 AA 31 32 38 3A 82 00 FC 34 84 08 81 49 B2 |I).128:...4...I.|
00002CC0: 31 A4 35 3A 97 43 41 28 49 29 2C 50 34 28 49 29 |1.5:.CA(I),P4(I)|
00002CD0: AA 31 32 38 3A 82 3A 99 22 13 11 11 11 11 11 11 |.128:.:.".......|
00002CE0: 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D |................|
00002CF0: 1D 22 3B 41 AA 42 3A 8D 32 32 39 30 00 3A 35 8E |.";A.B:.2290.:5.|
00002D00: 08 81 49 B2 35 A4 31 A9 AB 31 3A 97 43 41 28 49 |..I.5.1..1:.CA(I|
00002D10: 29 2C 50 34 28 49 29 AA 31 32 38 3A 82 3A 81 49 |),P4(I).128:.:.I|
00002D20: B2 34 A4 31 A9 AB 31 3A 97 4D 43 28 49 29 2C 50 |.4.1..1:.MC(I),P|
00002D30: 31 28 49 29 AA 31 32 38 3A 82 00 6C 35 98 08 99 |1(I).128:..l5...|
00002D40: 22 13 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00002D50: 1D 1D 1D 1D 1D 1D 1D 22 3B 41 AA 42 3A 8D 32 32 |.......";A.B:.22|
00002D60: 39 30 3A 49 B2 34 3A 8D 32 32 37 30 00 AA 35 A2 |90:I.4:.2270..5.|
00002D70: 08 81 49 B2 31 A4 35 3A 97 43 50 28 49 29 2C 50 |..I.1.5:.CP(I),P|
00002D80: 35 28 49 29 AA 31 32 38 3A 82 3A 8D 32 32 39 30 |5(I).128:.:.2290|
00002D90: 3A 81 49 B2 31 A4 34 3A 97 4D 43 28 49 29 2C 50 |:.I.1.4:.MC(I),P|
00002DA0: 31 28 49 29 AA 31 32 38 3A 82 00 C8 35 AC 08 81 |1(I).128:...5...|
00002DB0: 49 B2 31 A4 36 3A 97 43 4F 28 49 29 2C 50 33 28 |I.1.6:.CO(I),P3(|
00002DC0: 49 29 AA 31 32 38 3A 82 00 FE 35 B6 08 99 22 13 |I).128:...5...".|
00002DD0: 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D |................|
00002DE0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002DF0: 1D 1D 1D 22 3B 41 AA 42 3A 8D 32 32 39 30 00 3A |...";A.B:.2290.:|
00002E00: 36 C0 08 99 22 13 11 11 11 11 11 11 11 11 11 1D |6..."...........|
00002E10: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002E20: 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 22 3B 41 AA 42 3A |..........";A.B:|
00002E30: 81 49 B2 31 A4 35 30 30 3A 82 00 44 36 CA 08 8D |.I.1.500:..D6...|
00002E40: 20 38 33 35 00 6A 36 D4 08 99 22 93 11 11 11 1D | 835.j6...".....|
00002E50: 1D 12 45 4E 44 20 4F 46 20 53 49 4D 55 4C 41 54 |..END OF SIMULAT|
00002E60: 49 4F 4E 22 3A 89 20 33 30 30 00 A3 36 DE 08 99 |ION":. 300..6...|
00002E70: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
00002E80: 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002E90: 1D 1D 1D 22 AA 22 20 20 20 20 20 20 20 20 20 20 |..."." |
00002EA0: 20 20 22 00 D5 36 E8 08 99 22 13 11 11 11 11 11 | "..6..."......|
00002EB0: 11 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D |................|
00002EC0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 AA 50 24 |............".P$|
00002ED0: 28 49 29 3A 8E 00 12 37 F2 08 81 49 B2 31 A4 34 |(I):...7...I.1.4|
00002EE0: 3A 97 4D 43 28 49 29 2C 50 31 28 49 29 3A 82 3A |:.MC(I),P1(I):.:|
00002EF0: 81 49 B2 31 A4 36 3A 97 49 43 28 49 29 2C 50 32 |.I.1.6:.IC(I),P2|
00002F00: 28 49 29 3A 97 43 4F 28 49 29 2C 50 33 28 49 29 |(I):.CO(I),P3(I)|
00002F10: 3A 82 00 3B 37 FC 08 81 49 B2 31 A4 35 3A 97 43 |:..;7...I.1.5:.C|
00002F20: 41 28 49 29 2C 50 34 28 49 29 3A 97 43 50 28 49 |A(I),P4(I):.CP(I|
00002F30: 29 2C 50 35 28 49 29 3A 82 3A 8E 00 00 00 F6 |),P5(I):.:..... |
.......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 +++
...(..UO,0:UR$."":UI$.""...*..UL.0.UL.80
.".-..UC,0.6.2..UI$:.UI$."".50.`.7..UI$.
G(13).C(UR$)..1..UC,1:." .";:.85.S.<..UI
$.G(20).105...>.. C(UR$)..UL.50...A..120
:. CHECK FOR VALID CHARACTER...F.UR$.UR$
.UI$.F.K..UI$;.N.P..50...U.. +++ CHECK F
OR HELP REQUEST +++...Z..UR$.UX$.195:. E
XIT TO HELP ROUTINE.*._..UF.1..240.7.D.U
F.0:.:..P.F.. ++ CHECK DELETE ++.A.I..C(
UR$).1.50.Y.N.UR$.H(UR$,C(UR$).1)...S.."
. ..";:.50...X.. ++ CHECK FOR VALID CHA
RACTERS ++.D.}..C(US$).0.150.U....US.1.C
(US$)......UI$.J(US$,US,1).............U
I$."":....... ** STANDARD INPUT **.+....
F(UI$).46...<....UI$.G(32)...Y. ..F(UI$)
.48.F(UI$).57.170._.....|....F(UI$).65.F
(UI$).90.180............F(UI$).193.F(UI$
).218.UI$."":..I....B(UT).UU%.UI$.G(F(UI
$).128):..O.........UI$."":....C.UF.1:.
+++ HELP ROUTINE EXIT +++...E..250...H..
245.2.M..UQ.UB.(U2%.256.U1%.U3%.2).N.R.U
Q%(UQ.UB).B(UQ):.:.".".A.W.UZ.1:UV%.B(UT
).J.X..300...Y.UZ.0:US$.UJ$:UG$.UK$:UP.U
J:UL.UK:.B(50003).0..53281,6:.53280,14..
...UT$.UL$:.".";:.UT,UV%:.UQ.UB.(U2%.256
.U1%.U3%.3)......UQ,UQ%(UQ.UB):.......U1
,U1%......U2,U2%......U4,U4%.*....U3,U3%
.1.2....35.D...UD%.((U2%.256.U1%.U3%).UB
).40:.H(UD$,UD%.1):.......H(UD$,24);"
. HELP COMING . ":..
K...U1%.B(U1):U2%.B(U2):U3%.B(U3):U4%.B(
U4).....UJ$.US$:UK$.UG$:UL$.UT$:UJ.UP:UK
.UL.........,.. ** MENU **...-.:.?....".
":.UT,UU%:.B(50003).0..53281,9:.53280,8.
E./.:.B.1..". MENU"...6..
" --------------------------------------
"...;..".. 1. BEGIN SIMULATION".
..@..".. 2. STUDENT INSTRUCTIONS
"...E..".. 3. TEACHER INSTRUCTIO
NS".'.O..".. 4. QUIT..".V.T.." -
-------------------------------------"..
.Y..".. PRESS A NUMBER KEY (1-4) "
;...^.UL.1:US$."1234":.35:. INPUT ROUTIN
E...`.US$."".Q.C..E(UR$).1000,400,500,39
6.Z.H..300...... ** RE-ENABLE STOP KEY A
ND END **.0....B(50003)..1.B(50003)..160
.B(50003)..0.399.Z....UU.71:.B(50003).0.
.53281,6:.53280,14.F...."..":..Q....875:
....... ** STUDENT INSTRUCTIONS **.A....
".":.UT,UL%:.B(50003).0..53281,0:.53280,
0.....UP.0:UG$."STUDENT INST":.850...H..
"...... REMEMBER TO HIT <RETURN> AFTE
R".=.J..". TYPING YOUR ANSWER. THIS T
ELLS".I.L..". THE COMPUTER TO ACCEPT
WHAT YOU"...N..". HAVE TYPED."......8
35......UZ.1..UP%:.217.......E.... ** TE
ACHER INSTRUCTIONS **......".":.UT,UL%:.
B(50003).0..53281,2:.53280,10.....UP.0:U
G$."TEACHER INST":.850.D....".. TO
THE BEST OF OUR KNOWLEDGE,.".M...." TH
IS PROGRAM IS IN THE PUBLIC."......" D
OMAIN. IF THIS IS NOT THE CASE."......"
PLEASE CONTACT:..."......" COMMO
DORE BUSINESS MACHINES."......"
3370 PHARMACY AVE..'...." AGIN
COURT, ONTARIO".I...." CANADA
M1W 2K4".I...." (416) 499-4292
".X.@..835:.850:...B.." ..PROGRAM NA
ME: SIMULATION..A.D.." WRITTEN BY :
UNKNOWN....F.." UPGRADED BY : ....H
.." .THIS PROGRAM WILL RUN ON ANY...
..J.." BASIC 2.0 PET COMPUTER..U
.L.." BASIC 4.0 PET COMPUTER..W.
N.." 8032 CBM COMPUTER....P.."
COMMODORE 64 COMPUTER...R..835...
T..UZ.1..UP%:.217...V.....X.. ** PROGRAM
MODIFICATION INST **...Y..".":.UT,UL%..
.].UP.0:UG$."PROGRAM MOD":.850......835.
3....UZ.1..UP%:.217.9.....^.... ** TO US
E 8032 LOAD CBM4032 **...F..".....BEFORE
RUNNING THIS PROGRAM ON AN 8032 ...J.P
.." LOAD THE 'CBM 4032' PROGRAM....
.........".U.Z..UU.71......... .. ** T I
T L E P A G E **./.".."....";:.UT,UU%
:.B(50003).0..53280,14:.53281,6.E.$..I.1
.38:."...";:..].&..I.1.22:.".....";:..U.
(..I.1.37:.".....";:....*..I.1.22:."....
.";:....,.."...........................
..T...."................... . . .....0
.."................... . ......2.."....
................ ..;.4.."..............
C O M M O D O R E...^.6.."..............
.EDUCATIONAL...}.8.."................SOF
TWARE...:.. ** COMMODORE LOGO **.P.;..H(
UD$,24);"..........PRESS SPACE BAR OR WA
IT.":I.0...<..A$:.A$.." ".I.I.1:.I.250.8
28...>.T1$."":T2$."":T3$."":T4$."":I.0..
.@..300.;.C.. ** SPACE BAR PRESS **.W.H.
.UO,0:.H(UD$,24);".......PRESS SPACE BAR
TO CONTINUE.."...L..UI$:.UI$.." ".844..
.M..H(UD$,24);UP$".":....N...L.R.. ** PA
GE DESIGN ROUTINE **.X.T.UP.UP.1...W..".
"H(UT$.UP$,21);I(UP$.UG$.D(UP),18).1.\..
" --------------------------------------
".@.`..UH..0.870.T.A..H(UD$,24);H(UP$,7)
;"HELP - PRESS H <RETURN>"...F.UH.0:."
..":....K.. ** PLEASE WAIT REMARK **.Z.P
..H(UD$,24);" ONE MOMENT PLEAS
E... "...U........ ** SET UP VARIABL
ES **.H...UX$."H":.UQ%(1000):UB.32768:U1
.196:U2.197:U3.198:U4.216:UC.167:UU.1024
.....UT.59468:UU%.12:UL%.14:UP%.1146:UM.
32768:UO.158:. 50003,0.I....B(50003).0.U
B.1024:U1.209:U2.210:U3.211:U4.214:UC.20
4:UU.2048......B(50003).0.UT.53272:UU%.2
1:UL%.23:UP%.2139:UM.1024:UO.198.,...UD$
.".........................".^...UP$."
".T
...UT$." SIMULATION".Z.......... ** SET
VARIABLES **......900...... ** CHECK FOR
8032 **.V....".":." ":. SHIFTED SPACE..
....B(UB.40)..96..700...... ** MEMORY CH
ECK **...... .(0).2000.937.H...."....THI
S MACHINE DOES NOT HAVE ENOUGH.".L...."M
EMORY TO RUN THIS PROGRAM !".W....UU.71.
}.........."..":.B(50003).0.962.F.... **
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,144:.1100,234:.1103,133.\....
1104,145:.1105,234:.1082,234.S....B(5000
3)..160.955......1093,88:.1094,228:.1097
,85:.1102,228:.965......B(50003)..1.990.
.....1093,49:.1094,230:.1097,46:.1102,23
0:.965. .B..2099,141:.2100,20:.2101,3:.2
103,8:.2104,141:.2105,21.\.C..2106,3:.21
15,145:.2117,52:.2118,234:.2121,49:.2122
,141...D..2123,20:.2124,3:.2126,234:.212
7,141:.2128,21:.2129,3...E..UU.48:. DISA
BLE STOP KEY.E.J..800:. TITLE.U.T..300:.
MENU......".THE PGM WILL NOT WORK ON TH
IS MACHINE!":..;....UZ.1..UP%:.UP%:UZ.0:
. ** PROGRAM STARTS HERE **.G...."..";:.
:.B(50003).0..53281,6:.53280,14....."..
.":..13)".. ".......13)". . .IMULATI
ON".......13)".. .".K.....13)" . ":..
13)". .."......".. HOW THE COMPU
TER FOLLOWS.9 ...". A SIMPLE PROGR
AM.":.".. THE PROGRAM THAT YOU WIL
L.. ...". SEE WILL ADD TWO NUMBERS
":.". AND PRINT THE RESULT... $..
835.F ..."..":D$."......................
.....":E$." ........>"..!8.F$." "
:." U.....I":."
.START.".>!B.." J.....K":."
............W!L.."
N ENTER TWON":." N NUMBERS N".
.!V.." ...........".N!`.."
.............":." . ADD A
ND .".."J.." . STORE THE .":."
. RESULT .".'"T.."
............."._"~.." .......
....":." N DISPLAY N".."..."
N ANSWER N":." ........
...".."..." U.....I".."..."
. STOP.":." J...
..K".."...835.."...H(D$,4).E$..#...835..
#D..H(D$,4).F$.I#F..H(D$,7).E$;.25)"10 I
NPUT A":..25)"20 INPUT B".R#N..835..#X..
H(D$,7).F$:.H(D$,12).E$;.25)"30 LET C=A+
B"..#...835..#...H(D$,12).F$:.H(D$,16).E
$;.25)"40 PRINT C".C#...835..#...H(D$,16
).F$:.H(D$,20).E$;.25)"50 END"..#... 835
. $...".";:.B(50003).0..53281,6:.53280,6
.O$...I.1.4:.MC(I),P1(I):MC(I).MC(I).327
68.UB:...$...32983,114,33023,93,33063,93
,33103,113:.I.1.6:IC(I).365.UB.I.M$(.CO(
I).378.UB.I:.P2(I):P3(I).P2(I):.:.107,64
,64,64,64,115..%2..I.1.5:CA(I).412.UB.I.
40:CP(I).CA(I).6:.P4(I),P5(I):..K%<..114
,114,93,93,93,93,93,93,113,113:.".":."
A B C"..%F.." .....
........":." . . . . MAIN
".L%P.." . . . . MEMORY":.
" .............":.:...&Z..".....
.. ......... ........":.". .
.CONTROL. . .".D&D..". .
. . . .":."....... ..
....... ........"..&N.." INPUT
OUTPUT":.:...&X.." .....
.... ................."..&..." .
. . ."..'..." .
. . .".3'..." ..
....... .................".[' .." AC
CUMULATOR PROGRAM MEMORY".D'...835.~'H
..1850:.I.1.4:.P$(I):...'R.."10 INPUT A"
,"20 INPUT B","30 LET C=A+B","40 PRINT C
".B'...835..'..I.1:.1810:.I.5.1..1:.CP(I
),P5(I).128:.:.I.1.1000:..$(...H(UD$,24)
;.9)"PLEASE ENTER A NUMBER.".W(...I.6.1.
.1:.IC(I),P2(I).128:.:."...........? ";.
.(..US$."0123456789":UL.1:.35:A.E(UR$):.
845.E(..."............";A:.1850:.I.1.100
0:.:.I.1.6:.IC(I),P2(I).128:...)...I.1.2
000:.:.I.4.1..1:.MC(I),P1(I).128:.:."...
...........";A..)...I.1.1000:.:.1850.&)"
.. 835.H),.."........... ":.1850:I.2:
.1810:.I.5.1..1:.CP(I),P5(I).128..)6..:.
I.1.1000:.:.I.6.1..1:.IC(I),P2(I).128:..
B);..H(UD$,24);.9)"PLEASE ENTER A NUMBER
.".X)@.."...........? ";..)J..35:B.E(UR$
):.845..*T..1850:.I.1.1000:.:.I.1.6:.IC(
I),P2(I).128:..C*^..I.1.2000:.:.I.4.1..1
:.MC(I),P1(I).128:.:."..................
";B.Y*H..I.1.1000:.:.1850..*R.. 835.D*|.
."........... ":.1850:I.3:.1810:.I.1.
5:.CP(I),P5(I).128:...+...I.1.1000:.:.18
50:.I.1.4:.MC(I),P1(I).128:.:.I.1.1000:.
.G+...I.1.5:.CA(I),P4(I).128:.:.I.1.500:
.:."........................";A..+...I.1
.2000:.:.1850:.I.1.1000:.:.I.1.4:.MC(I),
P1(I).128:...+...I.1.1000:.:.I.1.5:.CA(I
),P4(I).128:.:.I.1.500:...+...".........
...............";A.B:.I.1.500:.:.I.1.200
0:.:.1850.&,...I.5.1..1:.CA(I),P4(I).128
:.:.I.1.1000:..R,B..I.4.1..1:.MC(I),P1(I
).128:.:.I.1.500:..Z,L.."...............
.......";A.B:.1850..,V.. 835..,..I.4:.18
10:.I.1.5:.CP(I),P5(I).128:.:.I.1.1000:.
:.1850..-...I.1.4:.MC(I),P1(I).128:.:.I.
1.1000:.:.I.1.6:.CO(I),P3(I).128:..C-...
I.1.500:.:."............................
........";A.B:.1850.Z-..."..............
.......................";A.B:. 835..-...
1870..-...".............................
....."." "..-..."............
......................".P$(I)..-&.. 835.
.-0...:.:..I.1.4:.MC(I),P1(I):.:.I.1.6:.
IC(I),P2(I):.CO(I),P3(I):..C.D..I.1.5:.C
A(I),P4(I):.CP(I),P5(I):.:....N..".":.I.
1.4:.MC(I),P1(I):..B.X..32983,114,33023,
93,33063,93,33103,113:.I.1.6:IC(I).33133
.I...B.CO(I).33146.I:.P2(I):P3(I).P2(I):
.:.107,64,64,64,64,115.7/L..I.1.5:CA(I).
33180.I.40:CP(I).CA(I).6:.P4(I),P5(I):..
{/V..114,114,93,93,93,93,93,93,113,113:.
".":." A B C"../..."
.............":." . . .
. MAIN"../..." . . . . M
EMORY":." .............":.:..H0.
.."....... ......... ........":.".
. .CONTROL. . ."..0...".
. . . . .":.".....
.. ......... ........"..0..." INPU
T OUTPUT":.:...0..."
......... ................."..1..."
. . . .".:1F.."
. . . .".C1P..
" ......... ................."..1Z.
." ACCUMULATOR PROGRAM MEMORY":.229
0..1... 835..1...I.1.4:.P$(I):...1..."10
INPUT A","20 INPUT B","30 LET C=A+B","4
0 PRINT C":I.1:.2270.02...I.5.1..1:.CP(I
),P5(I).128:.:.I.6.1..1:.IC(I),P2(I).128
.[2...H(UD$,24);.9)"PLEASE ENTER A NUMBE
R.".S2...:."...........? ";..2...35:A.E(
UR$):.845..2 ..2290:.I.1.6:.IC(I),P2(I).
128:...2*..I.4.1..1:.MC(I),P1(I).128:.:.
"..............";A:."........... ".03
4..2290:I.2:.2270:.I.5.1..1:.CP(I),P5(I)
.128:.:.I.6.1..1.[39..H(UD$,24);.9)"PLEA
SE ENTER A NUMBER."..3>..IC(I),P2(I).128
:.:."...........? ";..3H..35:B.E(UR$):.8
45..3R..2290:.I.1.6:.IC(I),P2(I).128:...
3\..I.4.1..1:.MC(I),P1(I).128:.:."......
............";B.>4F.."........... ":.
2290:I.3:.2270:.I.1.5:.CP(I),P5(I).128:.
:.2290.V4P..I.1.4:.MC(I),P1(I).128:.:.I.
1.5:.CA(I),P4(I).128:...4Z.."...........
.............";A:.2290:.I.1.4:.MC(I),P1(
I).128:...4...I.1.5:.CA(I),P4(I).128:.:.
"........................";A.B:.2290.:5.
..I.5.1..1:.CA(I),P4(I).128:.:.I.4.1..1:
.MC(I),P1(I).128:..L5..."...............
.......";A.B:.2290:I.4:.2270..5...I.1.5:
.CP(I),P5(I).128:.:.2290:.I.1.4:.MC(I),P
1(I).128:..H5...I.1.6:.CO(I),P3(I).128:.
..5...".................................
...";A.B:.2290.:6..."...................
..................";A.B:.I.1.500:..D6J..
835.J6T..".......END OF SIMULATION":. 3
00..6..."...............................
..."." ".U6..."..............
....................".P$(I):...7...I.1.4
:.MC(I),P1(I):.:.I.1.6:.IC(I),P2(I):.CO(
I),P3(I):..;7...I.1.5:.CA(I),P4(I):.CP(I
),P5(I):.:.....
> CLICK IMAGE PREVIEW FOR FULL MODAL