pokehacks/pokecrystal-board
0
0
Fork 0
mirror of https://gitlab.com/xCrystal/pokecrystal-board.git synced 2025-09-08 08:13:02 -07:00
Code Issues Packages Projects Releases Wiki Activity

condense some repetitive asm with rept macros

Browse Source
This commit is contained in:
yenatch
2013-08-29 20:02:40 -04:00
parent cc98fab33e
commit 64a6af4052
1 changed files with 7 additions and 88 deletions
Download Patch File Download Diff File Expand all files Collapse all files

95
main.asm
View File

@@ -421,51 +421,13 @@ UpdateBGMap: ; 164c
.row
; write a row of 20 tiles
rept 9
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
endr
pop de
ld [hl], e
inc l
@@ -528,6 +490,8 @@ GetTiles2: ; 1717
.loop
; put 1 tile (16 bytes) into hl from sp
rept 3
pop de
ld [hl], e
inc l
@@ -537,24 +501,7 @@ GetTiles2: ; 1717
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], e
inc l
ld [hl], d
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], e
inc l
ld [hl], d
inc l
ld [hl], d
inc l
endr
pop de
ld [hl], e
inc l
@@ -639,41 +586,13 @@ GetTiles: ; 177d
.loop
; put 1 tile (16 bytes) into hl from sp
rept 7
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
pop de
ld [hl], e
inc l
ld [hl], d
inc l
endr
pop de
ld [hl], e
inc l