Kralifezik1
Membro
-
Registro em
-
Última visita
Tudo que Kralifezik1 postou
-
-
.Qual servidor ou website você utiliza como base? Qual o motivo deste tópico? Está surgindo algum erro? Se sim coloque-o aqui. Você tem o código disponível? Se tiver publique-o aqui: bom tudo funciona mais o npc nao libera passagem todas as quest de permissao estão liberadas pra arena eu falo com ele falo a dificuldade escolhe mais na hora do preço ele nao cobra nada e nao libera o YES nao vai alguem poderia me ajudar ?? Scrips: local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) 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 keywordHandler:addKeyword({'rules'}, StdModule.say, {npcHandler = npcHandler, text = 'What do you want to know? Something about the three different {difficulties}, the {general} rules or the {prices}? Maybe you also want to know what happens when you {die}?'}) keywordHandler:addKeyword({'difficulties'}, StdModule.say, {npcHandler = npcHandler, text = 'There are three difficulties: Greenhorn, Scrapper and Warlord. On each challenge you will be confronted with ten monsters increasing in strength.'}) keywordHandler:addKeyword({'levels'}, StdModule.say, {npcHandler = npcHandler, text = 'There are three difficulties: Greenhorn, Scrapper and Warlord. On each challenge you will be confronted with ten monsters increasing in strength.'}) keywordHandler:addKeyword({'difficulty'}, StdModule.say, {npcHandler = npcHandler, text = 'There are three difficulties: Greenhorn, Scrapper and Warlord. On each challenge you will be confronted with ten monsters increasing in strength.'}) keywordHandler:addKeyword({'greenhorn'}, StdModule.say, {npcHandler = npcHandler, text = 'That is the easiest way in our arena. The {fee} is 1000 gold. We were setting this up for of our children to challenge some easy monsters and train them for the future.'}) keywordHandler:addKeyword({'scrapper'}, StdModule.say, {npcHandler = npcHandler, text = 'The most common difficulty for us. The {fee} is 5000 gold. So if you are experienced in fighting middle class monsters this is your challenge!'}) keywordHandler:addKeyword({'warlord'}, StdModule.say, {npcHandler = npcHandler, text = 'Only the strongest among us will take this challenge. The {fee} is 10000 gold. If you pass that I promise you the respect of all citizens here. You will be a hero!'}) keywordHandler:addKeyword({'fee'}, StdModule.say, {npcHandler = npcHandler, text = 'The fee is either 1000, 5000 or 10000 gold for one try. Remember that if you {die}, it is YOUR problem and you won\'t be able to get back to your corpse and your backpack.'}) keywordHandler:addKeyword({'die'}, StdModule.say, {npcHandler = npcHandler, text = 'It would be better not to die! In every pit there is an emergency exit, the portal to the south. If you die in a pit... well... your corpse and backpack are gone, so you enter the arena at your own risk.'}) keywordHandler:addKeyword({'general'}, StdModule.say, {npcHandler = npcHandler, text = 'Basically you pay me a {fee}, and you are sent into an arena with 10 different stages. If you succeed you will be rewarded accordingly.'}) keywordHandler:addKeyword({'job'}, StdModule.say, {npcHandler = npcHandler, text = 'My job is to explain about the rules and to get the fee from the competitors.'}) keywordHandler:addKeyword({'mission'}, StdModule.say, {npcHandler = npcHandler, text = 'Well I would rather call it an {Ultimate Challenge} than a mission.'}) local function creatureSayCallback(cid, type, msg) if not npcHandler:isFocused(cid) then return false end local player = Player(cid) local arenaId = player:getStorageValue(Storage.SvargrondArena.Arena) if msgcontains(msg, 'fight') or msgcontains(msg, 'pit') or msgcontains(msg, 'challenge') or msgcontains(msg, 'arena') then if player:getStorageValue(Storage.SvargrondArena.Pit) == 1 then npcHandler:say('You already paid the fee, go and fight!', cid) return true end if arenaId < 1 then arenaId = 1 player:setStorageValue(Storage.SvargrondArena.Arena, arenaId) end if ARENA[arenaId] then npcHandler:say('So you agree with the {rules} and want to participate in the {challenge}? The {fee} for one try in {' .. ARENA[arenaId].name .. '} is ' .. ARENA[arenaId].price .. ' gold pieces. Do you really want to participate and pay the {fee}?', cid) npcHandler.topic[cid] = 1 else npcHandler:say('You\'ve already completed the arena in all {difficulty levels}.', cid) npcHandler.topic[cid] = 0 end elseif npcHandler.topic[cid] == 1 then if msgcontains(msg, 'yes') then if not ARENA[arenaId] then npcHandler.topic[cid] = 0 return true end if player:removeMoneyNpc(ARENA[arenaId].price) then player:setStorageValue(Storage.SvargrondArena.Pit, 1) npcHandler:say('As you wish! You can pass the door now and enter the teleporter to the pits.', cid) local cStorage = ARENA[arenaId].questLog if player:getStorageValue(cStorage) ~= 1 then player:setStorageValue(cStorage, 1) end else npcHandler:say('You do not have enough money.', cid) end else npcHandler:say('Come back when you are ready then.', cid) end npcHandler.topic[cid] = 0 end return true end npcHandler:setMessage(MESSAGE_GREET, 'Hello competitor! Do you want to {fight} in the arena or shall I explain the {rules} first?') npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui.
-
.Qual servidor ou website você utiliza como base? Otx Globalmix 12.31 tfs 1.3 Qual o motivo deste tópico? Script Oberon Bugado Está surgindo algum erro? Se sim coloque-o aqui. Você tem o código disponível? Se tiver publique-o aqui: local config = { bossName = "Grand Master Oberon", lockStorage = 5000105, -- globalstorage bossPos = Position(33364, 31317, 9), centerRoom = Position(33364, 31318, 9), -- Center Room exitPosition = Position(33366, 31342, 9), -- Exit Position newPos = Position(33364, 31321, 9), range = 10, time = 10, -- time in minutes to remove the player } --[[local monsters = { {pillar = "oberons ire", pos = Position(33367, 31320, 9)}, {pillar = "oberons spite", pos = Position(33361, 31320, 9)}, {pillar = "oberons hate", pos = Position( 33367, 31316, 9)}, {pillar = "oberons bile", pos = Position(33361, 31316, 9)} }]] local function clearOberonRoom() if Game.getStorageValue(config.lockStorage) == 1 then local spectators = Game.getSpectators(config.bossPos, false, false, 10, 10, 10, 10) for i = 1, #spectators do local spectator = spectators if spectator:isPlayer() then spectator:teleportTo(config.exitPosition) spectator:getPosition():sendMagicEffect(CONST_ME_TELEPORT) spectator:say('Time out! You were teleported out by strange forces.', TALKTYPE_MONSTER_SAY) elseif spectator:isMonster() then spectator:remove() end end Game.setStorageValue(config.lockStorage, 0) end end -- Start Script function onUse(player, item, fromPosition, target, toPosition, isHotkey) if item.itemid == 1945 and item.actionid == 57605 then if player:getPosition() ~= Position(33364, 31344, 9) then return true end for x = 33362, 33366 do local playerTile = Tile(Position(x, 31344, 9)):getTopCreature() if playerTile and playerTile:isPlayer() then if playerTile:getStorageValue(Storage.TheSecretLibrary.TheOrderOfTheFalcon.OberonTimer) > os.time() then playerTile:sendTextMessage(MESSAGE_STATUS_SMALL, "You or a member in your team have to wait 20 hours to challange Grand Master Oberon again!") item:transform(1946) return true end end end local specs, spec = Game.getSpectators(config.centerRoom, false, false, 15, 15, 15, 15) for i = 1, #specs do spec = specs if spec:isPlayer() then player:sendTextMessage(MESSAGE_STATUS_SMALL, "There's someone fighting with Grand Master Oberon.") item:transform(1946) return true end end if Game.getStorageValue(config.lockStorage) == 1 then player:sendTextMessage(MESSAGE_STATUS_SMALL, "You need wait 10 minutes to room cleaner!") return true end local spectators = Game.getSpectators(config.bossPos, false, false, 15, 15, 15, 15) for i = 1, #spectators do local spectator = spectators if spectator:isMonster() then spectator:remove() end end --[[for n = 1, #monsters do Game.createMonster(monsters[n].pillar, monsters[n].pos, true, true) end]] Game.createMonster(config.bossName, config.bossPos, true, true) Game.setStorageValue(config.lockStorage, 1) for x = 33362, 33366 do local playerTile = Tile(Position(x, 31344, 9)):getTopCreature() if playerTile and playerTile:isPlayer() then playerTile:getPosition():sendMagicEffect(CONST_ME_POFF) playerTile:teleportTo(config.newPos) playerTile:getPosition():sendMagicEffect(CONST_ME_TELEPORT) playerTile:setStorageValue(Storage.TheSecretLibrary.TheOrderOfTheFalcon.OberonTimer, os.time() + 20 * 60 * 3600) -- + 20 * 60 * 3600 addEvent(clearOberonRoom, 60 * config.time * 1000, playerTile:getId(), config.centerRoom, config.range, config.range, config.exitPosition) playerTile:sendTextMessage(MESSAGE_STATUS_SMALL, "You have 10 minutes to kill and loot this boss. Otherwise you will lose that chance and will be kicked out.") item:transform(1946) end end elseif item.itemid == 1946 then item:transform(1945) end return true end Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui.
-
alguem poderia me ajudar com o Reward Shrine ou melhor premrio diario dos 7 dias vc pega potions e etc. o meu sistema da todo bugado meu servidor tfs 1.3 cliente 12.31 Scripts modules/: alguem poderia me ajudar ou me manda 1 scripts que funfa por favor local exhaustTime = 5 -- seconds local ServerPackets = { DailyRewardCollectionState = 0xDE, -- 222 --client 11 flag? OpenRewardWall = 0xE2, -- 226 CloseRewardWall = 0xE3, -- 227 DailyRewardBasic = 0xE4,-- 228 DailyRewardHistory = 0xE5 -- 229 } local ClientPackets ={ OpenRewardWallButton = 0xD8, -- 216 RewardHistoryRequest = 0xD9, -- 217 RewardConfirm = 0xDA -- 218 } function Player:sendDailyRewardCollectionState(state) local msg = NetworkMessage() msg:addByte(ServerPackets.DailyRewardCollectionState) msg:addByte(state) -- activated/deactivated/expired ?? msg:sendToPlayer(self) end function Player:sendAvailableTokens() local client = self:getClient() if ((client.os ~= CLIENTOS_NEW_WINDOWS and client.os ~= CLIENTOS_FLASH) or client.version < 1140) then return false --silently ignore end local msg = NetworkMessage() msg:addByte(0xEE) msg:addByte(20) --instantRewardToken Resource Identifier msg:addU64(self:getInstantRewardTokens()) msg:sendToPlayer(self) end local function addRewardtoMsg(player, reward , msg) local typeReward if reward.type == REWARD_TYPE_RUNE_POT then typeReward = 1 else typeReward = 2 end msg:addByte(typeReward) if typeReward == 1 then msg:addByte(reward.ammount) local rewardList = player:getAvailableDailyRewardItems() local rewardCount = 0 local runes = rewardList.runes local potions = rewardList.potions if runes then rewardCount = rewardCount + #runes end if potions then rewardCount = rewardCount + #potions end msg:addByte(rewardCount) if potions then for i = 1, #potions do local potion = potions local itype = ItemType(potion.potionid) msg:addU16(potion.spriteid) msg:addString(potion.name) msg:addU32(itype:getWeight()) end end if runes then for i = 1, #runes do local rune = runes local itype = ItemType(rune.runeid) msg:addU16(rune.spriteid) msg:addString(itype:getArticle() .. " " .. itype:getName()) msg:addU32(itype:getWeight()) end end else if reward.type == REWARD_TYPE_PREY_REROLL then msg:addByte(1) --counter msg:addByte(2) -- prey flag msg:addByte(math.max(1, reward.ammount)) elseif reward.type == REWARD_TYPE_TEMPORARYITEM then msg:addByte(#reward.items) --counter for j=1, #reward.items do msg:addByte(1) -- flag fixed item local item = reward.items[j] msg:addU16(item.id) msg:addString(getItemName(item.id)) msg:addByte(item.ammount) end elseif reward.type == REWARD_TYPE_XP_BOOST then msg:addByte(1) -- counter msg:addByte(3) -- xp boost msg:addU16(reward.ammount) end end end function Player:sendDailyRewardBasic() local client = self:getClient() if ((client.os ~= CLIENTOS_NEW_WINDOWS and client.os ~= CLIENTOS_FLASH) or client.version < 1140) then return end if self:getStorageValue(Storage.dailyReward.exhaust) > os.time() then self:sendCancelMessage(RETURNVALUE_YOUAREEXHAUSTED) self:getPosition():sendMagicEffect(CONST_ME_POFF) return end self:setStorageValue(Storage.dailyReward.exhaust, os.time() + exhaustTime) local rewardCount = #REWARD_LANE["PREMIUM_ACC"] --reads doubled because of the free/pacc local msg = NetworkMessage() msg:addByte(ServerPackets.DailyRewardBasic) msg:addByte(rewardCount) local freeAccLane = REWARD_LANE["FREE_ACC"] local paccLane = REWARD_LANE["PREMIUM_ACC"] for i=1, rewardCount do --FREEACC addRewardtoMsg(self, freeAccLane, msg) --PREMIUM_ACC addRewardtoMsg(self, paccLane, msg) end --daily reward local freeRewardLimit = 1 msg:addByte(#REWARD_STREAK) for i=1, #REWARD_STREAK do msg:addString(REWARD_STREAK.description) msg:addByte(REWARD_STREAK.days) if not REWARD_STREAK.premium and freeRewardLimit + 1 == REWARD_STREAK.days then freeRewardLimit = REWARD_STREAK.days end end msg:addByte(freeRewardLimit) --max free accounts days bonus <inclusive> msg:sendToPlayer(self) end function Player:sendOpenRewardWall(isFreePick, nextRewardPick, hasString, confirmationString) local isFreePick = isFreePick or 0 --next to a reward shrine local nextRewardPick = nextRewardPick or os.time() --next reward pick timestamp local currentReward = self:getCurrentRewardLaneIndex(--[[zerobased=]]true) --current reward index 0-based local activateString = hasString -- a bool to activate/deactivate the dialog confirmation for certain operations local someString = confirmationString -- string in the dialog local timestampPickLimit -- timeout to pick the reward before reset streak (server save) if not self:canGetDailyReward() then timestampPickLimit = 0 else timestampPickLimit = Game.getLastServerSave() + 24*60*60 end local currentDayStreak = self:getCurrentDayStreak() local someOtherU16 = 200 -- have no idea local msg = NetworkMessage() msg:addByte(ServerPackets.OpenRewardWall) msg:addByte(isFreePick) --some boolean (0,1) msg:addU32(nextRewardPick) msg:addByte(currentReward) msg:addByte(activateString) if activateString ~= 0 then msg:addString(someString) end msg:addU32(timestampPickLimit) msg:addU16(currentDayStreak) msg:addU16(someOtherU16) msg:sendToPlayer(self) end function Player:sendCloseRewardWall() local msg = NetworkMessage() msg:addByte(ServerPackets.CloseRewardWall) --empty body msg:sendToPlayer(self) end function Player:sendDailyRewardHistory(history) if history and #history>0 then local msg = NetworkMessage() msg:addByte(ServerPackets.DailyRewardHistory) msg:addByte(#history) --number of entries perhaps? for i=1, #history do local entry = history msg:addU32(entry.timestamp) msg:addByte(0) -- toggle green font (talvez seja a recompensa do dia de hoje?) --só 1 permitido msg:addString(entry.event) msg:addU16(entry.streak) end msg:sendToPlayer(self) end end function onRecvbyte(player, msg, byte) if(byte == ClientPackets.RewardConfirm) then local client = player:getClient() if ((client.os ~= CLIENTOS_NEW_WINDOWS and client.os ~= CLIENTOS_FLASH) or client.version < 1140) then return player:sendCancelMessage(RETURNVALUE_NOTPOSSIBLE) end local currentRewardIndex = player:getCurrentRewardLaneIndex(--[[zerobased=]]true) --zero-based local usedToken = msg:getByte() if usedToken == 0 and not player:isCloseToRewardShrine() then return player:sendCancelMessage(RETURNVALUE_TOOFARAWAY) end local reward if player:isPremium() then reward = REWARD_LANE["PREMIUM_ACC"][currentRewardIndex+1] else reward = REWARD_LANE["FREE_ACC"][currentRewardIndex+1] end if reward.type == REWARD_TYPE_RUNE_POT then local count = msg:getByte() local selectedCount=0 local rewardsSelected = {} for i=1, count do local itemType = Game.getItemIdByClientId(msg:getU16()) local itemCount = msg:getByte() local currentSelection = { itemid = itemType:getId(), count = itemCount } selectedCount= selectedCount+itemCount table.insert(rewardsSelected, currentSelection) end if selectedCount > reward.ammount then -- evitando receber mais reward que o permitido via WPE return player:sendCancelMessage(RETURNVALUE_NOTPOSSIBLE) end --TODO: verificar se todos os itens selecionados são legítimos player:receiveReward(usedToken, reward.type, rewardsSelected) elseif reward.type == REWARD_TYPE_TEMPORARYITEM then local rewardsSelected = {} for i=1,#reward.items do local currentSelection = { itemid = reward.items.id, count = reward.items.ammount } table.insert(rewardsSelected, currentSelection) end player:receiveReward(usedToken, reward.type, rewardsSelected) elseif reward.type == REWARD_TYPE_PREY_REROLL or reward.type == REWARD_TYPE_XP_BOOST then player:receiveReward(usedToken, reward.type, reward.ammount) end elseif byte == ClientPackets.OpenRewardWallButton then local client = player:getClient() if ((client.os ~= CLIENTOS_NEW_WINDOWS and client.os ~= CLIENTOS_FLASH) or client.version < 1140) then return player:sendCancelMessage(RETURNVALUE_NOTPOSSIBLE) end player:sendRewardWindow() elseif byte == ClientPackets.RewardHistoryRequest then local cb = function(history) if history then player:sendDailyRewardHistory(history) end end player:getDailyRewardHistory(cb, 20) end return true end
-
preciso de: Mapper. Scripts. quem tiver disposto manda msg PV aqui no Site. falando sobre oq sabe fazer o o quanto disposto ta para seguir com o servidor Sobre o Servidor Maioria das quests sem precisar de missão; Client Novo 12.15; Client 10.00 com ip-changer e magebot; Novas Deep Desert; Novas Falcons; Novas MOTA extension; Novas Deathlings; Daily Reward; Prey system; Novas Asuras; Sistema de Auto Loot; Exercise Training; Raids 100%; Monstros 100%; Trainer Offline 100%; Trainer Online 100%; Database Completa; War System 100%;
-
Ola, estou com um global online 12.15 ele nao passa do nivel 301 alguem poderia me ajuda onde posso mudar isso e etc ??
-
preciso de ajuda pra criar cliente 12+ quem puder me ajuda, ou manda tutorial ou video aula agradeço
-
Alguem me ensina a como criar um cliente prorpio 12+, alguem manda um tutotiro ou video aula por favor obrigado
-
Ola, Boa noite o RME 3.6 nao da pra editar mais teleportes por eles tipo a posição que vai depois que entra... como eu resolvo isso ?? ou como cria um teleporte por scripts alguem me ajuda com algum tutorial ou video aula por favor
-
Novo visual do templo; Dodge System; Evento Snowball War; Evento Defend the Towers; Evento Capture the Flag; Evento Desert War; Evento Battlefield; Evento Firestorm; Evento Zombie; Evento Castle 48 Horas; Evento SuperUP; Versão 8.60; Bugs criticos fixados; Mapa baiak editado e reformulado; Temos Vagas: GOD 1: mapper, scripts etc CM 1: scripts, suporte etc Tutor 2: DIvulgador, Suporte no Server.
-
Ola, to querendo ajuda, para monte um serve preciso de pessoas que saibam mexer é lidar com tudo... preciso de: ADM 1 vaga GM 1 vaga preciso de ajuda de alguem que siaba mexer com otserv, e com host que saiba site e pra compra o host eu vou compra o host e etc pra por online... é isso tiver interesse manda msg aqui
-
Ola a todos procuro pessoas pra ajudar criar servidor de poketibia eu vou bota online net de 100gb sei por online, ja tive servidor de poketibia , chmado Poke x Black. volta por online sou mapper, scripts. Objetivo: vamos procurar uma boa base pra por online vamos fazer divulgação e vamos editando pouco a pouco e atualizando o servidor. é isso so deixa msg ai quem quiser participar.
-
-
-
-
-
Qual Seu Nome: Alexandre Carlos Qual àrea trabalha: Mapper,Cliente Maker,Script, Seu Adicionar pokemons e tudo mais... Quanto tempo trabalha nesta área: tenho tempo livre de 18 horas Tem algum exemplo de seu trabalho: sou dono do Poke X Black Meio de Contato?? Skype/facebook: Skype: alexandre.zik1
-
-
Curricuelo: Nome: Alexandre Carlos... Idade: 18 O que sei fazer: Mapper : fazer mada do Zero em 3 semanas Scripts: adicionar novas scripts, arruma, adicionar pokemons e etc... Cliente Maker: mudar imagme de fundo, o icone, ip, é tudo mais... Web Master: fazer site Exclusivos é bem bacana.... Contato pelo Skype: alexandre.zik1
-
cara server muito bom, mano seguinte o programa que vc zipo o cliente o winzap mano nao ta funfano aqui no meu tb eu tentei por para winrar mais bugo... tem como vc bota o cliente no winrar é bota pra baixar por favor ou si alguem ai tiver este cliente mi passase... Obrigado pela atenção REP+ pra quem mi ajuda
-
fala ai galera do TK bom vim trazer a todos a dat,pic e spr do cliente do server do Pokelute. espero que gostem. Informações: bom tem muitas Sprite boas de pokemon la de items é etc EX: sprite> mega charizard x atualizado, mega latios, mega amparos , mega bonete é etc todos os lendarios como: shiny jirachi, shiny arceus, xerneas, yveltal é etc tem varias coisas la que sei que poderam ser usadas do server de pokemon de vcs espero que gostem.... LINK: http://www.mediafire.com/download/9hj36uz9x9o3xmi/Dat+e+Spr+do+Pokelute.rar Ajudei ? Rep +
-
seria bom si vc disse-se quais são os sprite, é tb seria bom tira umas print para posta ai dos mega... fica a dica... so vou baixar ou tirar rep+ si vc bota os nome dos mega que vc este disponibilizando
-
Fala Monte vc nao vai achar minha base de pokemon... mano é como falei foi editado mais vc nao acredita vc nunca vai achar uma igual de mão beijada... vc tera que dar algo de valor em troca ou vc mesmo edita o seu mano é so assim que vc ira conseguir....
-
Vey conserteza deve ter uma coisa errada na Scripts do Poke, e tb pode ter que vc tenha adicionado o poke errado mais tudo indica que é a script do poke mano..
-
