Rewrite Lua. Swezanne will be holding the MOST HEROIC person for a while.

I'll rewrite her and add her quest later.

1 files changed, 15 insertions, 8 deletions

diff --git a/npc/003-2/lua.txt b/npc/003-2/lua.txt
index 92d927ac1..5230ff908 100644
--- a/npc/003-2/lua.txt
+++ b/npc/003-2/lua.txt
@@ -5,31 +5,38 @@
 003-2,38,34,0	script	Lua#003-2	NPC_FEMALE,{
     mesn;
     mesq l("Hello, I act on the Alliance's behalf.");
+
+L_Menu:
     mes "";
-    if (getgmlevel()) goto L_AdminMenu;
     menu
         l("Ok, see you later."),L_Close,
+        rif(getgmlevel(), l("I need a GM set, please!")), L_GMItems,
+        rif(getgmlevel(), l("Tell people the name of a new hero.")), L_NewHero,
         l("What alliance?"),-;
     mes "";
     mesn;
     mesq l("The Alliance which was formed after the war!");
     close;
 
-L_AdminMenu:
-    menu
-        l("I'm done here, thanks."), L_Close,
-        l("I need a GM set, please!"), L_GMItems;
-
 L_GMItems:
     getnameditem "GMRobe", strcharinfo(0);
     getnameditem "GMCap", strcharinfo(0);
     logmes(strcharinfo(0)+" just took a GM set.");
-    logmes("@GMSet "+strcharinfo(0), LOGMES_ATCOMMAND);
+    logmes(strcharinfo(0)+" just took a GM set.", LOGMES_ATCOMMAND);
     mes "";
     mesn;
     mesq lg("Here they are, miss.", "Here they are, mister.");
     mes "";
-    goto L_AdminMenu;
+    goto L_Menu;
+
+L_NewHero:
+    mes "";
+    mes l("Current hero: @@", $MOST_HEROIC$);
+    input .@MH$;
+    logmes "Changing hero from "+$MOST_HEROIC$+" to "+.@MH$;
+    logmes(strcharinfo(0)+" changed the world's hero.", LOGMES_ATCOMMAND);
+    $MOST_HEROIC$ = .@MH$;
+    goto L_Menu;
 
 L_Close:
     close;