3.3 LESSON
FILE INFORMATION
FILENAME(S): 3.3 LESSON
FILE TYPE(S): PRG
FILE SIZE: 9.5K
FIRST SEEN: 2025-12-02 23:23:03
APPEARS ON: 1 disk(s)
FILE HASH
417179a92e612278d7a4631dcf36077ec39d4cbf8b51fbb3134458b2a075d3c2
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ASS KURS ENGL 2 | 3.3 LESSON | PRG | swasti, dinkel | 32 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 00 01 31 34 30 00 30 30 30 30 30 30 FF 04 A5 55 |..140.000000...U|
00000010: 6D 5F EF 01 FF 00 85 04 EF 84 EF 00 EF 04 A5 3F |m_.............?|
00000020: ED 5F EF 00 EF 00 CF 5F EF 00 CD 54 DF 00 EF 00 |._....._...T....|
00000030: EF 00 EF 00 EF 14 FF 00 EF 5E 06 00 EF FF AB D5 |.........^......|
00000040: FF DC FC 00 FF 04 84 3F A8 7D EA 00 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 02 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 FA 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 5F FF |L............._.|
00000700: 11 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 6D 08 |.\....50:ML...m.|
00000760: 32 00 9C 3A 5A B2 C2 28 35 30 30 30 33 29 00 9C |2..:Z..(50003)..|
00000770: 08 33 00 53 48 B2 36 35 33 3A 42 24 B2 22 1D 1D |.3.SH.653:B$."..|
00000780: 1D 1D 1D 22 3A 45 24 B2 22 20 20 20 20 20 20 20 |...":E$." |
00000790: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 CA 08 | "...|
000007A0: 34 00 46 24 B2 22 CC 4F 43 41 54 49 4F 4E 22 3A |4.F$.".OCATION":|
000007B0: 48 24 B2 22 12 A6 A6 20 20 CE C1 CD C5 20 A6 22 |H$."... .... ."|
000007C0: 3A 4C 24 B2 22 11 11 11 11 11 11 00 03 09 35 00 |:L$.".........5.|
000007D0: 4B 24 B2 22 A6 A6 C6 CC CF C1 D4 C9 CE C7 A0 D0 |K$."............|
000007E0: CF C9 CE D4 A0 C2 C9 CE C1 D2 D9 20 22 3A 4D 24 |........... ":M$|
000007F0: B2 22 28 12 D2 C5 D4 D5 D2 CE 92 20 54 4F 20 53 |."(........ TO S|
00000800: 54 4F 50 29 00 12 09 3C 00 43 43 B2 36 3A 8D 35 |TOP)...<.CC.6:.5|
00000810: 30 30 30 00 4E 09 64 00 99 22 93 22 C7 28 31 34 |000.N.d..".".(14|
00000820: 29 4C 24 2C 2C 22 9A 9D 9D AC 12 AC BB 92 BB 9D |)L$,,"..........|
00000830: 9D 9D 9D 11 20 AC 12 BE 92 BE 9D 9D 9D 9D 11 AC |.... ...........|
00000840: BB 12 A1 92 A1 9D 9D 9D 9D 11 20 12 A2 A2 92 00 |.......... .....|
00000850: 7A 09 65 00 99 42 24 22 11 11 11 12 2A 20 20 D3 |z.e..B$"....* .|
00000860: CF C6 D4 D7 C1 D2 C5 20 C1 CE C4 20 D0 D2 CF C7 |....... ... ....|
00000870: D2 C1 CD CD C9 CE C7 20 20 2A 22 00 B1 09 66 00 |....... *"...f.|
00000880: 99 2C 22 11 11 11 9D 9D 98 33 2E 33 20 20 20 CC |.,"......3.3 .|
00000890: C9 CE CB C9 CE C7 20 D7 C9 D4 C8 20 C2 C1 D3 C9 |...... .... ....|
000008A0: C3 22 3A 54 B2 33 3A 8D 31 30 30 30 3A 8D 36 30 |.":T.3:.1000:.60|
000008B0: 30 30 00 D2 09 6E 00 43 43 B2 33 3A 8D 35 30 30 |00...n.CC.3:.500|
000008C0: 30 3A 8D 33 30 30 30 3A 99 22 98 22 3B 3A 8D 31 |0:.3000:.".";:.1|
000008D0: 31 30 30 00 F6 09 78 00 43 43 B2 31 31 3A 8D 35 |100...x.CC.11:.5|
000008E0: 30 30 30 3A 99 22 93 12 8F C5 CE D4 D2 D9 20 C1 |000:."........ .|
000008F0: CE C4 20 C5 D8 C9 D4 00 11 0A 79 00 99 22 11 11 |.. .......y.."..|
00000900: 98 20 C2 C1 D3 C9 C3 22 3A 54 B2 32 3A 8D 31 30 |. .....":T.2:.10|
00000910: 30 30 00 45 0A 82 00 99 22 13 11 11 11 11 11 98 |00.E....".......|
00000920: 22 3A 54 B2 2E 33 3A 59 24 B2 22 46 4F 52 22 3A |":T..3:Y$."FOR":|
00000930: 8D 31 33 30 30 3A 59 24 B2 22 50 52 49 4E 54 22 |.1300:Y$."PRINT"|
00000940: 3A 8D 31 33 30 30 00 7A 0A 83 00 59 24 B2 22 49 |:.1300.z...Y$."I|
00000950: 4E 50 55 54 22 3A 8D 31 33 30 30 3A 59 24 B2 22 |NPUT":.1300:Y$."|
00000960: 50 4F 4B 45 22 3A 8D 31 33 30 30 3A 99 42 24 22 |POKE":.1300:.B$"|
00000970: 12 53 59 53 22 3A 8D 31 30 30 30 00 A7 0A 8C 00 |.SYS":.1000.....|
00000980: 99 22 13 11 11 11 22 2C 2C 42 24 22 9A 20 CD C1 |."....",,B$". ..|
00000990: C3 C8 C9 CE C5 20 C3 CF C4 C5 22 3A 99 22 13 11 |..... ....":."..|
000009A0: 11 11 11 1E 22 4C 24 2C 00 E2 0A 8E 00 81 49 B2 |...."L$,......I.|
000009B0: 31 A4 34 3A 99 22 3E 9D 22 3B 3A 81 4A B2 31 A4 |1.4:.">.";:.J.1.|
000009C0: 33 30 3A 82 3A 99 22 20 91 22 3B 3A 82 49 3A 59 |30:.:." .";:.I:Y|
000009D0: 24 B2 22 3E 9D 22 3A 5A 24 B2 22 20 22 3A 8D 31 |$.">.":Z$." ":.1|
000009E0: 33 31 30 00 F1 0A 96 00 99 22 1D 12 05 CC C4 C1 |310......"......|
000009F0: 22 3B 00 0B 0B 97 00 99 22 9D 9D 9D 92 9A CC C4 |";......".......|
00000A00: C1 9D 9D 9D 11 12 05 D4 C1 D8 22 3B 00 25 0B 98 |..........";.%..|
00000A10: 00 99 22 9D 9D 9D 92 9A D4 C1 D8 9D 9D 9D 11 12 |..".............|
00000A20: 05 C2 CE C5 22 3B 00 3F 0B 99 00 99 22 9D 9D 9D |....";.?...."...|
00000A30: 92 9A C2 CE C5 9D 9D 9D 11 12 05 C3 CC C3 22 3B |..............";|
00000A40: 00 59 0B 9A 00 99 22 9D 9D 9D 92 9A C3 CC C3 9D |.Y....".........|
00000A50: 9D 9D 11 12 05 C1 C4 C3 22 3B 00 73 0B 9B 00 99 |........";.s....|
00000A60: 22 9D 9D 9D 92 9A C1 C4 C3 9D 9D 9D 11 12 05 D3 |"...............|
00000A70: D4 C1 22 3B 00 8D 0B 9C 00 99 22 9D 9D 9D 92 9A |..";......".....|
00000A80: D3 D4 C1 9D 9D 9D 11 12 05 C9 CE D8 22 3B 00 A7 |............";..|
00000A90: 0B 9D 00 99 22 9D 9D 9D 92 9A C9 CE D8 9D 9D 9D |...."...........|
00000AA0: 11 12 05 C2 D0 CC 22 3B 00 C1 0B 9E 00 99 22 9D |......";......".|
00000AB0: 9D 9D 92 9A C2 D0 CC 9D 9D 9D 11 12 05 D2 D4 D3 |................|
00000AC0: 22 3B 00 D2 0B 9F 00 99 22 9D 9D 9D 92 9A D2 D4 |";......".......|
00000AD0: D3 22 3B 00 E1 0B A0 00 99 22 9D 9D 9D 9D 9D 1E |.";......"......|
00000AE0: 22 3B 00 1F 0C A1 00 81 49 B2 31 A4 33 3A 99 22 |";......I.1.3:."|
00000AF0: 91 3C 9D 22 3B 3A 81 4A B2 31 A4 31 3A 82 3A 99 |.<.";:.J.1.1:.:.|
00000B00: 22 20 9D 9D 22 3B 3A 82 49 3A 59 24 B2 22 3C 9D |" ..";:.I:Y$."<.|
00000B10: 22 3A 5A 24 B2 22 20 9D 9D 22 3A 8D 31 33 31 30 |":Z$." ..":.1310|
00000B20: 00 46 0C AA 00 99 22 13 11 11 11 11 98 22 4C 24 |.F...."......"L$|
00000B30: 42 24 22 53 59 53 22 3A 59 24 B2 22 4E 45 58 54 |B$"SYS":Y$."NEXT|
00000B40: 22 3A 8D 31 33 30 30 00 68 0C AC 00 99 22 11 11 |":.1300.h...."..|
00000B50: 11 11 96 22 4D 24 3A A1 5A 24 3A 8B 5A 24 B3 B1 |..."M$:.Z$:.Z$..|
00000B60: C7 28 31 33 29 89 31 33 30 00 A4 0C AD 00 99 22 |.(13).130......"|
00000B70: 91 1E 22 45 24 3A 99 22 8F D7 49 54 48 4F 55 54 |.."E$:."..ITHOUT|
00000B80: 20 12 D2 D4 D3 92 20 59 4F 55 A0 4D 55 53 54 A0 | ..... YOU.MUST.|
00000B90: 52 45 53 45 54 A0 54 48 45 A0 C3 CF CD CD CF C4 |RESET.THE.......|
00000BA0: CF D2 C5 22 3B 00 C9 0C AE 00 99 22 36 34 20 54 |...";......"64 T|
00000BB0: 4F 20 52 45 54 55 52 4E A0 54 4F A0 C2 C1 D3 C9 |O RETURN.TO.....|
00000BC0: C3 21 9A 22 3A 8D 31 31 30 30 00 09 0D B4 00 43 |.!.":.1100.....C|
00000BD0: 43 B2 31 32 3A 8D 35 30 30 30 3A 99 22 93 1F 22 |C.12:.5000:.".."|
00000BE0: 4C 24 22 CD D0 D5 20 52 45 47 49 53 54 45 52 A0 |L$"... REGISTER.|
00000BF0: 43 4F 4E 54 45 4E 54 53 A0 41 52 45 A0 49 4E 44 |CONTENTS.ARE.IND|
00000C00: 45 54 45 52 4D 49 4E 41 54 45 00 39 0D B5 00 99 |ETERMINATE.9....|
00000C10: 22 41 54 A0 12 53 59 53 92 20 45 4E 54 52 59 A0 |"AT..SYS. ENTRY.|
00000C20: 41 4E 44 A0 12 52 54 53 92 20 45 58 49 54 2E 22 |AND..RTS. EXIT."|
00000C30: 3A 54 B2 32 3A 8D 31 30 30 30 00 67 0D B6 00 99 |:T.2:.1000.g....|
00000C40: 22 11 11 C4 4F 4E 27 54 A0 53 50 4F 49 4C A0 54 |"...ON'T.SPOIL.T|
00000C50: 48 45 A0 53 54 41 43 4B A0 49 4E A0 59 4F 55 52 |HE.STACK.IN.YOUR|
00000C60: A0 CD C1 C3 C8 C9 CE C5 00 A0 0D B7 00 99 22 C3 |..............".|
00000C70: CF C4 C5 20 52 4F 55 54 49 4E 45 53 3B 20 4C 45 |... ROUTINES; LE|
00000C80: 41 56 45 A0 49 54 A0 41 53 A0 59 4F 55 A0 46 49 |AVE.IT.AS.YOU.FI|
00000C90: 4E 44 A0 49 54 21 22 3A 54 B2 34 3A 8D 31 30 30 |ND.IT!":T.4:.100|
00000CA0: 30 00 CE 0D B8 00 99 22 11 11 D0 52 45 53 45 52 |0......"...RESER|
00000CB0: 56 45 A0 D0 41 47 45 20 DA 45 52 4F 20 4C 4F 43 |VE..AGE .ERO LOC|
00000CC0: 41 54 49 4F 4E 53 20 4F 52 A0 C2 C1 D3 C9 C3 00 |ATIONS OR.......|
00000CD0: F2 0D B9 00 99 22 4D 41 59 A0 43 52 41 53 48 2E |....."MAY.CRASH.|
00000CE0: 9B 22 3A 8D 31 31 31 30 3A 91 5A 89 31 32 30 2C |.":.1110:.Z.120,|
00000CF0: 31 32 30 00 18 0E C8 00 43 43 B2 31 35 3A 8D 35 |120.....CC.15:.5|
00000D00: 30 30 30 3A 99 22 93 12 1F D5 D3 C9 CE C7 20 D4 |000:."........ .|
00000D10: C8 C5 20 D3 C3 D2 C5 C5 CE 00 4C 0E C9 00 99 22 |.. .......L...."|
00000D20: 11 11 98 D5 53 45 A0 49 4E 44 45 58 45 44 A0 41 |....SE.INDEXED.A|
00000D30: 44 44 52 45 53 53 49 4E 47 A0 46 4F 52 A0 4C 49 |DDRESSING.FOR.LI|
00000D40: 4E 45 53 A0 4F 46 A0 54 45 58 54 22 3B 00 7A 0E |NES.OF.TEXT";.z.|
00000D50: CA 00 99 42 24 22 11 12 97 4C 44 41 92 98 20 57 |...B$"...LDA.. W|
00000D60: 49 54 48 A0 54 48 45 A0 43 48 41 52 41 43 54 45 |ITH.THE.CHARACTE|
00000D70: 52 A0 54 4F 20 50 52 49 4E 54 3B 00 AE 0E CB 00 |R.TO PRINT;.....|
00000D80: 99 42 24 22 11 12 97 53 54 41 92 98 20 49 4E 20 |.B$"...STA.. IN |
00000D90: 53 43 52 45 45 4E A0 D2 C1 CD 2E 22 3A 54 B2 34 |SCREEN.....":T.4|
00000DA0: 3A 8D 31 30 30 30 3A 99 22 11 11 D5 53 45 3A 00 |:.1000:."...SE:.|
00000DB0: F2 0E CD 00 99 42 24 22 11 12 97 2E 42 59 54 98 |.....B$"....BYT.|
00000DC0: 92 20 28 4C 45 53 53 4F 4E 20 33 2E 32 29 20 46 |. (LESSON 3.2) F|
00000DD0: 4F 52 20 54 48 45 20 54 45 58 54 22 3A 99 42 24 |OR THE TEXT":.B$|
00000DE0: 22 53 54 52 49 4E 47 53 22 3A 54 B2 32 3A 8D 31 |"STRINGS":T.2:.1|
00000DF0: 30 30 30 00 31 0F CE 00 99 22 CF 52 22 3A 99 42 |000.1....".R":.B|
00000E00: 24 22 C9 4D 4D 45 44 49 41 54 45 A0 41 44 44 52 |$".MMEDIATE.ADDR|
00000E10: 45 53 53 49 4E 47 20 46 4F 52 20 53 49 4E 47 4C |ESSING FOR SINGL|
00000E20: 45 22 3A 99 42 24 22 43 48 41 52 41 43 54 45 52 |E":.B$"CHARACTER|
00000E30: 53 3A 00 7A 0F D0 00 99 42 24 22 11 1F C1 D3 C3 |S:.z....B$".....|
00000E40: C9 C9 20 CC 49 54 45 52 41 4C 53 22 42 24 22 97 |.. .ITERALS"B$".|
00000E50: 4C 44 41 20 23 27 C1 27 22 3A 99 42 24 22 11 1F |LDA #'.'":.B$"..|
00000E60: C1 D3 C3 C9 C9 20 C3 4F 44 45 53 20 20 20 22 42 |..... .ODES "B|
00000E70: 24 22 97 4C 44 41 20 23 24 34 31 00 89 0F D1 00 |$".LDA #$41.....|
00000E80: 99 22 9A 22 3A 8D 31 31 30 30 00 C4 0F D2 00 43 |.".":.1100.....C|
00000E90: 43 B2 31 32 3A 8D 35 30 30 30 3A 99 22 93 22 4C |C.12:.5000:."."L|
00000EA0: 24 22 1F C3 4F 4E 56 45 52 54 A0 4E 55 4D 45 52 |$"..ONVERT.NUMER|
00000EB0: 49 43 A0 44 41 54 41 A0 54 4F 20 C1 D3 C3 C9 C9 |IC.DATA.TO .....|
00000EC0: 20 43 4F 44 45 00 EA 0F D3 00 99 22 42 45 46 4F | CODE......"BEFO|
00000ED0: 52 45 A0 50 52 49 4E 54 49 4E 47 20 28 4C 45 53 |RE.PRINTING (LES|
00000EE0: 53 4F 4E 20 31 2E 38 29 2E 9B 22 00 FF 0F E6 00 |SON 1.8)..".....|
00000EF0: 8D 31 31 31 30 3A 91 5A 89 32 30 30 2C 31 32 30 |.1110:.Z.200,120|
00000F00: 00 30 10 2C 01 43 43 B2 31 35 3A 8D 35 30 30 30 |.0.,.CC.15:.5000|
00000F10: 3A 99 22 93 12 1F CB C5 D9 C2 CF C1 D2 C4 20 C9 |:."........... .|
00000F20: CE D0 D5 D4 20 2D 20 C1 C4 C4 D2 C5 D3 D3 C5 D3 |.... - .........|
00000F30: 11 00 49 10 2F 01 4E 31 B2 36 35 33 3A 4E 32 B2 |..I./.N1.653:N2.|
00000F40: 31 39 38 3A 4E 33 B2 36 33 31 00 78 10 32 01 99 |198:N3.631.x.2..|
00000F50: 22 11 98 CB 45 59 42 4F 41 52 44 A0 49 4E 50 55 |"...EYBOARD.INPU|
00000F60: 54 A0 42 55 46 46 45 52 A0 53 54 41 52 54 22 3B |T.BUFFER.START";|
00000F70: 3A 8D 34 30 3A 49 B2 4E 33 00 AC 10 36 01 8D 31 |:.40:I.N3...6..1|
00000F80: 33 34 30 3A 99 22 11 CB 45 59 42 4F 41 52 44 A0 |340:."..EYBOARD.|
00000F90: 49 4E 50 55 54 A0 42 55 46 46 45 52 A0 43 4F 55 |INPUT.BUFFER.COU|
00000FA0: 4E 54 22 3B 3A 8D 34 30 3A 49 B2 4E 32 00 D5 10 |NT";:.40:I.N2...|
00000FB0: 3B 01 8D 31 33 34 30 3A 99 22 11 D3 48 49 46 54 |;..1340:."..HIFT|
00000FC0: 20 4B 45 59 A0 53 54 41 54 55 53 22 3B 3A 8D 34 | KEY.STATUS";:.4|
00000FD0: 30 3A 49 B2 4E 31 00 08 11 40 01 8D 31 33 34 30 |0:I.N1...@..1340|
00000FE0: 3A 99 22 11 11 D9 4F 55 20 55 53 45 A0 54 48 45 |:."...OU USE.THE|
00000FF0: 53 45 A0 4C 4F 43 41 54 49 4F 4E 53 A0 46 4F 52 |SE.LOCATIONS.FOR|
00001000: 20 4B 45 59 42 4F 41 52 44 00 41 11 41 01 99 22 | KEYBOARD.A.A.."|
00001010: 49 4E 50 55 54 A0 54 4F A0 CD C1 C3 C8 C9 CE C5 |INPUT.TO........|
00001020: 20 C3 CF C4 C5 20 50 52 4F 47 52 41 4D 53 2E 9A | .... PROGRAMS..|
00001030: 22 3A 8D 31 31 31 30 3A 91 5A 89 33 30 30 2C 32 |":.1110:.Z.300,2|
00001040: 30 30 00 80 11 45 01 43 43 B2 33 3A 8D 35 30 30 |00...E.CC.3:.500|
00001050: 30 3A 99 22 93 22 4C 24 22 97 D7 41 54 43 48 A0 |0:."."L$"..ATCH.|
00001060: 48 4F 57 A0 C2 C1 D3 C9 C3 20 48 41 4E 44 4C 45 |HOW...... HANDLE|
00001070: 53 A0 4B 45 59 A0 44 45 50 52 45 53 53 49 4F 4E |S.KEY.DEPRESSION|
00001080: 53 00 B5 11 46 01 99 22 49 4E A0 54 48 45 20 31 |S...F.."IN.THE 1|
00001090: 2F 36 30 53 45 43 A0 C9 D2 D1 20 43 59 43 4C 45 |/60SEC.... CYCLE|
000010A0: 20 28 4C 45 53 53 4F 4E 20 32 2E 38 29 2E 98 22 | (LESSON 2.8).."|
000010B0: 3A 8D 31 31 30 30 00 C9 11 47 01 A1 5A 24 3A 8B |:.1100...G..Z$:.|
000010C0: 5A 24 B3 B1 22 22 89 33 32 37 00 D9 11 48 01 43 |Z$.."".327...H.C|
000010D0: 43 B2 31 35 3A 8D 35 30 30 30 00 19 12 4C 01 81 |C.15:.5000...L..|
000010E0: 49 B2 30 A4 39 3A 97 4E 33 AA 49 2C 30 3A 82 3A |I.0.9:.N3.I,0:.:|
000010F0: 99 22 93 98 D3 C8 C9 C6 D4 22 2C 22 C2 D5 C6 C6 |.".......","....|
00001100: C5 D2 20 C3 CF D5 CE D4 22 3A 99 22 12 1E 22 4E |.. .....":.".."N|
00001110: 31 22 9D 20 22 2C 4E 32 22 9D 00 3F 12 4D 01 99 |1". ",N2"..?.M..|
00001120: 22 97 B0 C0 C0 C0 AE 22 2C 22 B0 C0 C0 C0 AE 22 |"......","....."|
00001130: 3A 99 22 DD 1D 1D 1D DD 22 2C 22 DD 1D 1D 1D DD |:.".....",".....|
00001140: 00 77 12 54 01 99 22 AD C0 C0 C0 BD 22 2C 22 AD |.w.T..".....",".|
00001150: C0 C0 C0 BD 22 3A 99 22 11 11 98 CB C5 D9 C2 CF |....":."........|
00001160: C1 D2 C4 20 C2 D5 C6 C6 C5 D2 22 3A 99 22 12 1E |... ......":."..|
00001170: 22 4E 33 22 9D 20 97 22 00 A1 12 55 01 81 49 B2 |"N3". ."...U..I.|
00001180: 31 A4 34 30 3A 99 22 C0 22 3B 3A 82 3A 99 22 11 |1.40:.".";:.:.".|
00001190: 22 3B 3A 81 49 B2 31 A4 34 30 3A 99 22 C0 22 3B |";:.I.1.40:.".";|
000011A0: 3A 82 00 E1 12 59 01 99 22 11 11 1C D0 52 45 53 |:....Y.."....RES|
000011B0: 53 A0 4B 45 59 53 20 54 4F A0 53 45 45 20 49 54 |S.KEYS TO.SEE IT|
000011C0: A0 57 4F 52 4B 2E 22 3A 99 4D 24 3A 99 22 D4 52 |.WORK.":.M$:.".R|
000011D0: 59 20 D3 C8 C9 C6 D4 20 26 20 C3 C2 CD 20 4B 45 |Y ..... & ... KE|
000011E0: 59 53 00 1B 13 5E 01 8D 31 33 32 30 3A 8B C2 28 |YS...^..1320:..(|
000011F0: 4E 33 AA C2 28 4E 32 29 AB 31 29 B2 31 33 A7 8D |N3..(N2).1).13..|
00001200: 31 33 32 30 3A 99 22 11 11 11 97 CE 4F 54 45 20 |1320:.".....OTE |
00001210: 2E 2E 2E 20 20 22 3B 3A 89 33 35 33 00 2D 13 5F |... ";:.353.-._|
00001220: 01 8B C2 28 4E 32 29 B3 31 30 89 33 35 30 00 4A |...(N2).10.350.J|
00001230: 13 60 01 8D 31 33 32 30 3A 99 22 11 11 11 1C CE |.`..1320:.".....|
00001240: 4F 20 4D 4F 52 45 21 20 20 22 3B 00 6A 13 61 01 |O MORE! ";.j.a.|
00001250: 99 22 D4 48 45 20 C3 CF CD CD CF C4 CF D2 C5 20 |.".HE ......... |
00001260: 36 34 20 44 49 53 43 41 52 44 53 00 9F 13 62 01 |64 DISCARDS...b.|
00001270: 99 22 41 4E 59 20 43 48 41 52 41 43 54 45 52 53 |."ANY CHARACTERS|
00001280: 20 41 46 54 45 52 20 54 48 45 20 54 45 4E 54 48 | AFTER THE TENTH|
00001290: 2E 22 45 24 45 24 3A 54 B2 36 3A 8D 31 30 30 30 |."E$E$:T.6:.1000|
000012A0: 00 E4 13 68 01 99 22 13 11 11 22 4C 24 4C 24 22 |...h.."..."L$L$"|
000012B0: CE 4F 57 A0 57 41 54 43 48 A0 48 4F 57 A0 12 C7 |.OW.WATCH.HOW...|
000012C0: C5 D4 20 DA 24 92 20 45 4D 50 54 49 45 53 20 54 |.. .$. EMPTIES T|
000012D0: 48 45 A0 42 55 46 46 45 52 2E 22 45 24 45 24 3A |HE.BUFFER."E$E$:|
000012E0: 99 45 24 45 24 00 FF 13 69 01 54 B2 32 3A 8D 31 |.E$E$...i.T.2:.1|
000012F0: 30 30 30 3A 8B C2 28 4E 32 29 B2 30 89 33 39 39 |000:..(N2).0.399|
00001300: 00 33 14 6A 01 99 22 13 22 4C 24 4C 24 4C 24 22 |.3.j.."."L$L$L$"|
00001310: 12 97 C7 C5 D4 22 3A 5A 24 B2 C9 28 22 20 20 22 |.....":Z$..(" "|
00001320: AA C4 28 C2 28 4E 33 29 29 2C 34 29 3A 59 24 B2 |..(.(N3)),4):Y$.|
00001330: 22 92 12 22 00 6E 14 6C 01 99 22 13 11 11 11 11 |"..".n.l..".....|
00001340: 1F 22 4C 24 3A 81 49 B2 31 A4 32 30 3A 99 22 91 |."L$:.I.1.20:.".|
00001350: 22 CA 28 59 24 2C 31 AA 28 49 AF 31 29 2C 31 29 |".(Y$,1.(I.1),1)|
00001360: 5A 24 3A 81 4A B2 31 A4 31 30 3A 82 4A 2C 49 00 |Z$:.J.1.10:.J,I.|
00001370: 7E 14 6D 01 A1 5A 24 3A 5A B2 C6 28 5A 24 29 00 |~.m..Z$:Z..(Z$).|
00001380: BC 14 72 01 99 22 13 22 4C 24 4C 24 4C 24 2C 22 |..r.."."L$L$L$,"|
00001390: 97 DA 24 20 3D 20 C3 C8 D2 24 20 28 22 5A 22 9D |..$ = ...$ ("Z".|
000013A0: 20 29 20 22 3A 8D 31 30 30 30 3A 8D 31 33 32 30 | ) ":.1000:.1320|
000013B0: 3A 8B C2 28 4E 32 29 B2 30 89 33 39 39 00 C6 14 |:..(N2).0.399...|
000013C0: 73 01 8D 31 30 30 30 00 05 15 74 01 99 22 13 11 |s..1000...t.."..|
000013D0: 11 22 4C 24 4C 24 22 1C D4 4F 55 43 48 20 12 D3 |."L$L$"..OUCH ..|
000013E0: C8 C9 C6 D4 92 20 54 4F A0 47 45 54 A0 54 48 45 |..... TO.GET.THE|
000013F0: A0 4E 45 58 54 20 43 48 41 52 41 43 54 45 52 2E |.NEXT CHARACTER.|
00001400: 97 22 45 24 45 24 00 16 15 75 01 8B C2 28 53 48 |."E$E$...u...(SH|
00001410: 29 B2 30 89 33 37 33 00 4A 15 76 01 99 22 13 11 |).0.373.J.v.."..|
00001420: 11 22 4C 24 4C 24 45 24 45 24 3A 99 22 11 11 22 |."L$L$E$E$:.".."|
00001430: 45 24 45 24 3A 81 49 B2 31 A4 33 30 30 3A 82 3A |E$E$:.I.1.300:.:|
00001440: 54 B2 54 AB 2E 32 3A 89 33 36 32 00 65 15 8F 01 |T.T..2:.362.e...|
00001450: 99 22 9A 22 3B 3A 8D 31 31 31 30 3A 91 5A 89 33 |.".";:.1110:.Z.3|
00001460: 32 35 2C 33 30 30 00 93 15 90 01 43 43 B2 31 32 |25,300.....CC.12|
00001470: 3A 8D 35 30 30 30 3A 99 22 93 11 11 11 12 97 C6 |:.5000:.".......|
00001480: C9 D2 D3 D4 20 C9 CE 22 2C 2C 22 C6 C9 D2 D3 D4 |.... ..",,".....|
00001490: 20 CF D5 D4 00 C5 15 91 01 99 22 11 11 11 1F C1 | .........".....|
000014A0: 46 54 45 52 A0 45 41 43 48 20 C7 C5 D4 2C 20 43 |FTER.EACH ..., C|
000014B0: 48 41 52 41 43 54 45 52 53 A0 4D 4F 56 45 A0 44 |HARACTERS.MOVE.D|
000014C0: 4F 57 4E A0 4F 4E 00 07 16 92 01 99 22 54 48 45 |OWN.ON......"THE|
000014D0: A0 42 55 46 46 45 52 A0 43 4F 55 4E 54 2C 20 41 |.BUFFER.COUNT, A|
000014E0: 4E 44 A0 49 54 A0 49 53 A0 54 48 45 4E 22 3A 99 |ND.IT.IS.THEN":.|
000014F0: 22 44 45 43 52 45 4D 45 4E 54 45 44 2E 22 3A 54 |"DECREMENTED.":T|
00001500: B2 34 3A 8D 31 30 30 30 00 3B 16 94 01 99 22 11 |.4:.1000.;....".|
00001510: 11 11 D9 4F 55 52 A0 4F 57 4E A0 52 4F 55 54 49 |...OUR.OWN.ROUTI|
00001520: 4E 45 20 54 4F A0 4C 4F 41 44 20 46 52 4F 4D A0 |NE TO.LOAD FROM.|
00001530: 54 48 45 A0 42 55 46 46 45 52 22 3B 00 68 16 95 |THE.BUFFER";.h..|
00001540: 01 99 22 4F 4E 45 A0 41 54 A0 41 A0 54 49 4D 45 |.."ONE.AT.A.TIME|
00001550: 20 57 49 4C 4C A0 42 45 A0 4C 49 4B 45 A0 C7 C5 | WILL.BE.LIKE...|
00001560: D4 2E 22 3A 8D 31 30 30 30 00 B1 16 96 01 99 22 |..":.1000......"|
00001570: 11 11 11 C4 49 53 41 42 4C 45 A0 49 4E 54 45 52 |....ISABLE.INTER|
00001580: 52 55 50 54 53 20 57 49 54 48 20 12 97 53 45 49 |RUPTS WITH ..SEI|
00001590: 1F 92 20 28 4C 45 53 53 4F 4E 20 32 2E 38 29 57 |.. (LESSON 2.8)W|
000015A0: 48 49 4C 45 A0 49 54 A0 4F 50 45 52 41 54 45 53 |HILE.IT.OPERATES|
000015B0: 2E 9B 00 C6 16 9A 01 8D 31 31 31 30 3A 91 5A 89 |........1110:.Z.|
000015C0: 34 30 30 2C 33 32 35 00 E9 16 C2 01 43 43 B2 31 |400,325.....CC.1|
000015D0: 35 3A 8D 35 30 30 30 3A 99 22 93 12 1F D4 C8 C5 |5:.5000:."......|
000015E0: 20 D3 D4 CF D0 20 CB C5 D9 22 00 19 17 C3 01 99 | .... ..."......|
000015F0: 22 11 11 12 97 D3 D4 CF D0 98 92 20 49 53 A0 44 |".......... IS.D|
00001600: 45 54 45 43 54 45 44 A0 49 4E A0 54 48 45 A0 31 |ETECTED.IN.THE.1|
00001610: 2F 36 30 20 53 45 43 4F 4E 44 00 48 17 C4 01 99 |/60 SECOND.H....|
00001620: 22 C9 D2 D1 A0 52 4F 55 54 49 4E 45 20 28 4C 45 |"....ROUTINE (LE|
00001630: 53 53 4F 4E 20 32 2E 38 29 2E 22 3A 54 B2 33 3A |SSON 2.8).":T.3:|
00001640: 8D 31 30 30 30 3A 54 B2 35 00 73 17 C5 01 99 22 |.1000:T.5.s...."|
00001650: 11 C9 54 A0 57 49 4C 4C A0 4E 4F 54 A0 48 41 4C |..T.WILL.NOT.HAL|
00001660: 54 A0 CD C1 C3 C8 C9 CE C5 20 C3 CF C4 C5 3B 20 |T........ ....; |
00001670: 59 4F 55 52 00 BF 17 C6 01 99 22 50 52 4F 47 52 |YOUR......"PROGR|
00001680: 41 4D A0 4D 55 53 54 A0 44 45 54 45 43 54 A0 54 |AM.MUST.DETECT.T|
00001690: 48 45 A0 4B 45 59 A0 44 45 50 52 45 53 53 49 4F |HE.KEY.DEPRESSIO|
000016A0: 4E 20 20 49 46 A0 59 4F 55 A0 4E 45 45 44 A0 54 |N IF.YOU.NEED.T|
000016B0: 4F A0 55 53 45 A0 49 54 2E 22 3A 8D 31 30 30 30 |O.USE.IT.":.1000|
000016C0: 00 05 18 C8 01 99 22 11 11 D4 48 45 20 C9 D2 D1 |......"...HE ...|
000016D0: 20 52 4F 55 54 49 4E 45 20 53 45 54 53 20 4C 4F | ROUTINE SETS LO|
000016E0: 43 41 54 49 4F 4E 20 24 39 31 20 3D 20 31 32 37 |CATION $91 = 127|
000016F0: 20 57 48 45 4E 20 54 48 45 20 4B 45 59 20 49 53 | WHEN THE KEY IS|
00001700: 20 44 4F 57 4E 2E 00 2B 18 C9 01 54 B2 33 3A 8D | DOWN..+...T.3:.|
00001710: 31 30 30 30 3A 99 22 11 D5 53 45 3A 22 3A 99 22 |1000:."..SE:":."|
00001720: 11 22 2C 22 1C 4C 44 41 20 24 39 31 00 67 18 CC |.",".LDA $91.g..|
00001730: 01 99 2C 22 43 4D 50 20 23 24 37 46 22 3A 99 2C |..,"CMP #$7F":.,|
00001740: 22 42 4E 45 20 43 4F 4E 54 20 3B CE CF D4 20 C4 |"BNE CONT ;... .|
00001750: CF D7 CE 22 3A 99 2C 22 42 52 4B 22 42 24 22 20 |...":.,"BRK"B$" |
00001760: 3B CF D2 20 12 52 54 53 00 8F 18 CD 01 99 42 24 |;.. .RTS......B$|
00001770: 22 43 4F 4E 54 20 2E 2E 2E 20 45 54 43 9A 22 3A |"CONT ... ETC.":|
00001780: 8D 31 31 31 30 3A 91 5A 89 34 35 30 2C 34 30 30 |.1110:.Z.450,400|
00001790: 00 C0 18 F4 01 43 43 B2 31 32 3A 8D 35 30 30 30 |.....CC.12:.5000|
000017A0: 3A 99 22 93 12 97 C2 C1 D3 C9 C3 20 D6 C1 D2 C9 |:."........ ....|
000017B0: C1 C2 CC C5 D3 20 C1 CE C4 20 D3 D4 D2 C9 CE C7 |..... ... ......|
000017C0: D3 00 F5 18 F5 01 99 22 11 11 11 1F CC 4F 4F 4B |.......".....OOK|
000017D0: A0 49 4E A0 54 48 45 A0 C3 C2 CD 20 CD 41 4E 55 |.IN.THE.... .ANU|
000017E0: 41 4C 20 46 4F 52 A0 54 48 45 A0 46 4F 52 4D 41 |AL FOR.THE.FORMA|
000017F0: 54 20 4F 46 22 3B 00 15 19 F6 01 99 22 56 41 52 |T OF";......"VAR|
00001800: 49 41 42 4C 45 53 2E 22 3A 54 B2 33 3A 8D 31 30 |IABLES.":T.3:.10|
00001810: 30 30 3A 54 B2 36 00 49 19 FE 01 99 22 11 11 11 |00:T.6.I...."...|
00001820: D9 4F 55 A0 43 41 4E A0 4D 41 4E 49 50 55 4C 41 |.OU.CAN.MANIPULA|
00001830: 54 45 A0 49 4E 54 45 47 45 52 A0 56 41 52 49 41 |TE.INTEGER.VARIA|
00001840: 42 4C 45 53 A0 41 4E 44 22 3B 00 7A 19 FF 01 99 |BLES.AND";.z....|
00001850: 22 41 52 52 41 59 53 2C 20 41 4E 44 A0 41 43 43 |"ARRAYS, AND.ACC|
00001860: 45 53 53 A0 53 54 52 49 4E 47 53 2C 20 51 55 49 |ESS.STRINGS, QUI|
00001870: 54 45 A0 45 41 53 49 4C 59 22 3B 00 C7 19 00 02 |TE.EASILY";.....|
00001880: 99 22 49 4E A0 CD C1 C3 C8 C9 CE C5 20 C3 CF C4 |."IN........ ...|
00001890: C5 2E 20 20 C6 4C 4F 41 54 49 4E 47 A0 50 4F 49 |.. .LOATING.POI|
000018A0: 4E 54 A0 49 53 A0 4D 4F 52 45 44 49 46 46 49 43 |NT.IS.MOREDIFFIC|
000018B0: 55 4C 54 20 28 4C 45 53 53 4F 4E 20 31 2E 37 29 |ULT (LESSON 1.7)|
000018C0: 2E 22 3A 8D 31 30 30 30 00 EA 19 03 02 99 22 11 |.":.1000......".|
000018D0: 11 11 C4 4F 4E 27 54 A0 53 50 4F 49 4C 20 54 48 |...ON'T.SPOIL TH|
000018E0: 45 4D 21 9B 22 3A 8D 31 31 30 30 00 06 1A 08 02 |EM!.":.1100.....|
000018F0: 43 43 B2 31 35 3A 8D 35 30 30 30 3A 99 22 93 98 |CC.15:.5000:."..|
00001900: 22 3A 8D 31 33 33 30 00 2F 1A 09 02 99 22 11 D3 |":.1330./...."..|
00001910: 54 41 52 54 2D 4F 46 2D 56 41 52 49 41 42 4C 45 |TART-OF-VARIABLE|
00001920: 53 20 CC CF 22 3B 3A 8D 34 30 3A 4E 33 B2 34 35 |S ..";:.40:N3.45|
00001930: 00 3E 1A 0A 02 49 B2 4E 33 3A 8D 31 33 34 30 00 |.>...I.N3:.1340.|
00001940: 6B 1A 0D 02 99 22 11 D3 54 41 52 54 2D 4F 46 2D |k...."..TART-OF-|
00001950: 41 52 52 41 59 53 20 CC CF 22 3B 3A 8D 34 30 3A |ARRAYS ..";:.40:|
00001960: 49 B2 4E 33 AA 32 3A 8D 31 33 34 30 00 9C 1A 12 |I.N3.2:.1340....|
00001970: 02 99 22 11 11 1F D5 53 45 A0 54 48 45 53 45 A0 |.."....SE.THESE.|
00001980: D0 41 47 45 20 DA 45 52 4F 20 41 44 44 52 45 53 |.AGE .ERO ADDRES|
00001990: 53 45 53 A0 54 4F A0 41 43 43 45 53 53 00 D0 1A |SES.TO.ACCESS...|
000019A0: 13 02 99 22 56 41 52 49 41 42 4C 45 53 20 57 49 |..."VARIABLES WI|
000019B0: 54 48 A0 49 4E 44 45 58 45 44 A0 41 44 44 52 45 |TH.INDEXED.ADDRE|
000019C0: 53 53 49 4E 47 2E 22 3A 54 B2 33 3A 8D 31 30 30 |SSING.":T.3:.100|
000019D0: 30 00 FF 1A 17 02 99 22 11 C5 4C 49 4D 49 4E 41 |0......"..LIMINA|
000019E0: 54 45 20 53 45 41 52 43 48 49 4E 47 20 42 59 A0 |TE SEARCHING BY.|
000019F0: 49 4E 49 54 49 41 4C 49 53 49 4E 47 20 54 48 45 |INITIALISING THE|
00001A00: 00 2A 1B 18 02 99 22 56 41 52 49 41 42 4C 45 53 |.*...."VARIABLES|
00001A10: 20 49 4E A0 41 A0 4B 4E 4F 57 4E 20 53 45 51 55 | IN.A.KNOWN SEQU|
00001A20: 45 4E 43 45 A0 41 54 A0 54 48 45 00 54 1B 19 02 |ENCE.AT.THE.T...|
00001A30: 99 22 53 54 41 52 54 A0 4F 46 A0 54 48 45 20 C2 |."START.OF.THE .|
00001A40: C1 D3 C9 C3 20 50 52 4F 47 52 41 4D 2E 9A 22 3A |.... PROGRAM..":|
00001A50: 8D 31 31 30 30 00 8F 1B 1C 02 99 22 93 98 22 4C |.1100......".."L|
00001A60: 24 22 C1 54 20 54 48 45 A0 53 54 41 52 54 A0 4F |$".T THE.START.O|
00001A70: 46 A0 54 48 49 53 20 50 52 4F 47 52 41 4D 20 2E |F.THIS PROGRAM .|
00001A80: 2E 2E 2E 11 11 22 3A 54 B2 32 3A 8D 31 30 30 30 |.....":T.2:.1000|
00001A90: 00 B2 1B 1F 02 99 22 1F 35 30 20 43 4C 52 3A 5A |......".50 CLR:Z|
00001AA0: 3D 50 45 45 4B 28 35 30 30 30 33 29 22 3A 8D 31 |=PEEK(50003)":.1|
00001AB0: 30 30 30 00 D6 1B 26 02 99 22 11 11 11 97 C8 4F |000...&..".....O|
00001AC0: 57 A0 54 4F A0 46 49 4E 44 20 5A 20 2E 2E 2E 9A |W.TO.FIND Z ....|
00001AD0: 22 3A 8D 31 31 30 30 00 1D 1C 58 02 43 43 B2 31 |":.1100...X.CC.1|
00001AE0: 35 3A 8D 35 30 30 30 3A 56 B2 4E 33 3A 99 22 93 |5:.5000:V.N3:.".|
00001AF0: 11 11 11 98 22 46 24 22 53 22 56 22 26 22 56 AA |...."F$"S"V"&"V.|
00001B00: 31 22 48 41 56 45 A0 56 41 4C 55 45 53 3A 11 22 |1"HAVE.VALUES:."|
00001B10: 3A 99 2C C2 28 56 29 2C C2 28 56 AA 31 29 00 5A |:.,.(V),.(V.1).Z|
00001B20: 1C 5A 02 99 22 11 11 D7 48 45 52 45 A0 44 4F A0 |.Z.."...HERE.DO.|
00001B30: 54 48 45 A0 56 41 52 49 41 42 4C 45 53 A0 53 54 |THE.VARIABLES.ST|
00001B40: 41 52 54 20 3F 97 24 2E 2E 2E 2E 9D 9D 9D 9D 22 |ART ?.$........"|
00001B50: 3B 3A 8D 34 31 3A 59 24 B2 5A 24 00 8E 1C 5D 02 |;:.41:Y$.Z$...].|
00001B60: 5A B2 C2 28 56 29 AA 32 35 36 AC C2 28 56 AA 31 |Z..(V).256..(V.1|
00001B70: 29 3A 4E 32 B2 5A 3A 8D 31 34 30 30 3A 8B 5A 24 |):N2.Z:.1400:.Z$|
00001B80: B2 59 24 A7 99 22 11 CF CB 22 3A 89 36 31 30 00 |.Y$.."...":.610.|
00001B90: C7 1C 60 02 99 22 11 CE 4F 20 49 54 20 49 53 20 |..`.."..O IT IS |
00001BA0: 24 22 5A 24 22 20 20 2E 2E 2E 20 22 4E 32 22 44 |$"Z$" ... "N2"D|
00001BB0: 45 43 49 4D 41 4C 2E 22 3A 54 B2 32 3A 8D 31 30 |ECIMAL.":T.2:.10|
00001BC0: 30 30 3A 59 24 B2 5A 24 00 0E 1D 62 02 99 22 11 |00:Y$.Z$...b..".|
00001BD0: 11 D3 54 4F 52 45 A0 54 48 49 53 A0 49 4E 20 D0 |..TORE.THIS.IN .|
00001BE0: 41 47 45 A0 DA 45 52 4F 20 41 4E 44 20 55 53 45 |AGE..ERO AND USE|
00001BF0: 20 12 1F 28 49 4E 44 29 2C 59 98 92 20 46 4F 52 | ..(IND),Y.. FOR|
00001C00: A0 41 43 43 45 53 53 2E 22 3A 8D 31 30 30 30 00 |.ACCESS.":.1000.|
00001C10: 3C 1D 63 02 99 22 11 D9 D2 20 56 41 4C 55 45 53 |<.c.."... VALUES|
00001C20: 20 57 49 4C 4C 20 52 41 4E 47 45 20 30 2D 36 20 | WILL RANGE 0-6 |
00001C30: 54 4F 20 41 43 43 45 53 53 20 54 48 45 00 66 1D |TO ACCESS THE.f.|
00001C40: 64 02 99 22 42 59 54 45 53 20 49 4E 20 27 5A 27 |d.."BYTES IN 'Z'|
00001C50: 20 2D 20 54 48 45 20 46 49 52 53 54 20 56 41 52 | - THE FIRST VAR|
00001C60: 49 41 42 4C 45 2E 9A 00 70 1D 65 02 8D 31 31 30 |IABLE...p.e..110|
00001C70: 30 00 AB 1D 6C 02 99 22 93 11 98 D0 4F 49 4E 54 |0...l.."....OINT|
00001C80: 45 52 A0 54 4F A0 56 41 52 49 41 42 4C 45 53 A0 |ER.TO.VARIABLES.|
00001C90: 53 54 41 52 54 22 3A 99 22 13 22 3B 3A 8D 31 33 |START":.".";:.13|
00001CA0: 35 30 3A 54 B2 32 3A 8D 31 30 30 30 00 D1 1D 6F |50:T.2:.1000...o|
00001CB0: 02 5A B2 56 3A 56 B2 4E 32 3A 8D 31 34 30 30 3A |.Z.V:V.N2:.1400:|
00001CC0: 99 2C 2C 2C 22 91 91 1D 1F 22 5A 24 3A 8D 31 30 |.,,,"...."Z$:.10|
00001CD0: 30 30 00 F4 1D 76 02 99 22 11 11 98 22 46 24 22 |00...v.."..."F$"|
00001CE0: 53 20 22 5A 24 22 20 22 5A 24 22 2B 31 20 28 CC |S "Z$" "Z$"+1 (.|
00001CF0: CF 20 C8 C9 29 00 2C 1E 77 02 99 22 13 11 11 11 |. ..).,.w.."....|
00001D00: 22 3B 3A 8D 31 33 35 30 3A 8D 31 30 30 30 3A 99 |";:.1350:.1000:.|
00001D10: 2C 2C 2C 22 91 91 1D 1F 22 C9 28 59 24 2C 32 29 |,,,"....".(Y$,2)|
00001D20: C8 28 59 24 2C 32 29 3A 8D 31 30 30 30 00 56 1E |.(Y$,2):.1000.V.|
00001D30: 80 02 99 22 11 11 1E 22 46 24 22 20 22 59 24 22 |..."..."F$" "Y$"|
00001D40: 20 20 D6 41 52 49 41 42 4C 45 20 5A 20 20 20 D6 | .ARIABLE Z .|
00001D50: 41 4C 55 45 20 30 98 00 70 1E 81 02 99 48 24 4B |ALUE 0..p....H$K|
00001D60: 24 3A 8D 31 34 32 30 3A 54 B2 34 3A 8D 31 30 30 |$:.1420:T.4:.100|
00001D70: 30 00 9D 1E 85 02 99 22 11 11 1E 22 46 24 22 20 |0......"..."F$" |
00001D80: 22 5A 24 22 20 20 D6 41 52 49 41 42 4C 45 20 53 |"Z$" .ARIABLE S|
00001D90: 48 20 20 D6 41 4C 55 45 22 53 48 22 98 22 00 B3 |H .ALUE"SH"."..|
00001DA0: 1E 86 02 99 48 24 4B 24 3A 8D 31 34 32 30 3A 8D |....H$K$:.1420:.|
00001DB0: 31 30 30 30 00 E4 1E 8F 02 99 22 11 11 1E 22 46 |1000......"..."F|
00001DC0: 24 22 20 22 5A 24 22 20 20 D6 41 52 49 41 42 4C |$" "Z$" .ARIABL|
00001DD0: 45 20 42 24 20 20 D6 41 4C 55 45 20 12 5D 5D 5D |E B$ .ALUE .]]]|
00001DE0: 5D 5D 92 98 22 00 0C 1F 90 02 99 48 24 22 C3 CF |]].."......H$"..|
00001DF0: D5 CE D4 A6 A6 20 CC CF 20 C8 C9 20 A6 A6 A6 A6 |..... .. .. ....|
00001E00: A6 A6 A6 A6 A6 A6 22 3A 8D 31 34 32 30 00 27 1F |......":.1420.'.|
00001E10: BB 02 99 22 9A 22 3B 3A 8D 31 31 31 30 3A 91 5A |...".";:.1110:.Z|
00001E20: 89 35 30 30 2C 34 35 30 00 6B 1F BC 02 43 43 B2 |.500,450.k...CC.|
00001E30: 31 32 3A 8D 35 30 30 30 3A 99 22 93 1F C1 52 52 |12:.5000:."...RR|
00001E40: 41 59 20 53 54 41 52 54 A0 50 4F 49 4E 54 45 52 |AY START.POINTER|
00001E50: A0 49 53 A0 41 54 22 4E 33 AA 32 22 3A 22 4E 33 |.IS.AT"N3.2":"N3|
00001E60: AA 33 3A 54 B2 32 3A 8D 31 30 30 30 00 AD 1F BD |.3:T.2:.1000....|
00001E70: 02 99 22 11 CD 4F 44 49 46 59 A0 54 48 45 A0 41 |.."..ODIFY.THE.A|
00001E80: 43 43 45 53 53 A0 4D 45 54 48 4F 44 A0 54 4F A0 |CCESS.METHOD.TO.|
00001E90: 48 41 4E 44 4C 45 A0 4D 55 4C 54 49 44 49 4D 45 |HANDLE.MULTIDIME|
00001EA0: 4E 53 49 4F 4E 53 2E 22 3A 8D 31 30 30 30 00 DC |NSIONS.":.1000..|
00001EB0: 1F BE 02 99 22 11 CE 4F 54 45 A0 54 48 45 A0 41 |...."..OTE.THE.A|
00001EC0: 43 54 55 41 4C 20 53 45 51 55 45 4E 43 45 20 4F |CTUAL SEQUENCE O|
00001ED0: 46 20 58 28 32 2C 32 2C 32 29 3A 11 97 00 02 20 |F X(2,2,2):.... |
00001EE0: C6 02 54 B2 31 3A 49 B2 30 3A 81 4A B2 30 A4 32 |..T.1:I.0:.J.0.2|
00001EF0: 3A 81 5A B2 30 A4 32 3A 99 2C 5A 3B 4A 3B 49 3A |:.Z.0.2:.,Z;J;I:|
00001F00: 82 3A 99 00 3E 20 C7 02 8D 31 30 30 30 3A 82 4A |.:..> ...1000:.J|
00001F10: 3A 99 2C 22 20 30 20 20 30 20 20 31 22 3A 99 2C |:.," 0 0 1":.,|
00001F20: 22 20 2E 20 20 2E 20 20 2E 22 3A 99 2C 22 11 20 |" . . .":.,". |
00001F30: 32 20 20 32 20 20 32 9B 22 3A 8D 31 31 30 30 00 |2 2 2.":.1100.|
00001F40: 71 20 B6 03 8D 34 30 30 30 3A 99 22 11 11 98 CE |q ...4000:."....|
00001F50: 45 58 54 20 49 53 3A 20 20 12 97 20 33 2E 34 20 |EXT IS: .. 3.4 |
00001F60: 20 D3 4F 46 54 57 41 52 45 20 C1 49 44 53 20 11 | .OFTWARE .IDS .|
00001F70: 11 98 00 86 20 B7 03 8D 31 31 31 30 3A 91 5A 89 |.... ...1110:.Z.|
00001F80: 39 39 39 2C 39 39 39 00 A2 20 B8 03 9E 32 30 32 |999,999.. ...202|
00001F90: 34 3A 8F 22 14 14 14 14 14 14 14 14 14 14 14 14 |4:."............|
00001FA0: 45 4E 44 00 CC 20 E7 03 9E 32 31 33 36 3A 89 35 |END.. ...2136:.5|
00001FB0: 30 3A 8F 22 14 14 14 14 14 14 14 14 14 14 14 14 |0:."............|
00001FC0: 14 14 14 14 14 14 14 47 4F 54 4F 35 30 00 F0 20 |.......GOTO50.. |
00001FD0: E8 03 5A B2 54 49 AA 38 30 AC 54 3A 9E 32 30 34 |..Z.TI.80.T:.204|
00001FE0: 38 3A 8F 22 14 14 14 14 14 14 14 14 14 14 14 14 |8:."............|
00001FF0: 14 00 02 21 E9 03 8B 5A B3 54 49 B0 C2 28 53 48 |...!...Z.TI..(SH|
00002000: 29 A7 8E 00 0C 21 EA 03 89 31 30 30 31 00 29 21 |)....!...1001.)!|
00002010: 4C 04 99 22 13 22 4C 24 4C 24 4C 24 4C 24 22 12 |L.."."L$L$L$L$".|
00002020: 43 92 4F 4E 54 49 4E 55 45 13 00 41 21 4F 04 8D |C.ONTINUE..A!O..|
00002030: 31 32 30 30 3A 8B 5A 24 B3 B1 22 43 22 89 31 31 |1200:.Z$.."C".11|
00002040: 30 33 00 4B 21 50 04 89 31 31 31 32 00 7A 21 56 |03.K!P..1112.z!V|
00002050: 04 99 22 13 22 4C 24 4C 24 4C 24 4C 24 22 12 41 |.."."L$L$L$L$".A|
00002060: 92 47 41 49 4E 20 20 20 12 42 92 41 43 4B 20 20 |.GAIN .B.ACK |
00002070: 12 43 92 4F 4E 54 49 4E 55 45 13 00 9F 21 57 04 |.C.ONTINUE...!W.|
00002080: 5A B2 BB 28 31 29 3A 8D 31 32 30 30 3A 8B 5A 24 |Z..(1):.1200:.Z$|
00002090: B3 22 41 22 B0 5A 24 B1 22 43 22 89 31 31 31 31 |."A".Z$."C".1111|
000020A0: 00 B0 21 58 04 5A B2 C6 28 5A 24 29 AB 36 34 3A |..!X.Z..(Z$).64:|
000020B0: 8E 00 D8 21 60 04 99 22 13 22 4C 24 4C 24 4C 24 |...!`.."."L$L$L$|
000020C0: 4C 24 22 92 1C D0 52 45 53 53 A0 12 D2 C5 D4 D5 |L$"...RESS......|
000020D0: D2 CE 92 22 45 24 22 13 22 00 F2 21 61 04 8D 31 |..."E$"."..!a..1|
000020E0: 32 30 30 3A 8B 5A 24 B3 B1 C7 28 31 33 29 89 31 |200:.Z$...(13).1|
000020F0: 31 32 31 00 0C 22 62 04 99 22 13 22 4C 24 4C 24 |121.."b.."."L$L$|
00002100: 4C 24 4C 24 45 24 45 24 22 13 22 3A 8E 00 21 22 |L$L$E$E$".":..!"|
00002110: B0 04 A1 5A 24 3A 8B 5A 24 B3 B1 22 22 89 31 32 |...Z$:.Z$.."".12|
00002120: 30 30 00 35 22 B1 04 A1 5A 24 3A 8B 5A 24 B2 22 |00.5"...Z$:.Z$."|
00002130: 22 89 31 32 30 31 00 5D 22 B2 04 9E 32 30 34 38 |".1201.]"...2048|
00002140: 3A 8E 3A 8F 22 14 14 14 14 14 14 14 14 14 14 14 |:.:."...........|
00002150: 14 14 14 14 14 14 14 14 52 45 54 55 52 4E 00 7B |........RETURN.{|
00002160: 22 14 05 99 42 24 22 12 22 59 24 3A 8D 31 30 30 |"...B$"."Y$:.100|
00002170: 30 3A 99 42 24 22 91 22 59 24 3A 8E 00 9A 22 1E |0:.B$"."Y$:...".|
00002180: 05 81 49 B2 31 A4 31 37 3A 99 59 24 3B 3A 4A B2 |..I.1.17:.Y$;:J.|
00002190: 49 3A 99 5A 24 3B 3A 82 49 3A 8E 00 CB 22 28 05 |I:.Z$;:.I:..."(.|
000021A0: 99 22 13 11 11 11 1D 1F 22 C2 28 4E 31 29 2C 22 |."......".(N1),"|
000021B0: 1D 22 C2 28 4E 32 29 22 9D 20 22 3B 3A 8B C2 28 |.".(N2)". ";:..(|
000021C0: 4E 32 29 B3 31 30 A7 99 22 DD 22 3B 00 E0 22 29 |N2).10..".";..")|
000021D0: 05 8B C2 28 4E 32 29 B2 31 30 A7 99 22 9D DD 22 |...(N2).10..".."|
000021E0: 3B 00 0D 23 2A 05 99 3A 99 4C 24 3B 3A 81 49 B2 |;..#*..:.L$;:.I.|
000021F0: 30 A4 39 3A 99 C9 28 22 20 20 22 AA C4 28 C2 28 |0.9:..(" "..(.(|
00002200: 4E 33 AA 49 29 29 2C 34 29 3B 3A 82 3A 8E 00 29 |N3.I)),4);:.:..)|
00002210: 23 32 05 99 22 CC 4F 4F 4B A0 41 54 A0 41 A0 4D |#2..".OOK.AT.A.M|
00002220: 45 4D 4F 52 59 A0 4D 41 50 2E 00 58 23 34 05 99 |EMORY.MAP..X#4..|
00002230: 22 11 D7 48 41 54 A0 41 52 45 20 54 48 45 A0 28 |"..HAT.ARE THE.(|
00002240: 44 45 43 49 4D 41 4C 29 20 4C 4F 43 41 54 49 4F |DECIMAL) LOCATIO|
00002250: 4E 53 20 4F 46 3A 22 3A 8E 00 6E 23 3C 05 8B C5 |NS OF:":..n#<...|
00002260: 28 5A 24 29 B2 49 A7 99 22 11 CF CB 22 3A 8E 00 |(Z$).I.."...":..|
00002270: 89 23 3D 05 99 2C 22 11 CE 4F 20 49 54 A0 49 53 |.#=..,"..O IT.IS|
00002280: 22 49 3A 8D 31 30 30 30 3A 8E 00 B7 23 46 05 99 |"I:.1000:...#F..|
00002290: 2C 2C 2C 22 97 B0 C0 C0 C0 C0 AE 9D 9D 9D 9D 9D |,,,"............|
000022A0: 9D 11 DD 1D 1D 1D 1D DD 9D 9D 9D 9D 9D 9D 11 AD |................|
000022B0: C0 C0 C0 C0 BD 22 3A 8E 00 EE 23 78 05 5A 24 B2 |.....":...#x.Z$.|
000022C0: 22 22 3A 81 49 B2 33 A4 30 A9 AB 31 3A 4A B2 B5 |"":.I.3.0..1:J..|
000022D0: 28 5A AD 31 36 AE 49 29 3A 5A 24 B2 5A 24 AA C7 |(Z.16.I):Z$.Z$..|
000022E0: 28 35 35 AA 4A AA 37 AC 28 4A B3 31 30 29 29 00 |(55.J.7.(J.10)).|
000022F0: 01 24 79 05 5A B2 5A AB 4A AC 31 36 AE 49 3A 82 |.$y.Z.Z.J.16.I:.|
00002300: 3A 8E 00 36 24 8C 05 99 22 1D 1D 1F 22 3B 3A 81 |:..6$..."...";:.|
00002310: 4E 31 B2 30 A4 36 3A 5A B2 C2 28 56 AA 4E 31 29 |N1.0.6:Z..(V.N1)|
00002320: 3A 8D 31 34 30 30 3A 99 C9 28 5A 24 2C 32 29 22 |:.1400:..(Z$,2)"|
00002330: 1D 1D 1D 22 3B 3A 82 00 4E 24 8D 05 99 3A 56 B2 |...";:..N$...:V.|
00002340: 56 AA 37 3A 5A B2 56 3A 8D 31 34 30 30 3A 8E 00 |V.7:Z.V:.1400:..|
00002350: 77 24 B8 0B 99 22 93 12 1F CC C5 D3 D3 CF CE 20 |w$..."......... |
00002360: 33 2E 33 20 3A 20 CC C9 CE CB C9 CE C7 20 D7 C9 |3.3 : ....... ..|
00002370: D4 C8 20 C2 C1 D3 C9 C3 00 AA 24 C2 0B 99 22 11 |.. .......$...".|
00002380: 98 D4 48 49 53 A0 4C 45 53 53 4F 4E A0 53 48 4F |..HIS.LESSON.SHO|
00002390: 57 53 A0 48 4F 57 A0 54 4F A0 49 4E 54 45 52 46 |WS.HOW.TO.INTERF|
000023A0: 41 43 45 A0 C2 C1 D3 C9 C3 22 3B 00 D7 24 CC 0B |ACE......";..$..|
000023B0: 99 22 41 4E 44 A0 CD C1 C3 C8 C9 CE C5 20 C3 CF |."AND........ ..|
000023C0: C4 C5 2C 20 43 4F 56 45 52 49 4E 47 3A 22 3A 54 |.., COVERING:":T|
000023D0: B2 33 3A 8D 31 30 30 30 00 FC 24 D6 0B 99 42 24 |.3:.1000..$...B$|
000023E0: 22 11 97 C5 4E 54 52 59 A0 41 4E 44 A0 45 58 49 |"...NTRY.AND.EXI|
000023F0: 54 3B 22 3A 54 B2 32 3A 8D 31 30 30 30 00 23 25 |T;":T.2:.1000.#%|
00002400: E0 0B 99 42 24 22 11 C8 4F 57 A0 54 4F A0 55 53 |...B$"..OW.TO.US|
00002410: 45 A0 54 48 45 A0 53 43 52 45 45 4E 3B 22 3A 8D |E.THE.SCREEN;":.|
00002420: 31 30 30 30 00 43 25 EA 0B 99 42 24 22 11 CB 45 |1000.C%...B$"..E|
00002430: 59 42 4F 41 52 44 A0 49 4E 50 55 54 3B 22 3A 8D |YBOARD.INPUT;":.|
00002440: 31 30 30 30 00 76 25 F4 0B 99 42 24 22 11 C8 4F |1000.v%...B$"..O|
00002450: 57 A0 54 4F A0 48 41 4E 44 4C 45 A0 54 48 45 A0 |W.TO.HANDLE.THE.|
00002460: 4B 45 59 42 4F 41 52 44 A0 42 55 46 46 45 52 3B |KEYBOARD.BUFFER;|
00002470: 22 3A 8D 31 30 30 30 00 94 25 FE 0B 99 42 24 22 |":.1000..%...B$"|
00002480: 11 D4 48 45 A0 D3 D4 CF D0 20 4B 45 59 3B 22 3A |..HE..... KEY;":|
00002490: 8D 31 30 30 30 00 BF 25 08 0C 99 42 24 22 11 C1 |.1000..%...B$"..|
000024A0: 43 43 45 53 53 49 4E 47 A0 C2 C1 D3 C9 C3 20 56 |CCESSING...... V|
000024B0: 41 52 49 41 42 4C 45 53 3B 22 3A 8D 31 30 30 30 |ARIABLES;":.1000|
000024C0: 00 E1 25 12 0C 99 42 24 22 11 C1 43 43 45 53 53 |..%...B$"..CCESS|
000024D0: 49 4E 47 20 41 52 52 41 59 53 2E 22 3A 8D 31 30 |ING ARRAYS.":.10|
000024E0: 30 30 00 E7 25 1C 0C 8E 00 03 26 A0 0F 43 43 B2 |00..%.....&..CC.|
000024F0: 33 3A 8D 35 30 30 30 3A 99 22 93 12 1F D3 D5 CD |3:.5000:."......|
00002500: CD C1 D2 D9 00 2B 26 AA 0F 99 22 11 98 D4 48 49 |.....+&..."...HI|
00002510: 53 20 4C 45 53 53 4F 4E 20 48 41 53 20 43 4F 56 |S LESSON HAS COV|
00002520: 45 52 45 44 3A 22 3A 89 33 30 33 30 00 67 26 88 |ERED:":.3030.g&.|
00002530: 13 97 35 33 32 38 30 2C 43 43 3A 97 35 33 32 38 |..53280,CC:.5328|
00002540: 31 2C 43 43 3A 9E 32 30 34 38 3A 8E 3A 8F 22 14 |1,CC:.2048:.:.".|
00002550: 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 |................|
00002560: 14 14 52 45 54 55 52 4E 00 74 26 70 17 8F 31 35 |..RETURN.t&p..15|
00002570: 2C 38 2C 31 35 00 9A 26 71 17 8F 31 2C 38 2C 38 |,8,15..&q..1,8,8|
00002580: 2C 22 44 41 54 41 2C 53 2C 52 22 3A 8D 36 30 31 |,"DATA,S,R":.601|
00002590: 30 3A 8B 45 4E A7 9E 32 30 32 34 00 A1 26 72 17 |0:.EN..2024..&r.|
000025A0: A0 31 00 D4 26 73 17 8F 32 2C 38 2C 32 2C 22 23 |.1..&s..2,8,2,"#|
000025B0: 22 3A 98 31 35 2C 22 55 31 3A 22 3B 32 3B 30 3B |":.15,"U1:";2;0;|
000025C0: 31 3B 30 3A 8D 36 30 31 30 3A 8B 45 4E B2 30 A7 |1;0:.6010:.EN.0.|
000025D0: 9E 32 30 32 34 00 E1 26 74 17 A0 32 3A A0 31 35 |.2024..&t..2:.15|
000025E0: 3A 8E 00 F6 26 7A 17 84 31 35 2C 45 4E 2C 45 4D |:...&z..15,EN,EM|
000025F0: 24 2C 45 54 2C 45 53 00 FC 26 7B 17 8E 00 00 00 |$,ET,ES..&{.....|
00002600: 00 52 D9 AA AA 86 BD 98 45 52 |.R......ER |
..140.000000...UM_.............?._....O_
..MT.............^.....U.......?.}......
.&......................................
........................................
........................................
........................................
.....................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..M.2..:Z.B(50003)...3.SH.653:B$."..
...":E$." ".J.4.F$."LO
CATION":H$."... NAME .":L$.".........5.
K$."..FLOATING POINT BINARY ":M$."(.RETU
RN. TO STOP)...<.CC.6:.5000.N.D.."."G(14
)L$,,".............. ...................
.. .....Z.E..B$"....* SOFTWARE AND PROG
RAMMING *"...F..,"......3.3 LINKING W
ITH BASIC":T.3:.1000:.6000.R.N.CC.3:.500
0:.3000:.".";:.1100...X.CC.11:.5000:."..
.ENTRY AND EXIT...Y.."... BASIC":T.2:.10
00.E....".......":T..3:Y$."FOR":.1300:Y$
."PRINT":.1300.Z...Y$."INPUT":.1300:Y$."
POKE":.1300:.B$".SYS":.1000......"....",
,B$". MACHINE CODE":."......"L$,......I.
1.4:.">.";:.J.1.30:.:." .";:.I:Y$.">.":Z
$." ":.1310......"...LDA";......".....LD
A......TAX";.%....".....TAX......BNE";.?
....".....BNE......CLC";.Y....".....CLC.
.....ADC";.S....".....ADC......STA";....
..".....STA......INX";......".....INX...
...BPL";.A....".....BPL......RTS";.R....
".....RTS";... .."......";......I.1.3:."
.<.";:.J.1.1:.:." ..";:.I:Y$."<.":Z$." .
.":.1310.F...."......"L$B$"SYS":Y$."NEXT
":.1300.H...."....."M$:.Z$:.Z$..G(13).13
0......".."E$:.".WITHOUT .RTS. YOU MUST
RESET THE COMMODORE";.I...."64 TO RETURN
TO BASIC!.":.1100.....CC.12:.5000:.".."
L$"MPU REGISTER CONTENTS ARE INDETERMINA
TE.9...."AT .SYS. ENTRY AND .RTS. EXIT."
:T.2:.1000.G...."..DON'T SPOIL THE STACK
IN YOUR MACHINE. ...."CODE ROUTINES; LE
AVE IT AS YOU FIND IT!":T.4:.1000.N...."
..PRESERVE PAGE ZERO LOCATIONS OR BASIC.
....."MAY CRASH..":.1110:.Z.120,120...H.
CC.15:.5000:."...USING THE SCREEN.L.I.."
...USE INDEXED ADDRESSING FOR LINES OF T
EXT";.Z.J..B$"...LDA.. WITH THE CHARACTE
R TO PRINT;...K..B$"...STA.. IN SCREEN R
AM.":T.4:.1000:."..USE:...M..B$"....BYT.
. (LESSON 3.2) FOR THE TEXT":.B$"STRINGS
":T.2:.1000.1.N.."OR":.B$"IMMEDIATE ADDR
ESSING FOR SINGLE":.B$"CHARACTERS:.Z.P..
B$"..ASCII LITERALS"B$".LDA #'A'":.B$"..
ASCII CODES "B$".LDA #$41...Q..".":.11
00.D.R.CC.12:.5000:."."L$".CONVERT NUMER
IC DATA TO ASCII CODE...S.."BEFORE PRINT
ING (LESSON 1.8).."......1110:.Z.200,120
.0.,.CC.15:.5000:."...KEYBOARD INPUT - A
DDRESSES..I./.N1.653:N2.198:N3.631.X.2..
"..KEYBOARD INPUT BUFFER START";:.40:I.N
3...6..1340:.".KEYBOARD INPUT BUFFER COU
NT";:.40:I.N2.U.;..1340:.".SHIFT KEY STA
TUS";:.40:I.N1...@..1340:."..YOU USE THE
SE LOCATIONS FOR KEYBOARD.A.A.."INPUT TO
MACHINE CODE PROGRAMS..":.1110:.Z.300,2
00...E.CC.3:.5000:."."L$".WATCH HOW BASI
C HANDLES KEY DEPRESSIONS...F.."IN THE 1
/60SEC IRQ CYCLE (LESSON 2.8)..":.1100.I
.G..Z$:.Z$.."".327.Y.H.CC.15:.5000...L..
I.0.9:.N3.I,0:.:."..SHIFT","BUFFER COUNT
":.".."N1". ",N2"..?.M.."......","....."
:.".....","......W.T..".....",".....":."
...KEYBOARD BUFFER":.".."N3". ."...U..I.
1.40:.".";:.:.".";:.I.1.40:.".";:....Y..
"...PRESS KEYS TO SEE IT WORK.":.M$:."TR
Y SHIFT & CBM KEYS...^..1320:.B(N3.B(N2)
.1).13..1320:."....NOTE ... ";:.353.-._
..B(N2).10.350.J.`..1320:."....NO MORE!
";.J.A.."THE COMMODORE 64 DISCARDS...B.
."ANY CHARACTERS AFTER THE TENTH."E$E$:T
.6:.1000...H.."..."L$L$"NOW WATCH HOW .G
ET Z$. EMPTIES THE BUFFER."E$E$:.E$E$...
I.T.2:.1000:.B(N2).0.399.3.J.."."L$L$L$"
..GET":Z$.I(" ".D(B(N3)),4):Y$."..".N.L
.."......"L$:.I.1.20:."."J(Y$,1.(I.1),1)
Z$:.J.1.10:.J,I.~.M..Z$:Z.F(Z$)...R.."."
L$L$L$,".Z$ = CHR$ ("Z". ) ":.1000:.1320
:.B(N2).0.399.F.S..1000...T.."..."L$L$".
TOUCH .SHIFT. TO GET THE NEXT CHARACTER.
."E$E$...U..B(SH).0.373.J.V.."..."L$L$E$
E$:.".."E$E$:.I.1.300:.:T.T..2:.362.E...
.".";:.1110:.Z.325,300.....CC.12:.5000:.
"......FIRST IN",,"FIRST OUT.E...."....A
FTER EACH GET, CHARACTERS MOVE DOWN ON..
...."THE BUFFER COUNT, AND IT IS THEN":.
"DECREMENTED.":T.4:.1000.;...."...YOUR O
WN ROUTINE TO LOAD FROM THE BUFFER";.H..
.."ONE AT A TIME WILL BE LIKE GET.":.100
0......"...DISABLE INTERRUPTS WITH ..SEI
.. (LESSON 2.8)WHILE IT OPERATES...F....
1110:.Z.400,325...B.CC.15:.5000:."...THE
STOP KEY"...C.."....STOP.. IS DETECTED
IN THE 1/60 SECOND.H.D.."IRQ ROUTINE (LE
SSON 2.8).":T.3:.1000:T.5.S.E..".IT WILL
NOT HALT MACHINE CODE; YOUR...F.."PROGR
AM MUST DETECT THE KEY DEPRESSION IF YO
U NEED TO USE IT.":.1000...H.."..THE IRQ
ROUTINE SETS LOCATION $91 = 127 WHEN TH
E KEY IS DOWN..+.I.T.3:.1000:.".USE:":."
.",".LDA $91.G.L..,"CMP #$7F":.,"BNE CON
T ;NOT DOWN":.,"BRK"B$" ;OR .RTS...M..B$
"CONT ... ETC.":.1110:.Z.450,400.....CC.
12:.5000:."...BASIC VARIABLES AND STRING
S......"....LOOK IN THE CBM MANUAL FOR T
HE FORMAT OF";......"VARIABLES.":T.3:.10
00:T.6.I...."...YOU CAN MANIPULATE INTEG
ER VARIABLES AND";.Z...."ARRAYS, AND ACC
ESS STRINGS, QUITE EASILY";.G...."IN MAC
HINE CODE. FLOATING POINT IS MOREDIFFIC
ULT (LESSON 1.7).":.1000......"...DON'T
SPOIL THEM!.":.1100.....CC.15:.5000:."..
":.1330./....".START-OF-VARIABLES LO";:.
40:N3.45.>...I.N3:.1340.K....".START-OF-
ARRAYS LO";:.40:I.N3.2:.1340......"...US
E THESE PAGE ZERO ADDRESSES TO ACCESS.P.
..."VARIABLES WITH INDEXED ADDRESSING.":
T.3:.1000......".ELIMINATE SEARCHING BY
INITIALISING THE.*...."VARIABLES IN A KN
OWN SEQUENCE AT THE.T...."START OF THE B
ASIC PROGRAM..":.1100......".."L$"AT THE
START OF THIS PROGRAM ......":T.2:.1000
......".50 CLR:Z=PEEK(50003)":.1000.V.&.
."....HOW TO FIND Z ....":.1100...X.CC.1
5:.5000:V.N3:."....."F$"S"V"&"V.1"HAVE V
ALUES:.":.,B(V),B(V.1).Z.Z.."..WHERE DO
THE VARIABLES START ?.$........";:.41:Y$
.Z$...].Z.B(V).256.B(V.1):N2.Z:.1400:.Z$
.Y$..".OK":.610.G.`..".NO IT IS $"Z$" .
.. "N2"DECIMAL.":T.2:.1000:Y$.Z$...B..".
.STORE THIS IN PAGE ZERO AND USE ..(IND)
,Y.. FOR ACCESS.":.1000.<.C..".YR VALUES
WILL RANGE 0-6 TO ACCESS THE.F.D.."BYTE
S IN 'Z' - THE FIRST VARIABLE...P.E..110
0...L.."...POINTER TO VARIABLES START":.
".";:.1350:T.2:.1000.Q.O.Z.V:V.N2:.1400:
.,,,"...."Z$:.1000...V.."..."F$"S "Z$" "
Z$"+1 (LO HI).,.W.."....";:.1350:.1000:.
,,,"...."I(Y$,2)H(Y$,2):.1000.V...."..."
F$" "Y$" VARIABLE Z VALUE 0..P....H$K
$:.1420:T.4:.1000......"..."F$" "Z$" VA
RIABLE SH VALUE"SH"."......H$K$:.1420:.
1000......"..."F$" "Z$" VARIABLE B$ VA
LUE .]]]]].."......H$"COUNT.. LO HI ....
......":.1420.'....".";:.1110:.Z.500,450
.K...CC.12:.5000:."..ARRAY START POINTER
IS AT"N3.2":"N3.3:T.2:.1000......".MODI
FY THE ACCESS METHOD TO HANDLE MULTIDIME
NSIONS.":.1000......".NOTE THE ACTUAL SE
QUENCE OF X(2,2,2):.... F.T.1:I.0:.J.0.2
:.Z.0.2:.,Z;J;I:.:..> G..1000:.J:.," 0
0 1":.," . . .":.,". 2 2 2.":.1100.
Q ...4000:."...NEXT IS: .. 3.4 SOFTWAR
E AIDS ..... ...1110:.Z.999,999.. ...202
4:."............END.L ...2136:.50:."....
...............GOTO50.. ..Z.TI.80.T:.204
8:."...............!...Z.TI.B(SH)....!..
.1001.)!L.."."L$L$L$L$".C.ONTINUE..A!O..
1200:.Z$.."C".1103.K!P..1112.Z!V.."."L$L
$L$L$".A.GAIN .B.ACK .C.ONTINUE...!W.
Z..(1):.1200:.Z$."A".Z$."C".1111..!X.Z.F
(Z$).64:..X!`.."."L$L$L$L$"..PRESS .RETU
RN."E$"."..!A..1200:.Z$..G(13).1121.."B.
."."L$L$L$L$E$E$".":..!"...Z$:.Z$.."".12
00.5"...Z$:.Z$."".1201.]"...2048:.:."...
................RETURN.{"...B$"."Y$:.100
0:.B$"."Y$:..."...I.1.17:.Y$;:J.I:.Z$;:.
I:..K"(.."......"B(N1),"."B(N2)". ";:.B(
N2).10..".";..")..B(N2).10.."..";..#*..:
.L$;:.I.0.9:.I(" ".D(B(N3.I)),4);:.:..)
#2.."LOOK AT A MEMORY MAP..X#4..".WHAT A
RE THE (DECIMAL) LOCATIONS OF:":..N#<..E
(Z$).I..".OK":...#=..,".NO IT IS"I:.1000
:...#F..,,,"............................
.....":...#X.Z$."":.I.3.0..1:J..(Z.16.I)
:Z$.Z$.G(55.J.7.(J.10))..$Y.Z.Z.J.16.I:.
:..6$..."...";:.N1.0.6:Z.B(V.N1):.1400:.
I(Z$,2)"...";:..N$...:V.V.7:Z.V:.1400:..
W$..."...LESSON 3.3 : LINKING WITH BASIC
..$B.."..THIS LESSON SHOWS HOW TO INTERF
ACE BASIC";.W$L.."AND MACHINE CODE, COVE
RING:":T.3:.1000..$V..B$"..ENTRY AND EXI
T;":T.2:.1000.#%...B$".HOW TO USE THE SC
REEN;":.1000.C%...B$".KEYBOARD INPUT;":.
1000.V%...B$".HOW TO HANDLE THE KEYBOARD
BUFFER;":.1000..%...B$".THE STOP KEY;":
.1000..%...B$".ACCESSING BASIC VARIABLES
;":.1000..%...B$".ACCESSING ARRAYS.":.10
00..%.....& .CC.3:.5000:."...SUMMARY.+&.
.."..THIS LESSON HAS COVERED:":.3030.G&.
..53280,CC:.53281,CC:.2048:.:.".........
..........RETURN.T&P..15,8,15..&Q..1,8,8
,"DATA,S,R":.6010:.EN..2024..&R. 1.T&S..
2,8,2,"#":.15,"U1:";2;0;1;0:.6010:.EN.0.
.2024..&T. 2: 15:...&Z..15,EN,EM$,ET,ES.
.&{......RY.....ER
> CLICK IMAGE PREVIEW FOR FULL MODAL