metallove

cara olha meu topico
 
http://www.xtibia.com/forum/topic/168492-actionsnovo-sistema-de-pet/ -'

Ja fis, porem na hora de cura tem q ta com a target selecionada ao pet, e outra se usar a spells pra cura player tbm vai cura '-
 

local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_HEALING) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false) setCombatParam(combat, COMBAT_PARAM_TARGETPLAYERSORSUMMONS, true) setCombatParam(combat, COMBAT_PARAM_DISPEL, CONDITION_PARALYZE) setHealingFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 5, 5, 10, 12) function onCastSpell(cid, var) return doCombat(cid, combat, var) end
 
INPORTANTE TAG*
 

<instant name="pet real" words="exura pet" lvl="5" mana="80" prem="1" range="3" casterTargetOrDirection="1" blockwalls="1" aggressive="0" exhaustion="2000" groups="2,2000" icon="82" needlearn="0" event="script" value="healing/pet.lua"> <vocation id="1"/> <vocation id="2"/> <vocation id="3"/> <vocation id="4"/> <vocation id="5"/> <vocation id="6"/> <vocation id="7"/> <vocation id="8"/> </instant>
 
Lenbrando q os nome do arquivo tem que ta na pasta certa e tudo, no caso eu testei em ot 9.10, se kiser colocar ot 8.60 inferior tem q remove a linha groups e icon '-' se der erro reporte

fico mto grande '-'
SAPOKSPOAK

Bom galera, como to sempre presissando dessa wall e fica dificil usa no RAW resolvi coloca no RME,
vamos ao que intereça vai
 
Remere's Map Editor\data\860\tilesets.XML
 
E procure a seguinte linha

<brush name="stone wall"/>
 
e Em baixo Adcione essa linha...

<brush name="framework wall"/>
 
Ficando assim....

<brush name="stone wall"/> <brush name="framework wall"/>
 
Depois De ter Feito Isso va em walls.XML (NA MESMA PASTA)
 
E la em baixo adicione isso...
 

<brush name="framework wall" type="wall" server_lookid="1037"> <wall type="horizontal"> <item id="10227" chance="500"/> <item id="10229" chance="0"/> -- This needs to be here for backwards compability -- <item id="10235" chance="0"/> -- This needs to be here for backwards compability -- <item id="10245" chance="150"/> <item id="10246" chance="150"/> <door id="10271" type="normal" open="false"/> <door id="10272" type="normal" open="false"/> <door id="10273" type="normal" open="true"/> <door id="10276" type="locked" open="false"/> <door id="10277" type="locked" open="true"/> <door id="10280" type="quest" open="false"/> <door id="10281" type="quest" open="true"/> <door id="10284" type="magic" open="false"/> <door id="10285" type="magic" open="true"/> <door id="10264" type="hatch_window" open="false"/> <door id="10266" type="hatch_window" open="true"/> <door id="10262" type="window"/> </wall> <wall type="vertical"> <item id="10226" chance="400"/> <item id="10231" chance="0"/> -- This needs to be here for backwards compability -- <item id="10233" chance="0"/> -- This needs to be here for backwards compability -- <item id="10247" chance="150"/> <item id="10248" chance="150"/> <door id="10268" type="normal" open="false"/> <door id="10269" type="normal" open="false"/> <door id="10270" type="normal" open="true"/> <door id="10274" type="locked" open="false"/> <door id="10275" type="locked" open="true"/> <door id="10278" type="quest" open="false"/> <door id="10279" type="quest" open="true"/> <door id="10282" type="magic" open="false"/> <door id="10283" type="magic" open="true"/> <door id="10265" type="hatch_window" open="false"/> <door id="10267" type="hatch_window" open="true"/> <door id="10263" type="window"/> </wall> <wall type="corner"> <item id="10230" chance="1000"/> <item id="10232" chance="0"/> -- This needs to be here for backwards compability -- <item id="10234" chance="0"/> -- This needs to be here for backwards compability -- <item id="10236" chance="0"/> -- This needs to be here for backwards compability -- <item id="10237" chance="0"/> -- This needs to be here for backwards compability -- <item id="10238" chance="0"/> -- This needs to be here for backwards compability -- </wall> <wall type="pole"> <item id="10228" chance="1000"/> </wall> </brush>
 
ATENÇÂO:Você tem que tomar cuidado, pois você tem que adicionar este script depois de qualquer <brush>, e so pode haver apenas UM </brush> no final do script.
 
Bom, após você fazer isso, você precisa abrir seu RME, e ir até "Terrain Palette/Town"
Você tera algo assim...

 
Gente sei que é um Script, mto Simples+ pra qualque mapper ira FACILITAR muita a vida ^^
 
Se gostaram+rep so clica ali :arrow:

Galera tive criando aqui um sistema de pet sistem com Cada level que o player upa ele muda de pet,
colokei em actions pra evita spam no default, Script 100% By EU
 
New Version V3
 
 
Primeiro Vai na pasta data\actions\script e cria um arquivo com nome pet, e coloke isso dentro
 

function onUse(cid, item, frompos, item2, topos) storage = 4191 storsol = 1203 if #getCreatureSummons(cid) > 1 then doPlayerSendCancel(cid,"Your Demonio is already summoned.") end if getPlayerStorageValue(cid,storsol) == 1 then local z = getCreatureSummons(cid)[1] addEvent(setPlayerStorageValue,100,cid,storsol,-1) doPlayerSay(cid,"Back my summon!",TALKTYPE_ORANGE_1) doSendMagicEffect(getCreaturePosition(z), 2) doSendDistanceShoot(getCreaturePosition(z), getPlayerPosition(cid), 3) doRemoveCreature(z) end local summons = getCreatureSummons(cid) local pet = { ["Rotworm"] = {1,10}, ["Minotaur"] = {11,15}, ["Dwarf Soldier"] = {16,19}, ["Minotaur Guard"] = {20,25}, ["Dragon Hatchling"] = {26,32}, ["Dragon"] = {33,45}, ["Giant Spider"] = {46,55}, ["Dragon Lord"] = {56,120}, ["Grim Reaper"] = {121,160}, ["Ghastly Dragon"] = {161,200}, ["Undead Dragon"] = {201,1000} } for k,v in pairs(pet) do -- 1 if getPlayerStorageValue(cid,storsol) < 1 then if getPlayerLevel(cid) >= v[1] and getPlayerLevel(cid) < v[2] then -- 2 if (table.maxn(summons) < 1)then -- 3 x = doSummonCreature(k, getCreaturePosition(cid)) doConvinceCreature(cid, x) setPlayerStorageValue(cid,4194,1) setPlayerStorageValue(cid,storsol,1) doCreatureSay(cid, k ..", go!", TALKTYPE_ORANGE_1) doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 2) end end end end return true end
 
Aeee versão v3 totalmente configurada testada em 8.60 e 9.10, tirei o exausted do script, e Reemodifikei para
o pet volta sem bugs, gente dinovo se gostaram +rep se deu FAIL manda PM falando qual erro deu =D
Mto obrigado...
Se Gostou +rep Please
 
Essa versao foi pre-lançada, vo arruma ela + um poko =D

Bom presisso fala nada ne, nick ja diz tudo, entaum vamos la.
 
1° vai em data\creaturescripts\scripts crie um arquivo com nome pa.lua e dentro dele adicione isto
 

function onAdvance(cid, oldLevel, newLevel) local text = "Parabens, " .. getCreatureName(cid) .. " você chegou ao level 100, recebera por recompensa 5 dias de Premmy.!" if getPlayerLevel(cid) >= 100 and getPlayerStorageValue(cid, 32647) <= 0 then doPlayerSendTextMessage(cid,19,text) doPlayerAddPremiumDays(cid, 5) setPlayerStorageValue(cid, 32647, 1) end return true end
 
Depois em login.lua add isso
 

registerCreatureEvent(cid, "pa")
 
E por fim vai em data\creaturescripts\creaturescripts.XML e add isso
 

<event type="advance" name="pa" event="script" value="pa.lua"/>
 
Bom é isso Se gostaram +rep plx

Ola galera vo coloka um script ake mto bom, player fala !deposit VALOR ou !depositeall e deposita todo seu dinheiro, pra tira !withdraw VALOR
Ou !whitdrawall ppra tira tudo versao testada 8.60,8.62 e 9.10
 
Vamos la vai em \data\talkactions\scripts e dentro de script cria outra pasta Bank ficando assim \data\talkactions\scripts\Bank
 
Coloka os seguinte script la dentro
 
1°-- balance.lua
 

function onSay(cid, words, param) local config = { bankSystemEnabled = getBooleanFromString(getConfigInfo('bankSystem')), playerIsFighting = hasCondition(cid, CONDITION_INFIGHT) } if config.bankSystemEnabled == TRUE then if config.playerIsFighting == FALSE then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Your account balance is " .. getPlayerBalance(cid) .. ".") return TRUE else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Bank can not be used in fight.") return TRUE end else return FALSE end end
 
 
2°--deposit.lua
 

function onSay(cid, words, param) local config = { bankSystemEnabled = getBooleanFromString(getConfigInfo('bankSystem')), playerIsFighting = hasCondition(cid, CONDITION_INFIGHT) } if config.bankSystemEnabled == TRUE then if config.playerIsFighting == FALSE then if(param == "") then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Command requires param.") return TRUE end local m = tonumber(param) if(not m) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Command requires numeric param.") return TRUE end m = math.abs(m) if m <= getPlayerMoney(cid) then doPlayerDepositMoney(cid, m) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Alright, you have added the amount of " .. m .. " gold to your balance. You can withdraw your money anytime you want to. Your account balance is " .. getPlayerBalance(cid) .. ".") else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You do not have enough money.") end return TRUE else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Bank can not be used in fight.") return TRUE end else return FALSE end end
 
3°--deposit_all.lua
 

function onSay(cid, words, param) local config = { bankSystemEnabled = getBooleanFromString(getConfigInfo('bankSystem')), playerIsFighting = hasCondition(cid, CONDITION_INFIGHT) } if config.bankSystemEnabled == TRUE then if config.playerIsFighting == FALSE then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Alright, you have added the amount of " .. getPlayerMoney(cid) .. " gold to your balance. You can withdraw your money anytime you want to.") doPlayerDepositAllMoney(cid) return TRUE else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Bank can not be used in fight.") return TRUE end else return FALSE end end
 
4°--transfer.lua
 

function onSay(cid, words, param) local config = { bankSystemEnabled = getBooleanFromString(getConfigInfo('bankSystem')), playerIsFighting = hasCondition(cid, CONDITION_INFIGHT) } if config.bankSystemEnabled == TRUE then if config.playerIsFighting == TRUE then if(param == "") then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Command requires param.") return TRUE end local t = string.explode(param, ",") local m = tonumber(t[2]) local tmp = string.explode(t[2], ",") if(not m) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "No money specified.") return TRUE end m = math.abs(m) if m <= getPlayerBalance(cid) then if playerExists(t[1]) then doPlayerTransferMoneyTo(cid, t[1], m) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You have transferred " .. m .. " gold to " .. t[1] .. ". Your account balance is " .. getPlayerBalance(cid) .. " gold.") else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Player " .. t[1] .. " does not exist.") end else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "There is not enough gold on your account. Your account balance is " .. getPlayerBalance(cid) .. ". Please tell the amount of gold coins you would like to transfer.") end return TRUE else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Bank can not be used in fight.") return TRUE end else return FALSE end end
 
5°--transfer_all.lua
 

function onSay(cid, words, param) local config = { bankSystemEnabled = getBooleanFromString(getConfigInfo('bankSystem')), playerIsFighting = hasCondition(cid, CONDITION_INFIGHT) } if config.bankSystemEnabled == TRUE then if(param == "") then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Command requires param.") return TRUE end local t = string.explode(param, ",") if playerExists(param) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You have transferred " .. getPlayerBalance(cid) .. " gold to " .. param .. ".") doPlayerTransferAllMoneyTo(cid, param) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Player " .. param .. " does not exist.") return TRUE end else return FALSE end end
 
6°--withdraw.lua
 

function onSay(cid, words, param) local config = { bankSystemEnabled = getBooleanFromString(getConfigInfo('bankSystem')), playerIsFighting = hasCondition(cid, CONDITION_INFIGHT) } if config.bankSystemEnabled == TRUE then if config.playerIsFighting == FALSE then local m = tonumber(param) if(param == "") then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Command requires param.") return TRUE end if(not m) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Command requires numeric param.") return TRUE end m = math.abs(m) if m <= getPlayerBalance(cid) then doPlayerWithdrawMoney(cid, m) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Here you are, " .. m .. " gold. Your account balance is " .. getPlayerBalance(cid) .. ".") else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "There is not enough gold on your account.") end return TRUE else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Bank can not be used in fight.") return TRUE end else return FALSE end end
 
7° e ultimo---withdraw_all.lua
 

function onSay(cid, words, param) local config = { bankSystemEnabled = getBooleanFromString(getConfigInfo('bankSystem')), playerIsFighting = hasCondition(cid, CONDITION_INFIGHT) } if config.bankSystemEnabled == TRUE then if config.playerIsFighting == FALSE then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Here you are, " .. getPlayerBalance(cid) .. " gold.") doPlayerWithdrawAllMoney(cid) return TRUE else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Bank can not be used in fight.") return TRUE end else return FALSE end end
 
Feito Tudo isso va em data\talkactions\talkactions.xml e coloque as seguintes linhas
 
.
<talkaction words="!balance" event="script" value="Bank/balance.lua" /> <talkaction words="!deposit" event="script" value="Bank/deposit.lua" /> <talkaction words="!withdraw" event="script" value="Bank/withdraw.lua" /> <talkaction words="!depositall" event="script" value="Bank/deposit_all.lua" /> <talkaction words="!withdrawall" event="script" value="Bank/withdraw_all.lua" />
 
 
 
 
SE PREFERIREM FAZE DOWNLOAD AKI ESTA [download]http://www.4shared.com/file/1VBeZD2r/Bank.html?[/download]
 
 
Lenbrando que o script n é meu so tenho fais tempo n sei o nome do dono pode ser q ta na tag dentro dos script
 
PESO DESCULPA PELO TOPICO DESORGANIZADO, N SO MTO DE FASE POSTAGEMS
 
40% (by: ???)
60% (by:eu por ter trasido ao xtibia)
 
Se tiver algum outro post igual ou parecido me desculpe...Se gostaram
+REP

EDIT
 
Teleport Rune especial com exusted....(esse modo foi 100% eu que fis)
 

function onUse(cid, item, frompos, item2, topos) --teleporte Rune By snokiuthu local storage = 11548 -- n mexa local exhausted = 250 -- tempo em segundos if (getPlayerStorageValue(cid, storage) >= os.time()) then return doPlayerSendCancel(cid, "Você tem que esperar " .. getPlayerStorageValue(cid, storage) - os.time() .. " segundos para usar novamente.") end local effect = 10 local message = "You were teleported to "..getTownName(getPlayerTown(cid)).." town." local errormessage = "Sorry, you cannot use this scroll in a battle." local town = getTownTemplePosition(getPlayerTown(cid)) --- if getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE then return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, errormessage) end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, message) doTeleportThing(cid,town) doSendMagicEffect(town,effect) setPlayerStorageValue(cid,storage,os.time()+exhausted) return end
 
TAAG
 

<action itemid="2348" event="script" value="teleportrune.lua"/>
 
Post 100% by snokiuthu,se gostaram +REP :button_ok: :button_ok: