on ^*:text:*:*:{
  if ($strip($1) == !alta) {
    if ($readini(juegos.ini,juegos,$nick)) {
      msg $chan Ya estas dado de alta,12 $nick $+ ! Teclea:12 !tragaperras 
    }
    else {
      msg $chan Te has dado de alta,12 $nick $+ ! Teclea:12 !tragaperras 
      writeini juegos.ini juegos $nick 10000
    }
  }
  if ($strip($1) == !tragaperras) {
    if ($readini(juegos.ini,juegos,$nick)) {
      var %tragaperras = $rand(1,8)
      if (%tragaperras == 1) { msg $chan -12 $nick Tira de la palanca 2 + 1 + 7 = ( 10 )
        msg $chan 4Ohhh!!12 $nick Pierdes ( 123000 )
        writeini juegos.ini juegos $nick $calc($readini(juegos.ini,juegos,$nick) - 3000)
      }
      if (%tragaperras == 2) { msg $chan -12 $nick Tira de la palanca 7 + 1 + 0 = ( 8 )
        msg $chan 3Premio!!12 $nick Ganas ( 123000 )!!!
        writeini juegos.ini juegos $nick $calc($readini(juegos.ini,juegos,$nick) + 3000)
      }
      if (%tragaperras == 3) { msg $chan -12 $nick Tira de la palanca 1 + 1 + 0 = ( 2 )
        msg $chan 4Ohhh!!12 $nick Pierdes ( 125000 )
        writeini juegos.ini juegos $nick $calc($readini(juegos.ini,juegos,$nick) - 5000)
      }
      if (%tragaperras == 4) { msg $chan -12 $nick Tira de la palanca 2 + 1 + 1 = ( 4 )
        msg $chan 3Premio!!12 $nick Ganas ( 125000 ) !!!
        writeini juegos.ini juegos $nick $calc($readini(juegos.ini,juegos,$nick) + 5000)
      }
      if (%tragaperras == 5) { msg $chan -12 $nick Tira de la palanca 9 + 1 + 1 = ( 11 )
        msg $chan 4Ohhh!!12 $nick Pierdes ( 121000 )
        writeini juegos.ini juegos $nick $calc($readini(juegos.ini,juegos,$nick) - 1000)
      }
      if (%tragaperras == 6) { msg $chan -12 $nick Tira de la palanca 0 + 0 + 0 = ( 0 )
        msg $chan 3Premio!!12 $nick Ganas ( 121000 ) !!!
        writeini juegos.ini juegos $nick $calc($readini(juegos.ini,juegos,$nick) + 1000)
      }
      if (%tragaperras == 7) { msg $chan -12 $nick Tira de la palanca 1 + 1 + 1 = ( 3 )
        msg $chan 4Ohhh!!12 $nick Pierdes ( 122000 )
        writeini juegos.ini juegos $nick $calc($readini(juegos.ini,juegos,$nick) - 2000)
      }
      if (%tragaperras == 8) { msg $chan -12 $nick Tira de la palanca 7 + 1 + 2 = ( 5 )
        msg $chan 3Premio!!12 $nick Ganas ( 122000 )!!!
        writeini juegos.ini juegos $nick $calc($readini(juegos.ini,juegos,$nick) + 2000)
      }
    }
    else {
      msg $chan No estas dado de alta,12 $nick $+ ! Teclea:12 !alta 
    }
  }
  if ($strip($1) == !baja) {
    remini juegos.ini juegos $nick
    msg $chan Te has dado de baja,12 $nick $+ !
  }
  if ($strip($1) == !bote) {
    %info_bote = $readini(juegos.ini,juegos,$nick)
    if (%info_bote != $null) {
      msg $chan Bote de12 $nick $+ : $gettok(%info_bote,1,32)
    }
    else {
      msg $chan No estas dando de alta,12 $nick $+ !
    }
  }
}