Slots game !slots
load to your remotes.
I'd like a good way to finish this.
!payout and clear all Is too bland.
Credits go to PeterTje.
Load to remotes and It will work.
I've made this for different servers and this Is the irc version.

*/the basis of this is out of petertje's supertrivia slots.
on ^*:TEXT:!slots*:#: { 
  if ( % [ $+ [ $nick ] $+ ] .points == $null ) { /set % $+ $nick $+ .points 0  } 
  if ( % [ $+ [ $nick ] $+ ] .points < 1 ) { msg $chan 7Sorry, you don't have enough 4Credits! 
    .msg $chan $nick 12Why not earn some with 1,0!heads 5Or 1,0!tails 
    /halt 
  } 
  elseif ( %stoptheslots != 1 ) { /msg $chan 4Slots Running by $nick $+ ... 
    .set -u20 %slotmachine1 $rand(1,2) 
    .set -u20 %slotmachine2 $rand(1,2) 
    .set -u20 %slotmachine3 $rand(1,2) 
    .set -u20 %nick $nick 
    .set -u20 %channel $chan
    .set -u11 %stoptheslots 1 
    .timer1 1 2 /msg $chan 5first number %slotmachine1  
    .timer2 1 4 /msg $chan 12The second number is %slotmachine2   
    .timer3 1 6 /msg $chan 4The third number is %slotmachine3  
    .timer4 1 8 /slot 
  } 
  else /msg $chan 4Don't overuse the commands, 4addict! 
} 
alias slot { 
  dec % $+ %nick $+ .points 1 
  if ( %slotmachine1 == %slotmachine2 ) && ( %slotmachine2 == %slotmachine3 ) && (%slotmachine1 == %slotmachine3 ) { /msg %channel 12You win with the numbers %slotmachine1 , %slotmachine2 , and %slotmachine3 , 4lucky. 
    inc % $+ %nick $+ .points 2 
    msg %channel $+ , 12you have this amount of 4Credits: % [ $+ [ %nick ] $+ ] .points 
  } 
  else { msg %channel 4Looser. Numbers %slotmachine1 , %slotmachine2 , and %slotmachine3 didn't match. 
    /timer5 1 1 /msg %channel $+ , 12you have this amount of 4Credits: % [ $+ [ %nick ] $+ ] .points 
    /set %slapbomb $rand(1,8) 
    if (%slapbomb == 1) /msg %channel 4shoots %nick in the head. 
    if (%slapbomb == 2) /msg %channel 5slaps %nick with a coconut tree. 
    if (%slapbomb == 3) /msg %channel 4kills %nick $+ . 
    if (%slapbomb == 4) /msg %channel 8throws up on %nick $+ . 
    if (%slapbomb == 5) /msg %channel 13slaps %nick around with nuclear waste. 
    if (%slapbomb == 6) /msg %channel 14sends hordes of lemmings over %nick $+ . 
    if (%slapbomb == 7) /msg %channel 7discovers %nick $+ 's picture at uglypeople.com 
    if (%slapbomb == 8) /msg %channel 4pushes %nick off a cliff. 
  } 
} 
on ^*:TEXT:!heads:#: { 
  if ( % [ $+ [ $nick ] $+ ] .points == $null ) { /set % $+ $nick $+ .points 0  } 
  if ( %stoptheslots != 1 ) { 
    /set -u8 %hedtail $rand(1,2) 
    /set -u8 %chan $chan 
    /set -u8 %nick $nick 
    /set -u8 %stoptheslots 1 
    /msg $chan 6throws up a Coin... 
    .timer 1 2 /msg $chan 6sees the coin landed with... 
    .timer 1 3 /hed 
  } 
  else msg $chan 4,0Don't overuse the commands, addict! 
} 
alias hed { 
  if ( %hedtail == 1 ) { /msg %chan 4heads! 
    /inc % [ $+ [ %nick ] $+ ] .points 1 
    .timer 1 1 /msg %chan you win! You have won % [ $+ [ %nick ] $+ ] .points  
    /halt 
  } 
  else /msg %chan 4Tails 
  /timer 1 1 /msg %chan 4sorry, you loose. Looser 
} 
on ^*:TEXT:!tails:#: { 
  if ( % [ $+ [ $nick ] $+ ] .points == $null ) { /set % $+ $nick $+ .points 0  } 
  if ( %stoptheslots != 1 ) { 
    /set -u8 %hedtail $rand(1,2) 
    /set -u8 %chan $chan 
    /set -u8 %nick $nick 
    /set -u8 %stoptheslots 1 
    /describe $chan throws up a coin... 
    .timer 1 2 /msg $chan 12sees the Coin landed with...
    .timer 1 3 /tail 
  } 
  else /msg $chan 4Don't overuse the commands, addict! 
} 
alias tail { 
  if ( %hedtail == 2 ) { /msg %chan 4tails! 
    /inc % [ $+ [ %nick ] $+ ] .points 1 
    .timer 1 1 /msg %chan 4you win! You have won % [ $+ [ %nick ] $+ ] .points credits 
    /halt 
  } 
  else /msg %chan 4Heads 
  /timer 1 1 /msg %chan 5Sorry...Sadass .. . 5Butt, you 4lose (sn) 
}