Ir para conteúdo

Crypter

Visconde
  • Total de itens

    368
  • Registro em

  • Última visita

  • Dias Ganhos

    14

Tudo que Crypter postou

  1. Uma database que usa site se não tiver essas tabelas daria Erro , então obviamente quem for usar isso tem que ter um site.
  2. Sistema simples que ao pisar em "X" item com a action id ele explode // Em data/lib Crie um arquivo chamado Mine.lua function setItemAid(uid, value)return doItemSetAttribute(uid, 'aid', value)endfunction removeBomba(pos, id)local item = getTileItemById(pos, id) if item.uid > 0 then doRemoveItem(item.uid) endreturn trueend Em data/movements/scripts Crie um arquivo chamado Mine.lua local config = {effect1 = 4, -- efeito ao pisareffect2 = 5, -- efeito ao explodirmsg = "Você foi acertado pela bomba.", -- msg que manda pra quem for acertadomindmg = 100, -- dmg minimo que tira (nao é necessariamente o dano que vai sair do cara pois precisa desconsiderar as defesas dele antes)maxdmg = 300, -- dmg maximo que tira (nao é o dano que vai sair do cara)self = true -- true/false pra ativar/desativar dano no cara que colocou a bomba caso ele mesmo passe na bomba.}local arr = {{0, 1, 0},{1, 3, 1}, -- area que vai acertar ao explodir a bomba{0, 1, 0},}local area = createCombatArea(arr)function onStepIn(cid, item, position) local player = getPlayerByNameWildcard(getItemAttribute(item.uid, 'ref')) doSendMagicEffect(position, config.effect1) if isCreature(player) then doAreaCombatHealth(player, COMBAT_FIREDAMAGE, position, area, -config.mindmg, -config.maxdmg, config.effect2) end if ((cid == player and config.self) or (not isPlayer(cid)) or (not isCreature(player))) then doCreatureAddHealth(cid, -1 * math.random(config.mindmg, config.maxdmg)) doSendMagicEffect(position, config.effect2) end if isPlayer(cid) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.msg) end doRemoveItem(item.uid)return trueend Em movements.xml <movevent type="StepIn" actionid="13245" event="script" value="Mine.lua"/> ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- Caso voce queira rodar esse movements em uma spell data/spells/scripts: Crie um arquivo chamado mine.lua local config = {itemid = 2180, -- Id do item que ira explodir duration = 10, -- duração para ser removidaactionid = 13245, --Nao mechaeffect = 1, -- efeitomsg = "Planted explosive mine!" -- mensagemcooldown = 120, --- tempo entre um uso e outro em segundo}function onCastSpell(cid, var) if os.time() - getPlayerStorageValue(cid, 55695) >= config.cooldown then setPlayerStorageValue(cid, 55695, os.time()) local position = getCreaturePosition(cid) local item = doCreateItem(config.itemid, 1, position) setItemAid(item, config.actionid) doItemSetAttribute(item, 'ref', getCreatureName(cid)) doCreatureSay(cid, config.msg, 20) doSendMagicEffect(position, config.effect) addEvent(removeBomba, config.duration * 1000, position, config.itemid) elsedoPlayerSendCancel(cid, "Aguarde "..(config.cooldown - (os.time() - getPlayerStorageValue(cid, 55695))).." segundos para plantar outra bomba!") endreturn trueend Em Spells.xml <instant name="Explosive Mine" words="Explosive Mine" lvl="1" mana="1" prem="0" aggressive="1" exhaustion="1000" needlearn="0" event="script" value="mine.lua"> <vocation id="1"/></instant> Se Voce Gostou da script da um REP+ e me Segui .!
  3. Infos: Quando player perde vida a uma chance de ativar a passiva e encher entre 20 e 25% da vida maxima dele. Em data/creaturescripts/scripts Crie um arquivo chamado Passiva.lua function onStatsChange(cid, attacker, type, combat, value)local t = {storage = 189678, -- storage, so mude se tiver usando pra outra coisa.tempo = 120 --tempo em segundos }local hp = math.random(1,99) -- em porcentagemlocal lvl = 200 -- level para usar a passivalocal percent = math.floor((getCreatureHealth(cid)*100)/getCreatureMaxHealth(cid)) -- nao mechalocal enche = math.random(20,25)-- Enche entre 20 e 25 % de vidaif getPlayerStorageValue(cid, 498567) >= 1 then -- Storage para ativarif getPlayerStorageValue(cid, t.storage) < os.time() thenif type == STATSCHANGE_HEALTHLOSS and percent <= hp and getPlayerLevel(cid) >= lvl thendoCreatureAddHealth(cid, (enche*getCreatureMaxHealth(cid))/100)doSendAnimatedText(getCreaturePosition(cid), "+ "..enche.."% ", TEXTCOLOR_GREEN)setPlayerStorageValue(cid, t.storage, os.time() + t.tempo)doCreatureSay(cid, "PASSIVA!", 19)doPlayerSendTextMessage(cid, 25, "Passiva Ativada. \n Recarga: 2 minutos.")return trueendreturn trueendreturn trueendreturn trueend Em creaturescripts.xml adicione essa linha: event type="statschange" name="passiva" event="script" value="passiva.lua"/> Em data/creaturescripts/scripts: Abra o arquivo login.lua e adicione isso antes do ultimo : Return true registerCreatureEvent(cid, "passiva") ------------------------------------------------------------------------------------------------------------------------------------- Em data/talkactions/scripts Crie um arquivo chamado passiva.lua function onSay(cid, words, param) if(param == "") then doPlayerSendCancel(cid, 'Opcoes: On / Off') return trueend if(param == "on") thensetPlayerStorageValue(cid, 498567, 1)doPlayerSendTextMessage(cid, 25, "Voce ativou o modo passiva") endif(param == "off") thensetPlayerStorageValue(cid, 498567, 0)doPlayerSendTextMessage(cid, 25, "Voce desativou o modo passiva") end return trueend Em talkactions.xml <talkaction words="!passiva" hide="yes" event="script" value="passiva.lua"/> Se você gostou da Script da um REP+ e me segui! ( Sou Novo Aqui no xTibia )
  4. Infos: Ao usar o comando !sellpoints quantidade , voce ira criar um item com a quantidade de pontos digitada assim voce podera vender pontos do site in game. Em data/libs Crie um Arquivo chamado PremiumPaper.lua function getPremiumPoints(cid) local query = db.getResult("SELECT `premium_points` FROM `accounts` WHERE `id` = "..getPlayerAccountId(cid)) return query:getDataInt("premium_points") <= 0 and 0 or query:getDataInt("premium_points")endfunction setPremiumPoints(cid, amount) return db.executeQuery("UPDATE `accounts` SET `premium_points` = "..amount.." WHERE `id` = "..getPlayerAccountId(cid))end Em data/talkactions/scripts Crie um arquivo chamado sell_points.lua function onSay(cid, words, param) local var,points = "[sell Point System] Este documento vale %s points para você usar no site.",getPremiumPoints(cid) local min,max = 5, 100 if param == "" or not tonumber(param) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Desculpe, use somente numeros.") return true elseif tonumber(param) < min or tonumber(param) > max then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Desculpe, Minimo "..min.." e Maximo "..max.." points.") return true elseif points < tonumber(param) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Desculpe, mas você só possui "..points.." Premium Points.") return true end local item = doPlayerAddItem(cid, 7702,1) doItemSetAttribute(item, "description", var:format(tonumber(param))) setPremiumPoints(cid, points-tonumber(param)) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"[sell Point System] Você recebeu um paper com "..param.." Premium Points.") return trueend Em talkactions.xml <talkaction words="!sellpoints;/sellpoints" event="script" value="sell_points.lua"/> Em data/actions/scripts Crie um arquivo chamado paper_points.lua function onUse(cid, item, frompos, item2, topos) local var = getItemAttribute(item.uid, "description") if var == nil then return true end local x = var:match("%b[]") if x == "[sell Point System]" then local ret = var:match("%d+") doPlayerSendTextMessage(cid, 22,"você recebeu "..ret.." Premium Points.") setPremiumPoints(cid, getPremiumPoints(cid)+ret) doRemoveItem(item.uid) end return trueend Em Actions.xml adicione: ( Lembre-se de configurar o itemid para um que voce nao tenha usado ) <action itemid="7702" script="paper_points.lua"/> Imagem(1):
  5. Abra a pasta Mods do seu servidor e crie um arquivo chamados : Zombie.xml TFS 0.4 TFS 0.3.6 o monstro você instala em data/monsters zombie event.xml tag no monsters.xml <monster name="Zombie Event" file="zombie event.xml"/> Configurando: Sistema zombie_config = { storages = {172100, 172101}, -- não edite players = {min = 2, max = 30}, -- número minimo e máximo para jogadores no evento rewards = {items ={{2160,10},{2494,1}}, trophy = 5805}, -- premiações do jogador timeToStartEvent = 30, -- segundos para começar o evento após dar start CheckTime = 5, -- tempo que o TP fica aberto para os jogadores adrentarem o evento teleport = {{x=145, y=50, z=7}, {x=176 , y=54, z=5}}, -- posiçãodo tp onde aparece, posição para onde o jogador vai ao entrar no tp arena = {{x=173,y=52,z=5},{x=179,y=56,z=6}}, -- posição começo e final da area do evento monster_name = "Zombie Event", -- nome do monstro que será sumonado timeBetweenSpawns = 20, -- a cada quantos segundos é dado o respaw time do zombie no evento min_Level = 20 -- level minimo para participar do evento } Dia e Horário zombie_days = { ["Monday"] = {"13:00","18:00","20:00","22:00"}, ["Tuesday"] = {"13:00","18:00","20:00","22:00"}, ["Wednesday"] = {"13:00","18:00","20:00","22:00"}, ["Thursday"] = {"13:00","18:00","20:00","22:00"}, ["Friday"] = {"13:00","18:00","20:00","22:00"}, ["Saturday"] = {"13:00","18:00","20:00","22:00"}, ["Sunday"] = {"13:00","18:00","20:00","22:00"} } Créditos: Vodkart;
  6. Desculpe a demora entrei ontem para o mundo do xtibia se precisar de mais algo to ai meu parça <3
  7. function onUse(cid, item, fromPosition, itemEx, toPosition) local Gain = 1 local Stor = 67853 if getPlayerStorageValue(cid, Stor) >= 1 then doPlayerSendCancel(cid, "it's not possible") else doPlayerAddSkill(cid, 0, Gain) doPlayerAddSkill(cid, 1, Gain) doPlayerAddSkill(cid, 2, Gain) doPlayerAddSkill(cid, 3, Gain) doPlayerAddSkill(cid, 4, Gain) doPlayerAddSkill(cid, 5, Gain) doPlayerAddSkill(cid, 6, Gain) doPlayerSetMagicLevel(cid, Gain) doPlayerSetStorageValue(cid, Stor, 1) end end
  8. local function Storage() setPlayerStorageValue(cid,900,1) end AddEvent(Storage, 1000) end
  9. function onSay(cid, words, param) local bless = 0; for i = 1, 5 do if getPlayerBlessing(cid, i) then bless = bless+1; end end return doPlayerSendCancel(cid,(bless>0) and 'Voce esta com bless' or 'Voce nao possui bless.') and false;end
  10. http://www.mediafire.com/file/mhrxdxsw75njtrk/dameria+OTServ+7.6.rar
  11. local config = {efeitoTele = 134, -- efeito q ira aparacer a cada teleport.hits = 1, -- quantos hits vai dardelay = 400, -- intervalo de tempo a cada hit}function isWalkable(pos, creature, pz, proj) -- nord if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end if getTopCreature(pos).uid > 0 and creature then return false end if getTileInfo(pos).protection and not pz then return false end local n = not proj and 3 or 2 for i = 0, 255 do pos.stackpos = i local tile = getTileThingByPos(pos) if tile.itemid ~= 0 and not isCreature(tile.uid) then if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then return false end end end return trueendfunction getPosDirs(p, dir) -- mkalo return dir == 1 and {x=p.x-1, y=p.y, z=p.z} or dir == 2 and {x=p.x-1, y=p.y+1, z=p.z} or dir == 3 and {x=p.x, y=p.y+1, z=p.z} or dir == 4 and {x=p.x+1, y=p.y+1, z=p.z} or dir == 5 and {x=p.x+1, y=p.y, z=p.z} or dir == 6 and {x=p.x+1, y=p.y-1, z=p.z} or dir == 7 and {x=p.x, y=p.y-1, z=p.z} or dir == 8 and {x=p.x-1, y=p.y-1, z=p.z}endfunction validPos(pos)tb = {}for i = 1, 8 do newpos = getPosDirs(pos, i) if isWalkable(newpos) then table.insert(tb, newpos) endendtable.insert(tb, pos)return tbendspell58 = {start58 = function (cid, target, markpos, hits) if not isCreature(cid) then return true end if not isCreature(target) or hits < 1 then doTeleportThing(cid, markpos) doSendMagicEffect(getThingPos(cid), config.efeitoTele) return true end posAv = validPos(getThingPos(target)) rand = #posAv == 1 and 1 or #posAv - 1 doSendMagicEffect(getThingPos(cid), config.efeitoTele) doTeleportThing(cid, posAv[math.random(1, rand)]) end}function onCastSpell(cid)local position1 = {x=getCreaturePosition(cid).x, y=getCreaturePosition(cid).y, z=getCreaturePosition(cid).z}target = getCreatureTarget(cid)if target then spell58.start58(cid, target, getThingPos(cid), config.hits) doSendMagicEffect(position1, 95)endreturn trueend Quando voce for configurar em spells.xml voce escolhe a quantidade maxima de SQM >> range="10"
  12. Baixa o um programa chamado Xampp Adicione o banco de dados no localhostphpadmin Ponha seu servidor para rodar em Mysql usando a database criada.
  13. Crypter

    HELP-ME

    Seu pc da sem o windows instaler Vai no menu iniciar e escreve: Serviços e procura por Windows installer se achar inice-o, caso contrario baixe no site da microsoft ///
  14. Ele substitui pois os dois usam o Attribute > "name" Nao sei como funciona o doItemSetAttribute Mas tenta mudar para : "name1"
  15. Abra um ticket na central da vps perguntando se as portas 7171 e 7172 ja estão abertas caso contrario pessa para eles abrirem e tente denovo
  16. Ja tentou assim: {fromPos = {x=1509, y=1654, z=7}, toPos = {x=1662, y=1758, z=7}, priority = 1, sound="Smile Town.ogg"},{fromPos = {x=1509, y=1654, z=7}, toPos = {x=1662, y=1758, z=6}, priority = 1, sound="Smile Town.ogg"},{fromPos = {x=1509, y=1654, z=7}, toPos = {x=1662, y=1758, z=5}, priority = 1, sound="Smile Town.ogg"},{fromPos = {x=1509, y=1654, z=7}, toPos = {x=1662, y=1758, z=4}, priority = 1, sound="Smile Town.ogg"},
  17. Substitui e testa arruma o ip tb client_entergame.rar https://www.virustotal.com/pt/file/b2f671ab485496e77e6522e649077a177d1e904dfaac8c89155fd86018d240cd/analysis/1487901955/ client_entergame.rar
  18. Eu recomendo essas que são as mais usada na area de tibia: OtpanelServerCore4youstart
  • Quem Está Navegando   0 membros estão online

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