From 03d76f8e88dd763a22c3f15c7ff49bb12d5ad966 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Mon, 2 Jul 2018 18:51:01 -0300
Subject: Optimize to validate newcomer input

---
 npc/functions/clientversion.txt | 46 +++++++++++++++++++++++++++--------------
 1 file changed, 30 insertions(+), 16 deletions(-)

(limited to 'npc/functions/clientversion.txt')

diff --git a/npc/functions/clientversion.txt b/npc/functions/clientversion.txt
index 5fce72e2d..058796e6e 100644
--- a/npc/functions/clientversion.txt
+++ b/npc/functions/clientversion.txt
@@ -12,7 +12,7 @@ function	script	checkclientversion	{
     if (isin("000-0", 0, 0, 40, 40)) {
         UPDATE=gettimetick(2);
         // if $EVENT$ is REFFER:
-        if (#REFERRAL_PROG$ == "") {
+        if (#REFERRAL_PROG == "") {
             mesn l("TMW2 Staff");
             mesc l("Hello, and welcome to TMW2: Moubootaur Legends!"), 3;
             mesc l("(Click next button to advance dialogs)"),9;
@@ -20,21 +20,35 @@ function	script	checkclientversion	{
             mesn l("TMW2 Staff");
             mesc l("Did you came here by someone advise? If yes, write their name here!"), 3;
             mesc l("If this is not the case, just click on \"Send\"."), 3;
-            input .@ref$;
-            mes "";
-            if (.@ref$) {
-                #REFERRAL_PROG$=strip(.@ref$);
-                getitembound FriendGift, 1, 1;
-                mesn l("TMW2 Staff");
-                mesc l("Well, welcome to the game! If you have any doubt, shout on #world for help!"), 3;
-                mesc l("Your friend also sent you a gift - open it when you get level 5!"), 3;
-                next;
-            } else {
-                mesn l("TMW2 Staff");
-                mesc l("I see. Well, welcome to the game! If you have any doubt, shout on #world for help!"), 3;
-                next;
-            }
-            if (ClientVersion >= 24) return;
+            .@ref$="nah";
+            do
+            {
+                input .@ref$;
+                mes "";
+                if (.@ref$) {
+                    .@ref=getcharid(0, strip(.@ref$));
+                    if (.@ref > 0) {
+                        #REFERRAL_PROG=.@ref;
+                        getitembound FriendGift, 1, 1;
+                        mesn l("TMW2 Staff");
+                        mesc l("Well, welcome to the game! If you have any doubt, shout on #world for help!"), 3;
+                        mesc l("Your friend also sent you a gift - open it when you get level 5!"), 3;
+                        next;
+                    } else {
+                        mesn l("TMW2 Staff");
+                        mesc l("Oops, there is nobody known as @@ on this game.", .@ref$), 3;
+                        mesc l("Could you try again? There could be a typo!"), 3;
+                        next;
+                        .@ref$="";
+                    }
+                } else {
+                    .@ref$="nah";
+                    mesn l("TMW2 Staff");
+                    mesc l("I see. Well, welcome to the game! If you have any doubt, shout on #world for help!"), 3;
+                    next;
+                }
+                if (ClientVersion >= 24) return;
+            } while (.@ref$ != "");
         }
     }
 
-- 
cgit v1.2.3-70-g09d2