Programa��o e Scripting - OTserv

Npc Addon 8.4

Wed, 07 Jan 2009 01:21:02 -0200

procurei e nao achei nenhum npc que pe�a os itens pra coletar e troca por addons :/ se alguem tiver da versao 8.4 porfavor :)

Barbarian Headsplitter(moster)

Tue, 06 Jan 2009 19:46:00 -0200

Um Mostro Rox Com Varias Magias Rox Ele Solta e Tem um dano bom e mais pra lvl alto espero q gosten
Va em data/monster
Crie qualquer arquivo em XML e add! isso dentro dele

QUOTE

Agora Vai Em data/monster/monster XML

QUOTE

pronto Mostro Feito Aproveite Bem ele ^^

Mensagem Ao Matar Um Monstros

Tue, 06 Jan 2009 18:52:58 -0200

Gente, queria um script que ao matar um monstro com um s� hit, aparecesse alguma mensagem.

Por exemplo, ao matar um wolf com um s� hit, aparecesse algo do tipo 'headshot'

Ser� que � possivel fazer isso ? Se algu�m poder me ajudar, eu agrade�o !

Colored Spells

Tue, 06 Jan 2009 18:52:25 -0200

Hi XTibia =D
Venho lhes traser um code interessante e legal hehehe =D

Basicamente o code se baseia no seguinte.... Voc� pode alterar o tipo de fala do player ao usar uma spell, para a fala de monsters. Este code funciona tanto para o SVN quanto para o TFS, mas no meu caso estou usando o TFS de exemplo. Ent�o agora vamos come�ar......

Em configmanager.cpp abaixo de

QUOTE

m_confString[REPLACE_KICK_ON_LOGIN] = getGlobalString(L, "replaceKickOnLogin", "yes");

Adicione isto aqui:

CODE

m_confString[COLORED_SPELLS] = getGlobalString(L, "useColoredSpells", "no");

Em configmanager.h abaixo de:

QUOTE

REPLACE_KICK_ON_LOGIN,

Adicione isto:

CODE

COLORED_SPELLS,

Em game.cpp abaixo na fun��o

QUOTE

bool Game::playerSaySpell(Player* player, SpeakClasses type, const std::string& text)

Troque isto

QUOTE

return internalCreatureSay(player, SPEAK_SAY, text);
else if(result == TALKACTION_FAILED)
return true;

return false;
}

Por isto aqui:

CODE

        if(g_config.getString(ConfigManager::ANIMATED_SPELLS) == "yes"){
            return internalCreatureSay(player, SPEAK_MONSTER_SAY, text);
        }else{
            return internalCreatureSay(player, SPEAK_SAY, text);
       }
    else if(result == TALKACTION_FAILED){
        return true;
    }

    return false;
}

E pra finalizar no seu config.lua adicione isto:

CODE

useColoredSpells = "yes"

Em caso de yes os player falaram as spells com as falas de monstros =D
Em caso de no ele vai ficar normal.

Cr�ditos? N�o sei mas pegueis das sources do Quickly OTServ
At� mais galerinha =D

[pedido] 4 Magias Novas :}

Tue, 06 Jan 2009 14:34:29 -0200

Eu queria 4 magias, igual a exevo gran mas flam, mas uma de energy pra druid/exevo gran mas energy, uma de sd estilo gran mas mort pra sorc/exevo gran mas mort, uma de holy pra pally/exevo gran mas san, e uma de exori pra kina/exevo gran mas exori

vlw :]

Como Fa�o Um Ot 7.6 Virar 8.4 ?

Tue, 06 Jan 2009 13:20:51 -0200

Eae galerinha, BELEZURA ?

Eu queria perguntar como que faz um ot 7.6 virar 8.4, porque eu ja vi mapas de ot 7.6 igualzinhos em vers�es mas avan�adas.

Se alguem puder me ajudar ficarei grato.

Flws

[pedido] Preciso De Um Oraculo!

Tue, 06 Jan 2009 00:34:16 -0200

Olha eu sei que existem milhares de tutos ensinando a fazer um oraculo mais ja tentei muitos e nenhum deu certo. por favor algum scripter me ajuda ! bom se quiser postar um script ae pa eu tenta mais eu pesso q me passe o msn pra conversar =//
meu sv eh 7.92 .xml e yurots

to a procura de um que de certo a mais de 3 semanas ...

vlwwsS =)

Tutorialcompletodecomocolocarminhamagianova

Mon, 05 Jan 2009 02:23:08 -0200

Opa ^^ blz...
Ae ja to come�ando a trabalhar... ja fiz uma nova magia aki pro meu OT e gostaria de compartilha-la com vcs...
Tpw no meu ot 8.4 a magia \"Divine Caldera\" de paladin, mais conhecida como exevo mas san da debug, entao eu apaguei ela e para os paladins nao ficarem sem magias criei essa otra aki... espero q gostem..

Sem mais conversa aki vai como colocar essa magia no seu OT...

primeiro abra um bloco de notas, dai copia esse codigo igualzinho t� la no bloco de notas

CODE

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_HITAREA)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -1.5, -50, -2.3, -50)

local arr = {
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0},
{0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0},
{0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0},
{0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0},
{1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1},
{0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0},
{0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0},
{0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0},
{0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
}

local area = createCombatArea(arr)
setCombatArea(combat, area)

function onCastSpell(cid, var)
return doCombat(cid, combat, var)
end

depois q copiar clique em arquivo, salvar como, e vai na sua pasta data/spells/scripts e salva la com o nome \"drift.lua\" sem as aspas. (aten��o, na hora de salvar, aparece la *.txt vc tem q apagar tudo e deixar o nome do arkivo tudo em branco dai vc escreve \"drift.lua\" mas sem as aspas).
Depois de ter criado esse script, vc vai ate a pasta data/spells e clica no arquivo \"spells.xml\" com o botao direito, coloca para abrir com > Bloco de Notas
dai vc vai ver mta coisa, mta mesmo... dai vc aperta CTRL + F e escreve Attack Spells... tudo bem.. agora vc vc vai ver la q vai ta escrito assim  ok agora vc clica na frente de attack spells e de 2 enters, dps vc copia esse codigo aki e cola la

CODE

ok agora ta tudo pronto, vc soh tem q fazer u seguinte, abre seu sever q ja vai tar a magia la, mas se seu sever ja tiver aberto nao tem necessidade de reinicia-lo, apenas digite /reload spells
ta bom agora eh u seguinte, esse spell q eu colokei eu criei de acordo com as rates do meu sever, agora se vc kiser mudar alguma coisa eu vou te explicar o basico...
ond ta escrito \"words\" eh a palavra q vc tem q dizer para a magia sair, se vc kiser trocar eh soh mudar la, ond ta \"lvl\" obviamente eh o lvl q presisa pra usa-la, \"mana\" eh a mana q presisa, \"prem\" eh se presisa de ser premmy pra usar a magia, 0 significa q nao e 1 significa q sim, \"exhaustion\" eh o tempo q presisa esperar pra soltar a magia de novo, quanto menor o numero menos tempo presisa, \"needlearn\" eh se presisa de ir na loja comprar a magia, 0 = n�o e 1 = sim, \"script\" eh akele arkivo q faz a magia acontecer q fizemos no inicio do tutorial, \"vocation name\" eh a classe q pode usar a magia, no caso eu fiz pra paladin, mas se vc kiser colocar pra otras classes eh soh add la os nomes delas...

Tpw o meu tutorial ta bem explicadinho pq quando comecei procurei tutoriais soh q eles tavam complicados e eu nao entendia, entao se tiver algum novato kerendo colocar, acho q esse ta bom e da pra entender bem...

Bem acho q isso eh tudo, se tiver meio desorganizado ow feio ow errado desculpa ae mas eh meu primeiro trabalho aki no forum ^^

a e tpw sobre as cores, negrito, italico esses trem... eu nao colokei pq olha a hora q fiz esse tutorial, to morrendo de sono e pregui�a.. desculpa ai, mas fiz o meu melhor nesse meu primeiro tutorial...

quem gostou ai da um UP ^^

VLW AE.. ABRASS

EDIT: eu to editando aki pra colocar uma img da magia

[pedido] Item De Skill 7.8

Sun, 04 Jan 2009 21:08:02 -0200

Estou procurando um script para algum item que adicione temporariamente uma quantdade "x" de pontos de skill em uma skill.

Se algu�m puder me ajudar eu agrade�o mto, s� precisa postar como aumentar um skill (ex: sword) e indicar como modificar para adicionar outras quantidades em outra skill q eu me viro fazendo o resto.

Eu n sou muito bom com scripts, peguei uns scripts aki para add skills s� q eram permanentes e adicionavam aleatoriamente os skills.

vlw

[pedido] Scripter Me Ajude !

Sun, 04 Jan 2009 20:57:29 -0200

Faz tempo que preciso de uma ajuda com um npc aqui sera que algum scripter pode me ajuda ?!?!
se puder passa msn aeww ..

vlwwSS ;x

[pedido] Sistema !rank Para Ot 8.4

Sun, 04 Jan 2009 18:06:57 -0200

Queria um sistema de !rank para ot 8.4, exemplo !rank "sword, !rank "level.. (Y)

[8.40+] Rusty Legs And Armor

Sun, 04 Jan 2009 11:40:34 -0200

Padr�o de postagem:
Nome: Rusty Legs and Armor
Vers�o: [8.40+]
Tipo do script: Action
Servidor Testado: xx
Autor: tarjei

Explicando:
Rusty Armor id = 9808
Notas: Capaz de transformar-se em Paladin Armor, Crown Armor, Golden Armor, Scale Armor, Plate Armor, Chain Armor, Brass Armor, Blue Robe, Knight Armor ou
Magic Plate Armor quando desenferrujada.

Rusty Legs id = 9811
Notas: Capaz de transformar-se em Studded Legs, Chain Legs, Plate Legs, Knight Legs, e possivelmente outros, tal como a
Rusty Armor, tem a chance de falhar. Voc� pode desfazer a ferrugem usando um Rust Remover.

Rust Remover id = 9930
Notas: Novo item adicionado no Winter Update 2008. Pode ser usado para remover a ferrugem da
Rusty Armor ou Rusty Legs.

Vamos come�ar:

Va at� a pasta "Data/actions/scripts" e copie um dos arquivos e cole
renomeando-o para "rustyremover" e cole isto dentro:

rustyremover.lua

QUOTE

local config =
{ -- armors
[9808] = {{1, 400, 2464}, {400, 700, 2465}, {700, 900, 2483}, {900, 1000, 2463}}, -- Common
[9809] = {{1, 250, 2464}, {250, 400, 2465}, {400, 600, 2483}, {600, 850, 2463}, {850, 950, 2476}, {950, 1000, 8891}}, -- Semi-Rare
[9810] = {{1, 250, 2465}, {250, 450, 2483}, {450, 600, 2463}, {600, 750, 2476}, {750, 850, 8891}, {850, 930, 2487}, {930, 970, 2466}, {970, 1000, 2472}}, -- Rare

-- legs
[9811] = {{1, 400, 2464}, {400, 700, 2465}, {700, 900, 2483}, {900, 1000, 2463}}, -- Common
[9812] = {{1, 250, 2464}, {250, 400, 2465}, {400, 600, 2483}, {600, 850, 2463}, {850, 950, 2476}, {950, 1000, 8891}}, -- Semi-Rare
[9813] = {{1, 250, 2465}, {250, 450, 2483}, {450, 600, 2463}, {600, 750, 2476}, {750, 850, 8891}, {850, 930, 2487}, {930, 970, 2466}, {970, 1000, 2472}}, -- Rare
}

function onUse(cid, item, fromPosition, itemEx, toPosition)
local random = math.random(1, 1300)

for i, v in pairs(config) do
if(itemEx.itemid == i) then
for i = 1, table.maxn(v) do
if(random >= v[1] and random < v[i][2]) then
items = v[i][3]
end
end
if random <= 1000 then
doTransformItem(itemEx.uid, items)
doRemoveItem(item.uid, 1)
doSendMagicEffect(toPosition, CONST_ME_POFF)
else

doRemoveItem(itemEx.uid)
doSendMagicEffect(toPosition, CONST_ME_POFF)
doRemoveItem(item.uid, 1)
end
elseif not(itemEx.itemid == i) or not(itemEx.itemid == v[i][3]) then
doPlayerSendCancel(cid, "You can not use this object.")

end

end

return TRUE
end

Va at� a pasta "[i]data/actions" abra o arquivo actions.xml e adicione a seguinte tag:

actions.xml

QUOTE

Creditos: tarjei

Preciso De Npc Que D� Addon Por Itens 8.4

Sat, 03 Jan 2009 22:54:22 -0200

Ol� pessoal!

Estou precisando de um npc que d� addon por itens....
Mas eu preciso de um npc que tenha o demonhunter e o yalaharian
J� procurei v�rios t�picos e n�ao achei o npc que da addon por item do yalaharian e do demonhunter...
Se alguem tiver ai posta por favor....

Obrigado.....

[pedido] Por Favor Ajudem Com O Acc Manager

Sat, 03 Jan 2009 19:32:30 -0200

Gente estou fazendo um ot que tem rookguard, e as acc sao feitas peloa account manager, quero criar contas sem voca��o nenhuma alguem pode me ajudar??

vlwws ;D

[8.31+]npc Bank Para Ot Sql

Sat, 03 Jan 2009 00:59:10 -0200

Fiz esse npc pq n vi nenhuma que funcionasse com o novo Jiddo System

Acho que s� funciona em The forgotten server, o resto � lixo, portanto n�o far� diferen�a

QUOTE

S� funciona em tfs 0.3.0 alpha 4 +, pois os outros n�o possuem algumas fun��es

Ele faz deposit,withdraw e transfer sem bugs nenhum.

Para pega-lo crie em npcs

bank.xml

CODE

<?xml version="1.0" encoding="UTF-8"?>
<npc name="BankMan" script="data/npc/scripts/bank.lua" walkinterval="25" floorchange="0" access="5" >
    <health now="150" max="150"/>
    <look type="132" head="115" body="0" legs="114" feet="0" addons="3" corpse="2212"/>

    <parameters>
        <parameter key="message_greet" value="Hello |PLAYERNAME|. Welcome to my bank, you wanna {deposit}, {withdraw} or {transfer}."/>
        <parameter key="message_alreadyfocused" value="You are drunked ? I talk with you."/>
        <parameter key="message_farewell" value="Goodbye. I wanna see your money... oh you again."/>
    </parameters>
</npc>

Em npcs/scripts

bank.lua

CODE

local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
local talkState = {}

function onCreatureAppear(cid)                npcHandler:onCreatureAppear(cid)            end
function onCreatureDisappear(cid)            npcHandler:onCreatureDisappear(cid)            end
function onCreatureSay(cid, type, msg)            npcHandler:onCreatureSay(cid, type, msg)        end
function onThink()                    npcHandler:onThink()                    end

function creatureSayCallback(cid, type, msg)
    if(not npcHandler:isFocused(cid)) then
        return false
    end

    local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid

--------------------MESSAGES------------------------------------------------------------------------------
    if msgcontains(msg, 'deposit') then
        selfSay('Please tell me how much gold it is you would like to deposit.', cid)
        talkState[talkUser] = 1

    elseif msgcontains(msg, 'withdraw') then
        selfSay('Please tell me how much gold you would like to withdraw.', cid)
        talkState[talkUser] = 3

    elseif msgcontains(msg, 'transfer') then
        selfSay('Please tell me the amount of gold coins you would like to transfer.', cid)
        talkState[talkUser] = 5

    elseif msgcontains(msg, 'balance') then
        n = getPlayerBalance(cid)
        selfSay('Your balance are '..n..' golds.', cid)
        talkState[talkUser] = 0


----------------------DEPOSIT-------------------------------------------------------
    elseif talkState[talkUser] == 1 then
        if msgcontains(msg, 'all') then
            n = getPlayerMoney(cid)
            selfSay('Do you want deposit '..n..' golds ?', cid)
            talkState[talkUser] = 2
        else
            n = getNumber(msg)
            selfSay('Do you want deposit '..n..' golds ?', cid)
            talkState[talkUser] = 2
        end

    elseif talkState[talkUser] == 2 then
        if msgcontains(msg, 'yes') then
            if getPlayerMoney(cid) >= n then
                doPlayerDepositMoney(cid,n)
                selfSay('a', cid)
                talkState[talkUser] = 0
            else
                selfSay('You don\'t have money.', cid)
            end
        else
                selfSay('Ok then', cid)
        end

----------------------WITHDRAW---------------------------------------------------------------------

    elseif talkState[talkUser] == 3 then
        if msgcontains(msg, 'all') then
            n = getPlayerBalance(cid)
            selfSay('Do you want withdraw '..n..' golds ?', cid)
            talkState[talkUser] = 4
        else
            n = getNumber(msg)
            selfSay('Do you want withdraw '..n..' golds ?', cid)
            talkState[talkUser] = 4
        end

    elseif talkState[talkUser] == 4 then
        if msgcontains(msg, 'yes') then
            if getPlayerBalance(cid) >= n then
                doPlayerWithdrawMoney(cid, n)
                selfSay('Here you are, '..n..' gold. Now your balance account is ' ..getPlayerBalance(cid)..' golds.', cid)
                talkState[talkUser] = 0
            else
                selfSay('There is not enough gold on your account', cid)
            end
        else
                selfSay('Ok then', cid)
        end

----------------------TRANSFER----------------------------------------------------------------------------------------

    elseif talkState[talkUser] == 5 then
        if msgcontains(msg, 'all') then
            n = getPlayerBalance(cid)
            selfSay('Who would you like transfer '..n..' gold to?', cid)
            talkState[talkUser] = 6
        else
            n = getNumber(msg)
            selfSay('Who would you like transfer '..n..' gold to?', cid)
            talkState[talkUser] = 6
        end

    elseif talkState[talkUser] == 6 then
        p = msg
        selfSay('So you would like to transfer '..n..' gold to '..p..'?', cid)
        talkState[talkUser] = 7

    elseif talkState[talkUser] == 7 then
        if msgcontains(msg, 'yes') then
            if getPlayerBalance(cid) >= n then
                if doPlayerTransferMoneyTo(cid, p, n) == TRUE then
                    selfSay('You have transferred '..n..' gold to '..p..' and your account balance is '..getPlayerBalance(cid)..' golds.', cid)
                    talkState[talkUser] = 0
                else
                selfSay('This player does not exist. Please tell me a valid name!', cid)
                end
            else
                selfSay('There is not enough gold on your account', cid)
            end
        else
            selfSay('Ok then', cid)
        end


    end
end

npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())

-- function maded by Gesior--
function getNumber(txt) --return number if its number and is > 0, else return 0
x = string.gsub(txt,"%a","")
x = tonumber(x)
if x ~= nill and x > 0 then
return x
else
return 0
end
end

Foi feito por mim e se quiser postar em outro forum coloque os creditos

Zemaneroxx De Volta Com 7.81 Muito Roxx

Sat, 03 Jan 2009 00:00:27 -0200

ANO NOVO OT ANTIGO ATENDENDO A INUMEROS PEDIDOS E POR NAUM HAVER NENHUM OT 7.81 NO OTSERVLIST - NOS RESOLVEMOS REVIVER O PASSADO MUITO GLORIOSO DO ZEMANEROXX 7.81 - E ESTAMOS PRETENDENDO DEIXAR ELE O ANO INTEIRO S� RESETEAR EM 01.01.2010 - S�RIO OK
ENTRE CONFIRA E FIQUE COM A GENTE - DOWNLOAD DE IPCHANGER E CLIENTE 7.81 NA NOSSA PAGINA ONLINE ZEMANEROXX ABAIXO ESCRITA.

SE ESTA CANSSADO DESSES OTS FULEROS 8.10 / 8.31 / 8.40 ENTRE NESSE OT MUITO ROXX 7.81. 24 HORAS ONLINE DE VERDADE SUA MADRUGADA AGORA FICA MAIS ALEGRE.

http://zemaneroxx.no-ip.info:8090 ou no account manager - IP - zemaneroxx.no-ip.info - 1/1.

estou te aguardando pra gente reviver o passado venha rapido.

PS. GOD ZAGOR.

Eventide Script Library

Fri, 02 Jan 2009 14:18:08 -0200

fun��es:

QUOTE

changeLookDir(cid, dire��o)
sendo que as dire��es s�o:
right
left
south
north

addNumberOnArray(array, numero)
adiciona determinad numero em todos os elementos da array

getArrPosByName(array, nome)
procura determinado nome em uma array e retorna sua posi��o

isPlayerOnArea(player, alt, lar, esq)
verifica se determinado player est� em determinada �rea sendo que:
alt � a altura da �rea, lar a largura e esq � o canto superior esquerdo da �rea

getCountOnArr(array, search)
conta a quantia de determinada coisa em determinada array
sendo que search � o que voc� procura

doCalculateArray(array, conta)
calcula todos os elementos da array, sendo que, conta � o tipo de calculo que vai fazer.
tipo de calculos:
plus - soma tudo
less - subtrai tudo
mult - multiplica tudo
div - divide tudo

Library:

CODE

--[[
------------------------------------------------------
Eventide Script Library
Version: 1
Author: Gustavo Junqueira (Eventide)
-------------------------------------------------------
]]
     function addNumberOnArray(array, number)
             for ret = 1,table.getn(array) do
                     if type(array[ret]) == number then
                         array[ret] + number
                     end
             end
     end

     function getArrPosByName(array, name)
             for ret = 1,table.getn(array) do
                     if array[ret] == name then
                         return ret
             break
                     end
             end
     end

     function isPlayerOnArea(name, alt, lar, esq)
             if getPlayerPosition(getPlayerByName(name)) == esq then
                 return TRUE
             else
                     for T = 1,alt do
                         Pos = {x = esq.x, y = esq.y + T, z = esq.z}
                             if getPlayerPosition(getPlayerByName(name)) == Pos then
                                 return TRUE
                             end
                     end
                         for T = 1,lar do
                                 if lar == alt then
                                     Pos = {x = esq.x - T, y = esq.y + T, z = esq.z}
                                         if getPlayerPosition(getPlayerByName(name)) == Pos then
                                             return TRUE
                                         end
                                 else
                                         for U = 1,alt do
                                             Pos = {x = esq.x - T, y = esq.y + U, z = esq.z}
                                                 if getPlayerPosition(getPlayerByName(name)) == Pos then
                                                     return TRUE
                                                 end
                                         end
                                 end
                         end
             end
     end

     function getCountOnArr(array, search)
         count = {0}
             for T = 1,#array do
                     if array[T] == search
                         table.insert(count, 0)
                     end
             end
         final = #count
         return final
     end

     function doCalculateArray(array, calc)
             if calc == plus then
                 final = math.floor(string.explode(table.concat(array, "+")))
             elseif calc == less then
                 final = math.floor(string.explode(table.concat(array, "-")))
             elseif calc == mult then
                 final = math.floor(string.explode(table.concat(array, "*")))
             elseif calc == div then
                 final = math.floor(string.explode(table.concat(array, "/")))
             else
                 return FALSE
             end
         return final
     end

     function changeLookDir(cid, dir)
         pp = getPlayerPosition(cid)
             if dir == north then
                 tp1 = {x = pp.x, y = pp.y - 1, z = pp.z}
                 tp2 = {x = pp.x, y = pp.y + 1, z = pp.z}
                 doTeleportThing(cid, tp1, TRUE)
                 doTeleportThing(cid, tp2, FALSE)
             elseif dir == south then
                 tp1 = {x = pp.x, y = pp.y + 1, z = pp.z}
                 tp2 = {x = pp.x, y = pp.y - 1, z = pp.z}
                 doTeleportThing(cid, tp1, TRUE)
                 doTeleportThing(cid, tp2, FALSE)
             elseif dir == right then
                 tp1 = {x = pp.x - 1, y = pp.y, z = pp.z}
                 tp1 = {x = pp.x + 1, y = pp.y, z = pp.z}
                 doTeleportThing(cid, tp1, TRUE)
                 doTeleportThing(cid, tp2, FALSE)
             elseif dir == left then
                 tp1 = {x = pp.x + 1, y = pp.y, z = pp.z}
                 tp1 = {x = pp.x - 1, y = pp.y, z = pp.z}
                 doTeleportThing(cid, tp1, TRUE)
                 doTeleportThing(cid, tp2, FALSE)
             else
                 return FALSE
             end
     end

para instalar simplesmente copie e cole isso no seu global.lua
caso seu server seja TFS 0.3, va na pasta data/lib e cole a library no arquivo function.lua

Scripts

Thu, 01 Jan 2009 20:47:41 -0200

Ta aki depois de procurar bastante.. axei um pacote de scripts sem KL..

Proveitem...

http://rapidshare.com/files/178842801/Scripts_and_more.zip

Invasao Por Talkaction Para Ot Sql!

Thu, 01 Jan 2009 14:06:04 -0200

Ol� galera, estou aqui para passar mais uma boa ideia minha a voces:
Quer fazer invasao em Ot Sql e noa consegue? se consegue sua invasao e de apenas um bicho e sem mensagem?
noa gosta do comando /m? Pois entao seus problemas acabaram!

Pois � vamos acabar com a enrola e vamos ao que intere�a:

Em data\talkaction\scripts crie uma pasta chamada invasao, copie qualquer arquivo do scripts passe para a pasta invasao, renomeie para demon.lua e apague o conteudo do mesmo. Dentro de demon.lua coloque isso:

function onSay(cid, words, param)
monstro1 = "demon
monstro2 = "orshabaal"
monstro3= "minishabaal"

monster1 = {x=524, y=458, z=7}
monster2 = {x=542, y=491, z=7}
monster3 = {x=589, y=454, z=7}
monster4 = {x=545, y=463, z=7}
monster5 = {x=578, y=478, z=7}
monster6 = {x=548, y=491, z=7}
monster7 = {x=589, y=414, z=7}
monster8 = {x=515, y=425, z=7}
monster1pos = getThingfromPos(monster1)
monster2pos = getThingfromPos(monster2)
monster3pos = getThingfromPos(monster3)
monster4pos = getThingfromPos(monster4)
monster5pos = getThingfromPos(monster5)
monster6pos = getThingfromPos(monster6)
monster7pos = getThingfromPos(monster7)
monster8pos = getThingfromPos(monster8)

if getPlayerAccess(cid) >= 1 then
doSummonCreature(monstro1,monsterpos1)
doSummonCreature(monstro1,monsterpos2)
doSummonCreature(monstro1,monsterpos3)
doSummonCreature(monstro1,monsterpos4)
doSummonCreature(monstro1,monsterpos5)
doSummonCreature(monstro1,monsterpos6)
doSummonCreature(monstro2,monsterpos7)
doSummonCreature(monstro3,monsterpos8)

broadcastMessage("Um orshabaal invadiu a cidade tal com uma escolta de varios demons e um minishabaal", MESSAGE_EVENT_ADVANCE)

end
end

em data\talkactions\talkactions.xml adcione:

13540)
vippos = {x=423, y=1010, z=7}
templepos = {x=427, y=504, z=7}

if item.actionid == 13541 and vip == 1 THEN
getThingfromPos(playerpos)
doSendMagicEffect(playerpos,2)
doTeleportThing(cid,vippos)
doSendMagicEffect(vippos,10)
doPlayerSendTextMessage(cid,"Bem Vindo a area vip".)
else
doPlayerSendCancel(cid,"Esta area � exclusiva para players vips".)
getThingfromPos(playerpos)
doSendMagicEffect(playerpos,2)
doTeleportThing(cid,templepos)
doSendMagicEffect(templepos,10)
end
end

em data/movements/movements.xml coloque la no final:

Agora vamos as cores:
vermelho= e a action da vip caso vc ja tenha se n�o tiver abaixo explicarei
rosa= posi��o da cidade vip
azul= posi��o do templo
roxo= action id do portaal, porta ou qualquer item que voce colocar com esse action id ja funcionar�
verde= mensagem que enviar� ao player se ele tiver vip e chegar na area vip
laranja= mensagem que enviar� ao player se ele N�O tiver vip.

explica�ao: quando o player COM vip ficar ou entrar no item que voce pos o action id da cor roxa, ele ser� teletransportado pra posi��o que voce pos da cor rosa(cidade vip) e receber� a mensagem que voce pos da cor verde. Agora quando o player SEM vip ficar ou entrar no item que voce pos o action id da cor roxa, ele ser� teletransportado pra posi��o que voce pos da cor azul(templo) e receber� a mensagem que voce pos da cor laranja.

Agora a talkaction que vai adcionar vip:

em data/talklactions/script copie qualquer arquivo la renomeie para addvip.lua, apague todo conteudo do mesmo e adcione isso:

function onSay(cid, words, param)

-- configs
access = 1
days = 15
-- end configs

player = getPlayerByName(param)
daysvalue = days*3600*24
storageplayer = getPlayerStorageValue(player,13540)
timenow = os.time()
if storageplayer == -1 or storageplayer == 0 then
time = timenow+daysvalue
else
time = storageplayer+daysvalue
end

if param ~= "" then
if getPlayerGroupId(cid) >= access then
doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Foram adcionados ".. days .." dias de VIP no seu character.")
setPlayerStorageValue(player,13540,time)
quantity = math.floor((getPlayerStorageValue(player,13540) - timenow)/(3600*24))
doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Voc� tem ".. quantity .." dias de VIP restantes.")
else
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Somente jogadores com acesso maior que "..access.." podem adcionar vips.")
end

end

end

em data/talkactions.xml adcione no final:

Aqui a unica coisa que voce pode(apenas nada mais) editar e isso:
-- configs
access = 1
days = 15 <<<-- end configs

que � a quantidade de dias que o player receber� de vip.
P.S= APENAS OTSERV'S SQL ACEITAM ESSE SCRIPT DA ADCIONAR VIPS.

Prono espero ter ajudado, lembrando esse e meu primeiro t�pico desculpe qualquer coisa errada. Erros de portugues por favor ignorem.

Creditos:
porta ou portal vip=100% a mim (tava sem ideia sentei no sof� e come�ei fazer ^^)
adcionar vip= 1% a mim e 99% a um cara ai que nao lembro o nome de outro Forum.

Por Favor comentem.

Duvida Quanto A Scripts No Ot

Thu, 01 Jan 2009 00:57:27 -0200

Galera... eu estou com umas duvidas bobas... se alguem que souber mecher com scripts
puder me ajudar... deixa o msn que eu add!!

MUITO OBRIGADO ^^

Crie Suas Quest�s De Uma Maneira Rapida E Facil.

Wed, 31 Dec 2008 20:30:36 -0200

Aqui est� uma nova maneira de criar suas quests.

Vamos la.

Primeiramente, crie um arquivo com o nome quests.lua dentro da pasta data/actions/scripts
Em seguida, adicione o seguinte c�digo � ela:

QUOTE

local quests =
{

[8165] = {
storageId = 12000,
rewardId = 2487,
count = 1
},

function useQuestChest(cid, quest)
local queststatus = getPlayerStorageValue(cid, quest.storageId)
if queststatus == -1 then
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You have found a " .. getItemName(quest.rewardId) .. ".")
doPlayerAddItem(cid, quest.rewardId, quest.count)
setPlayerStorageValue(cid, quest.storageId, 1)
else
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "It is empty.")
end
end

function onUse(cid, item, frompos, item2, topos)
if quests[item.uid] ~= nil then
useQuestChest(cid, quests[item.uid])
end
return TRUE
end

-Mais como funciona?
Simples. Se voc� que adicionar uma nova quests ao seu servidor, basta editar os seguintes campos:

8165 = � o uniqueid da quest.
12000 = � o n�mero de storage ID (o que indica se voc� fez ou n�o aquela a��o).
2487 = � o ID do item que deseja ter na quest, que no caso uma crown armor.
1 = � a quantidade de itens que o jogador ira receber ao fazer a quest, no caso so 1.

Bem, feito a primeira parte, � so adicionar ent�o a quest no arquivo actions.xml, dentro da pasta data/actions, ficaria assim:

QUOTE

8165" script="quest.lua" />

Agora, para adicionar mais quests no quest.lua, basta duplicar a seguinte parte (e assim por diante):

QUOTE

[8165] = {
storageId = 12000,
rewardId = 2487,
count = 1
},

Ent�o ficaria assim no quest.lua:

QUOTE

local quests =
{

[8165] = {
storageId = 12000,
rewardId = 2487,
count = 1
},

[8166] = {
storageId = 12001,
rewardId = 2487,
count = 1
},

function useQuestChest(cid, quest)
local queststatus = getPlayerStorageValue(cid, quest.storageId)
if queststatus == -1 then
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You have found a " .. getItemName(quest.rewardId) .. ".")
doPlayerAddItem(cid, quest.rewardId, quest.count)
setPlayerStorageValue(cid, quest.storageId, 1)
else
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "It is empty.")
end
end

function onUse(cid, item, frompos, item2, topos)
if quests[item.uid] ~= nil then
useQuestChest(cid, quests[item.uid])
end
return TRUE
end

E assim no actions.xml:

QUOTE

8165" script="quest.lua" />
8166" script="quest.lua" />

Obs: Nuca se esque�a de trocar o campo uniqueid e storage do arquivo para cada item. Eu coloquei o storageid para iniciar em 12000, para n�o acontecer nenhum tipo de conflito de storages no servidor.

Qualquer d�vida, poste aqui.

Fireworks Rocket! Criatividade Ao Extremo...

Wed, 31 Dec 2008 16:38:42 -0200

Encontrei essa action na net e achei muito interessante e espero que gostem.

Primeiramente os cr�ditos v�o para slawkens!

Como isto funciona?
Simples, voc� colocar um firework (Id: 6576) sobre um fire field, e automaticamente come�a a contagem,
e depois de 5 segundos "BOOM"...

Vamos trabalhar?!

actions/scripts/fireworks.lua

QUOTE

function onUse(cid, item, fromPosition, itemEx, toPosition)
if fromPosition.x ~= CONTAINER_POSITION then
fireWorkRocketBoom(fromPosition)
else
doSendMagicEffect(fromPosition, CONST_ME_HITBYFIRE)
doSendMagicEffect(fromPosition, CONST_ME_EXPLOSIONAREA)
doCreatureSay(cid, "Ouch! Rather place it on the ground next time.", TALKTYPE_ORANGE_1)
doCreatureAddHealth(cid, -10)
end
doRemoveItem(cid, item.uid, 1)
return TRUE
end

Adicione a seguinte tag em actions/actions.xml

QUOTE

Agora vamos para as movements:
movements/script/fireworksrocket.lua

QUOTE

--by slaw
--Config
local timeToBoom = 5
local fireFields = {1487, 1488, 1489, 1492, 1493, 1494}

function fireWorkTimer(seconds, pos, itemid)
local tmp = getTileItemById(pos, itemid)
if tmp.uid == FALSE then
return FALSE
end

if seconds == 0 then
fireWorkRocketBoom(pos)
doRemoveItemFromPos(pos, itemid)
return TRUE
end

doSendAnimatedText(pos, seconds, 150)

seconds = seconds - 1
addEvent(fireWorkTimer, 1000, seconds, pos, itemid)
end

function onAddItem(moveitem, tileitem, pos)
pos.stackpos = STACKPOS_TOP_FIELD
if isInArray(fireFields, getThingFromPos(pos).itemid) == TRUE then
fireWorkTimer(timeToBoom, pos, moveitem.itemid)
end

return TRUE
end

Agora em movements.xml adicione a tag:

QUOTE

Agora uma das partes mais importantes! Abra seu global.lua ou function.lua e adicione isto! (Tome muito cuidado ao editar esse arquivo e aconcelho voc�s a fazer uma copia do mesmo antes de edita-lo!!!)

QUOTE

function fireWorkRocketBoom(fromPosition)
local tmpPos = {}
local i = 4
while(i >= 1) do

tmpPos = {x=fromPosition.x - i, y=fromPosition.y - i, z=fromPosition.z, stackpos=0}
if isSightClear(fromPosition, tmpPos, FALSE) == TRUE then
if(hasProperty(getThingFromPos(tmpPos).uid, CONST_PROP_BLOCKINGANDNOTMOVEABLE) ~= TRUE) then
doSendDistanceShoot(fromPosition, tmpPos, 3)
addEvent(doSendMagicEffect, 350, tmpPos, math.random(CONST_ME_FIREWORK_YELLOW, CONST_ME_FIREWORK_BLUE))
break
end
end
i = i - 1
end
end

Pronto agora s� voc� entrar em seu ot e comemorar o ano novo em grande estilo!

Aten��o; para um funcionamento correto voc� precisa ter a fun��o "doRemoveItemFromPos" e caso voc� n�o tenha abra seu global.lua
ou function.lua e adicione o seguinte:

QUOTE

function doRemoveItemFromPos(position, itemid, count)
local tmp = count or 1
local item = getTileItemById(position, itemid)
if item.uid ~= FALSE then
return doRemoveItem(item.uid, tmp)
end

return FALSE
end

Feliz ano novo e n�o esque�am de comentar!

Como Fazer Bps De Ssa Para Comprar Na Alavanca

Wed, 31 Dec 2008 16:10:28 -0200

Fala galeraa to trazendo aqui como bota bp de stone skin amulet pra vender na alavanca,Nao sei se ja existe esse topico mais mesmo assim vou colocar pra vcs.

Primeiro va na pasta do seu otserver/data/actions/scripts e cria uma pasta chamada Potions-Runes, vc pode mudar o nome se vc quiser.

Depois copie qualquer arquivo e cole dentro da pasta e renomei-o para bpssa abra esse arquivo e cole isto \/

QUOTE

function onUse(cid, item, frompos, item2, topos)

container = doPlayerAddItem(cid, 5926, 1)

if item.itemid == 1945 and doPlayerRemoveMoney(cid,3000) == 1 then
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doTransformItem(item.uid,item.itemid+1)

elseif item.itemid == 1946 and doPlayerRemoveMoney(cid,3000) == 1 then
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doAddContainerItem(container, 2197, 5)
doTransformItem(item.uid,item.itemid-1)

else
doPlayerSendCancel(cid,"Sorry, you don't have enough money!")
end
return 1
end

Vc escolhe o id da bp por exemplo se vc quiser a bp roxa,bp cinza, no caso � o da caveira.

Vc escolhe o pre�o da bp que no caso � de ssa e est� 3k.

Esse � o id do item , ou do amulet , ou da runa , ou de poitons que vc quer coloca paara vender no caso � o id do stone skin amulet,n bote em 1 s�, bote o id aonde est� todos 2197 voce coloque o id de que vc quiser.

Esse vc escolhe quantas Charges vc quer por exemplo esse o "ssa" vai sair 5 charges ai fica de acordo com vc :D

Agora vai em data/actions/actions.xml e bote isso \/

QUOTE

8019" script="Potions-Runes/bpssa.lua"/>

Esse � o numero que vc coloca de acordo pra sair o item no caso � o 8019 ai vc tem que ir no map editor e bota na alavanca 8019 pra sair a bp que vc fez.

Isso � a pasta que vc crio e fez a bp no caso "Potions-Runes"/o arquivo que vc renomeo no caso "bpssa.lua"

Pronto sua bp de "ssa" est� feita agora se vc quiser faze outras basta troka os ids e criar outros arquivos com outros nomes.

By:Lucasatak

Creditos pra mim ai :)

Action Sing! News

Wed, 31 Dec 2008 11:08:59 -0200

Ol�, Venho Aqui Trazer Para O xtibia uma Action Minha Eu Que Desenvouvi ela..

Va Na Pasta Data/action/scripts copie um Arquivo .lua, renomei para placa delete tudo que tem dentro e coloque isso:

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

doSendAnimatedText(getPlayerPosition(cid), "[color="#FF0000"]Treiners![/color]", TEXTCOLOR_YELLOW)

return TRUE
end

Depois De ter Feito Isso va na Pasta data/action/actions.xml e coloque isso:

CODE
<action actionid="[color="#0000FF"]26022[/color]" script="other/placa.lua"/>

Em Vermelho voce pode mudar para tipo coloca outro nome como demons,hydras e talz..
Em Azul voce muda o numero da actions caso voce for mudar o nome..

SS:http://www.xtibia.com/forum/post-a1857-sistema-de-placa.PNG

Quem gostou Comenta!

Comocriarquestbpcheia

Tue, 30 Dec 2008 22:55:24 -0200

eu ainda so meio noob nesse negocio de mapper e faz tempo q to tentando fazer uma quest q tenha uma backpack com alguns itens ex:plate armor, plate legs, platinum coins etc.

PLZ HELP
http://img87.imageshack.us/img87/2079/imagemue8.png

Magia Nova!by Me

Tue, 30 Dec 2008 14:53:56 -0200

Oi,Hoje venho Postar Minah Nova Magia Que Vai No Meu Ot Que Eu Estou projetando..

Va na pasta Data/Spells/Scripts/Custom Copie um arquivo .lua E Renomei Para ultimate ghost.Cole Isso la Dentro:

QUOTE
local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_DEATHDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_YALAHARIGHOST)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -1.2, 0, -1.8, 0)

local area = createCombatArea(AREA_CROSS5X5)
setCombatArea(combat, area)

function onCastSpell(cid, var)
return doCombat(cid, combat, var)
end

Depois Feche e Salve o Arquivo.Va na pasta data/spells/spells.xml e cole isso:
QUOTE

Ss:http://www.xtibia.com/forum/post-a1835-minhamagia.PNG

Isso Ae Quem Gostou Cmt

[tfs] Auto Ip! Detecta O Ip Sozinho! Testado!

Tue, 30 Dec 2008 10:26:16 -0200

Tudo bem pessoal?

Venho trazer este code do BlackKnight para o XTibia, ele � muito util e simples!
Testei no meu TFS Mystic Spirit Patch 22 e funciono perfeitamente!
Toda vez que vc abrir o executavel de seu servidor, ele muda o ip no config.lua automaticamente, para isso ele usa o arquivo getip.js, que funciona como um detector que diz qual ip da maquina!

Ao trabalho...

Em otserv.cpp

----------------------------

Abaixo de:

CODE

ip = g_config.getString(ConfigManager::IP);

Adicione:

CODE

    if(ip == ""){  
        system("cscript getip.js >ip.txt");
        char buffer[256];
        std::string buffer2;
        std::ifstream myfile ("ip.txt");
        if(myfile.is_open()){
            myfile.seekg (0, std::ios::end);
            int length = myfile.tellg();      
            myfile.seekg (length-17, std::ios::beg);        
            while (!myfile.eof()){               
                myfile.getline (buffer,256); 
                if(atoi(buffer) > 0 && atoi(buffer) <= 255)
                    buffer2 = buffer2 + buffer;
            }     
            ip = buffer2; 
        }
        else
            ip = "127.0.0.1";       
    }

Ficando assim:

CODE

	ip = g_config.getString(ConfigManager::IP);
	    if(ip == ""){  
        system("cscript getip.js >ip.txt");
        char buffer[256];
        std::string buffer2;
        std::ifstream myfile ("ip.txt");
        if(myfile.is_open()){
            myfile.seekg (0, std::ios::end);
            int length = myfile.tellg();      
            myfile.seekg (length-17, std::ios::beg);        
            while (!myfile.eof()){               
                myfile.getline (buffer,256); 
                if(atoi(buffer) > 0 && atoi(buffer) <= 255)
                    buffer2 = buffer2 + buffer;
            }     
            ip = buffer2; 
        }
        else
            ip = "127.0.0.1";       
    }

----------------------------

Abaixo de:

CODE

#include 
#include 
#include 

Adicione (se � que ja num esta adicionado)

CODE

#include 

Ficando assim:

CODE

#include 
#include 
#include 
#include 

----------------------------

Compila!

----------------------------

Coloque seu novo executavel na pasta de seu ot, junto com ele coloque o arquivo getip.js que esta anexado ao t�pico!

----------------------------

No arquivo Config.lua de seu servidor, deixe desde modo:

CODE

ip = ""

----------------------------

PRONTO, AGORA TODA VEZ QUE VOC� ABRIR SEU OTSERV, NUM VAI TER QUE FICAR FAZENDO AQUELA TAREFA CHATA DE TROCAR IP NO CONFIG.LUA! Quero alguns comentarios! Teh proxima pessoal!

Exori Bolo

Tue, 30 Dec 2008 03:19:45 -0200

Iae gente blz?
Bom tava aki sem faze nada resolvi fazer uma magia que atira bolo
intaum vamos ao q enteressa...
Va na pasta Data/Spells/Scripts/attack Copie um arquivo Lua E Renomei Para bolo.lua Cole Isso la Dentro:

CODE

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_CAKEDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, 51)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -0.4, 0, -0.5, 0)

local distanceCombat = createCombatObject()
setCombatParam(distanceCombat, COMBAT_PARAM_TYPE, 1)
setCombatParam(distanceCombat, COMBAT_PARAM_EFFECT, 51)
setCombatParam(distanceCombat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_CAKE)
setCombatFormula(distanceCombat, COMBAT_FORMULA_LEVELMAGIC, -0.4, 0, -0.5, 0)

function onCastSpell(cid, var)
    if(variantToNumber(var) ~= 0) then
        return doCombat(cid, distanceCombat, var)
    end
    return doCombat(cid, combat, var)
end

Depois Feche e Salve. Va na pasta data/spells/spells.xml e cole isso:

CODE

Se gostou comenta ae...
Foto da magia

2 Wands Para Ots 8.4

Tue, 30 Dec 2008 00:01:31 -0200

Fala Galeraaa ja que ngm postou nada em uma hora la em outros scripts vou postar aqui.

To Lan�ando Aqui 2 wands

Primeiro � a wand Jester Staff e ela ataca sd

v� na pasta do seu otserver /data/items.xml/dps disso da ctrl+f e bota o seguinte numero: 7958 e coloque isto \/

CODE

dps disso v� em weapons.xml e coloque isto \/

CODE



Agora Sua Jester Staff est� pronta

Agora A Que Eu Fiz Que Se Chama Wand Of Condon --Ela Ataca Tipo Uma Estrela =D

vamo l� primeiro v� em data/items/items.xml dps aperte ctrl + f e bote o seguinte numero:7735

em seguida apaga oque esta la e bote isto \/

CODE

dps v� em weapons.xml e cole isto \/

CODE



Pronto agora suas 2 wands est�o prontas

Creditos:
10% de um ot que eu vi a condon.

90% pra mim pq botei a condon em pratica e a jester eu criei.

Agora Bom Jogo E Se Divirta!

By:Lucasatak

2 Wands Para Ots 8.4

Mon, 29 Dec 2008 23:17:15 -0200

Fala Galeraaa To Lan�ando Aqui 2 wands

Primeiro � a wand Jester Staff e ela ataca sd

v� na pasta do seu otserver /data/items.xml/dps disso da ctrl+f e bota o seguinte numero: 7958 e coloque isto \/

CODE

</item>
    <item id="7958" article="a" name="jester staff">
<attribute key="description" value="Wand De Sd."/>
        <attribute key="weight" value="2300"/>
        <attribute key="weaponType" value="wand"/>
        <attribute key="shootType" value="death"/>
        <attribute key="range" value="7"/>

dps disso v� em weapons.xml e coloque isto \/

CODE

</wand>
<wand id="7958" level="1" mana="5" min="300" max="600" type="death" function="default">

Agora Sua Jester Staff est� pronta

Agora A Que Eu Fiz Que Se Chama Wand Of Condon --Ela Ataca Tipo Uma Estrela =D

vamo l� primeiro v� em data/items/items.xml dps aperte ctrl + f e bote o seguinte numero:7735

em seguida apaga oque esta la e bote isto \/

CODE

</item>
    <item id="7735" article="the" name="Wand Of Condon">
                                     <attribute key="description" value="The energy of a radiant star is trapped inside its globe."/>
        <attribute key="weight" value="2500"/>
        <attribute key="weaponType" value="wand"/>
        <attribute key="shootType" value="holy"/>
        <attribute key="range" value="7"/>

dps v� em weapons.xml e cole isto \/

CODE

</wand>
<wand id="7735" level="1" mana="5" min="400" max="800" type="holy" function="default">

Pronto agora suas 2 wands est�o prontas

Creditos:
10% de um ot que eu vi a condon.

90% pra mim pq botei a condon em pratica e a jester eu criei.

Agora Bom Jogo E Se Divirta!

By:Lucasatak

Uma Duvida Basica! Olhem E Me Ajudem Por Favor..

Mon, 29 Dec 2008 14:00:07 -0200

Pessoal eu baxei um yourots 8.4 e tem um sistema que eu disconhe�o eu pessoalmente n gostei equero consertar, espero que me ajudem..
� o seguinte quando vaou cirar acc as msg n aparecem no default.. quando o cahr toma um HIT ele aparece como quando vc sobe um level.. eu n gostei disso.
alguem sabe onde posso arrujmar?
meu serv eh sqll

Obrigado (a)

[8.4] Enchant System And Rainbow Shield

Mon, 29 Dec 2008 13:05:10 -0200

Muitos ja devem ter o sistema de encantamento em seu ot, que � encantar gemas em altares do tipo fire/poison/ice/energy e este faz o mesmo s� que � atualizado e conta com a possibilidade de encantar o Rainbow Shield.

Rainbow Shield

Notas: Encant�vel (cada encanto dura 20 minutos).
Com os encantos voc� pode conseguir:
Sparking Rainbow Shield aumenta sua velocidade em 10 levels e possui defesa 36.
Fiery Rainbow Shield aumenta seu shielding skill em 3 e possui defesa 36.
Icy Rainbow Shield possui defesa 39.
Terran Rainbow Shield aumenta sua velocidade de regenera��o e possui defesa 37.

Chega de explica��es qualquer duvida ou erro � s� reportar! Vamos la: :soudado:

enchant.lua

CODE

--by Richi~ --
function onUse(cid, item, frompos, item2, topos)

local gems = {2146, 2147, 2149, 2150}
local egems = {7759, 7760, 7761, 7762}
local altars = {{7508, 7509, 7510, 7511}, {7504, 7505, 7506, 7507}, {7516, 7517, 7518, 7519}, {7512, 7513, 7514, 7515}}
local weapons = {2383, 7384, 7389, 7406, 7402, 2429, 2430, 2435, 7380, 2454, 2423, 2445, 7415, 7392, 2391, 2544, 8905}
local eweapons = {{7763, 7744, 7854, 7869}, {7765, 7746, 7856, 7871}, {7770, 7751, 7861, 7876}, {7766, 7747, 7857, 7872}, {7767, 7748, 7858, 7873}, {7768, 7749, 7859, 7874}, {7769, 7750, 7860, 7875}, {7770, 7751, 7861, 7876}, {7771, 7752, 7862, 7877}, {7772, 7753, 7863, 7878}, {7773, 7754, 7864, 7879}, {7774, 7755, 7865, 7880}, {7775, 7756, 7866, 7881}, {7776, 7757, 7867, 7882}, {7777, 7758, 7868, 7883}, {7839, 7840, 7838, 7850}, {8907, 8906, 8909, 8908}}

local type = item.type
if type == 0 then
type = 1
end

local mana = 300 * type
local soul = 2 * type

if isInArray(gems, item.itemid)== TRUE then
for aa=1, #gems do
if item.itemid == gems[aa] then
a=aa
end
end
if isInArray(altars[a], item2.itemid)== TRUE then
if getPlayerMana(cid) >= mana and getPlayerSoul(cid) >= soul then
doTransformItem(item.uid,egems[a])
doPlayerAddMana(cid,-mana)
doPlayerAddSoul(cid,-soul)
doSendMagicEffect(frompos,39)
else
doPlayerSendCancel(cid,"You dont have mana or soul points.")
end
else
return 2
end

elseif isInArray(egems, item.itemid)== TRUE then
for bb=1, #egems do
if item.itemid == egems[bb] then
b=bb
end
end
if isInArray(weapons, item2.itemid)== TRUE then
for cc=1, #weapons do
if item2.itemid == weapons[cc] then
c=cc
end
end
doTransformItem(item2.uid,eweapons[c][b],1000)
doSendMagicEffect(frompos,39)
doRemoveItem(item.uid,1)
else
doPlayerSendCancel(cid,"You can't enchanted this.")
end
else
return 0
end
return 1
end

actions.xml

QUOTE

Espero que gostem!!! ;)

Creditos: richiadicct

Impacto Meteoro!

Mon, 29 Dec 2008 12:42:09 -0200

Iae Gente Essa Magia Foi Criada Pelo Strikerzinm Que Era meu Antigo Login ;D

Estou Aqui Repostando A Minah Magia Sem um Bug De Se Atacar

Venho Postar Uma Magia Tipo a do assassin cross do Ragnarok ;P.
Va na pasta Data/Spells/Scripts Copie um arquivo Lua E Renomei Para Impact.Cole Isso la Dentro:

QUOTE
local acombat = createCombatObject()

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SUDDENDEATH)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -1.0, -20, -2.0, 20)

local arr = {
{0, 0, 0, 0, 0, 0, 0},
{0, 1, 1, 1, 1, 1, 0},
{0, 1, 1, 1, 1, 1, 0},
{0, 1, 1, 3, 1, 1, 0},
{0, 1, 1, 1, 1, 1, 0},
{0, 1, 1, 1, 1, 1, 0},
{0, 0, 0, 0, 0, 0, 0}
}
local area = createCombatArea(arr)
setCombatArea(acombat, area)

function onTargetTile(cid, pos)
doCombat(cid,combat,positionToVariant(pos))
end

setCombatCallback(acombat, CALLBACK_PARAM_TARGETTILE, "onTargetTile")

function onCastSpell(cid, var)
return doCombat(cid, acombat, var)
end

Depois Feche e Salve o Arquivo.Va na pasta data/spells/spells.xml e cole isso:

QUOTE

Quem Gostou Coment ;x
SS da magia:

Nova Wand

Sun, 28 Dec 2008 03:24:44 -0200

galera criei uma rod com dano de 200/700 queria saber se alguem sabe como faiz pra rod dar 1 efeito diferente quando o hit passa do 400 por favor preciso muito de ajuda...
se tem q criar 1 script propia pra wand coloka 1 ae como exemplo pra q eu possa usala...

Rune

Sun, 28 Dec 2008 01:37:24 -0200

Vcs podem me ajudar? estou com um poblema, como fasso uma rune poder ser usada so em mim mesmo e nao possibilitar de usar nos outros?

Precizo muito, UREGENTE!

Grato!