Unnamed

on *:TEXT:!whip:#:{
  $ibusta
  if (%dm == $null) {
    notice $nick there isnt a dm in $chan | halt 
  }
  if (%first == %starter) && ($nick == %starter) {
    unset %first
    set %whipped [ $+ [ %starter ] ] $rand(1,30)
    set %c.hp [ $+ [ %challenger ] ] $calc( %hp [ $+ [ %challenger ] ] - %whipped [ $+ [ %starter ] ] )
    set %hp [ $+ [ %challenger ] ] %c.hp [ $+ [ %challenger ] ]
    timer 1 1 msg $chan $c1(THE FIRST HIT OF THE GAME IS) $c2(%whipped [ $+ [ %starter ] ]) $c1(Leaving) $c2(%challenger) $c1(with) $c2(%c.hp [ $+ [ %challenger ] ]) $c1(Hp)
    set %turn %challenger
    timer 1 2 msg $chan it is now %turn turn
    unset %whipped [ $+ [ %starter ] ]
    unset %c.hp
  }


  if (%first == %challenger) && ($nick == %challenger) {
    unset %first
    set %whipped [ $+ [ %challenger ] ] $rand(1,30)
    set %s.hp [ $+ [ %starter ] ] $calc( %hp [ $+ [ %starter ] ] - %whipped [ $+ [ %challenger ] ] )
    set %hp [ $+ [ %starter ] ] %s.hp [ $+ [ %starter ] ]
    timer 1 1 msg $chan $c1(THE FIRST HIT OF THE GAME IS) $c2(%whipped [ $+ [ %challenger ] ]) $c1(Leaving) $c2(%starter) $c1(with) $c2(%s.hp [ $+ [ %starter ] ]) $c1(Hp)
    set %turn %starter
    msg $chan it is now %turn turn
    unset %whipped [ $+ [ %challenger ] ]
    unset %s.hp
  }


  if (%turn == %starter) && ($nick == %starter) {
    set %whipped [ $+ [ %starter ] ] $rand(1,30)
    set %c.hp [ $+ [ %challenger ] ] $calc( %hp [ $+ [ %challenger ] ] - %whipped [ $+ [ %starter ] ] )
    set %hp [ $+ [ %challenger ] ] %c.hp [ $+ [ %challenger ] ]
    timer 1 1 msg $chan $c1(%starter $c2(Hits a) $c1(%whipped [ $+ [ %starter ] ]) $c2(Leaving) $c1(%challenger) $c2(with) $c2(%c.hp [ $+ [ %challenger ] ]) $c1(Hp)
    set %turn %challenger
    timer 1 2 msg $chan it is now %turn turn
    unset %whipped [ $+ [ %starter ] ]
    unset %c.hp
  }

  if (%turn == %challenger) && ($nick == %challenger) {
    set %whipped [ $+ [ %challenger ] ] $rand(1,30)
    set %s.hp [ $+ [ %starter ] ] $calc( %hp [ $+ [ %starter ] ] - %whipped [ $+ [ %challenger ] ] )
    set %hp [ $+ [ %starter ] ] %s.hp [ $+ [ %starter ] ]
    timer 1 1 msg $chan $c1(THE FIRST HIT OF THE GAME IS) $c2(%whipped [ $+ [ %challenger ] ]) $c1(Leaving) $c2(%starter) $c1(with) $c2(%s.hp [ $+ [ %starter ] ]) $c1(Hp)
    set %turn %starter
    timer 1 2 msg $chan it is now %turn turn
    unset %whipped [ $+ [ %challenger ] ]
    unset %s.hp
  }
}