diff options
| -rw-r--r-- | db/constants.conf | 4 | ||||
| -rw-r--r-- | npc/017-3/_import.txt | 1 | ||||
| -rw-r--r-- | npc/017-3/gambler.txt | 163 |
3 files changed, 168 insertions, 0 deletions
diff --git a/db/constants.conf b/db/constants.conf index eadd93069..5b564ef61 100644 --- a/db/constants.conf +++ b/db/constants.conf @@ -1961,6 +1961,10 @@ constants_db: { AVATAR_CARD_JOKER: 1013 AVATAR_CARD_COVER: 1015 + AVATAR_SEQBOARD: 1200 + AVATAR_SEQBOARD_FAIL: 1205 + AVATAR_SEQBOARD_WELL: 1206 + comment__: "special npcs" NPC_EMPTY: -1 NPC_WARP: 45 diff --git a/npc/017-3/_import.txt b/npc/017-3/_import.txt index 6d9b59e77..8028fb04d 100644 --- a/npc/017-3/_import.txt +++ b/npc/017-3/_import.txt @@ -6,6 +6,7 @@ "npc/017-3/dimonds.txt", "npc/017-3/doctor.txt", "npc/017-3/doug.txt", +"npc/017-3/gambler.txt", "npc/017-3/loratay.txt", "npc/017-3/slots.txt", "npc/017-3/vault.txt", 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; +} + |