2.3 LESSON
FILE INFORMATION
FILENAME(S): 2.3 LESSON
FILE TYPE(S): PRG
FILE SIZE: 9.8K
FIRST SEEN: 2025-12-02 23:23:03
APPEARS ON: 1 disk(s)
FILE HASH
00a6fdf8528db7a2b382804a3efb4e67cc3c8dede6062ab3bf42548d7352e7a5
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ASS KURS ENGL 2 | 2.3 LESSON | PRG | swasti, dinkel | 14 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 00 01 31 36 32 00 30 30 30 30 30 30 FF 00 FF D7 |..162.000000....|
00000010: FF F5 95 04 FF 16 FF 00 FF FF D7 00 FF 06 BD 80 |................|
00000020: FF 97 DE 00 FF 7F A7 04 FF 02 D7 80 FF 02 FF 95 |................|
00000030: FF 02 DF 00 FF 02 FF 00 FF 00 FF 00 FF FD BF 94 |................|
00000040: FF D7 FF 00 FF 00 7D EA 00 00 FF A0 A8 ED E9 ED |......}.........|
00000050: ED 26 F6 02 02 02 02 02 02 02 02 02 02 02 02 02 |.&..............|
00000060: 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 |................|
00000070: 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 |................|
00000080: 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 |................|
00000090: 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 |................|
000000A0: 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 |................|
000000B0: 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 |................|
000000C0: 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 |................|
000000D0: 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 |................|
000000E0: 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 |................|
000000F0: 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 |................|
00000100: 02 02 EA EA EA 78 A2 00 9A A9 01 48 48 48 48 48 |.....x.....HHHHH|
00000110: A9 05 85 C6 A5 2B 85 2D A5 2C 85 2E A0 00 A2 03 |.....+.-.,......|
00000120: B1 2D E6 2D D0 02 E6 2E C9 00 D0 F2 CA D0 F1 A9 |.-.-............|
00000130: FF 8D 29 03 AC FF FF C8 D0 FE 4C 83 A4 FF 00 FF |..).......L.....|
00000140: 00 FF 00 95 24 FF 94 A5 00 FF 00 FF 00 FF 00 FF |....$...........|
00000150: 04 7F 88 FF 00 FF 9D F5 1C FF 00 FF 00 FF 00 FF |................|
00000160: 00 FF 1C FF 00 AD 94 9D 9C BD 91 FF 00 FF 0C FF |................|
00000170: 00 FF 9C FF 00 FF 10 FF 00 13 52 55 4E 0D 00 00 |..........RUN...|
00000180: 00 00 00 00 08 00 A0 00 0E A6 04 0A 00 04 10 00 |................|
00000190: 00 48 EB 00 00 00 00 00 00 00 00 00 00 00 00 00 |.H..............|
000001A0: 00 00 00 00 00 00 00 FD 01 00 00 00 00 00 00 00 |................|
000001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000200: 00 00 8B E3 FB C5 7C A5 1A A7 E4 A7 86 AE 00 00 |......|.........|
00000210: 00 00 4C 48 B2 00 31 EA FB C5 47 FE 4A F3 91 F2 |..LH..1...G.J...|
00000220: 0E F2 50 F2 33 F3 57 F1 CA F1 ED F6 3E F1 2F F3 |..P.3.W.....>./.|
00000230: 66 FE A5 F4 ED F5 00 00 00 00 00 00 00 00 00 00 |f...............|
00000240: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000250: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000260: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000270: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000280: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000290: 00 00 00 00 00 00 00 00 00 00 FF 00 00 28 00 99 |.............(..|
000002A0: 22 3F 97 1D BF 9D 22 3B 00 00 00 29 00 9F 31 2C |"?....";...)..1,|
000002B0: 30 3A 84 31 2C 5A 24 3A A0 31 3A 99 22 98 22 3A |0:.1,Z$:.1:.".":|
000002C0: 8E 00 FF 00 00 A9 FF 8D 29 03 A9 02 85 C6 A9 13 |........).......|
000002D0: 8D 77 02 A9 0D 8D 78 02 A9 FB 8D 02 03 A9 C5 8D |.w....x.........|
000002E0: 03 03 4C 83 A4 00 00 00 00 00 00 00 00 00 00 00 |..L.............|
000002F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000300: 00 00 12 15 0E 39 39 39 20 20 20 20 20 20 20 20 |.....999 |
00000310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4C | L|
00000350: 7E 05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |~. |
00000360: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000380: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003C0: 20 20 20 84 0E A0 38 4C 7D 05 20 20 20 20 20 20 | ...8L}. |
000003D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000440: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000460: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BE | .|
00000480: 60 03 E8 18 8E C2 03 E8 8A 0A 0A 0A 85 0F 0A 4C |`..............L|
00000490: CF 05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
000004A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004D0: 20 6D E6 07 8D E6 07 AD E7 07 69 00 8D E7 07 4C | m........i....L|
000004E0: 1D 06 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
000004F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000500: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000510: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 18 | .|
00000520: 69 60 81 0D A0 57 B1 0E 85 0E 46 0F 8A 25 BA 4C |i`...W....F..%.L|
00000530: 51 06 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |Q. |
00000540: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000550: 20 20 20 AA 8E 5B 08 4C 1C 07 20 20 20 20 20 20 | ..[.L.. |
00000560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000600: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A0 27 | .'|
00000620: D0 1D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00000630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B9 | .|
00000640: 99 03 99 C3 03 88 10 F7 30 11 20 20 20 20 20 20 |........0. |
00000650: 20 20 20 20 20 20 20 20 20 20 20 A9 C3 8D 4F 08 | ...O.|
00000660: A9 03 8D 50 08 A9 D1 8D C3 03 A9 03 8D C4 03 4C |...P...........L|
00000670: 87 07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00000680: 20 20 20 20 20 20 20 20 20 A9 5C 8D D1 03 A9 08 | .\.....|
00000690: 8D D2 03 A9 60 8D 58 08 D0 1B 20 20 20 20 20 20 |....`.X... |
000006A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006B0: 20 20 20 20 20 A9 89 8D 53 08 A9 8F 8D 57 08 4C | ...S....W.L|
000006C0: E5 07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
000006D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006E0: 20 20 20 20 20 20 20 6C FE FF 99 00 08 88 D0 FA | l........|
000006F0: 4C E2 FC 8C 00 BC DC FF 00 FF 04 9D 9C FF F5 B5 |L...............|
00000700: 04 FF 00 4F 08 0A 00 9E 32 30 32 34 3A 8F 22 14 |...O....2024:.".|
00000710: 14 14 14 14 14 14 14 14 14 14 14 52 45 4D 20 57 |...........REM W|
00000720: 2E 4F 57 45 4E 20 4D 55 52 43 4F 54 54 20 46 45 |.OWEN MURCOTT FE|
00000730: 42 52 55 41 52 59 20 31 39 38 33 20 20 20 20 20 |BRUARY 1983 |
00000740: 20 20 20 20 20 20 20 57 4F 4D 46 49 53 20 36 34 | WOMFIS 64|
00000750: 00 5C 08 0B 00 00 35 30 3A 4D 4C C1 04 00 9C 08 |.\....50:ML.....|
00000760: 32 00 9C 3A 42 24 B2 22 1D 1D 1D 1D 1D 22 3A 43 |2..:B$.".....":C|
00000770: 24 B2 22 9D 9D 9D 9D 9D 22 3A 45 24 B2 22 20 20 |$.".....":E$." |
00000780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000790: 20 22 3A 46 24 B2 22 13 11 11 11 11 22 00 AC 08 | ":F$."....."...|
000007A0: 33 00 4C 24 B2 22 11 11 11 11 11 11 22 00 EA 08 |3.L$."......"...|
000007B0: 34 00 86 53 24 28 38 29 3A 53 31 24 B2 22 12 1E |4..S$(8):S1$."..|
000007C0: C1 44 44 52 20 20 CC CF 22 3A 53 32 24 B2 22 12 |.DDR ..":S2$.".|
000007D0: 1E C1 44 44 52 20 20 C8 C9 22 3A 53 33 24 B2 22 |..DDR ..":S3$."|
000007E0: 12 1C 20 20 C4 41 54 41 20 20 22 00 00 09 3C 00 |.. .ATA "...<.|
000007F0: 53 48 B2 36 35 33 3A 43 43 B2 36 3A 8D 35 30 30 |SH.653:CC.6:.500|
00000800: 30 00 3F 09 64 00 99 C7 28 31 34 29 22 93 9A 22 |0.?.d...(14)".."|
00000810: 4C 24 2C 2C 22 9A 9D 9D AC 12 AC BB 92 BB 9D 9D |L$,,"...........|
00000820: 9D 9D 11 20 20 12 BE 92 BE 9D 9D 9D 9D 11 AC 12 |... ...........|
00000830: AC 92 20 20 9D 9D 9D 9D 11 BC 12 A2 A2 92 BE 22 |.. ..........."|
00000840: 00 6B 09 65 00 99 42 24 22 11 11 11 12 2A 20 20 |.k.e..B$"....* |
00000850: C8 C1 D2 C4 D7 C1 D2 C5 A0 C1 CE C4 A0 C9 CE D3 |................|
00000860: D4 D2 D5 C3 D4 C9 CF CE D3 20 20 2A 00 97 09 66 |......... *...f|
00000870: 00 99 2C 22 11 11 11 98 20 20 20 20 32 2E 33 20 |..,".... 2.3 |
00000880: 20 20 D3 D4 C1 C3 CB 22 3A 54 B2 33 3A 8D 31 30 | .....":T.3:.10|
00000890: 30 30 3A 8D 36 30 30 30 00 B8 09 7D 00 43 43 B2 |00:.6000...}.CC.|
000008A0: 33 3A 8D 35 30 30 30 3A 8D 33 30 30 30 3A 99 22 |3:.5000:.3000:."|
000008B0: 98 22 3B 3A 8D 31 31 30 30 00 FE 09 96 00 43 43 |.";:.1100.....CC|
000008C0: B2 31 35 3A 8D 35 30 30 30 3A 99 C7 28 31 34 32 |.15:.5000:..(142|
000008D0: 29 22 93 1F 20 20 20 20 20 20 A0 52 41 4D 22 3A |)".. .RAM":|
000008E0: 8D 32 30 30 30 3A 99 22 13 22 2C 2C 42 24 22 1F |.2000:.".",,B$".|
000008F0: 20 41 44 44 52 45 53 53 22 3A 8D 32 30 30 36 00 | ADDRESS":.2006.|
00000900: 21 0A 9D 00 99 2C 2C 22 91 91 91 91 1D 12 1F 20 |!....,,"....... |
00000910: 20 20 48 49 20 20 20 1D 20 20 20 4C 4F 20 20 20 | HI . LO |
00000920: 11 22 00 53 0A 9E 00 99 2C 2C 22 1D 1D 1D 1D 97 |.".S....,,".....|
00000930: 30 31 22 42 24 22 1D 1D 30 30 22 3A 99 22 11 1D |01"B$"..00":."..|
00000940: 1D 12 95 50 41 47 45 20 31 22 3A 54 B2 32 3A 8D |...PAGE 1":T.2:.|
00000950: 31 30 30 30 00 85 0A A0 00 99 2C 2C 22 97 50 41 |1000......,,".PA|
00000960: 47 45 20 31 20 49 53 A0 55 53 45 44 A0 46 4F 52 |GE 1 IS.USED.FOR|
00000970: 22 3A 99 2C 2C 22 54 48 45 A0 53 54 41 43 4B 22 |":.,,"THE.STACK"|
00000980: 3A 8D 31 30 30 30 00 B8 0A A1 00 99 2C 2C 22 11 |:.1000......,,".|
00000990: 54 48 49 53 A0 49 53 A0 4C 49 4B 45 A0 41 A0 46 |THIS.IS.LIKE.A.F|
000009A0: 41 53 54 22 3A 99 2C 2C 22 41 43 43 45 53 53 A0 |AST":.,,"ACCESS.|
000009B0: 4E 4F 54 45 2D 50 41 44 2C 00 F4 0A A2 00 99 2C |NOTE-PAD,......,|
000009C0: 2C 22 47 49 56 49 4E 47 A0 41 A0 54 45 4D 50 4F |,"GIVING.A.TEMPO|
000009D0: 52 41 52 59 22 3A 99 2C 2C 22 53 54 4F 52 41 47 |RARY":.,,"STORAG|
000009E0: 45 A0 46 41 43 49 4C 49 54 59 22 3A 54 B2 34 3A |E.FACILITY":T.4:|
000009F0: 8D 32 30 38 30 00 2F 0B C8 00 43 43 B2 37 3A 8D |.2080./...CC.7:.|
00000A00: 35 30 30 30 3A 99 C7 28 31 34 29 22 93 12 95 C3 |5000:..(14)"....|
00000A10: CF CE C3 C5 D0 D4 20 CF C6 20 C1 20 D3 D4 C1 C3 |...... .. . ....|
00000A20: CB 22 3A 47 24 B2 22 20 20 20 20 20 20 20 20 22 |.":G$." "|
00000A30: 00 5B 0B CA 00 99 22 11 98 C9 54 A0 49 53 A0 43 |.[...."...T.IS.C|
00000A40: 48 52 4F 4E 4F 4C 4F 47 49 43 41 4C 20 20 2E 2E |HRONOLOGICAL ..|
00000A50: 2E 22 3A 54 B2 32 3A 8D 31 30 30 30 00 7F 0B CD |.":T.2:.1000....|
00000A60: 00 8D 31 33 30 30 3A 8D 31 30 30 30 3A 99 22 13 |..1300:.1000:.".|
00000A70: 22 4C 24 4C 24 22 20 12 95 CC C1 D3 D4 A0 C9 CE |"L$L$" .........|
00000A80: 00 B3 0B D2 00 81 49 B2 30 A4 38 3A 53 24 28 49 |......I.0.8:S$(I|
00000A90: 29 B2 22 12 97 22 AA 47 24 3A 82 3A 81 49 B2 31 |)."..".G$:.:.I.1|
00000AA0: A4 36 3A 8D 31 33 31 30 3A 54 B2 31 3A 8D 31 30 |.6:.1310:T.1:.10|
00000AB0: 30 30 3A 82 00 DC 0B D7 00 8D 31 30 30 30 3A 99 |00:.......1000:.|
00000AC0: 22 13 22 4C 24 4C 24 2C 2C 2C 22 12 95 C6 C9 D2 |"."L$L$,,,".....|
00000AD0: D3 D4 20 CF D5 D4 22 3A 8D 31 30 30 30 00 04 0C |.. ...":.1000...|
00000AE0: DC 00 81 49 B2 36 A4 33 A9 AB 31 3A 8D 31 33 32 |...I.6.3..1:.132|
00000AF0: 30 3A 8D 31 30 30 30 3A 82 3A 99 22 98 22 3B 3A |0:.1000:.:.".";:|
00000B00: 8D 31 31 30 30 00 4D 0C FA 00 43 43 B2 31 32 3A |.1100.M...CC.12:|
00000B10: 8D 35 30 30 30 3A 99 22 93 22 4C 24 22 1F D3 4F |.5000:."."L$"..O|
00000B20: 4D 45 20 43 4F 4D 50 55 54 45 52 53 A0 48 41 56 |ME COMPUTERS.HAV|
00000B30: 45 A0 41 A0 48 41 52 44 57 41 52 45 A0 53 54 41 |E.A.HARDWARE.STA|
00000B40: 43 4B 2E 22 3A 54 B2 32 3A 8D 31 30 30 30 00 7C |CK.":T.2:.1000.||
00000B50: 0C FB 00 99 22 11 11 D4 48 45 A0 53 54 41 43 4B |...."...HE.STACK|
00000B60: 20 4F 4E 20 54 48 45 20 C3 CF CD CD CF C4 CF D2 | ON THE ........|
00000B70: C5 20 36 34 20 49 53 20 53 49 54 45 44 00 A0 0C |. 64 IS SITED...|
00000B80: FC 00 99 22 49 4E A0 4D 45 4D 4F 52 59 2E 9B 22 |..."IN.MEMORY.."|
00000B90: 3A 8D 31 31 31 30 3A 91 5A 89 32 35 30 2C 32 30 |:.1110:.Z.250,20|
00000BA0: 30 00 E5 0C 04 01 43 43 B2 31 35 3A 8D 35 30 30 |0.....CC.15:.500|
00000BB0: 30 3A 99 22 93 1F 20 20 20 52 41 4D 20 20 50 41 |0:.".. RAM PA|
00000BC0: 47 45 20 20 31 22 3A 8D 32 30 30 30 3A 99 22 13 |GE 1":.2000:.".|
00000BD0: 22 2C 2C 42 24 22 1F 20 41 44 44 52 45 53 53 22 |",,B$". ADDRESS"|
00000BE0: 3A 8D 32 30 30 36 00 07 0D 05 01 99 2C 2C 22 91 |:.2006......,,".|
00000BF0: 91 91 91 1D 12 1F 20 20 53 54 41 43 4B 20 20 50 |...... STACK P|
00000C00: 4F 49 4E 54 45 52 20 22 00 49 0D 06 01 99 2C 2C |OINTER ".I....,,|
00000C10: 22 11 11 11 97 54 48 45 20 53 54 41 43 4B 20 49 |"....THE STACK I|
00000C20: 53 20 42 55 49 4C 54 22 3A 99 2C 2C 22 44 4F 57 |S BUILT":.,,"DOW|
00000C30: 4E 57 41 52 44 53 20 46 52 4F 4D 20 24 46 46 22 |NWARDS FROM $FF"|
00000C40: 3A 54 B2 32 3A 8D 31 30 30 30 00 73 0D 07 01 99 |:T.2:.1000.s....|
00000C50: 46 24 22 95 22 3A 81 49 B2 31 A4 36 3A 99 22 1D |F$".":.I.1.6:.".|
00000C60: 22 3B 3A 81 4A B2 31 A4 31 36 3A 99 22 D1 22 3B |";:.J.1.16:.".";|
00000C70: 3A 82 3A 99 00 98 0D 08 01 82 49 3A 99 22 1D D1 |:.:.......I:."..|
00000C80: D1 D1 D1 22 3A 99 46 24 2C 2C 2C 22 97 20 20 20 |...":.F$,,,". |
00000C90: 39 34 22 3A 8D 31 30 30 30 00 D0 0D 09 01 99 2C |94":.1000......,|
00000CA0: 2C 22 11 11 11 11 54 48 45 20 53 54 41 43 4B 20 |,"....THE STACK |
00000CB0: 50 4F 49 4E 54 45 52 22 3A 99 2C 2C 22 49 4E 20 |POINTER":.,,"IN |
00000CC0: 54 48 45 20 4D 50 55 20 43 4F 4E 54 41 49 4E 53 |THE MPU CONTAINS|
00000CD0: 22 00 0A 0E 0A 01 99 2C 2C 22 54 48 45 20 41 44 |"......,,"THE AD|
00000CE0: 44 52 45 53 53 20 4F 46 20 54 48 45 22 3A 99 2C |DRESS OF THE":.,|
00000CF0: 2C 22 4E 45 58 54 20 46 52 45 45 20 43 45 4C 4C |,"NEXT FREE CELL|
00000D00: 22 3A 54 B2 34 3A 8D 31 30 30 30 00 46 0E 0B 01 |":T.4:.1000.F...|
00000D10: 99 2C 2C 22 11 41 20 4E 49 4E 54 48 20 42 49 54 |.,,".A NINTH BIT|
00000D20: 20 49 53 22 3A 99 2C 2C 22 50 45 52 4D 41 4E 45 | IS":.,,"PERMANE|
00000D30: 4E 54 4C 59 20 53 45 54 20 3D 20 31 22 3A 54 B2 |NTLY SET = 1":T.|
00000D40: 32 3A 8D 31 30 30 30 00 8E 0E 11 01 99 46 24 2C |2:.1000......F$,|
00000D50: 2C 42 24 22 97 31 22 3A 8D 31 30 30 30 3A 99 2C |,B$".1":.1000:.,|
00000D60: 2C 4C 24 4C 24 22 54 48 49 53 20 50 45 52 4D 49 |,L$L$"THIS PERMI|
00000D70: 54 53 20 38 2D 42 49 54 22 3A 99 2C 2C 22 41 44 |TS 8-BIT":.,,"AD|
00000D80: 44 52 45 53 53 49 4E 47 2C 20 55 53 49 4E 47 00 |DRESSING, USING.|
00000D90: A4 0E 12 01 99 2C 2C 22 50 41 47 45 20 31 22 3A |.....,,"PAGE 1":|
00000DA0: 8D 32 30 38 30 00 CB 0E 2C 01 43 43 B2 31 32 3A |.2080...,.CC.12:|
00000DB0: 8D 35 30 30 30 3A 99 22 93 22 C7 28 31 34 29 22 |.5000:.".".(14)"|
00000DC0: 97 D3 D4 C1 C3 CB A0 D5 D3 C1 C7 C5 00 03 0F 2D |...............-|
00000DD0: 01 99 22 11 11 1F D4 48 45 A0 53 54 41 43 4B A0 |.."....HE.STACK.|
00000DE0: 49 53 A0 55 53 45 44 A0 41 55 54 4F 4D 41 54 49 |IS.USED.AUTOMATI|
00000DF0: 43 41 4C 4C 59 20 54 4F 3A 22 3A 54 B2 32 3A 8D |CALLY TO:":T.2:.|
00000E00: 31 30 30 30 00 37 0F 2E 01 99 22 11 A6 22 42 24 |1000.7....".."B$|
00000E10: 22 D3 41 56 45 A0 53 55 42 52 4F 55 54 49 4E 45 |".AVE.SUBROUTINE|
00000E20: A0 52 45 54 55 52 4E A0 41 44 44 52 45 53 53 45 |.RETURN.ADDRESSE|
00000E30: 53 22 3A 8D 31 30 30 30 00 83 0F 2F 01 99 22 11 |S":.1000.../..".|
00000E40: A6 22 42 24 22 D3 54 4F 52 45 A0 CD D0 D5 20 52 |."B$".TORE.... R|
00000E50: 45 47 49 53 54 45 52 53 A0 4F 4E 20 49 4E 54 45 |EGISTERS.ON INTE|
00000E60: 52 52 55 50 54 22 3A 99 42 24 22 20 28 4C 45 53 |RRUPT":.B$" (LES|
00000E70: 53 4F 4E 20 32 2E 38 29 2E 22 3A 54 B2 34 3A 8D |SON 2.8).":T.4:.|
00000E80: 31 30 30 30 00 B2 0F 31 01 99 22 11 11 D9 4F 55 |1000...1.."...OU|
00000E90: A0 43 41 4E A0 41 4C 53 4F A0 55 53 45 A0 49 54 |.CAN.ALSO.USE.IT|
00000EA0: 20 49 4E 20 59 4F 55 52 20 50 52 4F 47 52 41 4D | IN YOUR PROGRAM|
00000EB0: 20 54 4F 00 E9 0F 32 01 99 22 53 41 56 45 A0 44 | TO...2.."SAVE.D|
00000EC0: 41 54 41 A0 54 45 4D 50 4F 52 41 52 49 4C 59 2C |ATA.TEMPORARILY,|
00000ED0: 20 41 54 A0 48 49 47 48 A0 53 50 45 45 44 3A 22 | AT.HIGH.SPEED:"|
00000EE0: 3A 54 B2 32 3A 8D 31 30 30 30 00 17 10 33 01 99 |:T.2:.1000...3..|
00000EF0: 22 11 A6 22 42 24 22 D9 4F 55 A0 43 41 4E A0 D0 |".."B$".OU.CAN..|
00000F00: D5 D3 C8 20 44 41 54 41 A0 4F 4E A0 54 4F A0 49 |... DATA.ON.TO.I|
00000F10: 54 22 3A 8D 31 30 30 30 00 45 10 34 01 99 22 11 |T":.1000.E.4..".|
00000F20: A6 22 42 24 22 D9 4F 55 A0 43 41 4E A0 D0 D5 CC |."B$".OU.CAN....|
00000F30: CC 20 44 41 54 41 A0 46 52 4F 4D A0 49 54 2E 22 |. DATA.FROM.IT."|
00000F40: 3A 8D 31 30 30 30 00 82 10 35 01 99 22 11 11 C1 |:.1000...5.."...|
00000F50: D3 D3 C5 CD C2 CC C5 D2 20 48 41 53 A0 49 4E 53 |........ HAS.INS|
00000F60: 54 52 55 43 54 49 4F 4E 53 A0 46 4F 52 20 D0 D5 |TRUCTIONS.FOR ..|
00000F70: D3 C8 2F D0 D5 CC CC 4F 50 45 52 41 54 49 4F 4E |../....OPERATION|
00000F80: 53 2E 9B 00 97 10 40 01 8D 31 31 31 30 3A 91 5A |S.....@..1110:.Z|
00000F90: 89 32 36 30 2C 32 35 30 00 DF 10 C2 01 43 43 B2 |.260,250.....CC.|
00000FA0: 33 3A 8D 35 30 30 30 3A 99 22 93 22 4C 24 4C 24 |3:.5000:."."L$L$|
00000FB0: 22 97 CE 4F 57 A0 46 4F 4C 4C 4F 57 A0 45 58 41 |"..OW.FOLLOW.EXA|
00000FC0: 4D 50 4C 45 53 A0 4F 46 A0 53 54 41 43 4B 20 55 |MPLES.OF.STACK U|
00000FD0: 53 41 47 45 20 20 2E 2E 2E 22 3A 8D 31 31 30 30 |SAGE ...":.1100|
00000FE0: 00 09 11 F4 01 43 43 B2 31 35 3A 8D 35 30 30 30 |.....CC.15:.5000|
00000FF0: 3A 99 22 93 22 3A 47 24 B2 22 97 20 20 20 20 20 |:.".":G$.". |
00001000: 20 20 20 22 3A 8D 31 33 30 30 00 48 11 F6 01 8D | ":.1300.H....|
00001010: 31 31 32 30 3A 99 22 13 11 1F C1 20 4D 41 49 4E |1120:.".... MAIN|
00001020: 20 50 52 4F 47 52 41 4D A0 4A 55 4D 50 53 A0 54 | PROGRAM.JUMPS.T|
00001030: 4F A0 41 20 53 55 42 52 4F 55 54 49 4E 45 22 3A |O.A SUBROUTINE":|
00001040: 54 B2 32 3A 8D 31 30 30 30 00 7B 11 F7 01 99 22 |T.2:.1000.{...."|
00001050: CD D0 D5 20 50 55 53 48 45 53 20 52 45 54 55 52 |... PUSHES RETUR|
00001060: 4E A0 41 44 44 52 45 53 53 A0 4F 4E A0 54 4F A0 |N.ADDRESS.ON.TO.|
00001070: 53 54 41 43 4B 22 3A 8D 31 30 30 30 00 B3 11 F8 |STACK":.1000....|
00001080: 01 49 B2 31 3A 53 24 28 30 29 B2 53 32 24 3A 8D |.I.1:S$(0).S2$:.|
00001090: 31 33 35 30 3A 8D 31 33 31 30 3A 49 B2 32 3A 53 |1350:.1310:I.2:S|
000010A0: 24 28 30 29 B2 53 31 24 3A 8D 31 33 35 30 3A 8D |$(0).S1$:.1350:.|
000010B0: 31 33 31 30 00 F8 11 F9 01 8D 31 31 32 30 3A 99 |1310......1120:.|
000010C0: 22 13 11 1F D3 55 42 52 4F 55 54 49 4E 45 A0 52 |"....UBROUTINE.R|
000010D0: 45 54 55 52 4E 53 A0 54 4F A0 4D 41 49 4E A0 50 |ETURNS.TO.MAIN.P|
000010E0: 52 4F 47 52 41 4D 20 20 22 3A 99 45 24 45 24 3A |ROGRAM ":.E$E$:|
000010F0: 54 B2 32 3A 8D 31 30 30 30 00 33 12 FA 01 99 22 |T.2:.1000.3...."|
00001100: 91 1F CD D0 D5 20 50 55 4C 4C 53 20 52 45 54 55 |..... PULLS RETU|
00001110: 52 4E A0 41 44 44 52 45 53 53 A0 46 52 4F 4D A0 |RN.ADDRESS.FROM.|
00001120: 54 48 45 20 53 54 41 43 4B 22 3A 54 B2 31 3A 8D |THE STACK":T.1:.|
00001130: 31 30 30 30 00 60 12 FB 01 81 49 B2 32 A4 31 A9 |1000.`....I.2.1.|
00001140: AB 31 3A 8D 31 33 32 30 3A 82 3A 99 22 9A 22 3B |.1:.1320:.:.".";|
00001150: 3A 8D 31 31 31 30 3A 91 5A 89 35 30 30 2C 33 30 |:.1110:.Z.500,30|
00001160: 30 00 A0 12 FE 01 99 22 93 22 3A 8D 31 33 30 30 |0......".":.1300|
00001170: 3A 99 22 13 11 92 1F C1 20 50 52 4F 47 52 41 4D |:."..... PROGRAM|
00001180: A0 4D 41 59 A0 55 53 45 A0 54 48 45 A0 53 54 41 |.MAY.USE.THE.STA|
00001190: 43 4B A0 54 4F A0 53 41 56 45 A0 44 41 54 41 22 |CK.TO.SAVE.DATA"|
000011A0: 3B 00 CF 12 FF 01 99 22 57 48 49 4C 53 54 20 45 |;......"WHILST E|
000011B0: 58 45 43 55 54 49 4E 47 A0 41 20 53 55 42 52 4F |XECUTING.A SUBRO|
000011C0: 55 54 49 4E 45 22 3A 54 B2 31 3A 8D 31 30 30 30 |UTINE":T.1:.1000|
000011D0: 00 F2 12 00 02 53 24 28 30 29 B2 53 33 24 3A 81 |.....S$(0).S3$:.|
000011E0: 49 B2 31 A4 32 3A 8D 31 33 35 30 3A 8D 31 33 31 |I.1.2:.1350:.131|
000011F0: 30 3A 82 00 34 13 01 02 8D 31 31 32 30 3A 99 22 |0:..4....1120:."|
00001200: 13 11 1F D4 48 45 20 50 52 4F 47 52 41 4D A0 4A |....HE PROGRAM.J|
00001210: 55 4D 50 53 A0 54 4F A0 54 48 45 20 53 55 42 52 |UMPS.TO.THE SUBR|
00001220: 4F 55 54 49 4E 45 22 45 24 45 24 3A 54 B2 32 3A |OUTINE"E$E$:T.2:|
00001230: 8D 31 30 30 30 00 6D 13 02 02 99 22 91 1F CD D0 |.1000.m...."....|
00001240: D5 A0 50 55 53 48 45 53 20 52 45 54 55 52 4E A0 |..PUSHES RETURN.|
00001250: 41 44 44 52 45 53 53 A0 4F 4E A0 54 4F A0 53 54 |ADDRESS.ON.TO.ST|
00001260: 41 43 4B 22 3A 54 B2 31 3A 8D 31 30 30 30 00 A5 |ACK":T.1:.1000..|
00001270: 13 03 02 49 B2 33 3A 53 24 28 30 29 B2 53 32 24 |...I.3:S$(0).S2$|
00001280: 3A 8D 31 33 35 30 3A 8D 31 33 31 30 3A 49 B2 34 |:.1350:.1310:I.4|
00001290: 3A 53 24 28 30 29 B2 53 31 24 3A 8D 31 33 35 30 |:S$(0).S1$:.1350|
000012A0: 3A 8D 31 33 31 30 00 EE 13 04 02 8D 31 31 32 30 |:.1310......1120|
000012B0: 3A 99 22 13 11 1F D4 48 45 A0 53 55 42 52 4F 55 |:."....HE.SUBROU|
000012C0: 54 49 4E 45 A0 52 45 54 55 52 4E 53 A0 54 4F A0 |TINE.RETURNS.TO.|
000012D0: 4D 41 49 4E A0 50 52 4F 47 52 41 4D 20 20 20 20 |MAIN.PROGRAM |
000012E0: 22 45 24 45 24 3A 54 B2 32 3A 8D 31 30 30 30 00 |"E$E$:T.2:.1000.|
000012F0: 2B 14 05 02 99 22 91 91 91 1F CD D0 D5 20 50 55 |+...."....... PU|
00001300: 4C 4C 53 20 52 45 54 55 52 4E A0 41 44 44 52 45 |LLS RETURN.ADDRE|
00001310: 53 53 A0 46 52 4F 4D A0 54 48 45 20 53 54 41 43 |SS.FROM.THE STAC|
00001320: 4B 22 3A 54 B2 31 3A 8D 31 30 30 30 00 41 14 06 |K":T.1:.1000.A..|
00001330: 02 81 49 B2 34 A4 33 A9 AB 31 3A 8D 31 33 32 30 |..I.4.3..1:.1320|
00001340: 3A 82 00 7A 14 07 02 99 22 13 11 1F C4 41 54 41 |:..z...."....ATA|
00001350: A0 41 56 41 49 4C 41 42 4C 45 A0 54 4F A0 4D 41 |.AVAILABLE.TO.MA|
00001360: 49 4E A0 50 52 4F 47 52 41 4D A0 4F 4E 43 45 A0 |IN.PROGRAM.ONCE.|
00001370: 4D 4F 52 45 20 9A 22 45 24 45 24 00 8F 14 08 02 |MORE ."E$E$.....|
00001380: 8D 31 31 31 30 3A 91 5A 89 35 31 30 2C 35 30 30 |.1110:.Z.510,500|
00001390: 00 B0 14 0D 02 99 22 93 22 3A 8D 31 33 30 30 3A |......".":.1300:|
000013A0: 53 24 28 31 29 B2 47 24 3A 53 24 28 32 29 B2 47 |S$(1).G$:S$(2).G|
000013B0: 24 00 D0 14 0E 02 99 22 13 22 4C 24 2C 42 24 22 |$......"."L$,B$"|
000013C0: 1D 12 22 47 24 3A 99 2C 42 24 22 11 1D 12 22 47 |.."G$:.,B$"..."G|
000013D0: 24 00 0C 15 12 02 99 22 13 11 92 1F C9 4E 54 45 |$......".....NTE|
000013E0: 52 52 55 50 54 A0 53 49 47 4E 41 4C A0 52 45 43 |RRUPT.SIGNAL.REC|
000013F0: 45 49 56 45 44 20 28 4C 45 53 53 4F 4E 20 32 2E |EIVED (LESSON 2.|
00001400: 38 29 22 3A 54 B2 32 3A 8D 31 30 30 30 00 40 15 |8)":T.2:.1000.@.|
00001410: 13 02 99 22 13 11 1F CD D0 D5 20 50 55 53 48 45 |..."...... PUSHE|
00001420: 53 A0 D0 D2 CF C7 D2 C1 CD 20 C3 CF D5 CE D4 C5 |S........ ......|
00001430: D2 20 41 4E 44 20 D0 D2 CF C3 C5 D3 D3 CF D2 22 |. AND ........."|
00001440: 3B 00 79 15 14 02 99 22 1F D3 D4 C1 D4 D5 D3 20 |;.y...."....... |
00001450: 46 4C 41 47 53 20 28 CC 45 53 53 4F 4E 20 32 2E |FLAGS (.ESSON 2.|
00001460: 34 29 20 54 4F A0 54 48 45 A0 53 54 41 43 4B 22 |4) TO.THE.STACK"|
00001470: 3A 54 B2 31 3A 8D 31 30 30 30 00 B1 15 15 02 49 |:T.1:.1000.....I|
00001480: B2 33 3A 53 24 28 30 29 B2 53 32 24 3A 8D 31 33 |.3:S$(0).S2$:.13|
00001490: 35 30 3A 8D 31 33 31 30 3A 49 B2 34 3A 53 24 28 |50:.1310:I.4:S$(|
000014A0: 30 29 B2 53 31 24 3A 8D 31 33 35 30 3A 8D 31 33 |0).S1$:.1350:.13|
000014B0: 31 30 00 D8 15 16 02 49 B2 35 3A 53 24 28 30 29 |10.....I.5:S$(0)|
000014C0: B2 22 1F 12 20 D3 54 41 54 55 53 20 22 3A 8D 31 |.".. .TATUS ":.1|
000014D0: 33 35 30 3A 8D 31 33 31 30 00 13 16 17 02 8D 31 |350:.1310......1|
000014E0: 31 32 30 3A 99 22 13 11 1F C9 4E 54 45 52 52 55 |120:."....NTERRU|
000014F0: 50 54 A0 49 53 A0 53 45 52 56 49 43 45 44 22 45 |PT.IS.SERVICED"E|
00001500: 24 3A 99 22 91 22 45 24 45 24 3A 54 B2 32 3A 8D |$:."."E$E$:T.2:.|
00001510: 31 30 30 30 00 41 16 18 02 99 22 13 11 1F CD D0 |1000.A....".....|
00001520: D5 20 50 55 4C 4C 53 20 D0 D2 CF C3 C5 D3 D3 CF |. PULLS ........|
00001530: D2 20 D3 D4 C1 D4 D5 D3 20 46 4C 41 47 53 20 41 |. ...... FLAGS A|
00001540: 4E 44 00 72 16 19 02 99 22 91 D0 D2 CF C7 D2 C1 |ND.r....".......|
00001550: CD 20 C3 CF D5 CE D4 C5 D2 20 46 52 4F 4D A0 54 |. ....... FROM.T|
00001560: 48 45 A0 53 54 41 43 4B 22 3A 54 B2 31 3A 8D 31 |HE.STACK":T.1:.1|
00001570: 30 30 30 00 88 16 1A 02 81 49 B2 35 A4 33 A9 AB |000......I.5.3..|
00001580: 31 3A 8D 31 33 32 30 3A 82 00 B9 16 1B 02 99 22 |1:.1320:......."|
00001590: 13 11 1F D4 48 45 A0 50 52 4F 47 52 41 4D A0 43 |....HE.PROGRAM.C|
000015A0: 4F 4E 54 49 4E 55 45 53 A0 46 52 4F 4D A0 54 48 |ONTINUES.FROM.TH|
000015B0: 45 A0 50 4F 49 4E 54 A0 41 54 00 EE 16 1C 02 99 |E.POINT.AT......|
000015C0: 22 91 57 48 49 43 48 A0 49 54 A0 57 41 53 A0 49 |".WHICH.IT.WAS.I|
000015D0: 4E 54 45 52 52 55 50 54 45 44 9A 22 45 24 3A 8D |NTERRUPTED."E$:.|
000015E0: 31 31 31 30 3A 91 5A 89 35 32 35 2C 35 31 30 00 |1110:.Z.525,510.|
000015F0: 37 17 26 02 43 43 B2 31 35 3A 8D 35 30 30 30 3A |7.&.CC.15:.5000:|
00001600: 99 22 93 22 3A 8D 31 33 30 30 3A 99 22 13 11 92 |.".":.1300:."...|
00001610: 1F C1 20 50 52 4F 47 52 41 4D 20 43 41 4E 20 50 |.. PROGRAM CAN P|
00001620: 41 53 53 A0 44 41 54 41 A0 54 4F 20 41 A0 53 55 |ASS.DATA.TO A.SU|
00001630: 42 52 4F 55 54 49 4E 45 00 56 17 27 02 99 22 56 |BROUTINE.V.'.."V|
00001640: 49 41 A0 54 48 45 A0 53 54 41 43 4B 22 3A 54 B2 |IA.THE.STACK":T.|
00001650: 31 3A 8D 31 30 30 30 00 79 17 28 02 53 24 28 30 |1:.1000.y.(.S$(0|
00001660: 29 B2 53 33 24 3A 81 49 B2 31 A4 34 3A 8D 31 33 |).S3$:.I.1.4:.13|
00001670: 35 30 3A 8D 31 33 31 30 3A 82 00 BF 17 2A 02 8D |50:.1310:....*..|
00001680: 31 31 32 30 3A 99 22 13 11 1F D4 48 45 20 50 52 |1120:."....HE PR|
00001690: 4F 47 52 41 4D A0 4A 55 4D 50 53 A0 54 4F A0 54 |OGRAM.JUMPS.TO.T|
000016A0: 48 45 20 53 55 42 52 4F 55 54 49 4E 45 20 20 20 |HE SUBROUTINE |
000016B0: 20 22 3A 99 45 24 3A 54 B2 32 3A 8D 31 30 30 30 | ":.E$:T.2:.1000|
000016C0: 00 F7 17 2B 02 99 22 91 CD D0 D5 20 50 55 53 48 |...+..".... PUSH|
000016D0: 45 53 20 52 45 54 55 52 4E A0 41 44 44 52 45 53 |ES RETURN.ADDRES|
000016E0: 53 A0 4F 4E A0 54 4F A0 53 54 41 43 4B 22 3A 54 |S.ON.TO.STACK":T|
000016F0: B2 31 3A 8D 31 30 30 30 00 2F 18 2C 02 49 B2 35 |.1:.1000./.,.I.5|
00001700: 3A 53 24 28 30 29 B2 53 32 24 3A 8D 31 33 35 30 |:S$(0).S2$:.1350|
00001710: 3A 8D 31 33 31 30 3A 49 B2 36 3A 53 24 28 30 29 |:.1310:I.6:S$(0)|
00001720: B2 53 31 24 3A 8D 31 33 35 30 3A 8D 31 33 31 30 |.S1$:.1350:.1310|
00001730: 00 63 18 2D 02 8D 31 31 32 30 3A 99 22 13 11 1F |.c.-..1120:."...|
00001740: D9 4F 55 A0 4D 55 53 54 A0 50 55 4C 4C A0 54 48 |.OU.MUST.PULL.TH|
00001750: 45 A0 41 44 44 52 45 53 53 45 53 20 41 4E 44 20 |E.ADDRESSES AND |
00001760: 53 41 56 45 00 89 18 2E 02 99 22 54 48 45 4D 20 |SAVE......"THEM |
00001770: 53 4F 4D 45 57 48 45 52 45 20 20 20 20 22 45 24 |SOMEWHERE "E$|
00001780: 3A 54 B2 31 3A 8D 31 30 30 30 00 9D 18 2F 02 81 |:T.1:.1000.../..|
00001790: 49 B2 36 A4 31 A9 AB 31 3A 8D 31 33 32 30 00 DD |I.6.1..1:.1320..|
000017A0: 18 30 02 8B 49 B2 35 A7 99 22 13 11 1F C4 41 54 |.0..I.5.."....AT|
000017B0: 41 A0 4E 4F 57 20 41 56 41 49 4C 41 42 4C 45 A0 |A.NOW AVAILABLE.|
000017C0: 54 4F A0 54 48 45 A0 53 55 42 52 4F 55 54 49 4E |TO.THE.SUBROUTIN|
000017D0: 45 20 20 20 20 22 45 24 45 24 22 20 20 22 00 19 |E "E$E$" "..|
000017E0: 19 34 02 82 3A 8D 31 31 32 30 3A 99 22 13 11 1F |.4..:.1120:."...|
000017F0: C1 54 A0 53 55 42 52 4F 55 54 49 4E 45 A0 52 45 |.T.SUBROUTINE.RE|
00001800: 54 55 52 4E A0 59 4F 55 A0 4D 55 53 54 A0 50 55 |TURN.YOU.MUST.PU|
00001810: 53 48 A0 42 41 43 4B 20 22 3B 00 51 19 35 02 99 |SH.BACK ";.Q.5..|
00001820: 22 54 48 45 A0 52 45 54 55 52 4E A0 41 44 44 52 |"THE.RETURN.ADDR|
00001830: 45 53 53 20 46 4F 52 A0 54 48 45 A0 CD D0 D5 20 |ESS FOR.THE.... |
00001840: 54 4F A0 50 55 4C 4C 22 3A 54 B2 31 3A 8D 31 30 |TO.PULL":T.1:.10|
00001850: 30 30 00 89 19 36 02 49 B2 31 3A 53 24 28 30 29 |00...6.I.1:S$(0)|
00001860: B2 53 32 24 3A 8D 31 33 35 30 3A 8D 31 33 31 35 |.S2$:.1350:.1315|
00001870: 3A 49 B2 32 3A 53 24 28 30 29 B2 53 31 24 3A 8D |:I.2:S$(0).S1$:.|
00001880: 31 33 35 30 3A 8D 31 33 31 35 00 CA 19 37 02 99 |1350:.1315...7..|
00001890: 22 13 11 1F D3 55 42 52 4F 55 54 49 4E 45 A0 52 |"....UBROUTINE.R|
000018A0: 45 54 55 52 4E 53 A0 54 4F A0 54 48 45 20 4D 41 |ETURNS.TO.THE MA|
000018B0: 49 4E 20 50 52 4F 47 52 41 4D 20 20 22 45 24 45 |IN PROGRAM "E$E|
000018C0: 24 22 20 20 22 3A 8D 31 30 30 30 00 E6 19 41 02 |$" ":.1000...A.|
000018D0: 8D 31 31 32 30 3A 81 49 B2 32 A4 31 A9 AB 31 3A |.1120:.I.2.1..1:|
000018E0: 8D 31 33 32 30 3A 82 00 01 1A 42 02 99 22 9A 22 |.1320:....B.."."|
000018F0: 3B 3A 8D 31 31 31 30 3A 91 5A 89 35 35 30 2C 35 |;:.1110:.Z.550,5|
00001900: 32 35 00 29 1A 44 02 43 43 B2 31 32 3A 8D 35 30 |25.).D.CC.12:.50|
00001910: 30 30 3A 99 22 93 12 97 D3 D5 C2 D2 CF D5 D4 C9 |00:."...........|
00001920: CE C5 20 CE C5 D3 D4 C9 CE C7 00 57 1A 45 02 99 |.. ........W.E..|
00001930: 22 11 11 1F D4 48 45 20 CC C9 C6 CF 20 52 55 4C |"....HE .... RUL|
00001940: 45 A0 45 4E 41 42 4C 45 53 A0 53 55 42 52 4F 55 |E.ENABLES.SUBROU|
00001950: 54 49 4E 45 53 A0 54 4F 00 84 1A 46 02 99 22 43 |TINES.TO...F.."C|
00001960: 41 4C 4C A0 53 55 42 52 4F 55 54 49 4E 45 53 20 |ALL.SUBROUTINES |
00001970: 28 4E 45 53 54 49 4E 47 29 2E 20 20 C1 44 44 52 |(NESTING). .DDR|
00001980: 45 53 53 45 53 00 B8 1A 47 02 99 22 41 52 45 A0 |ESSES...G.."ARE.|
00001990: 50 55 53 48 45 44 A0 41 4E 44 A0 50 55 4C 4C 45 |PUSHED.AND.PULLE|
000019A0: 44 20 49 4E A0 53 45 51 55 45 4E 43 45 2E 22 3A |D IN.SEQUENCE.":|
000019B0: 54 B2 35 3A 8D 31 30 30 30 00 E8 1A 48 02 99 22 |T.5:.1000...H.."|
000019C0: 11 11 C3 48 45 43 4B A0 41 4C 4C A0 50 41 54 48 |...HECK.ALL.PATH|
000019D0: 53 A0 43 41 52 45 46 55 4C 4C 59 20 54 4F 20 45 |S.CAREFULLY TO E|
000019E0: 4E 53 55 52 45 20 59 4F 55 00 12 1B 49 02 99 22 |NSURE YOU...I.."|
000019F0: 44 4F A0 4E 4F 54 A0 4C 45 41 56 45 A0 54 48 49 |DO.NOT.LEAVE.THI|
00001A00: 4E 47 53 A0 49 4E 20 54 48 45 A0 53 54 41 43 4B |NGS.IN THE.STACK|
00001A10: A0 42 59 00 4C 1B 4A 02 99 22 4D 49 53 54 41 4B |.BY.L.J.."MISTAK|
00001A20: 45 2C 20 4F 52 A0 50 55 4C 4C A0 4F 55 54 A0 4D |E, OR.PULL.OUT.M|
00001A30: 4F 52 45 20 54 48 41 4E A0 59 4F 55 A0 50 55 53 |ORE THAN.YOU.PUS|
00001A40: 48 2E 22 3A 54 B2 36 3A 8D 31 30 30 30 00 7B 1B |H.":T.6:.1000.{.|
00001A50: 4C 02 99 22 11 11 D4 48 49 53 A0 49 53 A0 50 41 |L.."...HIS.IS.PA|
00001A60: 52 54 49 43 55 4C 41 52 4C 59 A0 49 4D 50 4F 52 |RTICULARLY.IMPOR|
00001A70: 54 41 4E 54 A0 4F 4E A0 45 58 49 54 00 A9 1B 4D |TANT.ON.EXIT...M|
00001A80: 02 99 22 46 52 4F 4D A0 53 55 42 52 4F 55 54 49 |.."FROM.SUBROUTI|
00001A90: 4E 45 53 2E 20 20 C9 46 A0 59 4F 55 A0 4C 45 41 |NES. .F.YOU.LEA|
00001AA0: 56 45 A0 44 41 54 41 A0 49 4E 00 DA 1B 4E 02 99 |VE.DATA.IN...N..|
00001AB0: 22 54 48 45 A0 53 54 41 43 4B 2C 20 52 45 54 55 |"THE.STACK, RETU|
00001AC0: 52 4E A0 41 44 44 52 45 53 53 A0 57 49 4C 4C A0 |RN.ADDRESS.WILL.|
00001AD0: 4E 4F 54 A0 42 45 A0 41 54 22 3B 00 0C 1C 4F 02 |NOT.BE.AT";...O.|
00001AE0: 99 22 54 48 45 A0 27 54 4F 50 27 2E 20 20 D4 48 |."THE.'TOP'. .H|
00001AF0: 45 A0 50 52 4F 47 52 41 4D 20 57 49 4C 4C A0 46 |E.PROGRAM WILL.F|
00001B00: 41 49 4C 20 21 9B 22 3A 8D 31 31 30 30 00 49 1C |AIL !.":.1100.I.|
00001B10: 58 02 43 43 B2 31 35 3A 8D 35 30 30 30 3A 99 22 |X.CC.15:.5000:."|
00001B20: 93 22 4C 24 22 98 D3 54 41 43 4B A0 D0 4F 49 4E |."L$"..TACK..OIN|
00001B30: 54 45 52 3D 24 39 30 2E 20 20 C1 46 54 45 52 A0 |TER=$90. .FTER.|
00001B40: 45 4E 54 45 52 49 4E 47 A0 41 00 8B 1C 59 02 99 |ENTERING.A...Y..|
00001B50: 22 53 55 42 52 4F 55 54 49 4E 45 2C 20 57 48 41 |"SUBROUTINE, WHA|
00001B60: 54 A0 57 49 4C 4C A0 49 54 A0 42 45 20 20 24 9D |T.WILL.IT.BE $.|
00001B70: 9D 22 3B 3A 8D 34 30 3A 8B 5A 24 B2 22 38 45 22 |.";:.40:.Z$."8E"|
00001B80: A7 99 22 11 CF CB 22 3A 89 37 30 30 00 A6 1C 5A |.."...":.700...Z|
00001B90: 02 99 22 11 CE 4F 2E 20 20 24 38 45 22 3A 54 B2 |.."..O. $8E":T.|
00001BA0: 31 3A 8D 31 30 30 30 00 EE 1C 5B 02 99 22 11 1F |1:.1000...[.."..|
00001BB0: C9 54 A0 49 53 A0 C4 C5 C3 D2 C5 CD C5 CE D4 C5 |.T.IS...........|
00001BC0: C4 2E 20 20 28 C1 20 32 2D 42 59 54 45 20 41 44 |.. (. 2-BYTE AD|
00001BD0: 44 52 45 53 53 A0 49 53 50 55 53 48 45 44 A0 4F |DRESS.ISPUSHED.O|
00001BE0: 4E 54 4F A0 54 48 45 A0 53 54 41 43 4B 2E 29 00 |NTO.THE.STACK.).|
00001BF0: 16 1D BC 02 99 22 9A 22 3B 3A 8D 31 31 30 30 3A |.....".";:.1100:|
00001C00: 99 22 93 22 4C 24 22 12 1F D2 C5 CD C5 CD C2 C5 |."."L$".........|
00001C10: D2 92 20 20 2E 2E 2E 00 53 1D BD 02 99 22 11 11 |.. ....S...."..|
00001C20: 11 97 C1 4C 57 41 59 53 A0 4B 45 45 50 A0 41 A0 |...LWAYS.KEEP.A.|
00001C30: 43 41 52 45 46 55 4C A0 41 43 43 4F 55 4E 54 20 |CAREFUL.ACCOUNT |
00001C40: 57 48 45 4E A0 55 53 49 4E 47 54 48 45 A0 53 54 |WHEN.USINGTHE.ST|
00001C50: 41 43 4B 2E 00 82 1D BF 02 99 22 11 11 11 D5 4E |ACK......."....N|
00001C60: 44 45 52 46 49 4C 4C 49 4E 47 A0 41 4E 44 A0 4F |DERFILLING.AND.O|
00001C70: 56 45 52 46 49 4C 4C 49 4E 47 A0 41 52 45 A0 56 |VERFILLING.ARE.V|
00001C80: 45 52 59 00 B7 1D C0 02 99 22 43 4F 4D 4D 4F 4E |ERY......"COMMON|
00001C90: 20 43 41 52 45 4C 45 53 53 20 4D 49 53 54 41 4B | CARELESS MISTAK|
00001CA0: 45 53 20 21 21 9A 22 3A 8D 31 31 31 30 3A 91 5A |ES !!.":.1110:.Z|
00001CB0: 89 35 38 30 2C 35 35 30 00 D8 1D EE 02 43 43 B2 |.580,550.....CC.|
00001CC0: 33 3A 8D 35 30 30 30 3A 8D 34 30 30 30 3A 99 22 |3:.5000:.4000:."|
00001CD0: 98 22 3B 3A 8D 31 31 30 30 00 09 1E 20 03 43 43 |.";:.1100... .CC|
00001CE0: B2 37 3A 8D 35 30 30 30 3A 99 22 93 98 CE 45 58 |.7:.5000:."...EX|
00001CF0: 54 A0 49 53 3A 20 20 12 95 A0 32 2E 34 20 20 36 |T.IS: ...2.4 6|
00001D00: 35 31 30 20 CD D0 D5 20 92 13 00 2F 1E 21 03 99 |510 ... .../.!..|
00001D10: 22 11 12 95 CC C9 C6 CF 22 3A 8D 31 33 30 30 3A |".......":.1300:|
00001D20: 53 24 28 30 29 B2 22 12 22 AA 47 24 3A 5A B2 31 |S$(0).".".G$:Z.1|
00001D30: 00 4A 1E 22 03 54 B2 B5 28 39 AC BB 28 31 29 29 |.J.".T..(9..(1))|
00001D40: 3A 8B 54 AA 5A B1 38 89 38 30 32 00 83 1E 23 03 |:.T.Z.8.802...#.|
00001D50: 81 49 B2 5A A4 54 AA 5A 3A 8D 31 33 35 30 3A 8D |.I.Z.T.Z:.1350:.|
00001D60: 31 33 31 30 3A A1 5A 24 3A 8B 5A 24 B1 B2 22 41 |1310:.Z$:.Z$.."A|
00001D70: 22 AF 5A 24 B3 B2 22 43 22 A7 49 B2 54 AA 5A 3A |".Z$.."C".I.T.Z:|
00001D80: 89 39 35 32 00 8F 1E 24 03 82 3A 5A B2 54 AA 5A |.952...$..:Z.T.Z|
00001D90: 00 A9 1E 25 03 54 B2 B5 28 39 AC BB 28 31 29 29 |...%.T..(9..(1))|
00001DA0: 3A 8B 54 B1 B2 5A 89 38 30 35 00 E1 1E 26 03 54 |:.T..Z.805...&.T|
00001DB0: B2 5A AB 54 3A 81 49 B2 5A A4 54 A9 AB 31 3A 8D |.Z.T:.I.Z.T..1:.|
00001DC0: 31 33 32 30 3A A1 5A 24 3A 8B 5A 24 B1 B2 22 41 |1320:.Z$:.Z$.."A|
00001DD0: 22 AF 5A 24 B3 B2 22 43 22 A7 49 B2 54 3A 89 39 |".Z$.."C".I.T:.9|
00001DE0: 35 32 00 EB 1E 27 03 5A B2 54 3A 82 00 23 1F 28 |52...'.Z.T:..#.(|
00001DF0: 03 99 22 13 22 4C 24 4C 24 4C 24 4C 24 22 98 12 |.."."L$L$L$L$"..|
00001E00: 41 92 47 41 49 4E 20 20 20 12 42 92 41 43 4B 20 |A.GAIN .B.ACK |
00001E10: 20 20 12 43 92 4F 4E 54 49 4E 55 45 13 97 22 3A | .C.ONTINUE..":|
00001E20: 89 38 30 32 00 3F 1F B8 03 82 3A 5A B2 C6 28 5A |.802.?....:Z..(Z|
00001E30: 24 29 AB 36 34 3A 91 5A 89 39 39 39 2C 39 39 39 |$).64:.Z.999,999|
00001E40: 00 5B 1F B9 03 9E 32 30 32 34 3A 8F 22 14 14 14 |.[....2024:."...|
00001E50: 14 14 14 14 14 14 14 14 14 45 4E 44 00 85 1F E7 |.........END....|
00001E60: 03 9E 32 31 33 36 3A 89 35 30 3A 8F 22 14 14 14 |..2136:.50:."...|
00001E70: 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 |................|
00001E80: 47 4F 54 4F 35 30 00 A9 1F E8 03 5A B2 54 49 AA |GOTO50.....Z.TI.|
00001E90: 38 30 AC 54 3A 9E 32 30 34 38 3A 8F 22 14 14 14 |80.T:.2048:."...|
00001EA0: 14 14 14 14 14 14 14 14 14 14 00 BB 1F E9 03 8B |................|
00001EB0: 5A B3 54 49 B0 C2 28 53 48 29 A7 8E 00 C5 1F EA |Z.TI..(SH)......|
00001EC0: 03 89 31 30 30 31 00 E2 1F 4C 04 99 22 13 22 4C |..1001...L.."."L|
00001ED0: 24 4C 24 4C 24 4C 24 22 12 43 92 4F 4E 54 49 4E |$L$L$L$".C.ONTIN|
00001EE0: 55 45 13 00 FA 1F 4F 04 8D 31 32 30 30 3A 8B 5A |UE....O..1200:.Z|
00001EF0: 24 B3 B1 22 43 22 89 31 31 30 33 00 04 20 50 04 |$.."C".1103.. P.|
00001F00: 89 31 31 31 32 00 34 20 56 04 99 22 13 22 4C 24 |.1112.4 V.."."L$|
00001F10: 4C 24 4C 24 4C 24 22 12 41 92 47 41 49 4E 20 20 |L$L$L$".A.GAIN |
00001F20: 20 12 42 92 41 43 4B 20 20 20 12 43 92 4F 4E 54 | .B.ACK .C.ONT|
00001F30: 49 4E 55 45 13 00 52 20 57 04 8D 31 32 30 30 3A |INUE..R W..1200:|
00001F40: 8B 5A 24 B3 22 41 22 B0 5A 24 B1 22 43 22 89 31 |.Z$."A".Z$."C".1|
00001F50: 31 31 31 00 63 20 58 04 5A B2 C6 28 5A 24 29 AB |111.c X.Z..(Z$).|
00001F60: 36 34 3A 8E 00 8B 20 60 04 99 22 13 22 4C 24 4C |64:... `.."."L$L|
00001F70: 24 4C 24 4C 24 22 92 9A D0 52 45 53 53 A0 12 D2 |$L$L$"...RESS...|
00001F80: C5 D4 D5 D2 CE 92 22 45 24 22 13 22 00 A5 20 61 |......"E$".".. a|
00001F90: 04 8D 31 32 30 30 3A 8B 5A 24 B3 B1 C7 28 31 33 |..1200:.Z$...(13|
00001FA0: 29 89 31 31 32 31 00 BF 20 62 04 99 22 13 22 4C |).1121.. b.."."L|
00001FB0: 24 4C 24 4C 24 4C 24 45 24 45 24 22 13 22 3A 8E |$L$L$L$E$E$".":.|
00001FC0: 00 DC 20 6A 04 5A 24 B2 5A 24 AA C7 28 35 35 AA |.. j.Z$.Z$..(55.|
00001FD0: 4A AA 37 AC 28 4A B3 31 30 29 29 3A 8E 00 F1 20 |J.7.(J.10)):... |
00001FE0: B0 04 A1 5A 24 3A 8B 5A 24 B3 B1 22 22 89 31 32 |...Z$:.Z$.."".12|
00001FF0: 30 30 00 05 21 B1 04 A1 5A 24 3A 8B 5A 24 B2 22 |00..!...Z$:.Z$."|
00002000: 22 89 31 32 30 31 00 2D 21 B2 04 9E 32 30 34 38 |".1201.-!...2048|
00002010: 3A 8E 3A 8F 22 14 14 14 14 14 14 14 14 14 14 14 |:.:."...........|
00002020: 14 14 14 14 14 14 14 14 52 45 54 55 52 4E 00 66 |........RETURN.f|
00002030: 21 14 05 99 22 13 97 22 4C 24 3B 3A 81 49 B2 31 |!...".."L$;:.I.1|
00002040: A4 31 36 3A 99 2C 42 24 22 A1 22 47 24 22 12 A1 |.16:.,B$"."G$"..|
00002050: 22 3A 82 3A 99 2C 42 24 22 12 20 20 D3 D4 C1 C3 |":.:.,B$". ....|
00002060: CB 20 20 20 22 3A 8E 00 90 21 1E 05 99 46 24 3A |. ":...!...F$:|
00002070: 81 4A B2 31 A4 38 3A 99 22 91 12 22 C9 28 53 24 |.J.1.8:."..".(S$|
00002080: 28 30 29 2C 4A 29 3A 82 3A 99 22 91 9D 9D 9D 22 |(0),J):.:."...."|
00002090: 3B 00 B3 21 1F 05 81 4A B2 31 A4 31 37 3A 99 22 |;..!...J.1.17:."|
000020A0: 92 20 20 20 12 22 53 24 28 30 29 43 24 43 24 3B |. ."S$(0)C$C$;|
000020B0: 3A 82 3A 99 00 D8 21 20 05 81 4A B2 35 A4 36 3A |:.:...! ..J.5.6:|
000020C0: 99 C8 28 22 13 11 11 11 11 11 22 2C 4A 29 3B 3A |..("......",J);:|
000020D0: 8D 31 33 39 38 3A 82 3A 8E 00 04 22 23 05 99 46 |.1398:.:..."#..F|
000020E0: 24 3A 81 4A B2 31 A4 38 3A 99 22 91 22 2C 2C C8 |$:.J.1.8:.".",,.|
000020F0: 28 45 24 2C 32 30 AB 4A 29 C8 28 53 24 28 30 29 |(E$,20.J).(S$(0)|
00002100: 2C 4A 29 3A 82 00 2F 22 24 05 99 46 24 2C 2C 2C |,J):../"$..F$,,,|
00002110: 22 20 22 3B 3A 81 4A B2 31 A4 31 36 3A 99 53 24 |" ";:.J.1.16:.S$|
00002120: 28 30 29 22 92 20 22 43 24 43 24 3B 3A 82 3A 99 |(0)". "C$C$;:.:.|
00002130: 00 54 22 25 05 81 4A B2 35 A4 36 3A 99 C8 28 22 |.T"%..J.5.6:..("|
00002140: 13 11 11 11 11 11 22 2C 4A 29 3B 3A 8D 31 33 39 |......",J);:.139|
00002150: 38 3A 82 3A 8E 00 71 22 28 05 99 46 24 22 11 22 |8:.:..q"(..F$"."|
00002160: 3B 3A 8D 31 33 39 39 3A 99 46 24 3B 3A 8D 31 33 |;:.1399:.F$;:.13|
00002170: 39 39 00 A3 22 2D 05 99 46 24 2C 42 24 3B 3A 8D |99.."-..F$,B$;:.|
00002180: 31 33 35 31 3A 81 4A B2 31 A4 31 35 3A 99 22 92 |1351:.J.1.15:.".|
00002190: 20 20 20 22 53 24 28 30 29 43 24 43 24 3B 3A 82 | "S$(0)C$C$;:.|
000021A0: 3A 99 3A 99 00 D6 22 2F 05 81 4A B2 39 A4 31 A9 |:.:..."/..J.9.1.|
000021B0: AB 31 3A 99 22 91 91 22 2C 2C 2C 22 92 20 22 C8 |.1:."..",,,". ".|
000021C0: 28 45 24 2C 31 30 AB 4A 29 C8 28 53 24 28 30 29 |(E$,10.J).(S$(0)|
000021D0: 2C 4A AA 31 29 3A 82 00 E8 22 30 05 99 22 91 91 |,J.1):..."0.."..|
000021E0: 20 20 22 45 24 45 24 3A 8E 00 08 23 46 05 81 4A | "E$E$:...#F..J|
000021F0: B2 37 A4 30 A9 AB 31 3A 53 24 28 4A AA 31 29 B2 |.7.0..1:S$(J.1).|
00002200: 53 24 28 4A 29 3A 82 3A 8E 00 25 23 47 05 81 4A |S$(J):.:..%#G..J|
00002210: B2 30 A4 37 3A 53 24 28 4A 29 B2 53 24 28 4A AA |.0.7:S$(J).S$(J.|
00002220: 31 29 3A 82 3A 8E 00 4C 23 76 05 81 59 B2 31 A4 |1):.:..L#v..Y.1.|
00002230: 49 3A 99 2C 42 24 22 1D 22 47 24 3A 99 2C 42 24 |I:.,B$"."G$:.,B$|
00002240: 22 1D 12 22 53 24 28 59 29 3A 82 3A 8E 00 73 23 |".."S$(Y):.:..s#|
00002250: 77 05 81 59 B2 31 A4 49 3A 99 2C 42 24 22 1D 12 |w..Y.1.I:.,B$"..|
00002260: 22 53 24 28 59 29 3A 99 2C 42 24 22 1D 22 47 24 |"S$(Y):.,B$"."G$|
00002270: 3A 82 3A 8E 00 98 23 D0 07 99 C7 28 31 34 32 29 |:.:...#....(142)|
00002280: 22 1D 95 22 3B 3A 81 49 B2 31 A4 34 3A 99 22 A4 |"..";:.I.1.4:.".|
00002290: A4 A4 A4 22 3B 3A 82 3A 99 00 BE 23 D3 07 81 49 |...";:.:...#...I|
000022A0: B2 31 A4 32 32 3A 5A 24 B2 22 A7 92 22 3A 8B 49 |.1.22:Z$."..":.I|
000022B0: B3 34 B0 49 B1 31 39 A7 5A 24 B2 22 A7 12 22 00 |.4.I.19.Z$."..".|
000022C0: EF 23 D4 07 99 5A 24 3B 3A 81 4A B2 31 A4 34 3A |.#...Z$;:.J.1.4:|
000022D0: 99 22 BA BA BA BA 22 3B 3A 82 3A 99 22 92 A5 22 |."....";:.:.".."|
000022E0: 3A 82 49 3A 47 24 B2 22 C0 C0 C0 C0 C0 C0 C0 C0 |:.I:G$."........|
000022F0: 00 F5 23 D5 07 8E 00 33 24 D6 07 99 2C 2C 22 98 |..#....3$...,,".|
00002300: B0 22 47 24 22 B2 22 47 24 22 AE 22 3A 5A 24 B2 |."G$"."G$".":Z$.|
00002310: 22 DD 1D 1D 1D 22 AA 42 24 3A 99 2C 2C 5A 24 5A |"....".B$:.,,Z$Z|
00002320: 24 22 DD 22 3A 99 2C 2C 22 AB 22 47 24 22 DB 22 |$".":.,,"."G$"."|
00002330: 47 24 22 B3 00 55 24 D7 07 99 2C 2C 5A 24 5A 24 |G$"..U$...,,Z$Z$|
00002340: 22 DD 22 3A 99 2C 2C 22 AD 22 47 24 22 B1 22 47 |".":.,,"."G$"."G|
00002350: 24 22 BD 22 3A 8E 00 8B 24 20 08 8D 31 30 30 30 |$".":...$ ..1000|
00002360: 3A 47 24 B2 22 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 |:G$."...........|
00002370: D1 D1 D1 D1 D1 BA BA BA BA BA BA BA BA BA BA BA |................|
00002380: BA BA BA BA BA 22 3A 5A B2 31 30 30 00 BC 24 21 |.....":Z.100..$!|
00002390: 08 99 22 13 22 4C 24 4C 24 4C 24 4C 24 22 12 9A |.."."L$L$L$L$"..|
000023A0: 43 92 4F 4E 54 49 4E 55 45 95 22 3B 3A A1 5A 24 |C.ONTINUE.";:.Z$|
000023B0: 3A 8B 5A 24 B3 B1 22 22 89 32 30 38 31 00 F9 24 |:.Z$.."".2081..$|
000023C0: 22 08 5A 24 B2 22 22 3A 5A B2 5A AA 31 3A 4A B2 |".Z$."":Z.Z.1:J.|
000023D0: B5 28 5A AD 31 36 29 3A 8D 31 31 33 30 3A 4A B2 |.(Z.16):.1130:J.|
000023E0: 5A AB 31 36 AC 4A 3A 8D 31 31 33 30 3A 99 46 24 |Z.16.J:.1130:.F$|
000023F0: 2C 2C 2C 22 1D 1D 1D 22 5A 24 00 22 25 24 08 5A |,,,"..."Z$."%$.Z|
00002400: B2 5A AB 31 3A 8B 5A B1 31 36 A7 81 49 B2 31 A4 |.Z.1:.Z.16..I.1.|
00002410: 5A AD 31 36 3A 99 22 1D 22 C8 28 47 24 2C 31 36 |Z.16:.".".(G$,16|
00002420: 29 3A 82 00 53 25 25 08 99 22 1D 22 CA 28 47 24 |):..S%%..".".(G$|
00002430: 2C 31 36 AB 5A AA 31 36 AC B5 28 5A AD 31 36 29 |,16.Z.16..(Z.16)|
00002440: 2C 31 36 29 3A 99 22 1D 22 CA 28 47 24 2C 31 37 |,16):.".".(G$,17|
00002450: 2C 31 36 29 00 79 25 26 08 5A B2 5A AA 32 AB B5 |,16).y%&.Z.Z.2..|
00002460: 28 35 AC BB 28 31 29 29 AA 32 AC 28 5A B1 32 35 |(5..(1)).2.(Z.25|
00002470: 35 29 AB 32 AC 28 5A B3 35 29 00 8F 25 27 08 A1 |5).2.(Z.5)..%'..|
00002480: 5A 24 3A 8B 5A 24 B3 B1 22 43 22 89 32 30 38 32 |Z$:.Z$.."C".2082|
00002490: 00 95 25 28 08 8E 00 B1 25 B8 0B 99 22 93 12 1F |..%(....%..."...|
000024A0: CC C5 D3 D3 CF CE 20 32 2E 33 20 3A 20 D3 D4 C1 |...... 2.3 : ...|
000024B0: C3 CB 00 E4 25 C2 0B 99 22 11 98 D4 48 49 53 A0 |....%..."...HIS.|
000024C0: 4C 45 53 53 4F 4E A0 44 45 53 43 52 49 42 45 53 |LESSON.DESCRIBES|
000024D0: A0 54 48 45 A0 53 4F 46 54 57 41 52 45 20 53 54 |.THE.SOFTWARE ST|
000024E0: 41 43 4B 22 3B 00 0A 26 CC 0B 99 22 49 4E 20 54 |ACK";..&..."IN T|
000024F0: 48 45 20 C3 CF CD CD CF C4 CF D2 C5 20 36 34 3A |HE ......... 64:|
00002500: 22 3A 54 B2 32 3A 8D 31 30 30 30 00 31 26 D6 0B |":T.2:.1000.1&..|
00002510: 99 42 24 22 11 97 D2 C1 CD 20 50 41 47 45 20 31 |.B$"..... PAGE 1|
00002520: 20 55 53 41 47 45 3B 22 3A 54 B2 32 3A 8D 31 30 | USAGE;":T.2:.10|
00002530: 30 30 00 62 26 E0 0B 99 42 24 22 11 C3 48 52 4F |00.b&...B$"..HRO|
00002540: 4E 4F 4C 4F 47 49 43 41 4C A0 4E 41 54 55 52 45 |NOLOGICAL.NATURE|
00002550: A0 4F 46 A0 41 A0 53 54 41 43 4B 3B 22 3A 8D 31 |.OF.A.STACK;":.1|
00002560: 30 30 30 00 8C 26 EA 0B 99 42 24 22 11 D3 4F 46 |000..&...B$"..OF|
00002570: 54 57 41 52 45 A0 53 54 41 43 4B A0 49 4E A0 50 |TWARE.STACK.IN.P|
00002580: 41 47 45 20 31 3B 22 3A 8D 31 30 30 30 00 AB 26 |AGE 1;":.1000..&|
00002590: F4 0B 99 42 24 22 11 D3 54 41 43 4B A0 50 4F 49 |...B$"..TACK.POI|
000025A0: 4E 54 45 52 3B 22 3A 8D 31 30 30 30 00 D7 26 FE |NTER;":.1000..&.|
000025B0: 0B 99 42 24 22 11 D7 48 41 54 A0 54 48 45 A0 53 |..B$"..HAT.THE.S|
000025C0: 54 41 43 4B A0 49 53 A0 55 53 45 44 A0 46 4F 52 |TACK.IS.USED.FOR|
000025D0: 3B 22 3A 8D 31 30 30 30 00 FB 26 08 0C 99 42 24 |;":.1000..&...B$|
000025E0: 22 11 C3 59 43 4C 45 A0 4F 46 A0 4F 50 45 52 41 |"..YCLE.OF.OPERA|
000025F0: 54 49 4F 4E 3B 22 3A 8D 31 30 30 30 00 29 27 12 |TION;":.1000.)'.|
00002600: 0C 99 42 24 22 11 C3 4F 4D 4D 4F 4E A0 50 49 54 |..B$"..OMMON.PIT|
00002610: 46 41 4C 4C 53 A0 41 4E 44 20 4D 49 53 54 41 4B |FALLS.AND MISTAK|
00002620: 45 53 2E 22 3A 8D 31 30 30 30 00 2F 27 1C 0C 8E |ES.":.1000./'...|
00002630: 00 40 27 A0 0F 99 22 93 12 1F D3 D5 CD CD C1 D2 |.@'...".........|
00002640: D9 00 68 27 AA 0F 99 22 11 98 D4 48 49 53 20 4C |..h'..."...HIS L|
00002650: 45 53 53 4F 4E 20 48 41 53 20 43 4F 56 45 52 45 |ESSON HAS COVERE|
00002660: 44 3A 22 3A 89 33 30 33 30 00 A4 27 88 13 97 35 |D:":.3030..'...5|
00002670: 33 32 38 30 2C 43 43 3A 97 35 33 32 38 31 2C 43 |3280,CC:.53281,C|
00002680: 43 3A 9E 32 30 34 38 3A 8E 3A 8F 22 14 14 14 14 |C:.2048:.:."....|
00002690: 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 52 |...............R|
000026A0: 45 54 55 52 4E 00 B1 27 70 17 8F 31 35 2C 38 2C |ETURN..'p..15,8,|
000026B0: 31 35 00 D7 27 71 17 8F 31 2C 38 2C 38 2C 22 44 |15..'q..1,8,8,"D|
000026C0: 41 54 41 2C 53 2C 52 22 3A 8D 36 30 31 30 3A 8B |ATA,S,R":.6010:.|
000026D0: 45 4E A7 9E 32 30 32 34 00 DE 27 72 17 A0 31 00 |EN..2024..'r..1.|
000026E0: 11 28 73 17 8F 32 2C 38 2C 32 2C 22 23 22 3A 98 |.(s..2,8,2,"#":.|
000026F0: 31 35 2C 22 55 31 3A 22 3B 32 3B 30 3B 31 3B 30 |15,"U1:";2;0;1;0|
00002700: 3A 8D 36 30 31 30 3A 8B 45 4E B2 30 A7 9E 32 30 |:.6010:.EN.0..20|
00002710: 32 34 00 1E 28 74 17 A0 32 3A A0 31 35 3A 8E 00 |24..(t..2:.15:..|
00002720: 33 28 7A 17 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 |3(z..15,EN,EM$,E|
00002730: 54 2C 45 53 00 39 28 7B 17 8E 00 00 00 54 54 53 |T,ES.9({.....TTS|
00002740: 21 34 AA AA CD 5C FF |!4...\. |
..162.000000...W..........W............
..W......................W....}.... ....
.&......................................
........................................
........................................
........................................
.....................X.....HHHHH...F.+.-
.,.. ....-.-P...I.P.JP....)....HP.L.....
....$..................................
..................RUN......... .........
.H......................................
........................................
.....................................E|.
..........LH..1..EG.J.....P.3.W.J...>./.
F.......................................
........................................
.............................(.."?....";
...)..1,0:.1,Z$: 1:.".":........)....F..
.W....X.......E...L.....................
.............999
L~.
.. 8L}.
.`....B..
.......LO.
M......
..I....L..
.I`.. W..
..F..%.LQ.
..[.L..
'P. .
...C....0. .C.O....P..Q.
C....D.L.. .\.Q...
.R..`.X.P. ...
S....W.L..
L......P.L..................O....
2024:."............REM W.OWEN MURCOTT FE
BRUARY 1983 WOMFIS 64.\....50
:MLA....2..:B$.".....":C$.".....":E$."
":F$."....."...3.L$."..
...."...4..S$(8):S1$."..ADDR LO":S2$.".
.ADDR HI":S3$.".. DATA "...<.SH.653:C
C.6:.5000.?.D..G(14)".."L$,,"...........
... ............. ...........".K.E..B$
"....* HARDWARE AND INSTRUCTIONS *...F
..,".... 2.3 STACK":T.3:.1000:.6000
...}.CC.3:.5000:.3000:.".";:.1100.....CC
.15:.5000:.G(142)".. RAM":.2000:."
.",,B$". ADDRESS":.2006.!....,,".......
HI . LO .".S....,,".....01"B$"..
00":.".....PAGE 1":T.2:.1000... ..,,".PA
GE 1 IS USED FOR":.,,"THE STACK":.1000..
....,,".THIS IS LIKE A FAST":.,,"ACCESS
NOTE-PAD,......,,"GIVING A TEMPORARY":.,
,"STORAGE FACILITY":T.4:.2080./.H.CC.7:.
5000:.G(14)"...CONCEPT OF A STACK":G$."
".[.J.."..IT IS CHRONOLOGICAL ..
.":T.2:.1000..M..1300:.1000:."."L$L$" .
.LAST IN...R..I.0.8:S$(I)."..".G$:.:.I.1
.6:.1310:T.1:.1000:....W..1000:."."L$L$,
,,"..FIRST OUT":.1000......I.6.3..1:.132
0:.1000:.:.".";:.1100.M...CC.12:.5000:."
."L$".SOME COMPUTERS HAVE A HARDWARE STA
CK.":T.2:.1000.|...."..THE STACK ON THE
COMMODORE 64 IS SITED. ...."IN MEMORY.."
:.1110:.Z.250,200.....CC.15:.5000:."..
RAM PAGE 1":.2000:.".",,B$". ADDRESS"
:.2006......,,"....... STACK POINTER "
.I....,,"....THE STACK IS BUILT":.,,"DOW
NWARDS FROM $FF":T.2:.1000.S....F$".":.I
.1.6:.".";:.J.1.16:."Q";:.:.......I:.".Q
QQQ":.F$,,,". 94":.1000.P....,,"....TH
E STACK POINTER":.,,"IN THE MPU CONTAINS
"......,,"THE ADDRESS OF THE":.,,"NEXT F
REE CELL":T.4:.1000.F....,,".A NINTH BIT
IS":.,,"PERMANENTLY SET = 1":T.2:.1000.
.....F$,,B$".1":.1000:.,,L$L$"THIS PERMI
TS 8-BIT":.,,"ADDRESSING, USING......,,"
PAGE 1":.2080.K.,.CC.12:.5000:."."G(14)"
.STACK USAGE...-.."...THE STACK IS USED
AUTOMATICALLY TO:":T.2:.1000.7....".."B$
"SAVE SUBROUTINE RETURN ADDRESSES":.1000
.../..".."B$"STORE MPU REGISTERS ON INTE
RRUPT":.B$" (LESSON 2.8).":T.4:.1000...1
.."..YOU CAN ALSO USE IT IN YOUR PROGRAM
TO...2.."SAVE DATA TEMPORARILY, AT HIGH
SPEED:":T.2:.1000...3..".."B$"YOU CAN P
USH DATA ON TO IT":.1000.E.4..".."B$"YOU
CAN PULL DATA FROM IT.":.1000...5.."..A
SSEMBLER HAS INSTRUCTIONS FOR PUSH/PULLO
PERATIONS.....@..1110:.Z.260,250...B.CC.
3:.5000:."."L$L$".NOW FOLLOW EXAMPLES OF
STACK USAGE ...":.1100.....CC.15:.5000
:.".":G$.". ":.1300.H....1120:.".
..A MAIN PROGRAM JUMPS TO A SUBROUTINE":
T.2:.1000.{...."MPU PUSHES RETURN ADDRES
S ON TO STACK":.1000.....I.1:S$(0).S2$:.
1350:.1310:I.2:S$(0).S1$:.1350:.1310....
..1120:."...SUBROUTINE RETURNS TO MAIN P
ROGRAM ":.E$E$:T.2:.1000.3...."..MPU PU
LLS RETURN ADDRESS FROM THE STACK":T.1:.
1000.`....I.2.1..1:.1320:.:.".";:.1110:.
Z.500,300. ....".":.1300:."....A PROGRAM
MAY USE THE STACK TO SAVE DATA";.O...."
WHILST EXECUTING A SUBROUTINE":T.1:.1000
.....S$(0).S3$:.I.1.2:.1350:.1310:..4...
.1120:."...THE PROGRAM JUMPS TO THE SUBR
OUTINE"E$E$:T.2:.1000.M...."..MPU PUSHES
RETURN ADDRESS ON TO STACK":T.1:.1000..
...I.3:S$(0).S2$:.1350:.1310:I.4:S$(0).S
1$:.1350:.1310......1120:."...THE SUBROU
TINE RETURNS TO MAIN PROGRAM "E$E$:T.
2:.1000.+...."....MPU PULLS RETURN ADDRE
SS FROM THE STACK":T.1:.1000.A....I.4.3.
.1:.1320:..Z...."...DATA AVAILABLE TO MA
IN PROGRAM ONCE MORE ."E$E$......1110:.Z
.510,500......".":.1300:S$(1).G$:S$(2).G
$.P...."."L$,B$".."G$:.,B$"..."G$......"
....INTERRUPT SIGNAL RECEIVED (LESSON 2.
8)":T.2:.1000.@...."...MPU PUSHES PROGRA
M COUNTER AND PROCESSOR";.Y....".STATUS
FLAGS (LESSON 2.4) TO THE STACK":T.1:.10
00.....I.3:S$(0).S2$:.1350:.1310:I.4:S$(
0).S1$:.1350:.1310.X...I.5:S$(0).".. STA
TUS ":.1350:.1310......1120:."...INTERRU
PT IS SERVICED"E$:."."E$E$:T.2:.1000.A..
.."...MPU PULLS PROCESSOR STATUS FLAGS A
ND.R....".PROGRAM COUNTER FROM THE STACK
":T.1:.1000......I.5.3..1:.1320:......."
...THE PROGRAM CONTINUES FROM THE POINT
AT......".WHICH IT WAS INTERRUPTED."E$:.
1110:.Z.525,510.7.&.CC.15:.5000:.".":.13
00:."....A PROGRAM CAN PASS DATA TO A SU
BROUTINE.V.'.."VIA THE STACK":T.1:.1000.
Y.(.S$(0).S3$:.I.1.4:.1350:.1310:....*..
1120:."...THE PROGRAM JUMPS TO THE SUBRO
UTINE ":.E$:T.2:.1000...+..".MPU PUSH
ES RETURN ADDRESS ON TO STACK":T.1:.1000
./.,.I.5:S$(0).S2$:.1350:.1310:I.6:S$(0)
.S1$:.1350:.1310.C.-..1120:."...YOU MUST
PULL THE ADDRESSES AND SAVE......"THEM
SOMEWHERE "E$:T.1:.1000.../..I.6.1..1
:.1320...0..I.5.."...DATA NOW AVAILABLE
TO THE SUBROUTINE "E$E$" "...4..:.11
20:."...AT SUBROUTINE RETURN YOU MUST PU
SH BACK ";.Q.5.."THE RETURN ADDRESS FOR
THE MPU TO PULL":T.1:.1000...6.I.1:S$(0)
.S2$:.1350:.1315:I.2:S$(0).S1$:.1350:.13
15.J.7.."...SUBROUTINE RETURNS TO THE MA
IN PROGRAM "E$E$" ":.1000...A..1120:.I
.2.1..1:.1320:....B..".";:.1110:.Z.550,5
25.).D.CC.12:.5000:."...SUBROUTINE NESTI
NG.W.E.."...THE LIFO RULE ENABLES SUBROU
TINES TO...F.."CALL SUBROUTINES (NESTING
). ADDRESSES...G.."ARE PUSHED AND PULLE
D IN SEQUENCE.":T.5:.1000...H.."..CHECK
ALL PATHS CAREFULLY TO ENSURE YOU...I.."
DO NOT LEAVE THINGS IN THE STACK BY.L.J.
."MISTAKE, OR PULL OUT MORE THAN YOU PUS
H.":T.6:.1000.{.L.."..THIS IS PARTICULAR
LY IMPORTANT ON EXIT...M.."FROM SUBROUTI
NES. IF YOU LEAVE DATA IN.Z.N.."THE STA
CK, RETURN ADDRESS WILL NOT BE AT";...O.
."THE 'TOP'. THE PROGRAM WILL FAIL !.":
.1100.I.X.CC.15:.5000:."."L$".STACK POIN
TER=$90. AFTER ENTERING A...Y.."SUBROUT
INE, WHAT WILL IT BE $..";:.40:.Z$."8E"
..".OK":.700...Z..".NO. $8E":T.1:.1000.
..[.."..IT IS DECREMENTED. (A 2-BYTE AD
DRESS ISPUSHED ONTO THE STACK.)......"."
;:.1100:."."L$"..REMEMBER. ....S...."..
..ALWAYS KEEP A CAREFUL ACCOUNT WHEN USI
NGTHE STACK......."...UNDERFILLING AND O
VERFILLING ARE VERY......"COMMON CARELES
S MISTAKES !!.":.1110:.Z.580,550.X...CC.
3:.5000:.4000:.".";:.1100... .CC.7:.5000
:."..NEXT IS: .. 2.4 6510 MPU .../.!..
"...LIFO":.1300:S$(0).".".G$:Z.1.J.".T..
(9..(1)):.T.Z.8.802...#..I.Z.T.Z:.1350:.
1310:.Z$:.Z$.."A".Z$.."C".I.T.Z:.952...$
..:Z.T.Z...%.T..(9..(1)):.T..Z.805...&.T
.Z.T:.I.Z.T..1:.1320:.Z$:.Z$.."A".Z$.."C
".I.T:.952...'.Z.T:..#.(.."."L$L$L$L$"..
A.GAIN .B.ACK .C.ONTINUE..":.802.?..
..:Z.F(Z$).64:.Z.999,999.[....2024:."...
.........END......2136:.50:."...........
........GOTO50.....Z.TI.80.T:.2048:."...
................Z.TI.B(SH)...E....1001..
.L.."."L$L$L$L$".C.ONTINUE....O..1200:.Z
$.."C".1103.. P..1112.4 V.."."L$L$L$L$".
A.GAIN .B.ACK .C.ONTINUE..R W..1200:
.Z$."A".Z$."C".1111.C X.Z.F(Z$).64:... `
.."."L$L$L$L$"..PRESS .RETURN."E$".".. A
..1200:.Z$..G(13).1121.. B.."."L$L$L$L$E
$E$".":... J.Z$.Z$.G(55.J.7.(J.10)):...
...Z$:.Z$.."".1200..!...Z$:.Z$."".1201.-
!...2048:.:."...................RETURN.F
!...".."L$;:.I.1.16:.,B$"."G$"..":.:.,B$
". STACK ":...!...F$:.J.1.8:.".."I(S$
(0),J):.:."....";..!...J.1.17:.". ."S$
(0)C$C$;:.:..X! ..J.5.6:.H("......",J);:
.1398:.:..."#..F$:.J.1.8:.".",,H(E$,20.J
)H(S$(0),J):../"$..F$,,," ";:.J.1.16:.S$
(0)". "C$C$;:.:..T"%..J.5.6:.H("......",
J);:.1398:.:..Q"(..F$".";:.1399:.F$;:.13
99.."-..F$,B$;:.1351:.J.1.15:.". "S$(0
)C$C$;:.:.:..V"/..J.9.1..1:."..",,,". "H
(E$,10.J)H(S$(0),J.1):..."0..".. "E$E$:
...#F..J.7.0..1:S$(J.1).S$(J):.:..%#G..J
.0.7:S$(J).S$(J.1):.:..L#V..Y.1.I:.,B$".
"G$:.,B$".."S$(Y):.:..S#W..Y.1.I:.,B$"..
"S$(Y):.,B$"."G$:.:...#P..G(142)"..";:.I
.1.4:."....";:.:...#S..I.1.22:Z$."..":.I
.4.I.19.Z$.".."..#T..Z$;:.J.1.4:."....";
:.:."..":.I:G$."..........#U...3$V..,,".
."G$"."G$".":Z$."....".B$:.,,Z$Z$".":.,,
"."G$"."G$"..U$W..,,Z$Z$".":.,,"."G$"."G
$".":...$ ..1000:G$."QQQQQQQQQQQQQQQQ...
.............":Z.100..$!.."."L$L$L$L$"..
C.ONTINUE.";:.Z$:.Z$.."".2081..$".Z$."":
Z.Z.1:J..(Z.16):.1130:J.Z.16.J:.1130:.F$
,,,"..."Z$."%$.Z.Z.1:.Z.16..I.1.Z.16:.".
"H(G$,16):..S%%.."."J(G$,16.Z.16..(Z.16)
,16):."."J(G$,17,16).Y%&.Z.Z.2..(5..(1))
.2.(Z.255).2.(Z.5)..%'..Z$:.Z$.."C".2082
..%(....%..."...LESSON 2.3 : STACK..%B..
"..THIS LESSON DESCRIBES THE SOFTWARE ST
ACK";..&L.."IN THE COMMODORE 64:":T.2:.1
000.1&V..B$"..RAM PAGE 1 USAGE;":T.2:.10
00.B&...B$".CHRONOLOGICAL NATURE OF A ST
ACK;":.1000..&...B$".SOFTWARE STACK IN P
AGE 1;":.1000..&...B$".STACK POINTER;":.
1000.W&...B$".WHAT THE STACK IS USED FOR
;":.1000..&...B$".CYCLE OF OPERATION;":.
1000.)'...B$".COMMON PITFALLS AND MISTAK
ES.":.1000./'....@' .."...SUMMARY.H'..."
..THIS LESSON HAS COVERED:":.3030..'...5
3280,CC:.53281,CC:.2048:.:."............
.......RETURN..'P..15,8,15.W'Q..1,8,8,"D
ATA,S,R":.6010:.EN..2024..'R. 1..(S..2,8
,2,"#":.15,"U1:";2;0;1;0:.6010:.EN.0..20
24..(T. 2: 15:..3(Z..15,EN,EM$,ET,ES.9({
.....TTS!4..M\.
> CLICK IMAGE PREVIEW FOR FULL MODAL