Ir para conteúdo

Mulizeu

Barão
  • Total de itens

    218
  • Registro em

  • Última visita

  • Dias Ganhos

    4

Tudo que Mulizeu postou

  1. Abra a pasta creaturescripts/scripts do seu ot e crie um arquivo com nome de autoloot.lua e cole o seguinte código: local configs = { ids = {2148, 2152, 2160}, -- adicionado somente os dos dinheiros, mais pode adicionar qual id quiser. premium = true -- só premium usar o Auto loot ? [true ou false] } function getItemsInContainerById(container, itemid) local items = {} if getContainerSize(container) > 0 then for slot=0, (getContainerSize(container)-1) do local item = getContainerItem(container, slot) if isContainer(item.uid) then local itemsbag = getItemsInContainerById(item.uid, itemid) for i=0, #itemsbag do table.insert(items, itemsbag[i]) end else if itemid == item.itemid then table.insert(items, item.uid) end end end end return items end function autoGold(cid, pos, stack) if stack > 255 then return true end local position = {x = pos.x, y = pos.y, z = pos.z, stackpos = stack} local tile = getThingFromPos(position) if isCorpse(tile.uid) then corpse = tile else autoGold(cid, pos, stack + 1) end if corpse ~= nil then for _, idmoney in pairs(configs.ids) do tab = getItemsInContainerById(corpse.uid, idmoney) if #tab ~= 0 then for _, uid in pairs(tab) do item = getThing(uid) doPlayerAddItem(cid, idmoney, item.type) doRemoveItem(item.uid, item.type) end end end end end function onKill(cid, target) if not isPremium(cid) and configs.premium then return true end return addEvent(autoGold, 10, cid, getCreaturePosition(target), 0) end Na mesma pasta procure pelo login.lua abra-o, e antes de return true adicione esta linha: registerCreatureEvent(cid, "AutoLoot") Agora volte na pasta creaturescripts e procure o arquivo creaturescripts.xml e adicione a tag: <event type="kill" name="AutoLoot" event="script" value="AutoLoot.lua"/> Bom para configurar os items que vão ter o loot automático é só abrir o arquivo autoloot.lua e esta logo no começo as configurações: local configs = { ids = {2148, 2152, 2160}, -- adicionado somente os dos dinheiros, mais pode adicionar qual id quiser. premium = true -- só premium usar o Auto loot ? [true ou false] } Tambem quero avisar que o script fica mais funcional em server 9.1 por causa do sistema de juntar o dinheiro sozim, fica muito legal, se usar em uma versão mais antiga, funcionara normal, mais ira fazer um pouco de bagunça na sua bag, hehehehe Creditos 100% Xotservx
  2. Legal eu tbm gostaria de me aprofundar mais em script.lua conhecimento nunca e d+!
  3. Assim agr tendi! ta ai! function onStepIn(cid, position, tile) doCreatureSay(cid,'Warrrrr!') end
  4. so troca a msg assim! function onStepIn(cid, position, tile) doSendAnimatedText(getThingPos(cid),'Warrrrrr',210) end sim a que eu postei sai em verde mais nao e para todos somente para o player!
  5. vai em movements crie um arquivo.lua e coloque isso! function onStepIn(cid, position, tile) doPlayerSendTextMessage(cid,25,'Warrrr!') end em movements.xnl coloque isso! <movevent type="StepIn" actionid="id da action" event="script" value="arquivo.lua"/> quando o player pisa vai falar Warrr!
  6. Mulizeu

    [Ajuda] Script

    Eu ja editei acima! e vlw eu avia esquecido de por storage para checar se ja foi feito ao avançar o lvl..Fazer oq eu to meio retired do xtibia! to fanzendo scripts aki pra mim entao acabei esquecendo...Vlw de novo por avisar!
  7. Mulizeu

    [Ajuda] Script

    Aki! baseado no seu exemplo! vai em creaturescripts cria um arquivo.lua e coloque function onAdvance(cid, level, position) storage = 12120 if getPlayerLevel(cid) == 200 and getPlayerStorageValue(cid, 32647) <= 0 then doPlayerAddItem(cid,2160,100) ---item doPlayerSendTextMessage(cid,25,'parabens vc chegou ao lvl 200 e ganhou 1kk')---msg setPlayerStorageValue(cid,storage,1) end end tag do creaturescript.xml <event type="advance" name="nome" event="script" value="nome.lua"/> dps vai em login e adc isso registerCreatureEvent(cid, "NOME QUE VC POIS")
  8. basta vc tirar as duplicatas e o comando addskill do talkactions.xml e 1° vc tem que postar sua spells mais agr eu to saindo entao n da pra mim arrumar!
  9. 1° erro ao conjurar food..provavelmente erro na magia exevo pan 2° ta dizendo que a a funçao que a tag pede nao existe 3° e 4° duplicação da tag, ou seja vc tem 2 tag na talkactions.xml com msm nome
  10. Frags! local config = { useFragHandler = getBooleanFromString(getConfigValue('useFragHandler')), advancedFragList = getBooleanFromString(getConfigValue('advancedFragList')) } function onSay(cid, words, param, channel) if(not config.useFragHandler) then return false end local time = os.time() local times = {today = (time - 86400), week = (time - (7 * 86400))} local contents, result = {day = {}, week = {}, month = {}}, db.getResult("SELECT `pd`.`date`, `pd`.`level`, `p`.`name` FROM `player_killers` pk LEFT JOIN `killers` k ON `pk`.`kill_id` = `k`.`id` LEFT JOIN `player_deaths` pd ON `k`.`death_id` = `pd`.`id` LEFT JOIN `players` p ON `pd`.`player_id` = `p`.`id` WHERE `pk`.`player_id` = " .. getPlayerGUID(cid) .. " AND `k`.`unjustified` = 1 AND `pd`.`date` >= " .. (time - (30 * 86400)) .. " ORDER BY `pd`.`date` DESC") if(result:getID() ~= -1) then repeat local content = { name = result:getDataString("name"), level = result:getDataInt("level"), date = result:getDataInt("date") } if(content.date > times.today) then table.insert(contents.day, content) elseif(content.date > times.week) then table.insert(contents.week, content) else table.insert(contents.month, content) end until not result:next() result:free() end local size = { day = table.maxn(contents.day), week = table.maxn(contents.week), month = table.maxn(contents.month) } if(config.advancedFragList) then local result = "Frags gained today: " .. size.day .. "." if(size.day > 0) then for _, content in ipairs(contents.day) do result = result .. "\n* " .. os.date("%d %B %Y %X at ", content.date) .. content.name .. " on level " .. content.level end result = result .. "\n" end result = result .. "\nFrags gained this week: " .. (size.day + size.week) .. "." if(size.week > 0) then for _, content in ipairs(contents.week) do result = result .. "\n* " .. os.date("%d %B %Y %X at ", content.date) .. content.name .. " on level " .. content.level end result = result .. "\n" end result = result .. "\nFrags gained this month: " .. (size.day + size.week + size.month) .. "." if(size.month > 0) then for _, content in ipairs(contents.month) do result = result .. "\n* " .. os.date("%d %B %Y %X at ", content.date) .. content.name .. " on level " .. content.level end result = result .. "\n" end local skullEnd = getPlayerSkullEnd(cid) if(skullEnd > 0) then result = result .. "\nYour " .. (getCreatureSkullType(cid) == SKULL_RED and "red" or "black") .. " skull will expire at " .. os.date("%d %B %Y %X", skullEnd) end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, result) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You currently have " .. size.day .. " frags today, " .. (size.day + size.week) .. " this week and " .. (size.day + size.week + size.month) .. " this month.") if(size.day > 0) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Last frag at " .. os.date("%d %B %Y %X", contents.day[1].date) .. " on level " .. contents.day[1].level .. " (" .. contents.day[1].name .. ").") end local skullEnd = getPlayerSkullEnd(cid) if(skullEnd > 0) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your " .. (getCreatureSkullType(cid) == SKULL_RED and "red" or "black") .. " skull will expire at " .. os.date("%d %B %Y %X", skullEnd)) end end return true end online local config = { showGamemasters = getBooleanFromString(getConfigInfo('displayGamemastersWithOnlineCommand')) } function onSay(cid, words, param) local players = getPlayersOnline() local strings = {} local i = 1 local position = 1 for _, pid in ipairs(players) do if(i > (position * 7)) then strings[position] = strings[position] .. "," position = position + 1 strings[position] = "" else strings[position] = i == 1 and "" or strings[position] .. ", " end if((config.showGamemasters == TRUE or getPlayerCustomFlagValue(cid, PlayerCustomFlag_GamemasterPrivileges) == TRUE or getPlayerCustomFlagValue(pid, PlayerCustomFlag_GamemasterPrivileges) ~= TRUE) and (isPlayerGhost(pid) ~= TRUE or getPlayerAccess(cid) > getPlayerAccess(pid))) then strings[position] = strings[position] .. getCreatureName(pid) .. " [" .. getPlayerLevel(pid) .. "]" i = i + 1 end end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, (i - 1) .. " player(s) online:") for i, str in ipairs(strings) do if(str:sub(str:len()) ~= ",") then str = str .. "." end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, str) end return TRUE end
  11. Mulizeu

    !carlin

    malz n vi ja reponderam!
  12. Ve ai! local pos = {x=78, y=373, z=7} function onStepIn(cid) if getCreatureCondition(cid, CONDITION_INFIGHT) == true then doTeleportThing(cid, pos) end end <movevent type="StepIn" actionid="1566" event="script" value="arquivo.lua"/> e so vc por essa action no tile: 1566 Pronto!
  13. Amigo me desculpe mais isso nao e uma talkaction...e sim globalevents!
  14. bom ai! Primeiro vá até Data\data\XML\outfits.xml Lá dentro escolha a outfit que você quer colocar(podera ser varias outfitis) só para jogadores vip e adicione: quest="XXXX" XXXX = numero de uma storage qualquer Exemplo Meu: <outfit id="32" premium="yes" quest="11322"> <list gender="0-3" lookType="264" name="Brutetamer"/> </outfit> obs: caso tenha alguma como acess"3" remova essa parte no meu caso a outfit foi Brutetamer e storage escolhida foi 11322,vamos usar essa mesmo storage depois... [ Outfit Vip para o Perfect Vip System ] : [ Outfit vip o Vip System By Account V1.0 ] : [ Outfit vip para o System By Real Server] : Creditos 101% ao Vodkart
  15. Wand! function onUse(cid, item, fromposition, itemEx, topos) local wand = { [12609] = 12279, [12279] = 12609 } doTransformItem(item.uid,wand[item.itemid]) doDecayItem(item.uid) return TRUE end Tag: <action itemid="12609;12279" event="script" value="nome do arquivo.lua"/> sword! function onUse(cid, item, fromposition, itemEx, topos) local sword = { [12610] = 12574, [12574] = 12610 } doTransformItem(item.uid,sword[item.itemid]) doDecayItem(item.uid) return TRUE end tag: <action itemid="12610;12574" event="script" value="nome do arquivo.lua"/>
  16. Amigo este script ja tinha sido feito por um membro do xtibia e postado...alem disso seu topico ta mto mau formatado... edit seu topico e organizio!
  17. Mtas dorgas manolo..Red dead redemption

  18. No caso n esta por vocação esta por lvl ou seja..exempo: lvl 20 ganha 20k 200 ganha 1 soft boots... entao todos lvl 20k ganharão 20k e lvl 200 1 soft boots! nao seria mais facil fazer assim ...exemplo: quando o player chega nivel 20 ele fala-se ..!recompensa ai ele ganha um item de acordo com sua vocation.. lvl 200 msm coisa!
  19. Crie um arquivo premio.lua na pasta creaturescript. Cole isso: local prizes = { [60001] = {level = 50000, reward = {9653, 1}}, [60002] = {level = 80000, reward = {{7958, 1}, {2157, 100}}}, } function onAdvance(cid, skill, oldlevel, newlevel) if(skill ~= SKILL__LEVEL)then return TRUE end for i,t in ipairs(prizes) do if not(getPlayerStorageValue(cid, i)) and t.level <= newlevel then if type(t.reward[1] ~= "table") then local add = doPlayerAddItem(cid, t.reward[1], t.reward[2]) if add then doPlayerSendTextMessage(cid, 19, "You have received ".t.reward[2]." ".getItemNameById(t.reward[2])." due to reaching level ".t.level.".") setPlayerStorageValue(cid, i, true) end else local bp = doCreateItemEx(1988, 1) for _,item in ipairs(t.reward) do doAddContainerItem(bp, item[1], item[2]) end local add = doPlayerAddItemEx(cid, bp) if add then doPlayerSendTextMessage(cid, 19, "You have received backpack with items due to reaching level ".t.level.".") setPlayerStorageValue(cid, i, true) end end end end return TRUE end Agora no arquivo xml <event type="advance" name="reward" event="script" value="premio.lua"/> Depois no login.lua cole registerCreatureEvent(cid, "premio") OBS: desnecessario outro topico skydangerous ja avia te respondido..mais ta ai!
  20. Nossa mto bacana..eu ate tava fazendo 1 que contava passo ..mais ainda n terminei...gostei desse metodo que vc fez ...continui com esse otimo trabalho q vc ira longe..! abrass!
  21. qualquer um entao quero um tv/cam system igual ao PxG....te dou rep+ sem problemas porque eu estou tentando fazer e n to conseguindo! por inquanto so =] Mande por PM!
  22. Boa death bom sistema..inovador..poderia colocar ate 1 video demonstrativo para as pessoas conhecerem melhor esse sistema!
  23. Mulizeu

    [Ajuda] Order

    Man que servi vc usar??...e por favor poste isso no lugar correto
  24. aki esta 1 exemplo e rattata...vai comçar com 10 hundread dollar function onUse(cid, item, frompos, item2, topos) if getPlayerStorageValue(cid, 15215) <= 0 then doPlayerAddItem(cid, 2160, 10)---aki muda a quantia de dinheiro doPlayerSendTextMessage(cid, 20,"Bem vindo ao Pokemon Server!") setPlayerStorageValue(cid, 15215, 1) local rat = {x=1031,y=1010,z=5} local cat = {x=1029,y=1010,z=5} local wee = {x=1027,y=1010,z=5} local pox = getTownTemplePosition(1) local health = 325 local maxhealth = 325 local description = "Contains a Rattata." local poke1 = "This is Rattata's pokeball. HP = ["..health.."/"..maxhealth.."]" item = doCreateItemEx(2219) doItemSetAttribute(item, "poke", poke1) doItemSetAttribute(item, "nome", "Rattata") doItemSetAttribute(item, "apelido", "Rattata") doItemSetAttribute(item, "description", description) doPlayerAddItemEx(cid, item, true) doTransformItem(item, 2222) doPlayerSendTextMessage(cid, 27, "You got your first pokemon! Here is some experience to help you on your way.") doPlayerSendTextMessage(cid, 27, "Don\'t forget to use your pokedex on every undiscovered pokemon!") doPlayerAddExp(cid, 800) doTeleportThing(cid, pox) doPlayerAddItem(cid, 2152, 30) doSendMagicEffect(pox, 21) doPlayerAddSoul(cid, 1) setPlayerStorageValue(cid, 54842, "Rattata, ") return TRUE else doPlayerSendTextMessage(cid, 20, "Você já pegou seu pokemon") end end creio que fly ,ride e surf seja em order qual systema de order vc usa?? os outros vejo aos poucos
  25. Acho que ele nao queria uma especia de PokeBola .. Sim pode ate ser mais isso possibila a vc sumonar e a tirar o summon do campo...e possibila apenas 1 sommon por player! mais enfim esses e um tpw se ele quizer usar use!
  • Quem Está Navegando   0 membros estão online

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