summaryrefslogtreecommitdiff
path: root/npc
diff options
context:
space:
mode:
authorgepard1984 <gepard1984@54d463be-8e91-2dee-dedb-b68131a5f0ec>2012-02-28 22:28:19 +0000
committergepard1984 <gepard1984@54d463be-8e91-2dee-dedb-b68131a5f0ec>2012-02-28 22:28:19 +0000
commit3015268276e9c4cb7c8b0ae845fe4d78f9ad3c15 (patch)
treed07352d6ca45ef7a9b3d0b6bf80d707b72f033bc /npc
parent24ded364517aac045360253ad3c2fb93ffc0d109 (diff)
downloadhercules-3015268276e9c4cb7c8b0ae845fe4d78f9ad3c15.tar.gz
hercules-3015268276e9c4cb7c8b0ae845fe4d78f9ad3c15.tar.bz2
hercules-3015268276e9c4cb7c8b0ae845fe4d78f9ad3c15.tar.xz
hercules-3015268276e9c4cb7c8b0ae845fe4d78f9ad3c15.zip
Updated Apple Gambling script to official.
git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@15637 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'npc')
-rw-r--r--npc/airports/airships.txt225
1 files changed, 88 insertions, 137 deletions
diff --git a/npc/airports/airships.txt b/npc/airports/airships.txt
index 6f1e1291e..cc5730d00 100644
--- a/npc/airports/airships.txt
+++ b/npc/airports/airships.txt
@@ -7,7 +7,7 @@
//===== Description: =========================================
//= The Airship System used in the official servers.
//===== Additional Comments: =================================
-//= Official NPCs (except apple gambling function).
+//= Official NPCs.
//============================================================
//============================================================
@@ -1269,7 +1269,7 @@ function script applegamble {
next;
mes "["+getarg(0)+"]";
mes "Now, we begin with me";
- mes "rolling wto 6-sided dice.";
+ mes "rolling two 6-sided dice.";
mes "When it's your turn, you'll";
mes "roll two 6-sided dice. After";
mes "that, both of us will have the";
@@ -1319,7 +1319,7 @@ function script applegamble {
close;
}
else if (.@amount < 1 || .@amount > 50) {
- mes "[Clarice]";
+ mes "["+getarg(0)+"]";
mes "You can't bet more than";
mes "50 Apples. Remember, we";
mes "need to keep these stakes";
@@ -1360,166 +1360,117 @@ function script applegamble {
}
mes "^3355FF*Rolling and rumbling*^000000";
next;
- set .@table1,rand(1,6);
- set .@table2,rand(1,6);
- set .@tablesub,.@table1+.@table2;
+ set .@giveapple, .@amount*2;
+ set .@table1, rand(1,6);
+ set .@table2, rand(1,6);
+ set .@tablesub, .@table1 + .@table2;
+ set .@tabletotal, .@tablesub;
mes "["+getarg(0)+"]";
mes "I got a ^0000FF" + .@table1 + "^000000 and a ^0000FF" + .@table2 + "^000000.";
mes "That's a total of ^0000FF" + .@tablesub + "^000000.";
mes "^FF0000" + strcharinfo(0) + "^000000, now it's your turn.";
next;
select("Cast Dice.");
-
- mes "^0000FF*Rolling and rumbling*";
- set .@player1,rand(1,6);
- set .@player2,rand(1,6);
- set .@playersub,.@player1+.@player2;
+ mes "^3355FF*Rolling and rumbling*^000000";
+ set .@player1, rand(1,6);
+ set .@player2, rand(1,6);
+ set .@playersub, .@player1 + .@player2;
+ if (.@playersub > 9 && .@amount > 39) {
+ set .@player1, rand(1,6);
+ set .@player2, rand(1,6);
+ set .@playersub, .@player1 + .@player2;
+ }
+ set .@playertotal, .@playersub;
next;
mes "["+getarg(0)+"]";
- mes strcharinfo(0)+",";
- mes "you rolled a "+.@player1+" and a "+.@player2+",";
- mes "giving you a total of ^FF0000"+.@playersub+"^000000.";
+ mes "^FF0000" + strcharinfo(0) + "^000000, you have ^FF0000" + .@player1 + "^000000 and ^FF0000" + .@player2 + "^000000. The total is ^FF0000" + .@playersub + "^000000 .";
next;
mes "["+getarg(0)+"]";
if(.@playersub == .@tablesub) {
- mes "Well, well, well.";
- mes "Both of us have a total";
- mes "of "+.@playersub+". Well, the ball's in";
- mes "your court. Are you going";
- mes "to roll your third die,";
- mes strcharinfo(0)+"?";
- } else if(.@playersub > .@tablesub) {
- mes "Since my total is only ^0000FF"+.@tablesub+"^000000,";
- mes "you have the advantage for";
- mes "now with your total of ^FF0000"+.@playersub+"^000000. Do";
- mes "you wanna roll one more die?";
- mes "Remember, you'll bust if all three";
- mes "of your dice total more than 12.";
+ mes "Currently my total is ^0000FF" + .@tablesub + "^000000 and ^FF0000" + strcharinfo(0) + "^000000, your total is ^FF0000" + .@playersub + "^000000. We are making an even game. Would you like to cast dice again?";
+ } else if (.@playersub > .@tablesub) {
+ mes "Currently my total is ^0000FF" + .@tablesub + "^000000 and ^FF0000" + strcharinfo(0) + "^000000, your total is ^FF0000" + .@playersub + "^000000. ^FF0000" + strcharinfo(0) + "^000000, you are currently winning this game. Would you like to cast dice again?";
} else if(.@tablesub > .@playersub) {
- mes "Since my total is ^0000FF"+.@tablesub+"^000000,";
- mes "I have the advantage for";
- mes "now with your total of ^FF0000"+.@playersub+"^000000. Do";
- mes "you wanna roll one more die?";
- mes "Remember, you'll bust if all three";
- mes "of your dice total more than 12.";
+ mes "Currently my total is ^0000FF" + .@tablesub + "^000000 and ^FF0000" + strcharinfo(0) + "^000000, your total is ^FF0000" + .@playersub + "^000000. I am winning this game. Would you like to cast dice again?";
}
next;
- if(select("Roll another dice.:Don't Roll.")==2){
+ switch (select("Cast dice.:Cancel.")) {
+ case 1:
+ mes "^3355FF*Rolling and rumbling*^000000";
+ set .@player3, rand(1,6);
+ set .@playertotal, .@playertotal + .@player3;
+ next;
mes "["+getarg(0)+"]";
- mes "Not gonna roll, huh?";
- if(.@tablesub == .@playersub) {
- mes "You better hope I roll";
- mes "too high and bust, or";
- mes "I'll beat you for sure!";
- mes "Okay, here goes nothing...";
- next;
- goto L_Table3;
- } else if(.@tablesub < .@playersub) {
- next;
- mes "["+getarg(0)+"]";
- mes "Alright, I see that you";
- mes "don't want to risk rolling";
- mes "higher than 12 and busting.";
- mes "I'll go ahead and roll then.";
- next;
- goto L_Table3;
- } else if(.@tablesub > .@playersub) {
- //you have a lower sub total then table, and do not roll 3th -Improvised-
- mes "["+getarg(0)+"]";
- mes "Not gonna roll, huh?";
- mes "Well, then I'm not";
- mes "gonna roll either.";
- next;
- mes "["+getarg(0)+"]";
- mes "That means that I";
- mes "have a total of ^0000FF"+.@tablesub+"^000000";
- mes "wich beats your ^FF0000"+.@playersub+"^000000.";
- mes "I'm sorry, but you lose";
- mes "this game, "+strcharinfo(0)+". Better";
- mes "luck next time.";
+ if (.@playertotal > 12) {
+ mes "^FF0000" + strcharinfo(0) + "^000000, you got ^FF0000" + .@player3 + "^000000 and the total is now ^FF0000" + .@playertotal + "^000000. You lost this game. I am sorry but please try again.";
+ close;
}
- close;
- }
- mes "^0000FF*Rolling and rumbling*";
- set .@player3,rand(1,6);
- set .@playersub,.@playersub+.@player3;
- if(.@playersub > 12) {
- //player bust --Improvised--
- next;
+ else if (.@playertotal < .@tablesub) {
+ mes "^FF0000" + strcharinfo(0) + "^000000, you got ^FF0000" + .@player3 + "^000000 and the total is now ^FF0000" + .@playertotal + "^000000. Even though you casted dice again, still your total is smaller than mine. You lost the game. I am sorry and please try again.";
+ close;
+ }
+ else if (.@playertotal == .@tablesub) {
+ if (.@tablesub > 8) {
+ mes "^FF0000" + strcharinfo(0) + "^000000, you got ^FF0000" + .@player3 + "^000000 and the total is now ^FF0000" + .@playertotal + "^000000. I don't want to take any risk, let's end this game in a draw. Let's play again some other time~";
+ close2;
+ getitem 512,.@amount; //Apple
+ end;
+ }
+ }
+ else {
+ mes "^FF0000" + strcharinfo(0) + "^000000, you got ^FF0000" + .@player3 + "^000000 and the total is now ^FF0000" + .@playertotal + "^000000. Now it is my turn.";
+ }
+ break;
+ case 2:
mes "["+getarg(0)+"]";
- mes "Oh my... You rolled a ^FF000"+.@player3+"^000000,";
- mes "making your total ^FF0000"+.@playersub+"^000000.";
- mes "That's more then 12, meaning you bust.";
- mes "Sorry, but you lose this";
- mes "game, "+strcharinfo(0)+".";
- close;
+ if (.@playersub > .@tablesub) {
+ mes "I see, you don't want to take risk of losing the game. Okay, let me cast dice again.";
+ }
+ else if (.@playersub == .@tablesub) {
+ if (.@tablesub > 8) {
+ mes "I see, you don't want to take risk of losing this game. Neither do I, let's end this game in a draw. Let's play again some other time~";
+ close2;
+ getitem 512,.@amount; //Apple
+ end;
+ }
+ mes "Alright.";
+ mes "Let me cast the dice again.";
+ }
+ else {
+ mes "It couldn't hurt to try.";
+ mes "Well, I win this time.";
+ mes "I'm sorry, let's try play";
+ mes "again sometime.";
+ close;
+ }
+ break;
}
next;
- mes "["+getarg(0)+"]";
- mes "Oh hey! You rolled";
- if(.@playersub >= .@tablesub) {
- mes "a ^FF0000"+.@player3+"^000000, giving you a total";
- mes "of ^FF0000"+.@playersub+"^000000. Now, if I don't";
- mes "roll, I'll lose for sure!";
- mes "I'm gonna go for it...";
- next;
- goto L_Table3;
- } else if(.@playersub < .@tablesub) {
- //player's sub together with 3th die is still too low
- //--Improvised--
- mes "a ^FF0000"+.@player3+"^000000, giving";
- mes "you a total of ^FF0000"+.@playersub+"^000000.";
- mes "Wich still isn't enough";
- mes "to beat my ^0000FF"+.@tablesub+"^000000.";
- mes "Sorry, but you lose this";
- mes "game, "+strcharinfo(0)+". Them's";
- mes "the breaks, I suppose...";
- close;
- }
-L_Table3:
- mes "^0000FF*Rolling and rumbling*";
- set .@table3,rand(1,6);
- set .@tablesub,.@tablesub+.@table3;
+ mes "^3355FF*Rolling and rumbling*^000000";
+ set .@table3, rand(1,6);
+ set .@tabletotal, .@tabletotal + .@table3;
next;
- if(.@tablesub > 12) {
- mes "["+getarg(0)+"]";
- mes "Eh? I rolled a ^0000FF"+.@table3+"^000000, making";
- mes "my total ^0000FF"+.@tablesub+"^000000. I hate to say";
- mes "it, but I gambled and lost.";
- mes "Take your winnings before";
- mes "I cry, "+strcharinfo(0)+"~!";
+ mes "["+getarg(0)+"]";
+ if (.@tabletotal > 12) {
+ mes "I got ^0000FF" + .@table3 + "^000000 and the total is now ^0000FF" + .@tabletotal + "^000000. I lost this game since my total exceeded 12. Let me give you my apples. Congratulations, that was a great game.";
close2;
- getitem 512,.@amount*2;
+ getitem 512,.@giveapple; //Apple
end;
}
- mes "["+getarg(0)+"]";
- if(.@tablesub < .@playersub) {
- mes "I rolled a "+.@table3+", which";
- mes "gives me a total of ^0000FF"+.@tablesub+"^000000.";
- mes "But... It's still not enough";
- mes "to beat your ^FF0000"+.@playersub+"^000000. It looks";
- mes "like I can't compete with";
- mes "you, "+strcharinfo(0)+"...";
+ else if (.@playertotal > .@tabletotal) {
+ mes "I got ^0000FF" + .@table3 + "^000000 and the total is now ^0000FF" + .@tabletotal + "^000000. With total ^FF0000" + .@playertotal + "^000000 you won this game, ^FF0000" + strcharinfo(0) + "^000000. Let me give you my apples. It was a great game and I hope we will play again some other time.";
close2;
- getitem 512,.@amount*2;
+ getitem 512,.@giveapple; //Apple
end;
- } else if(.@tablesub > .@playersub) {
- mes "I rolled a ^0000FF"+.@table3+"^000000, giving";
- mes "me a total of ^0000FF"+.@tablesub+"^000000 which";
- mes "beats your total of ^FF0000"+.@playersub+"^000000.";
- mes "Sorry, but you lose this";
- mes "game, "+strcharinfo(0)+". Them's";
- mes "the breaks, I suppose...";
- close;
- } else if(.@tablesub == .@playersub) {
- //Result = tie, --Improvised--
- mes "I rolled a ^0000FF"+.@table3+"^000000, giving";
- mes "me a total of ^0000FF"+.@tablesub+"^000000, which";
- mes "is the same as your total.";
- mes "Well, this game didn't have a";
- mes "winner or loser, "+strcharinfo(0)+".";
+ }
+ else if (.@playertotal == .@tabletotal) {
+ mes "I got ^0000FF" + .@table3 + "^000000 and the total is now ^0000FF" + .@tabletotal + "^000000. With total ^FF0000" + .@playertotal + "^000000 this game came out even, ^FF0000" + strcharinfo(0) + "^000000. Let me give you your apple back. It was a great game and I hope we will play again some other time.";
close2;
- getitem 512,.@amount;
+ getitem 512,.@amount; //Apple
end;
}
+ else if (.@playertotal < .@tabletotal) {
+ mes "I got ^0000FF" + .@table3 + "^000000 and the total is now ^0000FF" + .@tabletotal + "^000000. With total ^FF0000" + .@playertotal + "^000000 you lost this game, ^FF0000" + strcharinfo(0) + "^000000. I am sorry but please try again.";
+ close;
+ }
}