mirror of
https://github.com/pret/pokered.git
synced 2024-10-23 06:58:24 +00:00
Add characters for textbox borders to the array.
hg-commit-id: b09b0823f1bc
This commit is contained in:
parent
f707f6f4bb
commit
eed5047922
2 changed files with 17 additions and 8 deletions
16
pokered.asm
16
pokered.asm
|
@ -431,7 +431,7 @@ TextBoxBorder: ; 1922
|
|||
|
||||
; first row
|
||||
push hl
|
||||
ld a,$79 ; upper-left border ┌
|
||||
ld a,"┌"
|
||||
ld [hli],a
|
||||
inc a ; horizontal border ─
|
||||
call NPlaceChar
|
||||
|
@ -445,11 +445,11 @@ TextBoxBorder: ; 1922
|
|||
|
||||
.PlaceRow\@
|
||||
push hl
|
||||
ld a,$7C ; vertical border │
|
||||
ld a,"│"
|
||||
ld [hli],a
|
||||
ld a,$7F ; blank space ‘ ’
|
||||
ld a," "
|
||||
call NPlaceChar
|
||||
ld [hl],$7C ; vertical border │
|
||||
ld [hl],"│"
|
||||
|
||||
pop hl
|
||||
ld de,20
|
||||
|
@ -458,11 +458,11 @@ TextBoxBorder: ; 1922
|
|||
jr nz,.PlaceRow\@
|
||||
|
||||
; bottom row
|
||||
ld a,$7D ; lower-left border └
|
||||
ld a,"└"
|
||||
ld [hli],a
|
||||
ld a,$7A ; horizontal border ─
|
||||
ld a,"─"
|
||||
call NPlaceChar
|
||||
ld [hl],$7E ; lower-right border ┘
|
||||
ld [hl],"┘"
|
||||
ret
|
||||
;
|
||||
NPlaceChar:
|
||||
|
@ -10715,7 +10715,7 @@ INCBIN "baserom.gbc",$410E2,$2769 - $10E2
|
|||
jp $3C5F
|
||||
|
||||
OTString67E5: ; 67E5
|
||||
db $7A,$7A,$74,$F2,$4E
|
||||
db "──",$74,$F2,$4E
|
||||
db $4E
|
||||
db "OT/",$4E
|
||||
db $73,$74,$F2,"@"
|
||||
|
|
|
@ -146,6 +146,15 @@ char["ー"] = "$E3"
|
|||
char["@"] = "$50"
|
||||
char["#"] = "$54"
|
||||
char["…"] = "$75"
|
||||
|
||||
# textbox borders
|
||||
char["┌"] = "$79"
|
||||
char["─"] = "$7A"
|
||||
char["┐"] = "$7B"
|
||||
char["│"] = "$7C"
|
||||
char["└"] = "$7D"
|
||||
char["┘"] = "$7E"
|
||||
|
||||
char[" "] = "$7F"
|
||||
char["A"] = "$80"
|
||||
char["B"] = "$81"
|
||||
|
|
Loading…
Reference in a new issue