Download:
http://txpotstuff.t15.org/Hitmonchan.rarUpdates:
Honchkrow gets a better drill sprite for its Drill Peck attack. And due to some player concerns, I've gotten rid of immunities from Honchkrow. This also includes immunities gained from Abilities, although the likes of Water Absorb, Volt Absorb, Flash Fire, and others will stay as the pokemon who have these are also resistant to the types those abilities protects them from. I can always change it back to being fully protected though, should the project shift into another direction.
All other pokemon have the wrong alignment on their names for p2's side, and so have been updated. Also, for people who unofficially use Turns mode, I have fixed the lifebar and attack menu issues regarding player 1's side.
;----------------------------------------------------------------------------------------
; Attack Menu Helper
[StateDef 13000]
anim = 13000
sprpriority = 98
[State 13000, Reset Variables]
type = VarRangeSet
trigger1 = 1
value = 0
first = 2
ignorehitpause = 1
; Variable Usage
; fvar(0) = Offset X
; var(0) = Pos Y of the cursor
; var(1) = Current attack index
; var(2) = Attack state number
[State 13000, Init Vars]
type = Null
trigger1 = !time
trigger1 = var(0):=15 && var(1):=0
trigger2 = (root,command="up" || root,command="down") && root,hitpausetime=0
trigger2 = var(0):=var(0)+16-(32*(root,command="up"))
trigger2 = var(0):=ifelse(var(0)>63, 15, var(0)) && var(0):=ifelse(var(0)<15, 63, var(0))
trigger2 = var(1):=ifelse(root,command="down", (var(1)+1)%4, var(1)-1) && var(1):=ifelse(var(1)<0, 3, var(1))
trigger3 = (root,command="a" || root,command="b" || root,command="c" || root,command="x" || root,command="y" || root,command="z" || root,command="start") && root,hitpausetime=0 && roundstate=2 && root,ctrl
trigger3 = var(2):=500+(var(1)*10)
[State 13000, Cursor Move Sound]
type = PlaySnd
trigger1 = (root,command="up" || root,command="down") && root,hitpausetime=0
value = F13000,0
[State 13000, Cursor Accept Sound]
type = PlaySnd
trigger1 = var(2) && root,hitpausetime=0 && root,ctrl
value = F13000,1
[State 13000, Remove Shadows]
type = AssertSpecial
trigger1 = 1
flag = noshadow
ignorehitpause = 1
[State 13000, Stick Menu To Screen On Pos X]
type = PosSet
trigger1 = 1
x = -103+(206*(root,teamside != 1))
ignorehitpause = 1
[State 13000, Stick Menu To Screen On Pos Y]
type = PosAdd
trigger1 = 1
y = -screenpos y+2
ignorehitpause = 1
[State 13000, Menu Cursor]
type = Explod
trigger1 = !time
anim = 13001
ID = 13001
pos = -41,var(0)
postype = p1
facing = 1
vfacing = 1
bindtime = 1
vel = 0,0
accel = 0,0
random = 0,0
removetime = -2
pausemovetime = 0
scale = 1,1
sprpriority = 99
ontop = 0
shadow = 0,0,0
ownpal = 1
removeongethit = 0
[State 13000, Position Menu Cursor]
type = ModifyExplod
trigger1 = NumExplod(13001)
ID = 13001
postype = p1
pos = -41,var(0)
[State 13000, Move Menu Off Screen]
type = ChangeState
trigger1 = root,var(1)<root,var(0) && roundstate=2
value = 13001
;---------------------------------------------------------------------------
;Attack Menu Helper (Move Off Screen)
[StateDef 13001]
anim = 13000
sprpriority = 98
[State 13001, Init Vars]
type = Null
trigger1 = !time
trigger1 = var(3):=ifelse(roundstate<2, 300, 105)
trigger2 = time
trigger2 = var(3):=ifelse(var(3)>=300, 300, var(3)+8)
[State 13001, Remove Shadows]
type = AssertSpecial
trigger1 = 1
flag = noshadow
ignorehitpause = 1
[State 13001, Stick Menu To Screen On Pos Y]
type = PosAdd
trigger1 = 1
y = -screenpos y+2
ignorehitpause = 1
[State 13000, Stick Menu To Screen On Pos X]
type = PosSet
trigger1 = 1
x = -var(3)+(var(3)*2*(root,teamside != 1))
ignorehitpause = 1
[State 13001, Position Menu Cursor]
type = ModifyExplod
trigger1 = NumExplod(13001)
ID = 13001
postype = p1
pos = -41,var(0)
[State 13001, Move Menu On Screen]
type = ChangeState
trigger1 = root,var(1)=root,var(0) && roundstate=2
value = 13002
;---------------------------------------------------------------------------
;Attack Menu Helper (Move On Screen)
[StateDef 13002]
anim = 13000
sprpriority = 98
[State 13002, Init Vars]
type = Null
trigger1 = !time
trigger1 = var(3):=300
trigger2 = time
trigger2 = var(3):=ifelse(var(3)<=105, 105, var(3)-8)
[State 13002, Remove Shadows]
type = AssertSpecial
trigger1 = 1
flag = noshadow
ignorehitpause = 1
[State 13002, Stick Menu To Screen On Pos Y]
type = PosAdd
trigger1 = 1
y = -screenpos y+2
ignorehitpause = 1
[State 13002, Stick Menu To Screen On Pos X]
type = PosSet
trigger1 = 1
x = -var(3)+(var(3)*2*(root,teamside != 1))
ignorehitpause = 1
[State 13002, Position Menu Cursor]
type = ModifyExplod
trigger1 = NumExplod(13001)
ID = 13001
postype = p1
pos = -41,var(0)
[State 13002, Move Menu On Screen]
type = ChangeState
trigger1 = var(3)=105
value = 13000
;---------------------------------------------------------------------------
; Lifebar Helper
[StateDef 15000]
anim = 9999
; Variable Usage
; fvar(0) = Life over time
[State 15000, Init Vars]
type = Null
trigger1 = fvar(0):=ifelse(fvar(0)>root,life*1.0, fvar(0)-ifelse(fvar(0)-root,life<5, fvar(0)-root,life, 5), ifelse(fvar(0)<root,life*1.0, fvar(0)+5, root,life*1.0))
ignorehitpause = 1
[State 15000, AssertSpecial]
type = AssertSpecial
trigger1 = 1
flag = nobardisplay
ignorehitpause = 1
[State 15000, Lifebar BG and Border]
type = Explod
trigger1 = !time && root,teamside = 1;root,ID=56
anim = F15000
ID = 15000
pos = 0,0
postype = p1
facing = 1
vfacing = 1
bindtime = 1
vel = 0,0
accel = 0,0
random = 0,0
removetime = -1
pausemovetime = 0
scale = .5,.5
sprpriority = 0
ontop = 1
shadow = 0,0,0
ownpal = 1
removeongethit = 0
[State 15000, HP Guage]
type = Explod
trigger1 = !time
anim = F15001
ID = 15001
pos = 0,0
postype = p1
facing = 1
vfacing = 1
bindtime = 1
vel = 0,0
accel = 0,0
random = 0,0
removetime = -1
pausemovetime = 0
scale = .5,.5
sprpriority = 0
ontop = 1
shadow = 0,0,0
ownpal = 1
removeongethit = 0
[State 15000, ATB Guage]
type = Explod
trigger1 = !time
anim = F15002
ID = 15002
pos = 0,0
postype = p1
facing = 1
vfacing = 1
bindtime = 1
vel = 0,0
accel = 0,0
random = 0,0
removetime = -1
pausemovetime = 0
scale = .5,.5
sprpriority = 0
ontop = 1
shadow = 0,0,0
ownpal = 1
removeongethit = 0
[State 15000, Portrait]
type = Explod
trigger1 = !time
anim = 9000
ID = 9000
pos = 0,0
postype = p1
facing = 1
vfacing = 1
bindtime = 1
vel = 0,0
accel = 0,0
random = 0,0
removetime = -1
pausemovetime = 0
scale = .5,.5
sprpriority = 0
ontop = 1
shadow = 0,0,0
ownpal = 0
removeongethit = 0
[State 15000, ATB Guage Glow]
type = Explod
trigger1 = !NumExplod(15003) && root,var(1)=root,var(0) && roundstate=2
anim = F15003
ID = 15003
pos = 0,0
postype = p1
facing = 1
vfacing = 1
bindtime = 1
vel = 0,0
accel = 0,0
random = 0,0
removetime = -2
pausemovetime = 0
scale = .5,.5
sprpriority = 0
ontop = 1
shadow = 0,0,0
ownpal = 1
removeongethit = 0
[State 15000, Name]
type = Explod
trigger1 = !NumExplod(15004)
anim = 15000+(1*(root,teamside != 1));(1*(root,ID!=56))
ID = 15004
pos = 0,0
postype = p1
facing = 1-(2*(root,facing=-1))
vfacing = 1
bindtime = 1
vel = 0,0
accel = 0,0
random = 0,0
removetime = -2
pausemovetime = 0
scale = .5,.5
sprpriority = 0
ontop = 1
shadow = 0,0,0
ownpal = 1
removeongethit = 0
[State 15000, ATB Guage Full Sound]
type = PlaySnd
trigger1 = root,var(1)=root,var(0) && !var(10) && roundstate=2
trigger1 = var(10):=1
value = F15000,0
[State 15000, ATB Guage Full Sound Reset]
type = VarSet
trigger1 = root,var(1)!=root,var(0)
var(10) = 0
[State 15000, Set Pos Of BG]
type = ModifyExplod
trigger1 = NumExplod(15000)
ID = 15000
postype = left
pos = 160,120
ignorehitpause = 1
[State 15000, Set HP Guage Values]
type = ModifyExplod
trigger1 = NumExplod(15001)
ID = 15001
postype = left
;pos = 143+(34*(root,ID!=56)),217
pos = 143+(34*(root,teamside != 1)),217
scale = cond(root,lifemax, (fvar(0)/(root,lifemax*1.0))*.5, .5), .5
ignorehitpause = 1
[State 15000, Set ATB Gauge Values]
type = ModifyExplod
trigger1 = NumExplod(15002)
ID = 15002
postype = left
;pos = 143+(34*(root,ID!=56)),226
pos = 143+(34*(root,teamside != 1)),226
scale = cond(root,var(0), (root,var(1)/(root,var(0)*1.0))*.5, .5), .5
ignorehitpause = 1
[State 15000, Set ATB Gauge Glow Position]
type = ModifyExplod
trigger1 = NumExplod(15003)
ID = 15003
postype = left
;pos = 143+(34*(root,ID!=56)),226
pos = 143+(34*(root,teamside != 1)),226
ignorehitpause = 1
[State 15000, Place Portrait]
type = ModifyExplod
trigger1 = NumExplod(9000)
ID = 9000
postype = left
pos = 11+(298*(root,teamside != 1)),211
;pos = 11+(298*(root,ID!=56)),211
ignorehitpause = 1
[State 15000, Place Name]
type = ModifyExplod
trigger1 = NumExplod(15004)
ID = 15004
postype = left
;pos = 47+(227*(root,ID!=56)), 210
pos = 47+(227*(root,teamside != 1)), 210
ignorehitpause = 1