ON !*:TEXT:*tipped wheeloffortune*:#: {
tokenize 32 $strip($1-,burci)
if ($nick == Matylda) {
if (*tipped wheeloffortune* iswm $1-) {
set %amounttipped $4
if (%amounttipped > 5) { msg # Sorry, 5 is the limit. (Silently Returned) | msg # !tip $1 %amounttipped | HALT }
set %randvar $rand(1,4)
if (%randvar == 1) { notice $1 such lands on x1! IF you need help just use command !wheel | set %amountgotten %amounttipped * 1 | msg # !tip $1 %amountgotten }
if (%randvar == 2) { notice $1 many sads landed BANKRUPT! }
if (%randvar == 3) { notice $1 such lands on x2 ! IF you need help just use command !wheel | set %amountgotten %amounttipped * 2 | msg # !tip $1 %amountgotten }
if (%randvar == 4) { notice $1 many sads landed BANKRUPT! }
}
elseif (*tipped instascratch* iswm $1-) {
set %amounttipped $4
if (%amounttipped > 5) { msg # Sorry, 5 is the limit. (Silently Returned) | msg # !tip $1 %amounttipped | HALT }
set %randvar $rand(1,14)
if (%randvar == 1) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 0,6 WIN - 1,0 LOSE - 1,0 LOSE | HALT }
if (%randvar == 2) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 1,0 LOSE - 0,6 WIN - 1,0 LOSE | HALT }
if (%randvar == 3) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 0,6 WIN - 0,6 WIN - 0,6 WIN | set %amountgotten %amounttipped * 2 | msg # !tip $1 %amountgotten | HALT }
if (%randvar == 4) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 0,1 JACKPOT - 1,0 LOSE - 1,0 LOSE | HALT }
if (%randvar == 5) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 0,6 WIN - 0,6 WIN - 0,6 WIN | set %amountgotten %amounttipped * 2 | msg # !tip $1 %amountgotten | HALT }
if (%randvar == 6) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 1,0 LOSE - 1,0 LOSE - 0,1 JACKPOT | HALT }
if (%randvar == 7) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 0,1 JACKPOT - 0,6 WIN - 0,1 JACKPOT | HALT }
if (%randvar == 8) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 0,6 WIN - 0,6 WIN - 0,6 WIN | set %amountgotten %amounttipped * 2 | msg # !tip $1 %amountgotten | HALT }
if (%randvar == 9) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 1,0 LOSE - 0,1 JACKPOT - 0,1 JACKPOT | HALT }
if (%randvar == 10) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 0,1 JACKPOT - 1,0 LOSE - 0,1 JACKPOT | HALT }
if (%randvar == 11) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 1,0 LOSE - 1,0 LOSE - 0,1 JACKPOT | HALT }
if (%randvar == 12) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 1,0 LOSE - 1,0 LOSE - 0,1 JACKPOT | HALT }
if (%randvar == 13) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 1,0 LOSE - 0,6 WIN - 1,0 LOSE | HALT }
if (%randvar == 14) { notice $1 Scratching... (all three MUST MATCH TO WIN) | notice $1 0,1 JACKPOT - 0,1 JACKPOT - 0,1 JACKPOT | set %amountgotten %amounttipped * 2 | msg # !tip $1 %amountgotten | HALT }
}
elseif (*tipped trueslots* iswm $1-) {
set %amounttipped $4
if (%amounttipped > 5) { msg # Sorry, 5 is the limit. (Silently Returned) | msg # !tip $1 %amounttipped | HALT }
var %symbol.0 9,1 Ɖ
var %symbol.1 0,6plum
var %symbol.2 0,1Bar
var %symbol.3 0,4cherry
var %symbol.4 0,7orange
var %symbol.5 1,8lemon
var %symbol.6 11,4buzz
var %symbol.7 4,12 7
var %symbol.8 1,0 A
var %slot1 %symbol. [ $+ [ $rand(0,8) ] ]
var %slot2 %symbol. [ $+ [ $rand(0,8) ] ]
var %slot3 %symbol. [ $+ [ $rand(0,8) ] ]
notice $1 %slot1 %slot2 %slot3
if (%slot1 == %slot2) && (%slot1 == %slot3) {
msg # 3!!!4W7E 4H7A4V7E4 A7 W4I7N4N7E4R3!!!
msg # !tip $1 100
}
}
elseif (*has tipped you* iswm $1-) {
set %amounttipped $4
if (%amounttipped > 5) { msg # Sorry, 5 is the limit. (Silently Returned) | msg # !tip $2 %amounttipped | HALT }
var %symbol.0 9,1 ☠
var %symbol.1 0,6 ☺
var %symbol.2 0,1 ★
var %symbol.3 0,4 ✠
var %symbol.4 0,7 ❤
var %symbol.5 1,8 ☯
var %symbol.6 11,4 ♛
var %symbol.7 4,12 ☬
var %symbol.8 1,0 ツ
var %slot1 %symbol. [ $+ [ $rand(0,8) ] ]
var %slot2 %symbol. [ $+ [ $rand(0,8) ] ]
var %slot3 %symbol. [ $+ [ $rand(0,8) ] ]
notice $2 %slot1 %slot2 %slot3
if (%slot1 == %slot2) && (%slot1 == %slot3) {
msg # 3!!!4W7E 4H7A4V7E4 A7 W4I7N4N7E4R3!!!
msg # Way to GO $2!!! You have just won the jar containing 100!!)
msg # !tip $2 100
msg # 3!!!4W7E 4H7A4V7E4 A7 W4I7N4N7E4R3!!!
}
}
}
}
