summaryrefslogtreecommitdiff
path: root/npc/017-3/gambler.txt
diff options
context:
space:
mode:
authorJesusaves <cpntb1@ymail.com>2020-09-06 14:20:48 -0300
committerJesusaves <cpntb1@ymail.com>2020-09-06 14:20:48 -0300
commit7410ebae074e98a1376c5b95b752625d510a69ee (patch)
tree27f804d0ef4804c2cb8295f63aca1c8c38c8cf21 /npc/017-3/gambler.txt
parent71959725e7b8de3fde20a9438667aa24c2a00e6a (diff)
downloadserverdata-7410ebae074e98a1376c5b95b752625d510a69ee.tar.gz
serverdata-7410ebae074e98a1376c5b95b752625d510a69ee.tar.bz2
serverdata-7410ebae074e98a1376c5b95b752625d510a69ee.tar.xz
serverdata-7410ebae074e98a1376c5b95b752625d510a69ee.zip
LoF Gambler - Sequence
Diffstat (limited to 'npc/017-3/gambler.txt')
-rw-r--r--npc/017-3/gambler.txt163
1 files changed, 163 insertions, 0 deletions
diff --git a/npc/017-3/gambler.txt b/npc/017-3/gambler.txt
new file mode 100644
index 000000000..5f914ea7a
--- /dev/null
+++ b/npc/017-3/gambler.txt
@@ -0,0 +1,163 @@
+// TMW2 Scripts
+// Author:
+// Jesusalva
+// Description:
+// Gambler: Can you remember the sequence?
+
+017-3,23,38,0 script Gambler#017-3 NPC_PLAYER,{
+ function colorname {
+ switch (getarg(0)) {
+ case 1:
+ return "Green"; break;
+ case 2:
+ return "Blue"; break;
+ case 3:
+ return "Red"; break;
+ case 4:
+ return "Yellow"; break;
+ case 5:
+ return "Exit"; break;
+ default:
+ return l("ERROR: %d", getarg(0));
+ }
+ }
+
+ goto L_Menu;
+
+L_Menu:
+ showavatar NPC_FLOPPED_NOBLEMAN;
+ mesn;
+ mesc l("Gambling is for the weak, I offer you a true game!");
+ mesc l("You need %d %s. I'll start showing you sequences of colors.", .price, getitemlink(CasinoCoins));
+ mesc l("The farther you go on the sequence, the better the payout!");
+ next;
+ menu
+ rif(countitem(CasinoCoins) >= .price, l("Let's play!")), L_Start,
+ l("Information"), L_Info,
+ l("Leave"), -;
+ close;
+
+L_Info:
+ mes "";
+ mesc l("Rules:");
+ mesc l("A color sequence will be displayed on the avatar frame.");
+ mesc l("You must then repeat the sequence at the board which will show.");
+ next;
+ mesc l("Prizes:");
+ mesc l("You'll get %d GP every time you finish the sequence.", .prize);
+ next;
+ mesc l("Winning Strike Prizes:");
+ mesc l("Every %d sequences, you'll get a %s!", 10, getitemlink(StrangeCoin));
+ mesc l("If you get %d sequence, you'll get a %s!", 30, getitemlink(BronzeGift));
+ mesc l("If you get %d sequence, you'll get a %s!", 50, getitemlink(SilverGift));
+ //mesc l("If you get %d sequence, you'll get a %s!", 50, getitemlink(GoldenGift));
+ next;
+ goto L_Menu;
+
+
+L_Start:
+ showavatar AVATAR_SEQBOARD;
+ mesc l("Pay attention to the sequence!");
+ next;
+ delitem CasinoCoins, .price;
+ deletearray(@sequence);
+ @streak=0;
+
+L_Sequence:
+ // Configure
+ setnpcdialogtitle l("Memorize the sequence!");
+ array_push(@sequence, 1+rand2(4));
+ sleep2(1000);
+
+ // Display
+ freeloop(true);
+ for (.@i=0;.@i < getarraysize(@sequence);.@i++) {
+ showavatar 1200+@sequence[.@i];
+ sleep2(1200-(@streak*20));
+ }
+ freeloop(false);
+
+ // Request
+ setnpcdialogtitle l("What was the sequence?");
+ showavatar AVATAR_SEQBOARD;
+ sleep2(500);
+
+ for (.@i=0;.@i < getarraysize(@sequence);.@i++) {
+ setskin "seqboard";
+ select
+ l("Green"),
+ l("Blue"),
+ l("Red"),
+ l("Yellow"),
+ l("Exit");
+ .@ans=@menu;
+ setskin "";
+ mes "";
+ mes l("%s", colorname(.@ans));
+ //next;
+ setnpcdialogtitle strnpcinfo(1);
+
+ // Exit
+ if (.@ans == 5)
+ goto L_Close;
+
+ // Wrong reply
+ if (.@ans != @sequence[.@i])
+ goto L_Wrong;
+ // Correct!
+ }
+ mes "";
+
+ // Seems like everything is/was correct
+ mesn;
+ mesq l("Congratulations! Everything was correct!");
+ Zeny+=.prize;
+ @streak+=1;
+
+ // Winning Streak
+ if (@streak % 10 == 0)
+ getitem StrangeCoin, 1;
+ if (@streak == 30)
+ getitem BronzeGift, 1;
+ if (@streak == 50)
+ getitem SilverGift, 1;
+ mesc l("Your current win streak is @@!", @streak);
+ next;
+ // Game over
+ if (@streak == 50)
+ goto L_Close;
+ // Otherwise, go ahead
+ mesn;
+ mesc l("Continue?"), 1;
+ next;
+ if (askyesno() == ASK_YES)
+ goto L_Sequence;
+ goto L_Close;
+
+L_Wrong:
+ mesn;
+ mesq l("Oh no... That is wrong! %%3");
+ next;
+ mesn;
+ mesq l("Better luck next time!");
+ close;
+
+L_Close:
+ mesn;
+ mesq l("Thanks for playing!");
+ close;
+
+OnInit:
+ .@npcId = getnpcid(.name$);
+ setunitdata(.@npcId, UDT_HEADTOP, TopHat);
+ setunitdata(.@npcId, UDT_HEADMIDDLE, CreasedShirt);
+ setunitdata(.@npcId, UDT_HEADBOTTOM, JeansShorts);
+
+ .sex = G_MALE;
+ .distance = 4;
+ .price = 5;
+ .prize = 50;
+ npcsit;
+ end;
+}
+