OWeen

Aumenta o 1500 até quando ele travar 
Acho que no máximo 20000 pega depois de não me engano da erro

local config = { velocidade = 200, -- intervalo entre os giros (quanto menor, mais rapido) hits = 40, -- quantos hits vai dar msg = "Cyclone", -- msg ao soltar a spell key = 13871, -- storage que sera utilizado pro cooldown cooldown = 6, -- tempo em segundos de cooldown entre um uso da spell e outro. effect1 = 22, -- efeito de distancia que vai ficar rodando effect2 = 269, -- efeito no sqm do item effect3 = 37, -- efeito ao castar a spell effect4 = 341 -- efeito ao acertar a roda no player } local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 255) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -150.0, 0, -260.0, 0) local condition = createConditionObject(CONDITION_PARALYZE) setConditionParam(condition, CONDITION_PARAM_TICKS, 20000) setConditionParam(condition, CONDITION_PARAM_SPEED, -1500) setConditionFormula(condition, -0.2, 0, -0.2, 0) setCombatCondition(combat1, condition) function onTargetCreature(cid, target) doSendMagicEffect(getCreaturePosition(target), config.effect4) end setCombatCallback(combat, 4, "onTargetCreature") local arr = { {1, 1, 1}, {1, 3, 1}, -- area que vai acertar a spell enquanto estiver rodando {1, 1, 1}, } local area = createCombatArea(arr) setCombatArea(combat, area) function initEffect(position) for i = 0, 3 do local pos = {x = position.x, y = position.y, z = position.z} local dir = getPosByDir(pos, i) doSendDistanceShoot(position, dir, config.effect1) end addEvent(doSendMagicEffect, 300, position, config.effect2) return true end function middleEffect(cid, param, position, lim, count) n = count or 0 if isCreature(cid) and n < lim then for i = 0, 3 do local pos = {x = position.x, y = position.y, z = position.z} local pos2 = {x = position.x, y = position.y, z = position.z} local dir = getPosByDir(pos, i) local dir2 = getPosByDir(pos2, i + 1 <= 3 and i + 1 or 0) doSendDistanceShoot(dir, dir2, config.effect1) end doCombat(cid, combat, param) addEvent(middleEffect, config.velocidade, cid, param, position, lim, n + 1) end return true end function endEffect(position) for i = 0, 3 do local pos = {x = position.x, y = position.y, z = position.z} local dir = getPosByDir(pos, i) doSendDistanceShoot(dir, position, config.effect1) end local item = getTileItemById(position, 2180) if item.uid > 0 then doRemoveItem(item.uid) end return true end function onCastSpell(cid, var) if getPlayerStorageValue(cid, config.key) - os.time() <= 0 then setPlayerStorageValue(cid, config.key, os.time() + config.cooldown) local position = getCreaturePosition(cid) doCreatureSay(cid, config.msg, 20) local orb = doCreateItem(2180, 1, position) addEvent(endEffect, 8.55 * 1000, position) doSendMagicEffect(position, config.effect3) initEffect(position) addEvent(middleEffect, 200, cid, var, position, config.hits) else doPlayerSendCancel(cid, "You're exhausted.") return false end return true end setConditionParam(condition, CONDITION_PARAM_SPEED, -1500)
 
 
onde tá -1500 é a Speed que o alvo fica no caso vai zerar por que o maximo de speed é 1500 então ela vai ficar nula deixando o player Imovel... caso o player use spell que da speed ele ira remover parte da paralisia mas ela vai se renovar a cada hit que ele tomar



Qualquer coisa só comentar
 
 
Abraços VLW!

Aaaah já vi meu erro 
Na linha onde tá combat1 troca pra combat
 
setCombatCondition(combat1, condition)  
setCombatCondition(combat, condition)

Eu mesmo já resolvi hehe
vou deixar as scripts aki pra quem quiser

testado no DXP
 
HeldRecovery --> para helds no estilo X
HeldRecovery2 --> para helds no estilo Y
heldRecovery.lua heldRecovery2.lua
 
São Actions de itens creio eu que muitos sabem como configurar

Bom galera eu resolvi fazer o Vault System a pedido de um amigo meu e decidi compartilhar com vocês.
 
Testado em 8.60 TFS 0.4
 
EDIT -- O script foi arrumado, pois havia um bug que o player ganhava golds.
 
Vamos lá.
 
1° - Vá em data/actions/scripts e crie um arquivo chamado vault.lua, e dentro você coloca isso:
local vaultStorage = 99991 -- storage em que ficara armazenado os golds ------------------//* Functions //------------------- local function getPlayerFreeSpace(cid) -- by MaTTch     local checkSlots, space = {3,5,6,10}, 0     local function getContainerFree(container)         local free = 0         if(not isContainer(container.uid)) then             return free         end         for i = 0, (getItemInfo(container.itemid).maxItems -1) do             local item = getContainerItem(container.uid, i)             if(item.itemid == 0) then                 free = free + 1             elseif(isContainer(item.uid)) then                 free = free + getContainerFree(item)             end         end         return free     end     for _, i in ipairs(checkSlots) do         local slotItem = getPlayerSlotItem(cid, i)         if(i ~= CONST_SLOT_BACKPACK and slotItem.itemid == 0) then             space = space + 1         elseif(isContainer(slotItem.uid)) then             space = space + getContainerFree(slotItem)         end     end     return space end local function withdrawMoneySecurity(cid, value, storage) -- by MaTTch     local storageMoney, countValue = getPlayerStorageValue(cid, storage), 0     local config = {         [1] = {ITEM_CRYSTAL_COIN, math.floor(value/getItemInfo(ITEM_CRYSTAL_COIN).worth)},         [2] = {ITEM_PLATINUM_COIN, math.floor((value/getItemInfo(ITEM_PLATINUM_COIN).worth)-(math.floor(value/getItemInfo(ITEM_CRYSTAL_COIN).worth)*100))},         [3] = {ITEM_GOLD_COIN, math.floor(value%100)}     }     for i = 1, #config do         local count = config[i][2]         if(count > 0) then             while(count > 0) do                 storageMoney = getPlayerStorageValue(cid, storage)                 local a, itemCap = count > 100 and 100 or count, getItemInfo(config[i][1]).weight                 if(getPlayerFreeCap(cid) >= (itemCap*a)) then                     if(getPlayerFreeSpace(cid) >= 1) then                         doPlayerAddItem(cid, config[i][1], a)                         setPlayerStorageValue(cid, storage, (storageMoney - (getItemInfo(config[i][1]).worth * a)))                         countValue = countValue + (getItemInfo(config[i][1]).worth * a)                         count = count - a                     else                         return doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "You do not have enough space in container. You have took "..countValue.." gold"..(countValue > 1 and "s" or "").." from vault.")                     end                 else                     return doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "You do not have enough cap. You have took "..countValue.." gold"..(countValue > 1 and "s" or "").." from vault.")                 end             end         end     end     return doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "You have took "..countValue.." gold"..(countValue > 1 and "s" or "").." from vault.") end ------------------//* End Functions //------------------- function onUse(cid, item, fromPosition, itemEx, toPosition)     local cidMoney, vaultMoney = getPlayerMoney(cid), getPlayerStorageValue(cid, vaultStorage)     if(vaultMoney <= 0) then         if(cidMoney <= 0) then             return doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "You do not have money.")         end         doPlayerRemoveMoney(cid, cidMoney)         setPlayerStorageValue(cid, vaultStorage, cidMoney)         doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "You have added "..cidMoney.." gold"..(cidMoney > 1 and "s" or "").." to vault. Now your money is kept in the vault chest, you can take it whenever you want.")     else         withdrawMoneySecurity(cid, vaultMoney, vaultStorage)     end     return true end 2° - Agora em data/actions/actions.xml adicione a tag:
<action itemid="ID" event="script" value="vault.lua"/> Em ID você escolhe o id do item que quiser.
 
3° - Agora em data/creaturescripts/scripts crie um arquivo com o nome vaultLook.lua, e dentro coloque isso:
local config = { vaultId = ID, -- itemid do vault vaultStorage = 99991 -- storage em que ficara armazenado os golds } function onLook(cid, thing, position, lookDistance) local show = getPlayerStorageValue(cid, config.vaultStorage) if(thing.itemid == config.vaultId) then local str = "You see"..(getItemInfo(thing.itemid).article and " "..getItemInfo(thing.itemid).article.." " or " ")..getItemInfo(thing.itemid).name..".\nYou have "..(show < 0 and 0 or show).." gold"..(show > 1 and "s" or "").." in the vault." if(getPlayerCustomFlagValue(cid, PLAYERCUSTOMFLAG_GAMEMASTERPRIVILEGES)) then str = str .. "\nItemID: ["..thing.itemid.."].\nPosition: [X: "..getThingPos(thing.uid).x.."] [Y: "..getThingPos(thing.uid).y.."] [Z: "..getThingPos(thing.uid).z.."]." end doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, str) return false end return true end 4° - Agora em data/creaturescripts/creaturescripts.xml adicione a tag:
<event type="look" name="vaultLook" event="script" value="vaultLook.lua"/> 5° - Agora em data/creaturescripts/login.lua lá embaixo adicione junto dos outros:
registerCreatureEvent(cid, "vaultLook") E agora o sistema já esta pronto para ser usado.
 
- Aah mas como funciona?
Você clica uma vez no cofre (vault) e deposita todo seu dinheiro nele, ao clicar de novo você pega-os de volta, e caso não tiver cap ou espaço na bag você pega somente o possível e o restante ficara la até você quiser pegar.
 
--> Versão do Vault System em editText
 
Créditos:
MaTTch (eu)

@Xz Death Xz gostaria de saber qual o motivo de você estar alterando o nome das funções, em todo caso vá em creatureevents.h e mude o nome da mesma função para essa nova, e é claro, em todos os outros arquivos que utilizam essa função!

Olá usuários do Tibia King, eu peguei esse servidor aki mesmo do TK, e editei um pouco, coloquei ele na versão 8.60, e adicionei uma coisas a mais também, esse servidor é a base do Nto Hero, que um membro postou aki esses dias atras.
 
vocations Account Manager
Vocations Vip 
Vocations De Quest
Quests
Adicionei:
Cast System Hp e Mana por % Pode usar mais de 255 effect no servidor - Graças ao Kotzlety que disponibilizou os tutoriais pro TK Entrar na area de proteção sai o pz Client pode por mais sprites, falta uns 15 mil ainda para atingir o limite Player Morre e não perde itens Anti Divulgação Bixo nace com o player na tela  
Imagens
 
 
Bom Galera é isso :D
 
Download Server Hero + Client
 
Scan - Não sei por que todos esses vírus, mais eu deixo o avast ativado e ele não acusa poha nenhuma
 
Créditos
 

Sim é na source... provavelmente quando a fizeram esqueceram de configurar os basicos e quanto ao seu erro provavelmente voce esta esquecendo de trocar o ID voce tem que ver o ID do seu player no caso tem que olhar qual é o numero do seu char o numero 1 normalmente é o account manager... queria te ajudar no skype mas o PC aki é muito fraquinho qualquer coisa ele trava ai complica

então seguinte ele não dá ao player os itens iniciais devido a um erro para abrir o inventario voce tem que abrir o SQL STudio abrir o arquivo SQL do servidor procurar na opção Player_item e add os itens inicias manualmente
 
Abra o Editor de account
va em DATABASE
ADD DATABASE
Clique numa pastinha na lateral da barra branca na aba de ADD DATABASE
selecione o arquivo SQL do seu servidor
depois vai em DATABASE
Connect
Va em Tables
Procure player_itens
va em data na aba que abriu e add os codigos la
 
ID - SID - PID - Item - Count
1    101    1    2120    1    
1    102    2    2580    1    
1    103    3    1987    1    
1    104    4    2550    1    
1    105    5    1988    1    
1    106    6    2382    1    
1    107    7    11989    1   
 
as ID dos itens Iniciais são essas
está sem o poke.info
 
 
OBS:
Você abre a opção e vai em DATA
ID = Player ID
Para saber qual é a ID do seu char basta olhar em players e depois DATA na segunda linha vai ter ID é só olhar o numero que esta antes do nome do seu char
SID = é a ordem do numero deixe como está
PID = é em qual parte do SET Item que esta por exemplo cabeça, pé, mão... Aconselho a colocar o numero que deixei...
Item = é a ID do item que vai estar no local marcado no PID, as que deixei aí são o KIT Inicial
Count = quantidade daquele item, tambem aconselho deixar os que marquei
 
Apos colocar esse itens tem 2 passos a se completar
1° - Em ATRIBUTES não pode ser NULL, para arrumar basta dar um duplo clique con o botão esquerdo que ele ira abrir uma aba, simplesmente desmarque a opção NULL
2° - Você precisa salvar as alterações, ao lado do sinal de +, voce ira achar um V e um X
Onde V salva e X cancela
opos fazer isso basta logar sua acc
 
OBS 2
o Char não pode estar logado se não o SQL nao salva as mudanças
 
Espero ter ajudado!!
 
Se não tem o SQL Edittor vou deixar download aki
 
Account_Editor.exe

Esta é uma mensagem automática! Este tópico foi movido para a área correta.
Pedimos que você leia as regras do fórum.
 
@Xz Death Xz
 

Para adicionar um item ao servidor, você precisa :
 
1- Um editor de itens. Conheço somente 2, OtItemEditor e o ItemEditor.
 
Abra seu editor de itens.
Nele, abra o seu items.otb (DATA/ITEMS) crie uma novo item (CTRL + I) ou clique em Edit - Create Item
 
Então, EM (CLIENT ID), coloque o ID da sprite(item).
 
A partir disto, você edite a seu gosto com os atributos.
 
A partir do 'Server ID', você edita ao items.xml !
 
Fim
 
Gostou, ajudei ? Me dê um gostei !
 

Segure esse aqui amigo! Espero ter ajudado  
Remere's_Map.rar