I had to debug the version Logan posted of this so It should run pretty smoothly now
Enjoy ^.^

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 $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 25 Seconds $+ !, Timer 1 25 /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 $+ .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 Seismic-Toss, 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 Seismic-Toss, Msg %ChanSet $BName($Nick) $+ 7,1 Picks up $BName($2) $+ 7,1!, }}, on 1:TEXT:`Revenge*:*:{, 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 Revenge, 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 Revenge, Msg %ChanSet $BName($Nick) $+ 7,1 Curls Up and Stares at $BName($2) $+ 7,1!, }}, on 1:TEXT:`Vital-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 Vital-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) * 6 ),0), TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Vital-Throw, Msg %ChanSet $BName($Nick) $+ 7,1 Runs Towards $BName($2) $+ 7,1!, }}, on 1:TEXT:`Cross-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 Cross-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) * 5.5 ),0), TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Cross-Chop, Msg %ChanSet $BName($Nick) $+ 7,1 Stands Still Facing $BName($2) $+ 7,1!, }}, on 1:TEXT:`Submission*:*:{, 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 Submission, 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 Submission, Msg %ChanSet $BName($Nick) $+ 7,1 Blunty Runs Towards $BName($2) $+ 7,1!, }}, on 1:TEXT:`Dynamic-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 Dynamic-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) * 7 ),0), TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Dynamic-Punch, Msg %ChanSet $BName($Nick) $+ 7,1 Clenches its Fist at $BName($2) $+ 7,1!, }}, on 1:TEXT:`Growth:#:{, 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 Growth, 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 Hey Growth, Msg %ChanSet $BName($Nick) $+ 0,1 Begins to Grow!, }}, on 1:TEXT:`Synthesis:#:{, 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 Synthesis, 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 Hey Synthesis, Msg %ChanSet $BName($Nick) $+ 3,1 Begins to Shine!, }}, on 1:TEXT:`Moonlight:#:{, 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 Moonlight, 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.3 ),0), TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick Hey Moonlight, Msg %ChanSet $BName($Nick) $+ 0,1 Begins to Shine!, }}, on 1:TEXT:`Morning-Sun:#:{, 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 Morning-Sun, 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.3 ),0), TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick Hey Morning-Sun, Msg %ChanSet $BName($Nick) $+ 0,1 Begins to Shine!, }}, on *:text:`Charge SolarBeam:#: {, 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 Attacking! | halt }, if ($readini($nick $+ .ini,$Poke($Nick),Charging) == yes) { Notice $nick Your Already Charging! | halt }, if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }, Set %Attack SolarBeam, 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, writeini $nick $+ .ini $Poke($Nick) SolarCharge Yes, writeini $nick $+ .ini $Poke($Nick) Charging Yes, writeini $nick $+ .ini $Poke($Nick) CDamage 0, Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 0.75 ),0), TimerAttack $+ $nick 30 %Time /CSolarBeam $nick $2, Msg %ChanSet $BName($Nick) $+ 9,1 Starts to Charge up a Solar Beam!, }}, on 1:TEXT:`SolarBeam*:*:{, 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,$Poke($Nick),SolarCharge) != yes) { Notice $nick Your Are Not Charging a Solar Beam! | halt }, if ($readini($nick $+ .ini,$Poke($Nick),CDamage) < 50) { Notice $nick You Cant Fire Yet! | halt }, if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }, Set %Attack SolarBeam, 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, Writeini -n $nick $+ .ini $nick Attacking Yes, Writeini -n $nick $+ .ini $Poke($Nick) SolarCharge No, Writeini -n $nick $+ .ini $Poke($Nick) Charging No, GatheringInfo $Nick $2 SolarBeam, }}, 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 ($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 Withdraw, 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), set %Defense $Round( $calc( $readini($nick $+ .ini,$Poke($nick),MDefense) * 0.25 ),0), writeini $nick $+ .ini $Poke($nick) Defense $calc($readini($nick $+ .ini,$Poke($nick),Defense) + %Defense), Writeini -n $nick $+ .ini $nick CantCancel Yes, TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick Hey Withdraw, Msg %ChanSet $BName($Nick) $+ 11,1 Goes into $PGender($Nick) Shell, Gaining %Defense Defense!, }}, on 1:TEXT:`Defense-Curl:#:{, 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 Defense-Curl, 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), set %Defense $Round( $calc( $readini($nick $+ .ini,$Poke($nick),MDefense) * 0.30 ),0), writeini $nick $+ .ini $Poke($nick) Defense $calc($readini($nick $+ .ini,$Poke($nick),Defense) + %Defense), Writeini -n $nick $+ .ini $nick CantCancel Yes, TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick Hey Defense-Curl, Msg %ChanSet $BName($Nick) $+ 0,1 Curls into a Ball Gaining %Defense Defense!, }}, on 1:TEXT:`Protect:#:{, 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 Protect, 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), writeini $nick $+ .ini $Poke($nick) Dodge Yes, Writeini -n $nick $+ .ini $nick CantCancel Yes, TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick Hey Protect, Msg %ChanSet $BName($Nick) $+ 0,1 Begins to Protect Itself., }}, on 1:TEXT:`RainDance:#:{, 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(Weather $+ .ini,Weather,Raining) == Yes) { Notice $nick Its Already Raining! | halt }, Set %Attack RainDance, 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 Hey RainDance, Msg %ChanSet $BName($Nick) $+ 11,1 Starts to Dance!, }}, on 1:TEXT:`SandStorm:#:{, 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(Weather $+ .ini,Weather,SandStorm) == Yes) { Notice $nick Its Already a SandStorm! | halt }, Set %Attack SandStorm, 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 Hey SandStorm, Msg %ChanSet $BName($Nick) $+ 5,1 Lets Out a Loud Roar and then start to Spin Around!, }}, on 1:TEXT:`WhirlWind*:*:{, 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 WhirlWind, 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 WhirlWind, Msg %ChanSet $BName($Nick) $+ 10,1 Starts to Flap its Wings at $BName($2) $+ 10,1!, }}, on 1:TEXT:`Roar*:*:{, 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 Roar, 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 Roar, Msg %ChanSet $BName($Nick) $+ 0,1 Looks at $BName($2) $+ 0,1!, }}, on 1:TEXT:`FeatherDance*:*:{, 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) <= 15) { Notice $nick $BName($2) $+ 15,1 Will not be Affected! | halt }, Set %Attack FeatherDance, 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.2 ),0), TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 FeatherDance, Msg %ChanSet $BName($Nick) $+ 10,1 Stares at $BName($2) $+ 10,1!, Unset %Attacks, Unset %Attack, }}, on 1:TEXT:`Helping-Hand*:*:{, 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) <= 15) { Notice $nick $BName($2) $+ 15,1 Will not be Affected! | halt }, Set %Attack Helping-Hand, 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.2 ),0), TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick $2 Helping-Hand, Msg %ChanSet $BName($Nick) $+ 0,1 Approaches $BName($2) $+ 0,1!, Unset %Attacks, Unset %Attack, }}, on 1:TEXT:`Agility:#:{, 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),FSpeed) >= 7) { Notice $nick You May Longer Raise Your Speed! | halt }, Set %Attack Agility, 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 Hey Agility, Msg %ChanSet $BName($Nick) $+ 13,1 Starts to Focus on Speed!, }}, on 1:TEXT:`DragonDance:#:{, 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),FSpeed) >= 7) { Notice $nick You May Longer Raise Your Speed! | halt }, Set %Attack DragonDance, 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 Hey DragonDance, Msg %ChanSet $BName($Nick) $+ 12,1 Begins to Dance!, }}, on 1:TEXT:`Haze:#:{, 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),FSpeed) >= 7) { Notice $nick You May Longer Raise Your Speed! | halt }, Set %Attack Haze, 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 Haze, Msg %ChanSet $BName($Nick) $+ 11,1 Starts to Focus on its Status Abnormalities!, }}, on 1:TEXT:`Harden:#:{, 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 Harden, 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 Hey Harden, Msg %ChanSet $BName($Nick) $+ 0,1 Starts to Shine!, }}, on 1:TEXT:`Detect:#:{, 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 Detect, 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, Writeini -n $nick $+ .ini $nick CantCancel Yes, Writeini -n $nick $+ .ini $Poke($nick) Dodge Yes, Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 2 ),0), TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick Hey Detect, Msg %ChanSet $BName($Nick) $+ 7,1 Focuses On The Enemy!, }}, on 1:TEXT:`Calm-Mind:#:{, 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 Calm-Mind, 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 Hey Calm-Mind, Msg %ChanSet $BName($Nick) $+ 13,1 Begins to Focus!, }}, on 1:TEXT:`BulkUp:#:{, 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 BulkUp, 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 Hey BulkUp, Msg %ChanSet $BName($Nick) $+ 13,1 Begins to Focus!, }}, on 1:TEXT:`Cosmic-Power:#:{, 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 Cosmic-Power, 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 Hey Cosmic-Power, Msg %ChanSet $BName($Nick) $+ 0,1 Starts to Shine!, }}, on 1:TEXT:`Light-Screen:#:{, 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),LScreen) == Yes) { Notice $nick You Already Have Light Screen on! | halt }, Set %Attack Light-Screen, 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 Hey Light-Screen, Msg %ChanSet $BName($Nick) $+ 13,1 Starts To Make a Screen!, }}, on 1:TEXT:`Reflect:#:{, 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),Reflect) == Yes) { Notice $nick You Already Have Reflect on! | halt }, Set %Attack Reflect, 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 Hey Reflect, Msg %ChanSet $BName($Nick) $+ 13,1 Starts To Make a Screen!, }}, on 1:TEXT:`Double-Team:#:{, 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 Double-Team, 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 Hey Double-Team, Msg %ChanSet $BName($Nick) $+ 0,1 Moves Around Really Fast!, }}, on 1:TEXT:`SafeGaurd:#:{, 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),SafeGaurd) == Yes) { Notice $nick You Are Safe Gaurding already! | halt }, Set %Attack SafeGaurd, 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 Hey SafeGaurd, Msg %ChanSet $BName($Nick) $+ 0,1 Begins to SafeGaurd!, }}, on 1:TEXT:`Grudge:#:{, 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),Grudge) == Yes) { Notice $nick You Are Grudged already! | halt }, Set %Attack Grudge, 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 Grudge, Msg %ChanSet $BName($Nick) $+ 2,1 Begins to Grudge!, }}, on 1:TEXT:`Endure:#:{, 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),Endure) == Yes) { Notice $nick You Are Endured already! | halt }, Set %Attack Endure, 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 Endure, Msg %ChanSet $BName($Nick) $+ 0,1 Begins to Endure!, }}, on 1:TEXT:`Destiny-Bond:#:{, 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),Bond) == Yes) { Notice $nick You Are Bonded already! | halt }, Set %Attack Destiny-Bond, 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 Hey Destiny-Bond, Msg %ChanSet $BName($Nick) $+ 2,1 Begins to Destiny-Bond!, }}, on 1:TEXT:`Haze:#:{, 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,$nick,Attacking) == Yes) { Notice $nick You Are Attacking! | halt }, Set %Attack Haze, 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.5 ),0), TimerAttack $+ $nick 1 %Time /GatheringInfo $Nick Hey Haze, Msg %ChanSet $BName($Nick) $+ 11,1 Begins to do Haze!, }}, on 1:TEXT:`Focus-Energy:#:{, 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 Focus-Energy, 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 Hey Focus-Energy, Msg %ChanSet $BName($Nick) $+ 0,1 Begins to Focus!, }}, on 1:TEXT:`SilverWind:#:{, 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 SilverWind, 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 Hey SilverWind, Msg %ChanSet $BName($Nick) $+ 3,1 Slowly Flaps Its Glowing Silver Wings!, }}, on 1:TEXT:`AncientPower:#:{, 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 AncientPower, 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 Hey AncientPower, Msg %ChanSet $BName($Nick) $+ 5,1 Starts todo AncientPower!, }}, on 1:TEXT:`Recover:#:{, 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 Recover, 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 Hey Recover, Msg %ChanSet $BName($Nick) $+ 0,1 Glows with White Light!, }}, on 1:TEXT:`Mist:#:{, 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 Mist, 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 Hey Mist, Msg %ChanSet $BName($Nick) $+ 11,1 Starts to Surround $PGender2($Nick) $+ self with mist!, }}, on 1:TEXT:`Teleport:#:{, 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 Teleport, 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 Hey Teleport, Msg %ChanSet $BName($Nick) $+ 13,1 Prepares to Teleport itself out of Battle!, }}, on 1:TEXT:`String-Shot*:*:{, 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),FSpeed) >= 7) { Notice $nick You May Longer Decrease $2 $+ s Speed! | halt }, Set %Attack String-Shot, 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 String-Shot, Msg %ChanSet $BName($Nick) $+ 3,1 Builds up strings at $BName($2) $+ 3,1!, Unset %Attacks, Unset %Attack, }}, on 1:TEXT:`Mud-Shot*:*:{, 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),FSpeed) >= 7) { Notice $nick You May Longer Decrease $2 $+ s Speed! | halt }, Set %Attack Mud-Shot, 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 Mud-Shot, Msg %ChanSet $BName($Nick) $+ 7,1 Looks for Mud, while facing $BName($2) $+ 7,1!, Unset %Attacks, Unset %Attack, }}, on 1:TEXT:`Mirror-Move*:*:{, 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 Mirror-Move, 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 Mirror-Move, Msg %ChanSet $BName($Nick) $+ 10,1 Starts to do Mirror Move at $BName($2) $+ 10,1!, }}, on 1:TEXT:`Roleplay*:*:{, 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 Roleplay, 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 Roleplay, Msg %ChanSet $BName($Nick) $+ 13,1 Pretends to be $BName($2) $+ 13,1!, }}, on *:text:`StockPile:#: {, 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 Attacking! | halt }, if ($readini($nick $+ .ini,$Poke($Nick),Charging) == yes) { Notice $nick Your Already Charging! | halt }, if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick Your Not Even Battling! | halt }, Set %Attack StockPile, 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, writeini $nick $+ .ini $Poke($Nick) StockPile Yes, writeini $nick $+ .ini $Poke($Nick) Charging Yes, writeini $nick $+ .ini $Poke($Nick) CDamage 0, Set %Time $Round($Calc( $readini($nick $+ .ini,$Poke($Nick),Speed) * 0.90 ),0), TimerAttack $+ $nick 12 %Time /StockPile $nick $2, Msg %ChanSet $BName($Nick) $+ 0,1 Starts to Save Energy in its Mouth!, }}, on 1:TEXT:`Swallow:#:{, 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),StockPile) != yes) { Notice $nick Your Not Charging StockPile! | halt }, if ($readini($nick $+ .ini,$Poke($Nick),CDamage) < 15) { Notice $nick You Cant Swallow Yet! | halt }, Set %Attack Swallow, 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, GatheringInfo $Nick Hey Swallow, }}, on 1:TEXT:`SpitUp*:*:{, 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,$Poke($Nick),StockPile) != yes) { Notice $nick Your Are Not Charging a StockPile! | halt }, if ($readini($nick $+ .ini,$Poke($Nick),CDamage) < 30) { Notice $nick You Cant Fire Yet! | halt }, if ($readini($nick $+ .ini,$nick,field) != $readini($2 $+ .ini,$2,field)) { Notice $nick Sorry, $2 Is Somewhere Else! | halt }, Set %Attack SpitUp, 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, Writeini -n $nick $+ .ini $nick Attacking Yes, GatheringInfo $Nick $2 SpitUp, }  }on 1:text:`PokeMart:#: {, 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 (%EliteBattle = yes) && (%EFighting == $Nick) { Notice $nick You are Fighting Elite 4! | halt }, Set %Town $readini($nick $+ .ini,Travel,Town), Set %Town $readini(Map $+ .ini,%Town,Places), if ($istok(%Town,PokeMart,32) == $False) { notice $nick $readini($nick $+ .ini,Travel,Town) Does Not Have a PokeMart! | halt }, Set %Town $readini($nick $+ .ini,Travel,Town), Set %Town $readini(Map $+ .ini,%Town,Shop), if (%Town == $Null) { Set %Town None }, Notice $nick 8Items We Have:15 %Town 8 To Buy: 3`Buy (Item) (Amount), Unset %Town, }  on 1:text:`Places:#: {, 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 }, Set %Town $readini($nick $+ .ini,Travel,Town), Set %Town $readini(Map $+ .ini,%Town,Places), Notice $nick 8Places To Go $+ %Town, Unset %Town, }  on *:text:`buy*:#:{, 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 (%EliteBattle = yes) && (%EFighting == $Nick) { Notice $nick You are Fighting Elite 4! | halt }, if (%tourneystarted = yes) { halt }, if (. isin $3) { Notice $nick Dont Use Decimals! | halt }, if (- isin $3) { Notice $nick Dont Use -! | halt }, Set %Town $readini($nick $+ .ini,Travel,Town), Set %Town $readini(Map $+ .ini,%Town,Items), if ($istok(%Town,$2,32) == $False) { notice $nick $readini($nick $+ .ini,Travel,Town) Does Not Carry This Item! | halt }, if ($istok(%Town,$2,32) == $true) {, Set %3 $3, if ($3 == $null) { set %3 1 }, if (%3 !isnum) { set %3 1 }, Set %Town $readini($nick $+ .ini,Travel,Town), Set %ItemPrice $readini(Map $+ .ini,%Town,$2), if (Potion == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (SuperPotion == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (HyperPotion == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (Antidote == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (ParaHeal == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (BurnHeal == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (IceHeal == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought $3 $2 $+ (s) for %Price Zenny, }      if (Awake == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (Ether == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (PokeBall == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (GreatBall == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought $3 $2 $+ (s) for %Price Zenny, }      if (UltraBall == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (GC == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, if ($readini($nick $+ .ini,Items,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (ThunderStone == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (WaterStone == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (LeafStone == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (FireStone == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }      if (RareCandy == $2) {, set %Price $calc(%3 * %ItemPrice), Dec %Price 1, if ($readini($nick $+ .ini,$nick,money) <= %Price) { Notice $nick Not Enough Money! | halt }, Inc %Price 1, writeini -n $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price), writeini -n $nick $+ .ini Items $2 $calc($readini($nick $+ .ini,Items,$2) + %3), Notice $nick You Bought %3 $2 $+ (s) for %Price Zenny, }    }, Unset %Price, }  on 1:text:`Use Potion:#: {, 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 Attacking! | halt }, if ($readini($nick $+ .ini,Items,potion) <= 0) { Notice $nick You Dont Have Potions! | halt }, Writeini -n $nick $+ .ini $nick Attacking Yes, Writeini -n $nick $+ .ini $nick CantCancel Yes, TimerAttack $+ $nick 1 $rand(10,15) /AttackAgain $nick, Writeini -n $nick $+ .ini $Poke($Nick) Hp $calc($readini($nick $+ .ini,$Poke($Nick),Hp) + 20), Writeini -n $nick $+ .ini Items Potion $calc($readini($nick $+ .ini,Items,Potion) - 1), Msg %ChanSet $Name($Nick) $+ 0,1 Uses Potion On $Gender($Nick) $Pokemon($Nick) $+ 0,1 Healing Its Hp By 20, if ($Stat($nick,Hp) > $Stat($nick,MHp)) { writeini $Nick $+ .ini $Poke($Nick) Hp $Stat($nick,MHp) }, }  on 1:text:`Use SuperPotion:#: {, 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 Attacking! | halt }, if ($readini($nick $+ .ini,Items,SuperPotion) <= 0) { Notice $nick You Dont Have Super Potions! | halt }, Writeini -n $nick $+ .ini $nick Attacking Yes, Writeini -n $nick $+ .ini $nick CantCancel Yes, TimerAttack $+ $nick 1 $rand(10,15) /AttackAgain $nick, Writeini -n $nick $+ .ini $Poke($Nick) Hp $calc($readini($nick $+ .ini,$Poke($Nick),Hp) + 50), Writeini -n $nick $+ .ini Items SuperPotion $calc($readini($nick $+ .ini,Items,SuperPotion) - 1), Msg %ChanSet $Name($Nick) $+ 0,1 Uses Super Potion On $Gender($Nick) $Pokemon($Nick) $+ 0,1 Healing Its Hp By 50, if ($Stat($nick,Hp) > $Stat($nick,MHp)) { writeini $Nick $+ .ini $Poke($Nick) Hp $Stat($nick,MHp) }, }  on 1:text:`Use HyperPotion:#: {, 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 Attacking! | halt }, if ($readini($nick $+ .ini,Items,HyperPotion) <= 0) { Notice $nick You Dont Have Hyper Potions! | halt }, Writeini -n $nick $+ .ini $nick Attacking Yes, Writeini -n $nick $+ .ini $nick CantCancel Yes, TimerAttack $+ $nick 1 $rand(10,15) /AttackAgain $nick, Writeini -n $nick $+ .ini $Poke($Nick) Hp $calc($readini($nick $+ .ini,$Poke($Nick),Hp) + 200), Writeini -n $nick $+ .ini Items HyperPotion $calc($readini($nick $+ .ini,Items,HyperPotion) - 1), Msg %ChanSet $Name($Nick) $+ 0,1 Uses Hyper Potion On $Gender($Nick) $Pokemon($Nick) $+ 0,1 Healing Its Hp By 200, if ($Stat($nick,Hp) > $Stat($nick,MHp)) { writeini $Nick $+ .ini $Poke($Nick) Hp $Stat($nick,MHp) }, }  on 1:text:`Use Antidote:#: {, 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 Attacking! | halt }, if ($readini($nick $+ .ini,Items,Antidote) <= 0) { Notice $nick You Dont Have Antidotes! | halt }, if ($readini($nick $+ .ini,$Poke($Nick),Poisoned) != Yes) { Notice $nick $Poke($Nick) is not Poisoned! | halt }, Writeini -n $nick $+ .ini $nick Attacking Yes, Writeini -n $nick $+ .ini $nick CantCancel Yes, TimerAttack $+ $nick 1 $rand(10,15) /AttackAgain $nick, Writeini -n $nick $+ .ini $Poke($Nick) Poisoned No, Writeini -n $nick $+ .ini Items Antidote $calc($readini($nick $+ .ini,Items,Antidote) - 1), Msg %ChanSet $Name($Nick) $+ 0,1 Uses Antidote On $Gender($Nick) $Pokemon($Nick) $+ 0,1 Curing it of Poison!, }  on 1:text:`Use BurnHeal:#: {, 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 Attacking! | halt }, if ($readini($nick $+ .ini,Items,BurnHeal) <= 0) { Notice $nick You Dont Have BurnHeals! | halt }, if ($readini($nick $+ .ini,$Poke($Nick),Burned) != Yes) { Notice $nick $Poke($Nick) is not Burned! | halt }, Writeini -n $nick $+ .ini $nick Attacking Yes, Writeini -n $nick $+ .ini $nick CantCancel Yes, TimerAttack $+ $nick 1 $rand(10,15) /AttackAgain $nick, Writeini -n $nick $+ .ini $Poke($Nick) Burned No, Writeini -n $nick $+ .ini Items BurnHeal $calc($readini($nick $+ .ini,Items,BurnHeal) - 1), Msg %ChanSet $Name($Nick) $+ 0,1 Uses BurnHeal On $Gender($Nick) $Pokemon($Nick) $+ 0,1 Curing it of Burn!, }  on 1:text:`Use IceHeal:#: {, 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 Attacking! | halt }, if ($readini($nick $+ .ini,Items,IceHeal) <= 0) { Notice $nick You Dont Have IceHeals! | halt }, if ($readini($nick $+ .ini,$Poke($Nick),Iced) != Yes) { Notice $nick $Poke($Nick) is not Iced! | halt }, Writeini -n $nick $+ .ini $nick Attacking Yes, Writeini -n $nick $+ .ini $nick CantCancel Yes, TimerAttack $+ $nick 1 $rand(10,15) /AttackAgain $nick, Writeini -n $nick $+ .ini $Poke($Nick) Iced No, Writeini -n $nick $+ .ini Items IceHeal $calc($readini($nick $+ .ini,Items,IceHeal) - 1), Msg %ChanSet $Name($Nick) $+ 0,1 Uses IceHeal On $Gender($Nick) $Pokemon($Nick) $+ 0,1 Curing it of Iced!, }  on 1:text:`Use RareCandy:#: {, 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 Fighting! | halt }, if ($readini($nick $+ .ini,Items,RareCandy) <= 0) { Notice $nick You Dont Have RareCandies! | halt }, Writeini -n $nick $+ .ini $Poke($Nick) Exp $Stat($Nick,ExpNeeded), Writeini -n $nick $+ .ini Items RareCandy $calc($readini($nick $+ .ini,Items,RareCandy) - 1), LvLCheck $Nick, }  on 1:text:`Use Awake:#: {, 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 Attacking! | halt }, if ($readini($nick $+ .ini,Items,Awake) <= 0) { Notice $nick You Dont Have Awakes! | halt }, if ($readini($nick $+ .ini,$Poke($Nick),Sleeping) != Yes) { Notice $nick $Poke($Nick) is not Asleep! | halt }, Writeini -n $nick $+ .ini $nick Attacking Yes, Writeini -n $nick $+ .ini $nick CantCancel Yes, TimerAttack $+ $nick 1 $rand(10,15) /AttackAgain $nick, Writeini -n $nick $+ .ini $Poke($Nick) Sleeping No, Writeini -n $nick $+ .ini Items Awake $calc($readini($nick $+ .ini,Items,Awake) - 1), Msg %ChanSet $Name($Nick) $+ 0,1 Uses Awake On $Gender($Nick) $Pokemon($Nick) $+ 0,1 Curing it of Sleep!, }  on 1:text:`Use Ether*:#:{, 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 Attacking! | halt }, if ($readini($nick $+ .ini,Items,Ether) <= 0) { Notice $nick You Dont Have Ethers! | 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) == $False) { Notice $Nick $3 is not a Move You Have! | Halt }, Writeini -n $nick $+ .ini $nick Attacking Yes, Writeini -n $nick $+ .ini $nick CantCancel Yes, TimerAttack $+ $nick 1 $rand(10,15) /AttackAgain $nick, Set %Move $3 $+ PP, Set %Move2 $3 $+ MPP, writeini $Nick $+ .ini $Poke($Nick) %Move $calc($readini($nick $+ .ini,$Poke($Nick),%Move) + 10), Writeini -n $nick $+ .ini Items Ether $calc($readini($nick $+ .ini,Items,Ether) - 1), Msg %ChanSet $Name($Nick) $+ 0,1 Uses Ether On $Gender($Nick) $Pokemon($Nick) $+ 0,1 Attack 7' $+ $3 $+ 7'0 Making it Gain 10 PP!, if ($readini($nick $+ .ini,$Poke($Nick),%Move) > $readini($nick $+ .ini,$Poke($Nick),%Move2)) { writeini $Nick $+ .ini $Poke($Nick) %Move $readini($nick $+ .ini,$Poke($Nick),%Move2) }, Unset %Move, Unset %Move2, }  on 1:text:`Throw PokeBall*:#:{, 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 Attacking! | halt }, if ($readini($nick $+ .ini,items,PokeBall) <= 0) { Notice $nick You Dont Have The Balls, PokeBalls! | halt }, if ($readini($nick $+ .ini,$nick,Party) == 6) { Notice $nick Your Party Is Full! | halt }, if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick You Are Not Fighting! | halt }, if ($readini($3 $+ .ini,$3,Fighting) != Yes) { Notice $nick $3 Is not Fighting! | halt }, if ($readini($nick $+ .ini,$3,Pokemon) != $Null) { Notice $nick You have Already Caught $3 $+ ! | halt }, if ($readini($3 $+ .ini,$3,WNpc) != Yes) { Notice $nick $3 is Not a Wild Pokemon! | Halt }, if ($readini($3 $+ .ini,$3,Type) == Ghost) && ($readini($nick $+ .ini,Items,SilphScope) != Yes) { Notice $nick You Cannot Catch a Ghost Pokemon with $2 $+ ! | halt }, if ($readini($nick $+ .ini,$nick,field) != $readini($3 $+ .ini,$3,field)) { Notice $nick You Cannot! You are Somewhere Else! | halt }, if ($readini($3 $+ .ini,$3,Hp) <= 1) { goto Catch }, Writeini $nick $+ .ini Items PokeBall $calc($readini($nick $+ .ini,Items,Pokeball) - 1), Set %Hit $rand(5,$Stat($3,Hp)), if (%Hit > 5) { Msg %ChanSet $Name($Nick) $+ 8,1 Throws A Pokeball at $Pokemon($3) $+ 8,1! | Msg %ChanSet $Name($Nick) $+ 8,1 Did Not Catch $Pokemon($3) $+ 8,1! | halt }, :Catch, Var %Hp = $readini($3 $+ .ini,$3,MHp), Var %SAttack = $readini($3 $+ .ini,$3,MSAttack), Var %Attack = $readini($3 $+ .ini,$3,MAttack), Var %SDefense = $readini($3 $+ .ini,$3,MSDefense), Var %Defense = $readini($3 $+ .ini,$3,MDefense), Var %Accuracy = $readini($3 $+ .ini,$3,MAccuracy), Var %Agility = $readini($3 $+ .ini,$3,MAgility), Var %Intelligence = $readini($3 $+ .ini,$3,MIntelligence), Var %Speed = $readini($3 $+ .ini,$3,MSpeed), Var %FSpeed = $readini($3 $+ .ini,$3,MFSpeed), Var %Level = $readini($3 $+ .ini,$3,Level), Var %ExpNeeded = $readini($3 $+ .ini,$3,ExpNeeded), Var %SExp = $readini($3 $+ .ini,$3,SExp), Var %SExpNeeded = $readini($3 $+ .ini,$3,SpeedExpNeeded), Var %Type = $readini($3 $+ .ini,$3,Type), Var %Type2 = $readini($3 $+ .ini,$3,Type2), Var %Aura = $readini($3 $+ .ini,$3,PAura), Var %BAura = $readini($3 $+ .ini,$3,PBAura), writeini -n $Nick $+ .ini $3 MHp %Hp, writeini -n $Nick $+ .ini $3 MSAttack %SAttack, writeini -n $Nick $+ .ini $3 MSDefense %SDefense, writeini -n $Nick $+ .ini $3 MAttack %Attack, writeini -n $Nick $+ .ini $3 MDefense %Defense, writeini -n $Nick $+ .ini $3 MAccuracy %Accuracy, writeini -n $Nick $+ .ini $3 MAgility %Agility, writeini -n $Nick $+ .ini $3 MIntelligence %Intelligence, writeini -n $Nick $+ .ini $3 MSpeed %Speed, writeini -n $Nick $+ .ini $3 MFSpeed %FSpeed, writeini -n $Nick $+ .ini $3 Level %Level, writeini -n $Nick $+ .ini $3 Type %Type, writeini -n $Nick $+ .ini $3 Type2 %Type2, Writeini -n $Nick $+ .ini $3 $3 Yes, writeini -n $Nick $+ .ini $3 Exp 0, writeini -n $Nick $+ .ini $3 ExpNeeded %ExpNeeded, writeini -n $Nick $+ .ini $3 SExp %SExp, writeini -n $Nick $+ .ini $3 SpeedExpNeeded %SExpNeeded, writeini -n $Nick $+ .ini $3 Aura %Aura, writeini -n $Nick $+ .ini $3 BAura %bAura, writeini -n $Nick $+ .ini $3 WantEvolve Yes, Writeini -n $Nick $+ .ini $3 Pokemon $3, Writeini -n $Nick $+ .ini Pokemon $3 yes, Set %Gender $Rand(1,2), if (%Gender == 1) { writeini -n $nick $+ .ini $3 Gender Male }, if (%Gender == 2) { writeini -n $nick $+ .ini $3 Gender Female }, if ($readini($3 $+ .ini,$Poke($3),Attack1) != None) { Writeini -n $Nick $+ .ini $3 Attack1 $readini($3 $+ .ini,$3,Attack1) | Set %Attack1 $readini($3 $+ .ini,$3,Attack1) | writeini $Nick $+ .ini $3 L $+ %Attack1 Yes | Set %MovePP $readini(Pokemon_Status $+ .ini,PPCheck,%Attack1) | writeini -n $Nick $+ .ini $3 %Attack1 $+ MPP %MovePP }, if ($readini($3 $+ .ini,$Poke($3),Attack2) != None) { Writeini -n $Nick $+ .ini $3 Attack2 $readini($3 $+ .ini,$3,Attack2) | Set %Attack2 $readini($3 $+ .ini,$3,Attack2) | writeini $Nick $+ .ini $3 L $+ %Attack2 Yes | Set %MovePP $readini(Pokemon_Status $+ .ini,PPCheck,%Attack2) | writeini -n $Nick $+ .ini $3 %Attack2 $+ MPP %MovePP }, if ($readini($3 $+ .ini,$Poke($3),Attack3) != None) { Writeini -n $Nick $+ .ini $3 Attack3 $readini($3 $+ .ini,$3,Attack3) | Set %Attack3 $readini($3 $+ .ini,$3,Attack3) | writeini $Nick $+ .ini $3 L $+ %Attack3 Yes | Set %MovePP $readini(Pokemon_Status $+ .ini,PPCheck,%Attack3) | writeini -n $Nick $+ .ini $3 %Attack3 $+ MPP %MovePP }, if ($readini($3 $+ .ini,$Poke($3),Attack4) != None) { Writeini -n $Nick $+ .ini $3 Attack4 $readini($3 $+ .ini,$3,Attack4) | Set %Attack4 $readini($3 $+ .ini,$3,Attack4) | writeini $Nick $+ .ini $3 L $+ %Attack4 Yes | Set %MovePP $readini(Pokemon_Status $+ .ini,PPCheck,%Attack4) | writeini -n $Nick $+ .ini $3 %Attack4 $+ MPP %MovePP }, if ($readini($Nick $+ .ini,$3,Attack1) == $Null) { Writeini -n $Nick $+ .ini $3 Attack1 None }, if ($readini($Nick $+ .ini,$3,Attack2) == $Null) { Writeini -n $Nick $+ .ini $3 Attack2 None }, if ($readini($Nick $+ .ini,$3,Attack3) == $Null) { Writeini -n $Nick $+ .ini $3 Attack3 None }, if ($readini($Nick $+ .ini,$3,Attack4) == $Null) { Writeini -n $Nick $+ .ini $3 Attack4 None }, Writeini $nick $+ .ini $nick Party $calc($readini($nick $+ .ini,$nick,Party) + 1), Writeini $nick $+ .ini $nick MParty $calc($readini($nick $+ .ini,$nick,MParty) + 1), set %Batlist $remtok(%Batlist,$3,1,32), TimerAttack $+ $3 off, Writeini $3 $+ .ini $3 Fighting No, Writeini $3 $+ .ini $3 Field None, Msg %ChanSet $Name($Nick) $+ 8,1 Throws A Pokeball at $Pokemon($3) $+ 8,1!, Msg %ChanSet $Name($Nick) $+ 8,1 Caught $Pokemon($3) $+ 8,1!, writeini $Nick $+ .ini $Nick TExp $calc($readini($Nick $+ .ini,$Nick,TExp) + 2), }  on 1:text:`Throw GreatBall*:#:{, 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 Attacking! | halt }, if ($readini($nick $+ .ini,items,GreatBall) <= 0) { Notice $nick You Dont Have The Balls, GreatBalls! | halt }, if ($readini($nick $+ .ini,$nick,Party) == 6) { Notice $nick Your Party Is Full! | halt }, if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick You Are Not Fighting! | halt }, if ($readini($3 $+ .ini,$3,Fighting) != Yes) { Notice $nick $3 Is not Fighting! | halt }, if ($readini($nick $+ .ini,$3,Pokemon) != $Null) { Notice $nick You have Already Caught $3 $+ ! | halt }, if ($readini($3 $+ .ini,$3,WNpc) != Yes) { Notice $nick $3 is Not a Wild Pokemon! | Halt }, if ($readini($nick $+ .ini,$nick,field) != $readini($3 $+ .ini,$3,field)) { Notice $nick You Cannot! You are Somewhere Else! | halt }, if ($readini($3 $+ .ini,$3,Type) == Ghost) && ($readini($nick $+ .ini,Items,SilphScope) != Yes) { Notice $nick You Cannot Catch a Ghost Pokemon with $2 $+ ! | halt }, if ($readini($3 $+ .ini,$3,Hp) <= 1) { goto Catch }, Writeini $nick $+ .ini Items GreatBall $calc($readini($nick $+ .ini,Items,GreatBall) - 1), Set %Hit $rand(10,$Stat($3,Hp)), if (%Hit > 10) { Msg %ChanSet $Name($Nick) $+ 8,1 Throws A GreatBall at $Pokemon($3) $+ 8,1! | Msg %ChanSet $Name($Nick) $+ 8,1 Did Not Catch $Pokemon($3) $+ 8,1! | halt }, :Catch, Var %Hp = $readini($3 $+ .ini,$3,MHp), Var %SAttack = $readini($3 $+ .ini,$3,MSAttack), Var %Attack = $readini($3 $+ .ini,$3,MAttack), Var %SDefense = $readini($3 $+ .ini,$3,MSDefense), Var %Defense = $readini($3 $+ .ini,$3,MDefense), Var %Accuracy = $readini($3 $+ .ini,$3,MAccuracy), Var %Agility = $readini($3 $+ .ini,$3,MAgility), Var %Intelligence = $readini($3 $+ .ini,$3,MIntelligence), Var %Speed = $readini($3 $+ .ini,$3,MSpeed), Var %FSpeed = $readini($3 $+ .ini,$3,MFSpeed), Var %Level = $readini($3 $+ .ini,$3,Level), Var %ExpNeeded = $readini($3 $+ .ini,$3,ExpNeeded), Var %SExp = $readini($3 $+ .ini,$3,SExp), Var %SExpNeeded = $readini($3 $+ .ini,$3,SpeedExpNeeded), Var %Type = $readini($3 $+ .ini,$3,Type), Var %Type2 = $readini($3 $+ .ini,$3,Type2), Var %Aura = $readini($3 $+ .ini,$3,PAura), Var %BAura = $readini($3 $+ .ini,$3,PBAura), writeini -n $Nick $+ .ini $3 MHp %Hp, writeini -n $Nick $+ .ini $3 MSAttack %SAttack, writeini -n $Nick $+ .ini $3 MSDefense %SDefense, writeini -n $Nick $+ .ini $3 MAttack %Attack, writeini -n $Nick $+ .ini $3 MDefense %Defense, writeini -n $Nick $+ .ini $3 MAccuracy %Accuracy, writeini -n $Nick $+ .ini $3 MAgility %Agility, writeini -n $Nick $+ .ini $3 MIntelligence %Intelligence, writeini -n $Nick $+ .ini $3 MSpeed %Speed, writeini -n $Nick $+ .ini $3 MFSpeed %FSpeed, writeini -n $Nick $+ .ini $3 Level %Level, writeini -n $Nick $+ .ini $3 Type %Type, writeini -n $Nick $+ .ini $3 Type2 %Type2, Writeini -n $Nick $+ .ini $3 $3 Yes, writeini -n $Nick $+ .ini $3 Exp 0, writeini -n $Nick $+ .ini $3 ExpNeeded %ExpNeeded, writeini -n $Nick $+ .ini $3 SExp %SExp, writeini -n $Nick $+ .ini $3 SpeedExpNeeded %SExpNeeded, writeini -n $Nick $+ .ini $3 Aura %Aura, writeini -n $Nick $+ .ini $3 BAura %bAura, writeini -n $Nick $+ .ini $3 WantEvolve Yes, Writeini -n $Nick $+ .ini $3 Pokemon $3, Writeini -n $Nick $+ .ini Pokemon $3 yes, Set %Gender $Rand(1,2), if (%Gender == 1) { writeini -n $nick $+ .ini $3 Gender Male }, if (%Gender == 2) { writeini -n $nick $+ .ini $3 Gender Female }, if ($readini($3 $+ .ini,$Poke($3),Attack1) != None) { Writeini -n $Nick $+ .ini $3 Attack1 $readini($3 $+ .ini,$3,Attack1) | Set %Attack1 $readini($3 $+ .ini,$3,Attack1) | writeini $Nick $+ .ini $3 L $+ %Attack1 Yes | Set %MovePP $readini(Pokemon_Status $+ .ini,PPCheck,%Attack1) | writeini -n $Nick $+ .ini $3 %Attack1 $+ MPP %MovePP }, if ($readini($3 $+ .ini,$Poke($3),Attack2) != None) { Writeini -n $Nick $+ .ini $3 Attack2 $readini($3 $+ .ini,$3,Attack2) | Set %Attack2 $readini($3 $+ .ini,$3,Attack2) | writeini $Nick $+ .ini $3 L $+ %Attack2 Yes | Set %MovePP $readini(Pokemon_Status $+ .ini,PPCheck,%Attack2) | writeini -n $Nick $+ .ini $3 %Attack2 $+ MPP %MovePP }, if ($readini($3 $+ .ini,$Poke($3),Attack3) != None) { Writeini -n $Nick $+ .ini $3 Attack3 $readini($3 $+ .ini,$3,Attack3) | Set %Attack3 $readini($3 $+ .ini,$3,Attack3) | writeini $Nick $+ .ini $3 L $+ %Attack3 Yes | Set %MovePP $readini(Pokemon_Status $+ .ini,PPCheck,%Attack3) | writeini -n $Nick $+ .ini $3 %Attack3 $+ MPP %MovePP }, if ($readini($3 $+ .ini,$Poke($3),Attack4) != None) { Writeini -n $Nick $+ .ini $3 Attack4 $readini($3 $+ .ini,$3,Attack4) | Set %Attack4 $readini($3 $+ .ini,$3,Attack4) | writeini $Nick $+ .ini $3 L $+ %Attack4 Yes | Set %MovePP $readini(Pokemon_Status $+ .ini,PPCheck,%Attack4) | writeini -n $Nick $+ .ini $3 %Attack4 $+ MPP %MovePP }, if ($readini($Nick $+ .ini,$3,Attack1) == $Null) { Writeini -n $Nick $+ .ini $3 Attack1 None }, if ($readini($Nick $+ .ini,$3,Attack2) == $Null) { Writeini -n $Nick $+ .ini $3 Attack2 None }, if ($readini($Nick $+ .ini,$3,Attack3) == $Null) { Writeini -n $Nick $+ .ini $3 Attack3 None }, if ($readini($Nick $+ .ini,$3,Attack4) == $Null) { Writeini -n $Nick $+ .ini $3 Attack4 None }, Writeini $nick $+ .ini $nick Party $calc($readini($nick $+ .ini,$nick,Party) + 1), Writeini $nick $+ .ini $nick MParty $calc($readini($nick $+ .ini,$nick,MParty) + 1), set %Batlist $remtok(%Batlist,$3,1,32), TimerAttack $+ $3 off, Writeini $3 $+ .ini $3 Fighting No, Writeini $3 $+ .ini $3 Field None, Msg %ChanSet $Name($Nick) $+ 8,1 Throws A GreatBall at $Pokemon($3) $+ 8,1!, Msg %ChanSet $Name($Nick) $+ 8,1 Caught $Pokemon($3) $+ 8,1!, writeini $Nick $+ .ini $Nick TExp $calc($readini($Nick $+ .ini,$Nick,TExp) + 2), }  on 1:text:`Throw UltraBall*:#:{, 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 Attacking! | halt }, if ($readini($nick $+ .ini,items,UltraBall) <= 0) { Notice $nick You Dont Have The Balls, UltraBalls! | halt }, if ($readini($nick $+ .ini,$nick,Party) == 6) { Notice $nick Your Party Is Full! | halt }, if ($readini($nick $+ .ini,$nick,Fighting) != Yes) { Notice $nick You Are Not Fighting! | halt }, if ($readini($3 $+ .ini,$3,Fighting) != Yes) { Notice $nick $3 Is not Fighting! | halt }, if ($readini($nick $+ .ini,$3,Pokemon) != $Null) { Notice $nick You have Already Caught $3 $+ ! | halt }, if ($readini($3 $+ .ini,$3,WNpc) != Yes) { Notice $nick $3 is Not a Wild Pokemon! | Halt }, if ($readini($3 $+ .ini,$3,Type) == Ghost) && ($readini($nick $+ .ini,Items,SilphScope) != Yes) { Notice $nick You Cannot Catch a Ghost Pokemon with $2 $+ ! | halt }, if ($readini($nick $+ .ini,$nick,field) != $readini($3 $+ .ini,$3,field)) { Notice $nick You Cannot! You are Somewhere Else! | halt }, if ($readini($3 $+ .ini,$3,Hp) <= 1) { goto Catch }, Writeini $nick $+ .ini Items UltraBall $calc($readini($nick $+ .ini,Items,UltraBall) - 1), Set %Hit $rand(15,$Stat($3,Hp)), if (%Hit > 15) { Msg %ChanSet $Name($Nick) $+ 8,1 Throws A UltraBall at $Pokemon($3) $+ 8,1! | Msg %ChanSet $Name($Nick) $+ 8,1 Did Not Catch $Pokemon($3) $+ 8,1! | halt }, :Catch, Var %Hp = $readini($3 $+ .ini,$3,MHp), Var %SAttack = $readini($3 $+ .ini,$3,MSAttack), Var %Attack = $readini($3 $+ .ini,$3,MAttack), Var %SDefense = $readini($3 $+ .ini,$3,MSDefense), Var %Defense = $readini($3 $+ .ini,$3,MDefense), Var %Accuracy = $readini($3 $+ .ini,$3,MAccuracy), Var %Agility = $readini($3 $+ .ini,$3,MAgility), Var %Intelligence = $readini($3 $+ .ini,$3,MIntelligence), Var %Speed = $readini($3 $+ .ini,$3,MSpeed), Var %FSpeed = $readini($3 $+ .ini,$3,MFSpeed), Var %Level = $readini($3 $+ .ini,$3,Level), Var %ExpNeeded = $readini($3 $+ .ini,$3,ExpNeeded), Var %SExp = $readini($3 $+ .ini,$3,SExp), Var %SExpNeeded = $readini($3 $+ .ini,$3,SpeedExpNeeded), Var %Type = $readini($3 $+ .ini,$3,Type), Var %Type2 = $readini($3 $+ .ini,$3,Type2), Var %Aura = $readini($3 $+ .ini,$3,PAura), Var %BAura = $readini($3 $+ .ini,$3,PBAura), writeini -n $Nick $+ .ini $3 MHp %Hp, writeini -n $Nick $+ .ini $3 MSAttack %SAttack, writeini -n $Nick $+ .ini $3 MSDefense %SDefense, writeini -n $Nick $+ .ini $3 MAttack %Attack, writeini -n $Nick $+ .ini $3 MDefense %Defense, writeini -n $Nick $+ .ini $3 MAccuracy %Accuracy, writeini -n $Nick $+ .ini $3 MAgility %Agility, writeini -n $Nick $+ .ini $3 MIntelligence %Intelligence, writeini -n $Nick $+ .ini $3 MSpeed %Speed, writeini -n $Nick $+ .ini $3 MFSpeed %FSpeed, writeini -n $Nick $+ .ini $3 Level %Level, writeini -n $Nick $+ .ini $3 Type %Type, writeini -n $Nick $+ .ini $3 Type2 %Type2, Writeini -n $Nick $+ .ini $3 $3 Yes, writeini -n $Nick $+ .ini $3 Exp 0, writeini -n $Nick $+ .ini $3 ExpNeeded %ExpNeeded, writeini -n $Nick $+ .ini $3 SExp %SExp, writeini -n $Nick $+ .ini $3 SpeedExpNeeded %SExpNeeded, writeini -n $Nick $+ .ini $3 Aura %Aura, writeini -n $Nick $+ .ini $3 BAura %bAura, writeini -n $Nick $+ .ini $3 WantEvolve Yes, Writeini -n $Nick $+ .ini $3 Pokemon $3, Writeini -n $Nick $+ .ini Pokemon $3 yes, Set %Gender $Rand(1,2), if (%Gender == 1) { writeini -n $nick $+ .ini $3 Gender Male }, if (%Gender == 2) { writeini -n $nick $+ .ini $3 Gender Female }, if ($readini($3 $+ .ini,$Poke($3),Attack1) != None) { Writeini -n $Nick $+ .ini $3 Attack1 $readini($3 $+ .ini,$3,Attack1) | Set %Attack1 $readini($3 $+ .ini,$3,Attack1) | writeini $Nick $+ .ini $3 L $+ %Attack1 Yes | Set %MovePP $readini(Pokemon_Status $+ .ini,PPCheck,%Attack1) | writeini -n $Nick $+ .ini $3 %Attack1 $+ MPP %MovePP }, if ($readini($3 $+ .ini,$Poke($3),Attack2) != None) { Writeini -n $Nick $+ .ini $3 Attack2 $readini($3 $+ .ini,$3,Attack2) | Set %Attack2 $readini($3 $+ .ini,$3,Attack2) | writeini $Nick $+ .ini $3 L $+ %Attack2 Yes | Set %MovePP $readini(Pokemon_Status $+ .ini,PPCheck,%Attack2) | writeini -n $Nick $+ .ini $3 %Attack2 $+ MPP %MovePP }, if ($readini($3 $+ .ini,$Poke($3),Attack3) != None) { Writeini -n $Nick $+ .ini $3 Attack3 $readini($3 $+ .ini,$3,Attack3) | Set %Attack3 $readini($3 $+ .ini,$3,Attack3) | writeini $Nick $+ .ini $3 L $+ %Attack3 Yes | Set %MovePP $readini(Pokemon_Status $+ .ini,PPCheck,%Attack3) | writeini -n $Nick $+ .ini $3 %Attack3 $+ MPP %MovePP }, if ($readini($3 $+ .ini,$Poke($3),Attack4) != None) { Writeini -n $Nick $+ .ini $3 Attack4 $readini($3 $+ .ini,$3,Attack4) | Set %Attack4 $readini($3 $+ .ini,$3,Attack4) | writeini $Nick $+ .ini $3 L $+ %Attack4 Yes | Set %MovePP $readini(Pokemon_Status $+ .ini,PPCheck,%Attack4) | writeini -n $Nick $+ .ini $3 %Attack4 $+ MPP %MovePP }, if ($readini($Nick $+ .ini,$3,Attack1) == $Null) { Writeini -n $Nick $+ .ini $3 Attack1 None }, if ($readini($Nick $+ .ini,$3,Attack2) == $Null) { Writeini -n $Nick $+ .ini $3 Attack2 None }, if ($readini($Nick $+ .ini,$3,Attack3) == $Null) { Writeini -n $Nick $+ .ini $3 Attack3 None }, if ($readini($Nick $+ .ini,$3,Attack4) == $Null) { Writeini -n $Nick $+ .ini $3 Attack4 None }, Writeini $nick $+ .ini $nick Party $calc($readini($nick $+ .ini,$nick,Party) + 1), Writeini $nick $+ .ini $nick MParty $calc($readini($nick $+ .ini,$nick,MParty) + 1), set %Batlist $remtok(%Batlist,$3,1,32), TimerAttack $+ $3 off, Writeini $3 $+ .ini $3 Fighting No, Writeini $3 $+ .ini $3 Field None, Msg %ChanSet $Name($Nick) $+ 8,1 Throws A UltraBall at $Pokemon($3) $+ 8,1!, Msg %ChanSet $Name($Nick) $+ 8,1 Caught $Pokemon($3) $+ 8,1!, writeini $Nick $+ .ini $Nick TExp $calc($readini($Nick $+ .ini,$Nick,TExp) + 2), }  on 1:text:`Use FireStone:#: {, 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 Attacking! | halt }, if ($readini($nick $+ .ini,$nick,Fighting) == yes) { Notice $nick You Are Attacking! | halt }, if ($readini($nick $+ .ini,Items,FireStone) <= 0) { Notice $nick You Dont Have FireStones! | halt }, Set %Pokemon $Poke($Nick), if (%Pokemon == Vulpix) {, set %Pokemon2 Ninetales, if ($readini($Nick $+ .ini,%Pokemon2,%Pokemon2) == Yes) { Notice $Nick You Already have a %Pokemon2 $+ ! }, Writeini -n $nick $+ .ini Items FireStone $calc($readini($nick $+ .ini,Items,FireStone) - 1), Msg %ChanSet $Name($Nick) $+ 4,1 Uses FireStone On $Gender($Nick) $Pokemon($Nick) $+ 4,1!, Var %Hp = $readini($Nick $+ .ini,%Pokemon,MHp), Var %SAttack = $readini($Nick $+ .ini,%Pokemon,MSAttack), Var %Attack = $readini($Nick $+ .ini,%Pokemon,MAttack), Var %SDefense = $readini($Nick $+ .ini,%Pokemon,MSDefense), Var %Defense = $readini($Nick $+ .ini,%Pokemon,MDefense), Var %Accuracy = $readini($Nick $+ .ini,%Pokemon,MAccuracy), Var %Agility = $readini($Nick $+ .ini,%Pokemon,MAgility), Var %Intelligence = $readini($Nick $+ .ini,%Pokemon,MIntelligence), Var %Speed = $readini($Nick $+ .ini,%Pokemon,MSpeed), Var %FSpeed = $readini($Nick $+ .ini,%Pokemon,MFSpeed), Var %Level = $readini($Nick $+ .ini,%Pokemon,Level), Var %Exp = $readini($Nick $+ .ini,%Pokemon,Exp), Var %ExpNeeded = $readini($Nick $+ .ini,%Pokemon,ExpNeeded), Var %SExp = $readini($Nick $+ .ini,%Pokemon,SExp), Var %SExpNeeded = $readini($Nick $+ .ini,%Pokemon,SpeedExpNeeded), Var %Gender = $readini($Nick $+ .ini,%Pokemon,Gender), Var %Name = $readini($Nick $+ .ini,%Pokemon,Name), writeini -n $Nick $+ .ini %Pokemon2 MHp $Calc( %Hp + 30 ), writeini -n $Nick $+ .ini %Pokemon2 MSAttack $Calc( %SAttack + 15 ), writeini -n $Nick $+ .ini %Pokemon2 MSDefense $Calc( %SDefense + 15 ), writeini -n $Nick $+ .ini %Pokemon2 MAttack $Calc( %Attack + 14 ), writeini -n $Nick $+ .ini %Pokemon2 MDefense $Calc( %Defense + 14 ), writeini -n $Nick $+ .ini %Pokemon2 MAccuracy $Calc( %Accuracy + 3 ), writeini -n $Nick $+ .ini %Pokemon2 MAgility $Calc( %Agility + 5 ), writeini -n $Nick $+ .ini %Pokemon2 MIntelligence $Calc( %Intelligence + 3 ), writeini -n $Nick $+ .ini %Pokemon2 MSpeed %Speed, writeini -n $Nick $+ .ini %Pokemon2 MFSpeed %FSpeed, writeini -n $Nick $+ .ini %Pokemon2 Level %Level, writeini -n $Nick $+ .ini %Pokemon2 Type Fire, writeini -n $Nick $+ .ini %Pokemon2 Type2 None, Writeini -n $Nick $+ .ini %Pokemon2 %Pokemon2 Yes, writeini -n $Nick $+ .ini %Pokemon2 Exp %Exp, writeini -n $Nick $+ .ini %Pokemon2 ExpNeeded $Calc( %ExpNeeded + 25 ), writeini -n $Nick $+ .ini %Pokemon2 SExp $Calc( %SExp + 3 ), writeini -n $Nick $+ .ini %Pokemon2 SpeedExpNeeded %SExpNeeded, writeini -n $Nick $+ .ini %Pokemon2 Gender %Gender, writeini -n $Nick $+ .ini %Pokemon2 Aura 15, writeini -n $Nick $+ .ini %Pokemon2 BAura 0, writeini -n $Nick $+ .ini %Pokemon2 WantEvolve Yes, Writeini -n $Nick $+ .ini %Pokemon2 Pokemon %Pokemon2, writeini -n $Nick $+ .ini %Pokemon2 Attack1 None, writeini -n $Nick $+ .ini %Pokemon2 Attack2 None, writeini -n $Nick $+ .ini %Pokemon2 Attack3 None, Writeini -n $Nick $+ .ini %Pokemon2 Attack4 None, Writeini -n $Nick $+ .ini Pokemon %Pokemon2 yes, if ($readini($Nick $+ .ini,$Poke($Nick),Named) == Yes) { writeini -n $Nick $+ .ini %Pokemon2 Name %Name | writeini -n $Nick $+ .ini %Pokemon2 Named Yes }, if ($readini($Nick $+ .ini,$Poke($Nick),Attack1) != None) { Writeini -n $Nick $+ .ini %Pokemon2 Attack1 $readini($Nick $+ .ini,%Pokemon,Attack1) | Set %Attack1 $readini($Nick $+ .ini,%Pokemon,Attack1) | writeini $Nick $+ .ini %Pokemon2 L $+ %Attack1 Yes | Set %MovePP $readini($Nick $+ .ini,%Pokemon,%Attack1 $+ MPP) | writeini -n $Nick $+ .ini %Pokemon2 %Attack1 $+ MPP %MovePP }, if ($readini($Nick $+ .ini,$Poke($Nick),Attack2) != None) { Writeini -n $Nick $+ .ini %Pokemon2 Attack2 $readini($Nick $+ .ini,%Pokemon,Attack2) | Set %Attack2 $readini($Nick $+ .ini,%Pokemon,Attack2) | writeini $Nick $+ .ini %Pokemon2 L $+ %Attack2 Yes | Set %MovePP $readini($Nick $+ .ini,%Pokemon,%Attack2 $+ MPP) | writeini -n $Nick $+ .ini %Pokemon2 %Attack2 $+ MPP %MovePP }, if ($readini($Nick $+ .ini,$Poke($Nick),Attack3) != None) { Writeini -n $Nick $+ .ini %Pokemon2 Attack3 $readini($Nick $+ .ini,%Pokemon,Attack3) | Set %Attack3 $readini($Nick $+ .ini,%Pokemon,Attack3) | writeini $Nick $+ .ini %Pokemon2 L $+ %Attack3 Yes | Set %MovePP $readini($Nick $+ .ini,%Pokemon,%Attack3 $+ MPP) | writeini -n $Nick $+ .ini %Pokemon2 %Attack3 $+ MPP %MovePP }, if ($readini($Nick $+ .ini,$Poke($Nick),Attack4) != None) { Writeini -n $Nick $+ .ini %Pokemon2 Attack4 $readini($Nick $+ .ini,%Pokemon,Attack4) | Set %Attack4 $readini($Nick $+ .ini,%Pokemon,Attack4) | writeini $Nick $+ .ini %Pokemon2 L $+ %Attack4 Yes | Set %MovePP $readini($Nick $+ .ini,%Pokemon,%Attack4 $+ MPP) | writeini -n $Nick $+ .ini %Pokemon2 %Attack4 $+ MPP %MovePP }, Msg %ChanSet 9Whats This?!? $Pokemon($Nick) $+ 9,1 Is Evolving..., Msg %ChanSet $Poke($Nick) $+ 9,1 Evolves Into 15,0 $+ %Pokemon2 $+ 9,1!, Remini $Nick $+ .ini %Pokemon, Writeini -n $Nick $+ .ini $Nick Pokemon %Pokemon2, writeini $Nick $+ .ini $Nick TExp $calc($readini($Nick $+ .ini,$Nick,TExp) + 10), Unset %Pokemon, Unset %Pokemon2, Unset %Attack1, Unset %Attack2, Unset %Attack3, Unset %Attack4, Heal $Nick, Halt, }    if (%Pokemon == Growlithe) {, set %Pokemon2 Arcanine, if ($readini($Nick $+ .ini,%Pokemon2,%Pokemon2) == Yes) { Notice $Nick You Already have a %Pokemon2 $+ ! }, Writeini -n $nick $+ .ini Items FireStone $calc($readini($nick $+ .ini,Items,FireStone) - 1), Msg %ChanSet $Name($Nick) $+ 4,1 Uses FireStone On $Gender($Nick) $Pokemon($Nick) $+ 4,1!, Var %Hp = $readini($Nick $+ .ini,%Pokemon,MHp), Var %SAttack = $readini($Nick $+ .ini,%Pokemon,MSAttack), Var %Attack = $readini($Nick $+ .ini,%Pokemon,MAttack), Var %SDefense = $readini($Nick $+ .ini,%Pokemon,MSDefense), Var %Defense = $readini($Nick $+ .ini,%Pokemon,MDefense), Var %Accuracy = $readini($Nick $+ .ini,%Pokemon,MAccuracy), Var %Agility = $readini($Nick $+ .ini,%Pokemon,MAgility), Var %Intelligence = $readini($Nick $+ .ini,%Pokemon,MIntelligence), Var %Speed = $readini($Nick $+ .ini,%Pokemon,MSpeed), Var %FSpeed = $readini($Nick $+ .ini,%Pokemon,MFSpeed), Var %Level = $readini($Nick $+ .ini,%Pokemon,Level), Var %Exp = $readini($Nick $+ .ini,%Pokemon,Exp), Var %ExpNeeded = $readini($Nick $+ .ini,%Pokemon,ExpNeeded), Var %SExp = $readini($Nick $+ .ini,%Pokemon,SExp), Var %SExpNeeded = $readini($Nick $+ .ini,%Pokemon,SpeedExpNeeded), Var %Gender = $readini($Nick $+ .ini,%Pokemon,Gender), Var %Name = $readini($Nick $+ .ini,%Pokemon,Name), writeini -n $Nick $+ .ini %Pokemon2 MHp $Calc( %Hp + 30 ), writeini -n $Nick $+ .ini %Pokemon2 MSAttack $Calc( %SAttack + 15 ), writeini -n $Nick $+ .ini %Pokemon2 MSDefense $Calc( %SDefense + 15 ), writeini -n $Nick $+ .ini %Pokemon2 MAttack $Calc( %Attack + 14 ), writeini -n $Nick $+ .ini %Pokemon2 MDefense $Calc( %Defense + 14 ), writeini -n $Nick $+ .ini %Pokemon2 MAccuracy $Calc( %Accuracy + 3 ), writeini -n $Nick $+ .ini %Pokemon2 MAgility $Calc( %Agility + 5 ), writeini -n $Nick $+ .ini %Pokemon2 MIntelligence $Calc( %Intelligence + 3 ), writeini -n $Nick $+ .ini %Pokemon2 MSpeed %Speed, writeini -n $Nick $+ .ini %Pokemon2 MFSpeed %FSpeed, writeini -n $Nick $+ .ini %Pokemon2 Level %Level, writeini -n $Nick $+ .ini %Pokemon2 Type Fire, writeini -n $Nick $+ .ini %Pokemon2 Type2 None, Writeini -n $Nick $+ .ini %Pokemon2 %Pokemon2 Yes, writeini -n $Nick $+ .ini %Pokemon2 Exp %Exp, writeini -n $Nick $+ .ini %Pokemon2 ExpNeeded $Calc( %ExpNeeded + 25 ), writeini -n $Nick $+ .ini %Pokemon2 SExp $Calc( %SExp + 3 ), writeini -n $Nick $+ .ini %Pokemon2 SpeedExpNeeded %SExpNeeded, writeini -n $Nick $+ .ini %Pokemon2 Gender %Gender, writeini -n $Nick $+ .ini %Pokemon2 Aura 0, writeini -n $Nick $+ .ini %Pokemon2 BAura 4, writeini -n $Nick $+ .ini %Pokemon2 WantEvolve Yes, Writeini -n $Nick $+ .ini %Pokemon2 Pokemon %Pokemon2, writeini -n $Nick $+ .ini %Pokemon2 Attack1 None, writeini -n $Nick $+ .ini %Pokemon2 Attack2 None, writeini -n $Nick $+ .ini %Pokemon2 Attack3 None, Writeini -n $Nick $+ .ini %Pokemon2 Attack4 None, Writeini -n $Nick $+ .ini Pokemon %Pokemon2 yes, if ($readini($Nick $+ .ini,$Poke($Nick),Named) == Yes) { writeini -n $Nick $+ .ini %Pokemon2 Name %Name | writeini -n $Nick $+ .ini %Pokemon2 Named Yes }, if ($readini($Nick $+ .ini,$Poke($Nick),Attack1) != None) { Writeini -n $Nick $+ .ini %Pokemon2 Attack1 $readini($Nick $+ .ini,%Pokemon,Attack1) | Set %Attack1 $readini($Nick $+ .ini,%Pokemon,Attack1) | writeini $Nick $+ .ini %Pokemon2 L $+ %Attack1 Yes | Set %MovePP $readini($Nick $+ .ini,%Pokemon,%Attack1 $+ MPP) | writeini -n $Nick $+ .ini %Pokemon2 %Attack1 $+ MPP %MovePP }, if ($readini($Nick $+ .ini,$Poke($Nick),Attack2) != None) { Writeini -n $Nick $+ .ini %Pokemon2 Attack2 $readini($Nick $+ .ini,%Pokemon,Attack2) | Set %Attack2 $readini($Nick $+ .ini,%Pokemon,Attack2) | writeini $Nick $+ .ini %Pokemon2 L $+ %Attack2 Yes | Set %MovePP $readini($Nick $+ .ini,%Pokemon,%Attack2 $+ MPP) | writeini -n $Nick $+ .ini %Pokemon2 %Attack2 $+ MPP %MovePP }, if ($readini($Nick $+ .ini,$Poke($Nick),Attack3) != None) { Writeini -n $Nick $+ .ini %Pokemon2 Attack3 $readini($Nick $+ .ini,%Pokemon,Attack3) | Set %Attack3 $readini($Nick $+ .ini,%Pokemon,Attack3) | writeini $Nick $+ .ini %Pokemon2 L $+ %Attack3 Yes | Set %MovePP $readini($Nick $+ .ini,%Pokemon,%Attack3 $+ MPP) | writeini -n $Nick $+ .ini %Pokemon2 %Attack3 $+ MPP %MovePP }, if ($readini($Nick $+ .ini,$Poke($Nick),Attack4) != None) { Writeini -n $Nick $+ .ini %Pokemon2 Attack4 $readini($Nick $+ .ini,%Pokemon,Attack4) | Set %Attack4 $readini($Nick $+ .ini,%Pokemon,Attack4) | writeini $Nick $+ .ini %Pokemon2 L $+ %Attack4 Yes | Set %MovePP $readini($Nick $+ .ini,%Pokemon,%Attack4 $+ MPP) | writeini -n $Nick $+ .ini %Pokemon2 %Attack4 $+ MPP %MovePP }, Msg %ChanSet 9Whats This?!? $Pokemon($Nick) $+ 9,1 Is Evolving..., Msg %ChanSet $Poke($Nick) $+ 9,1 Evolves Into 0,4 $+ %Pokemon2 $+ 9,1!, Remini $Nick $+ .ini %Pokemon, Writeini -n $Nick $+ .ini $Nick Pokemon %Pokemon2, writeini $Nick $+ .ini $Nick TExp $calc($readini($Nick $+ .ini,$Nick,TExp) + 10), Unset %Pokemon, Unset %Pokemon2, Unset %Attack1, Unset %Attack2, Unset %Attack3, Unset %Attack4, Heal $Nick, Halt, }    if (%Pokemon == Eevee) {, set %Pokemon2 Flareon, if ($readini($Nick $+ .ini,%Pokemon2,%Pokemon2) == Yes) { Notice $Nick You Already have a %Pokemon2 $+ ! }, Writeini -n $nick $+ .ini Items FireStone $calc($readini($nick $+ .ini,Items,FireStone) - 1), Msg %ChanSet $Name($Nick) $+ 4,1 Uses FireStone On $Gender($Nick) $Pokemon($Nick) $+ 4,1!, Var %Hp = $readini($Nick $+ .ini,%Pokemon,MHp), Var %SAttack = $readini($Nick $+ .ini,%Pokemon,MSAttack), Var %Attack = $readini($Nick $+ .ini,%Pokemon,MAttack), Var %SDefense = $readini($Nick $+ .ini,%Pokemon,MSDefense), Var %Defense = $readini($Nick $+ .ini,%Pokemon,MDefense), Var %Accuracy = $readini($Nick $+ .ini,%Pokemon,MAccuracy), Var %Agility = $readini($Nick $+ .ini,%Pokemon,MAgility), Var %Intelligence = $readini($Nick $+ .ini,%Pokemon,MIntelligence), Var %Speed = $readini($Nick $+ .ini,%Pokemon,MSpeed), Var %FSpeed = $readini($Nick $+ .ini,%Pokemon,MFSpeed), Var %Level = $readini($Nick $+ .ini,%Pokemon,Level), Var %Exp = $readini($Nick $+ .ini,%Pokemon,Exp), Var %ExpNeeded = $readini($Nick $+ .ini,%Pokemon,ExpNeeded), Var %SExp = $readini($Nick $+ .ini,%Pokemon,SExp), Var %SExpNeeded = $readini($Nick $+ .ini,%Pokemon,SpeedExpNeeded), Var %Gender = $readini($Nick $+ .ini,%Pokemon,Gender), Var %Name = $readini($Nick $+ .ini,%Pokemon,Name), writeini -n $Nick $+ .ini %Pokemon2 MHp $Calc( %Hp + 30 ), writeini -n $Nick $+ .ini %Pokemon2 MSAttack $Calc( %SAttack + 15 ), writeini -n $Nick $+ .ini %Pokemon2 MSDefense $Calc( %SDefense + 15 ), writeini -n $Nick $+ .ini %Pokemon2 MAttack $Calc( %Attack + 14 ), writeini -n $Nick $+ .ini %Pokemon2 MDefense $Calc( %Defense + 14 ), writeini -n $Nick $+ .ini %Pokemon2 MAccuracy $Calc( %Accuracy + 3 ), writeini -n $Nick $+ .ini %Pokemon2 MAgility $Calc( %Agility + 5 ), writeini -n $Nick $+ .ini %Pokemon2 MIntelligence $Calc( %Intelligence + 3 ), writeini -n $Nick $+ .ini %Pokemon2 MSpeed %Speed, writeini -n $Nick $+ .ini %Pokemon2 MFSpeed %FSpeed, writeini -n $Nick $+ .ini %Pokemon2 Level %Level, writeini -n $Nick $+ .ini %Pokemon2 Type Fire, writeini -n $Nick $+ .ini %Pokemon2 Type2 None, Writeini -n $Nick $+ .ini %Pokemon2 %Pokemon2 Yes, writeini -n $Nick $+ .ini %Pokemon2 Exp %Exp, writeini -n $Nick $+ .ini %Pokemon2 ExpNeeded $Calc( %ExpNeeded + 25 ), writeini -n $Nick $+ .ini %Pokemon2 SExp $Calc( %SExp + 3 ), writeini -n $Nick $+ .ini %Pokemon2 SpeedExpNeeded %SExpNeeded, writeini -n $Nick $+ .ini %Pokemon2 Gender %Gender, writeini -n $Nick $+ .ini %Pokemon2 Aura 4, writeini -n $Nick $+ .ini %Pokemon2 BAura 8, writeini -n $Nick $+ .ini %Pokemon2 WantEvolve Yes, Writeini -n $Nick $+ .ini %Pokemon2 Pokemon %Pokemon2, writeini -n $Nick $+ .ini %Pokemon2 Attack1 None, writeini -n $Nick $+ .ini %Pokemon2 Attack2 None, writeini -n $Nick $+ .ini %Pokemon2 Attack3 None, Writeini -n $Nick $+ .ini %Pokemon2 Attack4 None, Writeini -n $Nick $+ .ini Pokemon %Pokemon2 yes, if ($readini($Nick $+ .ini,$Poke($Nick),Named) == Yes) { writeini -n $Nick $+ .ini %Pokemon2 Name %Name | writeini -n $Nick $+ .ini %Pokemon2 Named Yes }, if ($readini($Nick $+ .ini,$Poke($Nick),Attack1) != None) { Writeini -n $Nick $+ .ini %Pokemon2 Attack1 $readini($Nick $+ .ini,%Pokemon,Attack1) | Set %Attack1 $readini($Nick $+ .ini,%Pokemon,Attack1) | writeini $Nick $+ .ini %Pokemon2 L $+ %Attack1 Yes | Set %MovePP $readini($Nick $+ .ini,%Pokemon,%Attack1 $+ MPP) | writeini -n $Nick $+ .ini %Pokemon2 %Attack1 $+ MPP %MovePP }, if ($readini($Nick $+ .ini,$Poke($Nick),Attack2) != None) { Writeini -n $Nick $+ .ini %Pokemon2 Attack2 $readini($Nick $+ .ini,%Pokemon,Attack2) | Set %Attack2 $readini($Nick $+ .ini,%Pokemon,Attack2) | writeini $Nick $+ .ini %Pokemon2 L $+ %Attack2 Yes | Set %MovePP $readini($Nick $+ .ini,%Pokemon,%Attack2 $+ MPP) | writeini -n $Nick $+ .ini %Pokemon2 %Attack2 $+ MPP %MovePP }, if ($readini($Nick $+ .ini,$Poke($Nick),Attack3) != None) { Writeini -n $Nick $+ .ini %Pokemon2 Attack3 $readini($Nick $+ .ini,%Pokemon,Attack3) | Set %Attack3 $readini($Nick $+ .ini,%Pokemon,Attack3) | writeini $Nick $+ .ini %Pokemon2 L $+ %Attack3 Yes | Set %MovePP $readini($Nick $+ .ini,%Pokemon,%Attack3 $+ MPP) | writeini -n $Nick $+ .ini %Pokemon2 %Attack3 $+ MPP %MovePP }, if ($readini($Nick $+ .ini,$Poke($Nick),Attack4) != None) { Writeini -n $Nick $+ .ini %Pokemon2 Attack4 $readini($Nick $+ .ini,%Pokemon,Attack4) | Set %Attack4 $readini($Nick $+ .ini,%Pokemon,Attack4) | writeini $Nick $+ .ini %Pokemon2 L $+ %Attack4 Yes | Set %MovePP $readini($Nick $+ .ini,%Pokemon,%Attack4 $+ MPP) | writeini -n $Nick $+ .ini %Pokemon2 %Attack4 $+ MPP %MovePP }, Msg %ChanSet 9Whats This?!? $Pokemon($Nick) $+ 9,1 Is Evolving..., Msg %ChanSet $Poke($Nick) $+ 9,1 Evolves Into 8,4 $+ %Pokemon2 $+ 9,1!, Remini $Nick $+ .ini %Pokemon, Writeini -n $Nick $+ .ini $Nick Pokemon %Pokemon2