From Mk

I'll be putting some scripts I no longer use here:

mIRC

Coin flipping script

; +----------------------------------------------------------------------------------------------------
; | MK's coin flipping script. Use /coin to activate yourself, or have others use ^coin
on *:text:^*:#:{
  if ($1 == ^coin) { coin } 
}
alias coin {
  if ($nick == $null) { var %coinnick $me } 
  else { var %coinnick $nick } 
  var %coinrand $rand(1,6001)
  if ((%coinrand >= 1) && (%coinrand <= 3000)) { msg # %coinnick flips a coin! Heads! }
  elseif ((%coinrand >= 3001) && (%coinrand <= 6000)) { msg # %coinnick flips a coin! Tails! }
  else { msg # %coinnick flips a coin...and it landed on its edge. o_O }
}
; | End of coin flipping script
; +----------------------------------------------------------------------------------------------------