Craps Bot: Use Craps <amnt to bet> , Ex:
Craps 1000 ; Then To Start With Gettin Money Type `money ;if you have money in the .ini file then it will not allow you to get anymore money. Have Fun!
on *:LOAD: { set %c ` | halt }
on *:TEXT:*Craps*:*: {
var %R = $rand(1,6) | var %C = $rand(1,6)
var %T = $Calc(%R + %C)
if ($1 = %c $+ Craps) {
if ($2 = $null) { notice $nick No Money Was Bet, Please Bet Money With Your Craps, No Freebies xD | halt }
if ($2 != $null) && ($readini(Money.ini,$nick,Money) >= $2) {
writeini Bet.ini $nick Bet $2
msg $chan ( $+ $nick $+ ) Rolled Two Dice For Craps: Results; ( $+ %R $+ | $+ %C $+ )
msg $chan Dice Roll Total; ( $+ %T $+ )
}
if ($2 != $null) && ($readini(Money.ini,$nick,Money) <= $2) { notice $Nick You Dont Have Enough Money To Place This Bet! Bet Lower, Type %c $+ Info To View Money That You Have. | halt }
if (%T = 7) || (%T = 11) {
msg $chan $upper(( $+ $nick $+ )) GOT CRAPS!! w00t w00t!!!
var %Bet = $readini(Bet.ini,$nick,Bet)
var %Current = $readini(Money.ini,$nick,Money)
var %TotalWin = $Calc(%bet + %Current)
remini Money.ini $nick Money
remini Bet.ini $nick Bet
writeini Money.ini $Nick Money %totalwin
msg $chan ( $+ $nick $+ ) Now Has $readini(Money.ini,$nick,Money)
halt
}
else {
msg $chan ( $+ $Nick $+ ) Didnt Get Craps
var %Bet = $readini(Bet.ini,$nick,Bet)
var %Current = $readini(Money.ini,$nick,Money)
var %TotalLoss = $Calc%Current = %bet)
remini Money.ini $nick Money
remini Bet.ini $nick Bet
writeini Money.ini $Nick Money %TotalLoss
msg $chan ( $+ $Nick $+ ) Now Has $readini(Money.ini,$nick,Money)
}
}
}
on *:TEXT:*money*:*: {
if ($1 = %c $+ money) {
if ($readini(Money.ini,$nick,Money) = 0) { remini Money.ini $nick Money | halt }
if ($readini(Money.ini,$nick,Money) = $null) {
writeini Money.ini $nick Money
msg $chan ( $+ $Nick $+ ) Now Has 1000 Dollars | halt
}
}
}
on *:TEXT:*Info*:*: {
if ($1 = %c $+ Info) {
if ($2 = $null) {
msg $chan $nick Has $readini(Money.ini,$nick,Money) Dollars
halt
}
if ($2 != $null) {
msg $chan $2 Has $readini(Money.ini,$2,money) Dollars
halt
}
if ($readini(Money.ini,$nick,Money) = $null) { msg $chan $nick Has No Money, Use %c $+ Money To Get some | halt }
if ($readini(Money.ini,$2,Money) = $null) { msg $chan $2 has No Money, Use %c $+ Money To Get some | halt }
}
}