FONTEDITOR
FILE INFORMATION
FILENAME(S): FONTEDITOR
FILE TYPE(S): PRG
FILE SIZE: 6.2K
FIRST SEEN: 2025-10-19 22:48:34
APPEARS ON: 2 disk(s)
FILE HASH
60674f8269e30ff2ee4f3235c853762c556da80a87ad89e685f63c78b75eb6d6
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MM UTILITY | FONTEDITOR | PRG | Radd Maxx | 17 | 5 | DOWNLOAD FILE |
| MM UTILITY | FONTEDITOR | PRG | Radd Maxx | 17 | 5 | 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 7F 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 30 A7 35 39 30 00 |$,3)):.A.10.590.|
00000680: 94 0E 62 02 8B 41 B3 31 34 A7 49 B2 41 AB 39 3A |..b..A.14.I.A.9:|
00000690: 89 36 34 30 00 A8 0E 6C 02 8B 41 B3 31 36 B0 41 |.640...l..A.16.A|
000006A0: B1 31 39 20 A7 35 39 30 00 B3 0E 76 02 49 B2 41 |.19 .590...v.I.A|
000006B0: AB 31 31 00 BE 0E 80 02 99 22 11 11 22 3B 00 E3 |.11......"..";..|
000006C0: 0E 8A 02 99 22 91 46 4F 4E 54 20 23 20 28 31 20 |....".FONT # (1 |
000006D0: 2D 22 3B C4 28 4D 41 58 AA 31 29 22 29 22 3B 3A |-";.(MAX.1)")";:|
000006E0: 85 5A 24 00 F8 0E 8F 02 8B C8 28 5A 24 2C 31 29 |.Z$.......(Z$,1)|
000006F0: B2 22 58 22 A7 35 37 30 00 09 0F 90 02 42 B2 C5 |."X".570.....B..|
00000700: 28 C8 28 5A 24 2C 33 29 29 00 21 0F 94 02 8B 42 |(.(Z$,3)).!....B|
00000710: B3 31 20 B0 20 42 B1 4D 41 58 AA 31 20 A7 36 35 |.1 . B.MAX.1 .65|
00000720: 30 00 46 0F 96 02 53 24 28 49 29 B2 46 24 28 42 |0.F...S$(I).F$(B|
00000730: 29 3A 8B 42 B2 4D 41 58 AA 31 A7 53 24 28 49 29 |):.B.MAX.1.S$(I)|
00000740: B2 22 2A 2A 2A 22 00 54 0F 97 02 43 48 B2 31 3A |."***".T...CH.1:|
00000750: 89 35 37 30 00 62 0F 99 02 8B 20 43 48 B2 30 A7 |.570.b.... CH.0.|
00000760: 34 30 00 78 0F 9B 02 99 22 11 4F 4E 45 20 4D 4F |40.x....".ONE MO|
00000770: 4D 45 4E 54 2E 2E 2E 22 00 97 0F 9E 02 9F 20 31 |MENT..."...... 1|
00000780: 2C 38 2C 32 2C 22 40 3A 53 45 4C 45 43 54 49 4F |,8,2,"@:SELECTIO|
00000790: 4E 53 2C 53 2C 57 22 00 AE 0F A8 02 81 4A B2 31 |NS,S,W"......J.1|
000007A0: A4 38 3A 98 31 2C 53 24 28 4A 29 3A 82 4A 00 B9 |.8:.1,S$(J):.J..|
000007B0: 0F B2 02 A0 31 3A 89 34 30 00 C7 0F 20 03 A0 20 |....1:.40... .. |
000007C0: 31 35 3A A0 31 3A 80 00 E1 0F E8 03 9F 20 31 2C |15:.1:....... 1,|
000007D0: 38 2C 32 2C 22 46 4F 4E 54 44 49 52 2C 53 2C 52 |8,2,"FONTDIR,S,R|
000007E0: 22 00 EE 0F ED 03 46 24 28 31 29 B2 22 22 00 08 |".....F$(1).""..|
000007F0: 10 F2 03 A1 23 31 2C 41 24 3A 4D 41 58 B2 C6 28 |....#1,A$:MAX..(|
00000800: 41 24 AA C7 28 30 29 29 00 18 10 FC 03 8B 4D 41 |A$..(0))......MA|
00000810: 58 B2 30 A7 31 30 35 30 00 25 10 06 04 81 49 B2 |X.0.1050.%....I.|
00000820: 31 A4 4D 41 58 00 35 10 10 04 84 31 2C 46 24 28 |1.MAX.5....1,F$(|
00000830: 49 29 3A 82 49 00 3E 10 1A 04 A0 31 3A 8E 00 52 |I):.I.>....1:..R|
00000840: 10 DC 05 99 22 11 48 49 54 20 41 4E 59 20 4B 45 |....".HIT ANY KE|
00000850: 59 22 00 66 10 E6 05 A1 5A 24 3A 8B 5A 24 B2 22 |Y".f....Z$:.Z$."|
00000860: 22 A7 31 35 31 30 00 6C 10 F0 05 8E 00 8F 10 D0 |".1510.l........|
00000870: 07 8B 20 55 46 B2 30 A7 55 46 B2 31 3A 4C 46 B2 |.. UF.0.UF.1:LF.|
00000880: 32 3A 93 20 22 53 50 4C 49 54 22 2C 38 2C 31 00 |2:. "SPLIT",8,1.|
00000890: 95 10 D1 07 8F 00 B7 10 D2 07 97 31 32 AC 34 30 |...........12.40|
000008A0: 39 36 AA 31 31 35 2C 30 3A 97 31 32 AC 34 30 39 |96.115,0:.12.409|
000008B0: 36 AA 31 31 36 2C 30 00 D1 10 D7 07 81 49 B2 31 |6.116,0......I.1|
000008C0: 34 39 31 32 A4 31 36 31 39 31 3A 97 49 2C 30 3A |4912.16191:.I,0:|
000008D0: 82 00 E5 10 DA 07 99 22 93 22 3B 3A 9E 20 31 32 |.......".";:. 12|
000008E0: AC 34 30 39 36 00 EF 10 DD 07 8D 34 30 30 30 00 |.4096......4000.|
000008F0: 09 11 DF 07 81 49 B2 31 38 36 34 A4 32 30 32 33 |.....I.1864.2023|
00000900: 3A 97 49 2C 31 36 30 3A 82 00 1B 11 E4 07 99 50 |:.I,160:.......P|
00000910: 5A 24 22 57 41 49 54 2E 2E 2E 22 00 51 11 E9 07 |Z$"WAIT...".Q...|
00000920: 81 50 B2 30 A4 31 3A 42 41 53 45 B2 33 32 37 36 |.P.0.1:BASE.3276|
00000930: 38 AA 4C 4F AC 39 AA 31 30 32 34 AC 50 3A 81 49 |8.LO.9.1024.P:.I|
00000940: B2 30 A4 38 3A 43 4C B2 C2 28 42 41 53 45 AA 49 |.0.8:CL..(BASE.I|
00000950: 29 00 86 11 F8 07 81 4A B2 50 AA 31 34 A4 30 A9 |)......J.P.14.0.|
00000960: AB 32 3A 4D 54 28 49 2C 4A 29 B2 28 43 4C 20 AF |.2:MT(I,J).(CL .|
00000970: 20 31 29 3A 43 4C B2 B5 28 43 4C AD 32 29 3A 82 | 1):CL..(CL.2):.|
00000980: 20 4A 2C 49 2C 50 00 91 11 20 08 8D 20 39 30 30 | J,I,P... .. 900|
00000990: 30 00 BE 11 2A 08 81 50 53 B2 30 A4 31 3A 50 39 |0...*..PS.0.1:P9|
000009A0: B2 38 AC 50 53 3A 42 41 53 45 B2 31 35 32 36 34 |.8.PS:BASE.15264|
000009B0: AA 33 32 30 AC 50 53 3A 81 49 B2 30 A4 37 00 F2 |.320.PS:.I.0.7..|
000009C0: 11 34 08 42 54 B2 30 3A 81 52 57 B2 30 A4 37 3A |.4.BT.0:.RW.0.7:|
000009D0: 42 54 B2 42 54 AC 32 AA 4D 54 28 52 57 2C 49 AA |BT.BT.2.MT(RW,I.|
000009E0: 50 39 29 3A 82 52 57 3A 97 42 41 53 45 AA 49 2C |P9):.RW:.BASE.I,|
000009F0: 42 54 00 15 12 3E 08 97 42 41 53 45 AA 38 AA 49 |BT...>..BASE.8.I|
00000A00: 2C 31 32 38 AC 4D 54 28 38 2C 49 AA 50 39 29 3A |,128.MT(8,I.P9):|
00000A10: 82 49 2C 50 53 00 43 12 5C 08 99 22 13 11 1D 1D |.I,PS.C.\.."....|
00000A20: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 41 53 43 49 49 3A |..........ASCII:|
00000A30: 20 20 20 20 20 20 9D 9D 9D 9D 9D 9D 22 3B 4C 4F | ......";LO|
00000A40: AA 33 32 00 7C 12 66 08 99 22 11 22 A3 31 32 29 |.32.|.f..".".12)|
00000A50: 22 43 48 41 52 3A 20 20 22 3B 3A 8B 4C 4F B1 36 |"CHAR: ";:.LO.6|
00000A60: 34 AF 4C 4F B3 39 31 A7 99 C7 28 4C 4F 29 3B 22 |4.LO.91...(LO);"|
00000A70: 20 28 4C 43 29 22 3A 89 32 31 35 35 00 92 12 68 | (LC)":.2155...h|
00000A80: 08 99 C7 28 4C 4F AA 33 32 29 3B 22 20 20 20 20 |...(LO.32);" |
00000A90: 20 22 00 9B 12 6B 08 99 50 43 24 00 AF 12 70 08 | "...k..PC$...p.|
00000AA0: 99 22 13 A6 9D 22 3B 3A 58 B2 30 3A 59 B2 30 00 |."...";:X.0:Y.0.|
00000AB0: C3 12 7A 08 A1 5A 24 3A 8B 5A 24 B2 22 22 A7 32 |..z..Z$:.Z$."".2|
00000AC0: 31 37 30 00 D1 12 7F 08 58 4F B2 30 3A 59 4F B2 |170.....XO.0:YO.|
00000AD0: 30 00 ED 12 84 08 8B 5A 24 B2 22 91 22 AF 59 B1 |0......Z$.".".Y.|
00000AE0: 30 A7 59 4F B2 AB 31 3A 89 32 33 30 30 00 0A 13 |0.YO..1:.2300...|
00000AF0: 8E 08 8B 5A 24 B2 22 11 22 AF 59 B3 31 35 A7 59 |...Z$.".".Y.15.Y|
00000B00: 4F B2 AA 31 3A 89 32 33 30 30 00 26 13 98 08 8B |O..1:.2300.&....|
00000B10: 5A 24 B2 22 1D 22 AF 58 B3 38 A7 58 4F B2 AA 31 |Z$.".".X.8.XO..1|
00000B20: 3A 89 32 33 30 30 00 42 13 A2 08 8B 5A 24 B2 22 |:.2300.B....Z$."|
00000B30: 9D 22 AF 58 B1 30 A7 58 4F B2 AB 31 3A 89 32 33 |.".X.0.XO..1:.23|
00000B40: 30 30 00 65 13 A7 08 8B 5A 24 B2 22 53 22 B0 5A |00.e....Z$."S".Z|
00000B50: 24 B2 22 D3 22 A7 4D 54 28 58 2C 59 29 B2 31 3A |$.".".MT(X,Y).1:|
00000B60: 89 32 33 33 30 00 88 13 AC 08 8B 5A 24 B2 22 52 |.2330......Z$."R|
00000B70: 22 B0 5A 24 B2 22 D2 22 A7 4D 54 28 58 2C 59 29 |".Z$.".".MT(X,Y)|
00000B80: B2 30 3A 89 32 33 33 30 00 99 13 B6 08 8B 5A 24 |.0:.2330......Z$|
00000B90: B2 22 85 22 A7 32 34 30 30 00 C4 13 C0 08 8B 5A |.".".2400......Z|
00000BA0: 24 B2 22 2B 22 A7 4C 4F B2 4C 4F AA 31 3A 4C 4F |$."+".LO.LO.1:LO|
00000BB0: B2 4C 4F AA 39 36 AC 28 4C 4F B1 39 35 29 3A 89 |.LO.96.(LO.95):.|
00000BC0: 32 30 32 30 00 EE 13 CA 08 8B 5A 24 B2 22 2D 22 |2020......Z$."-"|
00000BD0: A7 4C 4F B2 4C 4F AB 31 3A 4C 4F B2 4C 4F AB 39 |.LO.LO.1:LO.LO.9|
00000BE0: 36 AC 28 4C 4F B3 30 29 3A 89 32 30 32 30 00 FF |6.(LO.0):.2020..|
00000BF0: 13 D4 08 8B 5A 24 B2 22 4A 22 A7 32 35 30 30 00 |....Z$."J".2500.|
00000C00: 10 14 DE 08 8B 5A 24 B2 22 51 22 A7 32 36 30 30 |.....Z$."Q".2600|
00000C10: 00 22 14 E3 08 8B 20 5A 24 B2 22 50 22 A7 33 30 |.".... Z$."P".30|
00000C20: 30 30 00 2D 14 E8 08 89 20 32 31 37 30 00 4A 14 |00.-.... 2170.J.|
00000C30: FC 08 8B 20 4D 54 28 58 2C 59 29 B2 30 A7 99 22 |... MT(X,Y).0.."|
00000C40: CF 9D 22 3B 3A 89 32 33 32 30 00 57 14 06 09 99 |..";:.2320.W....|
00000C50: 22 12 20 92 9D 22 3B 00 79 14 10 09 58 B2 58 AA |". ..";.y...X.X.|
00000C60: 58 4F 3A 59 B2 59 AA 59 4F 3A 99 5A 24 3B 22 A6 |XO:Y.Y.YO:.Z$;".|
00000C70: 9D 22 3B 3A 89 32 31 37 30 00 99 14 1A 09 42 41 |.";:.2170.....BA|
00000C80: 53 45 B2 31 35 32 36 34 3A 8B 58 B2 38 A7 42 41 |SE.15264:.X.8.BA|
00000C90: 53 45 B2 42 41 53 45 AA 38 00 BC 14 1F 09 42 41 |SE.BASE.8.....BA|
00000CA0: 53 45 B2 42 41 53 45 AA 59 3A 8B 59 B1 37 A7 42 |SE.BASE.Y:.Y.7.B|
00000CB0: 41 53 45 B2 42 41 53 45 AA 33 31 32 00 D3 14 24 |ASE.BASE.312...$|
00000CC0: 09 42 54 B2 28 32 AE 28 37 AB 28 58 20 AF 20 37 |.BT.(2.(7.(X . 7|
00000CD0: 29 29 29 00 F4 14 2E 09 8B 4D 54 28 58 2C 59 29 |)))......MT(X,Y)|
00000CE0: B2 31 A7 97 42 41 53 45 2C C2 28 42 41 53 45 29 |.1..BASE,.(BASE)|
00000CF0: B0 20 42 54 00 1A 15 38 09 8B 4D 54 28 58 2C 59 |. BT...8..MT(X,Y|
00000D00: 29 B2 30 A7 97 42 41 53 45 2C C2 28 42 41 53 45 |).0..BASE,.(BASE|
00000D10: 29 AF 28 32 35 35 AB 42 54 29 00 25 15 42 09 89 |).(255.BT).%.B..|
00000D20: 20 32 31 37 30 00 3F 15 60 09 99 50 5A 24 22 53 | 2170.?.`..PZ$"S|
00000D30: 41 56 49 4E 47 20 49 4D 41 47 45 2E 2E 2E 22 00 |AVING IMAGE...".|
00000D40: 60 15 63 09 50 B2 B8 28 41 24 29 3A 8F 20 44 4F |`.c.P..(A$):. DO|
00000D50: 20 47 41 52 42 41 47 45 20 43 4F 4C 4C 45 43 54 | GARBAGE COLLECT|
00000D60: 00 76 15 65 09 42 41 53 45 B2 33 32 37 36 38 3A |.v.e.BASE.32768:|
00000D70: 81 50 B2 30 A4 31 00 90 15 6A 09 81 49 B2 30 A4 |.P.0.1...j..I.0.|
00000D80: 38 3A 42 54 B2 30 3A 81 4A B2 50 A4 31 35 A9 32 |8:BT.0:.J.P.15.2|
00000D90: 00 A7 15 74 09 42 54 B2 42 54 AC 32 AA 4D 54 28 |...t.BT.BT.2.MT(|
00000DA0: 49 2C 4A 29 3A 82 4A 00 C3 15 7E 09 97 20 42 41 |I,J):.J...~.. BA|
00000DB0: 53 45 AA 31 30 32 34 AC 50 AA 4C 4F AC 39 AA 49 |SE.1024.P.LO.9.I|
00000DC0: 2C 42 54 00 CD 15 88 09 82 20 49 2C 50 00 E9 15 |,BT...... I,P...|
00000DD0: 92 09 4C 4F B2 4C 4F AA 31 3A 8B 4C 4F B1 39 35 |..LO.LO.1:.LO.95|
00000DE0: A7 4C 4F B2 4C 4F AB 39 36 00 F2 15 97 09 99 50 |.LO.LO.96......P|
00000DF0: 43 24 00 FD 15 9C 09 89 20 32 30 32 30 00 13 16 |C$...... 2020...|
00000E00: C4 09 99 50 5A 24 22 43 48 41 52 41 43 54 45 52 |...PZ$"CHARACTER|
00000E10: 3F 22 3B 00 27 16 C9 09 A1 58 24 3A 8B 58 24 B2 |?";.'....X$:.X$.|
00000E20: 22 22 A7 32 35 30 35 00 30 16 CA 09 99 50 43 24 |"".2505.0....PC$|
00000E30: 00 4D 16 CE 09 5A B2 C6 28 58 24 29 3A 8B 5A B3 |.M...Z..(X$):.Z.|
00000E40: 33 32 A7 5A B2 33 32 3A 89 32 35 36 30 00 5D 16 |32.Z.32:.2560.].|
00000E50: D8 09 8B 20 5A B3 36 35 A7 32 35 36 30 00 75 16 |... Z.65.2560.u.|
00000E60: E2 09 8B 20 5A B3 39 31 A7 5A B2 5A AA 33 32 3A |... Z.91.Z.Z.32:|
00000E70: 89 32 35 36 30 00 85 16 E7 09 8B 20 5A B3 39 37 |.2560...... Z.97|
00000E80: A7 32 35 36 30 00 9E 16 EC 09 8B 20 5A B3 31 32 |.2560...... Z.12|
00000E90: 33 A7 5A B2 5A AB 33 32 3A 89 32 35 36 30 00 AF |3.Z.Z.32:.2560..|
00000EA0: 16 F1 09 8B 20 5A B3 31 32 38 A7 32 35 36 30 00 |.... Z.128.2560.|
00000EB0: CA 16 F6 09 8B 20 5A B3 31 39 33 20 B0 20 5A B1 |..... Z.193 . Z.|
00000EC0: 32 31 38 20 A7 20 32 35 30 30 00 D6 16 FB 09 5A |218 . 2500.....Z|
00000ED0: B2 5A AB 31 32 38 00 E9 16 00 0A 4C 4F B2 5A AB |.Z.128.....LO.Z.|
00000EE0: 33 32 3A 89 20 32 30 32 30 00 14 17 28 0A 9E 20 |32:. 2020...(.. |
00000EF0: 31 32 AC 34 30 39 36 AA 32 35 36 3A 97 35 33 32 |12.4096.256:.532|
00000F00: 36 35 2C 32 37 3A 99 22 93 22 3A 97 35 33 32 37 |65,27:.".":.5327|
00000F10: 32 2C 32 31 00 23 17 32 0A 8B 56 B3 B1 32 A7 32 |2,21.#.2..V..2.2|
00000F20: 36 32 30 00 5C 17 34 0A 99 20 22 44 4F 20 59 4F |620.\.4.. "DO YO|
00000F30: 55 20 57 41 4E 54 20 54 4F 20 52 45 2D 53 41 56 |U WANT TO RE-SAV|
00000F40: 45 20 22 3B 45 24 3A 99 22 20 57 49 54 48 20 43 |E ";E$:." WITH C|
00000F50: 48 41 4E 47 45 53 22 3B 3A 85 5A 24 00 79 17 36 |HANGES";:.Z$.y.6|
00000F60: 0A 8B 20 C8 28 5A 24 2C 31 29 B2 22 59 22 A7 52 |.. .(Z$,1)."Y".R|
00000F70: 52 B2 31 3A 89 32 36 35 30 00 82 17 38 0A 89 20 |R.1:.2650...8.. |
00000F80: 33 35 00 8C 17 3C 0A 99 22 93 22 3B 00 B6 17 3D |35...<..".";...=|
00000F90: 0A 99 20 22 57 48 41 54 20 49 53 20 54 48 45 20 |.. "WHAT IS THE |
00000FA0: 4E 41 4D 45 20 4F 46 20 54 48 49 53 20 4E 45 57 |NAME OF THIS NEW|
00000FB0: 20 46 4F 4E 54 22 00 DC 17 41 0A 85 20 22 28 58 | FONT"...A.. "(X|
00000FC0: 20 54 4F 20 45 58 49 54 20 57 49 54 48 4F 55 54 | TO EXIT WITHOUT|
00000FD0: 20 53 41 56 49 4E 47 29 22 3B 45 24 00 F0 17 42 | SAVING)";E$...B|
00000FE0: 0A 52 52 B2 30 3A 8B 45 24 B2 22 58 22 A7 33 35 |.RR.0:.E$."X".35|
00000FF0: 00 10 18 46 0A 81 49 B2 31 A4 4D 41 58 3A 8B 45 |...F..I.1.MAX:.E|
00001000: 24 B3 B1 46 24 28 49 29 A7 82 3A 89 32 36 37 30 |$..F$(I)..:.2670|
00001010: 00 3C 18 50 0A 99 22 11 11 54 48 45 52 45 20 41 |.<.P.."..THERE A|
00001020: 4C 52 45 41 44 59 20 49 53 20 41 20 46 4F 4E 54 |LREADY IS A FONT|
00001030: 20 43 41 4C 4C 45 44 20 22 3B 45 24 00 7A 18 54 | CALLED ";E$.z.T|
00001040: 0A 99 20 22 41 52 45 20 59 4F 55 20 53 55 52 45 |.. "ARE YOU SURE|
00001050: 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 45 52 41 | YOU WANT TO ERA|
00001060: 53 45 22 3A 85 22 54 48 45 20 4F 4C 44 20 4F 4E |SE":."THE OLD ON|
00001070: 45 22 3B 5A 24 3A 52 52 B2 31 00 91 18 56 0A 8B |E";Z$:RR.1...V..|
00001080: C8 28 5A 24 2C 31 29 B3 B1 22 59 22 A7 32 36 32 |.(Z$,1).."Y".262|
00001090: 30 00 A8 18 5A 0A 8D 20 38 30 30 30 3A 8B 20 50 |0...Z.. 8000:. P|
000010A0: 46 B2 31 A7 32 36 32 31 00 D4 18 6E 0A 99 22 11 |F.1.2621...n..".|
000010B0: 53 41 56 49 4E 47 2E 2E 2E 22 3A 8D 20 38 37 30 |SAVING...":. 870|
000010C0: 30 3A 8F 20 50 55 54 20 45 24 20 49 4E 20 4D 45 |0:. PUT E$ IN ME|
000010D0: 4D 4F 52 59 00 F6 18 73 0A 9E 31 32 AC 34 30 39 |MORY...s..12.409|
000010E0: 36 AA 31 34 34 3A 99 22 91 56 45 52 49 46 59 49 |6.144:.".VERIFYI|
000010F0: 4E 47 2E 2E 2E 22 00 2A 19 78 0A 9E 31 32 AC 34 |NG...".*.x..12.4|
00001100: 30 39 36 AA 31 39 32 3A 45 52 B2 C2 28 31 33 AC |096.192:ER..(13.|
00001110: 34 30 39 36 AB 32 29 3A 8B 45 52 B3 B1 30 A7 8D |4096.2):.ER..0..|
00001120: 38 33 30 30 3A 89 32 36 32 30 00 51 19 82 0A 45 |8300:.2620.Q...E|
00001130: 52 B2 C2 28 31 33 AC 34 30 39 36 AB 31 29 3A 8B |R..(13.4096.1):.|
00001140: 45 52 B3 B1 30 A7 8D 38 33 30 30 3A 89 32 36 32 |ER..0..8300:.262|
00001150: 30 00 6F 19 8C 0A 8B 28 C2 28 31 33 AC 34 30 39 |0.o....(.(13.409|
00001160: 36 AB 33 29 AF 31 36 29 B2 30 A7 32 37 33 30 00 |6.3).16).0.2730.|
00001170: 8A 19 96 0A 99 22 56 45 52 49 46 59 20 45 52 52 |....."VERIFY ERR|
00001180: 4F 52 2E 22 3A 8D 38 30 30 30 00 94 19 A0 0A 89 |OR.":.8000......|
00001190: 32 36 32 31 00 A3 19 AA 0A 8B 52 52 B2 31 20 A7 |2621......RR.1 .|
000011A0: 20 33 35 00 D7 19 B4 0A 99 22 91 57 41 49 54 2E | 35......".WAIT.|
000011B0: 2E 2E 20 20 20 20 20 22 3A 49 B2 4D 41 58 3A 8D |.. ":I.MAX:.|
000011C0: 37 30 35 30 3A 46 24 28 49 29 B2 45 24 3A 8D 37 |7050:F$(I).E$:.7|
000011D0: 31 30 30 3A 89 33 35 00 04 1A B8 0B 9F 20 34 2C |100:.35...... 4,|
000011E0: 34 2C 35 3A 9E 31 32 AC 34 30 39 36 AA 32 35 36 |4,5:.12.4096.256|
000011F0: 3A 97 35 33 32 36 35 2C 32 37 3A 97 35 33 32 37 |:.53265,27:.5327|
00001200: 32 2C 32 31 00 1A 1A B9 0B 99 50 5A 24 22 50 52 |2,21......PZ$"PR|
00001210: 49 4E 54 49 4E 47 2E 2E 2E 22 00 26 1A BD 0B 81 |INTING...".&....|
00001220: 50 53 B2 30 A4 31 00 42 1A C2 0B 98 34 2C C7 28 |PS.0.1.B....4,.(|
00001230: 32 37 29 C7 28 37 36 29 C7 28 33 36 29 C7 28 30 |27).(76).(36).(0|
00001240: 29 3B 00 4F 1A C7 0B 81 20 52 50 B2 31 A4 33 00 |);.O.... RP.1.3.|
00001250: 6C 1A CC 0B 81 58 39 B2 30 A4 38 3A 42 54 B2 30 |l....X9.0.8:BT.0|
00001260: 3A 81 59 39 B2 50 53 A4 31 35 A9 32 00 86 1A D6 |:.Y9.PS.15.2....|
00001270: 0B 42 54 B2 42 54 AC 32 AA 4D 54 28 58 39 2C 59 |.BT.BT.2.MT(X9,Y|
00001280: 39 29 3A 82 59 39 00 98 1A E0 0B 98 34 2C C7 28 |9):.Y9......4,.(|
00001290: 42 54 29 3B 3A 82 58 39 00 AD 1A E5 0B 98 34 2C |BT);:.X9......4,|
000012A0: C7 28 30 29 C7 28 30 29 C7 28 30 29 3B 00 B5 1A |.(0).(0).(0);...|
000012B0: E7 0B 82 52 50 00 CF 1A EA 0B 98 34 2C C7 28 32 |...RP......4,.(2|
000012C0: 37 29 22 4A 22 C7 28 31 29 C7 28 31 33 29 3B 00 |7)"J".(1).(13);.|
000012D0: D7 1A F4 0B 82 50 53 00 E4 1A FE 0B 98 34 2C C7 |.....PS......4,.|
000012E0: 28 31 30 29 00 F9 1A 08 0C A0 34 3A 9E 31 32 AC |(10)......4:.12.|
000012F0: 34 30 39 36 3A 99 50 43 24 00 03 1B 12 0C 99 22 |4096:.PC$......"|
00001300: 13 22 3B 00 11 1B 1C 0C 8B 59 B2 30 A7 33 31 32 |.";......Y.0.312|
00001310: 30 00 25 1B 26 0C 81 49 B2 31 A4 59 3A 99 22 11 |0.%.&..I.1.Y:.".|
00001320: 22 3B 3A 82 49 00 33 1B 30 0C 8B 58 B2 30 A7 32 |";:.I.3.0..X.0.2|
00001330: 31 37 30 00 4D 1B 3A 0C 81 49 B2 31 A4 58 3A 99 |170.M.:..I.1.X:.|
00001340: 22 1D 22 3B 3A 82 49 3A 89 32 31 37 30 00 78 1B |".";:.I:.2170.x.|
00001350: A0 0F 99 50 5A 24 3B 22 11 11 11 11 43 52 53 52 |...PZ$;"....CRSR|
00001360: 11 9D 9D 9D 9D 4B 45 59 53 20 2D 20 4D 4F 56 45 |.....KEYS - MOVE|
00001370: 20 43 55 52 53 4F 52 22 00 94 1B AA 0F 99 A3 31 | CURSOR".......1|
00001380: 32 29 22 20 53 20 20 20 2D 20 53 45 54 20 50 4F |2)" S - SET PO|
00001390: 49 4E 54 22 00 B2 1B B4 0F 99 A3 31 32 29 22 20 |INT".......12)" |
000013A0: 52 20 20 20 2D 20 52 45 53 45 54 20 50 4F 49 4E |R - RESET POIN|
000013B0: 54 22 00 CF 1B BE 0F 99 A3 31 32 29 22 20 46 31 |T".......12)" F1|
000013C0: 20 20 2D 20 53 41 56 45 20 49 4D 41 47 45 22 00 | - SAVE IMAGE".|
000013D0: F0 1B C8 0F 99 A3 31 32 29 22 20 2B 20 20 20 2D |......12)" + -|
000013E0: 20 4E 45 58 54 20 43 48 41 52 41 43 54 45 52 22 | NEXT CHARACTER"|
000013F0: 00 10 1C D2 0F 99 A3 31 32 29 22 20 2D 20 20 20 |.......12)" - |
00001400: 2D 20 50 52 45 56 49 4F 55 53 20 43 48 41 52 22 |- PREVIOUS CHAR"|
00001410: 00 31 1C DC 0F 99 A3 31 32 29 22 20 4A 20 20 20 |.1.....12)" J |
00001420: 2D 20 4A 55 4D 50 20 54 4F 20 41 20 43 48 41 52 |- JUMP TO A CHAR|
00001430: 22 00 4F 1C E6 0F 99 A3 31 32 29 22 20 50 20 20 |".O.....12)" P |
00001440: 20 2D 20 50 52 49 4E 54 20 49 4D 41 47 45 22 00 | - PRINT IMAGE".|
00001450: 66 1C F0 0F 99 A3 31 32 29 22 20 51 20 20 20 2D |f.....12)" Q -|
00001460: 20 51 55 49 54 22 00 6C 1C FA 0F 8E 00 97 1C 58 | QUIT".l.......X|
00001470: 1B 49 31 B2 49 AA 31 3A 46 24 28 49 29 B2 46 24 |.I1.I.1:F$(I).F$|
00001480: 28 49 31 29 3A 8B 49 31 B3 4D 41 58 A7 49 B2 49 |(I1):.I1.MAX.I.I|
00001490: 31 3A 89 37 30 30 30 00 A7 1C 62 1B 4D 41 58 B2 |1:.7000...b.MAX.|
000014A0: 4D 41 58 AB 31 3A 8E 00 B2 1C 8A 1B 49 31 B2 4D |MAX.1:......I1.M|
000014B0: 41 58 00 E0 1C 94 1B 49 32 B2 49 31 AA 31 3A 46 |AX.....I2.I1.1:F|
000014C0: 24 28 49 32 29 B2 46 24 28 49 31 29 3A 8B 49 31 |$(I2).F$(I1):.I1|
000014D0: B1 49 A7 49 31 B2 49 31 AB 31 3A 89 37 30 36 30 |.I.I1.I1.1:.7060|
000014E0: 00 F9 1C 9E 1B 46 24 28 49 29 B2 22 22 3A 4D 41 |.....F$(I)."":MA|
000014F0: 58 B2 4D 41 58 AA 31 3A 8E 00 1C 1D BC 1B 9F 20 |X.MAX.1:....... |
00001500: 31 35 2C 38 2C 31 35 3A 98 31 35 2C 22 53 30 3A |15,8,15:.15,"S0:|
00001510: 46 4F 4E 54 44 49 52 22 3A A0 31 35 00 36 1D C6 |FONTDIR":.15.6..|
00001520: 1B 9F 20 31 2C 38 2C 32 2C 22 46 4F 4E 54 44 49 |.. 1,8,2,"FONTDI|
00001530: 52 2C 53 2C 57 22 00 5E 1D D0 1B 98 31 2C C7 28 |R,S,W".^....1,.(|
00001540: 4D 41 58 29 3A 81 49 B2 31 A4 4D 41 58 3A 98 31 |MAX):.I.1.MAX:.1|
00001550: 2C 46 24 28 49 29 3A 82 49 3A A0 31 3A 8E 00 76 |,F$(I):.I:.1:..v|
00001560: 1D 40 1F 8F 20 54 52 59 20 54 4F 20 53 43 52 41 |.@.. TRY TO SCRA|
00001570: 54 43 48 20 45 24 00 84 1D 4A 1F 9F 20 31 35 2C |TCH E$...J.. 15,|
00001580: 38 2C 31 35 00 8D 1D 54 1F 50 46 B2 30 00 A0 1D |8,15...T.PF.0...|
00001590: 5E 1F 98 31 35 2C 22 53 30 3A 46 2E 22 3B 45 24 |^..15,"S0:F.";E$|
000015A0: 00 B4 1D 68 1F 84 31 35 2C 5A 31 2C 5A 24 2C 5A |...h..15,Z1,Z$,Z|
000015B0: 32 2C 5A 33 00 BC 1D 72 1F A0 31 35 00 CD 1D 7C |2,Z3...r..15...||
000015C0: 1F 8B 5A 31 B2 31 AF 5A 32 B2 31 A7 8E 00 F3 1D |..Z1.1.Z2.1.....|
000015D0: 86 1F 50 46 B2 31 3A 99 22 53 4F 52 52 59 2C 20 |..PF.1:."SORRY, |
000015E0: 22 45 24 22 20 49 53 20 50 52 4F 54 45 43 54 45 |"E$" IS PROTECTE|
000015F0: 44 2E 22 00 1F 1E 8B 1F 8B 56 B3 B1 34 A7 99 22 |D."......V..4.."|
00001600: 59 4F 55 20 4D 55 53 54 20 53 41 56 45 20 49 54 |YOU MUST SAVE IT|
00001610: 20 41 53 20 41 20 4E 45 57 20 46 4F 4E 54 22 00 | AS A NEW FONT".|
00001620: 25 1E 90 1F 8E 00 40 1E 6C 20 8B 20 45 52 B2 33 |%.....@.l . ER.3|
00001630: A7 99 22 56 45 52 49 46 59 20 45 52 52 4F 52 22 |.."VERIFY ERROR"|
00001640: 00 5F 1E 76 20 8B 20 45 52 B2 35 A7 99 22 44 49 |._.v . ER.5.."DI|
00001650: 53 4B 20 4E 4F 54 20 50 52 45 53 45 4E 54 22 00 |SK NOT PRESENT".|
00001660: 65 1E 80 20 8E 00 7B 1E 34 21 99 22 11 4F 4E 45 |e.. ..{.4!.".ONE|
00001670: 20 4D 4F 4D 45 4E 54 2E 2E 2E 22 00 81 1E 3E 21 | MOMENT..."...>!|
00001680: 8E 00 95 1E FC 21 8F 20 50 55 54 20 45 24 20 49 |.....!. PUT E$ I|
00001690: 4E 20 4D 45 4D 00 A8 1E 06 22 97 34 39 33 39 32 |N MEM....".49392|
000016A0: 2C C3 28 45 24 29 AA 32 00 B9 1E 10 22 81 49 B2 |,.(E$).2....".I.|
000016B0: 31 A4 C3 28 45 24 29 AA 32 00 D8 1E 1A 22 97 34 |1..(E$).2....".4|
000016C0: 39 33 39 32 AA 49 2C C6 28 CA 28 22 46 2E 22 AA |9392.I,.(.("F.".|
000016D0: 45 24 2C 49 2C 31 29 29 00 E0 1E 24 22 82 3A 8E |E$,I,1))...$".:.|
000016E0: 00 EA 1E 28 23 99 22 13 22 3B 00 FD 1E 32 23 81 |...(#.".";...2#.|
000016F0: 4A B2 30 A4 31 35 3A 81 49 B2 30 A4 38 00 19 1F |J.0.15:.I.0.8...|
00001700: 3C 23 8B 20 4D 54 28 49 2C 4A 29 B2 30 A7 99 22 |<#. MT(I,J).0.."|
00001710: CF 22 3B 3A 89 39 30 34 30 00 25 1F 46 23 99 22 |.";:.9040.%.F#."|
00001720: 12 20 92 22 3B 00 41 1F 50 23 82 49 3A 99 22 B4 |. .";.A.P#.I:.".|
00001730: 22 3A 82 4A 3A 99 22 B7 B7 B7 B7 B7 B7 B7 B7 B7 |":.J:.".........|
00001740: 22 00 47 1F 5A 23 8E 00 51 1F 1C 25 99 22 93 22 |".G.Z#..Q..%."."|
00001750: 3B 00 76 1F 21 25 99 22 13 46 4F 4E 54 53 3A 11 |;.v.!%.".FONTS:.|
00001760: 22 3A 81 49 B2 31 A4 4D 41 58 3A 99 46 24 28 49 |":.I.1.MAX:.F$(I|
00001770: 29 2C 3A 82 3A 99 00 99 1F 26 25 85 20 22 11 46 |),:.:....&%. ".F|
00001780: 4F 4E 54 20 54 4F 20 45 52 41 53 45 20 28 4F 52 |ONT TO ERASE (OR|
00001790: 20 27 58 27 29 22 3B 45 24 00 A8 1F 2B 25 8B 45 | 'X')";E$...+%.E|
000017A0: 24 B2 22 58 22 A7 34 30 00 E0 1F 30 25 81 49 B2 |$."X".40...0%.I.|
000017B0: 31 A4 4D 41 58 3A 8B 45 24 B3 B1 46 24 28 49 29 |1.MAX:.E$..F$(I)|
000017C0: A7 82 3A 99 45 24 22 20 44 4F 45 53 20 4E 4F 54 |..:.E$" DOES NOT|
000017D0: 20 45 58 49 53 54 91 91 91 22 3A 89 39 35 31 30 | EXIST...":.9510|
000017E0: 00 01 20 3A 25 99 22 11 57 41 49 54 2E 2E 2E 22 |.. :%.".WAIT..."|
000017F0: 3A 8D 38 30 30 30 3A 8B 50 46 B2 31 A7 39 35 30 |:.8000:.PF.1.950|
00001800: 35 00 12 20 44 25 8D 20 37 30 30 30 3A 8D 37 31 |5.. D%. 7000:.71|
00001810: 30 30 00 2F 20 4E 25 9F 20 31 2C 38 2C 32 2C 22 |00./ N%. 1,8,2,"|
00001820: 53 45 4C 45 43 54 49 4F 4E 53 2C 53 2C 52 22 00 |SELECTIONS,S,R".|
00001830: 4B 20 58 25 81 49 B2 31 A4 38 3A 84 31 2C 41 24 |K X%.I.1.8:.1,A$|
00001840: 3A 53 24 28 49 29 B2 41 24 3A 82 00 52 20 62 25 |:S$(I).A$:..R b%|
00001850: A0 31 00 71 20 6C 25 9F 20 31 2C 38 2C 32 2C 22 |.1.q l%. 1,8,2,"|
00001860: 40 3A 53 45 4C 45 43 54 49 4F 4E 53 2C 53 2C 57 |@:SELECTIONS,S,W|
00001870: 22 00 95 20 76 25 81 49 B2 31 A4 38 3A 8B 53 24 |".. v%.I.1.8:.S$|
00001880: 28 49 29 B2 45 24 A7 98 31 2C 22 2A 2A 2A 22 3A |(I).E$..1,"***":|
00001890: 89 39 36 31 30 00 A2 20 80 25 98 31 2C 53 24 28 |.9610.. .%.1,S$(|
000018A0: 49 29 00 B2 20 8A 25 82 49 3A A0 31 3A 89 39 35 |I).. .%.I:.1:.95|
000018B0: 30 30 00 00 00 |00... |
....... >>> 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.10.590...B..A.14.I.A.9:
.640...L..A.16.A.19 .590...V.I.A.11.....
."..";......".FONT # (1 -";D(MAX.1)")";:
.Z$......H(Z$,1)."X".570.....B.E(H(Z$,3)
).!....B.1 . B.MAX.1 .650.F...S$(I).F$(B
):.B.MAX.1.S$(I)."***".T...CH.1:.570.B..
.. CH.0.40.X....".ONE MOMENT..."...... 1
,8,2,"@:SELECTIONS,S,W"......J.1.8:.1,S$
(J):.J..... 1:.40.G. . 15: 1:....... 1,
8,2,"FONTDIR,S,R".....F$(1).""......#1,A
$:MAX.F(A$.G(0))......MAX.0.1050.%....I.
1.MAX.5....1,F$(I):.I.>... 1:..R....".HI
T ANY KEY".F....Z$:.Z$."".1510.L.......P
.. UF.0.UF.1:LF.2:. "SPLIT",8,1...Q.....
R..12.4096.115,0:.12.4096.116,0.Q.W..I.1
4912.16191:.I,0:....Z..".";:. 12.4096...
...4000......I.1864.2023:.I,160:.......P
Z$"WAIT...".Q....P.0.1:BASE.32768.LO.9.1
024.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
.320.PS:.I.0.7...4.BT.0:.RW.0.7:BT.BT.2.
MT(RW,I.P9):.RW:.BASE.I,BT...>..BASE.8.I
,128.MT(8,I.P9):.I,PS.C.\.."............
..ASCII: ......";LO.32.|.F..".".12)
"CHAR: ";:.LO.64.LO.91..G(LO);" (LC)":.
2155...H..G(LO.32);" "...K..PC$...P.
."...";:X.0:Y.0.C.Z..Z$:.Z$."".2170.Q..
XO.0:YO.0......Z$.".".Y.0.YO..1:.2300...
...Z$.".".Y.15.YO..1:.2300.&....Z$.".".X
.8.XO..1:.2300.B....Z$.".".X.0.XO..1:.23
00.E....Z$."S".Z$."S".MT(X,Y).1:.2330...
...Z$."R".Z$."R".MT(X,Y).0:.2330......Z$
.".".2400.D....Z$."+".LO.LO.1:LO.LO.96.(
LO.95):.2020...J..Z$."-".LO.LO.1:LO.LO.9
6.(LO.0):.2020...T..Z$."J".2500......Z$.
"Q".2600.".... Z$."P".3000.-.... 2170.J.
... MT(X,Y).0.."O.";:.2320.W....". ..";.
Y...X.X.XO:Y.Y.YO:.Z$;"..";:.2170.....BA
SE.15264:.X.8.BASE.BASE.8.....BASE.BASE.
Y:.Y.7.BASE.BASE.312.S.$.BT.(2.(7.(X . 7
)))......MT(X,Y).1..BASE,B(BASE). BT...8
..MT(X,Y).0..BASE,B(BASE).(255.BT).%.B..
2170.?.`..PZ$"SAVING IMAGE...".`.C.P..(
A$):. DO GARBAGE COLLECT.V.E.BASE.32768:
.P.0.1...J..I.0.8:BT.0:.J.P.15.2...T.BT.
BT.2.MT(I,J):.J.C.~.. BASE.1024.P.LO.9.I
,BT.M.... I,P.....LO.LO.1:.LO.95.LO.LO.9
6......PC$...... 2020...D..PZ$"CHARACTER
?";.'.I..X$:.X$."".2505.0.J..PC$.M.N.Z.F
(X$):.Z.32.Z.32:.2560.].X.. Z.65.2560.U.
... Z.91.Z.Z.32:.2560...... Z.97.2560...
... Z.123.Z.Z.32:.2560...... Z.128.2560.
J.... Z.193 . Z.218 . 2500.V...Z.Z.128..
...LO.Z.32:. 2020...(.. 12.4096.256:.532
65,27:.".":.53272,21.#.2..V..2.2620.\.4.
. "DO YOU WANT TO RE-SAVE ";E$:." WITH C
HANGES";:.Z$.Y.6.. H(Z$,1)."Y".RR.1:.265
0...8.. 35...<..".";...=.. "WHAT IS THE
NAME OF THIS NEW FONT"...A.. "(X TO EXIT
WITHOUT SAVING)";E$...B.RR.0:.E$."X".35
...F..I.1.MAX:.E$..F$(I)..:.2670.<.P..".
.THERE ALREADY IS A FONT CALLED ";E$.Z.T
.. "ARE YOU SURE YOU WANT TO ERASE":."TH
E OLD ONE";Z$:RR.1...V..H(Z$,1).."Y".262
0...Z.. 8000:. PF.1.2621.T.N..".SAVING..
.":. 8700:. PUT E$ IN MEMORY...S..12.409
6.144:.".VERIFYING...".*.X..12.4096.192:
ER.B(13.4096.2):.ER..0..8300:.2620.Q...E
R.B(13.4096.1):.ER..0..8300:.2620.O....(
B(13.4096.3).16).0.2730......"VERIFY ERR
OR.":.8000... ..2621......RR.1 . 35.W...
.".WAIT... ":I.MAX:.7050:F$(I).E$:.7
100:.35...... 4,4,5:.12.4096.256:.53265,
27:.53272,21......PZ$"PRINTING...".&....
PS.0.1.B.B..4,G(27)G(76)G(36)G(0);.O.G..
RP.1.3.L.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.O....4,G(2
7)"J"G(1)G(13);.W....PS......4,G(10)....
. 4:.12.4096:.PC$......".";......Y.0.312
0.%.&..I.1.Y:.".";:.I.3.0..X.0.2170.M.:.
.I.1.X:.".";:.I:.2170.X. ..PZ$;"....CRSR
.....KEYS - MOVE CURSOR".......12)" S
- SET POINT".......12)" R - RESET POIN
T".O.....12)" F1 - SAVE IMAGE"...H...12
)" + - NEXT CHARACTER"...R...12)" -
- PREVIOUS CHAR".1.....12)" J - JUMP T
O A CHAR".O.....12)" P - PRINT IMAGE".
F.....12)" Q - QUIT".L.......X.I1.I.1:
F$(I).F$(I1):.I1.MAX.I.I1:.7000...B.MAX.
MAX.1:......I1.MAX.....I2.I1.1:F$(I2).F$
(I1):.I1.I.I1.I1.1:.7060.....F$(I)."":MA
X.MAX.1:....... 15,8,15:.15,"S0:FONTDIR"
: 15.6.F.. 1,8,2,"FONTDIR,S,W".^.P..1,G(
MAX):.I.1.MAX:.1,F$(I):.I: 1:..V.@.. TRY
TO SCRATCH E$...J.. 15,8,15...T.PF.0. .
^..15,"S0:F.";E$...H..15,Z1,Z$,Z2,Z3...R
. 15.M.|..Z1.1.Z2.1.......PF.1:."SORRY,
"E$" IS PROTECTED."......V..4.."YOU MUST
SAVE IT AS A NEW FONT".%.....@.L . ER.3
.."VERIFY ERROR"._.V . ER.5.."DISK NOT P
RESENT".E.. ..{.4!.".ONE MOMENT..."...>!
.....!. PUT E$ IN MEM....".49392,C(E$).2
....".I.1.C(E$).2.X..".49392.I,F(J("F.".
E$,I,1))...$".:....(#.".";...2#.J.0.15:.
I.0.8...<#. MT(I,J).0.."O";:.9040.%.F#."
. .";.A.P#.I:.".":.J:.".........".G.Z#..
Q..%.".";.V.!%.".FONTS:.":.I.1.MAX:.F$(I
),:.:....&%. ".FONT TO ERASE (OR 'X')";E
$...+%.E$."X".40...0%.I.1.MAX:.E$..F$(I)
..:.E$" DOES NOT EXIST...":.9510.. :%.".
WAIT...":.8000:.PF.1.9505.. D%. 7000:.71
00./ N%. 1,8,2,"SELECTIONS,S,R".K X%.I.1
.8:.1,A$:S$(I).A$:..R B% 1.Q L%. 1,8,2,"
@:SELECTIONS,S,W".. V%.I.1.8:.S$(I).E$..
1,"***":.9610.. .%.1,S$(I).. .%.I: 1:.95
00...
> CLICK IMAGE PREVIEW FOR FULL MODAL