on 1:text:`start:#: {
  if ($readini(war.ini,$Nick,Register) == Yes) { Notice $nick 7You already Made a Account! | halt }
  Notice $Nick 4Welcome to the war. type `characters to see your `characters.
}
on 1:text:`characters:#: {
  notice $Nick 9your choices are naruto mario yoshi  
  notice $Nick 9type `pick <character>
}
on 1:text:`pick*:#: {
  if (naruto == $2) {
    Writeini war.ini $Nick Character $2
    Writeini war.ini $Nick Rank newbie
    Writeini war.ini $Nick Hp $Rand(100,200)
    Writeini war.ini $Nick MHp $Rand(100,200)
    Writeini war.ini $Nick ki 59
    Writeini war.ini $Nick Mki $Rand(50,150)
    Writeini war.ini $Nick ki2 59
    Writeini war.ini $Nick Mki2 $Rand(50,150)
    Writeini war.ini $Nick money $Rand(50,200)
    Writeini war.ini $Nick Intell 10
    Writeini war.ini $Nick Strength 10
    Writeini war.ini $Nick NAttacks  punch kick
    Writeini war.ini $Nick sattacks  shadowclone
    Writeini war.ini $Nick power fox
    Writeini war.ini $Nick LvL $Rand(1,2)
    Writeini war.ini $Nick Exp 0
    Writeini war.ini $Nick NExp 100
    Writeini war.ini $Nick Register Yes
    heal $Nick
    notice $Nick thanks for registering
  }
  if (mario == $2) {
    Writeini war.ini $Nick Character $2
    Writeini war.ini $Nick Rank newbie
    Writeini war.ini $Nick Hp $Rand(100,200)
    Writeini war.ini $Nick MHp $Rand(100,200)
    Writeini war.ini $Nick ki 59
    Writeini war.ini $Nick Mki $Rand(50,150)
    Writeini war.ini $Nick ki2 59
    Writeini war.ini $Nick Mki2 $Rand(50,150)
    Writeini war.ini $Nick money $Rand(50,200)
    Writeini war.ini $Nick Intell 10
    Writeini war.ini $Nick Strength 10
    Writeini war.ini $Nick NAttacks  punch kick
    Writeini war.ini $Nick sattacks  super punch
    Writeini war.ini $Nick power none
    Writeini war.ini $Nick LvL $Rand(1,2)
    Writeini war.ini $Nick Exp 0
    Writeini war.ini $Nick NExp 100
    Writeini war.ini $Nick Register Yes
    heal $Nick
    notice $Nick thanks for registering
  }
  if (yoshi == $2) {
    Writeini war.ini $Nick Character $2
    Writeini war.ini $Nick Rank newbie
    Writeini war.ini $Nick Hp $Rand(100,200)
    Writeini war.ini $Nick MHp $Rand(100,200)
    Writeini war.ini $Nick ki 59
    Writeini war.ini $Nick Mki $Rand(50,150)
    Writeini war.ini $Nick ki2 59
    Writeini war.ini $Nick Mki2 $Rand(50,150)
    Writeini war.ini $Nick money $Rand(50,200)
    Writeini war.ini $Nick Intell 10
    Writeini war.ini $Nick Strength 10
    Writeini war.ini $Nick NAttacks  punch kick
    Writeini war.ini $Nick sattacks  superpunch
    Writeini war.ini $Nick power none
    Writeini war.ini $Nick LvL $Rand(1,2)
    Writeini war.ini $Nick Exp 0
    Writeini war.ini $Nick NExp 100
    Writeini war.ini $Nick Register Yes
    heal $Nick
    notice $Nick thanks for registering
  }
}
on 1:Text:`Stats*:#: {
  if ($readini(war.ini,$Nick,Register) !== Yes) { Notice $nick You are not registered! Plz `start | halt }
  Notice $Nick 7Character: $readini(war.ini,$Nick,Character) || Hp: $readini(war.ini,$Nick,Hp) / $readini(war.ini,$Nick,MHp) || ki: $readini(war.ini,$Nick,ki) / $readini(war.ini,$Nick,Mki) || ki2: $readini(war.ini,$Nick,ki2) / $readini(war.ini,$Nick,Mki2) || Rank: $readini(war.ini,$Nick,Rank) || Level: $readini(war.ini,$Nick,LvL) || Exp: $readini(war.ini,$Nick,Exp) || Exp To LvL Up: $readini(war.ini,$Nick,NExp)|| money: $readini(war.ini,$Nick,money) 
  Notice $Nick 9Strength: $readini(war.ini,$nick,Strength) || Intell: $readini(war.ini,$nick,Intell)
}
on 1:Text:`money:#: {
  if ($readini(war.ini,$nick,Register) !== Yes) { Notice $nick You are not registered! | halt }
  Notice $Nick money: $readini(war.ini,$nick,money)
}
on 1:Text:`money*:#: {
  if ($readini(war.ini,$2,Register) !== Yes) { Notice $nick $2 is not registered | halt }
  Notice $Nick $2 $+ 's money: $readini(war.ini,$2,money)
}
on *:text:`Heal:#:{
  if ($readini(war.ini,$nick,Register) !== Yes) { Notice $nick You are not registered! | halt }
  if ($readini(war.ini,$nick,Fighting) == Yes) { /notice $nick You are Fighting! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { /notice $nick You Are Already Healing | halt }
  Notice $nick 9You will Heal In 10 Seconds!
  Timerheal $+ $nick 1 10 /Heal $nick
}
on 1:Text:`Attacks:#: {
  if ($readini(war.ini,$nick,Register) !== Yes) { Notice $Nick You are not registered! | Halt }
  Notice $Nick 11Attacks: $readini(war.ini,$nick,NAttacks)
}
on 1:Text:`sAttacks:#: {
  if ($readini(war.ini,$nick,Register) !== Yes) { Notice $Nick You are not registered! | Halt }
  Notice $Nick 11sAttacks: $readini(war.ini,$nick,sAttacks)
}
on 1:Text:`power:#: {
  if ($readini(war.ini,$nick,Register) !== Yes) { Notice $Nick You are not registered! | Halt }
  Notice $Nick 11power: $readini(war.ini,$nick,power)
}
on *:text:`Enter:#: {
  if ($readini(war.ini,$nick,Register) !== Yes) { Notice $nick You are not registered! | halt }
  if ($readini(war.ini,$Nick,Hp) <= 0) { Notice $nick Please Heal | halt }
  if ($readini(war.ini,$nick,fighting) == yes) { Notice $nick You are Already Battling! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { /notice $nick You Are Healing | halt }
  Writeini war.ini $nick fighting yes
  Set %batlist %batlist $nick
  Msg # $Nick $+ ( $+ $readini(war.ini,$nick,Character) $+ ) 11Enters The Battle Field!
}
on *:text:`Leave:#: {
  if ($readini(war.ini,$nick,Register) !== Yes) { Notice $nick You are not registered! | halt }
  if ($readini(war.ini,$nick,fighting) != yes) { Notice $nick You Are Not Fighting | halt }
  if ($timer(Leave $+ $nick).secs != $null) { /notice $nick You Are Already Leaving | halt }
  TimerLeave $+ $nick 1 10  /leave $nick
  .timer 1 10 msg $chan $Nick 11has left the arena
  Msg # $Nick $+ ( $+ $readini(war.ini,$nick,Character) $+ )11 is Leaving The Battle Field in 10 Seconds!
}
on 1:TEXT:`punch*:*:{
  if ($readini(war.ini,$nick,Register) !== Yes) { Notice $nick You are not registered! | halt }
  if ($readini(war.ini,$nick,ki2) <= 10) { Notice $nick You do not have enough ki2! | Halt }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini(war.ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini(war.ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini(war.ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini(war.ini,$nick,NAttacks)
  if ($istok(%attacks,punch,32) == $true) {
    set %base.power [ $readini war.ini $Nick Strength ]
    set %ExpGain $Rand(1,500)
    set %defense.power [  $readini war.ini $2 Strength ]
    set %attack.power [  $readini war.ini $Nick Strength ]  
    set %Damage $calc( %base.power + (%attack.power - %defense.power))
    if (%Damage < 1) { set %Damage 1 }
    msg $Chan $nick $+ ( $+ $readini(war.ini,$nick,Character) $+ )4 punchs $2 $+ ( $+ $readini(war.ini,$2,Character) $+ ) in the back of the head doing $bytes(%damage,b) damage! (Gained %ExpGain Exp) 
    writeini war.ini $2 Hp $calc($readini(war.ini,$2,Hp) - %Damage)
    writeini war.ini $nick Exp $calc($readini(war.ini,$Nick,Exp) + %ExpGain)
    writeini war.ini $nick ki2 $Calc($readini(war.ini,$Nick,ki2) - 10)
    LvLCheck $Nick
    DeadCheck $Nick $2 
  }
  on 1:TEXT:`kick*:*:{
    if ($readini(war.ini,$nick,Register) !== Yes) { Notice $nick You are not registered! | halt }
    if ($readini(war.ini,$nick,ki2) <= 10) { Notice $nick You do not have enough ki2! | Halt }
    if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
    if ($readini(war.ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
    if ($readini(war.ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
    if ($readini(war.ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
    Set %Attacks $readini(war.ini,$nick,NAttacks)
    if ($istok(%attacks,punch,32) == $true) {
      set %base.power [ $readini war.ini $Nick Strength ]
      set %ExpGain $Rand(1,500)
      set %defense.power [  $readini war.ini $2 Strength ]
      set %attack.power [  $readini war.ini $Nick Strength ]  
      set %Damage $calc( %base.power + (%attack.power - %defense.power))
      if (%Damage < 1) { set %Damage 1 }
      msg $Chan $nick $+ ( $+ $readini(war.ini,$nick,Character) $+ )4 kicks $2 $+ ( $+ $readini(war.ini,$2,Character) $+ ) in the back of the head doing $bytes(%damage,b) damage! (Gained %ExpGain Exp) 
      writeini war.ini $2 Hp $calc($readini(war.ini,$2,Hp) - %Damage)
      writeini war.ini $nick Exp $calc($readini(war.ini,$Nick,Exp) + %ExpGain)
      writeini war.ini $nick ki2 $Calc($readini(war.ini,$Nick,ki2) - 10)
      LvLCheck $Nick
      DeadCheck $Nick $2 
    }
  }
}
on 1:TEXT:`shadowclone*:*:{
  if ($readini(war.ini,$nick,Register) !== Yes) { Notice $nick You are not registered! | halt }
  if ($readini(war.ini,$nick,ki2) <= 10) { Notice $nick You do not have enough ki2! | Halt }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini(war.ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini(war.ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini(war.ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini(war.ini,$nick,NAttacks)
  if ($istok(%attacks,punch,32) == $true) {
    set %base.power [ $readini war.ini $Nick Strength ]
    set %ExpGain $Rand(1,500)
    set %defense.power [  $readini war.ini $2 Strength ]
    set %attack.power [  $readini war.ini $Nick Strength ]  
    set %Damage $calc( %base.power + (%attack.power - %defense.power))
    if (%Damage < 1) { set %Damage 1 }
    msg $Chan $nick $+ ( $+ $readini(war.ini,$nick,Character) $+ )4 uses shadowclone and punchs $2 $+ ( $+ $readini(war.ini,$2,Character) $+ ) in the back of the head doing $bytes(%damage,b) damage! (Gained %ExpGain Exp) 
    writeini war.ini $2 Hp $calc($readini(war.ini,$2,Hp) - %Damage)
    writeini war.ini $nick Exp $calc($readini(war.ini,$Nick,Exp) + %ExpGain)
    writeini war.ini $nick ki2 $Calc($readini(war.ini,$Nick,ki2) - 10)
    LvLCheck $Nick
    DeadCheck $Nick $2 
  }
}
on 1:TEXT:`superpunch*:*:{
  if ($readini(war.ini,$nick,Register) !== Yes) { Notice $nick You are not registered! | halt }
  if ($readini(war.ini,$nick,ki2) <= 10) { Notice $nick You do not have enough ki2! | Halt }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini(war.ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini(war.ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini(war.ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini(war.ini,$nick,NAttacks)
  if ($istok(%attacks,punch,32) == $true) {
    set %base.power [ $readini war.ini $Nick Strength ]
    set %ExpGain $Rand(1,500)
    set %defense.power [  $readini war.ini $2 Strength ]
    set %attack.power [  $readini war.ini $Nick Strength ]  
    set %Damage $calc( %base.power + (%attack.power - %defense.power))
    if (%Damage < 1) { set %Damage 1 }
    msg $Chan $nick $+ ( $+ $readini(war.ini,$nick,Character) $+ )4 superpunchs $2 $+ ( $+ $readini(war.ini,$2,Character) $+ ) in the head doing $bytes(%damage,b) damage! (Gained %ExpGain Exp) 
    writeini war.ini $2 Hp $calc($readini(war.ini,$2,Hp) - %Damage)
    writeini war.ini $nick Exp $calc($readini(war.ini,$Nick,Exp) + %ExpGain)
    writeini war.ini $nick ki2 $Calc($readini(war.ini,$Nick,ki2) - 10)
    LvLCheck $Nick
    DeadCheck $Nick $2 
  }
}
on 1:Text:`Lag:#: {
  LagTest
  Msg # Bot lag: $+($calc(($ticks - %ticks) / 1000),s)
}
alias lagtest { 
  set %ticks $ticks | .raw PING 123 
} 
on *:text:`Entered:#: {
  if ($readini(war.ini,$nick,Register) !== Yes) { Notice $nick You are not registered! | halt }
  Msg $Chan 12Entered: %Batlist
}
on 200:Text:`Fenter*:#: {
  if ($readini(war.ini,$2,Register) !== Yes) { Notice $Nick $2 is not registered! | halt }
  Writeini war.ini $2 Fighting Yes
  Set %batlist %batlist $2
  Msg # $2 8was force entered by $Nick
}
on 200:Text:`FLeave*:#: {
  if ($readini(war.ini,$2,Register) !== Yes) { Notice $Nick $2 is not registered! | halt }
  writeini war.ini $2 Fighting No
  Set %batlist $remtok(%batlist,$2,1,32)
  Msg # $2 3was force out of battle by $Nick
}
on 200:Text:`FHeal*:#: {
  if ($readini(war.ini,$2,Register) !== Yes) { Notice $Nick $2 is not registered! | halt }
  writeini war.ini  $2 Hp $readini(war.ini,$2,MHp)
  writeini war.ini $2 ki2 $readini(war.ini,$2,Mki2)
  writeini war.ini $2 ki $readini(war.ini,$2,Mki)
  Msg # $2 7was healed by $Nick
}
on *:text:`help*:#: { 
  notice $Nick helps are :battle heal and register
  If ($2 == Battle) { notice $nick Type `attacks Too see Your Moves `AttackName Person Too Attack! To Enter Battle field and Leave: `Enter & `Leave | halt }
  If ($2 == heal ) { notice $nick Type `heal to heal  | halt }
  if ($2 == register) { notice $Nick type `start to register | halt }
}
