|
| |
|
Mahoneyfont [118 bytes] [2018] |
Released At :
The 128b Font Compo
Credits :
Download :
Look for downloads on external sites:
Pokefinder.org
Production Info
Submitted by Pex Mahoney Tufvesson on 18 March 2018
; A rom-based font in < 128 bytes by Pex Mahoney Tufvesson,
; created for the CSDb 128b font compo initiated by lft.
org $0801
.word $80b,1
.byte $9e,"2061",0,0,0
srcpoi = $fb
destpoi = $fd
sei
lda #$33
sta $01
lda #$d0
sta srcpoi+1
lda #$38
sta destpoi+1
lda #00
sta srcpoi
sta destpoi
tay
loop:
sta (destpoi),y ;#$00 -> row #0
lda (srcpoi),y ;rom #0
iny
ora (srcpoi),y ;ora rom #1
sta (destpoi),y ; -> row #1
iny
lda (srcpoi),y ;rom #2
sta (destpoi),y ; -> row #2
iny
lda (srcpoi),y ;rom #3
sta (destpoi),y ; -> row #3
iny
lda (srcpoi),y ;rom #4
asl ;asl
sta (destpoi),y ; -> row #4
iny
lda (srcpoi),y ;rom #5
iny
ora (srcpoi),y ;ora rom #6
iny
ora (srcpoi),y ;ora rom #7
asl ;asl
dey
dey
sta (destpoi),y ; -> row #5
iny
lda #0
sta (destpoi),y ;#$00 -> row #6
iny
sta (destpoi),y ;#$00 -> row #7
iny
bne loop
inc srcpoi+1
inc destpoi+1
ldx srcpoi+1
cpx #$d8
bne loop
lda #$37
sta 1
lda #$1e
sta $d018
lda #0
sta $d020
sta $d021
lda #5
sta $0286
cli
rts |
|
|
|
 | Search CSDb |
|
| Navigate | |
|
| Detailed Info | |
|
| Fun Stuff | |
· Goofs
· Hidden Parts
· Trivia
|
|
| Forum | |
|
| Support CSDb | |
|
 |  |
|
![Mahoneyfont [118 bytes]](/gfx/releases/163000/163010.png)
9.3/10 (9 votes) 