(Resolvido)[PEDIDO] Script dos Vagões de Kazordoon

[lagoa 10]

Estava verificando os possíveis bugs do meu servidor, quando fui passear por kazordoon e observei que meu NPC não vende os tickets para andar por kazordoon pelos vagões e os vagões também não estão funcionando! Uma boa alma poderia disponibilizar o script do sistema de vagões por favor!? E também preciso do script do npc Lokur (me ajudem com o serviço completo hein  ahsuahsuahsaushasuahsa).

[luanluciano93 1993]

Se ninguém fizer até amanha cedo, eu faço .... 

[ViitinG 835]

Tenta esse para o NPC :

"data/npc/lokur.xml"

<?xml version="1.0" encoding="UTF-8"?>
<npc name="Lokur" script="Lokur.lua" walkinterval="2000" floorchange="0">
  <health now="100" max="100" />
  <look type="69" head="57" body="79" legs="60" feet="114" corpse="6007" />
<voices>
<voice text="If you need help with letters or parcels, just ask me. I can explain everything." interval2="100" margin="1" yell="no"/>
<voice text="Also selling weekly tickets for the ore wagon service!" interval2="120" margin="1" yell="no"/>
<voice text="Welcome to the post office!" interval2="90" margin="1" yell="no"/>
</voices>
  <parameters>
        <parameter key="message_greet" value="How may I help you |PLAYERNAME|? Ask me for a {trade} if you want to buy something. I can also explain the {mail} system, sell {tickets} for the ore wagon service or give you access to your {bank} account."/>
        <parameter key="message_farewell" value="Come back if you need my services, |PLAYERNAME|."/>
		<parameter key="message_walkaway" value="Come back if you need my services, |PLAYERNAME|." />
		<parameter key="message_sendtrade" value="Here. Don't forget that you need to buy a label too if you want to send a parcel. Always write the name of the {receiver} in the first line and the name of the {city} in the second line." />
    <parameter key="module_shop" value="1" />
    <parameter key="shop_buyable" value="parcel,2595,15;letter,2597,8;label,2599,1;" />
  </parameters>
</npc>

"data/npc/scripts/lokur.lua"

local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
local talkState = {}
local transaction = {}
local transfer = {}
local transfer_name = {}
 
function onCreatureAppear(cid)
        npcHandler:onCreatureAppear(cid)                      
end
function onCreatureDisappear(cid)
        npcHandler:onCreatureDisappear(cid)                    
end
function onCreatureSay(cid, type, msg)
        npcHandler:onCreatureSay(cid, type, msg)              
end
function onThink()
        npcHandler:onThink()                                  
end
 
function creatureSayCallback(cid, type, msg)
        if(not npcHandler:isFocused(cid)) then
                return false
        end
        local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
 
        local function getMoneyCount(s)
                local b, e = s:find("%d+")
                return b and e and tonumber(s:sub(b, e)) or -1
        end
       
        local function doPlayerAddSafeMoney(cid, money)
                moneyAdd = money
                freeCap = getPlayerFreeCap(cid)
                crystalCoins = money >= 10000 and money / 10000 or 0
                money = money - crystalCoins * 10000
                platinumCoins = money >= 100 and money / 100 or 0
                money = money - platinumCoins * 100
                goldCoins = money
                if(freeCap >= (crystalCoins * 0.1 + platinumCoins * 0.1 + goldCoins * 0.1) and doPlayerAddMoney(cid, moneyAdd)) then
                        return true    
                else
                        return false
                end
        end
       
        -- Check Balance
        if(msgcontains(msg, "balance")) then
                balance = getPlayerBalance(cid)
                if(balance > 100000 and balance < 1000000) then
                        msg = "You certainly have made a pretty penny. "
                elseif(balance > 1000000 and balance < 10000000) then
                        msg = "Wow, you have reached the magic number of a million gp!!! "
                elseif(balance > 10000000) then
                        msg = "I think you must be one of the richest inhabitants of Tibia! "
                elseif (balance < 100000) then
                        msg = ""
                end
                npcHandler:say(msg .. "Your account balance is " .. balance .. " gold.", cid)
       
        -- Deposit All
        elseif(msg == "deposit all") then
                if(getPlayerMoney(cid) > 0) then
                        npcHandler:say("Do you really want to deposit " .. getPlayerMoney(cid) .. " to your bank account?", cid)
                        transaction[talkUser] = getPlayerMoney(cid)
                        talkState[talkUser] = 1
                else
                        npcHandler:say("You don't have any money with you.", cid)
                        transaction[talkUser] = 0
                        talkState[talkUser] = 0
                end
               
        -- Withdraw Money
        elseif(msgcontains(msg, "withdraw")) then
                npcHandler:say("How much money would you like to withdraw from your bank account?", cid)
                talkState[talkUser] = 2
        elseif(talkState[talkUser] == 2) then
                if tonumber(msg) == nil then
                        npcHandler:say("Please tell me a {number} you want to withdraw.", cid)
                        talkState[talkUser] = 2
                        return true
                end
                if(tonumber(msg) > 0 and getMoneyCount(msg) <= getPlayerBalance(cid)) then
                        npcHandler:say("Would you like to withdraw " .. getMoneyCount(msg) .. " gold from your bank account?", cid)
                        transaction[talkUser] = getMoneyCount(msg)
                        talkState[talkUser] = 3
                  elseif (tonumber(msg) < 1) then
                           npcHandler:say("Sure, you want nothing you get nothing!", cid)
                           talkState[talkUser] = 0
                elseif(getMoneyCount(msg) < 1) then
                        npcHandler:say("How much money would you like to withdraw from your bank account?", cid)
                elseif(getMoneyCount(msg) > getPlayerBalance(cid)) then
                        npcHandler:say("You don't have enought money on your bank account.", cid)
                        talkState[talkUser] = 0
                end
               
        -- Deposit Money
        elseif(msgcontains(msg, "deposit")) then
                npcHandler:say("How much money would you like to deposit to your bank account?", cid)
              talkState[talkUser] = 4
        elseif(talkState[talkUser] == 4) then
                if tonumber(msg) == nil then
                        npcHandler:say("Please tell me a {number} you want to deposit.", cid)
                        talkState[talkUser] = 4
                        return true
                end
                if(tonumber(msg) > 0 and getMoneyCount(msg) <= getPlayerMoney(cid)) then
                        npcHandler:say("Would you like to deposit " .. getMoneyCount(msg) .. " gold to your bank account?", cid)
                        transaction[talkUser] = getMoneyCount(msg)
                        talkState[talkUser] = 5
                  elseif(tonumber(msg) < 1) then
                           npcHandler:say("You are joking, aren't you??", cid)
                           talkState[talkUser] = 0
                elseif(getMoneyCount(msg) < 1) then
                        npcHandler:say("How much money would you like to deposit to your bank account?", cid)
                elseif(getMoneyCount(msg) > getPlayerMoney(cid)) then
                        npcHandler:say("You don't have enought money with you.", cid)
                        talkState[talkUser] = 0
                end
               
        -- Transfer Money
        elseif(msgcontains(msg, "transfer")) then
                npcHandler:say("Who do you want transfer money to?", cid)
                talkState[talkUser] = 6
        elseif(talkState[talkUser] == 6) then
                if(getPlayerGUIDByName(string.lower(msg)) > 0 and string.lower(msg) ~= string.lower(getCreatureName(cid))) then
                        transfer[talkUser] = getPlayerGUIDByName(string.lower(msg))
                        transfer_name[talkUser] = string.lower(msg)
                        npcHandler:say("How much money would you like to transfer?", cid)
                        talkState[talkUser] = 7
                else
                        npcHandler:say("There is no such player.", cid)
                        talkState[talkUser] = 0
                end
        elseif(talkState[talkUser] == 7) then
                if tonumber(msg) == nil then
                        npcHandler:say("Please tell me a {number} you want to transfer.", cid)
                        talkState[talkUser] = 7
                        return true
                end
                if(tonumber(msg) > 0 and getMoneyCount(msg) <= getPlayerBalance(cid)) then
                        npcHandler:say("Would you like to transfer " .. getMoneyCount(msg) .. " to " .. transfer_name[talkUser] .. "?", cid)
                        transaction[talkUser] = getMoneyCount(msg)
                        talkState[talkUser] = 8
                elseif(tonumber(msg) < 1) then
                        npcHandler:say("Please think about it. Okay?", cid)
                        talkState[talkUser] = 0
                elseif(getMoneyCount(msg) < 0) then
                        npcHandler:say("How much money would you like to transfer?", cid)
                elseif(getMoneyCount(msg) > getPlayerMoney(cid)) then
                        npcHandler:say("You don't have enought money on your bank account.", cid)
                        talkState[talkUser] = 0
                end
               
        -- Yes
        elseif(msgcontains(msg, "yes")) then  
                if(talkState[talkUser] == 1) then
                        if(getPlayerMoney(cid) == transaction[talkUser]) then
                                doPlayerRemoveMoney(cid, transaction[talkUser])
                                doPlayerSetBalance(cid, getPlayerBalance(cid)+ transaction[talkUser])
                                npcHandler:say("You deposited " .. transaction[talkUser] .. " gold coins to your bank account.", cid)
                                transaction[talkUser] = 0
                                talkState[talkUser] = 0
                        else
                                npcHandler:say("You don't have enought money.", cid)
                                transaction[talkUser] = 0
                                talkState[talkUser] = 1
                        end
                elseif(talkState[talkUser] == 3) then
                        if(doPlayerAddSafeMoney(cid, transaction[talkUser])) then
                                doPlayerSetBalance(cid, getPlayerBalance(cid)- transaction[talkUser])
                                npcHandler:say("You withdrawed " .. transaction[talkUser] .. " gold coins from your bank account.", cid)
                        else
                                npcHandler:say("You don't have anought capacity or slots in backpack to withdraw " .. transaction[talkUser] .. " gold.", cid)
                        end
                        transaction[talkUser] = 0
                        talkState[talkUser] = 0
                elseif(talkState[talkUser] == 5) then
                        if(transaction[talkUser] <= getPlayerMoney(cid)) then
                                doPlayerRemoveMoney(cid, transaction[talkUser])
                                doPlayerSetBalance(cid, getPlayerBalance(cid)+ transaction[talkUser])
                                npcHandler:say("You deposited " .. transaction[talkUser] .. " gold coins to your bank account.", cid)
                                transaction[talkUser] = 0
                                talkState[talkUser] = 0
                        else
                                npcHandler:say("You don't have enought money.", cid)
                                transaction[talkUser] = 0
                                talkState[talkUser] = 1
                        end
                elseif(talkState[talkUser] == 8) then
                        if(transaction[talkUser] <= getPlayerMoney(cid)) then
                                doPlayerRemoveMoney(cid, transaction[talkUser])
                                doPlayerSetBalance(cid, getPlayerBalance(cid)- transaction[talkUser])
                                npcHandler:say("You transfered " .. transaction[talkUser] .. " gold coins to " .. transfer_name[talkUser] .. "'s bank account.", cid)
                                    if(getPlayerByName(""..transfer_name[talkUser].."")) then
                                        doPlayerSetBalance(getPlayerByName(""..transfer_name[talkUser]..""), getPlayerBalance(getPlayerByName(""..transfer_name[talkUser].."")) + transaction[talkUser])
                                    else
                                        transferGold(""..transfer_name[talkUser].."", transaction[talkUser])
                                    end
                                transaction[talkUser] = 0
                                transfer[talkUser] = 0
                                transfer_name[talkUser] = ""
                                talkState[talkUser] = 0
                        else
                                npcHandler:say("You don't have enought money.", cid)
                                transaction[talkUser] = 0
                                talkState[talkUser] = 1
                        end
                end  
        elseif(msgcontains(msg, "no")) then
                npcHandler:say("The customer is king! Come back anytime you want to if you wish to withdraw your money.", cid)
                talkState[talkUser] = 0
	end
	-- WAGON TICKET
	if(msgcontains(msg, "ticket")) then
		if(getPlayerStorageValue(cid, 1131) < os.time()) then
			npcHandler:say("Do you want to purchase a weekly wagon ticket for 250 gold?", cid)
			talkState[talkUser] = 1
		end
	elseif(msgcontains(msg, "yes")) then
		if(talkState[talkUser] == 1) then
			if(getPlayerMoney(cid) >= 250) then
				doPlayerRemoveMoney(cid, 250)
				setPlayerStorageValue(cid, 1131, os.time() + 7 * 24 * 60 * 60 * 1000)
				npcHandler:say("Thank you for purchasing a wagon ticket.", cid)
			else
				npcHandler:say("You don't have enought money.", cid)
			end
			talkState[talkUser] = 0
		end
	elseif(talkState[talkUser] == 1) then 
		if(msgcontains(msg, "no")) then 
			npcHandler:say("No then.", cid)	
			talkState[talkUser] = 0
		end
	-- WAGON TICKET
	end
        return true
end
 
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())

[lagoa 10]

Ui... muito bom!!! O NPC parece que já foi... jaja testo aqui. Mas falta o script para viajar pelos vagões de Kazordoon!

[ViitinG 835]

Ve se esse de vagões está funcionando :

"data/actions/actions.xml"

<action fromaid="8034" toaid="8038" script="kazordoon/kazordoonOreWagons.lua"/>

"data/actions/kazordoon/kazordoonOreWagons.lua"

local nodes = {
	[8034] = {x = 32657, y = 31903, z = 8}, -- Depo
	[8035] = {x = 32606, y = 31905, z = 9}, -- Shops
	[8036] = {x = 32628, y = 31922, z = 11}, -- Temple
	[8037] = {x = 32576, y = 31973, z = 9}, -- Main Gate
	[8038] = {x = 32676, y = 31976, z = 15}, -- Steam Ship
}

function onUse(cid, item, fromPosition, itemEx, toPosition)
	if(getPlayerStorageValue(cid, 1131) > os.time()) then
		if(getPlayerStorageValue(cid, 1132) < 100) then
			setPlayerStorageValue(cid, 1132, math.max(0, getPlayerStorageValue(cid, 1132)) + 1)
		end
		doTeleportThing(cid, nodes[item.actionid])
		doSendMagicEffect(nodes[item.actionid], CONST_ME_TELEPORT)
	else
		doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "To travel by ore wagons you must purchase a wagon ticket from any kazordoon's merchant.")
	end
	return true
end

[lagoa 10]

Na interface, deu a seguinte mensagem de erro:

 

[8/5/2014 21:49:5] [Error - Action Interface] 

[8/5/2014 21:49:5] data/actions/scripts/kazordoon/kazordoonOreWagons.lua:onUse

[8/5/2014 21:49:5] Description: 

[8/5/2014 21:49:5] ...ata/actions/scripts/kazordoon/kazordoonOreWagons.lua:12: bad argument #3 to 'max' (number expected, got nil)

[8/5/2014 21:49:5] stack traceback:

[8/5/2014 21:49:5] [C]: in function 'max'

[8/5/2014 21:49:5] ...ata/actions/scripts/kazordoon/kazordoonOreWagons.lua:12: in function <...ata/actions/scripts/kazordoon/kazordoonOreWagons.lua:9>

[kaiquegabriel 171]

local nodes = {
    [8034] = {x = 32657, y = 31903, z = 8}, -- Depo
    [8035] = {x = 32606, y = 31905, z = 9}, -- Shops
    [8036] = {x = 32628, y = 31922, z = 11}, -- Temple
    [8037] = {x = 32576, y = 31973, z = 9}, -- Main Gate
    [8038] = {x = 32676, y = 31976, z = 15}, -- Steam Ship
}

function onUse(cid, item, fromPosition, itemEx, toPosition)
    if(getPlayerStorageValue(cid, 1131) > os.time()) then
        if(getPlayerStorageValue(cid, 1132) < 100) then
            setPlayerStorageValue(cid, 1132)
        end
        doTeleportThing(cid, nodes[item.actionid])
        doSendMagicEffect(nodes[item.actionid], CONST_ME_TELEPORT)
    else
        doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "To travel by ore wagons you must purchase a wagon ticket from any kazordoon's merchant.")
    end
    return true
end

 

Tenta assim, vê se dá algum erro.

[lagoa 10]

100%. Rep+ merecidamente aos dois! Obrigado.