Forums mIRC Help Coinflip Script but i need it with betting Coins

 on *:text:!coin-toss*:#: {
  if ($nick == %player1) {
    .msg $chan 3Pfft? 4Are you An Idiot3 $nick ,4 You Cant Play Yourself
    /halt
  }
  if (%coin1 == active) {
    msg $chan a duel is already active please wait for it to end.
  }
  if (%toss1 == active) {
    set %player2 $nick
    msg $chan 4The Match Has Been Decided,3 %player1 4VS3 %player2
    set %coin1 active 
    /set %turn $rand(1,2)
    if (%turn == 1) {
      .msg $chan 4Randomly Selected: %player1 Will Call The Toss
    }
    if (%turn == 2) {
      .msg $chan 4Randomly Selected: %player2 Will Call The Toss
    }
  }
  else {
    set %toss1 active
    set %player1 $nick
    msg $chan 3 $nick 4Wants To Play The Game:3 Coin Toss!4 To Play Type3 !coin-toss
  }
}
on *:text:!heads*:#: {
  if (%turn == 1) {
    if ($nick == %player1) { 
      set %head $rand(1,2)
      msg $chan 3 %player1 4Has Called:3 Heads!
      if (%head == 1) {
        .msg $chan 4The Toss Is Thrown by:3 %player2
        .msg $chan 4The Result Is:3 Heads!3 %player1 4Wins!!!!
        unset %toss1
        unset %player1
        unset %player2
        unset %coin1
        unset %turn
        unset %head
        unset %tails
      }
      if (%head == 2) {
        .msg $chan 4OMG!!3 %player1 4Has Called The Toss: 3WRONG!!
        .msg $chan 3 %player2 4Wins!!!!
        unset %toss1
        unset %player1
        unset %player2
        unset %coin1
        unset %turn
        unset %head
        unset %tails
      }
      else {
      }
    }
  }
  if (%turn == 2) {
    if ($nick == %player2) { 
      set %head $rand(1,2)
      msg $chan 3 %player2 4Has Called:3 Heads!
      if (%head == 1) {
        .msg $chan 4The Toss Is Thrown by:3 %player1
        .msg $chan 4The Result Is:3 Heads!3 %player2 4Wins!!!!
        unset %toss1
        unset %player1
        unset %player2
        unset %coin1
        unset %turn
        unset %head
        unset %tails
      }
      if (%head == 2) {
        .msg $chan 4OMG!!3 %player2 4Has Called The Toss: 3WRONG!!
        .msg $chan 3 %player1 4Wins!!!!
        unset %toss1
        unset %player1
        unset %player2
        unset %coin1
        unset %turn
        unset %head
        unset %tails
      }
      else {
      }
    }
  }
}
on *:text:!tails*:#: {
  if (%turn == 1) {
    if ($nick == %player1) { 
      set %tails $rand(1,2)
      msg $chan 3 %player1 4Has Called:3 Tails!
      if (%tails == 1) {
        .msg $chan 4The Toss Is Thrown by:3 %player2
        .msg $chan 4The Result Is:3 Tails!3 %player1 4Wins!!!!
        unset %toss
        unset %player1
        unset %player2
        unset %coin1
        unset %turn
        unset %head
        unset %tails
      }
      if (%tails == 2) {
        .msg $chan 4OMG!!3 %player1 4Has Called The Toss: 3WRONG!!
        .msg $chan 3 %player2 4Wins!!!!
        unset %toss1
        unset %player1
        unset %player2
        unset %coin1
        unset %turn
        unset %head
        unset %tails
      }
      else {
      }
    }
  }
  if (%turn == 2) {
    if ($nick == %player2) { 
      set %tails $rand(1,2)
      msg $chan 3 %player2 4Has Called:3 Tails!
      if (%tails == 1) {
        .msg $chan 4The Toss Is Thrown by:3 %player1
        .msg $chan 4The Result Is:3 Heads!3 %player2 4Wins!!!!
        unset %toss1
        unset %player1
        unset %player2
        unset %coin1
        unset %turn
        unset %head
        unset %tails
      }
      if (%tails == 2) {
        .msg $chan 4OMG!!3 %player2 4Has Called The Toss: 3WRONG!!
        .msg $chan 3 %player1 4Wins!!!!
        unset %toss1
        unset %player1
        unset %player2
        unset %coin1
        unset %turn
        unset %head
        unset %tails
      }
      else {
      }
    }
  }
}

on *:text:!stop-toss*:#: {
  if ($nick isop $chan || $nick ishop $chan) {
    .msg $chan 4Coin Toss Stop By:3 $nick
    unset %toss
    unset %player1
    unset %player2
    unset %coin1
    unset %turn
    unset %toss1
    unset %tails
    unset %head
  }
}