diff options
Diffstat (limited to 'npc')
| -rw-r--r-- | npc/003-2/lua.txt | 51 |
1 files changed, 51 insertions, 0 deletions
diff --git a/npc/003-2/lua.txt b/npc/003-2/lua.txt index 7dca3f969..2959a302a 100644 --- a/npc/003-2/lua.txt +++ b/npc/003-2/lua.txt @@ -21,6 +21,7 @@ L_Menu: rif(.@n >= 4, l("Do you think I'm ready to go to Halinarzo?")), L_Check, rif(is_gm(), l("I need a GM set, please!")), L_GMItems, rif(is_gm() && #GMEVENT_T <= gettimetick(2), l("I plan in doing an event! Give me the coins!")), L_GMEvent, + rif(is_gm() && #GMEVENT_T > gettimetick(2), l("Trade my coins in Gift Boxes, pretty please!")), L_GMEventShop, rif(is_staff(), l("Tell people the name of a new hero.")), L_NewHero, rif((getgmlevel() == 1 || is_admin()) && #T_SPONSOR <= gettimetick(2), l("I want a Sponsor Necklace.")), L_Sponsor, l("Do you have any tips for beginners?"), L_Tips, @@ -53,6 +54,56 @@ L_GMEvent: mes ""; goto L_Menu; +L_GMEvent2: + // Inflaction: Non-admins pay more, and out of main events price is higher + .@inflact=0; + if (!is_admin()) + .@inflact+=1; + if ($EVENT$ == "") + .@inflact+=1; + if (.@inflact == 0) + .@inflact=1; + + // Main Code + .@s=countitem(StrangeCoin); + mes ""; + mesn; + mesq l("You currently have @@ @@.", getitemlink(StrangeCoin)); + mes ""; + mesc l("@@ - @@ coins", getitemlink(BronzeGift), 10*.@inflact); + mesc l("@@ - @@ coins", getitemlink(SilverGift), 20*.@inflact); + mesc l("@@ - @@ coins", getitemlink(GoldenGift), 40*.@inflact); + mesc l("@@ - @@ coins", getitemlink(PrismGift), 60*.@inflact); + mesc l("@@ - @@ coins", getitemlink(SupremeGift), 80*.@inflact); + mes ""; + menuint + "Return to main menu", -1, + rif(.@s > 10*.@inflact, "Bronze Gift"), 10, + rif(.@s > 20*.@inflact, "Silver Gift"), 20, + rif(.@s > 40*.@inflact, "Golden Gift"), 40, + rif(.@s > 60*.@inflact, "Prism Gift"), 60, + rif(.@s > 80*.@inflact, "Supreme Gift"), 80; + + if (@menuret == -1) + goto L_Menu; + + delitem StrangeCoin, @menuret*.@infact; + switch (@menuret) { + case 10: + getitem BronzeGift, 1; break; + case 20: + getitem SilverGift, 1; break; + case 40: + getitem GoldenGift, 1; break; + case 60: + getitem PrismGift, 1; break; + case 80: + getitem SupremeGift, 1; break; + default: + mesc(l("A script error happened, please report: @@", @menuret), 1); break; + } + goto L_GMEvent2; + L_NewHero: mes ""; mes l("Current hero: @@", $MOST_HEROIC$); |