Preciso de ajuda para converter Script

Postado Maio 2, 2017 8 anos

Autor

os scripts são esses:

Esse é para o peso na bag influenciar na velocidade do player

Spoiler

local function percent(par1,par2)
local per = (par1/100)*par2
return per
end

function onThink(cid, interval)
if not(getConfigInfo('speedChange'))then return end
local speed,base,livre = getCreatureSpeed(cid), getPlayerMaxCap(cid), getPlayerFreeCap(cid)
local nspeed = percent(speed,livre/(base/100))
if(getCreatureCondition(cid,CONDITION_HASTE) == false)then
if(speed < 200)then
doChangeSpeed(cid, 200)
elseif(speed > 1000)then
doChangeSpeed(cid, (1000-speed))
else
doChangeSpeed(cid, nspeed)
end
end
end

esse é um sistema de sentar de recuperação de Hp e mana

Spoiler

events = {} config = { sit = {hp = 5, mana = 5}, outfit = {lookType = 357}, storage = 21211 } local outfits = { [1] = {lookType = 200}, -- o numero 1 é o ID da vocação e 200 é o ID do looktype. [2] = {lookType = 201}, -- o numero 2 é o ID da vocação e 201 é o ID do looktype. [3] = {lookType = 202}, -- o numero 1 é o ID da vocação e 202 é o ID do looktype. } function onSay(cid, words, param, channel) setPlayerStorageValue(cid, config.storage, getPlayerStorageValue(cid, config.storage) == -1 and 1 or -1) doCreatureSetNoMove(cid, getPlayerStorageValue(cid, config.storage) == 1 and true or false) if getPlayerStorageValue(cid, config.storage) == 1 then doPlayerSay(cid, "Ufa, Relaxando") doSetCreatureOutfit(cid, config.outfit, -1) doSendMagicEffect(getCreaturePosition(cid), 69) doSitRelax(cid, config.sit) else doPlayerSay(cid, "OPA, hora de volta ao trabalho") doRemoveCondition(cid, CONDITION_OUTFIT) stopEvent(events[getPlayerGUID(cid)]) local voc_id = getPlayerVocation(cid) if getPlayerVocation(cid) > 0 then doSetCreatureOutfit(cid, outfits[voc_id], -1) end end return true end function doSitRelax(cid, formula) if not isCreature(cid) then return LUA_ERROR end doCreatureAddHealth(cid, formula.hp) doCreatureAddMana(cid, formula.mana) doSendMagicEffect(getCreaturePosition(cid), 69) events[getPlayerGUID(cid)] = addEvent(doSitRelax, 5000, cid, formula) end