summaryrefslogtreecommitdiff
path: root/npc
diff options
context:
space:
mode:
Diffstat (limited to 'npc')
-rw-r--r--npc/020-4/_import.txt1
-rw-r--r--npc/020-4/gambler.txt146
2 files changed, 147 insertions, 0 deletions
diff --git a/npc/020-4/_import.txt b/npc/020-4/_import.txt
index ba4afe111..404082ea8 100644
--- a/npc/020-4/_import.txt
+++ b/npc/020-4/_import.txt
@@ -1,3 +1,4 @@
// Map 020-4: Nivalis Indoors
// This file is generated automatically. All manually added changes will be removed when running the Converter.
"npc/020-4/_warps.txt",
+"npc/020-4/gambler.txt",
diff --git a/npc/020-4/gambler.txt b/npc/020-4/gambler.txt
new file mode 100644
index 000000000..865ee9f37
--- /dev/null
+++ b/npc/020-4/gambler.txt
@@ -0,0 +1,146 @@
+// TMW2 Scripts
+// Author:
+// Jesusalva
+// Description:
+// Gambler: Will next card be better or worse?
+// $XAN_BETS: How many victories all players already had (for propaganda :3)
+
+020-4,69,35,0 script Gambler#020-4 NPC_FLOPPED_NOBLEMAN,{
+ function cardname{
+ switch (getarg(0)) {
+ case 0:
+ return "A"; break;
+ case 10:
+ return "J"; break;
+ case 11:
+ return "Q"; break;
+ case 12:
+ return "K"; break;
+ case 13:
+ return l("Joker"); break;
+ default:
+ return getarg(0);
+ }
+ }
+
+ goto L_Menu;
+
+L_Menu:
+ showavatar;
+ mesn;
+ mesc l("Hey, I am flopped. Do you want to gamble?");
+ mesc l("You need a @@. I'll flip one card, and you'll need to decide if next draw will be HIGHER or LOWER.", getitemlink(CasinoCoins));
+ mesc l("If a tie happens, I'll give your coin back.");
+ next;
+ menu
+ rif(countitem(CasinoCoins) >= 1, l("Let's play!")), L_Spin,
+ l("Information"), L_Info,
+ l("Leave"), L_Quit;
+
+L_Info:
+ mes "";
+ mesc l("Rules:");
+ mesc l("A card will be flipped, you'll need to decide if next flip will be HIGHER or LOWER.");
+ mesc l("Cards are ranked on this priority: @@", "A - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 - 10 - J - Q - K - Joker");
+ next;
+ mesc l("Prizes:");
+ mesc l("If you're right, you'll get 80 GP!");
+ mesc l("If a tie happens, you'll get your coin back.");
+ mesc l("If you're wrong, your winning streak is reset.");
+ mesc l("Winning Streak is also reset on logout or when you leave the Inn.");
+ next;
+ mesc l("Winning Strike Prizes:");
+ mesc l("Every seven successive right guesses, you'll get a @@!", getitemlink(StrangeCoin));
+ mesc l("Every fifteen successive right guesses, you'll get a @@!", getitemlink(BronzeGift));
+ mesc l("Every fifty successive right guesses, you'll get a @@!", getitemlink(SilverGift));
+ mesc l("Every 101 successive right guesses, you'll get a @@!", getitemlink(GoldenGift));
+ next;
+ goto L_Menu;
+
+
+L_Spin:
+ showavatar AVATAR_CARD_COVER;
+ mesc l("I'll draw a card now!");
+ next;
+ delitem CasinoCoins, 1;
+ // First card will never be an edge card (Ace or Joker), so you can ALWAYS guess wrong.
+ .@card1=rand(1, 12);
+ showavatar 1000+.@card1;
+ mesn;
+ mesc l("It's a @@!", cardname(.@card1));
+ mesc l("Will next draw be HIGHER or LOWER?!");
+ mesc l("Cards are ranked on this priority: @@", "A - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 - 10 - J - Q - K - Joker");
+ next;
+ select
+ l("HIGHER!"),
+ l("LOWER!");
+ mes "";
+
+ // Flip Flop!
+ .@card2=rand(0, 13);
+ showavatar 1000+.@card2;
+ mesn;
+ mesc l("It's a @@!", cardname(.@card2));
+
+ if (.@card1 == .@card2) {
+ mesc l("It's a tie!");
+ getitem CasinoCoins, 1;
+ .@bypass=1;
+ } else if (.@card1 < .@card2 && @menu == 2) {
+ mesc l("It's lower! That's right!");
+ Zeny=Zeny+80;
+ @gambler_winstreak=@gambler_winstreak+1;
+ } else if (.@card1 > .@card2 && @menu == 1) {
+ mesc l("It's higher! That's right!");
+ Zeny=Zeny+80;
+ @gambler_winstreak=@gambler_winstreak+1;
+ } else {
+ mesc l("You were wrong!");
+ @gambler_winstreak=0;
+ }
+
+ // Winning Streak
+ if (!.@bypass && @gambler_winstreak) {
+ if (@gambler_winstreak % 7 == 0)
+ getitem StrangeCoin, 1;
+ if (@gambler_winstreak % 15 == 0)
+ getitem BronzeGift, 1;
+ if (@gambler_winstreak % 50 == 0)
+ getitem SilverGift, 1;
+ if (@gambler_winstreak % 101 == 0)
+ getitem GoldenGift, 1;
+ mesc l("Your current win streak is @@!", @gambler_winstreak);
+ $XAN_BETS=$XAN_BETS+1;
+ } else {
+ .@bypass=0;
+ }
+ next;
+ goto L_Menu;
+
+L_Quit:
+ close;
+
+OnInit:
+ .sex = G_MALE;
+ .distance = 4;
+ end;
+
+}
+
+
+// Random NPC
+020-4,70,36,4 script Gambling Xan NPC_PLAYER,{
+ mesn;
+ mesq l("Argh... I can never get it right! If only he drew an Ace or a Joker on the first draw... But he never does that!");
+ next;
+ mesn;
+ mesq l("That rat... I already spent @@ @@ with him!!", $XAN_BETS, getitemlink(CasinoCoins));
+ mes l("If I weren't tempted to try again everytime someone gets it right...");
+ close;
+
+OnInit:
+ .sex = G_MALE;
+ .distance = 4;
+ npcsit;
+ end;
+}