FPROGRAM
FILE INFORMATION
FILENAME(S): FPROGRAM
FILE TYPE(S): PRG
FILE SIZE: 5.7K
FIRST SEEN: 2025-11-02 16:40:01
APPEARS ON: 1 disk(s)
FILE HASH
2f13b261af07a58f717d446933cb826e6d5446ed21c1219989f176eb645a4844
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 18 | FPROGRAM | PRG | Treasure Chest - Plattfuss | 17 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 48 1C 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 1C 14 00 8F 20 50 |D TO THE.\.... P|
00000050: 55 42 4C 49 43 20 44 4F 4D 41 49 4E 00 7E 1C 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: 1C 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 1C 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 1D | .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 1D 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 1D 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: 1D 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 1D 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: 1D 50 00 EB FC 41 24 B3 B1 22 22 3A A1 F9 41 24 |.P...A$.."":..A$|
000001E0: 3A EC 00 F2 1D 5A 00 8B 41 24 B2 22 32 22 A7 31 |:....Z..A$."2".1|
000001F0: 32 30 00 03 1E 64 00 8B 41 24 B2 22 31 22 A7 89 |20...d..A$."1"..|
00000200: 33 37 30 00 14 1E 6E 00 8B 41 24 B2 22 33 22 A7 |370...n..A$."3".|
00000210: 89 36 32 30 00 26 1E 70 00 8B 41 24 B2 22 34 22 |.620.&.p..A$."4"|
00000220: A7 89 32 30 30 30 00 3C 1E 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 1E 78 |5"..3000:.40.E.x|
00000240: 00 9F 33 2C 34 00 52 1E 82 00 98 33 2C C7 28 31 |..3,4.R....3,.(1|
00000250: 35 29 00 85 1E 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 1E 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 1E 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 1F 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 1F 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: 1F 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 1F 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 1F 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 20 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 20 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 20 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 20 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 20 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 21 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 21 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 21 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 21 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 21 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 22 40 01 98 33 | F8 .".."@..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 22 4A |. MONITOR.";.>"J|
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: 22 54 01 98 33 2C 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 |"T..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 22 5E 01 98 33 2C 22 A3 A3 A3 A3 A3 A3 |;.."^..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 22 68 01 89 33 30 00 B3 22 72 01 9F |.".."h..30.."r..|
000006B0: 33 2C 34 00 C0 22 7C 01 98 33 2C C7 28 31 35 29 |3,4.."|..3,.(15)|
000006C0: 00 F3 22 86 01 98 33 2C 22 A4 A4 A4 A4 A4 A4 A4 |.."...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 23 90 01 98 33 2C 22 A4 A4 A4 A4 | ";.$#...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 23 9A 01 98 33 2C 22 B5 20 20 |...".W#...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 23 A4 01 98 33 2C 22 | .";..#...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 23 AE 01 98 33 | ."..#...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 23 B8 |. .";..#.|
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: 24 C2 01 98 33 2C 22 B5 20 20 20 20 B0 C3 C3 C3 |$...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 24 CC 01 98 33 2C 22 B5 20 20 20 20 B0 |;.R$...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 24 D6 01 98 33 2C 22 B5 20 20 20 20 | ...$...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 24 E0 01 98 33 2C 22 B5 20 | .";..$...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 24 EA 01 98 33 2C 22 B5 |. ...$...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 25 F4 01 98 33 | . .";..%...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 25 FE 01 98 | . ..M%...|
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 25 | . .";.~%|
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: 25 12 02 98 33 2C 22 B5 20 20 20 20 AD C0 C0 C0 |%...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 25 1C 02 98 33 2C 22 B5 20 20 20 20 AD |;..%...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 26 26 02 98 33 2C 22 B5 20 20 20 20 | ...&&..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 26 30 02 98 33 2C 22 B5 20 | .";.G&0..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 26 3A 02 98 33 2C 22 | .".z&:..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 26 44 02 98 | .";..&D..|
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 26 4E | . ."..&N|
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 27 58 02 98 33 2C 22 A3 A3 A3 A3 A3 A3 A3 A3 |.'X..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 27 62 02 89 33 30 00 25 27 6C 02 52 B2 30 |..'b..30.%'l.R.0|
00000B20: 3A 9F 33 2C 34 00 66 27 76 02 99 22 93 22 3A 99 |:.3,4.f'v..".":.|
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 27 80 02 46 31 24 B2 22 |SS).."..'..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 27 8A 02 46 32 24 B2 22 22 3A 85 22 46 32 |..'..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 27 94 02 46 |F2$):.1140..'..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 28 9E 02 46 34 24 B2 22 22 3A |1140..(..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: 28 A8 02 46 35 24 B2 22 22 3A 85 22 46 35 22 3B |(..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 28 B2 02 46 36 24 |$):.1140.b(..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 28 BC 02 46 37 24 B2 22 22 3A 85 22 |40..(..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 28 C6 |.(F7$):.1140..(.|
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 28 D0 02 46 28 31 29 B2 |:.1140..(..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 29 DA 02 46 |(4)..(F4$)..)..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: 29 E4 02 81 5A B2 31 A4 38 00 74 29 EE 02 8B 46 |)...Z.1.8.t)...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 29 F8 02 8D 31 30 32 30 00 84 |1130.~)...1020..|
00000D80: 29 02 03 82 00 91 29 0C 03 98 33 2C C7 28 31 35 |).....)...3,.(15|
00000D90: 29 00 C4 29 16 03 98 33 2C 22 A4 A4 A4 A4 A4 A4 |)..)...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 29 20 03 98 33 2C 22 A4 A4 A4 |. ";..) ..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 2A 2A 03 98 33 2C 22 B5 22 |...."..**..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 2A |;F5$;".";F7$;.D*|
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 2A 3E 03 98 33 2C 22 B5 20 20 |;F7$.w*>..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 2A 48 03 98 33 2C 22 | .";..*H..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 2A 52 03 98 33 | F7 ."..*R..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 2B 5C |..... .";..+\|
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 2B |........ ..@+|
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 2B 70 03 98 33 2C 22 B5 20 20 20 20 C2 20 |.q+p..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 2B 7A 03 98 33 2C 22 B5 20 20 20 20 C2 |...+z..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 2B 84 03 98 33 2C 22 B5 20 20 | .";..+...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 2C 8E 03 98 33 2C 22 B5 20 | ...,...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 2C 98 03 98 33 2C |. .";.9,...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 2C A2 03 98 33 | . ..l,...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 2C AC |..... .";..,.|
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 2C |........ ...,|
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 2D C0 03 98 33 2C 22 B5 20 20 46 32 20 20 |..-...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 2D CA 03 98 33 2C 22 B5 22 3B 46 32 |.".*-...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 2D D4 03 98 |$;".";F8$;.Q-...|
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 2D DE 03 98 33 2C 22 A3 A3 A3 A3 A3 A3 |$..-...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 2D E8 03 98 33 2C 22 A3 A3 A3 |. ";..-...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 2D F2 03 89 33 30 00 D5 2D |...."..-...30..-|
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 2E 06 04 91 5A 8D 31 30 35 |Z):........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 2E 10 04 8E 00 25 2E 1A 04 81 |1120.......%....|
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 2E 24 04 81 51 B2 31 A4 53 |":.:..@.$..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 2E 2E 04 81 51 B2 31 A4 53 3A 46 33 24 B2 |.[....Q.1.S:F3$.|
00001250: 46 33 24 AA 22 20 22 3A 82 3A 8E 00 76 2E 38 04 |F3$." ":.:..v.8.|
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 2E 42 04 81 51 B2 31 A4 | ":.:....B..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 2E 4C 04 81 51 B2 31 A4 53 3A 46 36 24 |....L..Q.1.S:F6$|
000012A0: B2 46 36 24 AA 22 20 22 3A 82 3A 8E 00 C7 2E 56 |.F6$." ":.:....V|
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 2E 60 04 81 51 B2 31 |" ":.:....`..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 2F 6A 04 52 B2 31 3A 91 5A 89 36 34 |:.../j.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 2F |0,690,700,710../|
00001310: 74 04 52 B2 30 3A 89 37 35 30 00 27 2F 7E 04 52 |t.R.0:.750.'/~.R|
00001320: B2 30 3A 89 37 35 30 00 4F 2F D0 07 99 22 93 11 |.0:.750.O/..."..|
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 2F DA 07 85 22 4B 45 59 31 22 3B 41 41 24 28 |b/..."KEY1";AA$(|
00001360: 31 29 00 75 2F E4 07 85 22 4B 45 59 32 22 3B 41 |1).u/..."KEY2";A|
00001370: 41 24 28 32 29 00 88 2F EE 07 85 22 4B 45 59 33 |A$(2)../..."KEY3|
00001380: 22 3B 41 41 24 28 33 29 00 9B 2F F8 07 85 22 4B |";AA$(3)../..."K|
00001390: 45 59 34 22 3B 41 41 24 28 34 29 00 AE 2F 02 08 |EY4";AA$(4)../..|
000013A0: 85 22 4B 45 59 35 22 3B 41 41 24 28 35 29 00 C1 |."KEY5";AA$(5)..|
000013B0: 2F 0C 08 85 22 4B 45 59 36 22 3B 41 41 24 28 36 |/..."KEY6";AA$(6|
000013C0: 29 00 D4 2F 16 08 85 22 4B 45 59 37 22 3B 41 41 |)../..."KEY7";AA|
000013D0: 24 28 37 29 00 E7 2F 20 08 85 22 4B 45 59 38 22 |$(7)../ .."KEY8"|
000013E0: 3B 41 41 24 28 38 29 00 33 30 2A 08 99 22 11 57 |;AA$(8).30*..".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 30 34 08 A1 F9 41 4A 24 3A 8B 41 |/N".L04...AJ$:.A|
00001440: 4A 24 B3 B1 22 59 22 A7 32 31 36 30 00 57 30 3E |J$.."Y".2160.W0>|
00001450: 08 81 58 B2 31 A4 38 00 9F 30 48 08 99 22 93 11 |..X.1.8..0H.."..|
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 30 52 08 99 22 11 11 11 11 4B 45 59 20 22 58 |.0R.."....KEY "X|
000014B0: 3B 22 20 3D 20 22 41 41 24 28 58 29 00 E4 30 5C |;" = "AA$(X)..0\|
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 30 66 08 82 20 58 00 05 31 70 |(13)..0f.. X..1p|
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 31 7A 08 99 22 93 11 11 11 |(X):...1z.."....|
00001510: 11 22 00 18 31 84 08 F9 00 21 31 8E 08 FE 0B 31 |."..1....!1....1|
00001520: 30 00 29 31 98 08 89 34 30 00 56 31 B8 0B 99 22 |0.)1...40.V1..."|
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 31 C2 0B 99 22 11 59 4F |TIONS"..1...".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 31 CC 0B 85 22 1D 1D |S....."..1..."..|
00001590: 1D 1D 46 49 4C 45 4E 41 4D 45 22 3B 41 46 24 00 |..FILENAME";AF$.|
000015A0: BF 31 D6 0B 8B 20 C3 28 41 46 24 29 B1 31 34 20 |.1... .(AF$).14 |
000015B0: A7 20 41 46 24 B2 C8 28 41 46 24 2C 31 34 29 00 |. AF$..(AF$,14).|
000015C0: CA 31 E0 0B 99 22 93 11 11 22 00 FC 31 EA 0B 99 |.1..."..."..1...|
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 32 F4 |96 TO P4352"..2.|
00001600: 0B 99 22 11 11 22 3A 99 22 47 4F 54 4F 34 30 22 |.."..":."GOTO40"|
00001610: 00 19 32 FE 0B 99 22 13 22 00 34 32 08 0C 97 32 |..2...".".42...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 .".."@..3,".DLOAD'' . SC
NCLR . RUN . MONITOR.";.>"J..3,".DL
OAD'' . SCNCLR . RUN . MONITOR.".Q
"T..3,".................................
...... ";.."^..3,"......................
.................".."H..30.."R..3,4.."|.
.3,G(15).."...3,".......................
................ ";.$#...3,"............
...........................".W#...3,".
. . . .";.
.#...3,". . . .
."..#...3,". . .
. .";..#...3,". .
. . .".!$B..3,".
.CCCCC.C.CCCCCC.CCCCCC.CCCCCC. ."
;.R$L..3,". .CCCCC.C.CCCCCC.CCCCCC.CC
CCCC. ...$V..3,". B
H .";..$...3,". B
H ...$...3,".
B H ."
;..%...3,". B
H ..M%...3,". B
H .";.~%...3,". B
H ...%...3,".
.............................. ."
;..%...3,". .........................
..... ...&&..3,". . .
. .";.G&0..3,".
. . . .".Z&:..3,"
. . . . .
";..&D..3,". . .
. ."..&N..3,"...................
.................... ";..'X..3,"........
..............................."..'B..30
.%'L.R.0:.3,4.F'V..".":..SP)".. INPUT FK
EYS ";G(15);"(8 CHARACTERS OR LESS).."..
'..F1$."":."F1";F1$:.R.F(1).C(F1$):.1140
..'..F2$."":."F2";F2$:.R.F(2).C(F2$):.11
40..'..F3$."":."F3";F3$:.R.F(3).C(F3$):.
1140..(..F4$."":."F4";F4$:.R.F(4).C(F4$)
:.1140.8(..F5$."":."F5";F5$:.R.F(5).C(F5
$):.1140.B(..F6$."":."F6";F6$:.R.F(6).C(
F6$):.1140..(..F7$."":."F7";F7$:.R.F(7).
C(F7$):.1140..(F.F8$."":."F8";F8$:.R.F(8
).C(F8$):.1140..(P.F(1).C(F1$):F(2).C(F2
$):F(3).C(F3$):F(4).C(F4$)..)Z.F(5).C(F5
$):F(6).C(F6$):F(7).C(F7$):F(8).C(F8$).)
)...Z.1.8.T)...F(Z).9..".F";Z" IS TO LON
G"G(15)"(8 CHARACTERS OR LESS)":F(Z).0:.
1130.~)...1020..).....)...3,G(15).D)...3
,"......................................
. ";..) ..3,"...........................
............"..**..3,".";F1$;".";F3$;"."
;F5$;".";F7$;.D*4..3,".";F1$;".";F3$;"."
;F5$;".";F7$.W*>..3,". F1 . F3
. F5 . F7 .";..*H..3,". F1
. F3 . F5 . F7 ."..*R..3
,". .CCCCC.C.CCCCCC.CCCCCC.CCCCCC.
.";..+\..3,". .CCCCC.C.CCCCCC.CCCCCC
.CCCCCC. ..@+F..3,". B
H .";.Q+P..3,". B
H ...+Z..3
,". B H
.";.U+...3,". B
H ...,...3,". B
H .";.9,...3,". B
H ..L,...3
,". ..............................
.";..,...3,". ......................
........ ..P,...3,". F2 . F4
. F6 . F8 .";..-...3,". F2
. F4 . F6 . F8 .".*-J..
3,".";F2$;".";F4$;".";F6$;".";F8$;.Q-T..
3,".";F2$;".";F4$;".";F6$;".";F8$..-...3
,"......................................
. ";..-...3,"...........................
............"..-...30.U-...F(Z).9.S.9.F(
Z):U.......Z.1050,1060,1070,1080,1090,11
00,1110,1120.......%....Q.1.S:F1$.F1$."
":.:..@.$..Q.1.S:F2$.F2$." ":.:..[....Q.
1.S:F3$.F3$." ":.:..V.8..Q.1.S:F4$.F4$."
":.:....B..Q.1.S:F5$.F5$." ":.:....L..Q
.1.S:F6$.F6$." ":.:..G.V..Q.1.S:F7$.F7$.
" ":.:....`..Q.1.S:F8$.F8$." ":.:.../J.R
.1:.Z.640,650,660,670,680,690,700,710../
T.R.0:.750.'/~.R.0:.750.O/P.."........IN
PUT KEY DEFINITIONS...".B/Z.."KEY1";AA$(
1).U/..."KEY2";AA$(2)../..."KEY3";AA$(3)
../..."KEY4";AA$(4)../..."KEY5";AA$(5).A
/..."KEY6";AA$(6).T/..."KEY7";AA$(7)../
.."KEY8";AA$(8).30*..".WOULD YOU LIKE TO
ADD A CARRIAGE RETURN TO ANY KEY DEFINI
TIONS? Y/N".L04...AJ$:.AJ$.."Y".2160.W0>
..X.1.8..0H.."........WOULD YOU LIKE TO
ADD A CARRIAGE RETURN TO THIS KEY? Y/N".
.0R.."....KEY "X;" = "AA$(X)..0\...AB$:.
AB$."Y". AA$(X).AA$(X).G(13)..0F.. X..1P
..X.1 . 8:.X,AA$(X):...1Z.."....."..1...
.!1....10.)1...40.V1..."...THIS WIL BSAV
E YOU KEY DEFINITIONS"..1B..".YOUR FILEN
AME IS LIMITED TO 14 CHRS....."..1L.."..
..FILENAME";AF$..1V.. C(AF$).14 . AF$.H(
AF$,14).J1..."..."..1..."BSAVE";G(34);AF
$;G(34);",B0,P4096 TO P4352"..2..."..":.
"GOTO40"..2...".".42...208,2:.842,13:.84
3,13....................................
........................................
........................................
...........
> CLICK IMAGE PREVIEW FOR FULL MODAL