Lua coins + reward repricing

2 files changed, 18 insertions, 6 deletions

diff --git a/npc/001-1/rewards.txt b/npc/001-1/rewards.txt
index 34f591e2c..7fe26ca17 100644
--- a/npc/001-1/rewards.txt
+++ b/npc/001-1/rewards.txt
@@ -32,13 +32,13 @@ OnInit:
 	tradertype(NST_CUSTOM);
 
 	//sellitem GoldenWarlordPlate,2500; // Item still not balanced
-	sellitem ThunderStaff,2000;
-	sellitem PiouEgg,500;
-	sellitem Googles,80;
+	sellitem ThunderStaff,20000;
+	sellitem PiouEgg,5000;
+	sellitem Googles,800;
+	sellitem ElixirOfLife,35;
+	sellitem Grenade,12;
+	sellitem Curshroom,7;
 	sellitem PetcaringGuide,5; // I needed to add this somewhere
-	sellitem ElixirOfLife,3;
-	sellitem Grenade,2;
-	sellitem Curshroom,1;
 	end;
 
 /* set currency to be item 828 */
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$);