summaryrefslogtreecommitdiff
path: root/battle/sliding_intro.asm
diff options
context:
space:
mode:
authorRemy Oukaour <remy.oukaour@gmail.com>2017-12-26 17:47:05 -0500
committerRemy Oukaour <remy.oukaour@gmail.com>2017-12-26 17:47:05 -0500
commitb5417fafec7dd37cb4be391f3bd3d4541a2a381e (patch)
treea4e7d08afb2e862186a138e82c8ef4785d82786d /battle/sliding_intro.asm
parent2f98c2032fd47ada3484bfc37d590992f286d3d4 (diff)
Split battle/ into data/ and engine/ components
Diffstat (limited to 'battle/sliding_intro.asm')
-rwxr-xr-xbattle/sliding_intro.asm104
1 files changed, 0 insertions, 104 deletions
diff --git a/battle/sliding_intro.asm b/battle/sliding_intro.asm
deleted file mode 100755
index ed78add8e..000000000
--- a/battle/sliding_intro.asm
+++ /dev/null
@@ -1,104 +0,0 @@
-BattleIntroSlidingPics: ; 4e980
- ld a, [rSVBK]
- push af
- ld a, $5
- ld [rSVBK], a
- call .subfunction1
- ld a, rSCX - $ff00
- ld [hLCDCPointer], a
- call .subfunction2
- xor a
- ld [hLCDCPointer], a
- pop af
- ld [rSVBK], a
- ret
-; 4e998
-
-.subfunction1 ; 4e998
- call .subfunction4
- ld a, $90
- ld [hSCX], a
- ld a, %11100100
- call DmgToCgbBGPals
- lb de, %11100100, %11100100
- call DmgToCgbObjPals
- ret
-; 4e9ab
-
-.subfunction2 ; 4e9ab
- ld d, $90
- ld e, $72
- ld a, $48
- inc a
-.loop1
- push af
-.loop2
- ld a, [rLY]
- cp $60
- jr c, .loop2
- ld a, d
- ld [hSCX], a
- call .subfunction5
- inc e
- inc e
- dec d
- dec d
- pop af
- push af
- cp $1
- jr z, .skip1
- push de
- call .subfunction3
- pop de
-
-.skip1
- call DelayFrame
- pop af
- dec a
- jr nz, .loop1
- ret
-; 4e9d6
-
-.subfunction3 ; 4e9d6
- ld hl, Sprites + 1 ; x pixel
- ld c, $12 ; 18
- ld de, $4
-.loop3
- dec [hl]
- dec [hl]
- add hl, de
- dec c
- jr nz, .loop3
- ret
-; 4e9e5
-
-.subfunction4 ; 4e9e5
- ld hl, LYOverrides
- ld a, $90
- ld bc, SCREEN_HEIGHT_PX
- call ByteFill
- ret
-; 4e9f1
-
-.subfunction5 ; 4e9f1
- ld hl, LYOverrides
- ld a, d
- ld c, $3e ; 62
-.loop4
- ld [hli], a
- dec c
- jr nz, .loop4
- ld a, e
- ld c, $22 ; 34
-.loop5
- ld [hli], a
- dec c
- jr nz, .loop5
- xor a
- ld c, $30 ; 48
-.loop6
- ld [hli], a
- dec c
- jr nz, .loop6
- ret
-; 4ea0a