View difference between Paste ID: YxbSNRzW and 7HxUdJWD

---[[ 1 first is beginning section checking if the location exsists in the -->sql<--
+-- arcemu core using ALE
-     if it doesn't then it creates it using CreateLocation.
+
-     if it does exsist then it gets location entryid using GetLocationId ]]--
+ACCDATA = {} -- Table that contains all data
-function GWcommands(event, pPlayer, msg, type, language)
+
-local Xentrydb = WorldDBQuery("SELECT `entry` FROM guild_warz.zones WHERE `map_id` = '"..pPlayer:GetMapId().."' AND `area_id` = '"..pPlayer:GetAreaId().."' AND `zone_id` = '"..pPlayer:GetZoneId().."';");
+function LoadAccDataFromDB()
-	if(Xentrydb==nil)then
+    ACCDATA = {} -- For reload case, empty table
-		CreateLocation(pPlayer:GetMapId(), pPlayer:GetAreaId(), pPlayer:GetZoneId())
+    local Q = WorldDBQuery("SELECT acct, login, vip, votes, mg FROM logon.accounts;");
-		end
+    if(Q)then
-local LocId = GetLocationId(pPlayer)
+        repeat
             -- Save account data under account name in ACCDATA lua table
---[[ 2 this again scans sql to get the location id.
+            local name = Q:GetColumn(1):GetString() -- (vip column) num value 1-20
-      I have been trying to get it to scan the table to match up the
+            ACCDATA[name] = {
-       map,area,zone values to the players map,area,zone with no luck so far.
+                acct = Q:GetColumn(0):GetULong(), -- (vip column) num value 1-20
-       if I can get it to find the location by table then I can
+                vip = Q:GetColumn(2):GetULong(), -- (vip column) num value 1-20
-       get it to check if it exists in the table and if not then CreateLocation.
+                votes = Q:GetColumn(3):GetULong(), -- (vote column) total votes count
-	even tried to create a table just for this trying to use multiple keys(location mapid,areaid,zoneid
+                mg = Q:GetColumn(4):GetULong(), -- (mg column) total magic gold
-	but it fell flat on its face lol even tried sub table setup GWTloc.map.area.zone.Entryid
+            }
-local function GetLocationId(player, unit)
+        until not Q:NextRow()
-local Locdb=WorldDBQuery("SELECT `entry` FROM guild_warz.zones WHERE `map_id`='"..player:GetMapId().."' AND `area_id`='"..player:GetAreaId().."' and `zone_id`='"..player:GetZoneId().."';");
+    end
-return Locdb:GetColumn(0):GetULong() or 0;
+
 LoadAccDataFromDB()
 
---[[ 3 this should be fine it does only insert/update
+function GetAcct(player)
-local function CreateLocation(map, area, zone)
+    -- Returns acct or 0
-local CLentrydb = WorldDBQuery("SELECT `entry` FROM guild_warz.zones;");
+    local name = player:GetAccountName()
-		repeat
+    return ACCDATA[name] and ACCDATA[name].acct or 0
-			CLentry = CLentrydb:GetColumn(0):GetLong()
+
-			until(CLentrydb:NextRow()~=true)
+
-	CLentry=(CLentry+1)
+function GetVip(player)
-	WorldDBQuery("INSERT INTO guild_warz.zones SET `entry` = '"..CLentry.."';");
+    -- Returns vip or 0
-	WorldDBQuery("UPDATE guild_warz.zones SET `map_id` = '"..map.."' WHERE `entry` = '"..CLentry.."';");
+    local name = player:GetAccountName()
-	WorldDBQuery("UPDATE guild_warz.zones SET `area_id` = '"..area.."' WHERE `entry` = '"..CLentry.."';");
+    return ACCDATA[name] and ACCDATA[name].vip or 0
-	WorldDBQuery("UPDATE guild_warz.zones SET `zone_id` = '"..zone.."' WHERE `entry` = '"..CLentry.."';");
+
-	WorldDBQuery("UPDATE guild_warz.zones SET `guild_name` = '"..Server.."' WHERE `entry` = '"..CLentry.."';");
+
-	GWARZ[CLentry] = {}
+local function Viptest(event, pPlayer, msg, type, language)
-	GWARZ[CLentry].Entryid = CLentry
+    local command = ".vip"
-	GWARZ[CLentry].Mapid = map
+    if (msg == command)then
-	GWARZ[CLentry].Areaid = area
+        local name = pPlayer:GetAccountName()
-	GWARZ[CLentry].Zoneid = zone
+        print("acctid direct request value")
-	GWARZ[CLentry].Guildname = Server
+        print(ACCDATA[name]) -- table that contains the account data
-	GWARZ[CLentry].Team = 2
+        print(ACCDATA[name].acct) -- accessing data inside the table
-	GWARZ[CLentry].Buildingcnt = 0
+        print(ACCDATA[name].vip)
-	GWARZ[CLentry].Pigcnt = 0
+        print(ACCDATA[name].votes)
-	GWARZ[CLentry].Guardcnt = 0
+        print(ACCDATA[name].mg)
-	GWARZ[CLentry].Flagid = 0
+        print()
-print(""..CLentry..": created")
+        print("custom function request values")
-end
+        print(GetAcct(player))
         print(GetVip(player))
         print()
         print("Alternate way to print contents")
         for k, v in pairs(ACCDATA[name] or {}) do
             print(k, v)
         end
     end
 end
 
 RegisterServerHook(16, Viptest)