diff options
author | xCrystal <rgr.crystal@gmail.com> | 2015-04-01 11:23:27 +0200 |
---|---|---|
committer | xCrystal <rgr.crystal@gmail.com> | 2015-04-01 17:05:10 +0200 |
commit | e74dce24b4bbb0d0d23a1724932b289050b66d4a (patch) | |
tree | ac695b04a00f7af920e1e84b88adbcb0fce84842 /engine/battle/1.asm | |
parent | 9d93b5b630eaabd57f213c9dc5761223ff7445ec (diff) |
Rename battle files and split move effects Part 1
1.asm, 4.asm, and 4_2.asm
Diffstat (limited to 'engine/battle/1.asm')
-rwxr-xr-x | engine/battle/1.asm | 104 |
1 files changed, 0 insertions, 104 deletions
diff --git a/engine/battle/1.asm b/engine/battle/1.asm deleted file mode 100755 index 517d53d1..00000000 --- a/engine/battle/1.asm +++ /dev/null @@ -1,104 +0,0 @@ -DrainHPEffect_: ; 783f (1:783f) - ld hl, W_DAMAGE - ld a, [hl] - srl a ; divide damage by 2 - ld [hli], a - ld a, [hl] - rr a - ld [hld], a - or [hl] ; is damage 0? - jr nz, .getAttackerHP -; if damage is 0, increase to 1 so that the attacker gains at least 1 HP - inc hl - inc [hl] -.getAttackerHP - ld hl, wBattleMonHP - ld de, wBattleMonMaxHP - ld a, [H_WHOSETURN] - and a - jp z, .addDamageToAttackerHP - ld hl, wEnemyMonHP - ld de, wEnemyMonMaxHP -.addDamageToAttackerHP - ld bc, wHPBarOldHP+1 -; copy current HP to wHPBarOldHP - ld a, [hli] - ld [bc], a - ld a, [hl] - dec bc - ld [bc], a -; copy max HP to wHPBarMaxHP - ld a, [de] - dec bc - ld [bc], a - inc de - ld a, [de] - dec bc - ld [bc], a -; add damage to attacker's HP and copy new HP to wHPBarNewHP - ld a, [W_DAMAGE + 1] - ld b, [hl] - add b - ld [hld], a - ld [wHPBarNewHP], a - ld a, [W_DAMAGE] - ld b, [hl] - adc b - ld [hli], a - ld [wHPBarNewHP+1], a - jr c, .capToMaxHP ; if HP > 65,535, cap to max HP -; compare HP with max HP - ld a, [hld] - ld b, a - ld a, [de] - dec de - sub b - ld a, [hli] - ld b, a - ld a, [de] - inc de - sbc b - jr nc, .next -.capToMaxHP - ld a, [de] - ld [hld], a - ld [wHPBarNewHP], a - dec de - ld a, [de] - ld [hli], a - ld [wHPBarNewHP+1], a - inc de -.next - ld a, [H_WHOSETURN] - and a - hlCoord 10, 9 - ld a, $1 - jr z, .next2 - hlCoord 2, 2 - xor a -.next2 - ld [wHPBarType], a - predef UpdateHPBar2 - predef DrawPlayerHUDAndHPBar - predef DrawEnemyHUDAndHPBar - callab ReadPlayerMonCurHPAndStatus - ld hl, SuckedHealthText - ld a, [H_WHOSETURN] - and a - ld a, [W_PLAYERMOVEEFFECT] - jr z, .next3 - ld a, [W_ENEMYMOVEEFFECT] -.next3 - cp DREAM_EATER_EFFECT - jr nz, .printText - ld hl, DreamWasEatenText -.printText - jp PrintText - -SuckedHealthText: ; 78dc (1:78dc) - TX_FAR _SuckedHealthText - db "@" - -DreamWasEatenText: ; 78e1 (1:78e1) - TX_FAR _DreamWasEatenText - db "@" |