FPROGRAM
FILE INFORMATION
FILENAME(S): FPROGRAM
FILE TYPE(S): PRG
FILE SIZE: 5.7K
FIRST SEEN: 2025-10-20 14:30:26
APPEARS ON: 1 disk(s)
FILE HASH
51e8c4964dd02ff2bfad9af5a70d37e92d253b02c16aa0bff8973e161dbce6d4
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| WOLF S SOFT C011 | FPROGRAM | PRG | Treasure Chest - Klaus Der Suhler | 27 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 5B 48 5B 0A 00 8F 20 50 52 4F 47 52 41 4D 20 |.[H[... PROGRAM |
00000010: 42 59 20 50 41 54 52 49 43 4B 20 44 49 43 4B 45 |BY PATRICK DICKE|
00000020: 59 20 4F 46 20 49 4E 54 45 4C 45 43 48 49 50 53 |Y OF INTELECHIPS|
00000030: 20 43 4F 4D 50 41 4E 59 2E 20 44 4F 4E 41 54 45 | COMPANY. DONATE|
00000040: 44 20 54 4F 20 54 48 45 00 5C 5B 14 00 8F 20 50 |D TO THE.\[... P|
00000050: 55 42 4C 49 43 20 44 4F 4D 41 49 4E 00 7E 5B 19 |UBLIC DOMAIN.~[.|
00000060: 00 8F 20 52 45 56 49 53 45 44 20 42 59 20 44 57 |.. REVISED BY DW|
00000070: 49 47 48 54 20 44 45 41 4E 20 32 2F 38 36 00 A7 |IGHT DEAN 2/86..|
00000080: 5B 1E 00 8C 3A 53 B2 30 3A 8B C2 28 35 34 35 33 |[...:S.0:..(5453|
00000090: 33 29 B2 35 35 A7 DE 35 3A 53 50 B2 32 30 3A D5 |3).55..5:SP.20:.|
000000A0: DE 30 3A 53 50 B2 30 00 FD 5B 28 00 41 24 B2 22 |.0:SP.0..[(.A$."|
000000B0: 22 3A A0 33 3A 20 99 22 93 22 3A 99 A3 53 50 29 |":.3: .".":..SP)|
000000C0: C7 28 31 35 29 3B 22 20 20 20 20 20 20 20 31 32 |.(15);" 12|
000000D0: 38 2D 46 4B 45 59 20 4F 56 45 52 4C 41 59 22 3A |8-FKEY OVERLAY":|
000000E0: 99 A3 53 50 29 22 20 20 20 20 20 20 20 20 20 20 |..SP)" |
000000F0: 20 11 44 4F 20 59 4F 55 20 57 41 4E 54 00 22 5C | .DO YOU WANT."\|
00000100: 32 00 99 A3 53 50 29 22 11 20 20 20 20 20 20 20 |2...SP)". |
00000110: 31 2D 2D 2D 2D 42 4C 41 4E 4B 20 4F 56 45 52 4C |1----BLANK OVERL|
00000120: 41 59 00 49 5C 3C 00 99 A3 53 50 29 22 11 20 20 |AY.I\<...SP)". |
00000130: 20 20 20 20 20 32 2D 2D 2D 2D 44 45 46 49 4E 45 | 2----DEFINE|
00000140: 44 20 4F 56 45 52 4C 41 59 00 6E 5C 46 00 99 A3 |D OVERLAY.n\F...|
00000150: 53 50 29 22 11 20 20 20 20 20 20 20 33 2D 2D 2D |SP)". 3---|
00000160: 2D 49 4E 50 55 54 20 4F 56 45 52 4C 41 59 00 9A |-INPUT OVERLAY..|
00000170: 5C 48 00 99 A3 53 50 29 22 11 20 20 20 20 20 20 |\H...SP)". |
00000180: 20 34 2D 2D 2D 2D 44 45 46 49 4E 45 20 46 55 4E | 4----DEFINE FUN|
00000190: 43 54 49 4F 4E 20 4B 45 59 53 00 CE 5C 4A 00 99 |CTION KEYS..\J..|
000001A0: A3 53 50 29 22 11 20 20 20 20 20 20 20 35 2D 2D |.SP)". 5--|
000001B0: 2D 2D 53 41 56 45 20 46 55 4E 43 54 49 4F 4E 20 |--SAVE FUNCTION |
000001C0: 4B 45 59 20 44 45 46 49 4E 49 54 49 4F 4E 00 E2 |KEY DEFINITION..|
000001D0: 5C 50 00 EB FC 41 24 B3 B1 22 22 3A A1 F9 41 24 |\P...A$.."":..A$|
000001E0: 3A EC 00 F2 5C 5A 00 8B 41 24 B2 22 32 22 A7 31 |:...\Z..A$."2".1|
000001F0: 32 30 00 03 5D 64 00 8B 41 24 B2 22 31 22 A7 89 |20..]d..A$."1"..|
00000200: 33 37 30 00 14 5D 6E 00 8B 41 24 B2 22 33 22 A7 |370..]n..A$."3".|
00000210: 89 36 32 30 00 26 5D 70 00 8B 41 24 B2 22 34 22 |.620.&]p..A$."4"|
00000220: A7 89 32 30 30 30 00 3C 5D 72 00 8B 41 24 B2 22 |..2000.<]r..A$."|
00000230: 35 22 A7 89 33 30 30 30 3A D5 34 30 00 45 5D 78 |5"..3000:.40.E]x|
00000240: 00 9F 33 2C 34 00 52 5D 82 00 98 33 2C C7 28 31 |..3,4.R]...3,.(1|
00000250: 35 29 00 85 5D 8C 00 98 33 2C 22 A4 A4 A4 A4 A4 |5)..]...3,".....|
00000260: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000270: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000280: A4 A4 20 22 3B 00 B6 5D 96 00 98 33 2C 22 A4 A4 |.. ";..]...3,"..|
00000290: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000002A0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000002B0: A4 A4 A4 A4 A4 22 00 E9 5D A0 00 98 33 2C 22 B5 |....."..]...3,".|
000002C0: 47 52 41 50 48 49 43 20 20 B4 44 49 52 45 43 54 |GRAPHIC .DIRECT|
000002D0: 4F 52 59 B4 20 44 53 41 56 45 27 27 20 B4 20 20 |ORY. DSAVE'' . |
000002E0: 4C 49 53 54 20 20 B5 22 3B 00 1B 5E AA 00 98 33 |LIST .";..^...3|
000002F0: 2C 22 B5 47 52 41 50 48 49 43 20 20 B4 44 49 52 |,".GRAPHIC .DIR|
00000300: 45 43 54 4F 52 59 B4 20 44 53 41 56 45 27 27 20 |ECTORY. DSAVE'' |
00000310: B4 20 20 4C 49 53 54 20 20 B5 22 00 4E 5E B4 00 |. LIST .".N^..|
00000320: 98 33 2C 22 B5 20 20 46 31 20 20 20 20 20 B4 20 |.3,". F1 . |
00000330: 20 20 46 33 20 20 20 20 B4 20 20 46 35 20 20 20 | F3 . F5 |
00000340: 20 20 B4 20 20 46 37 20 20 20 20 B5 22 3B 00 80 | . F7 .";..|
00000350: 5E BE 00 98 33 2C 22 B5 20 20 46 31 20 20 20 20 |^...3,". F1 |
00000360: 20 B4 20 20 20 46 33 20 20 20 20 B4 20 20 46 35 | . F3 . F5|
00000370: 20 20 20 20 20 B4 20 20 46 37 20 20 20 20 B5 22 | . F7 ."|
00000380: 00 B3 5E C8 00 98 33 2C 22 B5 20 20 20 20 B0 C3 |..^...3,". ..|
00000390: C3 C3 C3 C3 C0 C3 B2 C3 C3 C3 C3 C3 C3 B2 C3 C3 |................|
000003A0: C3 C3 C3 C3 B2 C3 C3 C3 C3 C3 C3 AE 20 20 20 20 |............ |
000003B0: B5 22 3B 00 E4 5E D2 00 98 33 2C 22 B5 20 20 20 |.";..^...3,". |
000003C0: 20 B0 C3 C3 C3 C3 C3 C0 C3 B2 C3 C3 C3 C3 C3 C3 | ...............|
000003D0: B2 C3 C3 C3 C3 C3 C3 B2 C3 C3 C3 C3 C3 C3 AE 20 |............... |
000003E0: 20 20 20 B5 00 17 5F DC 00 98 33 2C 22 B5 20 20 | ..._...3,". |
000003F0: 20 20 C2 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 C8 | .|
00000410: 20 20 20 20 B5 22 3B 00 48 5F E6 00 98 33 2C 22 | .";.H_...3,"|
00000420: B5 20 20 20 20 C2 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 C8 20 20 20 20 B5 00 7B 5F F0 00 98 33 2C | . ..{_...3,|
00000450: 22 B5 20 20 20 20 C2 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 C8 20 20 20 20 B5 22 3B 00 AC 5F FA 00 | . .";.._..|
00000480: 98 33 2C 22 B5 20 20 20 20 C2 20 20 20 20 20 20 |.3,". . |
00000490: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004A0: 20 20 20 20 20 20 C8 20 20 20 20 B5 00 DF 5F 04 | . ..._.|
000004B0: 01 98 33 2C 22 B5 20 20 20 20 C2 20 20 20 20 20 |..3,". . |
000004C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004D0: 20 20 20 20 20 20 20 C8 20 20 20 20 B5 22 3B 00 | . .";.|
000004E0: 10 60 0E 01 98 33 2C 22 B5 20 20 20 20 C2 20 20 |.`...3,". . |
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 C8 20 20 20 20 B5 | . .|
00000510: 00 43 60 18 01 98 33 2C 22 B5 20 20 20 20 AD C0 |.C`...3,". ..|
00000520: C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 B1 C0 C0 |................|
00000530: C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 BD 20 20 20 20 |............ |
00000540: B5 22 3B 00 74 60 22 01 98 33 2C 22 B5 20 20 20 |.";.t`"..3,". |
00000550: 20 AD C0 C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 | ...............|
00000560: B1 C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 BD 20 |............... |
00000570: 20 20 20 B5 00 A7 60 2C 01 98 33 2C 22 B5 20 20 | ...`,..3,". |
00000580: 46 32 20 20 20 20 20 B4 20 20 20 46 34 20 20 20 |F2 . F4 |
00000590: 20 B4 20 20 46 36 20 20 20 20 20 B4 20 20 46 38 | . F6 . F8|
000005A0: 20 20 20 20 B5 22 3B 00 D9 60 36 01 98 33 2C 22 | .";..`6..3,"|
000005B0: B5 20 20 46 32 20 20 20 20 20 B4 20 20 20 46 34 |. F2 . F4|
000005C0: 20 20 20 20 B4 20 20 46 36 20 20 20 20 20 B4 20 | . F6 . |
000005D0: 20 46 38 20 20 20 20 B5 22 00 0C 61 40 01 98 33 | F8 ."..a@..3|
000005E0: 2C 22 B5 44 4C 4F 41 44 27 27 20 20 B4 20 53 43 |,".DLOAD'' . SC|
000005F0: 4E 43 4C 52 20 20 B4 20 20 52 55 4E 20 20 20 20 |NCLR . RUN |
00000600: B4 20 4D 4F 4E 49 54 4F 52 B5 22 3B 00 3E 61 4A |. MONITOR.";.>aJ|
00000610: 01 98 33 2C 22 B5 44 4C 4F 41 44 27 27 20 20 B4 |..3,".DLOAD'' .|
00000620: 20 53 43 4E 43 4C 52 20 20 B4 20 20 52 55 4E 20 | SCNCLR . RUN |
00000630: 20 20 20 B4 20 4D 4F 4E 49 54 4F 52 B5 22 00 71 | . MONITOR.".q|
00000640: 61 54 01 98 33 2C 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 |aT..3,".........|
00000650: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000660: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 20 22 |.............. "|
00000670: 3B 00 A2 61 5E 01 98 33 2C 22 A3 A3 A3 A3 A3 A3 |;..a^..3,"......|
00000680: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000690: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000006A0: A3 22 00 AA 61 68 01 89 33 30 00 B3 61 72 01 9F |."..ah..30..ar..|
000006B0: 33 2C 34 00 C0 61 7C 01 98 33 2C C7 28 31 35 29 |3,4..a|..3,.(15)|
000006C0: 00 F3 61 86 01 98 33 2C 22 A4 A4 A4 A4 A4 A4 A4 |..a...3,".......|
000006D0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000006E0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000006F0: 20 22 3B 00 24 62 90 01 98 33 2C 22 A4 A4 A4 A4 | ";.$b...3,"....|
00000700: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000710: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000720: A4 A4 A4 22 00 57 62 9A 01 98 33 2C 22 B5 20 20 |...".Wb...3,". |
00000730: 20 20 20 20 20 20 20 B4 20 20 20 20 20 20 20 20 | . |
00000740: 20 B4 20 20 20 20 20 20 20 20 20 B4 20 20 20 20 | . . |
00000750: 20 20 20 20 B5 22 3B 00 89 62 A4 01 98 33 2C 22 | .";..b...3,"|
00000760: B5 20 20 20 20 20 20 20 20 20 B4 20 20 20 20 20 |. . |
00000770: 20 20 20 20 B4 20 20 20 20 20 20 20 20 20 B4 20 | . . |
00000780: 20 20 20 20 20 20 20 B5 22 00 BC 62 AE 01 98 33 | ."..b...3|
00000790: 2C 22 B5 20 20 20 20 20 20 20 20 20 B4 20 20 20 |,". . |
000007A0: 20 20 20 20 20 20 B4 20 20 20 20 20 20 20 20 20 | . |
000007B0: B4 20 20 20 20 20 20 20 20 B5 22 3B 00 EE 62 B8 |. .";..b.|
000007C0: 01 98 33 2C 22 B5 20 20 20 20 20 20 20 20 20 B4 |..3,". .|
000007D0: 20 20 20 20 20 20 20 20 20 B4 20 20 20 20 20 20 | . |
000007E0: 20 20 20 B4 20 20 20 20 20 20 20 20 B5 22 00 21 | . .".!|
000007F0: 63 C2 01 98 33 2C 22 B5 20 20 20 20 B0 C3 C3 C3 |c...3,". ....|
00000800: C3 C3 C0 C3 B2 C3 C3 C3 C3 C3 C3 B2 C3 C3 C3 C3 |................|
00000810: C3 C3 B2 C3 C3 C3 C3 C3 C3 AE 20 20 20 20 B5 22 |.......... ."|
00000820: 3B 00 52 63 CC 01 98 33 2C 22 B5 20 20 20 20 B0 |;.Rc...3,". .|
00000830: C3 C3 C3 C3 C3 C0 C3 B2 C3 C3 C3 C3 C3 C3 B2 C3 |................|
00000840: C3 C3 C3 C3 C3 B2 C3 C3 C3 C3 C3 C3 AE 20 20 20 |............. |
00000850: 20 B5 00 85 63 D6 01 98 33 2C 22 B5 20 20 20 20 | ...c...3,". |
00000860: C2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000870: 20 20 20 20 20 20 20 20 20 20 20 20 20 C8 20 20 | . |
00000880: 20 20 B5 22 3B 00 B6 63 E0 01 98 33 2C 22 B5 20 | .";..c...3,". |
00000890: 20 20 20 C2 20 20 20 20 20 20 20 20 20 20 20 20 | . |
000008A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008B0: C8 20 20 20 20 B5 00 E9 63 EA 01 98 33 2C 22 B5 |. ...c...3,".|
000008C0: 20 20 20 20 C2 20 20 20 20 20 20 20 20 20 20 20 | . |
000008D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008E0: 20 C8 20 20 20 20 B5 22 3B 00 1A 64 F4 01 98 33 | . .";..d...3|
000008F0: 2C 22 B5 20 20 20 20 C2 20 20 20 20 20 20 20 20 |,". . |
00000900: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000910: 20 20 20 20 C8 20 20 20 20 B5 00 4D 64 FE 01 98 | . ..Md...|
00000920: 33 2C 22 B5 20 20 20 20 C2 20 20 20 20 20 20 20 |3,". . |
00000930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000940: 20 20 20 20 20 C8 20 20 20 20 B5 22 3B 00 7E 64 | . .";.~d|
00000950: 08 02 98 33 2C 22 B5 20 20 20 20 C2 20 20 20 20 |...3,". . |
00000960: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000970: 20 20 20 20 20 20 20 20 C8 20 20 20 20 B5 00 B1 | . ...|
00000980: 64 12 02 98 33 2C 22 B5 20 20 20 20 AD C0 C0 C0 |d...3,". ....|
00000990: C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 |................|
000009A0: C0 C0 B1 C0 C0 C0 C0 C0 C0 BD 20 20 20 20 B5 22 |.......... ."|
000009B0: 3B 00 E2 64 1C 02 98 33 2C 22 B5 20 20 20 20 AD |;..d...3,". .|
000009C0: C0 C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 B1 C0 |................|
000009D0: C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 BD 20 20 20 |............. |
000009E0: 20 B5 00 15 65 26 02 98 33 2C 22 B5 20 20 20 20 | ...e&..3,". |
000009F0: 20 20 20 20 20 B4 20 20 20 20 20 20 20 20 20 B4 | . .|
00000A00: 20 20 20 20 20 20 20 20 20 B4 20 20 20 20 20 20 | . |
00000A10: 20 20 B5 22 3B 00 47 65 30 02 98 33 2C 22 B5 20 | .";.Ge0..3,". |
00000A20: 20 20 20 20 20 20 20 20 B4 20 20 20 20 20 20 20 | . |
00000A30: 20 20 B4 20 20 20 20 20 20 20 20 20 B4 20 20 20 | . . |
00000A40: 20 20 20 20 20 B5 22 00 7A 65 3A 02 98 33 2C 22 | .".ze:..3,"|
00000A50: B5 20 20 20 20 20 20 20 20 20 B4 20 20 20 20 20 |. . |
00000A60: 20 20 20 20 B4 20 20 20 20 20 20 20 20 20 B4 20 | . . |
00000A70: 20 20 20 20 20 20 20 B5 22 3B 00 AC 65 44 02 98 | .";..eD..|
00000A80: 33 2C 22 B5 20 20 20 20 20 20 20 20 20 B4 20 20 |3,". . |
00000A90: 20 20 20 20 20 20 20 B4 20 20 20 20 20 20 20 20 | . |
00000AA0: 20 B4 20 20 20 20 20 20 20 20 B5 22 00 DF 65 4E | . ."..eN|
00000AB0: 02 98 33 2C 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |..3,"...........|
00000AC0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000AD0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 20 22 3B 00 |............ ";.|
00000AE0: 10 66 58 02 98 33 2C 22 A3 A3 A3 A3 A3 A3 A3 A3 |.fX..3,"........|
00000AF0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000B00: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 |..............."|
00000B10: 00 18 66 62 02 89 33 30 00 25 66 6C 02 52 B2 30 |..fb..30.%fl.R.0|
00000B20: 3A 9F 33 2C 34 00 66 66 76 02 99 22 93 22 3A 99 |:.3,4.ffv..".":.|
00000B30: A3 53 50 29 22 11 11 20 49 4E 50 55 54 20 46 4B |.SP)".. INPUT FK|
00000B40: 45 59 53 20 22 3B C7 28 31 35 29 3B 22 28 38 20 |EYS ";.(15);"(8 |
00000B50: 43 48 41 52 41 43 54 45 52 53 20 4F 52 20 4C 45 |CHARACTERS OR LE|
00000B60: 53 53 29 11 11 22 00 90 66 80 02 46 31 24 B2 22 |SS).."..f..F1$."|
00000B70: 22 3A 85 22 46 31 22 3B 46 31 24 3A 8B 52 A7 46 |":."F1";F1$:.R.F|
00000B80: 28 31 29 B2 C3 28 46 31 24 29 3A 89 31 31 34 30 |(1)..(F1$):.1140|
00000B90: 00 BA 66 8A 02 46 32 24 B2 22 22 3A 85 22 46 32 |..f..F2$."":."F2|
00000BA0: 22 3B 46 32 24 3A 8B 52 A7 46 28 32 29 B2 C3 28 |";F2$:.R.F(2)..(|
00000BB0: 46 32 24 29 3A 89 31 31 34 30 00 E4 66 94 02 46 |F2$):.1140..f..F|
00000BC0: 33 24 B2 22 22 3A 85 22 46 33 22 3B 46 33 24 3A |3$."":."F3";F3$:|
00000BD0: 8B 52 A7 46 28 33 29 B2 C3 28 46 33 24 29 3A 89 |.R.F(3)..(F3$):.|
00000BE0: 31 31 34 30 00 0E 67 9E 02 46 34 24 B2 22 22 3A |1140..g..F4$."":|
00000BF0: 85 22 46 34 22 3B 46 34 24 3A 8B 52 A7 46 28 34 |."F4";F4$:.R.F(4|
00000C00: 29 B2 C3 28 46 34 24 29 3A 89 31 31 34 30 00 38 |)..(F4$):.1140.8|
00000C10: 67 A8 02 46 35 24 B2 22 22 3A 85 22 46 35 22 3B |g..F5$."":."F5";|
00000C20: 46 35 24 3A 8B 52 A7 46 28 35 29 B2 C3 28 46 35 |F5$:.R.F(5)..(F5|
00000C30: 24 29 3A 89 31 31 34 30 00 62 67 B2 02 46 36 24 |$):.1140.bg..F6$|
00000C40: B2 22 22 3A 85 22 46 36 22 3B 46 36 24 3A 8B 52 |."":."F6";F6$:.R|
00000C50: A7 46 28 36 29 B2 C3 28 46 36 24 29 3A 89 31 31 |.F(6)..(F6$):.11|
00000C60: 34 30 00 8C 67 BC 02 46 37 24 B2 22 22 3A 85 22 |40..g..F7$."":."|
00000C70: 46 37 22 3B 46 37 24 3A 8B 52 A7 46 28 37 29 B2 |F7";F7$:.R.F(7).|
00000C80: C3 28 46 37 24 29 3A 89 31 31 34 30 00 B6 67 C6 |.(F7$):.1140..g.|
00000C90: 02 46 38 24 B2 22 22 3A 85 22 46 38 22 3B 46 38 |.F8$."":."F8";F8|
00000CA0: 24 3A 8B 52 A7 46 28 38 29 B2 C3 28 46 38 24 29 |$:.R.F(8)..(F8$)|
00000CB0: 3A 89 31 31 34 30 00 EA 67 D0 02 46 28 31 29 B2 |:.1140..g..F(1).|
00000CC0: C3 28 46 31 24 29 3A 46 28 32 29 B2 C3 28 46 32 |.(F1$):F(2)..(F2|
00000CD0: 24 29 3A 46 28 33 29 B2 C3 28 46 33 24 29 3A 46 |$):F(3)..(F3$):F|
00000CE0: 28 34 29 B2 C3 28 46 34 24 29 00 1E 68 DA 02 46 |(4)..(F4$)..h..F|
00000CF0: 28 35 29 B2 C3 28 46 35 24 29 3A 46 28 36 29 B2 |(5)..(F5$):F(6).|
00000D00: C3 28 46 36 24 29 3A 46 28 37 29 B2 C3 28 46 37 |.(F6$):F(7)..(F7|
00000D10: 24 29 3A 46 28 38 29 B2 C3 28 46 38 24 29 00 29 |$):F(8)..(F8$).)|
00000D20: 68 E4 02 81 5A B2 31 A4 38 00 74 68 EE 02 8B 46 |h...Z.1.8.th...F|
00000D30: 28 5A 29 B1 39 A7 99 22 11 46 22 3B 5A 22 20 49 |(Z).9..".F";Z" I|
00000D40: 53 20 54 4F 20 4C 4F 4E 47 22 C7 28 31 35 29 22 |S TO LONG".(15)"|
00000D50: 28 38 20 43 48 41 52 41 43 54 45 52 53 20 4F 52 |(8 CHARACTERS OR|
00000D60: 20 4C 45 53 53 29 22 3A 46 28 5A 29 B2 30 3A 89 | LESS)":F(Z).0:.|
00000D70: 31 31 33 30 00 7E 68 F8 02 8D 31 30 32 30 00 84 |1130.~h...1020..|
00000D80: 68 02 03 82 00 91 68 0C 03 98 33 2C C7 28 31 35 |h.....h...3,.(15|
00000D90: 29 00 C4 68 16 03 98 33 2C 22 A4 A4 A4 A4 A4 A4 |)..h...3,"......|
00000DA0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000DB0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000DC0: A4 20 22 3B 00 F5 68 20 03 98 33 2C 22 A4 A4 A4 |. ";..h ..3,"...|
00000DD0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000DE0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000DF0: A4 A4 A4 A4 22 00 1D 69 2A 03 98 33 2C 22 B5 22 |...."..i*..3,"."|
00000E00: 3B 46 31 24 3B 22 B4 22 3B 46 33 24 3B 22 B4 22 |;F1$;".";F3$;"."|
00000E10: 3B 46 35 24 3B 22 B4 22 3B 46 37 24 3B 00 44 69 |;F5$;".";F7$;.Di|
00000E20: 34 03 98 33 2C 22 B5 22 3B 46 31 24 3B 22 B4 22 |4..3,".";F1$;"."|
00000E30: 3B 46 33 24 3B 22 B4 22 3B 46 35 24 3B 22 B4 22 |;F3$;".";F5$;"."|
00000E40: 3B 46 37 24 00 77 69 3E 03 98 33 2C 22 B5 20 20 |;F7$.wi>..3,". |
00000E50: 46 31 20 20 20 20 20 B4 20 20 20 46 33 20 20 20 |F1 . F3 |
00000E60: 20 B4 20 20 46 35 20 20 20 20 20 B4 20 20 46 37 | . F5 . F7|
00000E70: 20 20 20 20 B5 22 3B 00 A9 69 48 03 98 33 2C 22 | .";..iH..3,"|
00000E80: B5 20 20 46 31 20 20 20 20 20 B4 20 20 20 46 33 |. F1 . F3|
00000E90: 20 20 20 20 B4 20 20 46 35 20 20 20 20 20 B4 20 | . F5 . |
00000EA0: 20 46 37 20 20 20 20 B5 22 00 DC 69 52 03 98 33 | F7 ."..iR..3|
00000EB0: 2C 22 B5 20 20 20 20 B0 C3 C3 C3 C3 C3 C0 C3 B2 |,". .........|
00000EC0: C3 C3 C3 C3 C3 C3 B2 C3 C3 C3 C3 C3 C3 B2 C3 C3 |................|
00000ED0: C3 C3 C3 C3 AE 20 20 20 20 B5 22 3B 00 0D 6A 5C |..... .";..j\|
00000EE0: 03 98 33 2C 22 B5 20 20 20 20 B0 C3 C3 C3 C3 C3 |..3,". ......|
00000EF0: C0 C3 B2 C3 C3 C3 C3 C3 C3 B2 C3 C3 C3 C3 C3 C3 |................|
00000F00: B2 C3 C3 C3 C3 C3 C3 AE 20 20 20 20 B5 00 40 6A |........ ..@j|
00000F10: 66 03 98 33 2C 22 B5 20 20 20 20 C2 20 20 20 20 |f..3,". . |
00000F20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F30: 20 20 20 20 20 20 20 20 C8 20 20 20 20 B5 22 3B | . .";|
00000F40: 00 71 6A 70 03 98 33 2C 22 B5 20 20 20 20 C2 20 |.qjp..3,". . |
00000F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F60: 20 20 20 20 20 20 20 20 20 20 20 C8 20 20 20 20 | . |
00000F70: B5 00 A4 6A 7A 03 98 33 2C 22 B5 20 20 20 20 C2 |...jz..3,". .|
00000F80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F90: 20 20 20 20 20 20 20 20 20 20 20 20 C8 20 20 20 | . |
00000FA0: 20 B5 22 3B 00 D5 6A 84 03 98 33 2C 22 B5 20 20 | .";..j...3,". |
00000FB0: 20 20 C2 20 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00000FC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C8 | .|
00000FD0: 20 20 20 20 B5 00 08 6B 8E 03 98 33 2C 22 B5 20 | ...k...3,". |
00000FE0: 20 20 20 C2 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00000FF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001000: C8 20 20 20 20 B5 22 3B 00 39 6B 98 03 98 33 2C |. .";.9k...3,|
00001010: 22 B5 20 20 20 20 C2 20 20 20 20 20 20 20 20 20 |". . |
00001020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001030: 20 20 20 C8 20 20 20 20 B5 00 6C 6B A2 03 98 33 | . ..lk...3|
00001040: 2C 22 B5 20 20 20 20 AD C0 C0 C0 C0 C0 C0 C0 B1 |,". .........|
00001050: C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 B1 C0 C0 |................|
00001060: C0 C0 C0 C0 BD 20 20 20 20 B5 22 3B 00 9D 6B AC |..... .";..k.|
00001070: 03 98 33 2C 22 B5 20 20 20 20 AD C0 C0 C0 C0 C0 |..3,". ......|
00001080: C0 C0 B1 C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 |................|
00001090: B1 C0 C0 C0 C0 C0 C0 BD 20 20 20 20 B5 00 D0 6B |........ ...k|
000010A0: B6 03 98 33 2C 22 B5 20 20 46 32 20 20 20 20 20 |...3,". F2 |
000010B0: B4 20 20 20 46 34 20 20 20 20 B4 20 20 46 36 20 |. F4 . F6 |
000010C0: 20 20 20 20 B4 20 20 46 38 20 20 20 20 B5 22 3B | . F8 .";|
000010D0: 00 02 6C C0 03 98 33 2C 22 B5 20 20 46 32 20 20 |..l...3,". F2 |
000010E0: 20 20 20 B4 20 20 20 46 34 20 20 20 20 B4 20 20 | . F4 . |
000010F0: 46 36 20 20 20 20 20 B4 20 20 46 38 20 20 20 20 |F6 . F8 |
00001100: B5 22 00 2A 6C CA 03 98 33 2C 22 B5 22 3B 46 32 |.".*l...3,".";F2|
00001110: 24 3B 22 B4 22 3B 46 34 24 3B 22 B4 22 3B 46 36 |$;".";F4$;".";F6|
00001120: 24 3B 22 B4 22 3B 46 38 24 3B 00 51 6C D4 03 98 |$;".";F8$;.Ql...|
00001130: 33 2C 22 B5 22 3B 46 32 24 3B 22 B4 22 3B 46 34 |3,".";F2$;".";F4|
00001140: 24 3B 22 B4 22 3B 46 36 24 3B 22 B4 22 3B 46 38 |$;".";F6$;".";F8|
00001150: 24 00 84 6C DE 03 98 33 2C 22 A3 A3 A3 A3 A3 A3 |$..l...3,"......|
00001160: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00001170: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00001180: A3 20 22 3B 00 B5 6C E8 03 98 33 2C 22 A3 A3 A3 |. ";..l...3,"...|
00001190: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000011A0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000011B0: A3 A3 A3 A3 22 00 BD 6C F2 03 89 33 30 00 D5 6C |...."..l...30..l|
000011C0: FC 03 8B 46 28 5A 29 B3 39 A7 53 B2 39 AB 46 28 |...F(Z).9.S.9.F(|
000011D0: 5A 29 3A D5 8E 00 04 6D 06 04 91 5A 8D 31 30 35 |Z):....m...Z.105|
000011E0: 30 2C 31 30 36 30 2C 31 30 37 30 2C 31 30 38 30 |0,1060,1070,1080|
000011F0: 2C 31 30 39 30 2C 31 31 30 30 2C 31 31 31 30 2C |,1090,1100,1110,|
00001200: 31 31 32 30 00 0A 6D 10 04 8E 00 25 6D 1A 04 81 |1120..m....%m...|
00001210: 51 B2 31 A4 53 3A 46 31 24 B2 46 31 24 AA 22 20 |Q.1.S:F1$.F1$." |
00001220: 22 3A 82 3A 8E 00 40 6D 24 04 81 51 B2 31 A4 53 |":.:..@m$..Q.1.S|
00001230: 3A 46 32 24 B2 46 32 24 AA 22 20 22 3A 82 3A 8E |:F2$.F2$." ":.:.|
00001240: 00 5B 6D 2E 04 81 51 B2 31 A4 53 3A 46 33 24 B2 |.[m...Q.1.S:F3$.|
00001250: 46 33 24 AA 22 20 22 3A 82 3A 8E 00 76 6D 38 04 |F3$." ":.:..vm8.|
00001260: 81 51 B2 31 A4 53 3A 46 34 24 B2 46 34 24 AA 22 |.Q.1.S:F4$.F4$."|
00001270: 20 22 3A 82 3A 8E 00 91 6D 42 04 81 51 B2 31 A4 | ":.:...mB..Q.1.|
00001280: 53 3A 46 35 24 B2 46 35 24 AA 22 20 22 3A 82 3A |S:F5$.F5$." ":.:|
00001290: 8E 00 AC 6D 4C 04 81 51 B2 31 A4 53 3A 46 36 24 |...mL..Q.1.S:F6$|
000012A0: B2 46 36 24 AA 22 20 22 3A 82 3A 8E 00 C7 6D 56 |.F6$." ":.:...mV|
000012B0: 04 81 51 B2 31 A4 53 3A 46 37 24 B2 46 37 24 AA |..Q.1.S:F7$.F7$.|
000012C0: 22 20 22 3A 82 3A 8E 00 E2 6D 60 04 81 51 B2 31 |" ":.:...m`..Q.1|
000012D0: A4 53 3A 46 38 24 B2 46 38 24 AA 22 20 22 3A 82 |.S:F8$.F8$." ":.|
000012E0: 3A 8E 00 0D 6E 6A 04 52 B2 31 3A 91 5A 89 36 34 |:...nj.R.1:.Z.64|
000012F0: 30 2C 36 35 30 2C 36 36 30 2C 36 37 30 2C 36 38 |0,650,660,670,68|
00001300: 30 2C 36 39 30 2C 37 30 30 2C 37 31 30 00 1A 6E |0,690,700,710..n|
00001310: 74 04 52 B2 30 3A 89 37 35 30 00 27 6E 7E 04 52 |t.R.0:.750.'n~.R|
00001320: B2 30 3A 89 37 35 30 00 4F 6E D0 07 99 22 93 11 |.0:.750.On..."..|
00001330: 11 11 11 11 11 11 49 4E 50 55 54 20 4B 45 59 20 |......INPUT KEY |
00001340: 44 45 46 49 4E 49 54 49 4F 4E 53 11 11 11 22 00 |DEFINITIONS...".|
00001350: 62 6E DA 07 85 22 4B 45 59 31 22 3B 41 41 24 28 |bn..."KEY1";AA$(|
00001360: 31 29 00 75 6E E4 07 85 22 4B 45 59 32 22 3B 41 |1).un..."KEY2";A|
00001370: 41 24 28 32 29 00 88 6E EE 07 85 22 4B 45 59 33 |A$(2)..n..."KEY3|
00001380: 22 3B 41 41 24 28 33 29 00 9B 6E F8 07 85 22 4B |";AA$(3)..n..."K|
00001390: 45 59 34 22 3B 41 41 24 28 34 29 00 AE 6E 02 08 |EY4";AA$(4)..n..|
000013A0: 85 22 4B 45 59 35 22 3B 41 41 24 28 35 29 00 C1 |."KEY5";AA$(5)..|
000013B0: 6E 0C 08 85 22 4B 45 59 36 22 3B 41 41 24 28 36 |n..."KEY6";AA$(6|
000013C0: 29 00 D4 6E 16 08 85 22 4B 45 59 37 22 3B 41 41 |)..n..."KEY7";AA|
000013D0: 24 28 37 29 00 E7 6E 20 08 85 22 4B 45 59 38 22 |$(7)..n .."KEY8"|
000013E0: 3B 41 41 24 28 38 29 00 33 6F 2A 08 99 22 11 57 |;AA$(8).3o*..".W|
000013F0: 4F 55 4C 44 20 59 4F 55 20 4C 49 4B 45 20 54 4F |OULD YOU LIKE TO|
00001400: 20 41 44 44 20 41 20 43 41 52 52 49 41 47 45 20 | ADD A CARRIAGE |
00001410: 52 45 54 55 52 4E 20 54 4F 20 41 4E 59 20 4B 45 |RETURN TO ANY KE|
00001420: 59 20 44 45 46 49 4E 49 54 49 4F 4E 53 3F 20 59 |Y DEFINITIONS? Y|
00001430: 2F 4E 22 00 4C 6F 34 08 A1 F9 41 4A 24 3A 8B 41 |/N".Lo4...AJ$:.A|
00001440: 4A 24 B3 B1 22 59 22 A7 32 31 36 30 00 57 6F 3E |J$.."Y".2160.Wo>|
00001450: 08 81 58 B2 31 A4 38 00 9F 6F 48 08 99 22 93 11 |..X.1.8..oH.."..|
00001460: 11 11 11 11 11 11 57 4F 55 4C 44 20 59 4F 55 20 |......WOULD YOU |
00001470: 4C 49 4B 45 20 54 4F 20 41 44 44 20 41 20 43 41 |LIKE TO ADD A CA|
00001480: 52 52 49 41 47 45 20 52 45 54 55 52 4E 20 54 4F |RRIAGE RETURN TO|
00001490: 20 54 48 49 53 20 4B 45 59 3F 20 59 2F 4E 22 00 | THIS KEY? Y/N".|
000014A0: BC 6F 52 08 99 22 11 11 11 11 4B 45 59 20 22 58 |.oR.."....KEY "X|
000014B0: 3B 22 20 3D 20 22 41 41 24 28 58 29 00 E4 6F 5C |;" = "AA$(X)..o\|
000014C0: 08 A1 F9 41 42 24 3A 8B 41 42 24 B2 22 59 22 A7 |...AB$:.AB$."Y".|
000014D0: 20 41 41 24 28 58 29 B2 41 41 24 28 58 29 AA C7 | AA$(X).AA$(X)..|
000014E0: 28 31 33 29 00 EC 6F 66 08 82 20 58 00 05 70 70 |(13)..of.. X..pp|
000014F0: 08 81 58 B2 31 20 A4 20 38 3A F9 58 2C 41 41 24 |..X.1 . 8:.X,AA$|
00001500: 28 58 29 3A 82 00 12 70 7A 08 99 22 93 11 11 11 |(X):...pz.."....|
00001510: 11 22 00 18 70 84 08 F9 00 21 70 8E 08 FE 0B 31 |."..p....!p....1|
00001520: 30 00 29 70 98 08 89 34 30 00 56 70 B8 0B 99 22 |0.)p...40.Vp..."|
00001530: 93 11 11 54 48 49 53 20 57 49 4C 20 42 53 41 56 |...THIS WIL BSAV|
00001540: 45 20 59 4F 55 20 4B 45 59 20 44 45 46 49 4E 49 |E YOU KEY DEFINI|
00001550: 54 49 4F 4E 53 22 00 87 70 C2 0B 99 22 11 59 4F |TIONS"..p...".YO|
00001560: 55 52 20 46 49 4C 45 4E 41 4D 45 20 49 53 20 4C |UR FILENAME IS L|
00001570: 49 4D 49 54 45 44 20 54 4F 20 31 34 20 43 48 52 |IMITED TO 14 CHR|
00001580: 53 11 11 11 11 11 22 00 9F 70 CC 0B 85 22 1D 1D |S....."..p..."..|
00001590: 1D 1D 46 49 4C 45 4E 41 4D 45 22 3B 41 46 24 00 |..FILENAME";AF$.|
000015A0: BF 70 D6 0B 8B 20 C3 28 41 46 24 29 B1 31 34 20 |.p... .(AF$).14 |
000015B0: A7 20 41 46 24 B2 C8 28 41 46 24 2C 31 34 29 00 |. AF$..(AF$,14).|
000015C0: CA 70 E0 0B 99 22 93 11 11 22 00 FC 70 EA 0B 99 |.p..."..."..p...|
000015D0: 22 42 53 41 56 45 22 3B C7 28 33 34 29 3B 41 46 |"BSAVE";.(34);AF|
000015E0: 24 3B C7 28 33 34 29 3B 22 2C 42 30 2C 50 34 30 |$;.(34);",B0,P40|
000015F0: 39 36 20 54 4F 20 50 34 33 35 32 22 00 10 71 F4 |96 TO P4352"..q.|
00001600: 0B 99 22 11 11 22 3A 99 22 47 4F 54 4F 34 30 22 |.."..":."GOTO40"|
00001610: 00 19 71 FE 0B 99 22 13 22 00 34 71 08 0C 97 32 |..q...".".4q...2|
00001620: 30 38 2C 32 3A 97 38 34 32 2C 31 33 3A 97 38 34 |08,2:.842,13:.84|
00001630: 33 2C 31 33 00 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A |3,13............|
00001640: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
00001650: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
00001660: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
00001670: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
00001680: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
00001690: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
000016A0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
000016B0: 1A 1A A3 |... |
.[H[... PROGRAM BY PATRICK DICKEY OF INT
ELECHIPS COMPANY. DONATED TO THE.\[... P
UBLIC DOMAIN.~[... REVISED BY DWIGHT DEA
N 2/86..[...:S.0:.B(54533).55..5:SP.20:U
.0:SP.0..[(.A$."": 3: .".":..SP)G(15);"
128-FKEY OVERLAY":..SP)"
.DO YOU WANT."\2...SP)". 1----BLA
NK OVERLAY.I\<...SP)". 2----DEFINE
D OVERLAY.N\F...SP)". 3----INPUT O
VERLAY..\H...SP)". 4----DEFINE FUN
CTION KEYS.N\J...SP)". 5----SAVE F
UNCTION KEY DEFINITION..\P...A$.."":..A$
:...\Z..A$."2".120..]D..A$."1"..370..]N.
.A$."3"..620.&]P..A$."4"..2000.<]R..A$."
5"..3000:U40.E]X..3,4.R]...3,G(15)..]...
3,".....................................
.. ";..]...3,"..........................
............."..] ..3,".GRAPHIC .DIRECT
ORY. DSAVE'' . LIST .";..^...3,".GRAPH
IC .DIRECTORY. DSAVE'' . LIST .".N^..
.3,". F1 . F3 . F5 . F7
.";..^...3,". F1 . F3 . F5
. F7 ."..^H..3,". .CCCCC.C.C
CCCCC.CCCCCC.CCCCCC. .";..^R..3,".
.CCCCC.C.CCCCCC.CCCCCC.CCCCCC. ..._.
..3,". B H
.";.H_...3,". B
H ..{_...3,". B
H .";.._...3,".
B H ..._.
..3,". B H
.";..`...3,". B
H ..C`...3,". ..........
.................... .";.T`"..3,".
.............................. ...`,
..3,". F2 . F4 . F6 . F8
.";.Y`6..3,". F2 . F4 . F
6 . F8 ."..A@..3,".DLOAD'' . SC
NCLR . RUN . MONITOR.";.>AJ..3,".DL
OAD'' . SCNCLR . RUN . MONITOR.".Q
AT..3,".................................
...... ";..A^..3,"......................
................."..AH..30..AR..3,4..A|.
.3,G(15)..A...3,".......................
................ ";.$B...3,"............
...........................".WB...3,".
. . . .";.
.B...3,". . . .
."..B...3,". . .
. .";..B...3,". .
. . .".!CB..3,".
.CCCCC.C.CCCCCC.CCCCCC.CCCCCC. ."
;.RCL..3,". .CCCCC.C.CCCCCC.CCCCCC.CC
CCCC. ...CV..3,". B
H .";..C...3,". B
H ...C...3,".
B H ."
;..D...3,". B
H ..MD...3,". B
H .";.~D...3,". B
H ...D...3,".
.............................. ."
;..D...3,". .........................
..... ...E&..3,". . .
. .";.GE0..3,".
. . . .".ZE:..3,"
. . . . .
";..ED..3,". . .
. ."..EN..3,"...................
.................... ";..FX..3,"........
..............................."..FB..30
.%FL.R.0:.3,4.FFV..".":..SP)".. INPUT FK
EYS ";G(15);"(8 CHARACTERS OR LESS).."..
F..F1$."":."F1";F1$:.R.F(1).C(F1$):.1140
..F..F2$."":."F2";F2$:.R.F(2).C(F2$):.11
40..F..F3$."":."F3";F3$:.R.F(3).C(F3$):.
1140..G..F4$."":."F4";F4$:.R.F(4).C(F4$)
:.1140.8G..F5$."":."F5";F5$:.R.F(5).C(F5
$):.1140.BG..F6$."":."F6";F6$:.R.F(6).C(
F6$):.1140..G..F7$."":."F7";F7$:.R.F(7).
C(F7$):.1140..GF.F8$."":."F8";F8$:.R.F(8
).C(F8$):.1140..GP.F(1).C(F1$):F(2).C(F2
$):F(3).C(F3$):F(4).C(F4$)..HZ.F(5).C(F5
$):F(6).C(F6$):F(7).C(F7$):F(8).C(F8$).)
H...Z.1.8.TH...F(Z).9..".F";Z" IS TO LON
G"G(15)"(8 CHARACTERS OR LESS)":F(Z).0:.
1130.~H...1020..H.....H...3,G(15).DH...3
,"......................................
. ";..H ..3,"...........................
............"..I*..3,".";F1$;".";F3$;"."
;F5$;".";F7$;.DI4..3,".";F1$;".";F3$;"."
;F5$;".";F7$.WI>..3,". F1 . F3
. F5 . F7 .";..IH..3,". F1
. F3 . F5 . F7 ."..IR..3
,". .CCCCC.C.CCCCCC.CCCCCC.CCCCCC.
.";..J\..3,". .CCCCC.C.CCCCCC.CCCCCC
.CCCCCC. ..@JF..3,". B
H .";.QJP..3,". B
H ...JZ..3
,". B H
.";.UJ...3,". B
H ...K...3,". B
H .";.9K...3,". B
H ..LK...3
,". ..............................
.";..K...3,". ......................
........ ..PK...3,". F2 . F4
. F6 . F8 .";..L...3,". F2
. F4 . F6 . F8 .".*LJ..
3,".";F2$;".";F4$;".";F6$;".";F8$;.QLT..
3,".";F2$;".";F4$;".";F6$;".";F8$..L...3
,"......................................
. ";..L...3,"...........................
............"..L...30.UL...F(Z).9.S.9.F(
Z):U...M...Z.1050,1060,1070,1080,1090,11
00,1110,1120..M....%M...Q.1.S:F1$.F1$."
":.:..@M$..Q.1.S:F2$.F2$." ":.:..[M...Q.
1.S:F3$.F3$." ":.:..VM8..Q.1.S:F4$.F4$."
":.:...MB..Q.1.S:F5$.F5$." ":.:...ML..Q
.1.S:F6$.F6$." ":.:..GMV..Q.1.S:F7$.F7$.
" ":.:...M`..Q.1.S:F8$.F8$." ":.:...NJ.R
.1:.Z.640,650,660,670,680,690,700,710..N
T.R.0:.750.'N~.R.0:.750.ONP.."........IN
PUT KEY DEFINITIONS...".BNZ.."KEY1";AA$(
1).UN..."KEY2";AA$(2)..N..."KEY3";AA$(3)
..N..."KEY4";AA$(4)..N..."KEY5";AA$(5).A
N..."KEY6";AA$(6).TN..."KEY7";AA$(7)..N
.."KEY8";AA$(8).3O*..".WOULD YOU LIKE TO
ADD A CARRIAGE RETURN TO ANY KEY DEFINI
TIONS? Y/N".LO4...AJ$:.AJ$.."Y".2160.WO>
..X.1.8..OH.."........WOULD YOU LIKE TO
ADD A CARRIAGE RETURN TO THIS KEY? Y/N".
.OR.."....KEY "X;" = "AA$(X)..O\...AB$:.
AB$."Y". AA$(X).AA$(X).G(13)..OF.. X..PP
..X.1 . 8:.X,AA$(X):...PZ.."....."..P...
.!P....10.)P...40.VP..."...THIS WIL BSAV
E YOU KEY DEFINITIONS"..PB..".YOUR FILEN
AME IS LIMITED TO 14 CHRS....."..PL.."..
..FILENAME";AF$..PV.. C(AF$).14 . AF$.H(
AF$,14).JP..."..."..P..."BSAVE";G(34);AF
$;G(34);",B0,P4096 TO P4352"..Q..."..":.
"GOTO40"..Q...".".4Q...208,2:.842,13:.84
3,13....................................
........................................
........................................
...........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL