Someone

----------------- Slots -----------------

on *:text:!slots:#:{
  if (%casino.log. [ $+ [ $nick ] ] == $null) {
    notice $nick 12Sorry, but you need to be logged into the Casino to play games. Login: "4/notice $me clog Password12".
    halt
  }
  else {
    if (%casino.cash. [ $+ [ $nick ] ] == 0 || %casino.cash. [ $+ [ $nick ] ] == $null) {
      notice $nick 12You don't have any money left! Type "4!cbroke12" to earn some cash.
    }
    else {
      if (%casino.timer. [ $+ [ $nick ] ] == on) {
        casinotimeron
      }
      else {
        if (%casino.cash. [ $+ [ $nick ] ] < 2) {
          notice $nick 12Sorry, but you do not have enough cash points to play this game. You currently have4 %casino.cash. [ $+ [ $nick ] ] 12cash points and need4 2 12to play this game.
        }
        else {
          casinotimer
          set %casino.slots.1. [ $+ [ $nick ] ] $read(cslots.txt)
          set %casino.slots.2. [ $+ [ $nick ] ] $read(cslots.txt)
          set %casino.slots.3. [ $+ [ $nick ] ] $read(cslots.txt)
          aliasslotpick
} } } } }

alias aliasslotpick {
  if (%casino.slots.1. [ $+ [ $nick ] ] == %casino.slots.2. [ $+ [ $nick ] ] && %casino.slots.1. [ $+ [ $nick ] ] == %casino.slots.3. [ $+ [ $nick ] ]) {
    casinoslotst
  }
  else {
    if (%casino.slots.1. [ $+ [ $nick ] ] == %casino.slots.2. [ $+ [ $nick ] ]) {
      casinoslotsd
    }
    else {
      if (%casino.slots.1. [ $+ [ $nick ] ] == %casino.slots.3. [ $+ [ $nick ] ]) {
        casinoslotsd
      }
      else {
        if (%casino.slots.2. [ $+ [ $nick ] ] == %casino.slots.3. [ $+ [ $nick ] ]) {
          casinoslotsd
        }
        else {
          if (%casino.slots.1. [ $+ [ $nick ] ] != %casino.slots.2. [ $+ [ $nick ] ]) && (%casino.slots.1. [ $+ [ $nick ] ] != %casino.slots.3. [ $+ [ $nick ] ]) {
            casinoslotsn
} } } } } }
alias casinoslotsn {
  set %casino.cash. [ $+ [ $nick ] ] $calc( %casino.cash. [ $+ [ $nick ] ] - 2 )
  notice $nick 12You pulled the slots machine and got: 1[ $r(1,10)  [ $+ [ $nick ] ] 1] [ $r(1,10)  [ $+ [ $nick ] ] 1] [ $r(1,10)  [ $+ [ $nick ] ] 1]
  notice $nick 12Sorry, but you did not get 4any12 matches and have won4 0 12cash points. You know have4 %casino.cash. [ $+ [ $nick ] ] 12cash points.
  unset %casino.slots.1. [ $+ [ $nick ] ]
  unset %casino.slots.2. [ $+ [ $nick ] ]
  unset %casino.slots.3. [ $+ [ $nick ] ]
}
alias casinoslotsd {
  inc %casino.cash. [ $+ [ $nick ] ] 10
  notice $nick 12You pulled the slots machine and got: 1[ %casino.slots.1. [ $+ [ $nick ] ] 1] [ %casino.slots.2. [ $+ [ $nick ] ] 1] [ %casino.slots.3. [ $+ [ $nick ] ] 1]
  notice $nick 4Congratulations! 12You have gotten a 4double match 12and have won4 10 12cash points! You know have4 %casino.cash. [ $+ [ $nick ] ] 12cash points.
  unset %casino.slots.1. [ $+ [ $nick ] ]
  unset %casino.slots.2. [ $+ [ $nick ] ]
  unset %casino.slots.3. [ $+ [ $nick ] ]
}
alias casinoslotst {
  inc %casino.cash. [ $+ [ $nick ] ] 30
  notice $nick 12You pulled the slots machine and got: 1[ $r(1,10)  [ $+ [ $nick ] ] 1] [ $r(1,10)  [ $+ [ $nick ] ] 1] [ $r(1,10)  [ $+ [ $nick ] ] 1]
  notice $nick 4Congratulations! 12You have gotten a 4triple match 12and have won4 30 12cash points! You know have4 %casino.cash. [ $+ [ $nick ] ] 12cash points.
  unset %casino.slots.1. [ $+ [ $nick ] ]
  unset %casino.slots.2. [ $+ [ $nick ] ]
  unset %casino.slots.3. [ $+ [ $nick ] ]
}