By lucashgas, 10 de jan. de 2012 in Tópicos Sem Resposta
info
Group: Cavaleiro
Joined: 22/12/11
Posts: 158
Reputation: +17
Poxa galera deu né?Só discussão por causa de um unico coisa pra que isso deuuuuu.
Não precisa fazer tudos isso por causa de um server de pokemon.
Alias aqui é [Pokemon]Dúvidas no servdor Pokemon Dash Advanced
e não [Pokemon] Dúvidas no Servidor PFLay.
info
Group: Príncipe
Joined: 19/08/10
Posts: 4k
Reputation: +1.1k
Gender: Masculino
tem esse aki... feito pelo jeff se n me engano...
function onUse(cid, item, fromPosition, itemEx, toPosition)
local sBike = 5701
local t = {
[2547] = {article='a', name='bike', text='Mount, bike!', dtext='Demount, bike!', s=5700, condition=bikeCondition},
} --mude o [2547] pro id do item q vai usar a bike...
function BikeSpeedOn(cid,nSpeed)
setPlayerStorageValue(cid,sBike,getCreatureSpeed(cid))
doChangeSpeed(cid,-getCreatureSpeed(cid))
doChangeSpeed(cid,nSpeed)
end
function BikeSpeedOff(cid)
doChangeSpeed(cid,-getCreatureSpeed(cid))
doChangeSpeed(cid,getPlayerStorageValue(cid,sBike))
end
local v, r = getCreaturePosition(cid), t[item.itemid]
local s = r.s
local pos = {x = v.x, y = v.y, z = v.z}
if r then
if getPlayerStorageValue(cid, 25000) == 5 then
return
end
if getPlayerStorageValue(cid, 23000) == 5 then
return
end
if #getCreatureSummons(cid) >= 1 then
return
end
if getPlayerStorageValue(cid, 17001) == 1 or getPlayerStorageValue(cid, 63215) == 1 or getPlayerStorageValue(cid, 17000) == 1 then
doPlayerSendCancel(cid, "You can't use bike while ride/fly/surf.")
return true
end
if getPlayerStorageValue(cid, s) <= 0 then
doSendMagicEffect(pos, 177)
doCreatureSay(cid, r.text, 19)
setPlayerStorageValue(cid, s, 1)
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'You have mounted ' .. r.article .. ' '.. r.name .. '.')
BikeSpeedOn(cid,500)
if getPlayerSex(cid) == 1 then
doSetCreatureOutfit(cid, {lookType = 1394}, -1)
else
doSetCreatureOutfit(cid, {lookType = 1393}, -1)
end
elseif getPlayerStorageValue(cid, s) == 1 then
doSendMagicEffect(pos, 177)
doCreatureSay(cid, r.dtext, 19)
setPlayerStorageValue(cid, s, 0)
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'You haven demouted ' .. r.article .. ' '.. r.name .. '.')
BikeSpeedOff(cid)
return doRemoveCondition(cid, CONDITION_OUTFIT)
else
return doPlayerSendCancel(cid, 'You can\'t do this.')
end
else
return doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE, 'Report bugs in bike system.')
end
end
<action itemid="id do item" event="script" value="bike.lua"/>
e sobre discussoes ja nem ligo mais ngm ouve ms.. ;/ ms coisa dos quotes enormes.. fazer oq..
info
Group: Conde
Joined: 30/04/11
Posts: 658
Reputation: +71
Gender: Masculino
Tibia Character: ExTibiano
To entrando na discussão naum.. mais uso serviços LGV HOST e até agora naum tenho doq reclamar.. server ainda naum loto mais os pouco qe entraram simultaniamente naum lago o server! qualqer coisa clikem na minha assinatura pra da um saque no meu projeto que já está on!
@Slicer to precisando tbm do bike.system mais esse ai tem male e female e dá pra mudar o speed? flw
Tá ficando melhor é ?, Parabéns.
Sobre a LGV Host, elas não dão suporte a ataques DDOS, LimeStone quando você está sendo atacado por uma rede bem foda mesmo, estão te mandando muitos pacotes seu VPS ou Dedicado vai pra Null-Route 
Nunca pedi nem 1 NPC de Quest pra você (:
Falo mais nada retired '
Edited Março 17 by DarkeyreN
[17/03/2012 10:06:50] [Error - CreatureScript Interface][17/03/2012 10:06:50] In a timer event called from:
[17/03/2012 10:06:50] data/creaturescripts/scripts/spawn.lua:onSpawn
[17/03/2012 10:06:50] Description:
[17/03/2012 10:06:50] data/creaturescripts/scripts/spawn.lua:4: attempt to index field '?' (a nil value)
[17/03/2012 10:06:50] stack traceback:
[17/03/2012 10:06:50] data/creaturescripts/scripts/spawn.lua:4: in function <data/creaturescripts/scripts/spawn.lua:1>
Someone Help me with this bug?^
Please in English 
info
Group: Cavaleiro
Joined: 08/01/11
Posts: 192
Reputation: +11
Gender: Masculino
@Koncikos
Make sure you have all the monsters created in the event shine onSpaw mode and check if they are included in monster.xml
@Koncikos
Make sure you have all the monsters created in the event shine onSpaw mode and check if they are included in monster.xml
I checked all Pokemons and They Have the event shine.
Look in Abra :
<?xml version="1.0" encoding="UTF-8"?> <monster name="Abra" nameDescription="a abra" race="psychic" experience="204" speed="104" manacost="0"> <health now="30" max="30"/> <look type="613" head="10" body="30" legs="95" feet="113" corpse="11838"/> <targetchange interval="10000" chance="0"/> <strategy attack="100" defense="0"/> <flags> <flag summonable="1"/> <flag attackable="1"/> <flag hostile="1"/> <flag illusionable="1"/> <flag convinceable="1"/> <flag pushable="1"/> <flag canpushitems="0"/> <flag canpushcreatures="0"/> <flag targetdistance="3"/> <flag staticattack="100"/> <flag runonhealth="0"/> <flag hungerdelay="24"/> </flags> <attacks> <attack name="physical" interval="2000" chance="100" range="4" min="-50" max="-100"> <attribute key="shootEffect" value="eartharrow"/> </attack> <attack name="Confusion" interval="2617" chance="30" range="6"/> <attack name="Restore" interval="4920" chance="20" range="6"/> <attack name="Psy Pulse" interval="2852" chance="29" range="4"/> <attack name="Psycho Shift" interval="3040" chance="28" range="8"/> </attacks> <defenses armor="0" defense="0"/> <voices interval="5000" chance="10"> <voice sentence="ABRA!"/> </voices> <loot> <item id="12194" chance="4000" chance1="129" chancemax="156" count="1" countmax="1"/> </loot> <script> <event name="Spawn"/> <event name="Shinys"/> </script> </monster>
I dont know how fix this bug 
Edited Março 17 by koncikos
info
Group: Cavaleiro
Joined: 08/01/11
Posts: 192
Reputation: +11
Gender: Masculino
@Konciko
Correction Monster:
<?xml version="1.0" encoding="UTF-8"?>
<monster name="Abra" nameDescription="a abra" race="psychic" experience="204" speed="104" manacost="0">
<health now="30" max="30"/>
<look type="613" head="10" body="30" legs="95" feet="113" corpse="11838"/>
<targetchange interval="10000" chance="0"/>
<strategy attack="100" defense="0"/>
<flags>
<flag summonable="1"/>
<flag attackable="1"/>
<flag hostile="1"/>
<flag illusionable="1"/>
<flag convinceable="1"/>
<flag pushable="1"/>
<flag canpushitems="0"/>
<flag canpushcreatures="0"/>
<flag targetdistance="3"/>
<flag staticattack="100"/>
<flag runonhealth="0"/>
<flag hungerdelay="24"/>
</flags>
<attacks>
<attack name="physical" interval="2000" chance="100" range="4" min="-50" max="-100">
<attribute key="shootEffect" value="eartharrow"/>
</attack>
<attack name="Confusion" interval="2617" chance="30" range="6"/>
<attack name="Restore" interval="4920" chance="20" range="6"/>
<attack name="Psy Pulse" interval="2852" chance="29" range="4"/>
<attack name="Psycho Shift" interval="3040" chance="28" range="8"/>
</attacks>
<defenses armor="0" defense="0"/>
<voices interval="5000" chance="10">
<voice sentence="ABRA!"/>
</voices>
<loot>
<item id="12194" chance="4000" chance1="129" chancemax="156" count="1" countmax="1"/>
</loot>
<script>
<event name="Spawn"/>
</script>
</monster>
Remove Line <event name="Shinys"/>
@Zerons
Yes but ,If I remove this line,Shinys won't respawn.I Add this line to all Pokemons.I have this bug before i add this line.
Edited Março 17 by koncikos
info
Group: Cavaleiro
Joined: 08/01/11
Posts: 192
Reputation: +11
Gender: Masculino
@Konciko
Plz use it is code:
creaturescripts/scripts/spawn.lua
local shinys = {
"Bulbasaur", "Ivysaur", "Venusaur", "Charmander", "Charmeleon", "Charizard", "Squirtle", "Wartortle", "Blastoise",
"Caterpie", "Metapod", "Butterfree", "Weedle", "Kakuna", "Beedrill", "Pidgey", "Pidgeotto", "Pidgeot", "Rattata",
"Raticate", "Spearow", "Fearow", "Ekans", "Arbok", "Pikachu", "Raichu", "Sandshrew", "Sandslash", "Nidoran Female",
"Nidorina", "Nidoqueen", "Nidoran Male", "Nidorino", "Nidoking", "Clefairy", "Clefable", "Vulpix", "Ninetales",
"Jigglytuff", "Wigglytuff", "Zubat", "Golbat", "Odish", "Gloom", "Vileplume", "Paras", "Parasect", "Venonat", "Venomoth",
"Diglett", "Dugtrio", "Mewoth", "Persian", "Psyduck", "Golduck", "Mankey", "Primeape", "Growlithe", "Arcanine",
"Poliwag", "Poliwhirl", "Poliwrath", "Abra", "Kadabra", "Alakazam", "Machop", "Machoke", "Machamp", "Bellsprout",
"Weepinbell", "Victreebel", "Tentacool", "Tentacruel", "Geodude", "Graveler", "Golem", "Ponyta", "Rapidash", "Slowpoke",
"Slowbro", "Magnamite", "Magneton", "Farfetch'd", "Doduo", "Dodrio", "Seel", "Dewgong", "Grimer", "Muk", "Shellder",
"Cloyster", "Gastly", "Haunter", "Gengar", "Onix", "Drowzee", "Hypno", "Krabby", "Kingler", "Voltorb", "Electrode",
"Exeggcute", "Exeggutor", "Cubone", "Marowak", "Hitmonlee", "Hitmonchan", "Lickitung", "Koffing", "Weezing", "Rhyhorn",
"Rhydon", "Chansey", "Tangela", "Kangaskhan", "Horsea", "Seadra", "Goldeen", "Seaking", "Staryu", "Starmie", "Mr. Mime",
"Scyther", "Jynx", "Electabuzz", "Magmar", "Pinsir", "Tauros", "Magikarp", "Gyarados", "Lapras", "Ditto", "Eevee", "Vaporeon",
"Jolteon", "Flareon", "Porygon", "Omanyte", "Omastar", "Kabuto", "Kabutops", "Snorlax", "Dragonair", "Dratini"
}
local raros = {"Articuno", "Zapdos", "Moltreas", "Mew", "Mewtwo", "Dragonite", "Aerodactyl"}
local function doPokemonRegisterLevel(cid)
if not isCreature(cid) then return true end
if getWildPokemonLevel(cid) == -1 then
setWildPokemonLevel(cid)
end
end
local function doSetRandomGender(cid)
if not isCreature(cid) then return true end
local gender = 0
local name = getCreatureName(cid)
if not newpokedex[name] then return true end
local rate = newpokedex[name].gender
if rate == 0 then
gender = 3
elseif rate == 1000 then
gender = 4
elseif rate == -1 then
gender = 0
elseif math.random(1, 1000) <= rate then
gender = 4
else
gender = 3
end
doCreatureSetSkullType(cid, gender)
end
local function doShiny(cid)
if isCreature(cid) then
if isSummon(cid) then return true end
if getPlayerStorageValue(cid, 74469) >= 1 then return true end
if isNpcSummon(cid) then return true end
if isInArray(shinys, getCreatureName(cid)) then
transform = math.random(1, 100) --1% chance
elseif isInArray(raros, getCreatureName(cid)) then
transform = math.random(1, 1000) --0.1% chance
elseif not isInArray(raros, getCreatureName(cid)) and not isInArray(shinys, getCreatureName(cid)) then
return true
end
if transform == 10 then
doSendMagicEffect(getThingPos(cid), 18)
local shi = doCreateMonster("Shiny ".. getCreatureName(cid) .."", getThingPos(cid))
setPlayerStorageValue(shi, 74469, 1)
setPlayerStorageValue(cid, 74469, 1)
doRemoveCreature(cid)
else
setPlayerStorageValue(cid, 74469, 1)
end
else
return true
end
end
function onSpawn(cid)
registerCreatureEvent(cid, "GeneralConfiguration")
registerCreatureEvent(cid, "DirectionSystem")
registerCreatureEvent(cid, "CastSystem")
if isSummon(cid) then
registerCreatureEvent(cid, "SummonDeath")
return true
end
registerCreatureEvent(cid, "Experience")
addEvent(doPokemonRegisterLevel, 5, cid)
addEvent(doSetRandomGender, 5, cid)
addEvent(doShiny, 10, cid)
return true
end
Codec By Slicer
@Konciko
shyni by onswap and improvement and it will bring fewer problems
you will have to remove the tag (<event name="Shinys"/>) of all monsters
@Zerons
Thanks i Done this ,but Now next bug ...
[17/03/2012 11:17:38] [Error - CreatureScript Interface][17/03/2012 11:17:38] In a timer event called from:
[17/03/2012 11:17:38] data/creaturescripts/scripts/spawn.lua:onSpawn
[17/03/2012 11:17:38] Description:
[17/03/2012 11:17:38] data/lib/level system.lua:594: attempt to index field '?' (a nil value)
[17/03/2012 11:17:38] stack traceback:
[17/03/2012 11:17:38] data/lib/level system.lua:594: in function 'setWildPokemonLevel'
[17/03/2012 11:17:38] data/creaturescripts/scripts/spawn.lua:21: in function <data/creaturescripts/scripts/spawn.lua:18>
[17/03/2012 11:17:38] [Error - CreatureScript Interface]
[17/03/2012 11:17:38] In a timer event called from:
[17/03/2012 11:17:38] data/creaturescripts/scripts/spawn.lua:onSpawn
[17/03/2012 11:17:38] Description:
[17/03/2012 11:17:38] (luaDoCreateMonster) Cannot create monster: Shiny Charizard
info
Group: Cavaleiro
Joined: 08/01/11
Posts: 192
Reputation: +11
Gender: Masculino
@koncikos
You have all Pokemons Shyne?
if not you download this monster pak
http://adf.ly/5Mh0l (by FlamesAdmin)
do not forget to remove the tag (spaw) of all monsters.
@Zerons
THanks
I fix all bugs.I removed tag line spawn in all monsters 
info
Group: Campones
Joined: 12/03/12
Posts: 88
Reputation: +2
Niguem pode me ajuda na parada do food?
info
Group: Cavaleiro
Joined: 08/01/11
Posts: 192
Reputation: +11
Gender: Masculino
@DarkeyreN
o meu server ta ficando melhor que o seu.
LGV e um dos top so nao falo que o melhor por causa do upelink dele, o resto e muito bom.
vc sera eternamente dispensado.