pisquila
Member
- Joined
- Nov 14, 2023
- Messages
- 48
- Reaction score
- 5
tfs 04 / 8.60
error that appears in the console:
the script part:
SCRIPT:
error that appears in the console:
[8:51:45.821] [Lua Error]
[8:51:45.821] [string "LuaInterface::loadBuffer"]:12: 'then' expected near 'Coinsount'
the script part:
for k, v in pairs(automatic_task) do
if getPlayerLevel(cid) >= v.level_min and getPlayerStorageValue(cid, v.storage) < Event Coinsount then
local amount = getPlayerStorageValue(cid, v.storage) <= 0 and 0 or getPlayerStorageValue(cid, v.storage)
str = str.."[+] "..v.name .." Task [+]\n\nMonster Count: ["..amount.."/"..Event Coinsount.."]\n\nMonsters Killing: "..getMonsterFromList(v.monsters_list)..".\n\nLevel: "..v.level_min.." or More.\n\nCan repeat: ".. ( Event Coinsan_repeat == true and "yes" or "no" )..".\n\nRewards: ".. (table.maxn(v.reward) > 0 and getItemsFromList(v.reward) or "Nothing") ..".\n\nExp: ".. (v.exp > 0 and v.exp or 0) ..".\n\n"
end
SCRIPT:
<?xml version="1.0" encoding="ISO-8859-1"?>
<mod name="Automatic Simple Task" version="1.0" author="Vodkart" contact="tibiaking.com" enabled="yes">
<config name="auto_stask"><![CDATA[
automatic_task = {
[1] = {name = "Bones", storage = 761000, monsters_list = {"Bones"}, can_repeat = false, level_min = 10, count = 2500, reward = {{6527,75}, {2160,100}, {8261,1}, {10314,1}}, exp = 500000},
[2] = {name = "Crystal Spider", storage = 761001, monsters_list = {"Crystal Spider"}, can_repeat = false, level_min = 10, count = 2500, reward = {{6527,75}, {2160,100}, {8261,1}, {10314,1}}, exp = 500000},
[3] = {name = "Damaged Worker Golem", storage = 761002, monsters_list = {"Damaged Worker Golem"}, can_repeat = false, level_min = 10, count = 2500, reward = {{6527,75}, {2160,100}, {8261,1}, {10314,1}}, exp = 500000},
[4] = {name = "Demon", storage = 761003, monsters_list = {"Demon"}, can_repeat = false, level_min = 10, count = 2500, reward = {{6527,75}, {2160,100}, {8261,1}, {10314,1}}, exp = 500000},
[5] = {name = "Dragon Lord", storage = 761004, monsters_list = {"Dragon Lord"}, can_repeat = false, level_min = 10, count = 2500, reward = {{6527,75}, {2160,100}, {8261,1}, {10314,1}}, exp = 500000},
[6] = {name = "Dragon", storage = 761005, monsters_list = {"Dragon"}, can_repeat = false, level_min = 10, count = 2500, reward = {{6527,75}, {2160,100}, {8261,1}, {10314,1}}, exp = 500000},
[7] = {name = "Earth Elemental", storage = 761006, monsters_list = {"Earth Elemental"}, can_repeat = false, level_min = 10, count = 2500, reward = {{6527,75}, {2160,100}, {8261,1}, {10314,1}}, exp = 500000},
[8] = {name = "Eternal Guardian", storage = 761007, monsters_list = {"Eternal Guardian"}, can_repeat = false, level_min = 10, count = 2500, reward = {{6527,75}, {2160,100}, {8261,1}, {10314,1}}, exp = 500000},
[9] = {name = "Ferumbras", storage = 761008, monsters_list = {"Ferumbras"}, can_repeat = false, level_min = 10, count = 2500, reward = {{6527,75}, {2160,100}, {8261,1}, {10314,1}}, exp = 500000},
[10] = {name = "Frost Dragon", storage = 761009, monsters_list = {"Frost Dragon"}, can_repeat = false, level_min = 10, count = 2500, reward = {{6527,75}, {2160,100}, {8261,1}, {10314,1}}, exp = 500000},
}
automatic_task_config = {
reward_type = MESSAGE_STATUS_CONSOLE_BLUE,
defeat_type = MESSAGE_STATUS_CONSOLE_ORANGE,
defeat_storage = 963850,
lvl_advance_control = 963851
}
function getItemsFromList(items)
local str = ''
if table.maxn(items) > 0 then
for i = 1, table.maxn(items) do
str = str .. items[2] .. ' ' .. getItemNameById(items[1])
if i ~= table.maxn(items) then str = str .. ', '
end
end
end
return str
end
function getMonsterFromList(monster)
local str = ''
if #monster > 0 then
for i = 1, #monster do
str = str .. monster
if i ~= #monster then str = str .. ', ' end
end
end
return str
end
function GiveRewardsTask(cid, items)
local backpack = doPlayerAddItem(cid, 7343, 1) -- backpackID
for _, i_i in ipairs(items) do
local item, amount = i_i[1],i_i[2]
if isItemStackable(item) or amount == 1 then
doAddContainerItem(backpack, item, amount)
else
for i = 1, amount do
doAddContainerItem(backpack, item, 1)
end
end
end
end
]]></config>
<event type="advance" name="TaskAutAdvance" event="script"><![CDATA[
domodlib('auto_stask')
function onAdvance(cid, skill, oldLevel, newLevel)
if (skill == SKILL__LEVEL) then
if getPlayerStorageValue(cid, automatic_task_config.lvl_advance_control) < newLevel then
for k, v in pairs(automatic_task) do
if v.level_min == newLevel then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "[Task Automatico] --> Voce Desbloqueou a "..v.name.." Task! Parabens!")
end
end
setPlayerStorageValue(cid, automatic_task_config.lvl_advance_control, newLevel)
end
end
return true
end]]></event>
<talkaction words="/task;!task" event="buffer"><![CDATA[
domodlib('auto_stask')
param, str = param:lower(),"Task(s) Disponiveis:\n\n"
if isInArray({"counter","contador","count"},param) then
setPlayerStorageValue(cid, automatic_task_config.defeat_storage, getPlayerStorageValue(cid, automatic_task_config.defeat_storage) <= 0 and 1 or 0)
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"[Task Automatico] --> O Contador Foi "..(getPlayerStorageValue(cid, automatic_task_config.defeat_storage) <= 0 and "Ativado" or "Desativado")..".") return true
end
for k, v in pairs(automatic_task) do
if getPlayerLevel(cid) >= v.level_min and getPlayerStorageValue(cid, v.storage) < Event Coinsount then
local amount = getPlayerStorageValue(cid, v.storage) <= 0 and 0 or getPlayerStorageValue(cid, v.storage)
str = str.."[+] "..v.name .." Task [+]\n\nMonster Count: ["..amount.."/"..Event Coinsount.."]\n\nMonsters Killing: "..getMonsterFromList(v.monsters_list)..".\n\nLevel: "..v.level_min.." or More.\n\nCan repeat: ".. ( Event Coinsan_repeat == true and "yes" or "no" )..".\n\nRewards: ".. (table.maxn(v.reward) > 0 and getItemsFromList(v.reward) or "Nothing") ..".\n\nExp: ".. (v.exp > 0 and v.exp or 0) ..".\n\n"
end
end
return doShowTextDialog(cid, 8983, str)
]]></talkaction>
<event type="login" name="TaskAutLogin" event="script"><![CDATA[
function onLogin(cid)
registerCreatureEvent(cid, "KillAutTask")
registerCreatureEvent(cid, "TaskAutAdvance")
return true
end]]></event>
<event type="kill" name="KillAutTask" event="script"><![CDATA[
domodlib('auto_stask')
function onKill(cid, target)
local str = ""
if isPlayer(cid) and isMonster(target) then
for task , info in pairs(automatic_task) do
if isInArray(info.monsters_list, getCreatureName(target):lower()) and getPlayerLevel(cid) >= info.level_min then
local ret = getPlayerStorageValue(cid, info.storage) <= 0 and 0 or getPlayerStorageValue(cid, info.storage)
if ret < info.count then
setPlayerStorageValue(cid, info.storage, getPlayerStorageValue(cid, info.storage) <= 0 and 1 or (getPlayerStorageValue(cid, info.storage)+1))
if getPlayerStorageValue(cid, automatic_task_config.defeat_storage) <= 0 and getPlayerStorageValue(cid, info.storage) < info.count then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"[Task Automatico] --> Voce Matou [" .. getPlayerStorageValue(cid, info.storage) .. "/" .. info.count .. "] da Task do " .. info.name .. ".")
end
if getPlayerStorageValue(cid, info.storage) >= info.count then
if info.exp > 0 then doPlayerAddExp(cid, info.exp) str = str.."".. (str == "" and "" or ", ") .." "..info.exp.." de Exp" end
if table.maxn(info.reward) > 0 then GiveRewardsTask(cid, info.reward) str = str.."".. (str == "" and "" or ", ") ..""..getItemsFromList(info.reward) end
doPlayerSendTextMessage(cid, automatic_task_config.reward_type, "[Task Automatico] --> Voce Completou a "..info.name.." Task. PREMIOS: "..(str == "" and "nenhuma" or str))
if info.can_repeat == true then
setPlayerStorageValue(cid, info.storage, 0)
end
end
end
end
end
end
return true
end]]></event>
</mod>
Attachments
-
asdasdasdsadsa.webp5.2 KB · Views: 8 · VirusTotal
Last edited: