Miscellany

on *:text:!flip*:#runite_legion:{
  if ($($+(%,flipping.,$nick),2) == yes) { .notice $nick 3Flip in progress! | /halt }
  else { /set $+(%,flipping.,$nick) yes }
  if ($2 > 5000) { .notice $nick 4Please use a number under 5000! | /unset $+(%,flipping.,$nick) | /halt }  
  if ($2 == $nll) { .notice $nick 3Format is 7!flip 12Number | /unset $+(%,flipping.,$nick) | /halt } 
  if ($2 isnum) {
    /set $+(%,flip.,$nick) 0
    /set $+(%,heads.,$nick) 0
    /set $+(%,tails.,$nick) 0
    while ($($+(%,flip.,$nick),2) < $2) {
      /set $+(%,coin.,$nick) $rand(1,2)      
      if ($($+(%,coin.,$nick),2) == 1) { inc $+(%,heads.,$nick) }
      if ($($+(%,coin.,$nick),2) == 2) { inc $+(%,tails.,$nick) }
      inc $+(%,flip.,$nick)
    }
    .notice $nick 3You flipped: 
    .notice $nick 7 $($+(%,heads.,$nick),2) Heads
    .notice $nick 7 $($+(%,tails.,$nick),2) Tails
    /unset $+(%,flipping.,$nick)  
    /unset $+(%,flip.,$nick) 
    /unset $+(%,heads.,$nick) 
    /unset $+(%,tails.,$nick)  
    /unset $+(%,coin.,$nick) 
  }
}