FONTEDITOR
FILE INFORMATION
FILENAME(S): FONTEDITOR
FILE TYPE(S): PRG
FILE SIZE: 6.2K
FIRST SEEN: 2025-11-30 21:12:55
APPEARS ON: 1 disk(s)
FILE HASH
85266e3de186b066b7c5379e03585db815f33aaaf6665d94afb70da1ef002998
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FONTMASTER 1 0 | FONTEDITOR | PRG | DuncanTwain | 17 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1B 08 0A 00 8F 20 3E 3E 3E 20 46 4F 4E 54 |....... >>> FONT|
00000010: 20 45 44 49 54 4F 52 20 3C 3C 3C 00 42 08 0B 00 | EDITOR <<<.B...|
00000020: 8F 20 43 4F 50 59 52 49 47 48 54 20 28 43 29 20 |. COPYRIGHT (C) |
00000030: 31 39 38 34 20 42 59 20 58 45 54 45 43 2C 20 49 |1984 BY XETEC, I|
00000040: 4E 43 00 64 08 0C 00 8F 20 57 52 49 54 54 45 4E |NC.d.... WRITTEN|
00000050: 20 42 59 20 4D 41 52 54 59 20 46 4C 49 43 4B 49 | BY MARTY FLICKI|
00000060: 4E 47 45 52 00 78 08 0D 00 91 20 4C 46 20 89 20 |NGER.x.... LF . |
00000070: 32 35 30 2C 32 30 30 31 00 B5 08 0E 00 41 B2 33 |250,2001.....A.3|
00000080: 32 37 36 38 3A 41 31 B2 C2 28 41 29 3A 97 41 2C |2768:A1..(A):.A,|
00000090: 32 35 35 AB 41 31 3A 8B C2 28 41 29 B2 41 31 A7 |255.A1:..(A).A1.|
000000A0: 99 22 52 45 4D 4F 56 45 20 43 41 52 54 52 49 44 |."REMOVE CARTRID|
000000B0: 47 45 22 3A 90 00 CA 08 0F 00 97 20 35 36 2C 31 |GE":....... 56,1|
000000C0: 32 37 3A 97 35 35 2C 32 35 35 00 DF 08 10 00 97 |27:.55,255......|
000000D0: 20 35 32 2C 31 32 37 3A 97 35 31 2C 32 35 35 00 | 52,127:.51,255.|
000000E0: FC 08 14 00 86 20 46 24 28 33 30 29 2C 53 24 28 |..... F$(30),S$(|
000000F0: 38 29 2C 4D 54 28 31 36 2C 31 36 29 00 3D 09 16 |8),MT(16,16).=..|
00000100: 00 50 5A 24 B2 22 13 11 11 11 11 11 1D 1D 1D 1D |.PZ$."..........|
00000110: 1D 1D 1D 1D 1D 1D 1D 1D 22 3A 50 43 24 B2 50 5A |........":PC$.PZ|
00000120: 24 AA 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." |
00000130: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 75 09 | ".u.|
00000140: 19 00 99 22 93 20 20 20 20 20 20 20 20 20 20 3E |...". >|
00000150: 3E 3E 20 46 4F 4E 54 20 45 44 49 54 4F 52 20 3C |>> FONT EDITOR <|
00000160: 3C 3C 13 11 11 11 50 4C 45 41 53 45 20 57 41 49 |<<....PLEASE WAI|
00000170: 54 2E 2E 2E 22 00 80 09 1E 00 8D 20 31 30 30 30 |T..."...... 1000|
00000180: 00 93 09 23 00 9E 20 36 34 37 38 39 3A 8F 20 49 |...#.. 64789:. I|
00000190: 4E 49 54 00 B9 09 28 00 99 22 93 20 20 20 20 20 |NIT...(..". |
000001A0: 20 20 20 20 20 3E 3E 3E 20 46 4F 4E 54 20 45 44 | >>> FONT ED|
000001B0: 49 54 4F 52 20 3C 3C 3C 22 00 C7 09 2D 00 97 35 |ITOR <<<"...-..5|
000001C0: 33 32 36 35 2C 32 37 00 E1 09 32 00 99 22 11 11 |3265,27...2.."..|
000001D0: 31 29 20 43 52 45 41 54 45 20 41 20 46 4F 4E 54 |1) CREATE A FONT|
000001E0: 22 00 F7 09 3C 00 99 22 32 29 20 45 44 49 54 20 |"...<.."2) EDIT |
000001F0: 41 20 46 4F 4E 54 22 00 0E 0A 46 00 99 22 33 29 |A FONT"...F.."3)|
00000200: 20 44 49 53 4B 20 53 57 41 50 50 45 44 22 00 25 | DISK SWAPPED".%|
00000210: 0A 4B 00 99 22 34 29 20 45 52 41 53 45 20 41 20 |.K.."4) ERASE A |
00000220: 46 4F 4E 54 22 00 45 0A 50 00 99 22 35 29 20 43 |FONT".E.P.."5) C|
00000230: 48 41 4E 47 45 20 53 45 4C 45 43 54 49 4F 4E 20 |HANGE SELECTION |
00000240: 46 49 4C 45 22 00 5E 0A 5A 00 99 22 36 29 20 45 |FILE".^.Z.."6) E|
00000250: 58 49 54 20 45 44 49 54 4F 52 11 11 11 22 00 8C |XIT EDITOR..."..|
00000260: 0A 64 00 85 22 91 57 48 49 43 48 20 57 4F 55 4C |.d..".WHICH WOUL|
00000270: 44 20 59 4F 55 20 4C 49 4B 45 20 54 4F 20 44 4F |D YOU LIKE TO DO|
00000280: 22 3B 5A 24 3A 56 B2 C5 28 5A 24 29 00 AF 0A 6E |";Z$:V..(Z$)...n|
00000290: 00 91 20 56 20 89 20 32 30 30 2C 33 30 30 2C 34 |.. V . 200,300,4|
000002A0: 30 30 2C 39 35 30 30 2C 35 30 30 2C 38 30 30 00 |00,9500,500,800.|
000002B0: B9 0A 78 00 89 20 31 30 30 00 EC 0A C8 00 85 20 |..x.. 100...... |
000002C0: 22 93 53 54 41 52 54 20 57 49 54 48 20 41 20 12 |".START WITH A .|
000002D0: 42 92 4C 41 4E 4B 20 4F 52 20 41 4E 4F 54 48 45 |B.LANK OR ANOTHE|
000002E0: 52 20 12 46 92 4F 4E 54 22 3B 41 24 00 FB 0A CD |R .F.ONT";A$....|
000002F0: 00 8B 41 24 B2 22 58 22 A7 34 30 00 0B 0B CF 00 |..A$."X".40.....|
00000300: 8B 41 24 B2 22 52 22 A7 32 35 30 00 38 0B D2 00 |.A$."R".250.8...|
00000310: 8B 41 24 B2 22 42 22 A7 8D 38 35 30 30 3A 81 49 |.A$."B"..8500:.I|
00000320: B2 33 32 37 36 38 A4 33 34 38 31 35 3A 97 49 2C |.32768.34815:.I,|
00000330: 30 3A 82 3A 89 32 35 30 00 50 0B DC 00 8B 41 24 |0:.:.250.P....A$|
00000340: B3 B1 22 46 22 A7 99 22 91 22 3B 3A 89 32 30 30 |.."F"..".";:.200|
00000350: 00 73 0B E6 00 85 22 11 4E 41 4D 45 20 4F 46 20 |.s....".NAME OF |
00000360: 46 4F 4E 54 22 3B 41 24 3A 8B 41 24 B2 22 58 22 |FONT";A$:.A$."X"|
00000370: A7 34 30 00 8E 0B F0 00 81 49 B2 31 A4 4D 41 58 |.40......I.1.MAX|
00000380: 3A 8B 46 24 28 49 29 B2 41 24 A7 32 34 37 00 B0 |:.F$(I).A$.247..|
00000390: 0B F2 00 82 49 3A 99 41 24 3B 22 20 49 53 20 4E |....I:.A$;" IS N|
000003A0: 4F 54 20 4F 4E 20 54 48 49 53 20 44 49 53 4B 22 |OT ON THIS DISK"|
000003B0: 00 CB 0B F4 00 99 22 11 11 41 56 41 49 4C 41 42 |......"..AVAILAB|
000003C0: 4C 45 20 46 4F 4E 54 53 3A 11 22 00 EE 0B F6 00 |LE FONTS:.".....|
000003D0: 81 49 B2 31 A4 4D 41 58 3A 99 46 24 28 49 29 2C |.I.1.MAX:.F$(I),|
000003E0: 3A 82 3A 99 22 13 11 22 3B 3A 89 32 33 30 00 F9 |:.:."..";:.230..|
000003F0: 0B F7 00 8D 20 38 35 30 30 00 16 0C F9 00 4C 46 |.... 8500.....LF|
00000400: B2 31 3A 46 24 B2 22 46 2E 22 AA 41 24 3A 93 20 |.1:F$."F.".A$:. |
00000410: 46 24 2C 38 2C 31 00 21 0C FA 00 89 20 32 30 30 |F$,8,1.!.... 200|
00000420: 30 00 2B 0C 2C 01 99 22 93 22 3B 00 4B 0C 31 01 |0.+.,..".";.K.1.|
00000430: 85 22 13 4E 41 4D 45 20 4F 46 20 46 4F 4E 54 20 |.".NAME OF FONT |
00000440: 54 4F 20 45 44 49 54 22 3B 45 24 00 5A 0C 36 01 |TO EDIT";E$.Z.6.|
00000450: 8B 45 24 B2 22 58 22 A7 34 30 00 94 0C 40 01 81 |.E$."X".40...@..|
00000460: 49 B2 31 A4 4D 41 58 3A 8B 45 24 B3 B1 46 24 28 |I.1.MAX:.E$..F$(|
00000470: 49 29 A7 82 3A 99 45 24 3B 22 20 49 53 20 4E 4F |I)..:.E$;" IS NO|
00000480: 54 20 4F 4E 20 54 48 49 53 20 44 49 53 4B 22 3A |T ON THIS DISK":|
00000490: 89 33 30 35 00 A4 0C 4A 01 41 24 B2 45 24 3A 89 |.305...J.A$.E$:.|
000004A0: 20 32 34 37 00 CC 0C 90 01 99 22 93 11 46 4F 4E | 247......"..FON|
000004B0: 54 53 20 43 55 52 52 45 4E 54 4C 59 20 4F 4E 20 |TS CURRENTLY ON |
000004C0: 54 48 49 53 20 44 49 53 4B 3A 11 22 00 D7 0C 9A |THIS DISK:."....|
000004D0: 01 8D 20 31 30 30 30 00 EF 0C A4 01 81 49 B2 31 |.. 1000......I.1|
000004E0: A4 4D 41 58 3A 99 46 24 28 49 29 2C 3A 82 49 00 |.MAX:.F$(I),:.I.|
000004F0: 00 0D AE 01 99 3A 8D 20 31 35 30 30 3A 89 34 30 |.....:. 1500:.40|
00000500: 00 1D 0D F4 01 9F 20 31 2C 38 2C 32 2C 22 53 45 |...... 1,8,2,"SE|
00000510: 4C 45 43 54 49 4F 4E 53 2C 53 2C 52 22 00 39 0D |LECTIONS,S,R".9.|
00000520: F9 01 81 49 B2 31 A4 38 3A 84 31 2C 41 24 3A 53 |...I.1.8:.1,A$:S|
00000530: 24 28 49 29 B2 41 24 3A 82 00 45 0D FA 01 A0 31 |$(I).A$:..E....1|
00000540: 3A 43 48 B2 30 00 67 0D 3A 02 99 22 93 11 22 3B |:CH.0.g.:.."..";|
00000550: A3 32 30 29 22 41 56 41 49 4C 41 42 4C 45 20 46 |.20)"AVAILABLE F|
00000560: 4F 4E 54 53 3A 11 22 00 87 0D 3B 02 81 49 B2 31 |ONTS:."...;..I.1|
00000570: A4 4D 41 58 AA 31 3A 99 A3 32 30 29 3B C4 28 49 |.MAX.1:..20);.(I|
00000580: 29 AA 22 29 20 22 3B 00 A4 0D 3E 02 8B 20 49 B2 |).") ";...>.. I.|
00000590: 4D 41 58 AA 31 A7 99 22 2D 4E 4F 4E 45 2D 22 3A |MAX.1.."-NONE-":|
000005A0: 89 35 37 38 00 AF 0D 40 02 99 46 24 28 49 29 00 |.578...@..F$(I).|
000005B0: B6 0D 42 02 82 49 00 D5 0D 44 02 99 22 13 11 46 |..B..I...D.."..F|
000005C0: 4F 4E 54 20 53 45 4C 45 43 54 49 4F 4E 53 3A 11 |ONT SELECTIONS:.|
000005D0: 22 3A 4A B2 31 00 E0 0D 46 02 81 49 B2 31 A4 38 |":J.1...F..I.1.8|
000005E0: 00 F1 0D 48 02 99 22 23 22 3B 49 3B 22 3A 20 22 |...H.."#";I;": "|
000005F0: 3B 00 09 0E 4A 02 8B 53 24 28 4A 29 B2 22 2A 2A |;...J..S$(J)."**|
00000600: 2A 22 A7 99 3A 89 35 38 38 00 14 0E 4B 02 99 53 |*"..:.588...K..S|
00000610: 24 28 4A 29 00 2A 0E 4C 02 4A B2 4A AA 31 3A 82 |$(J).*.L.J.J.1:.|
00000620: 49 3A 99 22 11 11 11 11 22 3B 00 64 0E 4E 02 99 |I:."....";.d.N..|
00000630: 22 91 91 53 45 4C 45 43 54 49 4F 4E 20 23 22 3A |"..SELECTION #":|
00000640: 85 22 28 58 2C 31 2C 32 2C 33 2C 45 54 43 29 22 |."(X,1,2,3,ETC)"|
00000650: 3B 41 24 3A 8B C8 28 41 24 2C 31 29 B2 22 58 22 |;A$:..(A$,1)."X"|
00000660: A7 36 36 35 00 7E 0E 58 02 41 B2 C5 28 C8 28 41 |.665.~.X.A..(.(A|
00000670: 24 2C 33 29 29 3A 8B 41 B3 31 A7 35 39 30 00 8C |$,3)):.A.1.590..|
00000680: 0E 6C 02 8B 41 B1 38 20 A7 35 39 30 00 94 0E 76 |.l..A.8 .590...v|
00000690: 02 49 B2 41 00 9F 0E 80 02 99 22 11 11 22 3B 00 |.I.A......"..";.|
000006A0: C4 0E 8A 02 99 22 91 46 4F 4E 54 20 23 20 28 31 |.....".FONT # (1|
000006B0: 20 2D 22 3B C4 28 4D 41 58 AA 31 29 22 29 22 3B | -";.(MAX.1)")";|
000006C0: 3A 85 5A 24 00 D9 0E 8F 02 8B C8 28 5A 24 2C 31 |:.Z$.......(Z$,1|
000006D0: 29 B2 22 58 22 A7 35 37 30 00 EA 0E 90 02 42 B2 |)."X".570.....B.|
000006E0: C5 28 C8 28 5A 24 2C 33 29 29 00 02 0F 94 02 8B |.(.(Z$,3))......|
000006F0: 42 B3 31 20 B0 20 42 B1 4D 41 58 AA 31 20 A7 36 |B.1 . B.MAX.1 .6|
00000700: 35 30 00 27 0F 96 02 53 24 28 49 29 B2 46 24 28 |50.'...S$(I).F$(|
00000710: 42 29 3A 8B 42 B2 4D 41 58 AA 31 A7 53 24 28 49 |B):.B.MAX.1.S$(I|
00000720: 29 B2 22 2A 2A 2A 22 00 35 0F 97 02 43 48 B2 31 |)."***".5...CH.1|
00000730: 3A 89 35 37 30 00 43 0F 99 02 8B 20 43 48 B2 30 |:.570.C.... CH.0|
00000740: A7 34 30 00 59 0F 9B 02 99 22 11 4F 4E 45 20 4D |.40.Y....".ONE M|
00000750: 4F 4D 45 4E 54 2E 2E 2E 22 00 78 0F 9E 02 9F 20 |OMENT...".x.... |
00000760: 31 2C 38 2C 32 2C 22 40 3A 53 45 4C 45 43 54 49 |1,8,2,"@:SELECTI|
00000770: 4F 4E 53 2C 53 2C 57 22 00 8F 0F A8 02 81 4A B2 |ONS,S,W"......J.|
00000780: 31 A4 38 3A 98 31 2C 53 24 28 4A 29 3A 82 4A 00 |1.8:.1,S$(J):.J.|
00000790: 9A 0F B2 02 A0 31 3A 89 34 30 00 A8 0F 20 03 A0 |.....1:.40... ..|
000007A0: 20 31 35 3A A0 31 3A 80 00 C2 0F E8 03 9F 20 31 | 15:.1:....... 1|
000007B0: 2C 38 2C 32 2C 22 46 4F 4E 54 44 49 52 2C 53 2C |,8,2,"FONTDIR,S,|
000007C0: 52 22 00 CF 0F ED 03 46 24 28 31 29 B2 22 22 00 |R".....F$(1)."".|
000007D0: E9 0F F2 03 A1 23 31 2C 41 24 3A 4D 41 58 B2 C6 |.....#1,A$:MAX..|
000007E0: 28 41 24 AA C7 28 30 29 29 00 FC 0F F7 03 8B 4D |(A$..(0))......M|
000007F0: 41 58 B2 31 39 39 A7 4D 41 58 B2 30 00 15 10 FC |AX.199.MAX.0....|
00000800: 03 8B 4D 41 58 B2 31 39 39 A7 4D 41 58 B2 30 3A |..MAX.199.MAX.0:|
00000810: 89 31 30 35 30 00 22 10 06 04 81 49 B2 31 A4 4D |.1050."....I.1.M|
00000820: 41 58 00 32 10 10 04 84 31 2C 46 24 28 49 29 3A |AX.2....1,F$(I):|
00000830: 82 49 00 3B 10 1A 04 A0 31 3A 8E 00 4F 10 DC 05 |.I.;....1:..O...|
00000840: 99 22 11 48 49 54 20 41 4E 59 20 4B 45 59 22 00 |.".HIT ANY KEY".|
00000850: 63 10 E6 05 A1 5A 24 3A 8B 5A 24 B2 22 22 A7 31 |c....Z$:.Z$."".1|
00000860: 35 31 30 00 69 10 F0 05 8E 00 8C 10 D0 07 8B 20 |510.i.......... |
00000870: 55 46 B2 30 A7 55 46 B2 31 3A 4C 46 B2 32 3A 93 |UF.0.UF.1:LF.2:.|
00000880: 20 22 53 50 4C 49 54 22 2C 38 2C 31 00 92 10 D1 | "SPLIT",8,1....|
00000890: 07 8F 00 B4 10 D2 07 97 31 32 AC 34 30 39 36 AA |........12.4096.|
000008A0: 31 31 35 2C 30 3A 97 31 32 AC 34 30 39 36 AA 31 |115,0:.12.4096.1|
000008B0: 31 36 2C 30 00 CE 10 D7 07 81 49 B2 31 34 39 31 |16,0......I.1491|
000008C0: 32 A4 31 36 31 39 31 3A 97 49 2C 30 3A 82 00 E2 |2.16191:.I,0:...|
000008D0: 10 DA 07 99 22 93 22 3B 3A 9E 20 31 32 AC 34 30 |....".";:. 12.40|
000008E0: 39 36 00 EC 10 DD 07 8D 34 30 30 30 00 06 11 DF |96......4000....|
000008F0: 07 81 49 B2 31 38 36 34 A4 32 30 32 33 3A 97 49 |..I.1864.2023:.I|
00000900: 2C 31 36 30 3A 82 00 18 11 E4 07 99 50 5A 24 22 |,160:.......PZ$"|
00000910: 57 41 49 54 2E 2E 2E 22 00 4E 11 E9 07 81 50 B2 |WAIT...".N....P.|
00000920: 30 A4 31 3A 42 41 53 45 B2 33 32 37 36 38 AA 4C |0.1:BASE.32768.L|
00000930: 4F AC 39 AA 31 30 32 34 AC 50 3A 81 49 B2 30 A4 |O.9.1024.P:.I.0.|
00000940: 38 3A 43 4C B2 C2 28 42 41 53 45 AA 49 29 00 83 |8:CL..(BASE.I)..|
00000950: 11 F8 07 81 4A B2 50 AA 31 34 A4 30 A9 AB 32 3A |....J.P.14.0..2:|
00000960: 4D 54 28 49 2C 4A 29 B2 28 43 4C 20 AF 20 31 29 |MT(I,J).(CL . 1)|
00000970: 3A 43 4C B2 B5 28 43 4C AD 32 29 3A 82 20 4A 2C |:CL..(CL.2):. J,|
00000980: 49 2C 50 00 8E 11 20 08 8D 20 39 30 30 30 00 BB |I,P... .. 9000..|
00000990: 11 2A 08 81 50 53 B2 30 A4 31 3A 50 39 B2 38 AC |.*..PS.0.1:P9.8.|
000009A0: 50 53 3A 42 41 53 45 B2 31 35 32 36 34 AA 33 32 |PS:BASE.15264.32|
000009B0: 30 AC 50 53 3A 81 49 B2 30 A4 37 00 EF 11 34 08 |0.PS:.I.0.7...4.|
000009C0: 42 54 B2 30 3A 81 52 57 B2 30 A4 37 3A 42 54 B2 |BT.0:.RW.0.7:BT.|
000009D0: 42 54 AC 32 AA 4D 54 28 52 57 2C 49 AA 50 39 29 |BT.2.MT(RW,I.P9)|
000009E0: 3A 82 52 57 3A 97 42 41 53 45 AA 49 2C 42 54 00 |:.RW:.BASE.I,BT.|
000009F0: 12 12 3E 08 97 42 41 53 45 AA 38 AA 49 2C 31 32 |..>..BASE.8.I,12|
00000A00: 38 AC 4D 54 28 38 2C 49 AA 50 39 29 3A 82 49 2C |8.MT(8,I.P9):.I,|
00000A10: 50 53 00 40 12 5C 08 99 22 13 11 1D 1D 1D 1D 1D |PS.@.\..".......|
00000A20: 1D 1D 1D 1D 1D 1D 1D 41 53 43 49 49 3A 20 20 20 |.......ASCII: |
00000A30: 20 20 20 9D 9D 9D 9D 9D 9D 22 3B 4C 4F AA 33 32 | ......";LO.32|
00000A40: 00 79 12 66 08 99 22 11 22 A3 31 32 29 22 43 48 |.y.f..".".12)"CH|
00000A50: 41 52 3A 20 20 22 3B 3A 8B 4C 4F B1 36 34 AF 4C |AR: ";:.LO.64.L|
00000A60: 4F B3 39 31 A7 99 C7 28 4C 4F 29 3B 22 20 28 4C |O.91...(LO);" (L|
00000A70: 43 29 22 3A 89 32 31 35 35 00 8F 12 68 08 99 C7 |C)":.2155...h...|
00000A80: 28 4C 4F AA 33 32 29 3B 22 20 20 20 20 20 22 00 |(LO.32);" ".|
00000A90: 98 12 6B 08 99 50 43 24 00 AC 12 70 08 99 22 13 |..k..PC$...p..".|
00000AA0: A6 9D 22 3B 3A 58 B2 30 3A 59 B2 30 00 C0 12 7A |..";:X.0:Y.0...z|
00000AB0: 08 A1 5A 24 3A 8B 5A 24 B2 22 22 A7 32 31 37 30 |..Z$:.Z$."".2170|
00000AC0: 00 CE 12 7F 08 58 4F B2 30 3A 59 4F B2 30 00 EA |.....XO.0:YO.0..|
00000AD0: 12 84 08 8B 5A 24 B2 22 91 22 AF 59 B1 30 A7 59 |....Z$.".".Y.0.Y|
00000AE0: 4F B2 AB 31 3A 89 32 33 30 30 00 07 13 8E 08 8B |O..1:.2300......|
00000AF0: 5A 24 B2 22 11 22 AF 59 B3 31 35 A7 59 4F B2 AA |Z$.".".Y.15.YO..|
00000B00: 31 3A 89 32 33 30 30 00 23 13 98 08 8B 5A 24 B2 |1:.2300.#....Z$.|
00000B10: 22 1D 22 AF 58 B3 38 A7 58 4F B2 AA 31 3A 89 32 |".".X.8.XO..1:.2|
00000B20: 33 30 30 00 3F 13 A2 08 8B 5A 24 B2 22 9D 22 AF |300.?....Z$.".".|
00000B30: 58 B1 30 A7 58 4F B2 AB 31 3A 89 32 33 30 30 00 |X.0.XO..1:.2300.|
00000B40: 62 13 A7 08 8B 5A 24 B2 22 53 22 B0 5A 24 B2 22 |b....Z$."S".Z$."|
00000B50: D3 22 A7 4D 54 28 58 2C 59 29 B2 31 3A 89 32 33 |.".MT(X,Y).1:.23|
00000B60: 33 30 00 85 13 AC 08 8B 5A 24 B2 22 52 22 B0 5A |30......Z$."R".Z|
00000B70: 24 B2 22 D2 22 A7 4D 54 28 58 2C 59 29 B2 30 3A |$.".".MT(X,Y).0:|
00000B80: 89 32 33 33 30 00 96 13 B6 08 8B 5A 24 B2 22 85 |.2330......Z$.".|
00000B90: 22 A7 32 34 30 30 00 C1 13 C0 08 8B 5A 24 B2 22 |".2400......Z$."|
00000BA0: 2B 22 A7 4C 4F B2 4C 4F AA 31 3A 4C 4F B2 4C 4F |+".LO.LO.1:LO.LO|
00000BB0: AA 39 36 AC 28 4C 4F B1 39 35 29 3A 89 32 30 32 |.96.(LO.95):.202|
00000BC0: 30 00 EB 13 CA 08 8B 5A 24 B2 22 2D 22 A7 4C 4F |0......Z$."-".LO|
00000BD0: B2 4C 4F AB 31 3A 4C 4F B2 4C 4F AB 39 36 AC 28 |.LO.1:LO.LO.96.(|
00000BE0: 4C 4F B3 30 29 3A 89 32 30 32 30 00 FC 13 D4 08 |LO.0):.2020.....|
00000BF0: 8B 5A 24 B2 22 4A 22 A7 32 35 30 30 00 0D 14 DE |.Z$."J".2500....|
00000C00: 08 8B 5A 24 B2 22 51 22 A7 32 36 30 30 00 1F 14 |..Z$."Q".2600...|
00000C10: E3 08 8B 20 5A 24 B2 22 50 22 A7 33 30 30 30 00 |... Z$."P".3000.|
00000C20: 2A 14 E8 08 89 20 32 31 37 30 00 47 14 FC 08 8B |*.... 2170.G....|
00000C30: 20 4D 54 28 58 2C 59 29 B2 30 A7 99 22 CF 9D 22 | MT(X,Y).0..".."|
00000C40: 3B 3A 89 32 33 32 30 00 54 14 06 09 99 22 12 20 |;:.2320.T....". |
00000C50: 92 9D 22 3B 00 76 14 10 09 58 B2 58 AA 58 4F 3A |..";.v...X.X.XO:|
00000C60: 59 B2 59 AA 59 4F 3A 99 5A 24 3B 22 A6 9D 22 3B |Y.Y.YO:.Z$;"..";|
00000C70: 3A 89 32 31 37 30 00 96 14 1A 09 42 41 53 45 B2 |:.2170.....BASE.|
00000C80: 31 35 32 36 34 3A 8B 58 B2 38 A7 42 41 53 45 B2 |15264:.X.8.BASE.|
00000C90: 42 41 53 45 AA 38 00 B9 14 1F 09 42 41 53 45 B2 |BASE.8.....BASE.|
00000CA0: 42 41 53 45 AA 59 3A 8B 59 B1 37 A7 42 41 53 45 |BASE.Y:.Y.7.BASE|
00000CB0: B2 42 41 53 45 AA 33 31 32 00 D0 14 24 09 42 54 |.BASE.312...$.BT|
00000CC0: B2 28 32 AE 28 37 AB 28 58 20 AF 20 37 29 29 29 |.(2.(7.(X . 7)))|
00000CD0: 00 F1 14 2E 09 8B 4D 54 28 58 2C 59 29 B2 31 A7 |......MT(X,Y).1.|
00000CE0: 97 42 41 53 45 2C C2 28 42 41 53 45 29 B0 20 42 |.BASE,.(BASE). B|
00000CF0: 54 00 17 15 38 09 8B 4D 54 28 58 2C 59 29 B2 30 |T...8..MT(X,Y).0|
00000D00: A7 97 42 41 53 45 2C C2 28 42 41 53 45 29 AF 28 |..BASE,.(BASE).(|
00000D10: 32 35 35 AB 42 54 29 00 22 15 42 09 89 20 32 31 |255.BT).".B.. 21|
00000D20: 37 30 00 3C 15 60 09 99 50 5A 24 22 53 41 56 49 |70.<.`..PZ$"SAVI|
00000D30: 4E 47 20 49 4D 41 47 45 2E 2E 2E 22 00 5D 15 63 |NG IMAGE...".].c|
00000D40: 09 50 B2 B8 28 41 24 29 3A 8F 20 44 4F 20 47 41 |.P..(A$):. DO GA|
00000D50: 52 42 41 47 45 20 43 4F 4C 4C 45 43 54 00 73 15 |RBAGE COLLECT.s.|
00000D60: 65 09 42 41 53 45 B2 33 32 37 36 38 3A 81 50 B2 |e.BASE.32768:.P.|
00000D70: 30 A4 31 00 8D 15 6A 09 81 49 B2 30 A4 38 3A 42 |0.1...j..I.0.8:B|
00000D80: 54 B2 30 3A 81 4A B2 50 A4 31 35 A9 32 00 A4 15 |T.0:.J.P.15.2...|
00000D90: 74 09 42 54 B2 42 54 AC 32 AA 4D 54 28 49 2C 4A |t.BT.BT.2.MT(I,J|
00000DA0: 29 3A 82 4A 00 C0 15 7E 09 97 20 42 41 53 45 AA |):.J...~.. BASE.|
00000DB0: 31 30 32 34 AC 50 AA 4C 4F AC 39 AA 49 2C 42 54 |1024.P.LO.9.I,BT|
00000DC0: 00 CA 15 88 09 82 20 49 2C 50 00 E6 15 92 09 4C |...... I,P.....L|
00000DD0: 4F B2 4C 4F AA 31 3A 8B 4C 4F B1 39 35 A7 4C 4F |O.LO.1:.LO.95.LO|
00000DE0: B2 4C 4F AB 39 36 00 EF 15 97 09 99 50 43 24 00 |.LO.96......PC$.|
00000DF0: FA 15 9C 09 89 20 32 30 32 30 00 10 16 C4 09 99 |..... 2020......|
00000E00: 50 5A 24 22 43 48 41 52 41 43 54 45 52 3F 22 3B |PZ$"CHARACTER?";|
00000E10: 00 24 16 C9 09 A1 58 24 3A 8B 58 24 B2 22 22 A7 |.$....X$:.X$."".|
00000E20: 32 35 30 35 00 2D 16 CA 09 99 50 43 24 00 4A 16 |2505.-....PC$.J.|
00000E30: CE 09 5A B2 C6 28 58 24 29 3A 8B 5A B3 33 32 A7 |..Z..(X$):.Z.32.|
00000E40: 5A B2 33 32 3A 89 32 35 36 30 00 5A 16 D8 09 8B |Z.32:.2560.Z....|
00000E50: 20 5A B3 36 35 A7 32 35 36 30 00 72 16 E2 09 8B | Z.65.2560.r....|
00000E60: 20 5A B3 39 31 A7 5A B2 5A AA 33 32 3A 89 32 35 | Z.91.Z.Z.32:.25|
00000E70: 36 30 00 82 16 E7 09 8B 20 5A B3 39 37 A7 32 35 |60...... Z.97.25|
00000E80: 36 30 00 9B 16 EC 09 8B 20 5A B3 31 32 33 A7 5A |60...... Z.123.Z|
00000E90: B2 5A AB 33 32 3A 89 32 35 36 30 00 AC 16 F1 09 |.Z.32:.2560.....|
00000EA0: 8B 20 5A B3 31 32 38 A7 32 35 36 30 00 C7 16 F6 |. Z.128.2560....|
00000EB0: 09 8B 20 5A B3 31 39 33 20 B0 20 5A B1 32 31 38 |.. Z.193 . Z.218|
00000EC0: 20 A7 20 32 35 30 30 00 D3 16 FB 09 5A B2 5A AB | . 2500.....Z.Z.|
00000ED0: 31 32 38 00 E6 16 00 0A 4C 4F B2 5A AB 33 32 3A |128.....LO.Z.32:|
00000EE0: 89 20 32 30 32 30 00 11 17 28 0A 9E 20 31 32 AC |. 2020...(.. 12.|
00000EF0: 34 30 39 36 AA 32 35 36 3A 97 35 33 32 36 35 2C |4096.256:.53265,|
00000F00: 32 37 3A 99 22 93 22 3A 97 35 33 32 37 32 2C 32 |27:.".":.53272,2|
00000F10: 31 00 20 17 32 0A 8B 56 B3 B1 32 A7 32 36 32 30 |1. .2..V..2.2620|
00000F20: 00 59 17 34 0A 99 20 22 44 4F 20 59 4F 55 20 57 |.Y.4.. "DO YOU W|
00000F30: 41 4E 54 20 54 4F 20 52 45 2D 53 41 56 45 20 22 |ANT TO RE-SAVE "|
00000F40: 3B 45 24 3A 99 22 20 57 49 54 48 20 43 48 41 4E |;E$:." WITH CHAN|
00000F50: 47 45 53 22 3B 3A 85 5A 24 00 76 17 36 0A 8B 20 |GES";:.Z$.v.6.. |
00000F60: C8 28 5A 24 2C 31 29 B2 22 59 22 A7 52 52 B2 31 |.(Z$,1)."Y".RR.1|
00000F70: 3A 89 32 36 35 30 00 7F 17 38 0A 89 20 33 35 00 |:.2650...8.. 35.|
00000F80: 89 17 3C 0A 99 22 93 22 3B 00 B3 17 3D 0A 99 20 |..<..".";...=.. |
00000F90: 22 57 48 41 54 20 49 53 20 54 48 45 20 4E 41 4D |"WHAT IS THE NAM|
00000FA0: 45 20 4F 46 20 54 48 49 53 20 4E 45 57 20 46 4F |E OF THIS NEW FO|
00000FB0: 4E 54 22 00 D9 17 41 0A 85 20 22 28 58 20 54 4F |NT"...A.. "(X TO|
00000FC0: 20 45 58 49 54 20 57 49 54 48 4F 55 54 20 53 41 | EXIT WITHOUT SA|
00000FD0: 56 49 4E 47 29 22 3B 45 24 00 ED 17 42 0A 52 52 |VING)";E$...B.RR|
00000FE0: B2 30 3A 8B 45 24 B2 22 58 22 A7 33 35 00 0D 18 |.0:.E$."X".35...|
00000FF0: 46 0A 81 49 B2 31 A4 4D 41 58 3A 8B 45 24 B3 B1 |F..I.1.MAX:.E$..|
00001000: 46 24 28 49 29 A7 82 3A 89 32 36 37 30 00 39 18 |F$(I)..:.2670.9.|
00001010: 50 0A 99 22 11 11 54 48 45 52 45 20 41 4C 52 45 |P.."..THERE ALRE|
00001020: 41 44 59 20 49 53 20 41 20 46 4F 4E 54 20 43 41 |ADY IS A FONT CA|
00001030: 4C 4C 45 44 20 22 3B 45 24 00 77 18 54 0A 99 20 |LLED ";E$.w.T.. |
00001040: 22 41 52 45 20 59 4F 55 20 53 55 52 45 20 59 4F |"ARE YOU SURE YO|
00001050: 55 20 57 41 4E 54 20 54 4F 20 45 52 41 53 45 22 |U WANT TO ERASE"|
00001060: 3A 85 22 54 48 45 20 4F 4C 44 20 4F 4E 45 22 3B |:."THE OLD ONE";|
00001070: 5A 24 3A 52 52 B2 31 00 8E 18 56 0A 8B C8 28 5A |Z$:RR.1...V...(Z|
00001080: 24 2C 31 29 B3 B1 22 59 22 A7 32 36 32 30 00 A5 |$,1).."Y".2620..|
00001090: 18 5A 0A 8D 20 38 30 30 30 3A 8B 20 50 46 B2 31 |.Z.. 8000:. PF.1|
000010A0: A7 32 36 32 31 00 D1 18 6E 0A 99 22 11 53 41 56 |.2621...n..".SAV|
000010B0: 49 4E 47 2E 2E 2E 22 3A 8D 20 38 37 30 30 3A 8F |ING...":. 8700:.|
000010C0: 20 50 55 54 20 45 24 20 49 4E 20 4D 45 4D 4F 52 | PUT E$ IN MEMOR|
000010D0: 59 00 F3 18 73 0A 9E 31 32 AC 34 30 39 36 AA 31 |Y...s..12.4096.1|
000010E0: 34 34 3A 99 22 91 56 45 52 49 46 59 49 4E 47 2E |44:.".VERIFYING.|
000010F0: 2E 2E 22 00 27 19 78 0A 9E 31 32 AC 34 30 39 36 |..".'.x..12.4096|
00001100: AA 31 39 32 3A 45 52 B2 C2 28 31 33 AC 34 30 39 |.192:ER..(13.409|
00001110: 36 AB 32 29 3A 8B 45 52 B3 B1 30 A7 8D 38 33 30 |6.2):.ER..0..830|
00001120: 30 3A 89 32 36 32 30 00 4E 19 82 0A 45 52 B2 C2 |0:.2620.N...ER..|
00001130: 28 31 33 AC 34 30 39 36 AB 31 29 3A 8B 45 52 B3 |(13.4096.1):.ER.|
00001140: B1 30 A7 8D 38 33 30 30 3A 89 32 36 32 30 00 6C |.0..8300:.2620.l|
00001150: 19 8C 0A 8B 28 C2 28 31 33 AC 34 30 39 36 AB 33 |....(.(13.4096.3|
00001160: 29 AF 31 36 29 B2 30 A7 32 37 33 30 00 87 19 96 |).16).0.2730....|
00001170: 0A 99 22 56 45 52 49 46 59 20 45 52 52 4F 52 2E |.."VERIFY ERROR.|
00001180: 22 3A 8D 38 30 30 30 00 91 19 A0 0A 89 32 36 32 |":.8000......262|
00001190: 31 00 A0 19 AA 0A 8B 52 52 B2 31 20 A7 20 33 35 |1......RR.1 . 35|
000011A0: 00 DA 19 B4 0A 99 22 91 57 41 49 54 2E 2E 2E 20 |......".WAIT... |
000011B0: 20 20 20 20 22 3A 8D 31 30 30 30 3A 49 B2 4D 41 | ":.1000:I.MA|
000011C0: 58 3A 8D 37 30 35 30 3A 46 24 28 49 29 B2 45 24 |X:.7050:F$(I).E$|
000011D0: 3A 8D 37 31 30 30 3A 89 33 35 00 07 1A B8 0B 9F |:.7100:.35......|
000011E0: 20 34 2C 34 2C 35 3A 9E 31 32 AC 34 30 39 36 AA | 4,4,5:.12.4096.|
000011F0: 32 35 36 3A 97 35 33 32 36 35 2C 32 37 3A 97 35 |256:.53265,27:.5|
00001200: 33 32 37 32 2C 32 31 00 1D 1A B9 0B 99 50 5A 24 |3272,21......PZ$|
00001210: 22 50 52 49 4E 54 49 4E 47 2E 2E 2E 22 00 29 1A |"PRINTING...".).|
00001220: BD 0B 81 50 53 B2 30 A4 31 00 45 1A C2 0B 98 34 |...PS.0.1.E....4|
00001230: 2C C7 28 32 37 29 C7 28 37 36 29 C7 28 33 36 29 |,.(27).(76).(36)|
00001240: C7 28 30 29 3B 00 52 1A C7 0B 81 20 52 50 B2 31 |.(0);.R.... RP.1|
00001250: A4 33 00 6F 1A CC 0B 81 58 39 B2 30 A4 38 3A 42 |.3.o....X9.0.8:B|
00001260: 54 B2 30 3A 81 59 39 B2 50 53 A4 31 35 A9 32 00 |T.0:.Y9.PS.15.2.|
00001270: 89 1A D6 0B 42 54 B2 42 54 AC 32 AA 4D 54 28 58 |....BT.BT.2.MT(X|
00001280: 39 2C 59 39 29 3A 82 59 39 00 9B 1A E0 0B 98 34 |9,Y9):.Y9......4|
00001290: 2C C7 28 42 54 29 3B 3A 82 58 39 00 B0 1A E5 0B |,.(BT);:.X9.....|
000012A0: 98 34 2C C7 28 30 29 C7 28 30 29 C7 28 30 29 3B |.4,.(0).(0).(0);|
000012B0: 00 B8 1A E7 0B 82 52 50 00 D2 1A EA 0B 98 34 2C |......RP......4,|
000012C0: C7 28 32 37 29 22 4A 22 C7 28 31 29 C7 28 31 33 |.(27)"J".(1).(13|
000012D0: 29 3B 00 DA 1A F4 0B 82 50 53 00 E7 1A FE 0B 98 |);......PS......|
000012E0: 34 2C C7 28 31 30 29 00 FC 1A 08 0C A0 34 3A 9E |4,.(10)......4:.|
000012F0: 31 32 AC 34 30 39 36 3A 99 50 43 24 00 06 1B 12 |12.4096:.PC$....|
00001300: 0C 99 22 13 22 3B 00 14 1B 1C 0C 8B 59 B2 30 A7 |..".";......Y.0.|
00001310: 33 31 32 30 00 28 1B 26 0C 81 49 B2 31 A4 59 3A |3120.(.&..I.1.Y:|
00001320: 99 22 11 22 3B 3A 82 49 00 36 1B 30 0C 8B 58 B2 |.".";:.I.6.0..X.|
00001330: 30 A7 32 31 37 30 00 50 1B 3A 0C 81 49 B2 31 A4 |0.2170.P.:..I.1.|
00001340: 58 3A 99 22 1D 22 3B 3A 82 49 3A 89 32 31 37 30 |X:.".";:.I:.2170|
00001350: 00 7B 1B A0 0F 99 50 5A 24 3B 22 11 11 11 11 43 |.{....PZ$;"....C|
00001360: 52 53 52 11 9D 9D 9D 9D 4B 45 59 53 20 2D 20 4D |RSR.....KEYS - M|
00001370: 4F 56 45 20 43 55 52 53 4F 52 22 00 97 1B AA 0F |OVE CURSOR".....|
00001380: 99 A3 31 32 29 22 20 53 20 20 20 2D 20 53 45 54 |..12)" S - SET|
00001390: 20 50 4F 49 4E 54 22 00 B5 1B B4 0F 99 A3 31 32 | POINT".......12|
000013A0: 29 22 20 52 20 20 20 2D 20 52 45 53 45 54 20 50 |)" R - RESET P|
000013B0: 4F 49 4E 54 22 00 D2 1B BE 0F 99 A3 31 32 29 22 |OINT".......12)"|
000013C0: 20 46 31 20 20 2D 20 53 41 56 45 20 49 4D 41 47 | F1 - SAVE IMAG|
000013D0: 45 22 00 F3 1B C8 0F 99 A3 31 32 29 22 20 2B 20 |E".......12)" + |
000013E0: 20 20 2D 20 4E 45 58 54 20 43 48 41 52 41 43 54 | - NEXT CHARACT|
000013F0: 45 52 22 00 13 1C D2 0F 99 A3 31 32 29 22 20 2D |ER".......12)" -|
00001400: 20 20 20 2D 20 50 52 45 56 49 4F 55 53 20 43 48 | - PREVIOUS CH|
00001410: 41 52 22 00 34 1C DC 0F 99 A3 31 32 29 22 20 4A |AR".4.....12)" J|
00001420: 20 20 20 2D 20 4A 55 4D 50 20 54 4F 20 41 20 43 | - JUMP TO A C|
00001430: 48 41 52 22 00 52 1C E6 0F 99 A3 31 32 29 22 20 |HAR".R.....12)" |
00001440: 50 20 20 20 2D 20 50 52 49 4E 54 20 49 4D 41 47 |P - PRINT IMAG|
00001450: 45 22 00 69 1C F0 0F 99 A3 31 32 29 22 20 51 20 |E".i.....12)" Q |
00001460: 20 20 2D 20 51 55 49 54 22 00 6F 1C FA 0F 8E 00 | - QUIT".o.....|
00001470: 9A 1C 58 1B 49 31 B2 49 AA 31 3A 46 24 28 49 29 |..X.I1.I.1:F$(I)|
00001480: B2 46 24 28 49 31 29 3A 8B 49 31 B3 4D 41 58 A7 |.F$(I1):.I1.MAX.|
00001490: 49 B2 49 31 3A 89 37 30 30 30 00 AA 1C 62 1B 4D |I.I1:.7000...b.M|
000014A0: 41 58 B2 4D 41 58 AB 31 3A 8E 00 C6 1C 8A 1B 49 |AX.MAX.1:......I|
000014B0: 31 B2 4D 41 58 3A 8B 4D 41 58 B2 30 A7 49 B2 31 |1.MAX:.MAX.0.I.1|
000014C0: 3A 89 37 30 37 30 00 F4 1C 94 1B 49 32 B2 49 31 |:.7070.....I2.I1|
000014D0: AA 31 3A 46 24 28 49 32 29 B2 46 24 28 49 31 29 |.1:F$(I2).F$(I1)|
000014E0: 3A 8B 49 31 B1 49 A7 49 31 B2 49 31 AB 31 3A 89 |:.I1.I.I1.I1.1:.|
000014F0: 37 30 36 30 00 0D 1D 9E 1B 46 24 28 49 29 B2 22 |7060.....F$(I)."|
00001500: 22 3A 4D 41 58 B2 4D 41 58 AA 31 3A 8E 00 30 1D |":MAX.MAX.1:..0.|
00001510: BC 1B 9F 20 31 35 2C 38 2C 31 35 3A 98 31 35 2C |... 15,8,15:.15,|
00001520: 22 53 30 3A 46 4F 4E 54 44 49 52 22 3A A0 31 35 |"S0:FONTDIR":.15|
00001530: 00 4A 1D C6 1B 9F 20 31 2C 38 2C 32 2C 22 46 4F |.J.... 1,8,2,"FO|
00001540: 4E 54 44 49 52 2C 53 2C 57 22 00 72 1D D0 1B 98 |NTDIR,S,W".r....|
00001550: 31 2C C7 28 4D 41 58 29 3A 81 49 B2 31 A4 4D 41 |1,.(MAX):.I.1.MA|
00001560: 58 3A 98 31 2C 46 24 28 49 29 3A 82 49 3A A0 31 |X:.1,F$(I):.I:.1|
00001570: 3A 8E 00 8A 1D 40 1F 8F 20 54 52 59 20 54 4F 20 |:....@.. TRY TO |
00001580: 53 43 52 41 54 43 48 20 45 24 00 98 1D 4A 1F 9F |SCRATCH E$...J..|
00001590: 20 31 35 2C 38 2C 31 35 00 A1 1D 54 1F 50 46 B2 | 15,8,15...T.PF.|
000015A0: 30 00 B4 1D 5E 1F 98 31 35 2C 22 53 30 3A 46 2E |0...^..15,"S0:F.|
000015B0: 22 3B 45 24 00 C8 1D 68 1F 84 31 35 2C 5A 31 2C |";E$...h..15,Z1,|
000015C0: 5A 24 2C 5A 32 2C 5A 33 00 D0 1D 72 1F A0 31 35 |Z$,Z2,Z3...r..15|
000015D0: 00 E1 1D 7C 1F 8B 5A 31 B2 31 AF 5A 32 B2 31 A7 |...|..Z1.1.Z2.1.|
000015E0: 8E 00 07 1E 86 1F 50 46 B2 31 3A 99 22 53 4F 52 |......PF.1:."SOR|
000015F0: 52 59 2C 20 22 45 24 22 20 49 53 20 50 52 4F 54 |RY, "E$" IS PROT|
00001600: 45 43 54 45 44 2E 22 00 33 1E 8B 1F 8B 56 B3 B1 |ECTED.".3....V..|
00001610: 34 A7 99 22 59 4F 55 20 4D 55 53 54 20 53 41 56 |4.."YOU MUST SAV|
00001620: 45 20 49 54 20 41 53 20 41 20 4E 45 57 20 46 4F |E IT AS A NEW FO|
00001630: 4E 54 22 00 39 1E 90 1F 8E 00 54 1E 6C 20 8B 20 |NT".9.....T.l . |
00001640: 45 52 B2 33 A7 99 22 56 45 52 49 46 59 20 45 52 |ER.3.."VERIFY ER|
00001650: 52 4F 52 22 00 73 1E 76 20 8B 20 45 52 B2 35 A7 |ROR".s.v . ER.5.|
00001660: 99 22 44 49 53 4B 20 4E 4F 54 20 50 52 45 53 45 |."DISK NOT PRESE|
00001670: 4E 54 22 00 79 1E 80 20 8E 00 8F 1E 34 21 99 22 |NT".y.. ....4!."|
00001680: 11 4F 4E 45 20 4D 4F 4D 45 4E 54 2E 2E 2E 22 00 |.ONE MOMENT...".|
00001690: 95 1E 3E 21 8E 00 A9 1E FC 21 8F 20 50 55 54 20 |..>!.....!. PUT |
000016A0: 45 24 20 49 4E 20 4D 45 4D 00 BC 1E 06 22 97 34 |E$ IN MEM....".4|
000016B0: 39 33 39 32 2C C3 28 45 24 29 AA 32 00 CD 1E 10 |9392,.(E$).2....|
000016C0: 22 81 49 B2 31 A4 C3 28 45 24 29 AA 32 00 EC 1E |".I.1..(E$).2...|
000016D0: 1A 22 97 34 39 33 39 32 AA 49 2C C6 28 CA 28 22 |.".49392.I,.(.("|
000016E0: 46 2E 22 AA 45 24 2C 49 2C 31 29 29 00 F4 1E 24 |F.".E$,I,1))...$|
000016F0: 22 82 3A 8E 00 FE 1E 28 23 99 22 13 22 3B 00 11 |".:....(#.".";..|
00001700: 1F 32 23 81 4A B2 30 A4 31 35 3A 81 49 B2 30 A4 |.2#.J.0.15:.I.0.|
00001710: 38 00 2D 1F 3C 23 8B 20 4D 54 28 49 2C 4A 29 B2 |8.-.<#. MT(I,J).|
00001720: 30 A7 99 22 CF 22 3B 3A 89 39 30 34 30 00 39 1F |0..".";:.9040.9.|
00001730: 46 23 99 22 12 20 92 22 3B 00 55 1F 50 23 82 49 |F#.". .";.U.P#.I|
00001740: 3A 99 22 B4 22 3A 82 4A 3A 99 22 B7 B7 B7 B7 B7 |:.".":.J:.".....|
00001750: B7 B7 B7 B7 22 00 5B 1F 5A 23 8E 00 65 1F 1C 25 |....".[.Z#..e..%|
00001760: 99 22 93 22 3B 00 8A 1F 21 25 99 22 13 46 4F 4E |.".";...!%.".FON|
00001770: 54 53 3A 11 22 3A 81 49 B2 31 A4 4D 41 58 3A 99 |TS:.":.I.1.MAX:.|
00001780: 46 24 28 49 29 2C 3A 82 3A 99 00 AD 1F 26 25 85 |F$(I),:.:....&%.|
00001790: 20 22 11 46 4F 4E 54 20 54 4F 20 45 52 41 53 45 | ".FONT TO ERASE|
000017A0: 20 28 4F 52 20 27 58 27 29 22 3B 45 24 00 BC 1F | (OR 'X')";E$...|
000017B0: 2B 25 8B 45 24 B2 22 58 22 A7 34 30 00 F4 1F 30 |+%.E$."X".40...0|
000017C0: 25 81 49 B2 31 A4 4D 41 58 3A 8B 45 24 B3 B1 46 |%.I.1.MAX:.E$..F|
000017D0: 24 28 49 29 A7 82 3A 99 45 24 22 20 44 4F 45 53 |$(I)..:.E$" DOES|
000017E0: 20 4E 4F 54 20 45 58 49 53 54 91 91 91 22 3A 89 | NOT EXIST...":.|
000017F0: 39 35 31 30 00 15 20 3A 25 99 22 11 57 41 49 54 |9510.. :%.".WAIT|
00001800: 2E 2E 2E 22 3A 8D 38 30 30 30 3A 8B 50 46 B2 31 |...":.8000:.PF.1|
00001810: A7 39 35 30 35 00 26 20 44 25 8D 20 37 30 30 30 |.9505.& D%. 7000|
00001820: 3A 8D 37 31 30 30 00 43 20 4E 25 9F 20 31 2C 38 |:.7100.C N%. 1,8|
00001830: 2C 32 2C 22 53 45 4C 45 43 54 49 4F 4E 53 2C 53 |,2,"SELECTIONS,S|
00001840: 2C 52 22 00 5F 20 58 25 81 49 B2 31 A4 38 3A 84 |,R"._ X%.I.1.8:.|
00001850: 31 2C 41 24 3A 53 24 28 49 29 B2 41 24 3A 82 00 |1,A$:S$(I).A$:..|
00001860: 66 20 62 25 A0 31 00 85 20 6C 25 9F 20 31 2C 38 |f b%.1.. l%. 1,8|
00001870: 2C 32 2C 22 40 3A 53 45 4C 45 43 54 49 4F 4E 53 |,2,"@:SELECTIONS|
00001880: 2C 53 2C 57 22 00 A9 20 76 25 81 49 B2 31 A4 38 |,S,W".. v%.I.1.8|
00001890: 3A 8B 53 24 28 49 29 B2 45 24 A7 98 31 2C 22 2A |:.S$(I).E$..1,"*|
000018A0: 2A 2A 22 3A 89 39 36 31 30 00 B6 20 80 25 98 31 |**":.9610.. .%.1|
000018B0: 2C 53 24 28 49 29 00 C6 20 8A 25 82 49 3A A0 31 |,S$(I).. .%.I:.1|
000018C0: 3A 89 39 35 30 30 00 00 00 |:.9500... |
....... >>> FONT EDITOR <<<.B.... COPYRI
GHT (C) 1984 BY XETEC, INC.D.... WRITTEN
BY MARTY FLICKINGER.X.... LF . 250,2001
.....A.32768:A1.B(A):.A,255.A1:.B(A).A1.
."REMOVE CARTRIDGE":..J.... 56,127:.55,2
55...... 52,127:.51,255...... F$(30),S$(
8),MT(16,16).=...PZ$."..................
":PC$.PZ$." ".U.
...". >>> FONT EDITOR <<<....PL
EASE WAIT..."...... 1000...#.. 64789:. I
NIT...(..". >>> FONT EDITOR <<<
".G.-..53265,27...2.."..1) CREATE A FONT
"...<.."2) EDIT A FONT"...F.."3) DISK SW
APPED".%.K.."4) ERASE A FONT".E.P.."5) C
HANGE SELECTION FILE".^.Z.."6) EXIT EDIT
OR..."...D..".WHICH WOULD YOU LIKE TO DO
";Z$:V.E(Z$)...N.. V . 200,300,400,9500,
500,800...X.. 100...H.. ".START WITH A .
B.LANK OR ANOTHER .F.ONT";A$...M..A$."X"
.40...O..A$."R".250.8.R..A$."B"..8500:.I
.32768.34815:.I,0:.:.250.P....A$.."F".."
.";:.200.S....".NAME OF FONT";A$:.A$."X"
.40......I.1.MAX:.F$(I).A$.247......I:.A
$;" IS NOT ON THIS DISK".K...."..AVAILAB
LE FONTS:."......I.1.MAX:.F$(I),:.:.".."
;:.230...... 8500.....LF.1:F$."F.".A$:.
F$,8,1.!.... 2000.+.,..".";.K.1..".NAME
OF FONT TO EDIT";E$.Z.6..E$."X".40...@..
I.1.MAX:.E$..F$(I)..:.E$;" IS NOT ON THI
S DISK":.305...J.A$.E$:. 247.L...."..FON
TS CURRENTLY ON THIS DISK:.".W.... 1000.
.....I.1.MAX:.F$(I),:.I......:. 1500:.40
...... 1,8,2,"SELECTIONS,S,R".9....I.1.8
:.1,A$:S$(I).A$:..E... 1:CH.0.G.:.."..";
.20)"AVAILABLE FONTS:."...;..I.1.MAX.1:.
.20);D(I).") ";...>.. I.MAX.1.."-NONE-":
.578...@..F$(I)...B..I.U.D.."..FONT SELE
CTIONS:.":J.1...F..I.1.8...H.."#";I;": "
;...J..S$(J)."***"..:.588...K..S$(J).*.L
.J.J.1:.I:."....";.D.N.."..SELECTION #":
."(X,1,2,3,ETC)";A$:.H(A$,1)."X".665.~.X
.A.E(H(A$,3)):.A.1.590...L..A.8 .590...V
.I.A......"..";.D....".FONT # (1 -";D(MA
X.1)")";:.Z$.Y....H(Z$,1)."X".570.....B.
E(H(Z$,3))......B.1 . B.MAX.1 .650.'...S
$(I).F$(B):.B.MAX.1.S$(I)."***".5...CH.1
:.570.C.... CH.0.40.Y....".ONE MOMENT...
".X.... 1,8,2,"@:SELECTIONS,S,W"......J.
1.8:.1,S$(J):.J..... 1:.40... . 15: 1:.
.B.... 1,8,2,"FONTDIR,S,R".O...F$(1)."".
.....#1,A$:MAX.F(A$.G(0))......MAX.199.M
AX.0......MAX.199.MAX.0:.1050."....I.1.M
AX.2....1,F$(I):.I.;... 1:..O....".HIT A
NY KEY".C....Z$:.Z$."".1510.I.......P..
UF.0.UF.1:LF.2:. "SPLIT",8,1...Q.....R..
12.4096.115,0:.12.4096.116,0.N.W..I.1491
2.16191:.I,0:....Z..".";:. 12.4096......
4000......I.1864.2023:.I,160:.......PZ$"
WAIT...".N....P.0.1:BASE.32768.LO.9.1024
.P:.I.0.8:CL.B(BASE.I)......J.P.14.0..2:
MT(I,J).(CL . 1):CL..(CL.2):. J,I,P... .
. 9000...*..PS.0.1:P9.8.PS:BASE.15264.32
0.PS:.I.0.7...4.BT.0:.RW.0.7:BT.BT.2.MT(
RW,I.P9):.RW:.BASE.I,BT...>..BASE.8.I,12
8.MT(8,I.P9):.I,PS.@.\.."..............A
SCII: ......";LO.32.Y.F..".".12)"CH
AR: ";:.LO.64.LO.91..G(LO);" (LC)":.215
5...H..G(LO.32);" "...K..PC$...P..".
..";:X.0:Y.0...Z..Z$:.Z$."".2170.N..XO.
0:YO.0......Z$.".".Y.0.YO..1:.2300......
Z$.".".Y.15.YO..1:.2300.#....Z$.".".X.8.
XO..1:.2300.?....Z$.".".X.0.XO..1:.2300.
B....Z$."S".Z$."S".MT(X,Y).1:.2330......
Z$."R".Z$."R".MT(X,Y).0:.2330......Z$.".
".2400.A....Z$."+".LO.LO.1:LO.LO.96.(LO.
95):.2020...J..Z$."-".LO.LO.1:LO.LO.96.(
LO.0):.2020...T..Z$."J".2500......Z$."Q"
.2600...... Z$."P".3000.*.... 2170.G....
MT(X,Y).0.."O.";:.2320.T....". ..";.V..
.X.X.XO:Y.Y.YO:.Z$;"..";:.2170.....BASE.
15264:.X.8.BASE.BASE.8.....BASE.BASE.Y:.
Y.7.BASE.BASE.312.P.$.BT.(2.(7.(X . 7)))
......MT(X,Y).1..BASE,B(BASE). BT...8..M
T(X,Y).0..BASE,B(BASE).(255.BT).".B.. 21
70.<.`..PZ$"SAVING IMAGE...".].C.P..(A$)
:. DO GARBAGE COLLECT.S.E.BASE.32768:.P.
0.1...J..I.0.8:BT.0:.J.P.15.2...T.BT.BT.
2.MT(I,J):.J...~.. BASE.1024.P.LO.9.I,BT
.J.... I,P.....LO.LO.1:.LO.95.LO.LO.96..
....PC$...... 2020...D..PZ$"CHARACTER?";
.$.I..X$:.X$."".2505.-.J..PC$.J.N.Z.F(X$
):.Z.32.Z.32:.2560.Z.X.. Z.65.2560.R....
Z.91.Z.Z.32:.2560...... Z.97.2560......
Z.123.Z.Z.32:.2560...... Z.128.2560.G..
.. Z.193 . Z.218 . 2500.S...Z.Z.128.....
LO.Z.32:. 2020...(.. 12.4096.256:.53265,
27:.".":.53272,21. .2..V..2.2620.Y.4.. "
DO YOU WANT TO RE-SAVE ";E$:." WITH CHAN
GES";:.Z$.V.6.. H(Z$,1)."Y".RR.1:.2650.
.8.. 35...<..".";...=.. "WHAT IS THE NAM
E OF THIS NEW FONT".Y.A.. "(X TO EXIT WI
THOUT SAVING)";E$...B.RR.0:.E$."X".35...
F..I.1.MAX:.E$..F$(I)..:.2670.9.P.."..TH
ERE ALREADY IS A FONT CALLED ";E$.W.T..
"ARE YOU SURE YOU WANT TO ERASE":."THE O
LD ONE";Z$:RR.1...V..H(Z$,1).."Y".2620..
.Z.. 8000:. PF.1.2621.Q.N..".SAVING...":
. 8700:. PUT E$ IN MEMORY...S..12.4096.1
44:.".VERIFYING...".'.X..12.4096.192:ER.
B(13.4096.2):.ER..0..8300:.2620.N...ER.B
(13.4096.1):.ER..0..8300:.2620.L....(B(1
3.4096.3).16).0.2730......"VERIFY ERROR.
":.8000... ..2621. ....RR.1 . 35.Z....".
WAIT... ":.1000:I.MAX:.7050:F$(I).E$
:.7100:.35...... 4,4,5:.12.4096.256:.532
65,27:.53272,21......PZ$"PRINTING...".).
...PS.0.1.E.B..4,G(27)G(76)G(36)G(0);.R.
G.. RP.1.3.O.L..X9.0.8:BT.0:.Y9.PS.15.2.
..V.BT.BT.2.MT(X9,Y9):.Y9......4,G(BT);:
.X9......4,G(0)G(0)G(0);......RP.R....4,
G(27)"J"G(1)G(13);.Z....PS......4,G(10).
.... 4:.12.4096:.PC$......".";......Y.0.
3120.(.&..I.1.Y:.".";:.I.6.0..X.0.2170.P
.:..I.1.X:.".";:.I:.2170.{. ..PZ$;"....C
RSR.....KEYS - MOVE CURSOR".......12)" S
- SET POINT".......12)" R - RESET P
OINT".R.....12)" F1 - SAVE IMAGE"...H..
.12)" + - NEXT CHARACTER"...R...12)" -
- PREVIOUS CHAR".4.....12)" J - JUM
P TO A CHAR".R.....12)" P - PRINT IMAG
E".I.....12)" Q - QUIT".O.......X.I1.I
.1:F$(I).F$(I1):.I1.MAX.I.I1:.7000...B.M
AX.MAX.1:..F...I1.MAX:.MAX.0.I.1:.7070..
...I2.I1.1:F$(I2).F$(I1):.I1.I.I1.I1.1:.
7060.....F$(I)."":MAX.MAX.1:..0.... 15,8
,15:.15,"S0:FONTDIR": 15.J.F.. 1,8,2,"FO
NTDIR,S,W".R.P..1,G(MAX):.I.1.MAX:.1,F$(
I):.I: 1:....@.. TRY TO SCRATCH E$...J..
15,8,15...T.PF.0...^..15,"S0:F.";E$.H.H
..15,Z1,Z$,Z2,Z3.P.R. 15...|..Z1.1.Z2.1.
......PF.1:."SORRY, "E$" IS PROTECTED.".
3....V..4.."YOU MUST SAVE IT AS A NEW FO
NT".9.....T.L . ER.3.."VERIFY ERROR".S.V
. ER.5.."DISK NOT PRESENT".Y.. ....4!."
.ONE MOMENT..."...>!.....!. PUT E$ IN ME
M....".49392,C(E$).2.M..".I.1.C(E$).2...
.".49392.I,F(J("F.".E$,I,1))...$".:....(
#.".";...2#.J.0.15:.I.0.8.-.<#. MT(I,J).
0.."O";:.9040.9.F#.". .";.U.P#.I:.".":.J
:.".........".[.Z#..E..%.".";...!%.".FON
TS:.":.I.1.MAX:.F$(I),:.:....&%. ".FONT
TO ERASE (OR 'X')";E$...+%.E$."X".40...0
%.I.1.MAX:.E$..F$(I)..:.E$" DOES NOT EXI
ST...":.9510.. :%.".WAIT...":.8000:.PF.1
.9505.& D%. 7000:.7100.C N%. 1,8,2,"SELE
CTIONS,S,R"._ X%.I.1.8:.1,A$:S$(I).A$:..
F B% 1.. L%. 1,8,2,"@:SELECTIONS,S,W"..
V%.I.1.8:.S$(I).E$..1,"***":.9610.. .%.1
,S$(I).F .%.I: 1:.9500...
> CLICK IMAGE PREVIEW FOR FULL MODAL