LevelUp (Fixed Version)

                         --------------------------
                         --####### ARCEMU #######--
                         --------------------------
              --/////////////////////////////////////////////////--
              -----------------------------------------------------
              -----                                           -----
              -----          Level up Gossiper                -----
              -----         A Dreamwork Script                -----
              -----  Credits go to its rightfully creator     -----
              -----------------------------------------------------
              --/////////////////////////////////////////////////--
                  -- ------------------------------------------
                  -- To activate an option set it to true    --
                  -- To deactivate an option set it to false --
                  ---------------------------------------------


local NpcId = 19112
local TokenId = 15116


local RankProtection = false  -- <<----- Disable for use to non ranked players if true else usable for everyone.

local Token = true   -- <<---- true for token cost, false for free.

local TokenAmt1 = 80
local TokenAmt2 = 40
local TokenAmt3 = 25
local TokenAmt4 = 10
local TokenAmt5 = 5




function HELLO(event, player, pUnit)
 if(RankProtection ~= false) and (player:GetGmRank() == '') then
   player:SendBroadcastMessage("[Server Notification] You don't have access to this NPC.")
   player:GossipComplete()
    else
      pUnit:GossipCreateMenu(100, player, 0)
      pUnit:GossipMenuAddItem(3, "Level me up to 80!", 1, 0)
      pUnit:GossipMenuAddItem(3, "Grant me 40 levels!", 2, 0)
      pUnit:GossipMenuAddItem(3, "Grant me 25 levels!", 3, 0)
      pUnit:GossipMenuAddItem(3, "Grant me 10 levels!", 4, 0)
      pUnit:GossipMenuAddItem(3, "Grant me 5 levels!", 5, 0)
      pUnit:GossipSendMenu(player)
     end
end

 function SELECT(event, player, pUnit, sender, intid, code)


local sql = "SELECT * FROM items WHERE entry = "..TokenId..""
local result = WorldDBQuery(sql)


if(intid == 1) then
  pUnit:GossipCreateMenu(100, player, 0)
if(result:GetColumn(3):GetString() == nil) then return end
  if(Token ~= false) then
   pUnit:GossipMenuAddItem(5, "Leveling you up to 80 costs "..TokenAmt1.." "..(result:GetColumn(3):GetString()).."'s!", 1, 0)
    else
        pUnit:GossipMenuAddItem(5, "Level up to 80 for free!", 1, 0)
    end
        pUnit:SendBroadcastMessage("[Server Notification] Do you really want to continue?")
        pUnit:GossipMenuAddItem(5, "Yes", 100, 0)
        pUnit:GossipMenuAddItem(5, "No", 999, 0)
        pUnit:GossipMenuAddItem(5, "Back", 999, 0)
        pUnit:GossipSendMenu(player)
end


if(intid == 2) then
pUnit:GossipCreateMenu(100, player, 0)
if(result:GetColumn(3):GetString() == nil) then return end
  if(Token ~= false) then
   pUnit:GossipMenuAddItem(5, "Granting you 40 levels costs "..TokenAmt2.." "..(result:GetColumn(3):GetString()).."'s!", 2, 0)
    else
        pUnit:GossipMenuAddItem(5, "Granting 40 levels for free", 1, 0)
    end
   pUnit:SendBroadcastMessage("[Server Notification] Do you really want to continue?")
   pUnit:GossipMenuAddItem(5, "Yes", 200, 0)
   pUnit:GossipMenuAddItem(5, "No", 999, 0)
   pUnit:GossipMenuAddItem(5, "Back", 999, 0)
   pUnit:GossipSendMenu(player)
end

if(intid == 3) then
pUnit:GossipCreateMenu(100, player, 0)
if(result:GetColumn(3):GetString() == nil) then return end
  if(Token ~= false) then
   pUnit:GossipMenuAddItem(5, "Granting you 25 levels costs "..TokenAmt3.." "..(result:GetColumn(3):GetString()).."'s!", 3, 0)
    else
        pUnit:GossipMenuAddItem(5, "Granting 25 levels for free!", 1, 0)
    end
   pUnit:SendBroadcastMessage("[Server Notification] Do you really want to continue?")
   pUnit:GossipMenuAddItem(5, "Yes", 300, 0)
   pUnit:GossipMenuAddItem(5, "No", 999, 0)
   pUnit:GossipMenuAddItem(5, "Back", 999, 0)
   pUnit:GossipSendMenu(player)
end

if(intid == 4) then
player:GossipCreateMenu(100, player, 0)
if(result:GetColumn(3):GetString() == nil) then return end
  if(Token ~= false) then
   pUnit:GossipMenuAddItem(5, "Granting you 10 levels costs "..TokenAmt4.." "..(result:GetColumn(3):GetString()).."'s!", 4, 0)
    else
        pUnit:GossipMenuAddItem(5, "Granting 10 levels for free!", 1, 0)
    end
   pUnit:SendBroadcastMessage("[Server Notification] Do you really want to continue?")
   pUnit:GossipMenuAddItem(5, "Yes", 400, 0)
   pUnit:GossipMenuAddItem(5, "No", 999, 0)
   pUnit:GossipMenuAddItem(5, "Back", 999, 0)
   pUnit:GossipSendMenu(player)
end

if(intid == 5) then
pUnit:GossipCreateMenu(100, player, 0)
if(result:GetColumn(3):GetString() == nil) then return end
  if(Token ~= false) then
   pUnit:GossipMenuAddItem(5, "Granting you 5 levels costs "..TokenAmt5.." "..(result:GetColumn(3):GetString()).."'s!", 5, 0)
    else
        pUnit:GossipMenuAddItem(5, "Granting 5 levels for free!", 1, 0)
    end
   pUnit:SendBroadcastMessage("[Server Notification] Do you really want to continue?")
   pUnit:GossipMenuAddItem(5, "Yes", 500, 0)
   pUnit:GossipMenuAddItem(5, "No", 999, 0)
   pUnit:GossipMenuAddItem(5, "Back", 999, 0)
   pUnit:GossipSendMenu(player)
end

------------------------------LEVELING-UP-SECTION----------------------------------


if(intid == 100) then
 if(player:GetLevel() < 80) then
  if(Token ~= false) then
   if(player:GetItemByEntry(TokenId) >= TokenAmt1) then
    player:SetLevel(80)
    player:RemoveItem(TokenId, TokenAmt1)
    else
     player:SendBroadcastMessage("[Server Notification] You don't have enough "..(result:GetColumn(3):GetString())..".") return end
      else
       player:GiveLevel(80)
        end
         else
           player:SendBroadcastMessage("[Server Notification] You are already max leveled.") return end
    pUnit:GossipCreateMenu(100, player, 0)
    pUnit:GossipMenuAddItem(5, "Back", 999, 0)
    pUnit:GossipMenuAddItem(5, "Exit Menu", 1000, 0)
    pUnit:GossipSendMenu(player)
end



if(intid == 200) then
  if(player:GetLevel() < 80) and (player:GetLevel() > 40) then
   if(Token ~= false) then
    if(player:GetItemByEntry(TokenId) >= TokenAmt2) then
     player:SetLevel(80)
     player:RemoveItem(TokenId, TokenAmt2)
      else
       player:SendBroadcastMessage("[Server Notification] You don't have enough "..(result:GetColumn(3):GetString())..".") return end
        else
         player:SetLevel(80)
         end
           else
            if(player:GetLevel() < 80) then
              if(Token ~= false) then
               if(player:GetItemByEntry(TokenId) >= TokenAmt2) then
                player:SetLevel(player:GetLevel()+40)
                 player:RemoveItem(TokenId, TokenAmt2)
         else
     player:SendBroadcastMessage("[Server Notification] You don't have enough "..(result:GetColumn(3):GetString())..".") return end
  else
  player:SetLevel(player:GetLevel()+40)
  end
else
player:SendBroadcastMessage("[Server Notification] You are already max leveled.") return end
end
    pUnit:GossipCreateMenu()
    pUnit:GossipMenuAddItem(5, "Back", 999, 0)
    pUnit:GossipMenuAddItem(5, "Exit Menu", 1000, 0)
    pUnit:GossipSendMenu(player)
end

if(intid == 300) then
  if(player:GetLevel() < 80) and (player:GetLevel() > 55) then
   if(Token ~= false) then
    if(player:GetItemByEntry(TokenId) >= TokenAmt3) then
     player:SetLevel(80)
     player:RemoveItem(TokenId, TokenAmt3)
      else
       player:SendBroadcastMessage("[Server Notification] You don't have enough "..(result:GetColumn(3):GetString())..".") return end
        else
         player:SetLevel(80)
         end
           else
            if(player:GetLevel() < 80) then
              if(Token ~= false) then
               if(player:GetItemByEntry(TokenId) >= TokenAmt3) then
                player:SetLevel(player:GetLevel()+25)
                 player:RemoveItem(TokenId, TokenAmt3)
         else
     player:SendBroadcastMessage("[Server Notification] You don't have enough "..(result:GetColumn(3):GetString())..".") return end
  else
  player:SetLevel(player:GetLevel()+25)
  end
else
player:SendBroadcastMessage("[Server Notification] You are already max leveled.") return end
end
    pUnit:GossipCreateMenu()
    pUnit:GossipMenuAddItem(5, "Back", 999, 0)
    pUnit:GossipMenuAddItem(5, "Exit Menu", 1000, 0)
    pUnit:GossipSendMenu(player)
end

if(intid == 400) then
   if(player:GetLevel() < 80) and (player:GetLevel() > 70) then
   if(Token ~= false) then
    if(player:GetItemByEntry(TokenId) >= TokenAmt4) then
     player:SetLevel(80)
     player:RemoveItem(TokenId, TokenAmt4)
      else
       player:SendBroadcastMessage("[Server Notification] You don't have enough "..(result:GetColumn(3):GetString())..".") return end
        else
         player:SetLevel(80)
         end
           else
            if(player:GetLevel() < 80) then
              if(Token ~= false) then
               if(player:GetItemByEntry(TokenId) >= TokenAmt4) then
                player:SetLevel(player:GetLevel()+10)
                 player:RemoveItem(TokenId, TokenAmt4)
         else
     player:SendBroadcastMessage("[Server Notification] You don't have enough "..(result:GetColumn(3):GetString())..".") return end
  else
  player:SetLevel(player:GetLevel()+10)
  end
else
player:SendBroadcastMessage("[Server Notification] You are already max leveled.") return end
end
    pUnit:GossipCreateMenu()
    pUnit:GossipMenuAddItem(5, "Back", 999, 0)
    pUnit:GossipMenuAddItem(5, "Exit Menu", 1000, 0)
    pUnit:GossipSendMenu(player)
end

if(intid == 500) then
   if(player:GetLevel() < 80) and (player:GetLevel() > 75) then
   if(Token ~= false) then
    if(player:GetItemByEntry(TokenId) >= TokenAmt5) then
     player:SetLevel(80)
     player:RemoveItem(TokenId, TokenAmt5)
      else
       player:SendBroadcastMessage("[Server Notification] You don't have enough "..(result:GetColumn(3):GetString())..".") return end
        else
         player:SetLevel(80)
         end
           else
            if(player:GetLevel() < 80) then
              if(Token ~= false) then
               if(player:GetItemByEntry(TokenId) >= TokenAmt5) then
                player:SetLevel(player:GetLevel()+5)
                 player:RemoveItem(TokenId, TokenAmt5)
         else
     player:SendBroadcastMessage("[Server Notification] You don't have enough "..(result:GetColumn(3):GetString())..".") return end
  else
  player:SetLevel(player:GetLevel()+5)
  end
else
player:SendBroadcastMessage("[Server Notification] You are already max leveled.") return end
end
    pUnit:GossipCreateMenu()
    pUnit:GossipMenuAddItem(5, "Back", 999, 0)
    pUnit:GossipMenuAddItem(5, "Exit Menu", 1000, 0)
    pUnit:GossipSendMenu(player)
end



if(intid == 1000) then
player:GossipComplete()
end

if(intid == 999) then
      pUnit:GossipCreateMenu(100, player, 0)
      pUnit:GossipMenuAddItem(3, "Level me up to 80!", 1, 0)
      pUnit:GossipMenuAddItem(3, "Grant me 40 levels!", 2, 0)
      pUnit:GossipMenuAddItem(3, "Grant me 25 levels!", 3, 0)
      pUnit:GossipMenuAddItem(3, "Grant me 10 levels!", 4, 0)
      pUnit:GossipMenuAddItem(3, "Grant me 5 levels!", 5, 0)
      pUnit:GossipSendMenu(player)
end

end

RegisterCreatureGossipEvent(NpcId, 1, HELLO)
RegisterCreatureGossipEvent(NpcId, 2, SELECT)