Re: A86: Fonts

[Prev][Next][Index][Thread]

Re: A86: Fonts

John Balsan wrote:
> 
> Okay, I have been on vacation for the past week, so I don't know if this
> has been discussed or not.  First, these font programs.  I have run
> FatFont and am completely clueless to what this program is supposed to
> do.  The only time that I see the font is after I install it, and then
> go to unistall it.  Please explain to me what I am doing wrong.  Second,
> after I get this working I would like to write some of my own, how do I
> go about doing this?  TIA
> 
> ~John

someone mailed me with the same problem and i have no idea why this
happens, so far you have been the only two that i have heard from about
this 'feature'. what version rom does your 86 have? i think that maybe
this might be part (if not all) of the problem...i enclosed the source
to FAT font.
-- 
ZzZzZ eEeEe BbBb  EeEeE eEeEe dDdD   oOo   OoO  tTtTt
   Z  E     b   B e     E     D   d O   O o   o   T
  z   eEe   BbBb  EeE   eEe   d   D o   o O   O   t
 Z    E     b   B e     E     D   d O   O o   o   T
zZzZz eEeEe BbBb  EeEeE eEeEe dDdD   oOo   OoO    t

#include "asm86.h"
#INCLUDE "TI86ASM.INC"

.org $D748

        call _clrLCD    ;display the menu at
        ld hl,$0000     ;0,0 on homescreen
        ld (_curRow),hl ;|
        ld hl,menu      ;|
        call _puts      ;V
key:
        halt            
        call $5371      ;check the keys for
        cp 0            ;no key press
        jr z,key
        cp 34           ;1
        jr z,in
        cp 26           ;2
        jr z,ui
        cp 55           ;EXIT
        jr nz,key
        ret z           ;return to TI-OS
in:
        ld a,0          ;set up font pointer
        ld ($D2ED),a    ;|
        ld hl,Font      ;|
        ld ($D2EE),hl   ;V

        set 0,(IY+$23)  ;set the font to your font
        ret z
ui:
        res 0,(IY+$23)  ;restore the font to regular
        ret z

menu:   .db "1. INSTALL FAT FONT  "
        .db "2. UNINSTALL FAT FONT"
        .db "EXIT                  ",0

Font:
.db $6F ;must have this here!
.db 88 ;number of chars in your font

.db 'A'
.db 01110b
.db 11011b
.db 11011b
.db 11111b
.db 11011b
.db 11011b
.db 11011b

.db 'B'
.db 11110b
.db 11011b
.db 11001b
.db 11110b
.db 11001b
.db 11011b
.db 11110b

.db 'C'
.db 01110b
.db 11011b
.db 11011b
.db 11000b
.db 11011b
.db 11011b
.db 01110b

.db 'D'
.db 11110b
.db 11011b
.db 11011b
.db 11011b
.db 11011b
.db 11011b
.db 11110b

.db 'E'
.db 11111b
.db 11111b
.db 11000b
.db 11111b
.db 11000b
.db 11111b
.db 11111b

.db 'F'
.db 11111b
.db 11111b
.db 11000b
.db 11110b
.db 11000b
.db 11000b
.db 11000b

.db 'G'
.db 01110b
.db 11011b
.db 11000b
.db 11111b
.db 11011b
.db 11011b
.db 01110b

.db 'H'
.db 11011b
.db 11011b
.db 11011b
.db 11111b
.db 11011b
.db 11011b
.db 11011b

.db 'I'
.db 11111b
.db 11111b
.db 01110b
.db 01110b
.db 01110b
.db 11111b
.db 11111b

.db 'J'
.db 11111b
.db 11111b
.db 00011b
.db 00011b
.db 11011b
.db 11011b
.db 01110b

.db 'K'
.db 11011b
.db 11011b
.db 11010b
.db 11100b
.db 11010b
.db 11011b
.db 11011b

.db 'L'
.db 11000b
.db 11000b
.db 11000b
.db 11000b
.db 11000b
.db 11111b
.db 11111b

.db 'M'
.db 10001b
.db 11011b
.db 11111b
.db 11011b
.db 11011b
.db 11011b
.db 11011b

.db 'N'
.db 10011b
.db 10011b
.db 11011b
.db 11111b
.db 11011b
.db 11001b
.db 11001b

.db 'O'
.db 01110b
.db 11011b
.db 11011b
.db 11011b
.db 11011b
.db 11011b
.db 01110b

.db 'P'
.db 11110b
.db 11011b
.db 11011b
.db 11110b
.db 11000b
.db 11000b
.db 11000b

.db 'Q'
.db 01110b
.db 11011b
.db 11011b
.db 11011b
.db 11011b
.db 11010b
.db 01101b

.db 'R'
.db 11110b
.db 11011b
.db 11011b
.db 11110b
.db 11011b
.db 11011b
.db 11011b

.db 'S'
.db 01110b
.db 11011b
.db 11000b
.db 01110b
.db 00011b
.db 11011b
.db 01110b

.db 'T'
.db 11111b
.db 11111b
.db 01110b
.db 01110b
.db 01110b
.db 01110b
.db 01110b

.db 'U'
.db 11011b
.db 11011b
.db 11011b
.db 11011b
.db 11011b
.db 11011b
.db 01110b

.db 'V'
.db 11011b
.db 11011b
.db 11011b
.db 11011b
.db 11011b
.db 01010b
.db 00100b

.db 'W'
.db 11011b
.db 11011b
.db 11011b
.db 11011b
.db 11111b
.db 11011b
.db 10001b

.db 'X'
.db 11011b
.db 11011b
.db 11011b
.db 01110b
.db 11011b
.db 11011b
.db 11011b

.db 'Y'
.db 11011b
.db 11011b
.db 11011b
.db 01110b
.db 00100b
.db 00100b
.db 00100b

.db 'Z'
.db 11111b
.db 10011b
.db 00011b
.db 00110b
.db 01100b
.db 11001b
.db 11111b

.db '0'
.db 01110b
.db 11011b
.db 11011b
.db 11111b
.db 11011b
.db 11011b
.db 01110b

.db '1'
.db 00110b
.db 01110b
.db 11110b
.db 00110b
.db 00110b
.db 11111b
.db 11111b

.db '2'
.db 01110b
.db 11011b
.db 10011b
.db 00110b
.db 01100b
.db 11001b
.db 11111b

.db '3'
.db 01110b
.db 11011b
.db 00011b
.db 00110b
.db 00011b
.db 11011b
.db 01110b

.db '4'
.db 11011b
.db 11011b
.db 11011b
.db 01111b
.db 00011b
.db 00011b
.db 00011b

.db '5'
.db 11111b
.db 11000b
.db 11000b
.db 01110b
.db 00011b
.db 11011b
.db 01110b

.db '6'
.db 01110b
.db 11011b

.db 11000b
.db 11110b
.db 11011b
.db 11011b
.db 01110b

.db '7'
.db 11111b
.db 10011b
.db 00011b
.db 00110b
.db 01100b
.db 01100b
.db 01100b

.db '8'
.db 01110b
.db 11011b
.db 11011b
.db 01110b
.db 11011b
.db 11011b
.db 01110b

.db '9'
.db 01110b
.db 11011b
.db 11011b
.db 01111b
.db 00011b
.db 11011b
.db 01110b

.db '!'
.db 00100b
.db 01110b
.db 01110b
.db 00100b
.db 00100b
.db 01110b
.db 00100b

.db '?'
.db 01110b
.db 11011b
.db 00011b
.db 00110b
.db 00000b
.db 00110b
.db 00110b

.db '+'
.db 01110b
.db 01110b
.db 11111b
.db 11111b
.db 01110b
.db 01110b
.db 00000b

.db '-'
.db 00000b
.db 00000b
.db 11111b
.db 11111b
.db 00000b
.db 00000b
.db 00000b

.db '='
.db 00000b
.db 11111b
.db 11111b
.db 00000b
.db 11111b
.db 11111b
.db 00000b

.db ','
.db 00000b
.db 00000b
.db 00000b
.db 00000b
.db 01110b
.db 00110b
.db 01100b

.db '.'
.db 00000b
.db 00000b
.db 00000b
.db 00000b
.db 01110b
.db 01110b
.db 01110b

.db '{'
.db 00110b
.db 01100b
.db 01100b
.db 11000b
.db 01100b
.db 01100b
.db 00110b

.db '}'
.db 01100b
.db 00110b
.db 00110b
.db 00011b
.db 00110b
.db 00110b
.db 01100b

.db '('
.db 00110b
.db 01100b
.db 01100b
.db 01100b
.db 01100b
.db 01100b
.db 00110b

.db ')'
.db 01100b
.db 00110b
.db 00110b
.db 00110b
.db 00110b
.db 00110b
.db 01100b

.db '^'
.db 00100b
.db 01110b
.db 11011b
.db 10001b
.db 00000b
.db 00000b
.db 00000b

.db '*'
.db 00000b
.db 00000b
.db 11011b
.db 01110b
.db 11011b
.db 00000b
.db 00000b

.db '#'
.db 01010b
.db 11111b
.db 11111b
.db 01010b
.db 11111b
.db 11111b
.db 01010b

.db '&'
.db 01110b
.db 11011b
.db 01011b
.db 00110b
.db 01101b
.db 11010b
.db 01101b

.db '%'
.db 11011b
.db 11011b
.db 00011b
.db 00110b
.db 01100b
.db 11011b
.db 11011b

.db '$'
.db 01010b
.db 01111b
.db 11010b
.db 01110b
.db 01011b
.db 11110b
.db 01010b

.db '@'
.db 01110b
.db 11001b
.db 11011b
.db 11011b
.db 11000b
.db 11111b
.db 01111b

.db '|'
.db 01100b
.db 01100b
.db 01100b
.db 01100b
.db 01100b
.db 01100b
.db 01100b

.db '>'
.db 11000b
.db 01100b
.db 00110b
.db 00011b
.db 00110b
.db 01100b
.db 11000b

.db '<'
.db 00011b
.db 00110b
.db 01100b
.db 11000b
.db 01100b
.db 00110b
.db 00011b

.db '/'
.db 00011b
.db 00110b
.db 00110b
.db 00110b
.db 01100b
.db 01100b
.db 11000b

.db '\'
.db 11000b
.db 01100b
.db 01100b
.db 01100b
.db 00110b
.db 00110b
.db 00011b

.db 'a'
.db 01110b
.db 11011b
.db 00011b
.db 01111b
.db 11011b
.db 11011b
.db 01111b

.db 'b'
.db 11000b
.db 11000b
.db 11000b
.db 11110b
.db 11011b
.db 11011b
.db 11110b

.db 'c'
.db 00000b
.db 00000b
.db 01110b
.db 11011b
.db 11000b
.db 11011b
.db 01110b

.db 'd'
.db 00011b
.db 00011b
.db 00011b
.db 01111b
.db 11011b
.db 11011b
.db 01111b

.db 'e'
.db 00000b
.db 01110b
.db 11011b
.db 11111b
.db 11000b
.db 11011b
.db 01110b

.db 'f'
.db 00111b
.db 01111b
.db 01100b
.db 11110b
.db 01100b
.db 01100b
.db 01100b

.db 'g'
.db 00000b
.db 00000b
.db 01110b
.db 11011b
.db 01111b
.db 00011b
.db 01110b

.db 'h'
.db 11000b
.db 11000b
.db 11000b
.db 11110b
.db 11011b
.db 11011b
.db 11011b

.db 'i'
.db 00110b
.db 00110b
.db 00000b
.db 01110b
.db 00110b
.db 11111b
.db 11111b

.db 'j'
.db 00011b
.db 00011b
.db 00000b
.db 00111b
.db 00011b
.db 00110b
.db 01100b

.db 'k'
.db 11000b
.db 11000b
.db 11000b
.db 11011b
.db 11011b
.db 11110b
.db 11011b

.db 'l'
.db 01110b
.db 00110b
.db 00110b
.db 00110b
.db 00110b
.db 00110b
.db 11111b

.db 'm'
.db 00000b
.db 00000b
.db 00000b
.db 11010b
.db 10101b
.db 10001b
.db 11011b

.db 'n'
.db 00000b
.db 00000b
.db 00000b
.db 11110b
.db 11011b
.db 11011b
.db 11011b

.db 'o'
.db 00000b
.db 00000b
.db 00000b
.db 01110b
.db 11011b
.db 11011b
.db 01110b

.db 'p'
.db 00000b
.db 00000b
.db 11110b
.db 11011b
.db 11110b
.db 11000b
.db 11000b

.db 'q'
.db 00000b
.db 00000b
.db 01111b
.db 11001b
.db 01111b
.db 00011b
.db 00011b

.db 'r'
.db 00000b
.db 00000b
.db 00000b
.db 11110b
.db 11011b
.db 11000b
.db 11000b

.db 's'
.db 00000b
.db 00000b
.db 01111b
.db 11000b
.db 01110b
.db 00011b
.db 11110b

.db 't'
.db 00000b
.db 01100b
.db 01100b
.db 11111b
.db 01100b
.db 01100b
.db 00110b

.db 'u'
.db 00000b
.db 00000b
.db 00000b
.db 11011b
.db 11011b
.db 11011b
.db 01111b

.db 'v'
.db 00000b
.db 00000b
.db 00000b
.db 11011b
.db 11011b
.db 01110b
.db 00100b

.db 'w'
.db 00000b
.db 00000b
.db 00000b
.db 00000b
.db 10101b
.db 11111b
.db 01010b

.db 'x'
.db 00000b
.db 00000b
.db 00000b
.db 0000b
.db 11011b
.db 01110b
.db 11011b

.db 'y'
.db 00000b
.db 00000b
.db 11011b
.db 11011b
.db 01111b
.db 00011b
.db 01110b

.db 'z'
.db 00000b
.db 00000b
.db 00000b
.db 11111b
.db 00110b
.db 01100b
.db 11111b

.db '"'
.db 11011b
.db 11011b
.db 11011b
.db 00000b
.db 00000b
.db 00000b
.db 00000b

.db ']'
.db 00111b
.db 00011b
.db 00011b
.db 00011b
.db 00011b
.db 00011b
.db 00111b

.db '['
.db 11100b
.db 11000b
.db 11000b
.db 11000b
.db 11000b
.db 11000b
.db 11100b

.end
.end
Follow-Ups: References: