pokered/engine/battle/moveEffects/paralyze_effect.asm

ParalyzeEffect_: ; 52601 (14:6601)
	ld hl, wEnemyMonStatus
	ld de, wPlayerMoveType
	ld a, [H_WHOSETURN]
	and a
	jp z, .next
	ld hl, wBattleMonStatus
	ld de, wEnemyMoveType
.next
	ld a, [hl]
	and a ; does the target already have a status ailment?
	jr nz, .didntAffect
; check if the target is immune due to types
	ld a, [de]
	cp ELECTRIC
	jr nz, .hitTest
	ld b, h
	ld c, l
	inc bc
	ld a, [bc]
	cp GROUND
	jr z, .doesntAffect
	inc bc
	ld a, [bc]
	cp GROUND
	jr z, .doesntAffect
.hitTest
	push hl
	callab MoveHitTest
	pop hl
	ld a, [wMoveMissed]
	and a
	jr nz, .didntAffect
	set PAR, [hl]
	callab QuarterSpeedDueToParalysis
	ld c, 30
	call DelayFrames
	callab PlayCurrentMoveAnimation
	jpab PrintMayNotAttackText
.didntAffect
	ld c, 50
	call DelayFrames
	jpab PrintDidntAffectText
.doesntAffect
	ld c, 50
	call DelayFrames
	jpab PrintDoesntAffectText
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ParalyzeEffect_: ; 52601 (14:6601)`
commented battle stuff 2015-02-08 00:24:16 +00:00			`ld hl, wEnemyMonStatus`
No more W_ 2015-08-31 02:38:41 +00:00			`ld de, wPlayerMoveType`
commented battle stuff 2015-02-08 00:24:16 +00:00			`ld a, [H_WHOSETURN]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`and a`
commented battle stuff 2015-02-08 00:24:16 +00:00			`jp z, .next`
$U-Daniel-PC\Daniel$ Clean up white space 2015-06-11 22:41:33 +00:00			`ld hl, wBattleMonStatus`
No more W_ 2015-08-31 02:38:41 +00:00			`ld de, wEnemyMoveType`
commented battle stuff 2015-02-08 00:24:16 +00:00			`.next`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a, [hl]`
commented battle stuff 2015-02-08 00:24:16 +00:00			`and a ; does the target already have a status ailment?`
			`jr nz, .didntAffect`
			`; check if the target is immune due to types`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a, [de]`
commented battle stuff 2015-02-08 00:24:16 +00:00			`cp ELECTRIC`
			`jr nz, .hitTest`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld b, h`
			`ld c, l`
			`inc bc`
			`ld a, [bc]`
commented battle stuff 2015-02-08 00:24:16 +00:00			`cp GROUND`
			`jr z, .doesntAffect`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`inc bc`
			`ld a, [bc]`
commented battle stuff 2015-02-08 00:24:16 +00:00			`cp GROUND`
			`jr z, .doesntAffect`
			`.hitTest`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`push hl`
			`callab MoveHitTest`
			`pop hl`
No more W_ 2015-08-31 02:38:41 +00:00			`ld a, [wMoveMissed]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`and a`
commented battle stuff 2015-02-08 00:24:16 +00:00			`jr nz, .didntAffect`
add constants for volatile statuses and more battle labels/commentary/constants 2015-02-03 19:51:53 +00:00			`set PAR, [hl]`
Labelled many functions/variables 2014-08-09 05:39:13 +00:00			`callab QuarterSpeedDueToParalysis`
commented battle stuff 2015-02-08 00:24:16 +00:00			`ld c, 30`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call DelayFrames`
commented battle stuff 2015-02-08 00:24:16 +00:00			`callab PlayCurrentMoveAnimation`
jpab/jpba macros 2015-07-19 18:56:13 +00:00			`jpab PrintMayNotAttackText`
commented battle stuff 2015-02-08 00:24:16 +00:00			`.didntAffect`
			`ld c, 50`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call DelayFrames`
jpab/jpba macros 2015-07-19 18:56:13 +00:00			`jpab PrintDidntAffectText`
commented battle stuff 2015-02-08 00:24:16 +00:00			`.doesntAffect`
			`ld c, 50`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call DelayFrames`
jpab/jpba macros 2015-07-19 18:56:13 +00:00			`jpab PrintDoesntAffectText`