Ir para conteúdo

dustot

Artesão
  • Total de itens

    116
  • Registro em

  • Última visita

  • Dias Ganhos

    1

Tudo que dustot postou

  1. Concordo com o que o amigo disse acima. Lhe recomnedo o meu: www.dustserver.com. Não desvolorizando o dele. Abraço
  2. Tente procurar em alguma pasta o que está na tag do chat.cpp vlw Isso ae é a pasta channel.
  3. Bom vamos lá cara siga os seguintes passos: En chat.cpp ache: if((readXMLString(p, "logged", strValue) || readXMLString(p, "log", strValue)) && booleanString(strValue)) flags |= CHANNELFLAG_LOGGED; Adicioone isto debaixo: if(readXMLString(p, "premium", strValue) && booleanString(strValue)) flags |= CHANNELFLAG_PREMIUM; Ache: player->getVocationId()))) E Substitua por: player->getVocationId())) || (tmpChannel->hasFlag(CHANNELFLAG_PREMIUM) && !player->isPremium())) Em Chat.h ache: CHANNELFLAG_LOGGED = 1 << 2, Adicione isto abaixo: CHANNELFLAG_PREMIUM = 1 << 3, Ae depois vá em data/XML/channels.xml e adicione: <channel id="10" name="Premium Channel" premium="yes"/> Ve ae e me fala. Abraço
  4. Po cara, ae tu vai me desculpar, mais desse jeito nem sei fazer! Malz ae
  5. Cara uso em meu server um short que absorve 10% de danos! Que é essa seguinte tag: <attribute key="absorbPercentall" value="10" /> Ae você altera o 10 pro tanto de % que você quer. Ou seja é só você adicionar essa tag que coloquei acima, no shield que você quer. Vlw Ex do script do meu short: <item id="7464" article="a" name="Dust shorts"> <attribute key="weight" value="150" /> <attribute key="slotType" value="legs" /> <attribute key="absorbPercentall" value="10" /> <attribute key="description" value="Absorve 10% de todos os danos." /> </item> Abraço!
  6. tinha isso tmb, saiu com o tempo. Asvezes da isso, mais ae é so fechar e abrir o server denovo. Vlw
  7. Tem esse aqui que recupera o max de de mana e hp: estatuaheal.lua --by Henrique Alves function onUse(cid, item, frompos, item2, topos) if getPlayerLevel(cid) >= 10 then doSendAnimatedText(getPlayerPosition(cid), "AhhHah...", 105) doCreatureAddHealth(cid, getCreatureMaxHealth(cid)) doCreatureAddMana(cid, getCreatureMaxMana(cid)) doTransformItem(item.uid, 5739) doSendMagicEffect(topos, 12) else doPlayerSendTextMessage(cid,22,"Vc num e lvl 10.") return 0 end return 1 end Actions.xlm <action itemid="5739" script="estatuaheal.lua" /> Usei uma fonte Usando em TFS 0.4 e Tibia 8.6 Quando você tem pouca life ou mana você clica na fonte e ela enche tua mana e hp ate o max. "O script que eu postei faz isso."
  8. dustot

    Exp Amulet 90%

    Coloquei, asism que der shut ti falo como tá. Obrigado
  9. Cara, peguei o script direto do autor tente so substituir o teu por esse: ---Script by mock the bear! local conditionMP,conditionHP,conditionML,conditionCLUB,conditionSHI,conditionDIST,conditionAMP = {},{},{},{},{},{},{} for i=1,100 do ---Carrega as conditions --- HP conditionHP[i] = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(conditionHP[i], CONDITION_PARAM_TICKS, -1) setConditionParam(conditionHP[i], CONDITION_PARAM_STAT_MAXHEALTHPERCENT, 100+i) setConditionParam(conditionHP[i], CONDITION_PARAM_BUFF, true) setConditionParam(conditionHP[i], CONDITION_PARAM_SUBID, 50) --MANA conditionMP[i] = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(conditionMP[i], CONDITION_PARAM_TICKS, -1) setConditionParam(conditionMP[i], CONDITION_PARAM_STAT_MAXMANAPERCENT, 100+i) setConditionParam(conditionMP[i], CONDITION_PARAM_BUFF, true) setConditionParam(conditionMP[i], CONDITION_PARAM_SUBID, 51) --Magic level conditionML[i] = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(conditionML[i], CONDITION_PARAM_TICKS, -1) setConditionParam(conditionML[i], CONDITION_PARAM_STAT_MAGICLEVELPERCENT, 100+i) setConditionParam(conditionML[i], CONDITION_PARAM_BUFF, true) setConditionParam(conditionML[i], CONDITION_PARAM_SUBID, 52) --club axe sword conditionCLUB[i] = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(conditionCLUB[i], CONDITION_PARAM_TICKS, -1) setConditionParam(conditionCLUB[i], CONDITION_PARAM_SKILL_CLUBPERCENT, 100+i) setConditionParam(conditionCLUB[i], CONDITION_PARAM_SKILL_SWORDPERCENT, 100+i) setConditionParam(conditionCLUB[i], CONDITION_PARAM_SKILL_AXEPERCENT, 100+i) setConditionParam(conditionCLUB[i], CONDITION_PARAM_BUFF, true) setConditionParam(conditionCLUB[i], CONDITION_PARAM_SUBID, 53) --- shield conditionSHI[i] = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(conditionSHI[i], CONDITION_PARAM_TICKS, -1) setConditionParam(conditionSHI[i], CONDITION_PARAM_SKILL_SHIELDPERCENT, 100+i) setConditionParam(conditionSHI[i], CONDITION_PARAM_BUFF, true) setConditionParam(conditionSHI[i], CONDITION_PARAM_SUBID, 54) --- dist conditionDIST[i] = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(conditionDIST[i], CONDITION_PARAM_TICKS, -1) setConditionParam(conditionDIST[i], CONDITION_PARAM_SKILL_DISTANCEPERCENT, 100+i) setConditionParam(conditionDIST[i], CONDITION_PARAM_BUFF, true) setConditionParam(conditionDIST[i], CONDITION_PARAM_SUBID, 55) end function getSlotType(n) --By mock the bear if not n then return false end if n:match('%[(.+)%]') then n = n:match('%[(.+)%]') if n == '?' then return 0,n else return n:match('(.-)%.([+-])(%d+)%%') end else return false end end local function loadSet(cid) local t = {} for slot=1,9 do t[slot] = '' local s = getPlayerSlotItem(cid,slot).uid if s ~= 0 then t[slot] = getItemName(s) end end return t end function isInArray2(arr,var) -- Because in some servers it return 1 and 0 and others true and false for i,b in pairs(arr) do if var == b then return true end end return false end function check2(cid,i) if i == 5 or i == 6 then if isInArray({'head','necklace','backpack','body','legs','feet','ring'},getItemValue(getPlayerSlotItem(cid,i).itemid,'slotType') or '') then return false end end return true end function chk(cid,f) if not isPlayer(cid) then return end local t = loadSet(cid) for i=1,#f do if f[i] ~= t[i] then equip(cid,nil,slot) break end end addEvent(chk,2000,cid,t) end items = { ---- Only to get attr: slotType because getItemName dont return it -.-' _VERSION='1.0 By mock', XML_DIR='data/items/items.xml', } do local ia = os.clock() io.write('Loading items') local i = io.open(items.XML_DIR,'r') local u = i:read(-1) i:close() local u = u:match('<items>(.+)</items>') for mi,id,mid,name,data,me in u:gmatch('<(%a-)%s*id%s*=%s*"(%d+)"%s*(.-)%s*name%s*=%s*"(.-)"%s*>(.-)</(%a*)>') do if mi == 'item' and me == 'item' then local td = {name=name,id=id,type=1} for key,value in data:gmatch('<attribute key="(.-)" value="(.-)"/>') do td[key] = value end for key,value in mid:gmatch('(.-)="(.-)"') do td[key] = value end items[tonumber(id)] = td items[name] = td end end for mi,id,mid,name,data in u:gmatch('<(%a-)%s*id%s*=%s*"(%d*)"%s*(.-)%s*name%s*=%s*"(%a+)"%s*/>') do if mi == 'item' then local td = {name=name,id=id,type=2} for key,value in mid:gmatch('(.-)="(.-)"') do td[key] = value end items[tonumber(id)] = td items[name] = td end end io.write('[done '..os.clock()-ia..']\n') end function getItemValue(item,value) return items[item] and items[item][value] end function equip(cid,item,slot) --By mock the bear local HP = getCreatureHealth(cid) local MP = getCreatureMana(cid) local t = {} if item then local mm,sinal,qto = getSlotType(getItemName(item.uid)) t[mm] = tonumber(qto) end for i=1,9 do -- Not on slot 10 > arrow if i ~= slot then if getPlayerSlotItem(cid,i).itemid ~= 0 then local aab = getPlayerSlotItem(cid,i).uid if aab and check2(cid,i) then for _ in getItemName(aab):gmatch('(%[.-%])') do local mm,sinal,qto2 = getSlotType(_) if mm then if not t[mm] then t[mm] = 0 end t[mm] = t[mm]+tonumber(qto2) t[mm] = t[mm] > 100 and 100 or t[mm] end end end end end end local fu = 0 local ca = {} local s = '' for sl,n in pairs(t) do fu = fu+1 s = s..''..n..'% more of '..sl..'\n' if sl == 'hp' then doAddCondition(cid,conditionHP[tonumber(n)]) doCreatureAddHealth(cid,HP-getCreatureHealth(cid)) ca[50] = 1 doPlayerSendTutorial(cid,19) elseif sl == 'mp' then doAddCondition(cid,conditionMP[tonumber(n)]) doCreatureAddMana(cid,HP-getCreatureMana(cid)) ca[51] = 1 doPlayerSendTutorial(cid,19) elseif sl == 'ml' then doAddCondition(cid,conditionML[tonumber(n)]) ca[52] = 1 elseif sl == 'cas' then doAddCondition(cid,conditionCLUB[tonumber(n)]) ca[53] = 1 elseif sl == 'shield' then doAddCondition(cid,conditionSHI[tonumber(n)]) ca[54] = 1 elseif sl == 'dist' then doAddCondition(cid,conditionDIST[tonumber(n)]) ca[55] = 1 end end if fu > 0 then addEvent(doPlayerSendTextMessage,100,cid,24,'You have:\n'..s) for i=50,55 do if not ca[i] then doRemoveCondition(cid,CONDITION_ATTRIBUTES,i) end end else for i=50,55 do doRemoveCondition(cid,CONDITION_ATTRIBUTES,i) end end return true end function onLogin(cid) ---Script by mock the bear! equip(cid,nil,slot) addEvent(chk,2000,cid,loadSet(cid)) -- Here we check! return TRUE end Talvez vc tenha apagado algo. Vlw
  10. dustot

    Exp Amulet 90%

    Sim, depois que mandei o erro lembrei do que tu tinha falado, to aguardando os minutos heim Vlw
  11. dustot

    !nightmare

    Vlw cara, ti dei meu REP+
  12. dustot

    !nightmare

    Em talkaction.xml está assim: <talkaction words="!nightmare" script="love.lua"/> Em love.lua está assim: function onSay(cid, words, param) -- Exhausted Settings -- local exhausted_seconds = 1 -- How many seconds player will be exhausted -- local exhausted_storagevalue = 9847 -- Storage Value to store exhaust. It MUST be unused! -- -- Exhausted Settings END -- local text = {'I love you!','My love!','Baby dear!'} local chance1 = math.random(1,table.getn(text)) local chance2 = math.random(1,table.getn(text)) local sid = getPlayerPartner(cid) if sid > 0 then if isOnline(sid) == TRUE then local sname = getPlayerNameByGUID(sid) local pid = getPlayerByNameWildcard(sname) local tmf = getCreaturePosition(cid) local tms = getCreaturePosition(pid) if getDistanceBetween(tmf, tms) <= 3 then if(os.time() > getPlayerStorageValue(cid, exhausted_storagevalue)) then setPlayerStorageValue(cid, exhausted_storagevalue, os.time() + exhausted_seconds) doCreatureSay(cid, text[chance1], TALKTYPE_ORANGE_1) doCreatureSay(pid, text[chance2], TALKTYPE_ORANGE_1) doSendMagicEffect(tmf, 35) doSendMagicEffect(tms, 35) else doPlayerSendCancel(cid, "You are exhausted.") return TRUE end end end end end Sei que esse script é o errado! Preciso do certo. Obrigado
  13. dustot

    Pet System

    Uso TFS 0.4 e Tibia 8.6. Estou procurando um pet system legal. Achei um no Otland mais era muito complexo, não entendi muito bem. Alguem tem algum bom ae? Dou REP++
  14. dustot

    Exp Amulet 90%

    Vodkart veja isto: Quando uso o amuleto : 13:46 Your extra experience rate is now: 3. It will last for 5 hours. Quando logo e entro na msm hr : 13:46 Your extra experience rate is now: 3. It will last for 4 hours. Ou seja, ele ta comendo 1 hr de exp já direto quando vc loga. Dá pra fazer algo? Ah e tu arrumou pra contar os minutos tmb? Obrigado
  15. Talvez o ip que esteja no otservlist esteja errado. Ja aconteceu isso comigo. O site se n funcionar tente baixar outro. Vlw
  16. Pode zipar e hospedar pelo www.speedyshare.com
  17. Bom, antes de tudo quero dizer que o script não é meu! Eu vi em outro site de forum e achei interessante e resolvi trazer para o xtibia. Aqui está o crédito de onde achei. O que o script faz : Quando um player morre automaticamente ira subir do corpo dele a palavra OWNED! em vermelho! Testado em: TFS 0.4 Tibia versão 8.6 Bom vamos lá, Vá em creaturescripts/preparedeath.lua local function sendLetter(p) local pos = p.pos local letter = p.letter doSendAnimatedText(pos, letter, TEXTCOLOR_RED) end function onPrepareDeath(cid, lastHitKiller, mostDamageKiller) local letters = {"ONWNED!"} for i = 1, #letters do addEvent(sendLetter, i * 150, {pos = getCreaturePosition(cid), letter = letters[i]}) end return trueend Agora vá em creaturescripts.xml adicione isto: <event type="preparedeath" name="onPrepareDeath" event="script" value="preparedeath.lua"/> Depois disso adicione em login.lua : registerCreatureEvent(cid, "onPrepareDeath") Bom se fiz algo de errado me desculpa, 1º que posto um script assim. Obrigado,se gostou Rep+
  18. dustot

    Exp Amulet 90%

    Sim, vai continuar contando, e quando ele logar denovo, vai aparecer uma msg por ex: Voce ainda tem 4:58 min sobrando. Se funciona não esqueçe de me ajudar também EDIT : Vodkart, cara o script aqui da um erro no script falando que n poder ler o arquivo.. O que pode ser?
  19. dustot

    Dustot Server

    Começo de tudo: Bom, é meio que estranho falar como começei a adminstrar um server. Eu fui sempre jogador e sempre estava tentando ajduar o server que estava jogando, tentando subir de cargo ou algo assim. Muitos pensam que quem está jogando só pensa em sí mesmo. 90% disso é verdade por isso é tão dificil montar um equipe hoje em dia. Quando larguei de jgoar otserv decidi tentar abrir um. Como o projeto anda ? O server anda meio parado, não sei exatamente o por que! Não sei o que falta. Percebi que não da pra fazer tudo sozinho que agente sempre precisa dividir as alegrias problemas com outros também entao acho que o que realmente falta é uma equipe competente que esteja realmente afim de ajudar. Pois estou sozinho então o server fica muito parado sem minha presença. Espero pode encontrar uma boa equipe aqui para que assim o projeto vai se guiando para o melhor caminho. Quais vagas ainda estão disponíveis ? Bom, a baixo colocarei algumas das vagas que AINDA estão disponíveis : NPC Maker - 1(uma) vaga disponível. RPG Maker - 1(uma) vaga disponível. Webmaster/Webdesigner - 1(uma) vaga disponível. Designer - 1(uma) vaga disponível. Programmer - 2(duas) vagas disponíveis. Action Maker - 1(uma) vaga disponível. Scripter - 1(uma) vaga disponível. Mapper- 1(uma) vaga disponível. Como vocês perceberam há muitas vagas para serem preenchidas, então aproveitem Host dedicado - Bom, agora estamos com um Hoster dedicado, fornecido pela empresa ****** INTEL CORE 2 QUAD 3.0GHZ - Memória: 1 GB - HD: 100 GB - UPLink: 100 Mbps. Isso me garante um bom rendimento sem lag, um atendimento muito bom com eles e tudo que precisamos. Na Medida que formos crescendo estaremos pegando algo melhor. Site- Uso como base o Gesior 0.3.8. Todos seus bugs e falhas foram corrigidos. Acompanha vários sistemas e possui diversas proteções. www.dustserver.com Com um webdsigner podemos faze rnosso próprio wallpaper e outras coisas. Organização de reuniões da Equipe - Bom, nós temos que fazer uma reunião para designar os trabalhos a cada membro, então descidimos opinar para reuniões no MSN, é um excelente chat.Então descidimos opinar para esse meio, no qual, em todas as reuniões cada membro terá a sua vez de falar , o que facilitará totalmente na comunicação da Equipe. Então é isso aí galera. Mais informações : Meu msn : xande_mpm@hotmail.com Aquele abraço, e aguardo vocês!
  20. www.dustserver.com 8.6

  21. Po cara, hj em dia é a coisa mais facil que tem e chamr um técnico pra fazer a famosa formatação! haha Vlw
  • Quem Está Navegando   0 membros estão online

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