All pastes #927828 Raw Edit

Chance/Game mIRC script

public text v1 · immutable
·published 2008-03-04 15:55 UTC
rendered paste body
Menu * { 
  Chance 
  .Points 
  ..Points:echo 4 $+ $$1 Got $iif(%chancescore. [ $+ [ $$1 ] ], $v1, 0) points 
  ..Give Points 
  ...5://inc %chancescore. [ $+ [ $$1 ] ] 5 | echo 4You have given $$1 5 Chance-Points | notice $$1 You have recived 5 Chance-Points. Now you totaly got $iif(%chancescore. [ $+ [ $$1 ] ], $v1, 0) Chance-Points 
  ...10://inc %chancescore. [ $+ [ $$1 ] ] 10 | echo 4You have given $$1 10 Chance-Points | notice $$1 You have recived 10 Chance-Points. Now you totaly got $iif(%chancescore. [ $+ [ $$1 ] ], $v1, 0) Chance-Points 
  ...X://var %givecp $$?="Enter Chance-Points given to $$1" | inc %chancescore. [ $+ [ $$1 ] ] %givecp | /echo 4You have given $$1 %givecp Chance-Points | notice $$1 You have recived %givecp Chance-Points. Now you totaly got $iif(%chancescore. [ $+ [ $$1 ] ], $v1, 0) Chance-Points 
  ..Remove Points 
  ...5://dec %chancescore. [ $+ [ $$1 ] ] 5 | echo 4You have taken 5 chance-points from $$1 | notice $$1 $me Has removed 5 chance-points from you. Now you totaly got $iif(%chancescore. [ $+ [ $$1 ] ], $v1, 0) Chance-Points 
  ...10://dec %chancescore. [ $+ [ $$1 ] ] 10 | echo 4You have taken 10 chance-points from $$1 | notice $$1 $me Has removed 10 chance-points from you. Now you totaly got $iif(%chancescore. [ $+ [ $$1 ] ], $v1, 0) Chance-Points 
  ...X://var %takecp $$?="Enter Points to take from $$1" | //dec %chancescore. [ $+ [ $$1 ] ] %takecp | /echo 4You have taken %takecp chance-points from $$1 | notice $$1 $me Has removed %takecp chance-points from you. Now you totaly got $iif(%chancescore. [ $+ [ $$1 ] ], $v1, 0) Chance-Points 
  .coupons 
  ..coupons:/echo $$1 got $iif(%lottery. [ $+ [ $nick ] ], $v1, 0) coupons 
  ..Give X://var %givecoupons $$?="Enter how many coupons you want to give $$1" | /inc %lottery. [ $+ [ $$1 ] ] %givecoupons | /echo 4You have given $$1 %givecoupons coupons | notice $$1 You have recived %givecoupons Lottery coupons. Type !check coupon to check it for prizes. Now you totaly got $iif(%lottery. [ $+ [ $$1 ] ], $v1, 0) coupons 
  ..Remove X://var %takecoupons $$?="Enter how many coupons to take from $$1" | //dec %lottery. [ $+ [ $$1 ] ] %takecoupons | /echo 4You have taken %takecoupons coupons from $$1 | notice $$1 $me Has removed %takecoupons coupons from you. Now you totaly got $iif(%lottery. [ $+ [ $$1 ] ], $v1, 0) coupons 
  .Party hats 
  ..Phats:/echo $$1 got $iif(%phat. [ $+ [ $address($$1,2) ] ], $v1, 0) Party hats 
  ..Give Phat://inc %phat. [ $+ [ $address($$1,2) ] ] | /echo You have given a party-hat to $$1 | notice $$1 You have recived a party hat 
  ..Take Phat://dec %phat. [ $+ [ $address($$1,2) ] ] | /echo You have taken $$1 $+ 's party-hat | notice $$1 I have taken your party hat 
  .AV 
  ..Give AV://set %avnick. [ $+ [ $$1 ] $+ ] . [ $+ [ $chan ] ]  $$1 | /set %avchan. [ $+ [ $$1 ] $+ ] . [ $+ [ $chan ] ] $chan | notice $$1 I have given you auto-voice in $chan | /echo 4You have given $$1 auto-voice in $chan | mode $chan +v $$1 
  ..Take AV://unset %avnick. [ $+ [ $$1 ] $+ ] . [ $+ [ $chan ] ] $$1 | /unset %avchan. [ $+ [ $$1 ] $+ ] . [ $+ [ $chan ] ] $chan | notice $$1 I have taken your auto-voice in $chan | /echo 4You have taken $$1 $+ 's auto-voice in $chan | mode $chan -v $$1 
  .Game Info 
  ..On://set %gameinfo on | echo 4Game info is set on 
  ..Off://set %gameinfo off | echo 4Game info is off 
} 

------------- 
2.0 Chance 
2.1 - Game 
2.2 - Guess 
------------- 
2.1 Chance - Game 
------------- 
on *:TEXT:!chance:#: { if ($me ishop $chan) || ($me isop $chan) { 
    //inc %chancetotal 
    //inc %chanceplay. [ $+ [ $nick ] ] 
    //set %chance. [ $+ [ $nick ] ] $rand(1,3) 
    /timer $+ $nick 1 60 /kick $chan $nick Sorry. But it took you too long. The right number was $iif(%chance. [ $+ [ $nick ] ], $v1, 0) 
    /timer 1 60 /unset %chance. [ $+ [ $nick ] ] 
    msg $chan $nick has taken the chance!! If he guesses the right number he will get 5 chance-points! If $nick does it wrong, he will get punished and lose 2 chance-points! $nick got 1 minute! After that minute he will be kicked! 
    /notice $nick Type !guess (a number between 1 and 3) to take the chance! 
    /timer $+ $nick $+ 2 1 50 notice $nick You got 10 seconds back! 
    if ($iif(%gameinfo, $v1, 0) == on) { echo 4 $+ $nick Has used chance in $chan $+ . The right number is: $iif(%chance. [ $+ [ $nick ] ], $v1, 0) } 
  } 
  else { 
    notice $nick I need to be a hop to use this in here 
  } 
} 

------------- 
2.2 Chance - Guess 
------------- 
on *:TEXT:!guess *:#: { if ($me ishop $chan) || ($me isop $chan) { 
    if ($2 == $iif(%chance. [ $+ [ $nick ] ], $v1, 0)) && ($2 isnum 1-3) { 
      msg $chan Congratulations! $nick chosed the right number! $nick has recived 5 Chance-Points 
      if ($iif(%gameinfo, $v1, 0) == on) { /echo 4 $+ $nick Has guessed right in $chan using the !chance } 
      /timer $+ $nick off 
      /timer $+ $nick $+ 2 off 
      //unset %chance. [ $+ [ $nick ] ] 
      //inc %chancewon. [ $+ [ $nick ] ] 
      /inc %chancescore. [ $+ [ $nick ] ] 5 
    } 
    else { 
      /ban -ku10 $chan $address($nick,2) 
      /kick $chan $nick You chosed the wrong number! The right number were $iif(%chance. [ $+ [ $nick ] ], $v1, 0) $+ . You have lost 2 chance-points 
      timer 1 10 notice $nick You have been unbanned from $chan $+ . Better luck next time 
      /timer $+ $nick $+ 2 off 
      /timer $+ $nick off 
      //unset %chance. [ $+ [ $nick ] ] 
      //inc %chancelost. [ $+ [ $nick ] ] 
      //dec %chancescore. [ $+ [ $nick ] ] 2 
      if ($iif(%gameinfo, $v1, 0) == on) { /echo 4 $+ $nick Has guessed wrong in $chan using the !chance } 
    } 
  } 
  else { 
    notice $nick I need to atleast be a hop to use this command 
  } 
} 


------------- 
3.0 Voice 
3.1 - Buy Voice 
3.2 - Buy Autovoice 
3.3 - Sell autovoice 
------------- 
3.1 Voice - Buy Voice 
------------- 
on *:TEXT:!buy voice:#: { 
  if ($me ishop $chan) || ($me isop $chan) { 
    if ($nick isvoice $chan) { notice $nick You already got voice 
    } 
    else { 
      if ($iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) > 9) { 
        /mode $chan +v $nick 
        if ($iif(%gameinfo, $v1, 0) == on) { /echo 4 $+ $nick Has bought voice in $chan } 
        //dec %chancescore. [ $+ [ $nick ] ] 10 
        notice $nick You have bought voice for 10 chance-points 
        //inc %buyvoice. [ $+ [ $nick ] ] 
      } 
      else { 
        notice $nick You dont have 10 Chance-Points to buy voice with 
      } 
    } 
  } 
  else { 
    notice $nick I need to atleast be a hop to do this in here 
  } 
} 

------------- 
3.2 Voice - Buy Autovoice 
------------- 
on *:TEXT:!buy av:#: { 
  if ($me ishop $chan) || ($me isop $chan) { 
    if ($nick == $iif(%avnick.  [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ], $v1, 1)) && ($chan == $iif(%avchan. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ], $v1, 1)) { notice $nick You already got auto-voice in here. If you dont got voice then say /hop 
    } 
    else { 
      if ($iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) > 99) { 
        /mode $chan +v $nick 
        //dec %chancescore. [ $+ [ $nick ] ] 100 
        notice $nick You have bought auto-voice in $chan for 100 chance-point 
        /set %avnick. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ] $nick 
        /set %avchan. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ] $chan 
        if ($iif(%gameinfo, $v1, 0) == on) { /echo 4 $+ $nick Has bought Auto-Voice in $chan } 
      } 
      else { 
        notice $nick You dont have 100 Chance-Points to buy auto-voice with 
      } 
    } 
  } 
  else { 
    notice $nick I need to be a hop in here to do this in here 
  } 
} 
on *:JOIN:#: { if ($nick == $iif(%avnick.  [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ], $v1, 1)) && ($chan == $iif(%avchan. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ], $v1, 1)) { 
    /mode $chan +v $nick 
    /notice $nick You have bought auto-voice in $chan $+ . So heres your voice 
  } 
  else { 
    halt 
  } 
} 
----------- 
3.3 Voice - Sell Autovoice 
----------- 
on *:TEXT:!sell av:#: { 
  if ($nick == $iif(%avnick.  [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ], $v1, 1)) && ($chan == $iif(%avchan. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ], $v1, 1)) { 
    inc %chancescore. [ $+ [ $nick ] ] 50 
    /unset %avnick. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ] $nick 
    /unset %avchan. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ] $chan 
    /mode $chan -v $nick 
    notice $nick You have sold your auto-voice for 50 chance-points 
    if ($iif(%gameinfo, $v1, 0) == on) { /echo 4 $+ $nick Has sold his auto-voice on $chan } 
  } 
  else { 
    notice $nick You dont have any auto-voice to sell 
  } 
} 


------------- 
4.0 Info 
4.1 - Chancehelp 
4.2 - Chanceinfo 
4.3 - Points 
4.4 - Gambleinfo 
4.5 - Chancescore 
4.6 - Items 
------------- 
4.1 Info - Chancehelp 
------------- 
on *:TEXT:!chancehelp*:#: { 
  if ($2 == $null) { 
    notice $nick Type !chancehelp chancepoints To get help about chance-points 
    notice $nick Type !chancehelp games if you want info about my games 
    notice $nick Type !chancehelp buy To se what and how you can buy with your Chance-Points 
    notice $nick Type !chancehelp sell To se what and how you can sell your "Chance-Points" stuff 
    notice $nick Type !chancehelp info To get help about info things  
  } 
  if ($2 == games) { 
    notice $nick Type !chance to start a mini-game were you can win 5 Chance-Points or lose 2 
    notice $nick Type !Gamble (amount of Chance-Points you want to gamble) Theres a 50% chance of winning. You win double up 
    notice $nick Type !hot (a nick you want to play heads or tails with) With this you play about 5 chancepoints. Theres a 50% chance of winning 
    notice $nick Type !search To search a bookcase for items
  } 
  if ($2 == buy) { 
    notice $nick You can buy voice for 10 Chance-Points typing !buy voice 
    notice $nick You can buy auto-voice typing !buy av in the channel you want auto-voice in. Auto-voice costs 100 chance-points 
    notice $nick You can buy lottery coupons for 5 chance-points each, saying !buy coupon (amout of coupons you wanna buy) 
    notice $nick You can win alot of different stuff in lottery, you can win chance-points, phats (there only 1% chance of getting phat) 
  } 
  if ($2 == sell) { 
    notice $nick You can sell your auto-voice for 50 chance-points 
    notice $nick If you got a Party-hat you can sell it for 500 chance-points! To sell it say: !sell phat 
  } 
  if ($2 == chancepoints) { 
    notice $nick You can get chancepoints by playing chance, gambling, and playing heads and tails 
    notice $nick To get info about playing those games above say !chancehelp games 
    notice $nick You can alse get chancepoints by using the !search function! 
    notice $nick Chance-Points are also used to buy voice or autovoice in a channel or buying lottery coupons 
    notice $nick To se your or other poeples chance-points and stuff say !points (name of person you want to look up) 
    notice $nick 4NB: You dont need add your own name if you want to look yourself up 
  } 
  if ($2 == info) { 
    notice $nick Type !chanceinfo to see how many times the !chance have been used 
    notice $nick Type !chancescore to see how many times you have won and lost! 
    notice $nick Type !gambleinfo to see how many times the !gamble have been used 
    notice $nick Type !points to see how many points and items you got 
  } 
} 
on *:TEXT:@chancehelp*:#: { 
  if ($2 == $null) { 
    msg $chan Type !chancehelp chancepoints To get help about chance-points 
    msg $chan Type !chancehelp games if you want info about my games 
    msg $chan Type !chancehelp buy To se what and how you can buy with your Chance-Points 
    msg $chan Type !chancehelp sell To se what and how you can sell your "Chance-Points" stuff 
    msg $chan Type !chancehelp info To get help about info things  
  } 
  if ($2 == games) { 
    notice $nick Type !chance to start a mini-game were you can win 5 Chance-Points or lose 2 
    notice $nick Type !Gamble (amount of Chance-Points you want to gamble) Theres a 50% chance of winning. You win double up 
    notice $nick Type !hot (a nick you want to play heads or tails with) With this you play about 5 chancepoints. Theres a 50% chance of winning 
    notice $nick Type !search To search a bookcase for items
  } 
  if ($2 == buy) { 
    notice $nick You can buy voice for 10 Chance-Points typing !buy voice 
    notice $nick You can buy auto-voice typing !buy av in the channel you want auto-voice in. Auto-voice costs 100 chance-points 
    notice $nick You can buy lottery coupons for 5 chance-points each, saying !buy coupon (amout of coupons you wanna buy) 
    notice $nick You can win alot of different stuff in lottery, you can win chance-points, phats (there only 1% chance of getting phat) 
  } 
  if ($2 == sell) { 
    notice $nick You can sell your auto-voice for 50 chance-points 
    notice $nick If you got a Party-hat you can sell it for 500 chance-points! To sell it say: !sell phat 
  } 
  if ($2 == chancepoints) { 
    notice $nick You can get chancepoints by playing chance, gambling, and playing heads and tails 
    notice $nick To get info about playing those games above say !chancehelp games 
    notice $nick You can alse get chancepoints by using the !search function! 
    notice $nick Chance-Points are also used to buy voice or autovoice in a channel or buying lottery coupons 
    notice $nick To se your or other poeples chance-points and stuff say !points (name of person you want to look up) 
    notice $nick 4NB: You dont need add your own name if you want to look yourself up 
  } 
  if ($2 == info) { 
    notice $nick Type !chanceinfo to see how many times the !chance have been used 
    notice $nick Type !chancescore to see how many times you have won and lost! 
    notice $nick Type !gambleinfo to see how many times the !gamble have been used 
    notice $nick Type !points to see how many points and items you got 
  } 
} 
------------- 
4.2 Info - Chanceinfo 
------------- 
on *:TEXT:!chanceinfo:#: { notice $nick The Chance-minigame has been used $iif(%chancetotal, $v1, 0) times. } 
on *:TEXT:@chanceinfo:#: { msg $chan The Chance-minigame has been used $iif(%chancetotal, $v1, 0) times. } 

------------- 
4.3 Info - Points 
------------- 
on *:TEXT:!points*:#: { if ($2 == $null) { 
    notice $nick You got: $iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) Chance-points 
  } 
  else { 
    notice $nick $2 $+ 's got: $iif(%chancescore. [ $+ [ $2 ] ], $v1, 0) Chance-Points 
  } 
} 
on *:TEXT:@points*:#: { if ($2 == $null) { 
    msg $chan $nick got: $iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) chance-points 
  } 
  else { 
    msg $chan $2 got: $iif(%chancescore. [ $+ [ $2 ] ], $v1, 0) Chance-Points 
  } 
} 

------------- 
4.4 Info - Gambleinfo 
------------- 
on *:TEXT:!gambleinfo:#: { notice $nick Gamble have been used $iif(%gambleused, $v1, 0) times } 
on *:TEXT:@gambleinfo:#: { msg $chan Gamble have been used $iif(%gambleused, $v1, 0) times } 

------------ 
4.5 Info - Chancescore 
------------ 
on *:TEXT:!chancescore*:#: { if ($2 == $null) { 
    notice $nick You have played this game: $iif(%chanceplay. [ $+ [ $nick ] ], $v1, 0) times. You have guessed right: $iif(%chancewon. [ $+ [ $nick ] ], $v1, 0) times. You have lost: $iif(%chancelost. [ $+ [ $nick ] ], $v1, 0) times. You have bought voice $iif(%buyvoice. [ $+ [ $nick ] ], $v1, 0) times 
    notice $nick You got: $iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) Chance-points 
  } 
  else { 
    notice $nick $2 has played this game: $iif(%chanceplay. [ $+ [ $2 ] ], $v1, 0) times. $2 has guessed right: $iif(%chancewon. [ $+ [ $2 ] ], $v1, 0) times. $2  has lost: $iif(%chancelost. [ $+ [ $2 ] ], $v1, 0) times. $2 has bought voice $iif(%buyvoice. [ $+ [ $2 ] ], $v1, 0) times 
    notice $nick $2 $+ 's got: $iif(%chancescore. [ $+ [ $2 ] ], $v1, 0) Chance-Points 
  } 
} 
on *:TEXT:@chancescore*:#: { if ($2 == $null) { 
    msg $chan $nick has played this game: $iif(%chanceplay. [ $+ [ $nick ] ], $v1, 0) times. $nick has guessed right: $iif(%chancewon. [ $+ [ $nick ] ], $v1, 0) times. $nick has lost: $iif(%chancelost. [ $+ [ $nick ] ], $v1, 0) times. You have bought voice $iif(%buyvoice. [ $+ [ $nick ] ], $v1, 0) times 
    msg $chan $nick got: $iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) chance-points 
  } 
  else { 
    msg $chan $2 has played this game: $iif(%chanceplay. [ $+ [ $2 ] ], $v1, 0) times. $2 has guessed right: $iif(%chancewon. [ $+ [ $2 ] ], $v1, 0) times. $2  has lost: $iif(%chancelost. [ $+ [ $2 ] ], $v1, 0) times. He has bought voice $iif(%buyvoice. [ $+ [ $2 ] ], $v1, 0) times 
    msg $chan $2 $+ 's got: $iif(%chancescore. [ $+ [ $2 ] ], $v1, 0) Chance-Points 
  } 
} 

------------- 
4.6 Info - Items 
------------- 
on *:TEXT:!item*:#: { if ($2 == $null) { 
    notice $nick You got: $iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) Chance-points And $iif(%lottery. [ $+ [ $nick ] ], $v1, 0) lottery coupons and $iif(%phat. [ $+ [ $address($nick,2) ] ], $v1, 0) party hats 
  } 
  else { 
    notice $nick $2 $+ 's got: $iif(%chancescore. [ $+ [ $2 ] ], $v1, 0) Chance-Points And $iif(%lottery. [ $+ [ $2 ] ], $v1, 0) lottery coupons and $iif(%phat. [ $+ [ $address($nick,2) ] ], $v1, 0) party hats 
  } 
} 
on *:TEXT:@item*:#: { if ($2 == $null) { 
    msg $chan $nick got: $iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) chance-points And $iif(%lottery. [ $+ [ $nick ] ], $v1, 0) lottery coupons and $iif(%phat. [ $+ [ $address($nick,2) ] ], $v1, 0) party hats 
  } 
  else { 
    msg $chan $2 got: $iif(%chancescore. [ $+ [ $2 ] ], $v1, 0) Chance-Points And $iif(%lottery. [ $+ [ $2 ] ], $v1, 0) lottery coupons and $iif(%phat. [ $+ [ $address($nick,2) ] ], $v1, 0) party hats 
  } 
} 
------------- 
5.0 Gamble 
5.1 - Game 
5.2 - Number 
------------- 
5.1 Gamble - Game 
------------- 
on *:TEXT:!gamble *:#: { if ($2 < 0) { /ban -ku300 $chan $address($nick,2) | /kick $chan $nick DONT CHEAT!4 You have been banned for 5 minutes } 
  elseif ($iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) > $2) { 
    notice $nick You have gambled $2 Chance-points! 
    //dec %chancescore. [ $+ [ $nick ] ] $2 
    //inc %gambleused 
    //set %gambleamount. [ $+ [ $nick ] ] $2 
    //set %gamblenum. [ $+ [ $nick ] ] $rand(1,2) 
    notice $nick Type !number (a number between 1 and 2) to se what you have won 
    if ($iif(%gameinfo, $v1, 0) == on) { //echo 4 $+ $nick Has gambled $iif(%gambleamount. [ $+ [ $nick ] ], $v1, 0) Chance-Points in $chan $+ . The right number is: $iif(%gamblenum. [ $+ [ $nick ] ], $v1, 0) } 
  } 
  else { 
    notice $nick You dont have $2 Chance-Points to gamble with! To get chance-poits please read !chancehelp 
  } 
} 

------------- 
5.2 Gamble - Number 
------------- 
on *:TEXT:!number*:#: { if ($2 == $null) { notice $nick You need to chose a number between 1 and 2 } 
  elseif ($2 == $iif(%gamblenum. [ $+ [ $nick ] ], $v1, 0)) { 
    notice $nick Congratulations! You have won $iif(%gambleamount. [ $+ [ $nick ] ], $v1, 0) Chance-Points! 
    if ($iif(%gameinfo, $v1, 0) == on) { /echo 4 $+ $nick Has won $iif(%gambleamount. [ $+ [ $nick ] ], $v1, 0) Chance-Points at gambling in $chan } 
    //inc %chancescore. [ $+ [ $nick ] ] $calc($iif(%gambleamount. [ $+ [ $nick ] ], $v1, 0)*2) 
    //unset %gamblenum. [ $+ [ $nick ] ] 
    //unset %gambleamount. [ $+ [ $nick ] ] 
  } 
  else { 
    notice $nick Sorry buy you have lost $iif(%gambleamount. [ $+ [ $nick ] ], $v1, 0) Chance-Points! The right number was: $iif(%gamblenum. [ $+ [ $nick ] ], $v1, 0) $+ . You have $iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) Chance-Points left. Better luck next time 
    if ($iif(%gameinfo, $v1, 0) == on) { /echo 4 $+ $nick Has lost $iif(%gambleamount. [ $+ [ $nick ] ], $v1, 0) Chance-Points at gambling in $chan } 
    //unset %gamblenum. [ $+ [ $nick ] ] 
    //unset %gambleamount. [ $+ [ $nick ] ] 
  } 
} 

------------ 
6.0 Give Chance-Points 
------------ 
on *:TEXT:!give *:#: {  
  if ($2 < 0) { /ban -ku300 $chan $address($nick,2) | /kick $chan $nick DONT CHEAT!4 You have been banned for 5 minutes } 
  elseif ($3 ison $chan) { 
    if ($iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) > $calc($2 - 1)) { 
      //inc %chancescore. [ $+ [ $3 ] ] $2 
      //dec %chancescore. [ $+ [ $nick ] ] $2 
      /notice $3 $nick Has given you $2 Chance-Points 
      /notice $nick You have given $2 Chance-Points to $3 
      if ($iif(%gameinfo, $v1, 0) == on) { /echo 4 $+ $nick has given $2 Chance-points to $3 } 
    } 
    else { 
      notice $nick You dont have $2 Chance-points to give to $3 
    } 
  } 
  else { 
    notice $nick $3 Isnt in here. You cant give Chance-Points to a person whos not in the channel 
  } 
} 

----------- 
7.0  Heads or Tails 
7.1 - Game 
7.2 - Accept 
7.3 - Decline 
----------- 
7.1 Heads or Tails - Game 
----------- 
on *:TEXT:!hot *:#: { 
  if ($2 == $nick) { notice $nick You cant challange yourself! } 
  elseif ($2 ison $chan) { 
    if ($iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) > 4) { 
      if ($iif(%chancescore. [ $+ [ $2 ] ], $v1, 0) > 4) { 
        /set %hotnick. [ $+ [ $2 ] ] $nick 
        /set %hot. [ $+ [ $2 ] ] on 
        /set %hotenemy. [ $+ [ $2 ] ] $2 
        if ($iif(%gameinfo, $v1, 0) == on) { echo 4 $+ $nick has challanged $2 to play heads or tails in $chan }
        notice $nick You have challanged $2 to play heads or tail! 
        notice $nick Wait to se if he have acceptet or declined your challange 
        notice $2 $nick Has challanged you to play heads or tails! It will cost you 5 Chance-Points to play! Say !accept in the channel $chan if you want to play. If you dont want to play say !decline in the $chan $+ . 
        notice $2 4NB: You can win or lose 5 Chance-Points 
      } 
      else { 
        notice $nick $2 Doesnt have 5 Chance-Points to play with! 
      } 
    } 
    else { 
      notice $nick You dont have 5 chance-points to play with! 
    } 
  } 
  else { 
    notice $nick  $+ $2 Isnt in here. You cant challange a person whos not in the channel 
  } 
} 

----------- 
7.1 Heads or Tails - Accept 
----------- 
on *:TEXT:!accept:#: { 
  if ($iif(%hot. [ $+ [ $nick ] ], $v1, 0) == on) && ($iif(%hotenemy. [ $+ [ $nick ] ], $v1, 0) == $nick) { 
    if ($iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) ison $chan) { 
      notice $nick You have acceptet $iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) $+ 's Challange! You got heads 
      notice $iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) $nick Has acceptet you challange! You got tails 
      var %hotgame = $rand(1,2) 
      if (%hotgame == 1) { 
        Notice $nick I flip the coin. 
        Notice $iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) I flip the coin. 
        timer 1 3 notice $iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) The Coins lands on tails. You have won 5 Chance-Points 
        timer 1 3 notice $nick The Coins lands on tails. You have lost 5 Chance-Points 
        if ($iif(%gameinfo, $v1, 0) == on) { echo 4 $+ $nick has acceptet $iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) $+ 's challange. $iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) won the 5 chance-points }
        dec %chancescore. [ $+ [ $nick ] ] 5 
        inc %chancescore. [ $+ [ %hotnick. [ $+ [ $nick ] ] ] ] 5 
        unset %hotnick. [ $+ [ $nick ] ] 
        unset %hot [ $+ [ $nick ] ] 
        unset %hotenemy. [ $+ [ $nick ] ] 
      } 
      if (%hotgame == 2) { 
        Notice $nick I flip the coin. 
        Notice $iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) I flip the coin. 
        timer 1 3 notice $iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) The Coins lands on heads. You have lost 5 Chance-Points 
        timer 1 3 notice $nick The Coins lands on heads. You have won 5 Chance-Points 
        if ($iif(%gameinfo, $v1, 0) == on) { echo 4 $+ $nick has acceptet $iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) $+ 's challange. $nick won the 5 chance-point }
        inc %chancescore. [ $+ [ $nick ] ] 5 
        dec %chancescore. [ $+ [ %hotnick. [ $+ [ $nick ] ] ] ] 5 
        unset %hotnick. [ $+ [ $nick ] ] 
        unset %hot [ $+ [ $nick ] ] 
        unset %hotenemy. [ $+ [ $nick ] ] 
      } 
    } 
    else { 
      notice $nick  $+ $iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) isnt in this channel. Find a channel were me and him is in and say !accept 
    } 
  } 
  else { 
    notice $nick No one has given you a challange 
  } 
} 

----------- 
7.1 Heads or Tails - Decline 
----------- 
on *:TEXT:!decline:#: { 
  if ($iif(%hot. [ $+ [ $nick ] ], $v1, 0) == on) && ($iif(%hotenemy. [ $+ [ $nick ] ], $v1, 0) == $nick) { 
    notice $nick You have declined $iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) $+ 's challange 
    notice $iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) $nick Has declined your challange 
    if ($iif(%gameinfo, $v1, 0) == on) { echo 4 $+ $nick has declined $iif(%hotnick. [ $+ [ $nick ] ], $v1, 0) $+ 's challange. }
    unset %hotnick. [ $+ [ $nick ] ] 
    unset %hot [ $+ [ $nick ] ] 
    unset %hotenemy. [ $+ [ $nick ] ] 
  } 
  else { 
    notice $nick No one has given you a challange 
  } 
} 

----------- 
8.0 coupons 
8.1 - Buy 
8.2 - Check 
----------- 
8.1 coupons - Buy 
----------- 
on *:TEXT:!buy coupon*:#: { 
  if ($3 == $null) { 
    if ($iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) > 4) { 
      dec %chancescore. [ $+ [ $nick ] ] 5 
      inc %lottery. [ $+ [ $nick ] ] 
      if ($iif(%gameinfo, $v1, 0) == on) { echo 4 $+ $nick has bought a coupon in $chan }
      notice $nick You have bought one lottery coupon for 5 Chance-Points. Now you got $iif(%lottery. [ $+ [ $nick ] ], $v1, 0) Lottery coupons and $iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) Chance-Points 
      notice $nick To check it type !check coupon 
    } 
    else { 
      notice $nick You dont have enough Chance-Points to buy one coupon. It will cost you 5 Chance-Points to buy one coupon. You only got $iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) Chance-Points. So you need $calc(5 - $iif(%chancescore. [ $+ [ $nick ] ], $v1, 0)) Chance-Points more to buy a coupon 
    } 
  } 
  else { 
    if ($iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) > $calc($3 * 5 - 1)) { 
      if ($3 isnum 1-100) { 
        dec %chancescore. [ $+ [ $nick ] ] $calc(5 * $3) 
        inc %lottery. [ $+ [ $nick ] ] $3 
        if ($iif(%gameinfo, $v1, 0) == on) { echo 4 $+ $nick has bought $3 coupons in $chan }
        notice $nick You have bought $3 lottery coupons for $calc(5 * $3) Chance-Points. Now you got $iif(%lottery. [ $+ [ $nick ] ], $v1, 0) Lottery coupons and $iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) Chance-Points 
        notice $nick To check it type !check coupon 
      } 
      else { 
        notice $nick You can maximun buy 100 coupons at the time 
      } 
    } 
    else { 
      notice $nick You dont have enough Chance-Points to buy $3 coupons. It will cost you $calc($3 * 5) Chance-Points to buy $3 coupons. You only got $iif(%chancescore. [ $+ [ $nick ] ], $v1, 0) Chance-Points. So you need $calc($3 * 5 - $iif(%chancescore. [ $+ [ $nick ] ], $v1, 0)) Chance-Points more to buy $3 coupons 
    } 
  } 
} 

----------- 
8.2 coupons - Check 
----------- 
on *:TEXT:!check coupon:#: { 
  if ($iif(%lottery. [ $+ [ $nick ] ], $v1, 0) > 0) { 
    /dec %lottery. [ $+ [ $nick ] ] 
    notice $nick Your lottery coupon is getting checked. Please wait a few seconds 
    timer 1 4 notice $nick You got $iif(%lottery. [ $+ [ $nick ] ], $v1, 0) coupons left 
    var %lotterycoupons = $rand(1,120) 
    if (%lotterycoupons == 1) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 2) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 3) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 4) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 5) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 6) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 7) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 8) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 9) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 10) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning }    
    if (%lotterycoupons == 11) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 12) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 13) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 14) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning }  
    if (%lotterycoupons == 15) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 16) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 17) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 18) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning }  
    if (%lotterycoupons == 19) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 20) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 21) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 22) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning }  
    if (%lotterycoupons == 23) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 24) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 25) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 26) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning }  
    if (%lotterycoupons == 27) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 28) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 29) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 30) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning }    
    if (%lotterycoupons == 31) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 32) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 33) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 34) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning }    
    if (%lotterycoupons == 35) { /var %winning $rand(1,10) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 36) { /var %winning $rand(1,5) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 37) { /var %winning $rand(1,5) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 38) { /var %winning $rand(1,5) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning }    
    if (%lotterycoupons == 39) { /var %winning $rand(1,5) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 40) { /var %winning $rand(1,5) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 41) { /var %winning $rand(1,5) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 42) { /var %winning $rand(1,5) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 43) { /var %winning $rand(1,5) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 44) { /var %winning $rand(1,5) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 45) { /var %winning $rand(1,5) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 46) { /var %winning $rand(1,5) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 47) { /var %winning $rand(1,50) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 48) { /var %winning $rand(1,50) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 49) { /var %winning $rand(1,50) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 50) { /var %winning $rand(1,50) | timer 1 3 /notice $nick Congratulations!! You have won %winning Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning } 
    if (%lotterycoupons == 51) { 
      if ($nick == $iif(%avnick. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ], $v1, 1)) && ($chan == $iif(%avchan. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ], $v1, 1)) { 
        timer 1 3 /notice $nick Congratulations!! You have won 40 Chance-Points 
        inc %chancescore. [ $+ [ $nick ] ] 40 
      } 
      else { 
        /timer 1 3 /mode $chan +v $nick 
        /set %avnick. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ] $nick 
        /set %avchan. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ] $chan 
        /timer 1 3 /notice $nick Congratulations!! You have won auto-voice in $chan    
      } 
    } 
    if (%lotterycoupons == 52) { 
      if ($nick == $iif(%avnick. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ], $v1, 1)) && ($chan == $iif(%avchan. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ], $v1, 1)) { 
        timer 1 3 /notice $nick Congratulations!! You have won 40 Chance-Points 
        inc %chancescore. [ $+ [ $nick ] ] 40 
      } 
      else { 
        /timer 1 3 /mode $chan +v $nick 
        /set %avnick. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ] $nick 
        /set %avchan. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ] $chan 
        /timer 1 3 /notice $nick Congratulations!! You have won auto-voice in $chan    
      } 
    }    
    if (%lotterycoupons == 53) { 
      if ($nick == $iif(%avnick. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ], $v1, 1)) && ($chan == $iif(%avchan. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ], $v1, 1)) { 
        timer 1 3 /notice $nick Congratulations!! You have won 40 Chance-Points 
        inc %chancescore. [ $+ [ $nick ] ] 40 
      } 
      else { 
        /timer 1 3 /mode $chan +v $nick 
        /set %avnick. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ] $nick 
        /set %avchan. [ $+ [ $nick ] $+ ] . [ $+ [ $chan ] ] $chan 
        /timer 1 3 /notice $nick Congratulations!! You have won auto-voice in $chan    
      } 
    } 
    if (%lotterycoupons == 54) { 
      if ($nick isvoice $chan) { 
        timer 1 3 /notice $nick Congratulations!! You have won 5 chance-points 
        inc %chancescore. [ $+ [ $nick ] ] 5 
      } 
      else { 
        /timer 1 3 /mode $chan +v $nick 
        timer 1 3 /notice $nick Congratulations!! You have won voice in $chan 
      } 
    } 
    if (%lotterycoupons == 55) { 
      if ($nick isvoice $chan) { 
        timer 1 3 /notice $nick Congratulations!! You have won 5 chance-points 
        inc %chancescore. [ $+ [ $nick ] ] 5 
      } 
      else { 
        /timer 1 3 /mode $chan +v $nick 
        timer 1 3 /notice $nick Congratulations!! You have won voice in $chan 
      } 
    } 
    if (%lotterycoupons == 56) { 
      if ($nick isvoice $chan) { 
        timer 1 3 /notice $nick Congratulations!! You have won 5 chance-points 
        inc %chancescore. [ $+ [ $nick ] ] 5 
      } 
      else { 
        /timer 1 3 /mode $chan +v $nick 
        timer 1 3 /notice $nick Congratulations!! You have won voice in $chan 
      } 
    } 
    if (%lotterycoupons == 57) { 
      if ($nick isvoice $chan) { 
        timer 1 3 /notice $nick Congratulations!! You have won 5 chance-points 
        inc %chancescore. [ $+ [ $nick ] ] 5 
      } 
      else { 
        /timer 1 3 /mode $chan +v $nick 
        timer 1 3 /notice $nick Congratulations!! You have voice in $chan 
      } 
    } 
    if (%lotterycoupons == 58) { 
      if ($nick isvoice $chan) { 
        timer 1 3 /notice $nick Congratulations!! You have won 5 chance-points 
        inc %chancescore. [ $+ [ $nick ] ] 5 
      } 
      else { 
        /timer 1 3 /mode $chan +v $nick 
        timer 1 3 /notice $nick Congratulations!! You have won voice in $chan 
      } 
    } 
    if (%lotterycoupons == 59) { 
      if ($nick isvoice $chan) { 
        timer 1 3 /notice $nick Congratulations!! You have won 5 chance-points 
        inc %chancescore. [ $+ [ $nick ] ] 5 
      } 
      else { 
        /timer 1 3 /mode $chan +v $nick 
        timer 1 3 /notice $nick Congratulations!! You have won voice in $chan 
      } 
    } 
    if (%lotterycoupons == 60) { 
      if ($nick isvoice $chan) { 
        timer 1 3 /notice $nick Congratulations!! You have won 5 chance-points 
        inc %chancescore. [ $+ [ $nick ] ] 5 
      } 
      else { 
        /timer 1 3 /mode $chan +v $nick 
        timer 1 3 /notice $nick Congratulations!! You have won voice in $chan 
      } 
    } 
    if (%lotterycoupons == 61) { timer 1 3 /notice $nick CONGRATULATIONS!!!!!! You have won a PHAT!!! OMG!!!! 
      inc %phat. [ $+ [ $address($nick,2) ] ] 
    } 
    if (%lotterycoupons == 62) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 63) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 64) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 65) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 66) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 67) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 68) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 69) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 70) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 71) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 72) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 73) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 74) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 75) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 76) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 77) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 78) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 79) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 80) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 81) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 82) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 83) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 84) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 85) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 86) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 87) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 88) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 89) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 90) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 91) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 92) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 93) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 94) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 95) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 96) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 97) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 98) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 99) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 100) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 101) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 102) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 103) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 104) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 105) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 106) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 107) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 108) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 109) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 110) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 111) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 112) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 113) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 114) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 115) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 116) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 117) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 118) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 119) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 120) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
    if (%lotterycoupons == 121) { timer 1 3 /notice $nick Sorry! But theres no prize on that coupon! } 
  } 
  else { 
    /notice $nick You dont have any lottery coupons 
  } 
} 

----------- 
9.0 
Sell - Phat 
----------- 
on *:TEXT:!sell phat:#: { 
  if ($iif(%phat. [ $+ [ $address($nick,2) ] ], $v1, 0) > 0) { 
    notice $nick You have sold your party hat for 500 Chance-Points! 
    if ($iif(%gameinfo, $v1, 0) == on) { echo 4 $+ $nick has sold his partyhat for 500 chance-points }
    inc %chancescore. [ $+ [ $nick ] ] 500 
    dec %phat. [ $+ [ $address($nick,2) ] ] 
  } 
  else { 
    notice $nick Dont steal! Its not your partyhat! 
  } 
} 
on *:TEXT:!search:#: { 
  if ($me ishop $chan) || ($me isop $chan) { 
    if (!%seach [ $+ [ $address($nick,2) ] ]) { 
      set -u1800 %seach $+ $address($nick,2) x
      notice $nick You search the bookcase
      var %searchprize = $rand(1,3)
      if (%searchprize == 1) {
        var %searchwire = $rand(1,2)
        if (%searchwire == 1) {
          /set %wirecolor1. [ $+ [ $nick ] ] red
          /set %wirecolor2. [ $+ [ $nick ] ] black
          if ($iif(%gameinfo, $v1, 0) == on) { echo 4 $+ $nick has found a timebomb using search in $chan $+ . The wire to defuse the bomb is: $iif(%wirecolor1. [ $+ [ $nick ] ], $v1, 0) }
          /timer 1 3 msg $chan $nick has found a timebomb inside a bookcase! He got 60 seconds to deactivate it
          /timer 1 3 notice $nick Inside the bookcase you found a timebomb! The counter on it has start counting! 
          /timer 1 4 notice $nick The bomb will explode in 60 seconds!
          /timer 1 4 notice $nick Theres two wires! One 1black5 and one 4red5 wire!
          /timer 1 4 notice $nick To deactivate it say !cutwire (the color of wire you want to cut)
          /timerwire $+ $nick 1 63 /kick $chan $nick BOOOOOOOM
          /timercolor $+ $nick 1 63 /unset %wirecolor2. [ $+ [ $nick ] ]
          /timercolor2 $+ $nick 1 63 /unset %wirecolor1. [ $+ [ $nick ] ]
          /timercolor3 $+ $nick 1 63 /unset %timebom. [ $+ [ $nick ] ]
          set %timebom. [ $+ [ $nick ] ] on
        }
        if (%searchwire == 2) {
          /set %wirecolor1. [ $+ [ $nick ] ] black
          /set %wirecolor2. [ $+ [ $nick ] ] red
          if ($iif(%gameinfo, $v1, 0) == on) { echo 4 $+ $nick has found a timebomb using search in $chan $+ . The wire to defuse the bomb is: $iif(%wirecolor1. [ $+ [ $nick ] ], $v1, 0) }
          /timer 1 3 msg $chan $nick has found a timebomb inside a bookcase! He got 60 seconds to deactivate it
          /timer 1 3 notice $nick Inside the bookcase you found a timebomb! The counter on it has start counting! 
          /timer 1 4 notice $nick The bomb will explode in 60 seconds!
          /timer 1 4 notice $nick Theres two wires! One 1black5 and one 4red5 wire!
          /timer 1 4 notice $nick To deactivate it say !cutwire (the color of wire you want to cut)
          /timerwire $+ $nick 1 63 /kick $chan $nick BOOOOOOOM
          /timercolor $+ $nick 1 63 /unset %wirecolor2. [ $+ [ $nick ] ]
          /timercolor2 $+ $nick 1 63 /unset %wirecolor1. [ $+ [ $nick ] ]
          /timercolor3 $+ $nick 1 63 /unset %timebom. [ $+ [ $nick ] ]
          set %timebom. [ $+ [ $nick ] ] on
        }
      }
      if (%searchprize == 2) { /var %winning2 $rand(1,20) | timer 1 3 notice $nick Inside to bookcase you find %winning2 Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning2 }
      if (%searchprize == 3) { timer 1 3 /notice $nick You find nothing in the bookcase }
    }
    else {
      notice $nick You can only search the bookcase one time each 30 minutes
    }
  }
  else { 
    notice $nick I need to atleast be a hop to use this command 
  } 
} 

on *:TEXT:!cutwire *:#: { if ($me ishop $chan) || ($me isop $chan) { 
    if ($iif(%timebom. [ $+ [ $nick ] ], $v1, 0) == on) {
      if ($2 == $null) { notice $nick You need to chose a wire to cut! Type !cutwire (1black5 or 4red5) }
      elseif ($2 == $iif(%wirecolor1. [ $+ [ $nick ] ], $v1, 0)) {
        msg $chan $nick has cut the $iif(%wirecolor1. [ $+ [ $nick ] ], $v1, 0) wire!
        timer 1 3 msg $chan The watch stops cointing! $nick has deactivated the bomb!
        timer 1 3 notice $nick To see if the timebomb comtains some usefull items say !search timebomb
        if ($iif(%gameinfo, $v1, 0) == on) { timer 1 3 echo 4 $+ $nick has cut the correct wire }
        /timercolor3 $+ $nick off
        /timercolor2 $+ $nick off
        /timercolor $+ $nick off
        /timerwire $+ $nick off
        /unset %wirecolor1. [ $+ [ $nick ] ]
        /unset %wirecolor2. [ $+ [ $nick ] ] 
        /unset %timebom. [ $+ [ $nick ] ]
        timer 1 3 /inc %timebombreward. [ $+ [ $nick ] ]
      }
      else { 
        msg $chan $nick has cut the $iif(%wirecolor2. [ $+ [ $nick ] ], $v1, 0) wire!
        timer 1 3 /kick $chan $nick BOOM!!!!!!!!
        if ($iif(%gameinfo, $v1, 0) == on) { echo 4 $+ $nick has cut the wrong wire }
        /timercolor3 $+ $nick off
        /timercolor2 $+ $nick off
        /timercolor $+ $nick off
        /timerwire $+ $nick off
        /unset %wirecolor1. [ $+ [ $nick ] ]
        /unset %wirecolor2. [ $+ [ $nick ] ] 
        /unset %timebom. [ $+ [ $nick ] ] 
      }
    }
    else { 
      notice $nick You dont have a timebomb!
    }
  }
  else { 
    notice $nick I need to atleast be a hop to use this command 
  } 
} 


on *:TEXT:!search timebomb:#: {  
  if ($iif(%timebombreward. [ $+ [ $nick ] ], $v1, 0) > 0) {
    dec %timebombreward. [ $+ [ $nick ] ]
    notice $nick You search the timebomb
    var %timebombrand = $rand(1,1) 
    if (%timebombrand == 1) { timer 1 3 notice $nick You find nothing in the timebomb }
    if (%timebombrand == 2) { /var %winning2 $rand(10,20) | timer 1 3 notice $nick Inside the timebomb you find %winning2 Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning2 }
    if (%timebombrand == 3) { /var %winning2 $rand(10,20) | timer 1 3 notice $nick Inside the timebomb you find %winning2 Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning2 }
    if (%timebombrand == 4) { /var %winning2 $rand(10,20) | timer 1 3 notice $nick Inside the timebomb you find %winning2 Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning2 }
    if (%timebombrand == 5) { /var %winning2 $rand(1,10) | timer 1 3 notice $nick Inside the timebomb you find %winning2 Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning2 }
    if (%timebombrand == 6) { /var %winning2 $rand(1,10) | timer 1 3 notice $nick Inside the timebomb you find %winning2 Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning2 }
    if (%timebombrand == 7) { /var %winning2 $rand(1,10) | timer 1 3 notice $nick Inside the timebomb you find %winning2 Chance-Points | /inc %chancescore. [ $+ [ $nick ] ] %winning2 }
    if (%timebombrand == 8) { /var %winning3 $rand(2,10) | timer 1 3 notice $nick You find %winning3 chance coupons inside the timebomb! | inc %lottery. [ $+ [ $nick ] ] %winning3 }
    if (%timebombrand == 9) { /var %winning3 $rand(2,10) | timer 1 3 notice $nick You find %winning3 chance coupons inside the timebomb! | inc %lottery. [ $+ [ $nick ] ] %winning3 }
    if (%timebombrand == 10) { /var %winning3 $rand(2,5) | timer 1 3 notice $nick You find %winning3 chance coupons inside the timebomb! | inc %lottery. [ $+ [ $nick ] ] %winning3 }
    if (%timebombrand == 11) { /var %winning3 $rand(2,5) | timer 1 3 notice $nick You find %winning3 chance coupons inside the timebomb! | inc %lottery. [ $+ [ $nick ] ] %winning3 }
    if (%timebombrand == 12) { timer 1 3 notice $nick You find nothing in the timebomb }
  }
  else {
    notice $nick You dont got any timebombs!
  }
}