on *:TEXT:*!toss*:#:{
set %z $rand(1,2)
if (%z == 1) { set %pi 10,»,04:Heads:10,«, }
else { set %pi 10,»,13:Tails:10,«, }
set %wow $rand(1,2)
if (%wow == 1) { set %outcome 10,»,04:Heads:10,«, }
else { set %outcome 10,»,13:Tails:10,«, }
if (%outcome == %pi) { hinc Counter $address($nick,2) 1 | msg $chan $nick needs %pi to win. $me flips the coin. It lands on %outcome . $nick wins the power of the Luccapwnage force!! Total Wins: $hget(counter $address($nick,2) }
else { msg $chan $nick needs %pi to win. $me flips the coin. It lands on %outcome . $nick loses, and forfeits his Luccapwnage force. Total Wins: $hget(counter $address($nick,2) }
}