From 52bbfef2b7904279dc9ceef32e878526b9fe8f95 Mon Sep 17 00:00:00 2001
From: jesusalva <cpntb1@ymail.com>
Date: Wed, 28 Feb 2018 17:17:49 -0300
Subject: Lua coins + reward repricing

---
 npc/003-2/lua.txt | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'npc/003-2/lua.txt')

diff --git a/npc/003-2/lua.txt b/npc/003-2/lua.txt
index 5230ff908..7392a1eec 100644
--- a/npc/003-2/lua.txt
+++ b/npc/003-2/lua.txt
@@ -11,6 +11,7 @@ L_Menu:
     menu
         l("Ok, see you later."),L_Close,
         rif(getgmlevel(), l("I need a GM set, please!")), L_GMItems,
+        rif(getgmlevel() && #GMEVENT_T <= gettimetick(2), l("I plan in doing an event! Give me the coins!")), L_GMEvent,
         rif(getgmlevel(), l("Tell people the name of a new hero.")), L_NewHero,
         l("What alliance?"),-;
     mes "";
@@ -29,6 +30,17 @@ L_GMItems:
     mes "";
     goto L_Menu;
 
+L_GMEvent:
+    #GMEVENT_T=gettimetick(2)+(60*60*24);
+    getitem "StrangeCoin", 20;
+    logmes(strcharinfo(0)+" just took twenty event coins.");
+    logmes(strcharinfo(0)+" just took twenty event coins.", LOGMES_ATCOMMAND);
+    mes "";
+    mesn;
+    mesq lg("Here they are, miss.", "Here they are, mister.");
+    mes "";
+    goto L_Menu;
+
 L_NewHero:
     mes "";
     mes l("Current hero: @@", $MOST_HEROIC$);
-- 
cgit v1.2.3-60-g2f50