Help ~~ Quests Sem Scripts No Rme 8.60

[Erickrusha 16]

Amigos do Xtibia como fazer quests sem script ? ~~

Se tem como ... me expliquem por favor ;D

[miguel223 98]

Depende cara, tem ots que existe uma action id que da pra faze quest com elas, se a sua tiver vc vai faze assim a quest:

- Coloque a bau no chão

- Abra ele e no action id coloque 2000

- Adicione o item que vc quer que a quest de

- No unique id coloque qualquer numero, tente por um que n tenha ja no seu ot, para n da confusão, tipo, ponha um numero bem zuado, 98943 <<<<.

 

Se por acaso n tive essa action id 2000 vc vai faze o seguinte:

- Abra SEUOT/data/actions >> action.xml e coloque isso - - - - <action actionid="2000" event="script" value="quests/system.lua"/> - - - - .

- Crie uma pasta chamada quests e dentro dela um .lua chamado system e coloque isso dentro:

 

local specialQuests = {

[2001] = 30015 --Annihilator

}

 

local questsExperience = {

[30015] = 10000

}

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

if(getPlayerCustomFlagValue(cid, PLAYERCUSTOMFLAG_GAMEMASTERPRIVILEGES)) then

doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF, cid)

return true

end

 

local storage = specialQuests[item.actionid]

if(not storage) then

storage = item.uid

if(storage > 65535) then

return false

end

end

 

if(getPlayerStorageValue(cid, storage) > 0) then

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "It is empty.")

return true

end

 

local items = {}

local reward = 0

 

local size = isContainer(item.uid) and getContainerSize(item.uid) or 0

if(size == 0) then

reward = doCopyItem(item, false)

else

for i = 0, size do

local tmp = getContainerItem(item.uid, i)

if(tmp.itemid > 0) then

table.insert(items, tmp)

end

end

end

 

size = table.maxn(items)

if(size == 1) then

reward = doCopyItem(items[1], true)

end

 

local result = ""

if(reward ~= 0) then

local ret = getItemDescriptions(reward.uid)

if(reward.type > 0 and isItemRune(reward.itemid)) then

result = reward.type .. " charges " .. ret.name

elseif(reward.type > 0 and isItemStackable(reward.itemid)) then

result = reward.type .. " " .. ret.plural

else

result = ret.article .. " " .. ret.name

end

else

if(size > 20) then

reward = doCopyItem(item, false)

elseif(size > 8) then

reward = getThing(doCreateItemEx(1988, 1))

else

reward = getThing(doCreateItemEx(1987, 1))

end

 

for i = 1, size do

local tmp = doCopyItem(items, true)

if(doAddContainerItemEx(reward.uid, tmp.uid) ~= RETURNVALUE_NOERROR) then

print("[Warning] QuestSystem:", "Could not add quest reward")

else

local ret = ", "

if(i == 2) then

ret = " and "

elseif(i == 1) then

ret = ""

end

 

result = result .. ret

ret = getItemDescriptions(tmp.uid)

if(tmp.type > 0 and isItemRune(tmp.itemid)) then

result = result .. tmp.type .. " charges " .. ret.name

elseif(tmp.type > 0 and isItemStackable(tmp.itemid)) then

result = result .. tmp.type .. " " .. ret.plural

else

result = result .. ret.article .. " " .. ret.name

end

end

end

end

 

if(doPlayerAddItemEx(cid, reward.uid, false) ~= RETURNVALUE_NOERROR) then

result = "You have found a reward weighing " .. getItemWeight(reward.uid) .. " oz. It is too heavy or you have not enough space."

else

result = "You have found " .. result .. "."

setPlayerStorageValue(cid, storage, 1)

if(questsExperience[storage] ~= nil) then

rep.add(cid, 5, math.random(1,255))

doPlayerAddExp(cid, questsExperience[storage])

doSendAnimatedText(getCreaturePosition(cid), questsExperience[storage], TEXTCOLOR_WHITE)

end

end

 

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, result)

return true

end

 

 

local specialQuests = {

[2001] = 30015 --Annihilator

}

 

local questsExperience = {

[30015] = 10000

}

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

if(getPlayerCustomFlagValue(cid, PLAYERCUSTOMFLAG_GAMEMASTERPRIVILEGES)) then

doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF, cid)

return true

end

 

local storage = specialQuests[item.actionid]

if(not storage) then

storage = item.uid

if(storage > 65535) then

return false

end

end

 

if(getPlayerStorageValue(cid, storage) > 0) then

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "It is empty.")

return true

end

 

local items = {}

local reward = 0

 

local size = isContainer(item.uid) and getContainerSize(item.uid) or 0

if(size == 0) then

reward = doCopyItem(item, false)

else

for i = 0, size do

local tmp = getContainerItem(item.uid, i)

if(tmp.itemid > 0) then

table.insert(items, tmp)

end

end

end

 

size = table.maxn(items)

if(size == 1) then

reward = doCopyItem(items[1], true)

end

 

local result = ""

if(reward ~= 0) then

local ret = getItemDescriptions(reward.uid)

if(reward.type > 0 and isItemRune(reward.itemid)) then

result = reward.type .. " charges " .. ret.name

elseif(reward.type > 0 and isItemStackable(reward.itemid)) then

result = reward.type .. " " .. ret.plural

else

result = ret.article .. " " .. ret.name

end

else

if(size > 20) then

reward = doCopyItem(item, false)

elseif(size > 8) then

reward = getThing(doCreateItemEx(1988, 1))

else

reward = getThing(doCreateItemEx(1987, 1))

end

 

for i = 1, size do

local tmp = doCopyItem(items, true)

if(doAddContainerItemEx(reward.uid, tmp.uid) ~= RETURNVALUE_NOERROR) then

print("[Warning] QuestSystem:", "Could not add quest reward")

else

local ret = ", "

if(i == 2) then

ret = " and "

elseif(i == 1) then

ret = ""

end

 

result = result .. ret

ret = getItemDescriptions(tmp.uid)

if(tmp.type > 0 and isItemRune(tmp.itemid)) then

result = result .. tmp.type .. " charges " .. ret.name

elseif(tmp.type > 0 and isItemStackable(tmp.itemid)) then

result = result .. tmp.type .. " " .. ret.plural

else

result = result .. ret.article .. " " .. ret.name

end

end

end

end

 

if(doPlayerAddItemEx(cid, reward.uid, false) ~= RETURNVALUE_NOERROR) then

result = "You have found a reward weighing " .. getItemWeight(reward.uid) .. " oz. It is too heavy or you have not enough space."

else

result = "You have found " .. result .. "."

setPlayerStorageValue(cid, storage, 1)

if(questsExperience[storage] ~= nil) then

rep.add(cid, 5, math.random(1,255))

doPlayerAddExp(cid, questsExperience[storage])

doSendAnimatedText(getCreaturePosition(cid), questsExperience[storage], TEXTCOLOR_WHITE)

end

end

 

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, result)

return true

end

 

 

 

Ajudei? De +rep então, o que custa?

[KamuiRunt 55]

Amigos do Xtibia como fazer quests sem script ? ~~

Se tem como ... me expliquem por favor ;D

 

Não há como '-'

E por que motivo você quer fazer sem ?