Top

Pokemon Rpg (Remotes)


mIRC Code
+ 0 likes
Please Register to submit score.
Bookmark and Share
Average Score  4.9 (of 8 scores)
Date Added  Feb 14, 2008
Last Updated  May 09, 2008

Introduction

Lol, This is romeo's pokebot. I had finally gotten it from my friend and I have been changing it like hell. Its mostly different from when I got it so here ya go. (Full bot is being pasted!)

Grab the Code

on 1:text:`Register:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) == Yes) { Notice $nick You Are Already Fully Registered! | halt }
  notice $nick So You Wanna Become a Pokemon Master? First Off What is Your Name, Type `Name <Name of Chr> 14Example: `Name Romeo 4Note:15 If The Name Has Profanity or Something The Admin Does not Approve, The Name will be Changed!
}
on *:text:*`Name *:*:{
  if ($readini($nick $+ .ini,Register,Name) == Yes) { Notice $nick You Already Made a Name! | halt }
  if ($chan != %ChanSet) { halt }
  if ($readini(Registered $+ .ini,Registered,$address($nick,2)) != $Null) { Notice $nick It Seem You Have Previously Made An Account, As: $readini(Registered $+ .ini,Registered,$address($nick,2)) 4Please Talk to Romeo for Help! | halt }
  if (/ isin $2-) { Notice $nick Please reword it! | halt }
  if ($ isin $2-) { Notice $nick Please reword it! | halt }
  if (_ isin $2-) { Notice $nick Please reword it! | halt }
  if (* isin $2-) { Notice $nick Please reword it! | halt }
  if ($null == $2-) { Notice $nick Please reword it! | halt }
  if (; isin $2-) { Notice $nick Please reword it! | halt }
  if (: isin $2-) { Notice $nick Please reword it! | halt }
  if (+ isin $2-) { Notice $nick Please reword it! | halt }
  if (- isin $2-) { Notice $nick Please reword it! | halt }
  if (| isin $2-) { Notice $nick Please reword it! | halt }
  if (' isin $2-) { Notice $nick Please reword it! | halt }
  if (" isin $2-) { Notice $nick Please reword it! | halt }
  if (^ isin $2-) { Notice $nick Please reword it! | halt }
  if (% isin $2-) { Notice $nick Please reword it! | halt }
  if (# isin $2-) { Notice $nick Please reword it! | halt }
  if (^ isin $2-) { Notice $nick Please reword it! | halt }
  if (. isin $2-) { Notice $nick Please reword it! | halt }
  if ($len($2) > 10) { Notice $nick Sorry But This Name is Too Long! | halt }
  if ($len($2) < 2) { Notice $nick Sorry But This Name is Too Short! | halt }
  if (Romeo isin $2-) && (Romeo != $Nick) { Notice $nick Sorry But This NickName Belongs to The Admin! | halt }
  writeini -n $nick $+ .ini $nick Name $2-
  writeini -n $nick $+ .ini Register Name Yes
  Notice $nick $readini($nick $+ .ini,$nick,Name) $+ , Are You a Boy Or Girl? Type `Gender <Boy Or Girl> 14Example: `Gender Boy
}
on 1:TEXT:`Gender *:*:{
  if ($readini($nick $+ .ini,Register,Gender) == Yes) { Notice $nick You already Picked a Gender! | halt }
  if ($readini($nick $+ .ini,Register,Name) != Yes) { Notice $nick You have not made a Name! | halt }
  if ($2 == Boy) {
    writeini -n $nick $+ .ini Register Gender Yes
    writeini -n $nick $+ .ini $nick Gender Male
    writeini -n $nick $+ .ini $nick Aura 1
    writeini -n $nick $+ .ini $nick BAura 12
    writeini -n $nick $+ .ini $nick Party 1
    writeini -n $nick $+ .ini $nick MParty 1
    writeini -n $nick $+ .ini Items Potion 1
    writeini -n $nick $+ .ini Items RareCandy 0
    writeini -n $nick $+ .ini Items Pokeball 3
    Writeini -n $nick $+ .ini Travel League Kanto
    Writeini -n $nick $+ .ini Travel Town Pallet-Town
    writeini -n $nick $+ .ini $nick TrainerLevel 1 
    writeini -n $nick $+ .ini $nick TExpNeeded 10 
    Notice $nick $Name($Nick) $+ 8,1, So Your a $2 $+ . Time to Choose Your Starter Pokemon. Starters:4 Charmander 15-10 Squirtle 15-3 Bulbasaur 15-8 Pichu 15-4 Cyndaquil 15-9 Chikorita 15-11 Totodile 15-9 Treecko 15-7 Torchic 15-11 Mudkip 8Type `Pick Starter <Starter> 14Example: `Pick Starter Charmander
  }
  if ($2 == Girl) {
    writeini -n $nick $+ .ini Register Gender Yes
    writeini -n $nick $+ .ini $nick Gender Female
    writeini -n $nick $+ .ini $nick Aura 1
    writeini -n $nick $+ .ini $nick BAura 13
    writeini -n $nick $+ .ini $nick Party 1
    writeini -n $nick $+ .ini $nick MParty 1
    writeini -n $nick $+ .ini Items Potion 1
    writeini -n $nick $+ .ini Items RareCandy 0
    writeini -n $nick $+ .ini Items Pokeball 3
    Writeini -n $nick $+ .ini Travel League Kanto
    Writeini -n $nick $+ .ini Travel Town Pallet-Town
    writeini -n $nick $+ .ini $nick TrainerLevel 1 
    writeini -n $nick $+ .ini $nick TExpNeeded 10 
    Notice $nick $Name($Nick) $+ 8,1, So Your a $2 $+ . Time to Choose Your Starter Pokemon.0 Starters:4 Charmander 15-10 Squirtle 15-3 Bulbasaur 15-8 Pichu 15-4 Cyndaquil 15-9 Chikorita 15-11 Totodile 15-9 Treecko 15-7 Torchic 15-11 Mudkip 8Type `Pick Starter <Starter> 14Example: `Pick Starter Charmander
  }
}
on *:TEXT:`Pick *:*:{
  if ($readini($nick $+ .ini,Register,Starter) == Yes) { Notice $nick You Already Picked a Starter! | halt }
  if ($readini($nick $+ .ini,Register,Gender) != Yes) { Notice $nick You have not made a Gender! | halt }
  if ($readini($nick $+ .ini,Register,Name) != Yes) { Notice $nick You have not made a Name! | halt }
  if ($3 == Charmander) {
    Writeini -n $nick $+ .ini Register Starter Yes
    Writeini -n $nick $+ .ini $3 Pokemon $3
    Writeini -n $nick $+ .ini $3 MAttack 20
    Writeini -n $nick $+ .ini $3 MSAttack 20
    Writeini -n $nick $+ .ini $3 MDefense 20
    Writeini -n $nick $+ .ini $3 MSDefense 20
    Writeini -n $nick $+ .ini $3 MIntelligence 6
    Writeini -n $nick $+ .ini $3 MAccuracy 6
    Writeini -n $nick $+ .ini $3 MAgility 6
    Writeini -n $nick $+ .ini $3 Speed 11
    Writeini -n $nick $+ .ini $3 MSpeed 11
    Writeini -n $nick $+ .ini $3 FSpeed 1
    Writeini -n $nick $+ .ini $3 MFSpeed 1
    Writeini -n $nick $+ .ini $3 MHp 50
    Writeini -n $nick $+ .ini $3 Type Fire
    Writeini -n $nick $+ .ini $3 Type2 None
    Writeini -n $nick $+ .ini $3 $3 Yes
    Writeini -n $nick $+ .ini $3 Attack1 Scratch
    Writeini -n $nick $+ .ini $3 Attack2 Growl
    Writeini -n $nick $+ .ini $3 Attack3 None
    Writeini -n $nick $+ .ini $3 Attack4 None
    Writeini -n $nick $+ .ini $3 Level 5
    Writeini -n $nick $+ .ini $3 ExpNeeded 20
    Writeini -n $nick $+ .ini $3 Exp 0
    Writeini -n $nick $+ .ini $3 SpeedExpNeeded 10
    Writeini -n $nick $+ .ini $3 SExp 0
    Writeini -n $nick $+ .ini $3 Gender $readini($nick $+ .ini,$nick,Gender)
    writeini -n $nick $+ .ini $3 Aura 4
    writeini -n $nick $+ .ini $3 BAura 1
    Writeini -n $nick $+ .ini $3 ScratchMPP 35 
    Writeini -n $nick $+ .ini $3 GrowlMPP 40 
    Writeini -n $nick $+ .ini $nick Pokemon $3
    Writeini -n $nick $+ .ini $nick Pokemon2 None
    Writeini -n $nick $+ .ini Pokemon $3 yes
    Notice $Nick We are Almost Done, Now Please Pm $Me with `Password APassword(This Password will be Used, So You Can Log In To Your Account!) 
  }
  if ($3 == Cyndaquil) {
    Writeini -n $nick $+ .ini Register Starter Yes
    Writeini -n $nick $+ .ini $3 Pokemon $3
    Writeini -n $nick $+ .ini $3 MAttack 20
    Writeini -n $nick $+ .ini $3 MSAttack 20
    Writeini -n $nick $+ .ini $3 MDefense 20
    Writeini -n $nick $+ .ini $3 MSDefense 20
    Writeini -n $nick $+ .ini $3 MIntelligence 6
    Writeini -n $nick $+ .ini $3 MAccuracy 6
    Writeini -n $nick $+ .ini $3 MAgility 6
    Writeini -n $nick $+ .ini $3 Speed 11
    Writeini -n $nick $+ .ini $3 MSpeed 11
    Writeini -n $nick $+ .ini $3 FSpeed 1
    Writeini -n $nick $+ .ini $3 MFSpeed 1
    Writeini -n $nick $+ .ini $3 MHp 50
    Writeini -n $nick $+ .ini $3 Type Fire
    Writeini -n $nick $+ .ini $3 Type2 None
    Writeini -n $nick $+ .ini $3 $3 Yes
    Writeini -n $nick $+ .ini $3 Attack1 Scratch
    Writeini -n $nick $+ .ini $3 Attack2 Growl
    Writeini -n $nick $+ .ini $3 Attack3 None
    Writeini -n $nick $+ .ini $3 Attack4 None
    Writeini -n $nick $+ .ini $3 Level 5
    Writeini -n $nick $+ .ini $3 ExpNeeded 20
    Writeini -n $nick $+ .ini $3 Exp 0
    Writeini -n $nick $+ .ini $3 SpeedExpNeeded 10
    Writeini -n $nick $+ .ini $3 SExp 0
    Writeini -n $nick $+ .ini $3 Gender $readini($nick $+ .ini,$nick,Gender)
    writeini -n $nick $+ .ini $3 Aura 4
    writeini -n $nick $+ .ini $3 BAura 1
    Writeini -n $nick $+ .ini $3 ScratchMPP 35 
    Writeini -n $nick $+ .ini $3 GrowlMPP 40 
    Writeini -n $nick $+ .ini $nick Pokemon $3
    Writeini -n $nick $+ .ini $nick Pokemon2 None
    Writeini -n $nick $+ .ini Pokemon $3 yes
    Notice $Nick We are Almost Done, Now Please Pm $Me with `Password APassword(This Password will be Used, So You Can Log In To Your Account!) 
  }
  if ($3 == Torchic) {
    Writeini -n $nick $+ .ini Register Starter Yes
    Writeini -n $nick $+ .ini $3 Pokemon $3
    Writeini -n $nick $+ .ini $3 MAttack 20
    Writeini -n $nick $+ .ini $3 MSAttack 20
    Writeini -n $nick $+ .ini $3 MDefense 20
    Writeini -n $nick $+ .ini $3 MSDefense 20
    Writeini -n $nick $+ .ini $3 MIntelligence 6
    Writeini -n $nick $+ .ini $3 MAccuracy 6
    Writeini -n $nick $+ .ini $3 MAgility 6
    Writeini -n $nick $+ .ini $3 Speed 11
    Writeini -n $nick $+ .ini $3 MSpeed 11
    Writeini -n $nick $+ .ini $3 FSpeed 1
    Writeini -n $nick $+ .ini $3 MFSpeed 1
    Writeini -n $nick $+ .ini $3 MHp 50
    Writeini -n $nick $+ .ini $3 Type Fire
    Writeini -n $nick $+ .ini $3 Type2 None
    Writeini -n $nick $+ .ini $3 $3 Yes
    Writeini -n $nick $+ .ini $3 Attack1 Scratch
    Writeini -n $nick $+ .ini $3 Attack2 Growl
    Writeini -n $nick $+ .ini $3 Attack3 None
    Writeini -n $nick $+ .ini $3 Attack4 None
    Writeini -n $nick $+ .ini $3 Level 5
    Writeini -n $nick $+ .ini $3 ExpNeeded 20
    Writeini -n $nick $+ .ini $3 Exp 0
    Writeini -n $nick $+ .ini $3 SpeedExpNeeded 10
    Writeini -n $nick $+ .ini $3 SExp 0
    Writeini -n $nick $+ .ini $3 Gender $readini($nick $+ .ini,$nick,Gender)
    writeini -n $nick $+ .ini $3 Aura 7
    writeini -n $nick $+ .ini $3 BAura 1
    Writeini -n $nick $+ .ini $3 ScratchMPP 35 
    Writeini -n $nick $+ .ini $3 GrowlMPP 40 
    Writeini -n $nick $+ .ini $nick Pokemon $3
    Writeini -n $nick $+ .ini $nick Pokemon2 None
    Writeini -n $nick $+ .ini Pokemon $3 yes
    Notice $Nick We are Almost Done, Now Please Pm $Me with `Password APassword(This Password will be Used, So You Can Log In To Your Account!) 
  }
  if ($3 == Bulbasaur) {
    Writeini -n $nick $+ .ini Register Starter Yes
    Writeini -n $nick $+ .ini $3 Pokemon $3
    Writeini -n $nick $+ .ini $3 MAttack 20
    Writeini -n $nick $+ .ini $3 MSAttack 20
    Writeini -n $nick $+ .ini $3 MDefense 20
    Writeini -n $nick $+ .ini $3 MSDefense 20
    Writeini -n $nick $+ .ini $3 MIntelligence 6
    Writeini -n $nick $+ .ini $3 MAccuracy 6
    Writeini -n $nick $+ .ini $3 MAgility 6
    Writeini -n $nick $+ .ini $3 Speed 11
    Writeini -n $nick $+ .ini $3 MSpeed 11
    Writeini -n $nick $+ .ini $3 FSpeed 1
    Writeini -n $nick $+ .ini $3 MFSpeed 1
    Writeini -n $nick $+ .ini $3 MHp 50
    Writeini -n $nick $+ .ini $3 Type Grass
    Writeini -n $nick $+ .ini $3 Type2 Poison
    Writeini -n $nick $+ .ini $3 $3 Yes
    Writeini -n $nick $+ .ini $3 Attack1 Tackle
    Writeini -n $nick $+ .ini $3 Attack2 Growl
    Writeini -n $nick $+ .ini $3 Attack3 None
    Writeini -n $nick $+ .ini $3 Attack4 None
    Writeini -n $nick $+ .ini $3 Level 5
    Writeini -n $nick $+ .ini $3 ExpNeeded 20
    Writeini -n $nick $+ .ini $3 Exp 0
    Writeini -n $nick $+ .ini $3 SpeedExpNeeded 10
    Writeini -n $nick $+ .ini $3 SExp 0
    Writeini -n $nick $+ .ini $3 Gender $readini($nick $+ .ini,$nick,Gender)
    writeini -n $nick $+ .ini $3 Aura 3
    writeini -n $nick $+ .ini $3 BAura 1
    Writeini -n $nick $+ .ini $3 TackleMPP 35 
    Writeini -n $nick $+ .ini $3 GrowlMPP 40 
    Writeini -n $nick $+ .ini $nick Pokemon $3
    Writeini -n $nick $+ .ini $nick Pokemon2 None
    Writeini -n $nick $+ .ini Pokemon $3 yes
    Notice $Nick We are Almost Done, Now Please Pm $Me with `Password APassword(This Password will be Used, So You Can Log In To Your Account!) 
  }
  if ($3 == Chikorita) {
    Writeini -n $nick $+ .ini Register Starter Yes
    Writeini -n $nick $+ .ini $3 Pokemon $3
    Writeini -n $nick $+ .ini $3 MAttack 20
    Writeini -n $nick $+ .ini $3 MSAttack 20
    Writeini -n $nick $+ .ini $3 MDefense 20
    Writeini -n $nick $+ .ini $3 MSDefense 20
    Writeini -n $nick $+ .ini $3 MIntelligence 6
    Writeini -n $nick $+ .ini $3 MAccuracy 6
    Writeini -n $nick $+ .ini $3 MAgility 6
    Writeini -n $nick $+ .ini $3 Speed 11
    Writeini -n $nick $+ .ini $3 MSpeed 11
    Writeini -n $nick $+ .ini $3 FSpeed 1
    Writeini -n $nick $+ .ini $3 MFSpeed 1
    Writeini -n $nick $+ .ini $3 MHp 50
    Writeini -n $nick $+ .ini $3 Type Grass
    Writeini -n $nick $+ .ini $3 Type2 None
    Writeini -n $nick $+ .ini $3 $3 Yes
    Writeini -n $nick $+ .ini $3 Attack1 Tackle
    Writeini -n $nick $+ .ini $3 Attack2 Growl
    Writeini -n $nick $+ .ini $3 Attack3 None
    Writeini -n $nick $+ .ini $3 Attack4 None
    Writeini -n $nick $+ .ini $3 Level 5
    Writeini -n $nick $+ .ini $3 ExpNeeded 20
    Writeini -n $nick $+ .ini $3 Exp 0
    Writeini -n $nick $+ .ini $3 SpeedExpNeeded 10
    Writeini -n $nick $+ .ini $3 SExp 0
    Writeini -n $nick $+ .ini $3 Gender $readini($nick $+ .ini,$nick,Gender)
    writeini -n $nick $+ .ini $3 Aura 9
    writeini -n $nick $+ .ini $3 BAura 1
    Writeini -n $nick $+ .ini $3 TackleMPP 35 
    Writeini -n $nick $+ .ini $3 GrowlMPP 40 
    Writeini -n $nick $+ .ini $nick Pokemon $3
    Writeini -n $nick $+ .ini $nick Pokemon2 None
    Writeini -n $nick $+ .ini Pokemon $3 yes
    Notice $Nick We are Almost Done, Now Please Pm $Me with `Password APassword(This Password will be Used, So You Can Log In To Your Account!) 
  }
  if ($3 == Treecko) {
    Writeini -n $nick $+ .ini Register Starter Yes
    Writeini -n $nick $+ .ini $3 Pokemon $3
    Writeini -n $nick $+ .ini $3 MAttack 20
    Writeini -n $nick $+ .ini $3 MSAttack 20
    Writeini -n $nick $+ .ini $3 MDefense 20
    Writeini -n $nick $+ .ini $3 MSDefense 20
    Writeini -n $nick $+ .ini $3 MIntelligence 6
    Writeini -n $nick $+ .ini $3 MAccuracy 6
    Writeini -n $nick $+ .ini $3 MAgility 6
    Writeini -n $nick $+ .ini $3 Speed 11
    Writeini -n $nick $+ .ini $3 MSpeed 11
    Writeini -n $nick $+ .ini $3 FSpeed 1
    Writeini -n $nick $+ .ini $3 MFSpeed 1
    Writeini -n $nick $+ .ini $3 MHp 50
    Writeini -n $nick $+ .ini $3 Type Grass
    Writeini -n $nick $+ .ini $3 Type2 None
    Writeini -n $nick $+ .ini $3 $3 Yes
    Writeini -n $nick $+ .ini $3 Attack1 Pound
    Writeini -n $nick $+ .ini $3 Attack2 Leer
    Writeini -n $nick $+ .ini $3 Attack3 None
    Writeini -n $nick $+ .ini $3 Attack4 None
    Writeini -n $nick $+ .ini $3 Level 5
    Writeini -n $nick $+ .ini $3 ExpNeeded 20
    Writeini -n $nick $+ .ini $3 Exp 0
    Writeini -n $nick $+ .ini $3 SpeedExpNeeded 10
    Writeini -n $nick $+ .ini $3 SExp 0
    Writeini -n $nick $+ .ini $3 Gender $readini($nick $+ .ini,$nick,Gender)
    writeini -n $nick $+ .ini $3 Aura 9
    writeini -n $nick $+ .ini $3 BAura 1
    Writeini -n $nick $+ .ini $3 PoundMPP 35 
    Writeini -n $nick $+ .ini $3 LeerMPP 30 
    Writeini -n $nick $+ .ini $nick Pokemon $3
    Writeini -n $nick $+ .ini $nick Pokemon2 None
    Writeini -n $nick $+ .ini Pokemon $3 yes
    Notice $Nick We are Almost Done, Now Please Pm $Me with `Password APassword(This Password will be Used, So You Can Log In To Your Account!) 
  }
  if ($3 == Squirtle) {
    Writeini -n $nick $+ .ini Register Starter Yes
    Writeini -n $nick $+ .ini $3 Pokemon $3
    Writeini -n $nick $+ .ini $3 MAttack 20
    Writeini -n $nick $+ .ini $3 MSAttack 20
    Writeini -n $nick $+ .ini $3 MDefense 20
    Writeini -n $nick $+ .ini $3 MSDefense 20
    Writeini -n $nick $+ .ini $3 MIntelligence 6
    Writeini -n $nick $+ .ini $3 MAccuracy 6
    Writeini -n $nick $+ .ini $3 MAgility 6
    Writeini -n $nick $+ .ini $3 Speed 11
    Writeini -n $nick $+ .ini $3 MSpeed 11
    Writeini -n $nick $+ .ini $3 FSpeed 1
    Writeini -n $nick $+ .ini $3 MFSpeed 1
    Writeini -n $nick $+ .ini $3 MHp 50
    Writeini -n $nick $+ .ini $3 Type Water
    Writeini -n $nick $+ .ini $3 Type2 None
    Writeini -n $nick $+ .ini $3 $3 Yes
    Writeini -n $nick $+ .ini $3 Attack1 Tackle
    Writeini -n $nick $+ .ini $3 Attack2 TailWhip
    Writeini -n $nick $+ .ini $3 Attack3 None
    Writeini -n $nick $+ .ini $3 Attack4 None
    Writeini -n $nick $+ .ini $3 Level 5
    Writeini -n $nick $+ .ini $3 ExpNeeded 20
    Writeini -n $nick $+ .ini $3 Exp 0
    Writeini -n $nick $+ .ini $3 SpeedExpNeeded 10
    Writeini -n $nick $+ .ini $3 SExp 0
    Writeini -n $nick $+ .ini $3 Gender $readini($nick $+ .ini,$nick,Gender)
    writeini -n $nick $+ .ini $3 Aura 10
    writeini -n $nick $+ .ini $3 BAura 1
    Writeini -n $nick $+ .ini $3 TackleMPP 35 
    Writeini -n $nick $+ .ini $3 TailWhipMPP 30
    Writeini -n $nick $+ .ini $nick Pokemon $3
    Writeini -n $nick $+ .ini $nick Pokemon2 None
    Writeini -n $nick $+ .ini Pokemon $3 yes
    Notice $Nick We are Almost Done, Now Please Pm $Me with `Password APassword(This Password will be Used, So You Can Log In To Your Account!) 
  }
  if ($3 == Totodile) {
    Writeini -n $nick $+ .ini Register Starter Yes
    Writeini -n $nick $+ .ini $3 Pokemon $3
    Writeini -n $nick $+ .ini $3 MAttack 20
    Writeini -n $nick $+ .ini $3 MSAttack 20
    Writeini -n $nick $+ .ini $3 MDefense 20
    Writeini -n $nick $+ .ini $3 MSDefense 20
    Writeini -n $nick $+ .ini $3 MIntelligence 6
    Writeini -n $nick $+ .ini $3 MAccuracy 6
    Writeini -n $nick $+ .ini $3 MAgility 6
    Writeini -n $nick $+ .ini $3 Speed 11
    Writeini -n $nick $+ .ini $3 MSpeed 11
    Writeini -n $nick $+ .ini $3 FSpeed 1
    Writeini -n $nick $+ .ini $3 MFSpeed 1
    Writeini -n $nick $+ .ini $3 MHp 50
    Writeini -n $nick $+ .ini $3 Type Water
    Writeini -n $nick $+ .ini $3 Type2 None
    Writeini -n $nick $+ .ini $3 $3 Yes
    Writeini -n $nick $+ .ini $3 Attack1 Scratch
    Writeini -n $nick $+ .ini $3 Attack2 Leer
    Writeini -n $nick $+ .ini $3 Attack3 None
    Writeini -n $nick $+ .ini $3 Attack4 None
    Writeini -n $nick $+ .ini $3 Level 5
    Writeini -n $nick $+ .ini $3 ExpNeeded 20
    Writeini -n $nick $+ .ini $3 Exp 0
    Writeini -n $nick $+ .ini $3 SpeedExpNeeded 10
    Writeini -n $nick $+ .ini $3 SExp 0
    Writeini -n $nick $+ .ini $3 Gender $readini($nick $+ .ini,$nick,Gender)
    writeini -n $nick $+ .ini $3 Aura 11
    writeini -n $nick $+ .ini $3 BAura 1
    Writeini -n $nick $+ .ini $3 ScratchMPP 35 
    Writeini -n $nick $+ .ini $3 LeerMPP 30
    Writeini -n $nick $+ .ini $nick Pokemon $3
    Writeini -n $nick $+ .ini $nick Pokemon2 None
    Writeini -n $nick $+ .ini Pokemon $3 yes
    Notice $Nick We are Almost Done, Now Please Pm $Me with `Password APassword(This Password will be Used, So You Can Log In To Your Account!) 
  }
  if ($3 == Mudkip) {
    Writeini -n $nick $+ .ini Register Starter Yes
    Writeini -n $nick $+ .ini $3 Pokemon $3
    Writeini -n $nick $+ .ini $3 MAttack 20
    Writeini -n $nick $+ .ini $3 MSAttack 20
    Writeini -n $nick $+ .ini $3 MDefense 20
    Writeini -n $nick $+ .ini $3 MSDefense 20
    Writeini -n $nick $+ .ini $3 MIntelligence 6
    Writeini -n $nick $+ .ini $3 MAccuracy 6
    Writeini -n $nick $+ .ini $3 MAgility 6
    Writeini -n $nick $+ .ini $3 Speed 11
    Writeini -n $nick $+ .ini $3 MSpeed 11
    Writeini -n $nick $+ .ini $3 FSpeed 1
    Writeini -n $nick $+ .ini $3 MFSpeed 1
    Writeini -n $nick $+ .ini $3 MHp 50
    Writeini -n $nick $+ .ini $3 Type Water
    Writeini -n $nick $+ .ini $3 Type2 None
    Writeini -n $nick $+ .ini $3 $3 Yes
    Writeini -n $nick $+ .ini $3 Attack1 Tackle
    Writeini -n $nick $+ .ini $3 Attack2 Growl
    Writeini -n $nick $+ .ini $3 Attack3 None
    Writeini -n $nick $+ .ini $3 Attack4 None
    Writeini -n $nick $+ .ini $3 Level 5
    Writeini -n $nick $+ .ini $3 ExpNeeded 20
    Writeini -n $nick $+ .ini $3 Exp 0
    Writeini -n $nick $+ .ini $3 SpeedExpNeeded 10
    Writeini -n $nick $+ .ini $3 SExp 0
    Writeini -n $nick $+ .ini $3 Gender $readini($nick $+ .ini,$nick,Gender)
    writeini -n $nick $+ .ini $3 Aura 12
    writeini -n $nick $+ .ini $3 BAura 1
    Writeini -n $nick $+ .ini $3 TackleMPP 35 
    Writeini -n $nick $+ .ini $3 GrowlMPP 40
    Writeini -n $nick $+ .ini $nick Pokemon $3
    Writeini -n $nick $+ .ini $nick Pokemon2 None
    Writeini -n $nick $+ .ini Pokemon $3 yes
    Notice $Nick We are Almost Done, Now Please Pm $Me with `Password APassword(This Password will be Used, So You Can Log In To Your Account!) 
  }
  if ($3 == Pichu) {
    Writeini -n $nick $+ .ini Register Starter Yes
    Writeini -n $nick $+ .ini $3 Pokemon $3
    Writeini -n $nick $+ .ini $3 MAttack 20
    Writeini -n $nick $+ .ini $3 MSAttack 20
    Writeini -n $nick $+ .ini $3 MDefense 20
    Writeini -n $nick $+ .ini $3 MSDefense 20
    Writeini -n $nick $+ .ini $3 MIntelligence 6
    Writeini -n $nick $+ .ini $3 MAccuracy 6
    Writeini -n $nick $+ .ini $3 MAgility 6
    Writeini -n $nick $+ .ini $3 Speed 11
    Writeini -n $nick $+ .ini $3 MSpeed 11
    Writeini -n $nick $+ .ini $3 FSpeed 1
    Writeini -n $nick $+ .ini $3 MFSpeed 1
    Writeini -n $nick $+ .ini $3 MHp 50
    Writeini -n $nick $+ .ini $3 Type Electric
    Writeini -n $nick $+ .ini $3 Type2 None
    Writeini -n $nick $+ .ini $3 $3 Yes
    Writeini -n $nick $+ .ini $3 Attack1 Thunder-Shock
    Writeini -n $nick $+ .ini $3 Attack2 Charm
    Writeini -n $nick $+ .ini $3 Attack3 None
    Writeini -n $nick $+ .ini $3 Attack4 None
    Writeini -n $nick $+ .ini $3 Level 5
    Writeini -n $nick $+ .ini $3 ExpNeeded 20
    Writeini -n $nick $+ .ini $3 Exp 0
    Writeini -n $nick $+ .ini $3 SpeedExpNeeded 10
    Writeini -n $nick $+ .ini $3 SExp 0
    Writeini -n $nick $+ .ini $3 Gender $readini($nick $+ .ini,$nick,Gender)
    writeini -n $nick $+ .ini $3 Aura 8
    writeini -n $nick $+ .ini $3 BAura 1
    Writeini -n $nick $+ .ini $3 Thunder-ShockMPP 30 
    Writeini -n $nick $+ .ini $3 CharmMPP 20
    Writeini -n $nick $+ .ini $nick Pokemon $3
    Writeini -n $nick $+ .ini $nick Pokemon2 None
    Writeini -n $nick $+ .ini Pokemon $3 yes
    Notice $Nick We are Almost Done, Now Please Pm $Me with `Password APassword(This Password will be Used, So You Can Log In To Your Account!) 
  }
  if ($3 == Hoppip) && ($Nick == Super_Luigi) {
    Writeini -n $nick $+ .ini Register Starter Yes
    Writeini -n $nick $+ .ini $3 Pokemon $3
    Writeini -n $nick $+ .ini $3 MAttack 20
    Writeini -n $nick $+ .ini $3 MSAttack 20
    Writeini -n $nick $+ .ini $3 MDefense 20
    Writeini -n $nick $+ .ini $3 MSDefense 20
    Writeini -n $nick $+ .ini $3 MIntelligence 6
    Writeini -n $nick $+ .ini $3 MAccuracy 6
    Writeini -n $nick $+ .ini $3 MAgility 6
    Writeini -n $nick $+ .ini $3 Speed 11
    Writeini -n $nick $+ .ini $3 MSpeed 11
    Writeini -n $nick $+ .ini $3 FSpeed 1
    Writeini -n $nick $+ .ini $3 MFSpeed 1
    Writeini -n $nick $+ .ini $3 MHp 50
    Writeini -n $nick $+ .ini $3 Type Grass
    Writeini -n $nick $+ .ini $3 Type2 Flying
    Writeini -n $nick $+ .ini $3 $3 Yes
    Writeini -n $nick $+ .ini $3 Attack1 Splash
    Writeini -n $nick $+ .ini $3 Attack2 None
    Writeini -n $nick $+ .ini $3 Attack3 None
    Writeini -n $nick $+ .ini $3 Attack4 None
    Writeini -n $nick $+ .ini $3 Level 5
    Writeini -n $nick $+ .ini $3 ExpNeeded 20
    Writeini -n $nick $+ .ini $3 Exp 0
    Writeini -n $nick $+ .ini $3 SpeedExpNeeded 10
    Writeini -n $nick $+ .ini $3 SExp 0
    Writeini -n $nick $+ .ini $3 Gender $readini($nick $+ .ini,$nick,Gender)
    writeini -n $nick $+ .ini $3 Aura 7
    writeini -n $nick $+ .ini $3 BAura 1
    Writeini -n $nick $+ .ini $3 SplashMPP 40 
    Writeini -n $nick $+ .ini $nick Pokemon $3
    Writeini -n $nick $+ .ini $nick Pokemon2 None
    Writeini -n $nick $+ .ini Pokemon $3 yes
    Notice $Nick We are Almost Done, Now Please Pm $Me with `Password APassword(This Password will be Used, So You Can Log In To Your Account!) 
  }
}
on *:text:*`Password *:?:{
  if ($readini($nick $+ .ini,Register,Name) != Yes) { Notice $nick You have not made a Name! | halt }
  if ($readini($nick $+ .ini,Register,Gender) != Yes) { Notice $nick You have not made a Gender! | halt }
  if ($readini($nick $+ .ini,Register,Starter) != Yes) { Notice $nick You have not made a Starter! | halt }
  if (/ isin $2) { Notice $nick Please reword it! | halt }
  if ($ isin $2) { Notice $nick Please reword it! | halt }
  if ( isin $3) { Notice $nick Please reword it! | halt }
  if (? isin $2) { Notice $nick Please reword it! | halt }
  if (, isin $2-) { Notice $nick Please reword it! | halt }
  if (Romeo isin $2-) { Notice $nick Please reword it! | halt }
  if (_ isin $2-) { Notice $nick Please reword it! | halt }
  if (* isin $2-) { Notice $nick Please reword it! | halt }
  if ($null == $2-) { Notice $nick Please reword it! | halt }
  if (; isin $2-) { Notice $nick Please reword it! | halt }
  if (: isin $2-) { Notice $nick Please reword it! | halt }
  if (+ isin $2-) { Notice $nick Please reword it! | halt }
  if (^ isin $2-) { Notice $nick Please reword it! | halt }
  if (. isin $2-) { Notice $nick Please reword it! | halt }
  if ($len($2) < 5) { Notice $nick Sorry But This Password is Too Short! | halt }
  if ($readini($nick $+ .ini,Password,Pass) == $null) {
    if ($2 == $Null) { Notice $nick Please Type `Pass (Password) | halt }
    writeini -n $nick $+ .ini Password Pass $2
    writeini -n $nick $+ .ini Register Complete Yes
    mode %Chanset +v $nick 
    notice $nick 10Your Password is3 $2
    notice $nick Your Registration is Complete, Type 3`Help0 To get Help! Enjoy!
    writeini -n $nick $+ .ini Password LoggedIn Yes
    Heal $nick
    write Registered+.txt $nick
    writeini Registered $+ .ini Registered $address($nick,2) $Nick 
    halt
  }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Please Log in | halt }
  if ($2 == $Null) { Notice $nick Please Type `Pass (Password) | halt }
  writeini $nick $+ .ini Password Pass $2
  mode %Chanset +v $nick 
  notice $nick 12Your Password is3 $2
  writeini $nick $+ .ini Password LoggedIn Yes
}
on *:text:*`Login *:?:{
  if ($2 == $readini($nick $+ .ini,Password,pass)) {
    writeini -n $nick $+ .ini Password LoggedIn Yes
    notice $nick You have logged in!
    mode %Chanset +v $nick 
    halt
  }
}
on *:text:*`LogOut:*: {
  writeini -n $nick $+ .ini Password LoggedIn No
  notice $nick You have now logged out!
  mode %Chanset -v $nick
  halt
}
on *:join:#:{
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11Welcome to9 $chan $+ !11 I am9 $me 11a9 Pokemon Bot11. Type 9`Register11 To Begin. | halt }
  if (%ChanSet == $Chan) { Notice $nick 11Welcome to9 $chan $+ ! 11Your Already Registered but if you need any help on the bot, Type 9`help. }
  if ($readini($nick $+ .ini,Register,Complete) == Yes) {
    if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { halt }
    writeini -n $nick $+ .ini Password LoggedIn No
  }
}
on *:nick:{
  if ($readini($nick $+ .ini,Register,Complete) != Yes) && ($readini($nick $+ .ini,Register,Name) == Yes) { Remove -b $Nick $+ .ini }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { halt }
  writeini -n $nick $+ .ini Password LoggedIn No
  mode %Chanset -v $nick
}
on *:part:#:{
  if ($readini($nick $+ .ini,Register,Complete) != Yes) && ($readini($nick $+ .ini,Register,Name) == Yes) { Remove -b $Nick $+ .ini }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { halt }
  writeini -n $nick $+ .ini Password LoggedIn No
}
on *:Quit:{
  if ($readini($nick $+ .ini,Register,Complete) != Yes) && ($readini($nick $+ .ini,Register,Name) == Yes) { Remove -b $Nick $+ .ini }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { halt }
  writeini -n $nick $+ .ini Password LoggedIn No
}
on 1:text:`Stats:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  LvLCheck $Nick
  notice $nick 11Trainer: $Name($Nick) $+ 15,1 -11,1 Pokemon: $Pokemon($Nick) $+ 15,1 -11,1 Hp $+ / $+ Max Hp:15 $Stat($nick,Hp) $+ / $+ $Stat($nick,MHP) 15-11 SAttack:15 $Stat($nick,SAttack) 15-11 SDefense:15 $Stat($nick,SDefense) 15-11 Attack:15 $Stat($nick,Attack) 15-11 Defense:15 $Stat($nick,Defense) 15-11 Speed:15 $Stat($nick,FSpeed) $+ / $+ 10 15-11 Level:15 $Stat($nick,Level) 15-11 Exp:15 $Stat($nick,Exp) $+ / $+ $Stat($nick,ExpNeeded)
  Unset %Aura
  Unset %BAura
}
on *:text:`Speed Stats:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  SpeedCheck $nick
  Notice $nick 8Speed:15 $Stat($nick,FSpeed) $+ 12/15 $+ 10 8-8 Speed Exp Needed To LvL Up Speed:15 $Stat($nick,SExp) $+ 12/15 $+ $Stat($nick,SpeedExpNeeded)
}
on *:text:`Trainer Stats:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,$nick,TrainerLevel) == $Null) { writeini $nick $+ .ini $nick TrainerLevel 1 }
  if ($readini($nick $+ .ini,$nick,TExpNeeded) == $Null) { writeini $nick $+ .ini $nick TExpNeeded 10 }
  TLvLCheck $nick
  Notice $nick 9Trainer Level:15 $readini($nick $+ .ini,$Nick,TrainerLevel) 8-8 Trainer Exp Needed To LvL Up Level:15 $readini($nick $+ .ini,$Nick,TExp) $+ 12/15 $+ $readini($nick $+ .ini,$Nick,TExpNeeded)
}
alias Stat {
  %Pokemon = $readini($1 $+ .ini,$1,Pokemon) 
  return $readini($1 $+ .ini,%Pokemon,$2)
}
alias Name {
  %Aura = $readini($1 $+ .ini,$1,Aura)
  %BAura = $readini($1 $+ .ini,$1,BAura)
  return  $+ %Aura $+ , $+ %BAura $+ $readini($1 $+ .ini,$1,Name) $+ 
}
alias Pokemon {
  %Pokemon = $readini($1 $+ .ini,$1,Pokemon) 
  %Aura = $readini($1 $+ .ini,%Pokemon,Aura) 
  %BAura = $readini($1 $+ .ini,%Pokemon,BAura)
  if ($readini($1 $+ .ini,$1,WNPC) == Yes) { %Aura = $readini($1 $+ .ini,$1,PAura) | %BAura = $readini($1 $+ .ini,$1,PBAura) | Return  $+ %Aura $+ , $+ %BAura $+ $1 $+  }
  if ($readini($1 $+ .ini,%Pokemon,Name) == $Null) { Return  $+ %Aura $+ , $+ %BAura $+ %Pokemon $+  }
  return  $+ %Aura $+ , $+ %BAura $+ $readini($1 $+ .ini,%Pokemon,Name) $+ 
}
alias BName {
  %Aura = $readini($1 $+ .ini,$1,Aura) 
  %BAura = $readini($1 $+ .ini,$1,BAura)
  if ($readini($1 $+ .ini,$1,WNpc) == Yes) { Return  $+ %Aura $+ , $+ %BAura $+ $Name($1) $+  $+ 14,1( $+ $readini($1 $+ .ini,$1,PAura) $+ , $+ $readini($1 $+ .ini,$1,PBAura) $+ $1 $+ 14,1) }
  return  $+ %Aura $+ , $+ %BAura $+ $Name($1) $+  $+ 14,1( $+ $Pokemon($1) $+ 14,1)
}
alias Gender {
  if ($readini($1 $+ .ini,$1,Gender) == Male) { Return His }
  if ($readini($1 $+ .ini,$1,Gender) == Female) { Return Her }
}
alias Gender2 {
  if ($readini($1 $+ .ini,$1,Gender) == Male) { Return Him }
  if ($readini($1 $+ .ini,$1,Gender) == Female) { Return Her }
}
alias PGender {
  if ($readini($1 $+ .ini,$Poke($1),Gender) == Male) { Return His }
  if ($readini($1 $+ .ini,$Poke($1),Gender) == Female) { Return Her }
}
alias PGender2 {
  if ($readini($1 $+ .ini,$Poke($1),Gender) == Male) { Return Him }
  if ($readini($1 $+ .ini,$Poke($1),Gender) == Female) { Return Her }
}
alias Poke {
  %Pokemon = $readini($1 $+ .ini,$1,Pokemon) 
  return %Pokemon
}
on 1:text:`Attacks:#:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  unset %Moves
  Set %Moves 4Attacks $Pokemon($Nick) $+ 4,1 Knows:15
  if ($readini($nick $+ .ini,$Poke($Nick),Attack1) != None) { Set %Moves %Moves $readini($nick $+ .ini,$Poke($Nick),Attack1) $+ $MovePP($Nick,Attack1) }
  if ($readini($nick $+ .ini,$Poke($Nick),Attack2) != None) { Set %Moves %Moves $readini($nick $+ .ini,$Poke($Nick),Attack2) $+ $MovePP($Nick,Attack2) }
  if ($readini($nick $+ .ini,$Poke($Nick),Attack3) != None) { Set %Moves %Moves $readini($nick $+ .ini,$Poke($Nick),Attack3) $+ $MovePP($Nick,Attack3) }
  if ($readini($nick $+ .ini,$Poke($Nick),Attack4) != None) { Set %Moves %Moves $readini($nick $+ .ini,$Poke($Nick),Attack4) $+ $MovePP($Nick,Attack4) }
  Notice $nick %Moves 
  Unset %Moves
  Unset %Pokemon
}
alias MovePP {
  Set %Move $readini($1 $+ .ini,$Poke($1),$2) $+ PP
  Set %Move2 $readini($1 $+ .ini,$Poke($1),$2) $+ MPP
  return 12(14 $+ $readini($1 $+ .ini,$Poke($1),%Move) $+ 12/14 $+ $readini($1 $+ .ini,$Poke($1),%Move2) $+ 12)15
}
on 1:text:`Items:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  Unset %Items
  if ($readini($nick $+ .ini,Items,Potion) > 0) { Set %Items %Items $Item($nick,Potion) 7-0 }
  if ($readini($nick $+ .ini,Items,Ether) > 0) { Set %Items %Items $Item($nick,Ether) 7-0 }
  if ($readini($nick $+ .ini,Items,Antidote) > 0) { Set %Items %Items $Item($nick,Antidote) 7-0 }
  if ($readini($nick $+ .ini,Items,Pokeball) > 0) { Set %Items %Items $Item($nick,Pokeball) 7-0 }
  if ($readini($nick $+ .ini,Items,Greatball) > 0) { Set %Items %Items $Item($nick,Greatball) 7-0 }
  if ($readini($nick $+ .ini,Items,Ultraball) > 0) { Set %Items %Items $Item($nick,Ultraball) 7-0 }
  if ($readini($nick $+ .ini,Items,Masterball) > 0) { Set %Items %Items $Item($nick,Masterball) 7-0 }
  if ($readini($nick $+ .ini,Items,Awake) > 0) { Set %Items %Items $Item($nick,Awake) 7-0 }
  if ($readini($nick $+ .ini,Items,ParaHeal) > 0) { Set %Items %Items $Item($nick,ParaHeal) 7-0 }
  if ($readini($nick $+ .ini,Items,RareCandy) > 0) { Set %Items %Items $Item($nick,RareCandy) 7-0 }
  if ($readini($nick $+ .ini,Items,ThunderStone) > 0) { Set %Items %Items $Item($nick,ThunderStone) 7-0 }
  if ($readini($nick $+ .ini,Items,LeafStone) > 0) { Set %Items %Items $Item($nick,LeafStone) 7-0 }
  if ($readini($nick $+ .ini,Items,FireStone) > 0) { Set %Items %Items $Item($nick,FireStone) 7-0 }
  if ($readini($nick $+ .ini,Items,SunStone) > 0) { Set %Items %Items $Item($nick,SunStone) 7-0 }
  if ($readini($nick $+ .ini,Items,MetalCoat) > 0) { Set %Items %Items $Item($nick,MetalCoat) 7-0 }
  if ($readini($nick $+ .ini,Items,WaterStone) > 0) { Set %Items %Items $Item($nick,WaterStone) 7-0 }
  Notice $nick 9Items:0 %Items
  Unset %Items
  Unset %Pokemon
  Unset %Aura
  Unset %BAura
}
on 1:text:`Tms:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  Unset %TMS
  if ($readini($nick $+ .ini,Tm,Tm34) == Yes) { Set %TMS %TMS Tm34(Mud-Slap) 7-0 }
  if ($readini($nick $+ .ini,Tm,Tm11) == Yes) { Set %TMS %TMS Tm11(Swift) 7-0 }
  if ($readini($nick $+ .ini,Tm,Tm24) == Yes) { Set %TMS %TMS Tm24(Thunder-Wave) 7-0 }
  if ($readini($nick $+ .ini,Tm,Tm26) == Yes) { Set %TMS %TMS Tm26(EarthQuake) 7-0 }
  if ($readini($nick $+ .ini,Tm,Tm21) == Yes) { Set %TMS %TMS Tm21(MegaDrain) 7-0 }
  if ($readini($nick $+ .ini,Tm,Tm38) == Yes) { Set %TMS %TMS Tm38(BlastBurn) 7-0 }
  if ($readini($nick $+ .ini,Tm,Tm46) == Yes) { Set %TMS %TMS Tm46(Calm-Mind) 7-0 }
  if ($readini($nick $+ .ini,Tm,Tm06) == Yes) { Set %TMS %TMS Tm06(Toxic) 7-0 }
  if ($readini($nick $+ .ini,Tm,Tm27) == Yes) { Set %TMS %TMS Tm27(Fissure) 7-0 }
  Notice $nick 9Tms:0 %Tms
  Unset %Tms
}
alias Item {
  return $2 $+ ( $+ $readini($1 $+ .ini,Items,$2) $+ )
}
on 1:text:`Money:#:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,Bank,Bank) == Yes) && ($readini($nick $+ .ini,Items,GC) > 0) { Notice $nick 7Gil:8 $readini($nick $+ .ini,$Nick,Money) 7GC:8 $readini($nick $+ .ini,Items,GC) 7Bank:8 $readini($nick $+ .ini,Bank,Amount) $+ 12/08 $+ $readini($nick $+ .ini,Bank,Limit) | halt }
  if ($readini($nick $+ .ini,Bank,Bank) == Yes) { Notice $nick 7Gil:8 $readini($nick $+ .ini,$Nick,Money) 7Bank:8 $readini($nick $+ .ini,Bank,Amount) $+ 12/08 $+ $readini($nick $+ .ini,Bank,Limit) | halt }
  if ($readini($nick $+ .ini,Items,Gc) > 0) { Notice $nick 7Gil:8 $readini($nick $+ .ini,$Nick,Money) 7GC:8 $readini($nick $+ .ini,Items,GC) | halt }
  Notice $nick 7Money:8 $readini($nick $+ .ini,$Nick,Money)
}
on *:text:`NickName *:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,$Poke($Nick),Named) == Yes) { Notice $nick You already Gave $Poke($Nick) a Name! | halt }
  if (/ isin $2-) { Notice $nick Please reword it! | halt }
  if ($ isin $2-) { Notice $nick Please reword it! | halt }
  if (_ isin $2-) { Notice $nick Please reword it! | halt }
  if (* isin $2-) { Notice $nick Please reword it! | halt }
  if ($null == $2-) { Notice $nick Please reword it! | halt }
  if (; isin $2-) { Notice $nick Please reword it! | halt }
  if (: isin $2-) { Notice $nick Please reword it! | halt }
  if (+ isin $2-) { Notice $nick Please reword it! | halt }
  if (- isin $2-) { Notice $nick Please reword it! | halt }
  if (| isin $2-) { Notice $nick Please reword it! | halt }
  if (' isin $2-) { Notice $nick Please reword it! | halt }
  if (" isin $2-) { Notice $nick Please reword it! | halt }
  if (^ isin $2-) { Notice $nick Please reword it! | halt }
  if (% isin $2-) { Notice $nick Please reword it! | halt }
  if (# isin $2-) { Notice $nick Please reword it! | halt }
  if (^ isin $2-) { Notice $nick Please reword it! | halt }
  if (. isin $2-) { Notice $nick Please reword it! | halt }
  if ($2 == $Nick) { Notice $nick Please Change It! | halt }
  if ($2 == Items) { Notice $nick Please Change It! | halt }
  if ($len($2) < 2) { Notice $nick Sorry But This Name is Too Short! | halt }
  if ($len($2) > 10) { Notice $nick Sorry But This Name is Too Long! | halt }
  writeini -n $nick $+ .ini $Poke($Nick) Name $2-
  writeini -n $nick $+ .ini $Poke($Nick) Named Yes
  Notice $nick 15You Named Your Pokemon9 $2- $+ !
}
on 1:text:`Help:#:{
  Notice $nick 8Help Topics: 9Register 7-9 Healing 7-9 BattleArena 7-9 Battle 7-9 NickName 7-9 Catching-Pokemon 7-9 Using-Items 7-9 PokeMart 7-9 Places 7-9 Travel 7-9 Evolve 7-9 Speed 7-9 Trainer-Level 7-9 Training 7-9 Motto 7-9 Pc 7-9 Trading-Pokemon 7-9 Gyms 7-9 Tms 7-9 Partners 7-9 2vs2-Battles 8Type `Help (Topic)
}
on 1:text:`Help*:#: {
  If ($2 == Register) { notice $nick Type `Register, Then Follow the Steps, If Nothing Appears after you put the command, Please Wait 5-10 Second because it could be Lag. | halt }
  If ($2 == Healing) { notice $nick Type `PokeCenter To Heal! Different Areas have Different Healing Times! | Halt }
  If ($2 == BattleArena) { notice $nick Battle Arena is an All Out Battle of Every One! Type `Enter Arena to Enter & `Leave Arena to Get Out! Typed `Entered To See who is in Battle Field! | Halt }
  If ($2 == Battle) { notice $nick Type `Battle for an Open Battle(Any One May Accept) `Battle Person(A Specific Person Will Be Chosen) To Accept, `Accept Open Person(Accepting The Open Challenge) `Accept Challenge Person(The Person who Challenged You). Withdraw Open Challenge by `Withdraw | Halt }
  If ($2 == NickName) { notice $nick To NickName Your Pokemon, `NickName <Name>, You Cannot ReName it Again! | Halt }
  If ($2 == Catching-Pokemon) { notice $nick Lower The Wild Pokemons Hp! When You Think its Low Enough Type `Throw (Ball) (Wild Pokemon), Example: `Throw PokeBall Pidgey | Halt }
  If ($2 == Using-Items) { notice $nick To Use an Item, Type `Use (Item), Example: `Use Potion | Halt }
  If ($2 == PokeMart) { notice $nick Type `Places to see if a PokeMart is There! If There is Type `PokeMart, Once You Wanna Buy an Item, Type `Buy (Item) (Amount), Example: `Buy Potion 2 | Halt }
  If ($2 == Places) { notice $nick You Can Travel to Other Places, For Gyms, Items, Etc. Type `Places To see What that Place has! | Halt }
  If ($2 == Travel) { notice $nick To Travel, Type `Travel (Place), Type `Map to see What Places You Can go! Example: `Travel Pallet-Town | Halt }
  If ($2 == Motto) { notice $nick Type `Motto <Txt> To do a Motto! | Halt }
  If ($2 == Gyms) { notice $nick Each Time You Travel to a new Place Type `Places, If Gym is There, You may fight for a Badge! | Halt }
  If ($2 == Evolve) { notice $nick You Have a choice, If You want to Evolve a Pokemon or Not, By `Change Evolve. Not Evolving a Pokemon has some Advantages, Such as Learning Moves a Bit Earlier or Moves that Your next Evolve form will not. Evolving Occurs When a Pokemon Reaches a Certain Level. Btw There are Chances Your Pokemon wont Evolve on the Exact its suppose to! | Halt }
  If ($2 == Speed) { notice $nick Each Pokemon has a Speed Level. This Determines the Duration of how Long an Attack May Take. Type `Speed Stats to see your Speed Level and How much Speed You Need to Level it Up. | Halt }
  If ($2 == Trainer-Level) { notice $nick Trainer level allows you to goto Other Places. Type `Trainer Stats to see Your Trainer Level and How much Exp is Needed to Level it up. To Gain Trainer Exp, You Level Pokemon, Evolve Pokemon, Catch Pokemon, Win Battles in 1 Vs. 1 Battles, & Winning Badges! | Halt }
  If ($2 == Training) { notice $nick Training Helps Pokemon Level Up! Command: `Start Training (Bag). `TEnd Time Left to see How long you have in Training! `TA Time Left To See When You Can Train Again! Supa+Weak+Bag is Free and For Pokemon Below Level 10. Weak+Bag is Free and For Pokemon Below Level 20. Punch+Bag Cost 75 Zenny is For Pokemon Below Level 40. | Halt }
  If ($2 == Pc) { notice $nick Type 4`Start Pc15 to Create a Pc Account, It Costs 1000 Zenny, You Get 3 Storage space, to get More Space, Type 4`Upgrade Pc15. To Deposit pokemon 4`Deposit Pokemon15. To Withdraw Pokemon 4`Withdraw Pokemon15. | Halt }
  If ($2 == Trading-Pokemon) { notice $nick To Trade Pokemon, Both People need PC Accounts. `Trade Person PokemonYouOffer PokemonYouWant & `Accept Trade Person YourPokemonHeWants PokemonHeOffered, If You Dont Wanna Trade do not type anything. 4Example: `Trade Romeo Torchic Charmander 15-4 `Accept Trade Hamlet Charmander Torchic | Halt } 
  If ($2 == Tms) { notice $nick Using Tms: `Use Tm# (Move You Want to Delete) 4Note - Even if you dont have 4 moves put a move, it will not get deleted! Also If It says Nothing and You Know your Pokemon learns that move Pm Romeo with Evidence! | Halt }
  If ($2 == Partners) { notice $nick Partners are for 2vs2 Battles! Type `Partner SomeOne. To Accept: `Accept Partner PersonWhoOffered! Type `Drop Partner To Drop Partner! | Halt }
  If ($2 == 2vs2-Battles) { notice $nick You Need a Partner, He/She Must be In Room! Type `TBattle To Declare an open Challenge! To Accept: `Accept 2vs2 OneOfThePeopleWhoWantedA2Vs2Battle! To Withdraw: `TWithdraw | Halt }
}
on 1:text:`Change Evolve:#:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,$Poke($Nick),WantEvolve) == Yes) { writeini -n $nick $+ .ini $Poke($Nick) WantEvolve No | Notice $Nick You Have Made it So $Poke($Nick) Will not Evolve! | Halt }
  if ($readini($nick $+ .ini,$Poke($Nick),WantEvolve) == No) { writeini -n $nick $+ .ini $Poke($Nick) WantEvolve Yes | Notice $Nick You Have Made it So $Poke($Nick) Will Evolve! | Halt }
  if ($readini($nick $+ .ini,$Poke($Nick),WantEvolve) == $Null) { writeini -n $nick $+ .ini $Poke($Nick) WantEvolve Yes | Notice $Nick You Have Made it So $Poke($Nick) Will Evolve! | Halt }
}
on 1:text:`Switch*:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($2 == $Null) { Notice $nick Its `Switch (NewPokemon) | halt }
  if ($readini($nick $+ .ini,$2,Pokemon) == $Null) { Notice $nick You Dont Have $2 $+ ! | halt }
  if ($readini($nick $+ .ini,$2,Stored) == Yes) { Notice $nick $2 is Stored! | halt }
  if (%Learning == $nick) { Notice $nick $Pokemon($Nick) $+ 0,1 is Learning a Move! | halt }  
  if ($readini($nick $+ .ini,$nick,Fighting) == yes) { Notice $nick You Are Battling! | halt }
  if ($readini($Nick $+ .ini,$Nick,2Vs2) == yes) { Notice $nick Your Still in the 2vs2 Battle! | halt }
  if (%intourney. [ $+ [ $nick ] ] = yes) { halt }
  writeini $nick $+ .ini $nick Pokemon $2
  Msg %ChanSet $Name($Nick) $+ 9,1 Switched Pokemons!
}
on 1:TEXT:`Motto*:#:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($2- == $null) { notice $nick Add Some Words! | halt }
  if (/ isin $2-) { Notice $nick Please reword it! | halt }
  if ($ isin $2-) { Notice $nick Please reword it! | halt }
  if (* isin $2-) { Notice $nick Please reword it! | halt }
  if (| isin $2-) { Notice $nick Please reword it! | halt }
  if (% isin $2-) { Notice $nick Please reword it! | halt }
  if (# isin $2-) { Notice $nick Please reword it! | halt }
  writeini -n $nick $+ .ini $nick Motto $2-
  Notice $nick 0You Have Changed Your Battle Motto To " $+ $2- $+ " 
}
alias Motto {
  return $readini($1 $+ .ini,$1,Motto)
}
on 1:TEXT:`Read*:#:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($2 $+ .ini,Register,Complete) != Yes) { Notice $nick No Such User! | halt }
  Notice $nick $Name($2) $+ 0,1's Stats: $Pokemon($2) $+ 0,1 is $Poke($2) a $Stat($2,Type) Type Pokemon. 0Type 2:15 $Stat($2,Type2) 7-0 Hp:15 $Stat($2,Hp)
}
on *:text:*`Pokedex:#:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  Unset %Pokemon
  if ($readini($nick $+ .ini,Pokemon,Charmander) == yes) { Set %Pokemon %Pokemon Charmander }
  if ($readini($nick $+ .ini,Pokemon,Charmeleon) == yes) { Set %Pokemon %Pokemon Charmeleon }
  if ($readini($nick $+ .ini,Pokemon,Charizard) == yes) { Set %Pokemon %Pokemon Charizard }
  if ($readini($nick $+ .ini,Pokemon,Bulbasaur) == yes) { Set %Pokemon %Pokemon Bulbasaur }
  if ($readini($nick $+ .ini,Pokemon,Ivysaur) == yes) { Set %Pokemon %Pokemon Ivysaur }
  if ($readini($nick $+ .ini,Pokemon,Venusaur) == yes) { Set %Pokemon %Pokemon Venusaur }
  if ($readini($nick $+ .ini,Pokemon,Squirtle) == yes) { Set %Pokemon %Pokemon Squirtle }
  if ($readini($nick $+ .ini,Pokemon,Wartortle) == yes) { Set %Pokemon %Pokemon Wartortle }
  if ($readini($nick $+ .ini,Pokemon,Blastoise) == yes) { Set %Pokemon %Pokemon Blastoise }
  if ($readini($nick $+ .ini,Pokemon,Chikorita) == yes) { Set %Pokemon %Pokemon Chikorita }
  if ($readini($nick $+ .ini,Pokemon,Bayleef) == yes) { Set %Pokemon %Pokemon Bayleef }
  if ($readini($nick $+ .ini,Pokemon,Meganium) == yes) { Set %Pokemon %Pokemon Charizard }
  if ($readini($nick $+ .ini,Pokemon,Cyndaquil) == yes) { Set %Pokemon %Pokemon Cyndaquil }
  if ($readini($nick $+ .ini,Pokemon,Quilava) == yes) { Set %Pokemon %Pokemon Quilava }
  if ($readini($nick $+ .ini,Pokemon,Typhlosion) == yes) { Set %Pokemon %Pokemon Typhlosion }
  if ($readini($nick $+ .ini,Pokemon,Totodile) == yes) { Set %Pokemon %Pokemon Totodile }
  if ($readini($nick $+ .ini,Pokemon,Croconaw) == yes) { Set %Pokemon %Pokemon Croconaw }
  if ($readini($nick $+ .ini,Pokemon,Feraligatr) == yes) { Set %Pokemon %Pokemon Feraligatr }
  if ($readini($nick $+ .ini,Pokemon,Torchic) == yes) { Set %Pokemon %Pokemon Torchic }
  if ($readini($nick $+ .ini,Pokemon,Combusken) == yes) { Set %Pokemon %Pokemon Combusken }
  if ($readini($nick $+ .ini,Pokemon,Blaziken) == yes) { Set %Pokemon %Pokemon Blaziken }
  if ($readini($nick $+ .ini,Pokemon,Treecko) == yes) { Set %Pokemon %Pokemon Treecko }
  if ($readini($nick $+ .ini,Pokemon,Grovyle) == yes) { Set %Pokemon %Pokemon Grovyle }
  if ($readini($nick $+ .ini,Pokemon,Sceptile) == yes) { Set %Pokemon %Pokemon Sceptile }
  if ($readini($nick $+ .ini,Pokemon,Mudkip) == yes) { Set %Pokemon %Pokemon Mudkip }
  if ($readini($nick $+ .ini,Pokemon,Marshtomp) == yes) { Set %Pokemon %Pokemon Marshtomp }
  if ($readini($nick $+ .ini,Pokemon,Swampert) == yes) { Set %Pokemon %Pokemon Swampert }
  if ($readini($nick $+ .ini,Pokemon,Pichu) == yes) { Set %Pokemon %Pokemon Pichu }
  if ($readini($nick $+ .ini,Pokemon,Pikachu) == yes) { Set %Pokemon %Pokemon Pikachu }
  if ($readini($nick $+ .ini,Pokemon,Hoppip) == yes) { Set %Pokemon %Pokemon Hoppip }
  if ($readini($nick $+ .ini,Pokemon,Skiploom) == yes) { Set %Pokemon %Pokemon Skiploom }
  if ($readini($nick $+ .ini,Pokemon,Jumpluff) == yes) { Set %Pokemon %Pokemon Jumpluff }
  if ($readini($nick $+ .ini,Pokemon,Raichu) == yes) { Set %Pokemon %Pokemon Raichu }
  if ($readini($nick $+ .ini,Pokemon,Pidgey) == yes) { Set %Pokemon %Pokemon Pidgey }
  if ($readini($nick $+ .ini,Pokemon,Pidgeotto) == yes) { Set %Pokemon %Pokemon Pidgeotto }
  if ($readini($nick $+ .ini,Pokemon,Pidgeot) == yes) { Set %Pokemon %Pokemon Pidgeot }
  if ($readini($nick $+ .ini,Pokemon,Weedle) == yes) { Set %Pokemon %Pokemon Weedle }
  if ($readini($nick $+ .ini,Pokemon,Kakuna) == yes) { Set %Pokemon %Pokemon Kakuna }
  if ($readini($nick $+ .ini,Pokemon,Beedrill) == yes) { Set %Pokemon %Pokemon Beedrill }
  if ($readini($nick $+ .ini,Pokemon,Caterpie) == yes) { Set %Pokemon %Pokemon Caterpie }
  if ($readini($nick $+ .ini,Pokemon,Metapod) == yes) { Set %Pokemon %Pokemon Metapod }
  if ($readini($nick $+ .ini,Pokemon,Butterfree) == yes) { Set %Pokemon %Pokemon Butterfree }
  if (%Pokemon == $null) { Goto skip1 }
  Notice $nick 14Pokemon You Have Caught:15 %Pokemon
  :skip1
  Unset %Pokemon
  if ($readini($nick $+ .ini,Pokemon,Spearow) == yes) { Set %Pokemon %Pokemon Spearow }
  if ($readini($nick $+ .ini,Pokemon,Fearow) == yes) { Set %Pokemon %Pokemon Fearow }
  if ($readini($nick $+ .ini,Pokemon,Rattata) == yes) { Set %Pokemon %Pokemon Rattata }
  if ($readini($nick $+ .ini,Pokemon,Raticate) == yes) { Set %Pokemon %Pokemon Raticate }
  if ($readini($nick $+ .ini,Pokemon,Abra) == yes) { Set %Pokemon %Pokemon Abra }
  if ($readini($nick $+ .ini,Pokemon,Kadabra) == yes) { Set %Pokemon %Pokemon Kadabra }
  if ($readini($nick $+ .ini,Pokemon,Alakazam) == yes) { Set %Pokemon %Pokemon Alakazam }
  if ($readini($nick $+ .ini,Pokemon,Onix) == yes) { Set %Pokemon %Pokemon Onix }
  if ($readini($nick $+ .ini,Pokemon,Steelix) == yes) { Set %Pokemon %Pokemon Steelix }
  if ($readini($nick $+ .ini,Pokemon,Sandshrew) == yes) { Set %Pokemon %Pokemon Sandshrew }
  if ($readini($nick $+ .ini,Pokemon,Sandslash) == yes) { Set %Pokemon %Pokemon Sandslash }
  if ($readini($nick $+ .ini,Pokemon,Staryu) == yes) { Set %Pokemon %Pokemon Staryu }
  if ($readini($nick $+ .ini,Pokemon,Starmie) == yes) { Set %Pokemon %Pokemon Starmie }
  if ($readini($nick $+ .ini,Pokemon,Ekans) == yes) { Set %Pokemon %Pokemon Ekans }
  if ($readini($nick $+ .ini,Pokemon,Arbok) == yes) { Set %Pokemon %Pokemon Arbok }
  if ($readini($nick $+ .ini,Pokemon,Bellsprout) == yes) { Set %Pokemon %Pokemon Bellsprout }
  if ($readini($nick $+ .ini,Pokemon,Weepinbell) == yes) { Set %Pokemon %Pokemon Weepinbell }
  if ($readini($nick $+ .ini,Pokemon,Victreebell) == yes) { Set %Pokemon %Pokemon Victreebell }
  if ($readini($nick $+ .ini,Pokemon,Oddish) == yes) { Set %Pokemon %Pokemon Oddish }
  if ($readini($nick $+ .ini,Pokemon,Gloom) == yes) { Set %Pokemon %Pokemon Gloom }
  if ($readini($nick $+ .ini,Pokemon,Vileplume) == yes) { Set %Pokemon %Pokemon Vileplume }
  if ($readini($nick $+ .ini,Pokemon,Bellossom) == yes) { Set %Pokemon %Pokemon Bellossom }
  if ($readini($nick $+ .ini,Pokemon,Eevee) == yes) { Set %Pokemon %Pokemon Eevee }
  if ($readini($nick $+ .ini,Pokemon,Jolteon) == yes) { Set %Pokemon %Pokemon Jolteon }
  if ($readini($nick $+ .ini,Pokemon,Vaporeon) == yes) { Set %Pokemon %Pokemon Vaporeon }
  if ($readini($nick $+ .ini,Pokemon,Flareon) == yes) { Set %Pokemon %Pokemon Flareon }
  if ($readini($nick $+ .ini,Pokemon,Espeon) == yes) { Set %Pokemon %Pokemon Espeon }
  if ($readini($nick $+ .ini,Pokemon,Umbreon) == yes) { Set %Pokemon %Pokemon Umbreon }
  if ($readini($nick $+ .ini,Pokemon,Nidoran-M) == yes) { Set %Pokemon %Pokemon Nidoran-M }
  if ($readini($nick $+ .ini,Pokemon,Nidorino) == yes) { Set %Pokemon %Pokemon Nidorino }
  if ($readini($nick $+ .ini,Pokemon,Nidoking) == yes) { Set %Pokemon %Pokemon Nidoking }
  if ($readini($nick $+ .ini,Pokemon,Nidoran-F) == yes) { Set %Pokemon %Pokemon Nidoran-F }
  if ($readini($nick $+ .ini,Pokemon,Nidorina) == yes) { Set %Pokemon %Pokemon Nidorina }
  if ($readini($nick $+ .ini,Pokemon,Nidoqueen) == yes) { Set %Pokemon %Pokemon Nidoqueen }
  if ($readini($nick $+ .ini,Pokemon,Vulpix) == yes) { Set %Pokemon %Pokemon Vulpix }
  if ($readini($nick $+ .ini,Pokemon,Ninetales) == yes) { Set %Pokemon %Pokemon Ninetales }
  if ($readini($nick $+ .ini,Pokemon,Venonat) == yes) { Set %Pokemon %Pokemon Venonat }
  if ($readini($nick $+ .ini,Pokemon,Venomoth) == yes) { Set %Pokemon %Pokemon Venomoth }
  if ($readini($nick $+ .ini,Pokemon,Rhyhorn) == yes) { Set %Pokemon %Pokemon Rhyhorn }
  if ($readini($nick $+ .ini,Pokemon,Rhydon) == yes) { Set %Pokemon %Pokemon Rhydon }
  if ($readini($nick $+ .ini,Pokemon,Magikarp) == yes) { Set %Pokemon %Pokemon Magikarp }
  if ($readini($nick $+ .ini,Pokemon,Gyarados) == yes) { Set %Pokemon %Pokemon Gyarados }
  if ($readini($nick $+ .ini,Pokemon,Gastly) == yes) { Set %Pokemon %Pokemon Gastly }
  if ($readini($nick $+ .ini,Pokemon,Haunter) == yes) { Set %Pokemon %Pokemon Haunter }
  if ($readini($nick $+ .ini,Pokemon,Gengar) == yes) { Set %Pokemon %Pokemon Gengar }

  if ($readini($nick $+ .ini,Pokemon,Golduck) == yes) { Set %Pokemon %Pokemon Golduck }
  if ($readini($nick $+ .ini,Pokemon,Dratini) == yes) { Set %Pokemon %Pokemon Dratini }
  if ($readini($nick $+ .ini,Pokemon,Dragonair) == yes) { Set %Pokemon %Pokemon Dragonair }
  if ($readini($nick $+ .ini,Pokemon,Dragonite) == yes) { Set %Pokemon %Pokemon Dragonite }
  if ($readini($nick $+ .ini,Pokemon,Geodude) == yes) { Set %Pokemon %Pokemon Geodude }
  if ($readini($nick $+ .ini,Pokemon,Graveler) == yes) { Set %Pokemon %Pokemon Graveler }
  if ($readini($nick $+ .ini,Pokemon,Golem) == yes) { Set %Pokemon %Pokemon Golem }
  if ($readini($nick $+ .ini,Pokemon,Psyduck) == yes) { Set %Pokemon %Pokemon Psyduck }
  if ($readini($nick $+ .ini,Pokemon,Elekid) == yes) { Set %Pokemon %Pokemon Elekid }
  if ($readini($nick $+ .ini,Pokemon,Electabuzz) == yes) { Set %Pokemon %Pokemon Electabuzz }
  if ($readini($nick $+ .ini,Pokemon,Houndour) == yes) { Set %Pokemon %Pokemon Houndour }
  if ($readini($nick $+ .ini,Pokemon,Houndoom) == yes) { Set %Pokemon %Pokemon Houndoom }
  if ($readini($nick $+ .ini,Pokemon,Teddiursa) == yes) { Set %Pokemon %Pokemon Teddiursa }
  if ($readini($nick $+ .ini,Pokemon,Ursaring) == yes) { Set %Pokemon %Pokemon Ursaring }
  if (%Pokemon == $null) { goto skip2 }
  Notice $nick 15 $+ %Pokemon
  :skip2
  //unset %Pokemon
  if ($readini($nick $+ .ini,Pokemon,Mankey) == yes) { Set %Pokemon %Pokemon Mankey }
  if ($readini($nick $+ .ini,Pokemon,Primeape) == yes) { Set %Pokemon %Pokemon Primeape }
  if ($readini($nick $+ .ini,Pokemon,Zubat) == yes) { Set %Pokemon %Pokemon Zubat }
  if ($readini($nick $+ .ini,Pokemon,Golbat) == yes) { Set %Pokemon %Pokemon Golbat }
  if ($readini($nick $+ .ini,Pokemon,Crobat) == yes) { Set %Pokemon %Pokemon Crobat }
  if ($readini($nick $+ .ini,Pokemon,Machop) == yes) { Set %Pokemon %Pokemon Machop }
  if ($readini($nick $+ .ini,Pokemon,Machoke) == yes) { Set %Pokemon %Pokemon Machoke }
  if ($readini($nick $+ .ini,Pokemon,Machamp) == yes) { Set %Pokemon %Pokemon Machamp }
  if ($readini($nick $+ .ini,Pokemon,Kabuto) == yes) { Set %Pokemon %Pokemon Kabuto }
  if ($readini($nick $+ .ini,Pokemon,Kabutops) == yes) { Set %Pokemon %Pokemon Kabutops }
  if ($readini($nick $+ .ini,Pokemon,Omanyte) == yes) { Set %Pokemon %Pokemon Omanyte }
  if ($readini($nick $+ .ini,Pokemon,Omastar) == yes) { Set %Pokemon %Pokemon Omastar }
  if ($readini($nick $+ .ini,Pokemon,Aerodactyl) == yes) { Set %Pokemon %Pokemon Aerodactyl }
  if ($readini($nick $+ .ini,Pokemon,Lapras) == yes) { Set %Pokemon %Pokemon Lapras }

  if ($readini($nick $+ .ini,Pokemon,Poliwag) == yes) { Set %Pokemon %Pokemon Poliwag }
  if ($readini($nick $+ .ini,Pokemon,Poliwhirl) == yes) { Set %Pokemon %Pokemon Poliwhirl }
  if ($readini($nick $+ .ini,Pokemon,Poliwrath) == yes) { Set %Pokemon %Pokemon Poliwrath }
  if ($readini($nick $+ .ini,Pokemon,Politoed) == yes) { Set %Pokemon %Pokemon Politoed }
  if ($readini($nick $+ .ini,Pokemon,Snorlax) == yes) { Set %Pokemon %Pokemon Snorlax }
  if ($readini($nick $+ .ini,Pokemon,Tauros) == yes) { Set %Pokemon %Pokemon Tauros }
  if ($readini($nick $+ .ini,Pokemon,Larvitar) == yes) { Set %Pokemon %Pokemon Larvitar }
  if ($readini($nick $+ .ini,Pokemon,Pupitar) == yes) { Set %Pokemon %Pokemon Pupitar }
  if ($readini($nick $+ .ini,Pokemon,Tyranitar) == yes) { Set %Pokemon %Pokemon Tyranitar }
  if ($readini($nick $+ .ini,Pokemon,Gligar) == yes) { Set %Pokemon %Pokemon Gligar }
  if (%Pokemon == $null) { goto skip3 }
  Notice $nick 15 $+ %Pokemon
  :skip3
  //unset %Pokemon
  if ($readini($nick $+ .ini,Pokemon,Moltres) == yes) { Set %Pokemon %Pokemon Moltres }
  if ($readini($nick $+ .ini,Pokemon,Zapdos) == yes) { Set %Pokemon %Pokemon Zapdos }
  if ($readini($nick $+ .ini,Pokemon,Articuno) == yes) { Set %Pokemon %Pokemon Articuno }
  if ($readini($nick $+ .ini,Pokemon,MewTwo) == yes) { Set %Pokemon %Pokemon MewTwo }
  if ($readini($nick $+ .ini,Pokemon,Mew) == yes) { Set %Pokemon %Pokemon Mew }
  if ($readini($nick $+ .ini,Pokemon,Suicune) == yes) { Set %Pokemon %Pokemon Suicune }
  if ($readini($nick $+ .ini,Pokemon,Entei) == yes) { Set %Pokemon %Pokemon Entei }
  if ($readini($nick $+ .ini,Pokemon,Raikou) == yes) { Set %Pokemon %Pokemon Raikou }
  if (%Pokemon == $null) { halt }
  Notice $nick 15 $+ %Pokemon
}
on 1:text:`Battle*:*: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,Travel,Travel) == Yes) { Notice $nick You Are Traveling | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) == yes) { Notice $nick You Are Battling! | halt }
  if ($readini($nick $+ .ini,$Poke($Nick),Hp) <= 0) { Notice $nick Please Heal Your Pokemon! | halt }
  if (%PlayingCraps == $nick) { Notice $nick You are playing the Craps! | halt }
  if ($readini($Nick $+ .ini,$Nick,2Vs2) == yes) { Notice $nick Your Still in the 2vs2 Battle! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { Notice $nick You Are Healing | halt }
  if ($istok(%OpenChallenge,$Nick,32) == $true) { Notice $nick You are Doing the Open Challenge! | halt }
  if ($istok(%TOpenChallenge,$Nick,32) == $true) { Notice $nick You are Doing the 2 Vs 2 Open Challenge! | halt }
  if (%tourney = yes) { halt } 
  if ($2 != $Null) && ($readini($nick $+ .ini,Register,Complete) == Yes) && ($2 Ison %ChanSet) {
    if ($readini($2 $+ .ini,Register,Complete) != Yes) { Notice $nick $2 is Not Registered! `Register | halt }
    Set -u120 %Challenge. [ $+ [ $nick ] ] $2
    Msg %ChanSet $Name($Nick) $+ 8,1 Has Challenged $Name($2) $+ 8,1 To a Pokemon Battle! If You Want to Battle Type `Accept Challenge $Nick
    Halt
  }
  Msg %ChanSet $Name($Nick) $+ 8,1 Wants to Battle! If You Want to Battle $Name($Nick) $+ 8,1 Type `Accept Open $Nick
  Set %OpenChallenge %OpenChallenge $Nick 
}
on 1:text:`Accept*:*: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,Travel,Travel) == Yes) { Notice $nick You Are Traveling | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) == yes) { Notice $nick You Are Already Battling! | halt }
  if ($readini($nick $+ .ini,$Poke($Nick),Hp) <= 0) { Notice $nick Please Heal Your Pokemon! | halt }
  if ($readini($3 $+ .ini,$Poke($3),Hp) <= 0) { Notice $nick $3 Must Heal Their Pokemon! | halt }
  if (%PlayingCraps == $nick) { Notice $nick You are playing the Craps! | halt }
  if ($readini($3 $+ .ini,$3,Fighting) == yes) { Notice $nick $3 Is Battling! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { Notice $nick You Are Healing | halt }
  if ($readini($3 $+ .ini,Travel,Travel) == Yes) { Notice $nick $3 is Traveling | halt }
  if (%tourney = yes) { halt } 
  if ($3 == $Nick) { halt } 
  if ($2 == Challenge) {
    if (%Challenge. [ $+ [ $3 ] ] != $nick) { Notice $nick This person has not offered to Battle You! | halt }
    Inc %Battles
    Writeini -n $nick $+ .ini $nick Fighting Yes
    Writeini -n $nick $+ .ini $nick Field Singles $+ %Battles
    Writeini -n $Nick $+ .ini $nick FightingWho $3
    Writeini -n $3 $+ .ini $3 Fighting Yes
    Writeini -n $3 $+ .ini $3 Field Singles $+ %Battles
    Writeini -n $3 $+ .ini $3 FightingWho $Nick
    Msg %ChanSet $Name($Nick) $+ 8,1 Has Accepted $Name($3) $+ 8,1's Challenge! Begin!
  }
  if ($2 == Open) {
    if ($istok(%OpenChallenge,$3,32) != $true) { Notice $nick $3 is not Doing the Open Challenge! | halt }
    Inc %Battles
    Writeini -n $nick $+ .ini $nick Fighting Yes
    Writeini -n $nick $+ .ini $nick Field Singles $+ %Battles
    Writeini -n $Nick $+ .ini $nick FightingWho $3
    Writeini -n $3 $+ .ini $3 Fighting Yes
    Writeini -n $3 $+ .ini $3 Field Singles $+ %Battles
    Writeini -n $3 $+ .ini $3 FightingWho $Nick
    Msg %ChanSet $Name($Nick) $+ 8,1 Has Accepted $Name($3) $+ 8,1's Challenge! Begin!
    if ($readini($3 $+ .ini,$3,TNpc) == Yes) { SpecialNpc $3 }
    :Repeat
    set %OpenChallenge $remtok(%OpenChallenge,$3,1,32)
    if ($istok(%OpenChallenge,$3,32) == $true) { Goto Repeat }
  }
  if ($2 == 2vs2) {
    if ($istok(%TOpenChallenge,$3,32) != $true) { Notice $nick $3 is not Doing the 2 vs 2 Open Challenge! | halt }
    Set %Partner $readini($nick $+ .ini,Tag,Partner)
    Set %Partner2 $readini($3 $+ .ini,Tag,Partner)
    if ($readini(%Partner $+ .ini,%Partner,Fighting) == yes) { Notice $nick %Partner Is Battling! | halt }
    if ($timer(Heal $+ %Partner).secs != $null) { Notice $nick %Partner is Healing | halt }
    if ($readini(%Partner $+ .ini,Travel,Travel) == Yes) { Notice $nick %Partner is Traveling | halt }
    if ($readini(%Partner $+ .ini,$Poke(%Partner),Hp) <= 0) { Notice $nick %Partner Must Heal Their Pokemon! | halt }
    if ($readini(%Partner2 $+ .ini,%Partner2,Fighting) == yes) { Notice $nick %Partner2 Is Battling! | halt }
    if ($timer(Heal $+ %Partner2).secs != $null) { Notice $nick %Partner2 is Healing | halt }
    if ($readini(%Partner2 $+ .ini,Travel,Travel) == Yes) { Notice $nick %Partner2 is Traveling | halt }
    if ($readini(%Partner2 $+ .ini,$Poke(%Partner2),Hp) <= 0) { Notice $nick %Partner2 Must Heal Their Pokemon! | halt }
    Inc %Battles
    Writeini -n $nick $+ .ini $nick Fighting Yes
    Writeini -n $nick $+ .ini $nick Field 2vs2 $+ %Battles
    Writeini -n $Nick $+ .ini $nick FightingWho $3
    Writeini -n $Nick $+ .ini $nick 2vs2 Yes
    Writeini -n $3 $+ .ini $3 Fighting Yes
    Writeini -n $3 $+ .ini $3 Field 2vs2 $+ %Battles
    Writeini -n $3 $+ .ini $3 FightingWho $Nick
    Writeini -n $3 $+ .ini $3 2vs2 Yes
    Writeini -n %Partner $+ .ini %Partner Fighting Yes
    Writeini -n %Partner $+ .ini %Partner Field 2vs2 $+ %Battles
    Writeini -n %Partner $+ .ini %Partner FightingWho %Partner2
    Writeini -n %Partner $+ .ini %Partner 2vs2 Yes
    Writeini -n %Partner2 $+ .ini %Partner2 Fighting Yes
    Writeini -n %Partner2 $+ .ini %Partner2 Field 2vs2 $+ %Battles
    Writeini -n %Partner2 $+ .ini %Partner2 FightingWho %Partner
    Writeini -n %Partner2 $+ .ini %Partner2 2vs2 Yes
    Msg %ChanSet $Name($Nick) $+ 8,1 & $Name(%Partner) $+ 8,1 Have Accepted $Name($3) $+ 8,1 & $Name(%Partner2) $+ 8,1's Challenge! Begin!
    set %TOpenChallenge $remtok(%TOpenChallenge,$3,1,32)
    set %TOpenChallenge $remtok(%TOpenChallenge,%Partner2,1,32)
    Unset %Partner
    Unset %Partner2
  }
}
on 1:text:`Withdraw:#:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($istok(%OpenChallenge,$Nick,32) != $true) { Notice $Nick You Are not In The Open Challenge! | halt }
  set %OpenChallenge $remtok(%OpenChallenge,$Nick,1,32)
  Msg %ChanSet $Name($Nick) $+ 8,1 Has Withdrew out of the Open Challenge!
}
on *:text:*`PokeCenter:#:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) == Yes) { Notice $nick You Are In Battle! Please leave The Battlefield.  | halt }
  if ($readini($nick $+ .ini,Travel,Travel) == Yes) { Notice $nick You Are Traveling | halt }
  if ($readini($Nick $+ .ini,$Nick,2Vs2) == yes) { Notice $nick Your Still in the 2vs2 Battle! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { Notice $nick You Are Healing | halt }
  if (%EliteBattle = yes) && (%EFighting == $Nick) { Notice $nick You are Fighting Elite 4! | halt }
  if (%tourneystarted = yes) { halt } 
  Set %Pokemon $readini($Nick $+ .ini,$Nick,Pokemon)
  Set %Town $readini($nick $+ .ini,Travel,Town)
  Set %Town $readini(Map $+ .ini,%Town,Heal)
  Notice $nick 1,0Nurse Joy:0,1 %Pokemon Will Be Fully Healed In %Town Seconds $+ !
  Timerheal $+ $nick 1 %Town /Heal $nick
}
on *:text:`Enter Arena:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,$Poke($Nick),Hp) <= 0) { Notice $nick Please Heal Your Pokemon! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) == yes) { Notice $nick You Are Already Battling! | halt }
  if ($readini($nick $+ .ini,Travel,Travel) == Yes) { Notice $nick You Are Traveling | halt }
  if (%PlayingCraps == $nick) { Notice $nick You are playing the Craps! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { Notice $nick You Are Healing | halt }
  if ($readini($Nick $+ .ini,$Nick,2Vs2) == yes) { Notice $nick Your Still in the 2vs2 Battle! | halt }
  if (%tourney = yes) { halt } 
  if ($Nick isin %batlist) && ($readini($nick $+ .ini,$nick,Fighting) != yes) { BatlistCheck $Nick }
  Writeini -n $nick $+ .ini $nick Fighting Yes
  set %batlist %batlist $nick
  Writeini -n $nick $+ .ini $nick Field Normal
  Msg %ChanSet $Name($Nick) $+ 8,1 Enters the Arena. $Name($Nick) $+ 8,1 Says:15 $Motto($Nick) $Name($Nick) $+ 8,1 Sends out $Pokemon($Nick) $+ 8,1! 
  if ($numtok(%NpcStopAttacking,32) >= 1) && (%NpcStopAttacking != $Null) { IdleNpcAttack }
}
on *:text:`Leave Arena:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != yes) { Notice $nick You Are Not In The Arena! | halt }
  if ($readini($nick $+ .ini,$nick,Field) != Normal) { Notice $nick You Cannot Leave! | halt }
  if ($timer(Leave $+ $nick).secs != $null) { Notice $nick You Are Already Leaving The Arena! | halt }
  if ($readini($Nick $+ .ini,$Nick,CantRun) == Yes) { Msg %ChanSet $BName($Nick) $+ 8,1 Cannot Run! Away! | halt }
  Msg %ChanSet $Name($Nick) $+ 8,1 is Running Away! $Name($Nick) $+ 8,1 Will Run Away In 60 Seconds!
  TimerLeave $+ $nick 1 60 /leave $nick
}
on 1:TEXT:`Entered:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  var %x = 1
  var %y = $numtok(%batlist,32)
  while (%x <= %y) {
    Set %Person $gettok(%batlist,%x,32)
    if ($readini(%Person $+ .ini,%Person,Fighting) == Yes) { set %entered %entered $gettok(%batlist,%x,32) $chr(45) }
    inc %x
  }
  Notice $nick 8People Who Are Battling:15 %Entered
  Unset %Entered
  Unset %Person
}
on 1:TEXT:`Open:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  Notice $nick 8People Who Have Offered Open Challenges:15 %OpenChallenge
}
on 1:TEXT:`Atl:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,$Nick,Attacking) != Yes) { Notice $nick You Are Not Attacking! | halt }
  if ($timer(Attack $+ $nick).secs = $null) && ($readini($Nick $+ .ini,$Nick,Attacking) == yes) { Notice $Nick 8GLITCH!4 This Has Been Fixed! | Writeini -n $Nick $+ .ini $Nick Attacking no | Halt }
  Notice $nick 9Attack Time Left:15 $duration($timer(Attack $+ $nick).secs))
}
on 1:TEXT:`Cancel:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,$Nick,Attacking) != Yes) { Notice $nick You Are Not Attacking! | halt }
  if ($readini($nick $+ .ini,$Nick,CantCancel) == Yes) { Notice $nick You Cannot Cancel! | halt }
  Writeini -n $nick $+ .ini $nick Attacking no
  Writeini -n $nick $+ .ini $Poke($Nick) SolarCharge No
  Writeini -n $nick $+ .ini $Poke($Nick) StockPile No
  Writeini -n $nick $+ .ini $Poke($Nick) Charging No
  Writeini -n $nick $+ .ini $Poke($Nick) CDamage 0
  TimerAttack $+ $nick off
  Notice $nick 15You Stopped Your $Pokemon($Nick) $+ 15,1's Attack!
}
on *:text:*`Learn *:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if (%Learning != $nick) { Notice $nick Sorry You Are Not Learning A Move. | halt }  
  if (%Learn. [ $+ [ $nick ] ] != $2) { Notice $nick Sorry But $3 Is Not The Move Your Learning! | halt }  
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,$3,32) == $true) {
    writeini $Nick $+ .ini Learned %MoveLearning Yes
    if ($readini($Nick $+ .ini,$Poke($Nick),Attack1) == $3) { writeini $Nick $+ .ini $Poke($Nick) Attack1 $2 }  
    if ($readini($Nick $+ .ini,$Poke($Nick),Attack2) == $3) { writeini $Nick $+ .ini $Poke($Nick) Attack2 $2 }  
    if ($readini($Nick $+ .ini,$Poke($Nick),Attack3) == $3) { writeini $Nick $+ .ini $Poke($Nick) Attack3 $2 }  
    if ($readini($Nick $+ .ini,$Poke($Nick),Attack4) == $3) { writeini $Nick $+ .ini $Poke($Nick) Attack4 $2 }  
    writeini $Nick $+ .ini $Poke($Nick) L $+ %MoveLearning Yes
    writeini -n $Nick $+ .ini $Poke($Nick) %MoveLearning $+ MPP $readini(Pokemon_Status $+ .ini,PPCheck,%MoveLearning)
    writeini -n $Nick $+ .ini $Poke($Nick) %MoveLearning $+ PP $readini(Pokemon_Status $+ .ini,PPCheck,%MoveLearning)
    Unset %Learn*
    Unset %Learning
    Unset %ALearn
    Unset %MoveLearning
    Unset %Attacks
    Msg %ChanSet $Pokemon($Nick) $+ 9,1 Foregot  $+ $3 $+  & Learned 4 $+ $2 $+ 
  }
}
on *:text:*`NotLearn:#:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if (%Learning != $nick) { Notice $nick Sorry You Are Not Learning A Move. | halt }  
  writeini $Nick $+ .ini $Poke($Nick) L $+ %MoveLearning Yes
  Unset %Learn*
  Unset %Learning
  Unset %ALearn
  Unset %MoveLearning
  Msg %ChanSet $Pokemon($Nick) $+ 9,1 Did Not Learn a New Move.
}
on 1:TEXT:`Struggle:#:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($Nick $+ .ini,$Poke($Nick),Paralyzed) != Yes) { Notice $nick Your Pokemon is Not Paralyzed! | halt }
  if ($readini($Nick $+ .ini,$Poke($Nick),Sleeping) == Yes) { Notice $nick Your Pokemon is Sleeping! | halt }
  Writeini -n $nick $+ .ini $nick Attacking Yes
  Writeini -n $nick $+ .ini $nick CantCancel Yes
  Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2 ),0)
  TimerAttack $+ $nick 1 %Time /Struggle $Nick
  Msg %ChanSet $BName($Nick) $+ 8,1 Struggles to Get Free of Paralyze!
}
on 1:TEXT:`Wake Up:#:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($Nick $+ .ini,$Poke($Nick),Sleeping) != Yes) { Notice $nick Your Pokemon is not Sleeping! | halt }
  Writeini -n $nick $+ .ini $nick Attacking Yes
  Writeini -n $nick $+ .ini $nick CantCancel Yes
  Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2 ),0)
  TimerAttack $+ $nick 1 %Time /Wake $Nick
  Msg %ChanSet $Name($Nick) $+ 0,1 Tells his $Pokemon($Nick) $+ 0,1 to Wake Up!
}
on 1:TEXT:`Scratch*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Scratch
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Scratch
    Msg %ChanSet $BName($Nick) $+ 0,1 Runs Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Horn-Attack*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Horn-Attack
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Horn-Attack
    Msg %ChanSet $BName($Nick) $+ 0,1 Runs Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Stomp*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Stomp
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Stomp
    Msg %ChanSet $BName($Nick) $+ 0,1 Runs Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Horn-Drill*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Horn-Drill
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Horn-Drill
    Msg %ChanSet $BName($Nick) $+ 0,1 Dashes Towards $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Fissure*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Fissure
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Fissure
    Msg %ChanSet $BName($Nick) $+ 5,1 Walks Towards $BName($2) $+ 5,1!
  }
}
on 1:TEXT:`Thrash*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Thrash
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 6.3 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Thrash
    Msg %ChanSet $BName($Nick) $+ 0,1 Dashes Towards $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Thunder-Wave*:#: {
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Thunder-Wave
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Thunder-Wave
    Msg %ChanSet $BName($Nick) $+ 8,1 Charges Electricity at $BName($2) $+ 8,1!
  }
}
on 1:TEXT:`Pound*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Pound
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Pound
    Msg %ChanSet $BName($Nick) $+ 0,1 Runs Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Splash*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Splash
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 1.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Splash
    Msg %ChanSet $BName($Nick) $+ 0,1 Gets ready to Splash $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Slash*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Slash
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.9 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Slash
    Msg %ChanSet $BName($Nick) $+ 0,1 Runs Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Swift*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Swift
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Swift
    Msg %ChanSet $BName($Nick) $+ 0,1 Charges Stars at $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Tackle*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Tackle
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Tackle
    Msg %ChanSet $BName($Nick) $+ 0,1 Runs Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Poison-Sting*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Poison-Sting
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Poison-Sting
    Msg %ChanSet $BName($Nick) $+ 6,1 Charges a Sharp Needle at $BName($2) $+ 6,1!
  }
}
on 1:TEXT:`Smog*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Smog
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Smog
    Msg %ChanSet $BName($Nick) $+ 6,1 Starts to Create Gas $BName($2) $+ 6,1!
  }
}
on 1:TEXT:`Acid-Armor:#:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  Set %Attack Acid-Armor
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick Hey Acid-Armor
    Msg %ChanSet $BName($Nick) $+ 11,1 Starts to Shine with Purple Light!
  }
}
on 1:TEXT:`Acid*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Acid
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5.3 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Acid
    Msg %ChanSet $BName($Nick) $+ 6,1 Charges Acid at $BName($2) $+ 6,1!
  }
}
on 1:TEXT:`Slam*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Slam
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.1 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Slam
    Msg %ChanSet $BName($Nick) $+ 0,1 Runs Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Bide*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Bide
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 10 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Bide
    Msg %ChanSet $BName($Nick) $+ 0,1 Curls up and Looks at $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`BodySlam*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack BodySlam
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 BodySlam
    Msg %ChanSet $BName($Nick) $+ 0,1 Runs Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Lick*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Lick
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Lick
    Msg %ChanSet $BName($Nick) $+ 2,1 Sticks its tongue at $BName($2) $+ 2,1!
  }
}
on 1:TEXT:`Spite*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Spite
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Spite
    Msg %ChanSet $BName($Nick) $+ 2,1 Begins to do Spite at $BName($2) $+ 2,1!
  }
}
on 1:TEXT:`TakeDown*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($nick $+ .ini,$Poke($nick),Hp) <= 60) { Notice $nick You Cant, You Will Die! | halt }
  Set %Attack TakeDown
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 TakeDown
    Msg %ChanSet $BName($Nick) $+ 0,1 Runs Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Hyper-Fang*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Hyper-Fang
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.9 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Hyper-Fang
    Msg %ChanSet $BName($Nick) $+ 0,1 Jumps at $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Poison-Fang*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Poison-Fang
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Poison-Fang
    Msg %ChanSet $BName($Nick) $+ 6,1's Fangs Start to Drip With Poison, Facing $BName($2) $+ 6,1!
  }
}
on 1:TEXT:`Super-Fang*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Super-Fang
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5.3 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Super-Fang
    Msg %ChanSet $BName($Nick) $+ 0,1 Jumps at $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Fury-Attack*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Fury-Attack
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.1 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Fury-Attack
    Msg %ChanSet $BName($Nick) $+ 0,1 Runs Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Spike-Cannon*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Spike-Cannon
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Spike-Cannon
    Msg %ChanSet $BName($Nick) $+ 0,1 Charges its Spike Cannon at $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Fury-Swipes*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Fury-Swipes
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Fury-Swipes
    Msg %ChanSet $BName($Nick) $+ 0,1 Runs Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`False-Swipe*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack False-Swipe
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 False-Swipe
    Msg %ChanSet $BName($Nick) $+ 0,1 Runs Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Fury-Cutter*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Fury-Cutter
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Fury-Cutter
    Msg %ChanSet $BName($Nick) $+ 3,1 Runs Toward $BName($2) $+ 3,1!
  }
}
on 1:TEXT:`Quick-Attack*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Quick-Attack
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Quick-Attack
    Msg %ChanSet $BName($Nick) $+ 0,1 Dashes Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`ExtremeSpeed*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack ExtremeSpeed
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 ExtremeSpeed
    Msg %ChanSet $BName($Nick) $+ 0,1 Dashes Towards $BName($2) $+ 0,1 at Very High Speeds!
  }
}
on 1:TEXT:`Bite*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Bite
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Bite
    Msg %ChanSet $BName($Nick) $+ 14,1 Dashes Towards $BName($2) $+ 14,1!
  }
}
on 1:TEXT:`Astonish*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Astonish
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.1 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Astonish
    Msg %ChanSet $BName($Nick) $+ 2,1 Gets ready todo Astonish to $BName($2) $+ 2,1!
  }
}
on 1:TEXT:`Low-Kick*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Low-Kick
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Low-Kick
    Msg %ChanSet $BName($Nick) $+ 7,1 Gets on $PGender($1) Knees facing $BName($2) $+ 7,1!
  }
}
on 1:TEXT:`Karate-Chop*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Karate-Chop
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Karate-Chop
    Msg %ChanSet $BName($Nick) $+ 7,1 Raises $PGender($1) Right Hand, Opening it at $BName($2) $+ 7,1!
  }
}
on 1:TEXT:`Faint-Attack*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Faint-Attack
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Faint-Attack
    Msg %ChanSet $BName($Nick) $+ 14,1 Turns around & Bends over, Luring $BName($2) $+ 14,1!
  }
}
on 1:TEXT:`Pin-Missile*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Pin-Missile
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.6 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Pin-Missile
    Msg %ChanSet $BName($Nick) $+ 3,1 Charges Pin Missiles at $BName($2) $+ 3,1!
  }
}
on 1:TEXT:`Pursuit*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Pursuit
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.2 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Pursuit
    Msg %ChanSet $BName($Nick) $+ 14,1 Dashes Towards $BName($2) $+ 14,1!
  }
}
on 1:TEXT:`Crunch*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Crunch
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.9 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Crunch
    Msg %ChanSet $BName($Nick) $+ 14,1 Dashes Towards $BName($2) $+ 14,1!
  }
}
on 1:TEXT:`RapidSpin*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack RapidSpin
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 RapidSpin
    Msg %ChanSet $BName($Nick) $+ 0,1 Spins Around at High Speeds at $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`NightShade*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack NightShade
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 NightShade
    Msg %ChanSet $BName($Nick) $+ 2,1 Prepares to do NightShade at $BName($2) $+ 2,1!
  }
}
on 1:TEXT:`Dream-Eater*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Sleeping) != Yes) { Notice $nick This Move Will not Effect $2 because $2 is not Sleeping! | halt }
  Set %Attack Dream-Eater
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Dream-Eater
    Msg %ChanSet $BName($Nick) $+ 13,1 Prepares to Eat $BName($2) $+ 13,1's Dreams!
  }
}
on 1:TEXT:`Growl*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Attack) <= 5) { Notice $nick $BName($2) $+ 15,1 Will not be Affected! | halt }
  Set %Attack Growl
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 1.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Growl
    Msg %ChanSet $BName($Nick) $+ 0,1 Stares at $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Charm*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Attack) <= 5) { Notice $nick $BName($2) $+ 15,1 Will not be Affected! | halt }
  Set %Attack Charm
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 1.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Charm
    Msg %ChanSet $BName($Nick) $+ 0,1 Flirts with $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Sand-Attack*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Accuracy) <= 5) { Notice $nick $BName($2) $+ 15,1 Will not be Affected! | halt }
  Set %Attack Sand-Attack
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 1.6 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Sand-Attack
    Msg %ChanSet $BName($Nick) $+ 7,1 Looks for Sand $BName($2) $+ 7,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Mud-Slap*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Accuracy) <= 5) { Notice $nick $BName($2) $+ 15,1 Will not be Affected! | halt }
  Set %Attack Mud-Slap
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 1.9 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Mud-Slap
    Msg %ChanSet $BName($Nick) $+ 7,1 Looks for Mud, while facing $BName($2) $+ 7,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`TailWhip*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Defense) <= 5) { Notice $nick $BName($2) $+ 15,1 Will not be Affected! | halt }
  Set %Attack TailWhip
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 1.7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 TailWhip
    Msg %ChanSet $BName($Nick) $+ 0,1 Wags Tail at $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Foresight*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Foresight
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Foresight
    Msg %ChanSet $BName($Nick) $+ 0,1 Focuses on $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Odor-Sleuth*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Odor-Sleuth
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 1.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Odor-Sleuth
    Msg %ChanSet $BName($Nick) $+ 0,1 Focuses on $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Leer*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Defense) <= 10) { Notice $nick $BName($2) $+ 15,1 Will not be Affected! | halt }
  Set %Attack Leer
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 1.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Leer
    Msg %ChanSet $BName($Nick) $+ 0,1's Eyes Glow at $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Tickle*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Defense) <= 10) { Notice $nick $BName($2) $+ 15,1 Will not be Affected! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Attack) <= 10) { Notice $nick $BName($2) $+ 15,1 Will not be Affected! | halt }
  Set %Attack Tickle
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.3 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Tickle
    Msg %ChanSet $BName($Nick) $+ 0,1 Grins at $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Future-Sight*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($timer(Future $+ $2).secs != $null) { Notice $nick $2 is Already Being Future Sighted | halt }
  Set %Attack Future-Sight
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Future-Sight
    Msg %ChanSet $BName($Nick) $+ 13,1's Eyes Glow at $BName($2) $+ 13,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Kinesis*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Agility) <= 10) { Notice $nick $BName($2) $+ 13,1 Will not be Affected! | halt }
  Set %Attack Kinesis
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 1.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Kinesis
    Msg %ChanSet $BName($Nick) $+ 13,1's Eyes Glow at $BName($2) $+ 13,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Disable*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Disabled) == Yes) { Notice $nick $BName($2) $+ 13,1 Already has Had One of Its Moves Disabled!! | halt }
  Set %Attack Disable
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Disable
    Msg %ChanSet $BName($Nick) $+ 13,1's Eyes Glow at $BName($2) $+ 13,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Screech*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Defense) <= 10) { Notice $nick $BName($2) $+ 15,1 Will not be Affected! | halt }
  Set %Attack Screech
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 1.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Screech
    Msg %ChanSet $BName($Nick) $+ 0,1 Grinds its Teeth at $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Metal-Sound*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Defense) <= 10) { Notice $nick $BName($2) $+ 15,1 Will not be Affected! | halt }
  Set %Attack Metal-Sound
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Metal-Sound
    Msg %ChanSet $BName($Nick) $+ 15,1 Grinds its Metal Parts at $BName($2) $+ 15,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Bind*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Bind) == Yes) { Notice $nick $BName($2) $+ 15,1 is Already Binded! | halt }
  Set %Attack Bind
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 1.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Bind
    Msg %ChanSet $BName($Nick) $+ 0,1 Flings at $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Constrict*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Constrict) == Yes) { Notice $nick $BName($2) $+ 15,1 is Already Constricted! | halt }
  Set %Attack Constrict
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Constrict
    Msg %ChanSet $BName($Nick) $+ 0,1 Flings at $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Wrap*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Bind) == Yes) { Notice $nick $BName($2) $+ 15,1 is Already Binded! | halt }
  Set %Attack Wrap
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 1.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Wrap
    Msg %ChanSet $BName($Nick) $+ 0,1 Flings at $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`SuperSonic*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Bind) == Yes) { Notice $nick $BName($2) $+ 15,1 is Already Binded! | halt }
  Set %Attack SuperSonic
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 SuperSonic
    Msg %ChanSet $BName($Nick) $+ 0,1 Starts to do Super Sonic at $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Sand-Tomb*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Tomb) == Yes) { Notice $nick $BName($2) $+ 15,1 is Already Tombed! | halt }
  Set %Attack Sand-Tomb
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Sand-Tomb
    Msg %ChanSet $BName($Nick) $+ 7,1 Focus's on the Ground, Aiming it at $BName($2) $+ 7,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`Ember*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Ember
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Ember
    Msg %ChanSet $BName($Nick) $+ 4,1 Blazes with Fire At $BName($2) $+ 4,1!
  }
}
on 1:TEXT:`Blaze-Kick*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Blaze-Kick
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Blaze-Kick
    Msg %ChanSet $BName($Nick) $+ 4,1 Blazes with Fire At $BName($2) $+ 4,1!
  }
}
on 1:TEXT:`Flame-Wheel*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Flame-Wheel
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Flame-Wheel
    Msg %ChanSet $BName($Nick) $+ 4,1 Blazes with Fire At $BName($2) $+ 4,1!
  }
}
on 1:TEXT:`Thunder-Shock*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Thunder-Shock
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Thunder-Shock
    Msg %ChanSet $BName($Nick) $+ 8,1 Charges Electricity at $BName($2) $+ 8,1!
  }
}
on 1:TEXT:`Thunder-Bolt*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Thunder-Bolt
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5.2 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Thunder-Bolt
    Msg %ChanSet $BName($Nick) $+ 8,1 Charges Electricity at $BName($2) $+ 8,1!
  }
}
on 1:TEXT:`Thunder*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Thunder
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Thunder
    Msg %ChanSet $BName($Nick) $+ 8,1 Charges Electricity at $BName($2) $+ 8,1!
  }
}
on 1:TEXT:`Confusion*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Confusion
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Confusion
    Msg %ChanSet $BName($Nick) $+ 13,1's Eyes turn white at $BName($2) $+ 13,1!
  }
}
on 1:TEXT:`PsyBeam*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack PsyBeam
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 PsyBeam
    Msg %ChanSet $BName($Nick) $+ 13,1's Charges PsyBeam at $BName($2) $+ 13,1!
  }
}
on 1:TEXT:`Psychic*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Psychic
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 6.9 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Psychic
    Msg %ChanSet $BName($Nick) $+ 13,1's Prepares Psychic at $BName($2) $+ 13,1!
  }
}
on 1:TEXT:`Rock-Throw*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Rock-Throw
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Rock-Throw
    Msg %ChanSet $BName($Nick) $+ 5,1 Picks up a Rock and Aims it at $BName($2) $+ 5,1!
  }
}
on 1:TEXT:`Rock-Blast*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Rock-Blast
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Rock-Blast
    Msg %ChanSet $BName($Nick) $+ 5,1 Picks up a couple of Rocks and Aims it at $BName($2) $+ 5,1!
  }
}
on 1:TEXT:`Iron-Tail*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Iron-Tail
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Iron-Tail
    Msg %ChanSet $BName($Nick) $+ 15,1's Tail begins to Glow Silver at $BName($2) $+ 15,1!
  }
}
on 1:TEXT:`Gust*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Gust
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Gust
    Msg %ChanSet $BName($Nick) $+ 10,1 Flaps its Wings at $BName($2) $+ 10,1!
  }
}
on 1:TEXT:`Aerial-Ace*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Aerial-Ace
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Aerial-Ace
    Msg %ChanSet $BName($Nick) $+ 10,1 Flys Around $BName($2) $+ 10,1!
  }
}
on 1:TEXT:`Peck*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Peck
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Peck
    Msg %ChanSet $BName($Nick) $+ 10,1 Flys Around $BName($2) $+ 10,1!
  }
}
on 1:TEXT:`Drill-Peck*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Drill-Peck
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Drill-Peck
    Msg %ChanSet $BName($Nick) $+ 10,1 Flys Around $BName($2) $+ 10,1!
  }
}
on 1:TEXT:`Bubble*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Bubble
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.9 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Bubble
    Msg %ChanSet $BName($Nick) $+ 11,1 Starts to Create a Bubble at $BName($2) $+ 11,1!
  }
}
on 1:TEXT:`VineWhip*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack VineWhip
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 VineWhip
    Msg %ChanSet $BName($Nick) $+ 9,1 Starts to Grow Vines at $BName($2) $+ 9,1!
  }
}
on 1:TEXT:`Shadow-Punch*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Shadow-Punch
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Shadow-Punch
    Msg %ChanSet $BName($Nick) $+ 2,1 Starts to Create Shadows At $BName($2) $+ 2,1!
  }
}
on 1:TEXT:`Absorb*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Absorb
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Absorb
    Msg %ChanSet $BName($Nick) $+ 9,1 Starts to Glow at $BName($2) $+ 9,1!
  }
}
on 1:TEXT:`MegaDrain*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack MegaDrain
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 MegaDrain
    Msg %ChanSet $BName($Nick) $+ 9,1 Starts to Glow at $BName($2) $+ 9,1!
  }
}
on 1:TEXT:`Leech-Life*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Leech-Life
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Leech-Life
    Msg %ChanSet $BName($Nick) $+ 3,1 Goes to Grab $BName($2) $+ 3,1!
  }
}
on 1:TEXT:`GigaDrain*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack GigaDrain
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 GigaDrain
    Msg %ChanSet $BName($Nick) $+ 9,1 Starts to Glow at $BName($2) $+ 9,1!
  }
}
on 1:TEXT:`PetalDance*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack PetalDance
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 6 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 PetalDance
    Msg %ChanSet $BName($Nick) $+ 9,1 Starts to Dance $BName($2) $+ 9,1!
  }
}
on 1:TEXT:`LeechSeed*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack LeechSeed
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 LeechSeed
    Msg %ChanSet $BName($Nick) $+ 9,1 Starts to Create a Seed at $BName($2) $+ 9,1!
  }
}
on 1:TEXT:`SmokeScreen*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack SmokeScreen
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 1.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 SmokeScreen
    Msg %ChanSet $BName($Nick) $+ 0,1 Stares at $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`PoisonPowder*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Poisoned) == yes) { Notice $Nick $2 Is Already Poisoned! | halt }
  Set %Attack PoisonPowder
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 PoisonPowder
    Msg %ChanSet $BName($Nick) $+ 6,1 Starts to Create Powder at $BName($2) $+ 6,1!
  }
}
on 1:TEXT:`Stun-Spore*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Paralyzed) == yes) { Notice $Nick $2 Is Already Paralyzed! | halt }
  Set %Attack Stun-Spore
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Stun-Spore
    Msg %ChanSet $BName($Nick) $+ 9,1 Starts to Create Powder at $BName($2) $+ 9,1!
  }
}
on 1:TEXT:`Cotton-Spore*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Paralyzed) == yes) { Notice $Nick $2 Is Already Paralyzed! | halt }
  Set %Attack Cotton-Spore
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Cotton-Spore
    Msg %ChanSet $BName($Nick) $+ 9,1 Starts to Create Powder at $BName($2) $+ 9,1!
  }
}
on 1:TEXT:`Glare*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Paralyzed) == yes) { Notice $Nick $2 Is Already Paralyzed! | halt }
  Set %Attack Glare
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Glare
    Msg %ChanSet $BName($Nick) $+ 0,1 Stares at $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`SleepPowder*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Sleeping) == yes) { Notice $Nick $2 Is Already Sleeping! | halt }
  Set %Attack SleepPowder
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 SleepPowder
    Msg %ChanSet $BName($Nick) $+ 9,1 Starts to Create Powder at $BName($2) $+ 9,1!
  }
}
on 1:TEXT:`Confuse-Ray*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Confused) == yes) { Notice $Nick $2 Is Already Confused! | halt }
  Set %Attack Confuse-Ray
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Confuse-Ray
    Msg %ChanSet $BName($Nick) $+ 2,1 Charges a Ray at $BName($2) $+ 2,1!
  }
}
on 1:TEXT:`Hypnosis*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Sleeping) == yes) { Notice $Nick $2 Is Already Sleeping! | halt }
  Set %Attack Hypnosis
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Hypnosis
    Msg %ChanSet $BName($Nick) $+ 13,1 Charges a Ray at $BName($2) $+ 13,1!
  }
}
on 1:TEXT:`Sing*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Sleeping) == yes) { Notice $Nick $2 Is Already Sleeping! | halt }
  Set %Attack Sing
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Sing
    Msg %ChanSet $BName($Nick) $+ 0,1 Starts to Sing to $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Will-o-Wisp*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Burned) == yes) { Notice $Nick $2 Is Already Burned! | halt }
  Set %Attack Will-o-Wisp
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Will-o-Wisp
    Msg %ChanSet $BName($Nick) $+ 4,1 Charges with Fire at $BName($2) $+ 4,1!
  }
}
on 1:TEXT:`Mean-Look*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$2,CantRun) == yes) { Notice $Nick $2 Cant Run, Already! | halt }
  Set %Attack Mean-Look
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Mean-Look
    Msg %ChanSet $BName($Nick) $+ 0,1 Makes Faces at $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Imprison*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$2,CantRun) == yes) { Notice $Nick $2 Cant Run, Already! | halt }
  Set %Attack Imprison
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Imprison
    Msg %ChanSet $BName($Nick) $+ 13,1 Gets ready to do Imprison to $BName($2) $+ 13,1!
  }
}
on 1:TEXT:`Flatter*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Confused) == yes) { Notice $Nick $2 Is Already Confused! | halt }
  Set %Attack Flatter
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Flatter
    Msg %ChanSet $BName($Nick) $+ 14,1 Gets ready to do Flatter at $BName($2) $+ 14,1!
  }
}
on 1:TEXT:`Sweet-Kiss*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Confused) == yes) { Notice $Nick $2 Is Already Confused! | halt }
  Set %Attack Sweet-Kiss
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Sweet-Kiss
    Msg %ChanSet $BName($Nick) $+ 0,1 Gets Ready to Kiss $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Curse*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  if ($readini($2 $+ .ini,$Poke($2),Cursed) == yes) { Notice $Nick $2 Is Already Cursed! | halt }
  Set %Attack Curse
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Curse
    Msg %ChanSet $BName($Nick) $+ 2,1 Gets ready to give $BName($2) $+ 2,1 Curse!
  }
}
on 1:TEXT:`SweetScent*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack SweetScent
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 SweetScent
    Msg %ChanSet $BName($Nick) $+ 0,1 Starts to Create Powder at $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Rage*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Rage
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Rage
    Msg %ChanSet $BName($Nick) $+ 0,1 Gets Ready to use Rage at $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`ScaryFace*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack ScaryFace
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 ScaryFace
    Msg %ChanSet $BName($Nick) $+ 0,1 Stares at $BName($2) $+ 0,1!
    Unset %Attacks
    Unset %Attack
  }
}
on 1:TEXT:`FlameThrower*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack FlameThrower
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 FlameThrower
    Msg %ChanSet $BName($Nick) $+ 4,1 Blazes with Fire At $BName($2) $+ 4,1!
  }
}
on 1:TEXT:`BlastBurn*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack BlastBurn
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 BlastBurn
    Msg %ChanSet $BName($Nick) $+ 4,1 Charges Fire in its Mouth at $BName($2) $+ 4,1!
  }
}
on 1:TEXT:`WaterGun*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack WaterGun
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 WaterGun
    Msg %ChanSet $BName($Nick) $+ 11,1 Charges Water at $BName($2) $+ 11,1!
  }
}
on 1:TEXT:`Bubble-Beam*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Bubble-Beam
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5.7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Bubble-Beam
    Msg %ChanSet $BName($Nick) $+ 11,1 Charges Water at $BName($2) $+ 11,1!
  }
}
on 1:TEXT:`Muddy-Water*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Muddy-Water
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 6 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Muddy-Water
    Msg %ChanSet $BName($Nick) $+ 11,1 Dips Mud in Water $BName($2) $+ 11,1!
  }
}
on 1:TEXT:`SkullBash*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack SkullBash
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 SkullBash
    Msg %ChanSet $BName($Nick) $+ 0,1 Tucks $PGender($Nick) Head at $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Double-Kick*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Double-Kick
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Double-Kick
    Msg %ChanSet $BName($Nick) $+ 7,1 Jumps at $BName($2) $+ 7,1!
  }
}
on 1:TEXT:`Sky-Uppercut*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Sky-Uppercut
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 6 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Sky-Uppercut
    Msg %ChanSet $BName($Nick) $+ 7,1 Dashes Towards $BName($2) $+ 7,1!
  }
}
on 1:TEXT:`Endeavor*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Endeavor
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Endeavor
    Msg %ChanSet $BName($Nick) $+ 0,1 Dashes Towards $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Flail*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Flail
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Flail
    Msg %ChanSet $BName($Nick) $+ 0,1 Dashes Towards $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Double-Edge*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Double-Edge
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Double-Edge
    Msg %ChanSet $BName($Nick) $+ 0,1 Dashes Towards $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`RazorLeaf*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack RazorLeaf
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.9 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 RazorLeaf
    Msg %ChanSet $BName($Nick) $+ 9,1 Sharpens Leafs at $BName($2) $+ 9,1!
  }
}
on 1:TEXT:`LeafBlade*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack LeafBlade
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 5.1 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 LeafBlade
    Msg %ChanSet $BName($Nick) $+ 9,1 Sharpens Giant Leaf at $BName($2) $+ 9,1!
  }
}
on 1:TEXT:`HydroPump*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack HydroPump
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 HydroPump
    Msg %ChanSet $BName($Nick) $+ 11,1 Charges Massive Amounts of Water at $BName($2) $+ 11,1!
  }
}
on 1:TEXT:`HyperBeam*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack HyperBeam
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 HyperBeam
    Msg %ChanSet $BName($Nick) $+ 0,1 Charges Massive Amounts of Energy at $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`EarthQuake*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack EarthQuake
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 EarthQuake
    Msg %ChanSet $BName($Nick) $+ 7,1 Raises $PGender($Nick) Foot Up and looks at $BName($2) $+ 7,1!
  }
}
on 1:TEXT:`Twineedle*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Twineedle
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Twineedle
    Msg %ChanSet $BName($Nick) $+ 3,1 Dashes Towards $BName($2) $+ 3,1!
  }
}
on 1:TEXT:`MegaHorn*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack MegaHorn
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 8.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 MegaHorn
    Msg %ChanSet $BName($Nick) $+ 3,1 Dashes Towards $BName($2) $+ 3,1!
  }
}
on 1:TEXT:`FireSpin*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack FireSpin
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 6 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 FireSpin
    Msg %ChanSet $BName($Nick) $+ 4,1 Charges Massive Amounts of Fire at $BName($2) $+ 4,1!
  }
}
on 1:TEXT:`AuroraBeam*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack AuroraBeam
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 AuroraBeam
    Msg %ChanSet $BName($Nick) $+ 11,1 Charges Aurora Beam at $BName($2) $+ 11,1!
  }
}
on 1:TEXT:`IceBeam*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack IceBeam
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 6 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 IceBeam
    Msg %ChanSet $BName($Nick) $+ 11,1 Charges Ice Beam at $BName($2) $+ 11,1!
  }
}
on 1:TEXT:`WingAttack*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack WingAttack
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 3.4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 WingAttack
    Msg %ChanSet $BName($Nick) $+ 10,1 Starts to Fly and Dashes Towards $BName($2) $+ 10,1!
  }
}
on 1:TEXT:`Air-Cutter*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Air-Cutter
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.2 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Air-Cutter
    Msg %ChanSet $BName($Nick) $+ 10,1 Starts to Flap its Wings At $BName($2) $+ 10,1!
  }
}
on 1:TEXT:`Slash*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Slash
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2.8 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Slash
    Msg %ChanSet $BName($Nick) $+ 0,1 Runs Toward $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`DragonRage*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack DragonRage
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 DragonRage
    Msg %ChanSet $BName($Nick) $+ 12,1 Dashes Toward $BName($2) $+ 12,1!
  }
}
on 1:TEXT:`OutRage*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack OutRage
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 6 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 OutRage
    Msg %ChanSet $BName($Nick) $+ 12,1 Gets Ready to do OutRage to $BName($2) $+ 12,1!
  }
}
on 1:TEXT:`Twister*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Twister
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 4.5 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Twister
    Msg %ChanSet $BName($Nick) $+ 12,1 Dashes Toward $BName($2) $+ 12,1!
  }
}
on 1:TEXT:`Perish-Song*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Perish-Song
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Perish-Song
    Msg %ChanSet $BName($Nick) $+ 0,1 Starts to Sing to $BName($2) $+ 0,1!
  }
}
on 1:TEXT:`Sheer-Cold*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
  if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { Notice $nick Login! | halt }
  if ($nick == $2) { Notice $nick Dont Abuse Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }
  if ($readini($2 $+ .ini,$2,Fighting) != Yes) { Notice $nick $2 Is Not Battling! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }
  if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }
  Set %Attack Sheer-Cold
  Set %Attacks $readini($nick $+ .ini,$Poke($Nick),Attack1) $readini($nick $+ .ini,$Poke($Nick),Attack2) $readini($nick $+ .ini,$Poke($Nick),Attack3) $readini($nick $+ .ini,$Poke($Nick),Attack4)
  if ($istok(%Attacks,%Attack,32) == $true) {
    StatusCheck $Nick %Attack $2
    PPCheck $Nick %Attack
    Writeini -n $nick $+ .ini $nick Attacking Yes
    Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 7 ),0)
    TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Sheer-Cold
    Msg %ChanSet $BName($Nick) $+ 11,1 Blows out Coldness from $PGender($Nick) Mouth at $BName($2) $+ 11,1!
  }
}
on 1:TEXT:`Seismic-Toss*:*:{
  if ($chan != %ChanSet) { halt }
  if ($readini($nick $+