

AndreAmaral
Campones-
Total de itens
9 -
Registro em
-
Última visita
Tudo que AndreAmaral postou
-
[Tutorial]Criando Website Com Xampp
tópico respondeu ao ultimate1996 de AndreAmaral em Tutoriais de Websites
Ajuda Aqui Plz , qndo eu importo o arquivo.sql ele da esse erro aqui mano , n sei oq fazer pq n sou mt bom com sites , alguem me ajuda plz :X consulta SQL: ALTER TABLE `players` ADD `marrystatus` INT UNSIGNED NOT NULL DEFAULT '0' AFTER `marriage` ; Mensagens do MySQL : #1146 - Table 'otserv.players' doesn't exist -
MANO RESPONDE OS CARAS AI PLZZZ =S AS LETRAS TAO EMBARALHADAS E SEU TOPICO QUE VC BOTOU N EXISTE MAIS =[
-
The Forgotten Server Versao 8.60 Nivel : Baixo / Medio Tipo Do Scrpt : Talkaction GALERA ME AJUDA AKI PELO AMOR D DEUS SO FALTA ISSO PA CONCLUIR MEU OT : Tenho um scipt aki que peguei no x tibia msm de Carro, porem eu queria que so usasse esse scrpt com uma chave.. O script funciona todo por talkaction ,queria que usasse as talkactions se tivesse um item, o Da Chave que o id é 8981 DAREI REP + È CLARO !! O Script è Esse Aqui : ________________________________________________________________________________________ --<< Configurable >>-- local storages = { speed = 314622, status = 352993 } -- Empty storages local cfg = { min_speed = 300, -- better not increase than that [ the least speed for a car ] max_speed = 200, -- better not decrease than this [ the maximum speed for a car ] Increase_per_command = 100, -- The speed increase or decrease value per each command (!car speed // !car slow) Car_Explode = true -- Keep it true , so your map isnt filled with cars } -->> END <<-- --<< Functions >>-- function isWalkable(pos, creature, pz)-- Modificações by Hudsin,Arkires e Pinpao Xtibia 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 pz then return false, true 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 return true end function getCarSpeed(cid) return getPlayerStorageValue(cid,storages.speed) end function setCarSpeed(cid,value) return setPlayerStorageValue(cid,storages.speed, getPlayerStorageValue(cid,storages.speed) + value) end function setCarStatus(cid,value) return setPlayerStorageValue(cid,storages.status,value) end function carMove(cid) return getPlayerStorageValue(cid,storages.status) > 0 and true or false end function move(cid,time) local dir = getCreatureLookDir(cid) local id = isInArray({1,3},getCreatureLookDir(cid)) and 7267 or 7266 local place = getPositionByDirection(getThingPos(cid),dir,1) if isWalkable(place,true,true,true) then doRemoveItem( getTileItemById(getThingPos(cid),7267).uid > 0 and getTileItemById(getThingPos(cid),7267).uid or getTileItemById(getThingPos(cid),7266).uid ) doTeleportThing(cid,place,false) addEvent(doSendMagicEffect,time+10,place,34) doCreateItem(id,1,place) if carMove(cid) then addEvent(move,time,cid,getCarSpeed(cid)) else doRemoveItem( getTileItemById(getThingPos(cid),7267).uid > 0 and getTileItemById(getThingPos(cid),7267).uid or getTileItemById(getThingPos(cid),7266).uid ) end else doCreatureSetNoMove(cid, 0) doPlayerSendTextMessage(cid,27,"You have hit somthng.") setCarStatus(cid,0) if cfg.Car_Explode then doRemoveItem( getTileItemById(getThingPos(cid),7267).uid > 1 and getTileItemById(getThingPos(cid),7267).uid or getTileItemById(getThingPos(cid),7266).uid ) doSendAnimatedText(getThingPos(cid),"Crashed",TEXTCOLOR_RED) doSendMagicEffect(getThingPos(cid),31) end end end --<< Functions Ends <<-- function onSay(cid, words, param, channel) if param == "speed" then if carMove(cid) then if getCarSpeed(cid) > cfg.max_speed then setCarSpeed(cid,-(cfg.Increase_per_command)) addEvent(doSendAnimatedText,10,getThingPos(cid),"Speeding",TEXTCOLOR_GREEN) else setCarSpeed(cid,cfg.max_speed) doPlayerSendCancel(cid,"The car is in its maximum speed.") end else doPlayerSendCancel(cid,"You should start moving first.") end elseif param == "slow" then if carMove(cid) then if getCarSpeed(cid) < cfg.min_speed then setCarSpeed(cid,cfg.Increase_per_command) addEvent(doSendAnimatedText,10,getThingPos(cid),"Slowing",TEXTCOLOR_GREEN) else setCarSpeed(cid,cfg.min_speed) doPlayerSendCancel(cid,"The car is in its minumium speed.") end else doPlayerSendCancel(cid,"You should start moving first.") end elseif param == "stop" then -- by DarkVelocity Xtibia if carMove(cid) then setCarStatus(cid,0) doCreatureSetNoMove(cid, 0) else doPlayerSendCancel(cid,"Car is already stopped.") end elseif param == "move" then if not carMove(cid) then if getTileItemById(getThingPos(cid),7267).uid < 1 and getTileItemById(getThingPos(cid),7266).uid < 1 then local item = isInArray({1,3},getCreatureLookDir(cid)) and 7267 or 7266 doCreateItem(item,1,getThingPos(cid)) end setPlayerStorageValue(cid,storages.speed,cfg.min_speed) setCarStatus(cid,1) doCreatureSetNoMove(cid, 1) move(cid,getCarSpeed(cid)) else doPlayerSendCancel(cid,"Car is already moving.") end end end return true end ________________________________________________________________________________________ AGRADEÇO DESDE JA OBRIGADO !!!!!!!!!!!!!!!!!!!!! Esqueci De Falar Que o Comando Que Tou Tentando Colocar Pra Usar o Scrpt SE TIVER TAL ITEM ai ensima é o seguinte n sei se ta certo local config= { id = 8981, -- id do item que precisa count = 1, -- qntos items precisa Remove = false -- true para remover o item depois de usar e false para não remover } function onSay(cid, words, param) if getPlayerItemCount(cid, config.id) < config.count then return doPlayerSendTextMessage(cid, 27, "Você precisa de "..config.count.." "..getItemNameById(config.id).." para usar este comando.") end JA TENTEI DE TUDO MAS N FUNCIONA PQ ELE DIS QUE TA PRECISANDO DE UM END PRA FEIXA A FUNÇAO IF , SO QUE JA METI O END EM TUDO QUE E LUGAR ( LA ELE ) kkk' MAS N FUNCIONOU NAO =[[[ VLW AE GALERA :X
-
- scipt kart
- kart
- (e 7 mais)
-
talkaction [Talkaction] Dirigindo "carro"
tópico respondeu ao Hudsin de AndreAmaral em Actions e Talkactions
MANO ME AJUDA AKI PLZZZZZZZZZZz =[ EU BOTEI NO MEU OT O SYSTEM FUNFOU CERTINHO ( SÒ TEM UM COISA QUE QUANDO O CARA DESLOGA NO CARRO ELE FICA NO MAP ) MAS TA DE BOA..... TEM COMO POR PRA USAR ESSAS TALKACTION SÒ SE TIVER UM CERTO ITEM ???? (TIPO A PESSOA TERIA QUE TER UMA CHAVE PARA PODER USAR O CARRO ) DAÌ MELHORARIA O RPG E SO QM FIZESSE UMA QST PEGARIA ESSA KEY .... TO PRECISANDO URGENTE DISSO.. VLW AE MANOOO =DDD REP PRA VC++ E PRA QM ME AJUDAR !!! -
[Ajuda Aqui Urgente ] Bug Nas Portas Dou Rep +
um tópico no fórum postou AndreAmaral Actions e Talkactions
Versão 8.60 The Forgotten Server Nivel : Baixo / Medio GALERA ME AJUDEM AI PLZZZZZZZZZZZ , MEU SERVER TAVA NORMAL MAS DE UMA HORA PRA OUTRA TA DANDO BUG NAS PORTAS N CONSIGO ABRIR NENHUMA PORTA INCLUSIVE AS DAS HOUSES APARECE ESSE ERROR : 22:25 The door seems to be sealed against unwanted intruders. AS PORTAS SÂO COMUNS DE HOUSE... AGRADEÇO DESDE JA E DAREI REP ++ PRA QM AJUDAR AI =X TO PRECISANDO DISSO PRA POR O OT ON PLZZZ :X- 2 respostas
-
- bug
- bug nas portas
-
(e 2 mais)
Tags:
-
Construction House System - Actions
tópico respondeu ao eduardo190696 de AndreAmaral em Actions e Talkactions
Como Que Eu Adiciono o item no item.otb ??! :S se não salvar fica sem graça =[ :X -
[Ajuda Aqui Urgente =(] Instalar Scrpt Construir House Do Mock
tópico respondeu ao AndreAmaral de AndreAmaral em Actions e Talkactions
mano esse topico nem se compara com o scrpt que o mock fez ;S , o do mock é 1000 x Melhor! , e esse tmb o do cara ai NÃO SALLVA AS PAREDES QnDO O OT CAI! :S... Abraço..- 2 respostas
-
- contruir house
- house
- (e 4 mais)
-
[Ajuda Aqui Urgente =(] Instalar Scrpt Construir House Do Mock
um tópico no fórum postou AndreAmaral Actions e Talkactions
Versao : 8.60 The Forgotten Server Nivel : Baixo / Medio GALERA PLZ AJUDA AQUI DOU REPPPP +++++ , é o seguinte o mock postou um scrpt dele só que n to conseguindo instalar ele pq ele explicou por cima ... e n entendo mt de scrpt não , Daí TO PRECISANDO URGENTE que alguem me ajude a instalar esse scrpt no meu server ;[ Como eu nao Sei Organizar o Scrpt Vou Por O Link Aqui Dele AGRADEÇO DESDE JA, E QM AJUDAR DAREI 3 REP +++ 3 DIAS SEGUIDOS PLZ AJUDEM AE =[ VLWWWWWWWWWWW O Scrpt Pode-se Encontrar AQUI : http://otland.net/f8...n-house-132895/- 2 respostas
-
- contruir house
- house
- (e 4 mais)
-
Versão - 8.60 The Forgotten Server Nivel : baixo/medio Galera To Precisando De Uma Ajudinha aqui Besta qndo eu ponho o ot On ta dando esse erro no Exe : [Warning - Houses::loadFromXml] House entry not set for: Forgotten headquarter (Flat 1, Area 42) (1760) Só que eu ja fui no house.xml e ja adicionei a posição de frente da porta de cada house e continua dando error...Parece que ñ ta salvando as modificações que fiz no Xml. (Fiz isso com o ot Feixado e Aberto). È besta essa duvida mas DOU REP + PRA QM AJUDAR
-
Preciso De Um Npc Que Invita Na House Pagando 10Kk
tópico respondeu ao BRZINHOBR de AndreAmaral em Lixeira Pública
Desculpaê Reviver o topico mas to precisando Mt Desse Npc TMB!!! Mesmo Motivo Dele.... -
VLWWW VODKARTTTT VOU TESTAR E JA VOLTO PRA POSTAR SE FUNFOU! =D Nem Funfou Manoooo =(((((((((((( n da Bug nenhum nem dá a xp... Botei No Login.lua e botei no CreatureScrpt a Function type "PrepareDeath" mas n foi n :S
- 2 respostas
-
- pvp enfo
- ajuda enfo
- (e 5 mais)
-
Tipo do script: CreatureScript Protocolo (versão do Tibia): 8.60 Servidor utilizado: The Forgotten Server Nível de experiência: baixa/media Adicionais/Informações: DAREI 3x REP +++ Galera To Precisando URGENTEMENTE :S De um scrpt que qndo a pessoa matar em UMA determinada AREA Ganhe XP, ou então qndo matar em uma AREA ganhe um item ,porem queria pedir pra vcs se ganhar um item se pode fazer um npc que troque o item por Xp . Um brother tentou me ajudar mas ele ta sem tempo pra ver ele me mando esse scrpt aqui pra ganhar xp qndo matar , porem esta com o seguinte erro : [19/12/2011 12:24:51] [Error - LuaScriptInterface::loadFile] data/creaturescripts/scripts/pvpxp.lua:3: unexpected symbol near 'local' [19/12/2011 12:24:51] [Warning - Event::loadScript] Cannot load script (data/creaturescripts/scripts/pvpxp.lua) [19/12/2011 12:24:51] data/creaturescripts/scripts/pvpxp.lua:3: unexpected symbol near 'local' DAÍ EU TIRO TODOS "LOCAL" E DA ESSE ERRO AQUI : [Error - LuaScriptInterface::loadFile] data/creaturescripts/scripts/pvpxp.lua:5: '(' expected near 'gainExperience' [Warning - Event::loadScript] Cannot load script (data/creaturescripts/scripts/pvpxp.lua) data/creaturescripts/scripts/pvpxp.lua:5: '(' expected near 'gainExperience' O SCRIPT QUE ELE ME MANDOU E ESSE AQUI : local pvpParcent = 2 -- porcentagem, 2 = 20% local fromPosition = {x = 1186, y = 1072, z = 7}, -- canto superior esquerdo do teu mapa local toPosition = {x = 1195, y = 1081, z = 7}, -- canto inferior direito do teu mapa function gainExperience(cid, lastHitKiller, mostDamageKiller) if (isPlayer(lastHitKiller) and isPlayer(mostDamageKiller)) and (lastHitKiller ~= mostDamageKiller) then doPlayerAddExp(lastHitKiller, (getPlayerExperience(cid)/200)*pvpParcent) end end function onPrepareDeath(cid, lastHitKiller, mostDamageKiller) if isPlayer(cid) then if isInArea(getPlayerPosition(cid), fromPosition, toPosition) then gainExperience(cid, lastHitKiller, mostDamageKiller) end end return TRUE end AGRADEÇO DESDE JA! :X
- 2 respostas
-
- pvp enfo
- ajuda enfo
- (e 5 mais)
-
[Ajuda Urgente :s] Scrpt Pvp Enfo Em Uma Area Ou Ganhar Item Qndo Matar Em Uma Area
um tópico no fórum postou AndreAmaral Lixeira Pública
Tipo do script: CreatureScript Protocolo (versão do Tibia): 8.60 Servidor utilizado: The Forgotten Server Nível de experiência: baixa/media Adicionais/Informações: DAREI 3x REP +++ Galera To Precisando URGENTEMENTE :S De um scrpt que qndo a pessoa matar em UMA determinada AREA Ganhe XP, ou então qndo matar em uma AREA ganhe um item ,porem queria pedir pra vcs se ganhar um item se pode fazer um npc que troque o item por Xp . Um brother tentou me ajudar mas ele ta sem tempo pra ver ele me mando esse scrpt aqui pra ganhar xp qndo matar , porem esta com o seguinte erro : [19/12/2011 12:24:51] [Error - LuaScriptInterface::loadFile] data/creaturescripts/scripts/pvpxp.lua:3: unexpected symbol near 'local' [19/12/2011 12:24:51] [Warning - Event::loadScript] Cannot load script (data/creaturescripts/scripts/pvpxp.lua) [19/12/2011 12:24:51] data/creaturescripts/scripts/pvpxp.lua:3: unexpected symbol near 'local' DAÍ EU TIRO TODOS "LOCAL" E DA ESSE ERRO AQUI : [Error - LuaScriptInterface::loadFile] data/creaturescripts/scripts/pvpxp.lua:5: '(' expected near 'gainExperience' [Warning - Event::loadScript] Cannot load script (data/creaturescripts/scripts/pvpxp.lua) data/creaturescripts/scripts/pvpxp.lua:5: '(' expected near 'gainExperience' O SCRIPT QUE ELE ME MANDOU E ESSE AQUI : local pvpParcent = 2 -- porcentagem, 2 = 20% local fromPosition = {x = 1186, y = 1072, z = 7}, -- canto superior esquerdo do teu mapa local toPosition = {x = 1195, y = 1081, z = 7}, -- canto inferior direito do teu mapa function gainExperience(cid, lastHitKiller, mostDamageKiller) if (isPlayer(lastHitKiller) and isPlayer(mostDamageKiller)) and (lastHitKiller ~= mostDamageKiller) then doPlayerAddExp(lastHitKiller, (getPlayerExperience(cid)/200)*pvpParcent) end end function onPrepareDeath(cid, lastHitKiller, mostDamageKiller) if isPlayer(cid) then if isInArea(getPlayerPosition(cid), fromPosition, toPosition) then gainExperience(cid, lastHitKiller, mostDamageKiller) end end return TRUE end AGRADEÇO DESDE JA! :X -
Alguem Me Ajuda Ae Galera namorall!!!, Sei que tou no topico errado mas tem um pouco haver.. ;S Preciso de um Tile que Bloquei Magias Ou Entao de Preferencia uma Area que n possa soltar magias ... Dou Rep ++++++ =xx Abraço ae ;*
-
Tipo do script: ACTION Ou Movement Protocolo (versão do Tibia): 8.60 Servidor utilizado: The Forgotten Server Nível de experiência: media /baixa Adicionais/Informações: GALERA TO MAIS DE 2 DIAS PROCURANDO ESSE SCRPT N AXO EM NENHUM LGAR ALGUEM PODE ME AJUDAR AI ??!! =SSSSSS.. - Preciso De um scrpt que uma determinada Area Do mApa Bloquei SPELLS ou Entao um Piso Que BLoquei Spells!!
-
Mano ME AJUDA AI PELO AMOR D DEUS JA RODEI MILHOES DE TOPICOS ATRAS DISSO Preciso de um Piso que Bloquei Soltar magia! Ou entao de preferencia Uma Area Que n Deixe Soltar Magia ... ( N poder Ser Pz)(( Urgente =[ Ti Douuuuuuuuuuuu Rep ++++++
-
[Pedido] Ajuda Ae Plz ! Scrpt Tile Boqueia Spells E Scrpt De Bomba Relogio Funfando..
um tópico no fórum postou AndreAmaral Lixeira Pública
Tipo do script: ACTION e Movement Protocolo (versão do Tibia): 8.60 Servidor utilizado: The Forgotten Server Nível de experiência: media /baixa Adicionais/Informações: Galera Preciso De Dois Favores De vcs me Ajudem Ae Pelo Amor de deus HUAHUEHUEHUE ja Procurei em tudo que é lugar.. é o seguinte to precisando de um scrpt de piso que bloqueie magia ou entao um scrpt que marque uma area que n der pra soltar magia , Outra Coisa é um scrpt de Bomba Relogio que Funcione pq eu botei no meu esse que vou postar em baixo, mas n funciona ele fica dizendo que n pode armar a bomba em area pz , porem a area que tou soltando n é pz, se vcs quiserem podem tirar isso de soltar em area pz ( n sei como que tira) ,pq a area que vou fazer n vai ter espaço pz. Quem Ajudar DoU Rep +++++++ è Claro! Scrpt Bomba Relogio : ---------Plastic Bomb by Colex----------- local PLANTING_DELAY = 5 --seconds local EXPLOSION_DELAY = 5000 --milliseconds local MAX_HIT = 500 local MIN_HIT = 100 local PVP = true -- true for PVP, false for Non-PVP local PLAYERS = {} function isInArray(table, valor) for i,j in pairs(table) do if (j == valor) then return i end end return 0 end function explosion(info) area = { {0,0,0,0,0}, {0,1,1,1,0}, {0,1,1,1,0}, {0,1,1,1,0}, {0,0,0,0,0}, } hitpos = {x=info.pos.x, y=info.pos.y, z=info.pos.z, stackpos=253} center = {} center.y = math.floor(table.getn(area)/2)+1 for i in ipairs(area) do center.x = math.floor(table.getn(area)/2)+1 for j, v in ipairs(area) do if (v == 1) then hitpos.x = info.pos.x + (j - center.x) hitpos.y = info.pos.y + (i - center.y) if (getTilePzInfo(hitpos) == 0) then victim = getThingfromPos(hitpos) effect = 4 if ((j == center.x) and (i == center.y)) then doSendAnimatedText(hitpos,"KABOOOOOM",TEXTCOLOR_RED) hitpoints = MAX_HIT effect = 5 else hitpoints = math.random(MIN_HIT,MAX_HIT) end if (isPlayer(victim.uid) == 1) then if (PVP == true) then doPlayerSendTextMessage(victim.uid,20,"You have lost "..hitpoints.." hitpoints by "..getPlayerName(info.player).."'s plastic bomb") else hitpoints = 0 end end if (isCreature(victim.uid) == 1) then doPlayerAddHealth(victim.uid,-hitpoints) end doSendMagicEffect(hitpos,effect) end end end end PLAYERS[isInArray(PLAYERS, info.player)] = 0 mayNotLogout(info.player, 0) return 1 end function planting(info) if info.num == PLANTING_DELAY then doPlayerSendTextMessage(info.player,22,"Plastic Bomb successfully planted!") mayNotMove(info.player,0) addEvent(explosion,EXPLOSION_DELAY,info) else info.num = info.num + 1 doPlayerSendTextMessage(info.player,22,info.num.."...") addEvent(planting,1000,info) end return 1 end function onUse(cid, item, frompos, item2, topos) position = getThingPos(item.uid) if (getTilePzInfo(position) == 0) then if (isInArray(PLAYERS, cid) == 0) then table.insert(PLAYERS, cid) doSendMagicEffect(frompos,3) info = {player = cid, pos = position, num = 1} doPlayerSendTextMessage(cid,22,"Planting the bomb...") doPlayerSendTextMessage(cid,22,"1...") mayNotMove(cid,1) mayNotLogout(cid, 1) doRemoveItem(item.uid,1) addEvent(planting,1000,info) else doPlayerSendCancel(cid,"You can only plant one bomb at the same time.") end else doPlayerSendCancel(cid,"You can not plant this bomb in a PZ!") end return 1 end -
Pq vc não poem o zombie event ?? é quase isso que vc quer.. Procura aqui no x tibia que vc axa rapidin... :X
-
[Ajudaaa] Scrpt De Bomb Bugado Olhem Aqui Plz :x
um tópico no fórum postou AndreAmaral Lixeira Pública
Tipo do script: ACTION Protocolo (versão do Tibia): 8.60 Servidor utilizado: The Forgotten Server Nível de experiência: media /baixa Adicionais/Informações: Galera Ajuda Ae Nesse action axei aki no x tibia msm ( http://www.xtibia.com/forum/topic/64541-plastic-bomb/ ) só que esta dando um problema qndo eu armo a bomba fica dizendo que n posso armar no Pz ,porem nao estou em pz !! QM AJUDAR AI GANHA REP ++++ =X o Action é : ----------Plastic Bomb by Colex----------- local PLANTING_DELAY = 5 --seconds local EXPLOSION_DELAY = 5000 --milliseconds local MAX_HIT = 1000 local MIN_HIT = 300 local PVP = true -- true for PVP, false for Non-PVP local PLAYERS = {} function isInArray(table, valor) for i,j in pairs(table) do if (j == valor) then return i end end return 0 end function explosion(info) area = { {0,0,0,0,0}, {0,1,1,1,0}, {0,1,1,1,0}, {0,1,1,1,0}, {0,0,0,0,0}, } hitpos = {x=info.pos.x, y=info.pos.y, z=info.pos.z, stackpos=253} center = {} center.y = math.floor(table.getn(area)/2)+1 for i in ipairs(area) do center.x = math.floor(table.getn(area)/2)+1 for j, v in ipairs(area) do if (v == 1) then hitpos.x = info.pos.x + (j - center.x) hitpos.y = info.pos.y + (i - center.y) if (getTilePzInfo(hitpos) == 0) then victim = getThingfromPos(hitpos) effect = 4 if ((j == center.x) and (i == center.y)) then doSendAnimatedText(hitpos,"KABOOOOOM",TEXTCOLOR_RED) hitpoints = MAX_HIT effect = 5 else hitpoints = math.random(MIN_HIT,MAX_HIT) end if (isPlayer(victim.uid) == 1) then if (PVP == true) then doPlayerSendTextMessage(victim.uid,20,"You have lost "..hitpoints.." hitpoints by "..getPlayerName(info.player).."'s plastic bomb") else hitpoints = 0 end end if (isCreature(victim.uid) == 1) then doPlayerAddHealth(victim.uid,-hitpoints) end doSendMagicEffect(hitpos,effect) end end end end PLAYERS[isInArray(PLAYERS, info.player)] = 0 mayNotLogout(info.player, 0) return 1 end function planting(info) if info.num == PLANTING_DELAY then doPlayerSendTextMessage(info.player,22,"Plastic Bomb successfully planted!") mayNotMove(info.player,0) addEvent(explosion,EXPLOSION_DELAY,info) else info.num = info.num + 1 doPlayerSendTextMessage(info.player,22,info.num.."...") addEvent(planting,1000,info) end return 1 end function onUse(cid, item, frompos, item2, topos) position = getThingPos(item.uid) if (getTilePzInfo(position) == 0) then if (isInArray(PLAYERS, cid) == 0) then table.insert(PLAYERS, cid) doSendMagicEffect(frompos,3) info = {player = cid, pos = position, num = 1} doPlayerSendTextMessage(cid,22,"Planting the bomb...") doPlayerSendTextMessage(cid,22,"1...") mayNotMove(cid,1) mayNotLogout(cid, 1) doRemoveItem(item.uid,1) addEvent(planting,1000,info) else doPlayerSendCancel(cid,"You can only plant one bomb at the same time.") end else doPlayerSendCancel(cid,"You can not plant this bomb in a PZ!") end return 1 end-
- bomba
- action bomb
- (e 5 mais)
-
[Ajudae] Scrpt Facil E Simples,preciso Scrpt De Um Tile Para Remover Um Item
um tópico no fórum postou AndreAmaral Lixeira Pública
Tipo do script: Movement Protocolo (versão do Tibia): 8.60 Servidor utilizado: The Forgotten Server Nível de experiência: Baixa/media Adicionais/Informações: Galera queria um scrpt Simples e Facil , Um tile que REMOVA um item se o player estiver com ele, (porem que o player possa passar normal por cima dele tendo o item ou n).. Só Isso msm Ajudem Ae PLZZZZZZZZZZZZ :X !!! -
[Pedido] Scrpt Que Faz Com Que Vc Use A Talkaction So Em Um Lugar
tópico respondeu ao AndreAmaral de AndreAmaral em Lixeira Pública
Opa A Talkaction é isso ai mano! Queria que os players usasses esses comandos de Cs War dentro de uma area pra n ficar usando nas hunts nas wars na city etc... function buy(cid,numero) return getPlayerStorageValue(cid,numero) end function onSay(cid,words,param) -- [nao mexa] = {distancia maxima,velocidade,delay entre os tiros, "msg animada" , math.random(min,max)} local arsenal = { [13251] = {4,200,2,"no Pé",math.random(1,8),"9X19MM SIDEARM"}, [13252] = {4,215,2,"no Braço",math.random(1,10),"KM .45 TACTICAL"}, [13253] = {4,215,2,"no Braço",math.random(1,10),"228 COMPACT "}, [13254] = {5,170,2,"na Perna",math.random(15,35),"NIGHT WALK .50C"}, [13255] = {5,175,2,"na Perna",math.random(15,35),"ES FIVE-SEVEN"}, [13261] = {6,220,5,"UGHHH",math.random(23,35),"LEONE 12 GALGUE SUPER"}, [13262] = {6,220,3,"UGHHH",math.random(15,30),"LEONE IG1265 AUTO"}, [13271] = {7,175,2,"no Pé",math.random(1,8),"SCHMIDT MACHINE"}, [13272] = {7,170,2,"no Braço",math.random(1,10),"KM SUB-MACHINE GUN"}, [13273] = {7,170,2,"no Pé",math.random(1,8),"KM UMP45"}, [13274] = {7,160,2,"no Braço",math.random(1,10),"ES C90"}, [13281] = {5,180,1.5,"no Peito",math.random(25,65),"CLARION 5.56"}, [13282] = {7,186,2,"no Peito",math.random(25,65),"SCHMIDT SCOUT"}, [13283] = {6,170,1.5,"Nut Shot",math.random(25,75),"MAVERICK M4A1"}, [13284] = {5,160,1.5,"no Peito",math.random(25,65),"BULLPUP"}, [13285] = {6,170,2,"Nut Shot",math.random(25,75),"KRIEG 550 COMMANDO"}, [13286] = {8,145,3,"Head Shot",math.random(80,100),"MAGNUM SNIPER RIFLE"}, [13291] = {7,165,8,"Errou",0,"M249"}, } local armamento = arsenal[getPlayerStorageValue(cid,13245)] if words == "!b" then doPlayerPopupFYI(cid, "Sell:" .. "\n1 - PISTOLS" .. "\n2 - SHOTGUNS" .. "\n3 - SMG" .. "\n4 - RIFLES" .. "\n5 - MACHINE GUNS" .. "\n" .. "\nSay '!b + number' -> example:" .. "\n!b1 for open PISTOLS Sellers." ) end if words == "!b1" then -- PISTOLS doPlayerPopupFYI(cid, "Sell:" .. "\n11 - 9X19MM SIDEARM --- 4000 GOLD COINS" .. "\n12 - KM .45 TACTICAL --- 5000 GOLD COINS" .. "\n13 - 228 COMPACT --- 6000 GOLD COINS" .. "\n14 - NIGHT WALK .50C --- 6500 GOLD COINS" .. "\n15 - ES FIVE-SEVEN --- 7500 GOLD COINS" .. "\n" .. "\nSay '!b + number' -> example:" .. "\n!b14 for buy NIGHT WALK .50C (DESERT EAGLE)." ) end if words == "!b2" then -- SHOTGUNS doPlayerPopupFYI(cid, "Sell:" .. "\n21 - LEONE 12 GALGUE SUPER --- 17000 GOLD COINS" .. "\n22 - LEONE IG1265 AUTO --- 30000 GOLD COINS" .. "\n" .. "\nSay '!b + number' -> example:" .. "\n!b21 for buy LEONE 12 GALGUE SUPER." ) end if words == "!b3" then -- SMG doPlayerPopupFYI(cid, "Sell:" .. "\n31 - SCHMIDT MACHINE --- 12500 GOLD COINS" .. "\n32 - KM SUB-MACHINE GUN --- 15000 GOLD COINS" .. "\n33 - KM UMP45 --- 17000 GOLD COINS" .. "\n34 - ES C90 --- 23500 GOLD COINS" .. "\n" .. "\nSay '!b + number' -> example:" .. "\n!b34 for buy ES C90." ) end if words == "!b4" then -- RILES doPlayerPopupFYI(cid, "Sell:" .. "\n41 - CLARION 5.56 --- 22500 GOLD COINS" .. "\n42 - SCHMIDT SCOUT --- 27500 GOLD COINS" .. "\n43 - MAVERICK M4A1 --- 31000 GOLD COINS" .. "\n44 - BULLPUP --- 35000 GOLD COINS" .. "\n45 - KRIEG 550 COMMANDO --- 42000 GOLD COINS" .. "\n46 - MAGNUM SNIPER RIFLE --- 47500 GOLD COINS" .. "\n" .. "\nSay '!b + number' -> example:" .. "\n!b46 for buy MAGNUM SNIPER RIFLE(AWP)." ) end if words == "!b5" then -- RILES doPlayerPopupFYI(cid, "Sell:" .. "\n51 - M249 --- 57500 GOLD COINS" .. "\n" .. "\nSay '!b + number' -> example:" .. "\n!b51 for buy M249(RAMBO)." ) end local comprar = { ["!b11"] = {13251,4000}, ["!b12"] = {13252,5000}, ["!b13"] = {13253,6000}, ["!b14"] = {13254,6500}, ["!b15"] = {13255,7500}, ["!b21"] = {13261,17000}, ["!b22"] = {13262,30000}, ["!b31"] = {13271,12500}, ["!b32"] = {13272,15000}, ["!b33"] = {13273,17000}, ["!b34"] = {13274,23500}, ["!b41"] = {13281,22500}, ["!b42"] = {13282,27500}, ["!b43"] = {13283,31000}, ["!b44"] = {13284,35000}, ["!b45"] = {13285,42000}, ["!b46"] = {13286,47500}, ["!b51"] = {13291,57500}, } local buyarmas = comprar[words] if buyarmas ~= nil then if buy(cid,13251) >= 1 or buy(cid,13252) >= 1 or buy(cid,13253) >= 1 or buy(cid,13254) >= 1 or buy(cid,13255) >= 1 or buy(cid,13261) >= 1 or buy(cid,13262) >= 1 or buy(cid,13271) >= 1 or buy(cid,13272) >= 1 or buy(cid,13273) >= 1 or buy(cid,13274) >= 1 or buy(cid,13281) >= 1 or buy(cid,13282) >= 1 or buy(cid,13283) >= 1 or buy(cid,13284) >= 1 or buy(cid,13285) >= 1 or buy(cid,13286) >= 1 or buy(cid,13291) >= 1 then return doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE,"Voce nao pode comprar mais armas estando com uma. digite !g para se livrar de sua arma.") end if doPlayerRemoveMoney(cid, buyarmas[1]) == FALSE then return doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE,"Você tem que ter "..buyarmas[2].." gold coins.") end setPlayerStorageValue(cid,buyarmas[1],1) -- teste -- setPlayerStorageValue(cid,13245,buyarmas[1]) doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE,"Você comprou uma arma.") end if words == "!g" then if buy(cid,13251) >= 1 or buy(cid,13252) >= 1 or buy(cid,13253) >= 1 or buy(cid,13254) >= 1 or buy(cid,13255) >= 1 or buy(cid,13261) >= 1 or buy(cid,13262) >= 1 or buy(cid,13271) >= 1 or buy(cid,13272) >= 1 or buy(cid,13273) >= 1 or buy(cid,13274) >= 1 or buy(cid,13281) >= 1 or buy(cid,13282) >= 1 or buy(cid,13283) >= 1 or buy(cid,13284) >= 1 or buy(cid,13285) >= 1 or buy(cid,13286) >= 1 or buy(cid,13291) >= 1 then setPlayerStorageValue(cid,13251,-1) setPlayerStorageValue(cid,13252,-1) setPlayerStorageValue(cid,13253,-1) setPlayerStorageValue(cid,13254,-1) setPlayerStorageValue(cid,13255,-1) setPlayerStorageValue(cid,13261,-1) setPlayerStorageValue(cid,13262,-1) setPlayerStorageValue(cid,13271,-1) setPlayerStorageValue(cid,13272,-1) setPlayerStorageValue(cid,13273,-1) setPlayerStorageValue(cid,13274,-1) setPlayerStorageValue(cid,13281,-1) setPlayerStorageValue(cid,13282,-1) setPlayerStorageValue(cid,13283,-1) setPlayerStorageValue(cid,13284,-1) setPlayerStorageValue(cid,13285,-1) setPlayerStorageValue(cid,13286,-1) setPlayerStorageValue(cid,13291,-1) setPlayerStorageValue(cid,13245,-1) doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE,"Você se livrou de sua arma.") else return doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE,"Você não tinha arma.") end end if words == "!atirar" then local storage = 13243 if armamento == nil then return doPlayerSendCancel(cid,"Voce precisa comprar uma arma, digite !b") end if getTilePzInfo(getCreaturePosition(cid)) == TRUE then return doPlayerSendCancel(cid,"Voce só pode atirar fora da protection zone.") end if os.time() - getPlayerStorageValue(cid,storage) <= armamento[3] then return doSendAnimatedText(getCreaturePosition(cid), "Reloading", math.random(1,255)) end setPlayerStorageValue(cid,storage,os.time()) -- SCRIPT BY DRAKY LUCAS -- -- [de 1 a 10] = {"fala",math.random(dano minimo,dano maximo) em percentagens}, local falas = { [1] = {"Head Shot",math.random(80,100)}, [2] = {"Nut Shot",math.random(25,35)}, [3] = {"na Perna",math.random(10,25)}, [4] = {"no Peito",math.random(50,75)}, [5] = {"no Pé",math.random(1,10)}, } local i = 1 local tempo = armamento[2] local max = armamento[1] -- numero de repetiçoes repeat local direction = getPlayerLookDir(cid) position = getCreaturePosition(cid) if(direction == NORTH) then position.y = position.y - (i/tempo) elseif(direction == SOUTH) then position.y = position.y + (i/tempo) + 1 elseif(direction == WEST) then position.x = position.x - (i/tempo) elseif(direction == EAST) then position.x = position.x + (i/tempo) + 1 end position.stackpos = 253 local pos = {x = position.x,y = position.y, z = position.z} pos.stackpos = 253 if getTilePzInfo(pos) == TRUE then break end if getThingfromPos(pos).itemid > 0 then local fala = falas[math.random(1,10)] if fala == nil then if addEvent(isPlayer,i,getThingfromPos(pos).uid) then addEvent(doCreatureAddHealth,i,getThingfromPos(pos).uid,-(getCreatureMaxHealth(getThingfromPos(pos).uid)/100)* armamento[5]) addEvent(doSendMagicEffect,i,pos,64) addEvent(doSendAnimatedText,i,pos, armamento[4], math.random(1,255)) break end end if addEvent(isPlayer,i,getThingfromPos(pos).uid) then addEvent(doCreatureAddHealth,i,getThingfromPos(pos).uid,-(getCreatureMaxHealth(getThingfromPos(pos).uid)/100)* fala[2]) addEvent(doSendMagicEffect,i,pos,64) addEvent(doSendAnimatedText,i,pos, fala[1], math.random(1,255)) break end break end addEvent(doSendMagicEffect,i,pos, 4) i = i + tempo until i >= tempo * max end -- do if word == atirar.. if words == "!arma" then if getPlayerStorageValue(cid,13245) <= 0 then return doPlayerSendTextMessage(cid,25,"Você não tem arma.") end doPlayerSendTextMessage(cid,25,"Você está usando uma "..armamento[6]..".") end return TRUE end Obrigado por responder.! -
[Pedido] Scrpt Que Faz Com Que Vc Use A Talkaction So Em Um Lugar
um tópico no fórum postou AndreAmaral Lixeira Pública
Tipo do script: action,movements ..Qual Quer coisa que funcione! Protocolo (versão do Tibia): 8.60 Servidor utilizado: The Forgotten Server 0.7.5 Nível de experiência: Intermediario Adicionais/Informações: Bom Galera ,eu queria um scrpt que tipo vc so poderia usar talkaction em um certo local do mapa , ou seja vc so poderia usar a talkaction naquele local do mapa!.. Quem Ajudar do Rep +++++++++++++++++ Vlw aê!!
-
Quem Está Navegando 0 membros estão online
- Nenhum usuário registrado visualizando esta página.