From 1f1181dcf34639a6d85a8562b6b8132155aee04b Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Mon, 17 Sep 2018 16:24:08 -0300
Subject: Help a bit against ADM-induced lag, while configuring referral
 program.

---
 npc/003-1/michel.txt | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'npc/003-1')

diff --git a/npc/003-1/michel.txt b/npc/003-1/michel.txt
index 5278c3065..00ddda6de 100644
--- a/npc/003-1/michel.txt
+++ b/npc/003-1/michel.txt
@@ -35,7 +35,7 @@
     mes "##B Technical Notes ##b";
     mes "In future we may start Fame field directly (but it is not displayed on client, thus, we decided to use Karma).";
     //set Karma, Karma + 5;
-    if (is_admin()) goto L_GM;
+    if (is_admin()) goto L_GMOnce;
     close;
 
 L_Main:
@@ -46,9 +46,10 @@ L_Main:
     mesq l("Hey, I see you have appointed @@ players to this game. Good job!", $REFERRAL_IDS[#REFERRAL_PROG]);
     close;
 
-L_GM:
+L_GMOnce:
     .@nb = query_sql("SELECT SUM(value) FROM `mapreg` WHERE varname='$REFERRAL_IDS' LIMIT 2", .@value);
     @total=.@value[0];
+L_GM:
     mesc "Referral Event status: " + ($REFERRAL_ENABLED ? "##2ACTIVE##0" : "##1INACTIVE##0");
     mesc "Total refers count: "+@total;
     mes "";
@@ -70,6 +71,8 @@ L_GM:
             if (askyesno() == ASK_YES) {
                 deletearray($REFERRAL_IDS);
                 logmes "##1Deleted PERMANENTLY the REFER event scoreboard.##0", LOGMES_ATCOMMAND;
+                .@nb = query_sql("SELECT SUM(value) FROM `mapreg` WHERE varname='$REFERRAL_IDS' LIMIT 2", .@value);
+                @total=.@value[0];
             }
         default: close;
     }
-- 
cgit v1.2.3-60-g2f50