Ir para conteúdo

kkk111

Campones
  • Total de itens

    27
  • Registro em

  • Última visita

  • Dias Ganhos

    1

Tudo que kkk111 postou

  1. Tenta esse... spells/scripts/prison.lua local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, [color="#FF0000"]CONST_ANI_ENERGY[/color]) setCombatParam(combat, COMBAT_PARAM_CREATEITEM, [color="#FF0000"]1498[/color]) local arr = { {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, {1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1}, {1, 0, 0, 0, 0, 2, 0, 0, 0, 0, 1}, {1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1}, {0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, } local area = createCombatArea(arr) setCombatArea(combat, area) function onCastSpell(cid, var) return doCombat(cid, combat, var) end CONST_ANI_ENERGY = efeito 1498 = id da parede spells/spells.xml <rune name="[color="#FF0000"]NOME[/color]" id="[color="#FF0000"]ID_RUNA[/color]" charges="[color="#FF0000"]CARGAS[/color]" maglv="[color="#FF0000"]ML NENESSARIO[/color]" exhaustion="2000" blocktype="solid" allowfaruse="1" event="script" value="prison.lua"/>
  2. Fala que você não sabe bosta nem uma ;\ Vai fala "Palavra Magica" abri todas as portas de uma vez ? LoL ? :lol: Qualquer um pode entra ? Intão praque porta ué ? Se você quiser so que a porta abre e fecha use... movements/scripts/portas.lua function onStepIn(cid, item, position, fromPosition) doTransformItem(item.uid,item.itemid+1) end function onStepOut(cid, item, pos) doTransformItem(item.uid,item.itemid-1) end movements/movements.xml <movevent type="StepIn"[color="#FF0000"] itemid="XXXX"[/color] script="portas.lua"/> <movevent type="StepOut" [color="#FF0000"]itemid="YYYY"[/color] script="portas.lua"/> XXXX = id da porta ABERTA YYYY = id da porta FECHADA Se não for isso, explique melhor oque você quer afinal !
  3. Creditos 100% para "darkhaos" de um outro forum por ai.... e ...esse script te deixou postar no XTibia?... Ele não disse não
  4. Facil talkactions/scripts/attr.lua local itemFuncs = { ["attackspeed"] = setItemAttackSpeed, ["name"] = setItemName, ["plural"] = setItemPluralName, ["attack"] = setItemAttack, ["extraattack"] = setItemExtraAttack, ["defense"] = setItemDefense, ["armor"] = setItemArmor, ["extradefense"] = setItemExtraDefense, ["hitchance"] = setItemHitChance, ["range"] = setItemShootRange, ["actionid"] = doSetItemActionId, ["action"] = doSetItemActionId, ["aid"] = doSetItemActionId, ["description"] = doSetItemSpecialDescription, ["desc"] = doSetItemSpecialDescription, ["protection"] = doSetItemProtection, ["charges"] = doChangeTypeItem, ["count"] = doChangeTypeItem } local creatureFuncs = { ["health"] = doCreatureAddHealth, ["maxhealth"]= setCreatureMaxHealth, ["mana"] = doCreatureAddMana, ["maxmana"] = setCreatureMaxMana, ["speed"] = doChangeSpeed, ["droploot"] = doCreatureSetDropLoot, ["cannotmove"] = doCreatureSetNoMove, ["skull"] = doCreatureSetSkullType, ["redskull"] = doPlayerSetRedSkullTicks } local playerFuncs = { ["fyi"] = doPlayerPopupFYI, ["tutorial"] = doPlayerSendTutorial, ["guildrank"] = doPlayerSetGuildRank, ["guildnick"] = doPlayerSetGuildNick, ["group"] = doPlayerSetGroupId, ["vocation"] = doPlayerSetVocation, ["promotion"] = setPlayerPromotionLevel, ["stamina"] = doPlayerAddStamina, ["town"] = doPlayerSetTown, ["balance"] = doPlayerDepositMoney } function onSay(cid, words, param, channel) if(param == "") then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command param required.") return TRUE end local pos = {x=getCreaturePosition(cid).x, y=getCreaturePosition(cid).y, z=getCreaturePosition(cid).z, stackpos=1} if getCreatureLookDirection(cid) == SOUTH then pos = {x=getCreaturePosition(cid).x, y=getCreaturePosition(cid).y+1, z=getCreaturePosition(cid).z, stackpos=255} elseif getCreatureLookDirection(cid) == NORTH then pos = {x=getCreaturePosition(cid).x, y=getCreaturePosition(cid).y-1, z=getCreaturePosition(cid).z, stackpos=255} elseif getCreatureLookDirection(cid) == EAST then pos = {x=getCreaturePosition(cid).x+1, y=getCreaturePosition(cid).y, z=getCreaturePosition(cid).z, stackpos=255} elseif getCreatureLookDirection(cid) == WEST then pos = {x=getCreaturePosition(cid).x-1, y=getCreaturePosition(cid).y, z=getCreaturePosition(cid).z, stackpos=255} end local t = string.explode(param, ",") local getThing = getThingFromPos(pos) if itemFuncs[t[1]] then if getThing.itemid > 0 then if itemFuncs[t[1]](getThing.uid, t[2]) then doSendMagicEffect(pos, CONST_ME_MAGIC_GREEN) return TRUE else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry, you can not add attribute to this item.") return TRUE end else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Item not found.") return TRUE end elseif creatureFuncs[t[1]] then if isCreature(getThing.uid) then if creatureFuncs[t[1]](getThing.uid, t[2]) then doSendMagicEffect(pos, CONST_ME_MAGIC_GREEN) return TRUE else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry, you can not add attribute to this creature.") return TRUE end else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Creature not found.") return TRUE end elseif playerFuncs[t[1]] then if isPlayer(getThing.uid) then if playerFuncs[t[1]](getThing.uid, t[2]) then doSendMagicEffect(pos, CONST_ME_MAGIC_GREEN) return TRUE else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry, you can not add attribute to this player.") return TRUE end else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player not found.") return TRUE end else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Unknow attribute.") return TRUE end return TRUE end talkactions/talkactions.xml <talkaction log="yes" access="3" words="/attr" event="script" value="attr.lua"/>
  5. A risco de não dar para sumonar em alguma posição, assim parecer erro no console. Outra coisa é, qual vai ser a chance do player conseguir fazer a quest? Se colocar monstro forte, não avera chance de sobreviver, e se for fraco tambem não vai ter graça. Eu se fosse você colocaria ums 3 a 5 monstro máximo e deixar poco mais forte, menas chance de dar erro no server e mais equilibrado ao meu ponto de vista lógico.
  6. kkk111

    Ajudem

    Esqueci desse detale, valeu Rock :smile_positivo:
  7. Fiz para você http://www.xtibia.com/forum/GlobalEvent-Ra...es-t120641.html
  8. Rashid está viajando pelo Tibia todos os dias agora =d... globalevents/scripts/rashid.lua function onStartup() local Dia = os.date("%A") if Dia == "Monday" then -- Segunda-Feira -- by PaulO RashidPos = {x = 100, y = 100, z = 7} -- Svargrond elseif Dia == "Tuesday" then -- Terça-Feira RashidPos = {x = 100, y = 100, z = 7} -- Liberty Bay elseif Dia == "Wednesday" then -- Quarta-Feira RashidPos = {x = 100, y = 100, z = 7} -- Port Hope elseif Dia == "Thursday" then -- Quinta-Feira RashidPos = {x = 100, y = 100, z = 7} -- Ankrahmun elseif Dia == "Friday" then -- Sexta-Feira RashidPos = {x = 100, y = 100, z = 7} -- Darashia elseif Dia == "Saturday" then -- Sabado RashidPos = {x = 100, y = 100, z = 7} -- Edron elseif Dia == "Sunday" then -- Domingo -- by PaulO RashidPos = {x = 100, y = 100, z = 7} -- Carlin end doCreateNpc("Rashid", RashidPos) end globalevents/globalevents.xml <globalevent name="rashid" type="start" event="script" value="rashid.lua"/> Espero que não haja erros. Obs: Deve ser usado no TFS 0.3.5+
  9. kkk111

    Ajudem

    Se não funcionar ^ me avise...
  10. kkk111

    Ajudem

    Se for TFS 0.3.5 use... globalevents/scritps/deletecharacter.lua function onStartup() db.executeQuery("DELETE FROM `players` WHERE `lastlogin` < UNIX_TIMESTAMP() - 20*24*60*60") return true end globalevents/globalevents.xml <globalevent name="DeleteCharacter" type="start" event="script" value="deletecharacter.lua"/> 20 é os dias inativos.
  11. function onUse(cid, item, frompos, item2, topos) -- Config -- PaulO parede1 = {x=100, y=100, z=7, stackpos=1} parede2 = {x=100, y=100, z=7, stackpos=1} parede3 = {x=100, y=100, z=7, stackpos=1} PAREDE_ID = 1111 Monster = "Demon" MonsterPos1 = {x=100, y=100, z=7} MonsterPos2 = {x=100, y=100, z=7} MonsterPos3 = {x=100, y=100, z=7} MonsterPos4 = {x=100, y=100, z=7} MonsterPos5 = {x=100, y=100, z=7} MonsterPos6 = {x=100, y=100, z=7} MonsterPos7 = {x=100, y=100, z=7} MonsterPos8 = {x=100, y=100, z=7} MonsterPos9 = {x=100, y=100, z=7} MonsterPos10 = {x=100, y=100, z=7} MonsterPos11 = {x=100, y=100, z=7} MonsterPos12 = {x=100, y=100, z=7} MonsterPos13 = {x=100, y=100, z=7} -- Config if getThingfromPos(parede1).itemid == PAREDE_ID then doRemoveItem(getThingfromPos(parede1).uid,1) doRemoveItem(getThingfromPos(parede2).uid,1) doRemoveItem(getThingfromPos(parede3).uid,1) addEvent(doRemoveEscada, 5 * 60 * 1000) doSummonCreature(Monster, MonsterPos1) doSummonCreature(Monster, MonsterPos2) doSummonCreature(Monster, MonsterPos3) doSummonCreature(Monster, MonsterPos4) doSummonCreature(Monster, MonsterPos5) doSummonCreature(Monster, MonsterPos6) doSummonCreature(Monster, MonsterPos7) doSummonCreature(Monster, MonsterPos8) doSummonCreature(Monster, MonsterPos9) doSummonCreature(Monster, MonsterPos10) doSummonCreature(Monster, MonsterPos11) doSummonCreature(Monster, MonsterPos12) doSummonCreature(Monster, MonsterPos13) else doPlayerSendTextMessage(cid,26,"You can not use this object.") then if item.itemid == 1945 then doTransformItem(item.uid,item.itemid+1) elseif item.itemid == 1946 then doTransformItem(item.uid,item.itemid-1) end function doCreateParede() doCreateItem(PAREDE_ID, 1, parede1) doCreateItem(PAREDE_ID, 1, parede2) doCreateItem(PAREDE_ID, 1, parede3) end <action uniqueid="XXXX" script="XXXXl.lua"/> Obs: Não testei Dica: Eu acho melhor tira um poco de monstro ;\
  12. Aff... Não passei nem uma "Spells" Esse script é para "Talkactions"...
  13. function onSay(cid, words, param) local NewOutfit = {lookType=78,lookHead=0,lookAddons=0,lookLegs=0,lookBody=0} local OutfitTime = 5*1000 local Voc = 1 -- ID vocação if getPlayerVocation(cid) == Voc then doSetCreatureOutfit(cid, NewOutfit,OutfitTime) end return 1 end //// 1 - sorcerer 2 - druid 3- paladin 4 - knight 5 - master sorcerer 6 - elder druid 7- royal paladin 8 - elite knight * A função "..if isPlayer(cid) == 1 then.." nesse ccaso é inutil. Porque se acha que algum montro vai fala? (a não ser que você quiser !
  14. kkk111

    Quest.

    Você poderia ao invez de colocar outra Storage, ja usar essa ai no script da placa "..setPlayerStorageValue(cid,50028,1).." Ou intão adicione outra linha dessa assim . . doPlayerAddItem(cid,2407,1) setPlayerStorageValue(cid,50028,1) else . . PARA... . . doPlayerAddItem(cid,2407,1) setPlayerStorageValue(cid,50028,1) setPlayerStorageValue(cid,50029,1) -- Storage da placa else . . ....
  15. Vamo evita o flood pls Ja disse isso na 2ª resposta.
  16. AFFFFFF....... Talkaction.xml Ex: <talkaction log="yes" words="/addskill" access="5" event="function" value="addSkill"/> access="5" /// é o acesso necessário para executar a função. Player: sem access Tutor: access 1 Senior Tutor: access 2 Game Master: access 3 Community Manager: access 4 GOD: access 5 Meu Deus, atende minhas orações PLS :blink:
  17. dailyFragsToRedSkull = 6 -- ne um dia weeklyFragsToRedSkull = 20 -- ne uma semana monthlyFragsToRedSkull = 50 -- ne um mes dailyFragsToBlackSkull = 3 -- ne um dia a mais que red weeklyFragsToBlackSkull = 10 -- ne uma semana a mais que red monthlyFragsToBlackSkull = 15 -- ne um mes a mais que red
  18. Você colocou... data/actions/ actions.xml <action uniqueid="XXXX" script="placa.lua"/> uniqueid="XXXX" -- uma unique que não está em uso e a uniqueid na PLACA com o Mapa Editor?
  19. Agora sim.... lampada.lua function onUse(cid,item,frompos,item2,topos) local centro = getCreaturePosition(cid) local creature = getCreatureByName('Askimrob') if item.actionid == 2344 then doCreatureSay(cid, "O Gênio não está mais aqui!", TALKTYPE_ORANGE_1) else if(creature ~= nil and (not isPlayer(creature))) then doPlayerSendTextMessage(cid,26,"Askimrob está atendendo outro pedido, agarde...") else if getPlayerStorageValue(cid, 21001) ~= 3 then if math.random(0,99) > 50 and getPlayerStorageValue(cid, 21001) >= 1 then doCreatureSay(cid, "Deixa eu dormir pow!", TALKTYPE_ORANGE_1) else doCreateNpc('Askimrob', {x=centro.x+1, y=centro.y, z=centro.z}) doSendMagicEffect({x=centro.x+1, y=centro.y, z=centro.z}, 10) end else doCreatureSay(cid, "Já realizei seus desejos!", TALKTYPE_ORANGE_1) end end end return FALSE end action.xml <action itemid="2344" script="lampada.lua" /> Npc/ Askimrob.xml <?xml version="1.0" encoding="UTF-8"?> <npc name="Askimrob" script="data/npc/scripts/askimrob.lua" walkinterval="3000"> <health now="150" max="150"/> -- by PaulO <look type="80" head="20" body="30" legs="40" feet="50"/> <parameters> <parameter key="message_greet" value="Eu sou {Askimrob}, o genio da lampada, {diga} {3} {items} que atenderei os seus desejos." /> </parameters> </npc> askimrob.lua 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 if msgcontains(msg, 'oil lamp') or msgcontains(msg, 'gemmed lamp') or msgcontains(msg, 'lamp') and getPlayerItemCount(cid, 2344) >= 1 and getPlayerStorageValue(cid, 21001) >= 1 then npcHandler:say('{Ta} {me} {zuando} {né?}', cid) npcHandler:say('Acha que eu vou dar mais {Lâmpada} para você. \n{NOOB!}', cid) elseif msgcontains(msg, msg) and getPlayerItemCount(cid, 2344) >= 1 then if getItemIdByName(msg, false) ~= LUA_ERROR then if getPlayerStorageValue(cid, 21001) == 3 and getPlayerItemCount(cid, 2344) >= 1 then npcHandler:say('Você {não} tem mais {desejos} e \n {mesmo} {assim} {você} {me} {acorda} {-.-\'}', cid) addEvent(doRemoveDjinn, 4 * 1000) elseif getPlayerStorageValue(cid, 21001) == 2 and getPlayerItemCount(cid, 2344) >= 1 then doPlayerAddItem(cid, getItemIdByName(msg, false), 1) doPlayerSetStorageValue(cid, 21001, 3) npcHandler:say('{Cabou} seus {desejos}, agora {vou} {embora.}', cid) doPlayerRemoveItem(cid, 2344, 1) lampada = doCreateItemEx(2344, 1) doSetItemActionId(lampada, 2344) doPlayerAddItemEx(cid, lampada, 1) addEvent(doRemoveDjinn, 4 * 1000) elseif getPlayerStorageValue(cid, 21001) == 1 and getPlayerItemCount(cid, 2344) >= 1 then doPlayerAddItem(cid, getItemIdByName(msg, false), 1) doPlayerSetStorageValue(cid, 21001, 2) npcHandler:say('Você só tem mais {1} {desejo}, \n {ve} {se} {deixa} {eu} {dormir} {agora} {}', cid) addEvent(doRemoveDjinn, 4 * 1000) elseif getPlayerStorageValue(cid, 21001) == -1 and getPlayerItemCount(cid, 2344) >= 1 then doPlayerAddItem(cid, getItemIdByName(msg, false), 1) doPlayerSetStorageValue(cid, 21001, 1) npcHandler:say('Você só tem mais {2} {desejos}, \n {agora} {vou} {dormir} {}', cid) addEvent(doRemoveDjinn, 4 * 1000) else npcHandler:say('Você {não} {tem} {a} {minha} {Lâmpada}.', cid) end else npcHandler:say('{O} {item} {desejado} {não} {existe!}', cid) end else npcHandler:say('Você {não} {tem} {a} {minha} {Lâmpada}.', cid) end end function doRemoveDjinn() if getCreatureByName('Askimrob') ~= nil and not isPlayer(getCreatureByName('Askimrob')) then doSendMagicEffect(getCreaturePosition(getCreatureByName('Askimrob')), 2) doRemoveCreature(getThingfromPos(getCreaturePosition(getCreatureByName('Askimrob'))).uid) stopEvent(doRemoveDjinn) end end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) addEvent(doRemoveDjinn, 100 * 1000) Poste qualquer erro... Mais sugestões pode manda
  20. Logico que não né :s o ID do item você tem que coloca no script do baú... ta dando algum erro na placA ou não está indo?
  21. Mas é para que afinal a placa? Não é so para teleporta para quest?
  22. Muito simples :\ "...atraves dele uma vez..." data/actions/scripts/ placa.lua function onUse(cid,item,frompos,item2,topos) -- Config local to_pos = {x=1567, y=1587, z=7} -- Lugar que vai ir quando clicar local Storage = 7777 -- Indique uma storage NÃO usada... -- Config if getPlayerStorageValue(cid,Storage) == -1 then doSendMagicEffect(getCreaturePosition(cid),10) doTeleportThing(cid,to_pos) doSendMagicEffect(getCreaturePosition(cid),10) setPlayerStorageValue(cid,Storage,1) else doPlayerSendTextMessage(cid,25,"Você ja foi.") end end data/actions/ actions.xml <action uniqueid="XXXX" script="placa.lua"/> Está para poder ir somente 1x, mas eu acho errado. Se o cara vai la e morre, nunca mais vai poder tentar outra vez? Fuiii...
  23. Action: É tudo que você clica. Ex: Baú, Usar algum item (Obsadian Knife) Movements: É tudo que se move. Ex: Item que se move em algum lugar (sqm ou slot) ou Players andar.... data/actions/scripts/ baumal.lua function onUse(cid, item, frompos, item2, topos) -- Config local QuestItem = 2400 -- ID do Item... local Monster = "Morgaroth" -- Nome do Monstro... -- Config if getPlayerStorageValue(cid,QuestItem) == -1 then doPlayerAddItem(cid,QuestItem,1) setPlayerStorageValue(cid,QuestItem,1) doPlayerSendTextMessage(cid,25,"You have found a " ..getItemNameById(QuestItem).. ".") doSummonCreature(Monster,{x=topos.x-2, y=topos.y-2, z=topos.z}) doSummonCreature(Monster,{x=topos.x, y=topos.y+1, z=topos.z}) doSummonCreature(Monster,{x=topos.x+3, y=topos.y+4, z=topos.z}) else doPlayerSendTextMessage(cid,25,"It is empty.") end return 1 end data/actions/ actions.xml <action uniqueid="XXXX" script="baumal.lua"/> Qualquer dúvida avise...
  • Quem Está Navegando   0 membros estão online

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