Use more screen dimension constants

This commit is contained in:
dannye 2015-07-14 02:16:19 -05:00
parent e25a7148d0
commit ef9e59101e
18 changed files with 88 additions and 85 deletions

View file

@ -1753,7 +1753,7 @@ ScheduleEastColumnRedraw:: ; 0ed3 (0:0ed3)
ScheduleColumnRedrawHelper:: ; 0ef2 (0:0ef2)
ld de,wScreenEdgeTiles
ld c,$12
ld c,SCREEN_HEIGHT
.loop
ld a,[hli]
ld [de],a

View file

@ -61,16 +61,16 @@ PlaceNextChar:: ; 1956 (0:1956)
.PlaceText
cp $4E
jr nz,.next
ld bc,$0028
ld bc,SCREEN_WIDTH * 2
ld a,[hFlags_0xFFF6]
bit 2,a
jr z,.next2
ld bc,$14
ld bc,SCREEN_WIDTH
.next2
pop hl
add hl,bc
push hl
jp Next19E8
jp PlaceNextChar_inc
.next
cp $4F
@ -78,7 +78,7 @@ PlaceNextChar:: ; 1956 (0:1956)
pop hl
hlCoord 1, 16
push hl
jp Next19E8
jp PlaceNextChar_inc
.next3 ; Check against a dictionary
and a
@ -123,7 +123,7 @@ PlaceNextChar:: ; 1956 (0:1956)
jp z,Char5A
ld [hli],a
call PrintLetterDelay
Next19E8:: ; 19e8 (0:19e8)
PlaceNextChar_inc:: ; 19e8 (0:19e8)
inc de
jp PlaceNextChar
@ -273,7 +273,7 @@ Char58:: ; 1a95 (0:1a95)
Next1AA2:: ; 1aa2 (0:1aa2)
call ProtectedDelay3
call ManualTextScroll
ld a,$7F
ld a, " "
Coorda 18, 16
Char57:: ; 1aad (0:1aad)
pop hl
@ -297,7 +297,7 @@ Char51:: ; 1ab4 (0:1ab4)
call DelayFrames
pop de
hlCoord 1, 14
jp Next19E8
jp PlaceNextChar_inc
Char49:: ; 1ad5 (0:1ad5)
push de
@ -314,7 +314,7 @@ Char49:: ; 1ad5 (0:1ad5)
pop hl
hlCoord 1, 11
push hl
jp Next19E8
jp PlaceNextChar_inc
Char4B:: ; 1af8 (0:1af8)
ld a,$EE
@ -323,7 +323,7 @@ Char4B:: ; 1af8 (0:1af8)
push de
call ManualTextScroll
pop de
ld a,$7F
ld a, " "
Coorda 18, 16
;fall through
Char4C:: ; 1b0a (0:1b0a)
@ -332,12 +332,12 @@ Char4C:: ; 1b0a (0:1b0a)
call Next1B18
hlCoord 1, 16
pop de
jp Next19E8
jp PlaceNextChar_inc
Next1B18:: ; 1b18 (0:1b18)
hlCoord 0, 14
deCoord 0, 13
ld b,$3C
ld b,60
.next
ld a,[hli]
ld [de],a
@ -345,8 +345,8 @@ Next1B18:: ; 1b18 (0:1b18)
dec b
jr nz,.next
hlCoord 1, 16
ld a,$7F
ld b,$12
ld a, " "
ld b,SCREEN_WIDTH - 2
.next2
ld [hli],a
dec b