@Emistry
I was able to get it working! Thank you very much!
moc_para01,102,20,2 script Dice Dealer 57,{
set .itemid, 7179;
set .MaxDiceBet,30000;
mes "[Dyceman]";
mes "We each roll two dice and the highest total wins. I will match however much money you put in.";
goto DiceStart;
close;
DiceStart:
next;
if(select("Lets throw some dice!:Not wasting a zeny!")==2) {
mes "[Dyceman]";
mes "Please come again!";
close;
}
mes "[Dyceman]";
mes "How much Proof of Donations would you like to bet?";
switch(prompt(
"50 Proof of Donations",
"100 Proof of Donations",
"200 Proof of Donations",
"Custom Amount"
)) {
case 1:
set .@BetAmount,50;
break;
case 2:
set .@BetAmount,100;
break;
case 3:
set .@BetAmount,200;
break;
case 4:
input .@BetInput;
if(.@BetInput < 1 || .@BetInput > .MaxDiceBet) {
next;
mes "[Dyceman]";
mes "You must enter a number between ^FF00001^000000 and ^FF0000"+.MaxDiceBet+" Proof of Donations^000000.";
goto DiceStart;
close;
}
set .@BetAmount,.@BetInput;
next;
mes "[Dyceman]";
mes "You bet ^008800"+.@BetAmount+" Proof of Donations^000000!";
break;
default:
case 255:
mes "[Dyceman]";
mes "Please come again!";
close;
}
next;
mes "[Dyceman]";
if(countitem(.itemid) < .@BetAmount) {
mes "You you don't have enough Proof of Donations to make that bet!";
close;
}
delitem .itemid, .@BetAmount;
set trustfundbalance, trustfundbalance + (.@BetAmount / 100);
mes "The dice have been thrown...";
next;
set .@DiceRoll,rand(1,3);
if(.@DiceRoll==1) { mes "roll..."; }
if(.@DiceRoll==2) { mes "roll... roll..."; }
if(.@DiceRoll==3) { mes "roll... roll... roll..."; }
next;
set .@DiceRoll,rand(1,3);
if(.@DiceRoll==1) { mes "roll..."; }
if(.@DiceRoll==2) { mes "roll... roll..."; }
if(.@DiceRoll==3) { mes "roll... roll... roll..."; }
next;
set .@DiceRoll,rand(1,3);
if(.@DiceRoll==1) { mes "roll..."; }
if(.@DiceRoll==2) { mes "roll... roll..."; }
if(.@DiceRoll==3) { mes "roll... roll... roll..."; }
set .@diceroll1a,rand(1,6);
set .@diceroll1b,rand(1,6);
set .@dice1numtotal,(.@diceroll1a+.@diceroll1b);
set .@diceroll2a,rand(1,6);
set .@diceroll2b,rand(1,6);
set .@dice2numtotal,(.@diceroll2a+.@diceroll2b);
next;
mes "[Dyceman]";
mes "You rolled a ^0000FF"+.@diceroll2a+"^000000 and ^0000FF"+.@diceroll2b+"^000000!";
mes " ";
mes "I rolled a ^0000FF"+.@diceroll1a+"^000000 and ^0000FF"+.@diceroll1b+"^000000!";
next;
mes "[Dyceman]";
if(.@dice1numtotal>.@dice2numtotal) {
mes "My ^0000FF"+.@dice1numtotal+"^000000 beats your ^0000FF"+.@dice2numtotal+"^000000!";
next;
mes "[Dyceman]";
mes "I win, your ^008800"+.@BetAmount+"z^000000 is mine!";
}
else if(.@dice1numtotal<.@dice2numtotal) {
mes "Your ^0000FF"+.@dice2numtotal+"^000000 beats my ^0000FF"+.@dice1numtotal+"^000000!";
getitem .itemid, (.@BetAmount * 2);
next;
mes "[Dyceman]";
mes "You won ^008800"+(.@BetAmount*2)+"z^000000. I will get your Proof of Donations next time!";
}
else if(.@dice1numtotal==.@dice2numtotal) {
mes "Draw, let's play again!";
getitem .itemid, .@BetAmount;
set trustfundbalance,trustfundbalance - ( .@BetAmount / 100);
goto DiceStart;
}
close;
}
