Ir para conteúdo

Crypter

Visconde
  • Total de itens

    368
  • Registro em

  • Última visita

  • Dias Ganhos

    14

Tudo que Crypter postou

  1. local tempo = 60local effect = {430} local points = 30local combat = createCombatObject()setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0)local condition = createConditionObject(CONDITION_ATTRIBUTES)setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000)setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, points)setConditionParam(condition, CONDITION_PARAM_SKILL_FIST, points)setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, points)setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, points)setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, points)setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, points)setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, points)setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE)setCombatCondition(combat, condition) local function Magica(tempo2,tempo3,cid)if isCreature(cid) thenfor i=1, #effect dolocal position = {x=getCreaturePosition(cid).x+1, y=getCreaturePosition(cid).y, z=getCreaturePosition(cid).z}doSendMagicEffect(position, effect)endendend function onCastSpell(cid, var)if exhaustion.check(cid, 102053) == FALSE thendoCombat(cid, combat, var)tempo2 = 0while (tempo2 ~= (tempo*1000)) doaddEvent(Magica, tempo2, tempo2, tempo*1000, cid)tempo2 = tempo2 + 300endlocal position = {x=getCreaturePosition(cid).x, y=getCreaturePosition(cid).y, z=getCreaturePosition(cid).z}exhaustion.set(cid, 102053, tempo)doCreatureSay(cid, "Susano!", TALKTYPE_MONSTER)doSendMagicEffect(position, 430)elsedoPlayerSendCancel(cid, "Sorry, you are transformed.")endend Linha alterada: local position = {x=getCreaturePosition(cid).x+1, y=getCreaturePosition(cid).y, z=getCreaturePosition(cid).z} Adicionei X+1 fazendo que o efeito saisse 1 sqm q frente > X = <> Y = /\ \/ Z = Andar
  2. local poke = {"Abra","Gengar"} if isInArray(poke, getPokemonName(item2.uid)) then doPlayerSendCancel(cid,"seu pokemon ja possui este movimento)return trueend
  3. elseif spell == "Mega Destruction" then local pb = getPlayerSlotItem(getCreatureMaster(cid), 8) if getItemAttribute(pb.uid, "megaspell1") then spell = "Leaf Storm" end
  4. Voce tem que criar a script .lua da spell normal com sua AREA normal e adicionar direction="1" no spells.xml da spell criada.
  5. Testa assim local pokename = {"Abra","Gengar"} if isInArray(pokename, getPokemonName(item2.uid)) then
  6. function onUse(cid, item, topos, item2, frompos)local myball = getPlayerSlotItem(cid, 8)local Reset = getItemAttribute(myball.uid, "Reset") or 0local Resets = 0local Reset_rate = 1.5 -- rate que ira almentar dos stats do pokemonif Reset == 50 thenreturn doPlayerSendCancel(cid, "Sorry, is not possible.")end if #getCreatureSummons(cid) >= 1 thenif getPlayerAccess(cid) == 6 thenResets = ( 10 )endResets = Resets + 1local pokemon = getItemAttribute(myball.uid, "poke")local vitalidade = pokes[pokemon].vitality * Reset_ratedoSetItemAttribute(myball.uid, "Reset", Reset + Resets)doItemSetAttribute(myball.uid, "vitality", getItemAttribute(myball.uid, "vitality") + vitalidade)doRemoveItem(item.uid)doSendMagicEffect(getThingPos(item2.uid), 40)doPlayerSendTextMessage(cid, 27, "Congrulations, your "..pokemon..", as beem Reseted +1.")doPlayerSendTextMessage(cid, 27, "Now your "..pokemon.." have a Reset +"..Resets + Reset..".")doSendAnimatedText(getThingPos(item2.uid), "Reset!", 71)doPlayerSetVocation(cid,4)elsereturn doPlayerSendCancel(cid, "Only use in yours pokemons.")endreturn trueend
  7. function onUse(cid, item, topos, item2, frompos)local myball = getPlayerSlotItem(cid, 8)local Reset = getItemAttribute(myball.uid, "Reset") or 0local Resets = 0local Reset_rate = 1.5 -- rate que ira almentar dos stats do pokemonif Reset == 50 thenreturn doPlayerSendCancel(cid, "Sorry, is not possible.")end if #getCreatureSummons(cid) >= 1 thenif getPlayerAccess(cid) == 6 thenResets = ( 10 )endResets = Resets + 1local pokemon = getItemAttribute(myball.uid, "poke")local off = pokes[pokemon].offense * Reset_rate * Resetslocal def = pokes[pokemon].defense * Reset_rate * Resetslocal agi = pokes[pokemon].agility * Resetslocal spatk = pokes[pokemon].specialattack * Reset_rate * Resetslocal vit = pokes[pokemon].vitality * Reset_rate * ResetsdoSetItemAttribute(myball.uid, "Reset", Reset + Resets)if getItemAttribute(myball.uid, "offense") thendoItemSetAttribute(myball.uid, "offense", getItemAttribute(myball.uid, "offense") + off)doItemSetAttribute(myball.uid, "defense", getItemAttribute(myball.uid, "defense") + def)doItemSetAttribute(myball.uid, "speed", getItemAttribute(myball.uid, "speed") + agi)doItemSetAttribute(myball.uid, "specialattack", getItemAttribute(myball.uid, "specialattack") + spatk)doItemSetAttribute(myball.uid, "vitality", getItemAttribute(myball.uid, "vitality") + vit)enddoRemoveItem(item.uid)doSendMagicEffect(getThingPos(item2.uid), 40)doPlayerSendTextMessage(cid, 27, "Congrulations, your "..pokemon..", as beem Reseted +1.")doPlayerSendTextMessage(cid, 27, "Now your "..pokemon.." have a Reset +"..Resets + Reset..".")doSendAnimatedText(getThingPos(item2.uid), "Reset!", 71)doPlayerSetVocation(cid,4)elsereturn doPlayerSendCancel(cid, "Only use in yours pokemons.")endreturn trueend
  8. function onUse(cid, item, topos, item2, frompos)local myball = getPlayerSlotItem(cid, 8)local Reset = getItemAttribute(myball.uid, "Reset") or 0local Resets = 0local Reset_rate = 1.5 -- rate que ira almentar dos stats do pokemonif Reset == 50 thenreturn doPlayerSendCancel(cid, "Sorry, is not possible.")end if #getCreatureSummons(cid) >= 1 thenif getPlayerAccess(cid) == 6 thenResets = ( 10 )endResets = Resets + 1local pokemon = getItemAttribute(myball.uid, "poke")local off = pokes[pokemon].offense * Reset_rate * Resetslocal def = pokes[pokemon].defense * Reset_rate * Resetslocal agi = pokes[pokemon].agility * Resetslocal spatk = pokes[pokemon].specialattack * Reset_rate * Resetslocal vit = pokes[pokemon].vitality * Reset_rate * ResetsdoSetItemAttribute(myball.uid, "Reset", Reset + Resets)doItemSetAttribute(myball.uid, "offense", getItemAttribute(myball.uid, "offense") + off)doItemSetAttribute(myball.uid, "defense", getItemAttribute(myball.uid, "defense") + def)doItemSetAttribute(myball.uid, "speed", getItemAttribute(myball.uid, "speed") + agi)doItemSetAttribute(myball.uid, "specialattack", getItemAttribute(myball.uid, "specialattack") + spatk)doItemSetAttribute(myball.uid, "vitality", getItemAttribute(myball.uid, "vitality") + vit)doRemoveItem(item.uid)doSendMagicEffect(getThingPos(item2.uid), 40)doPlayerSendTextMessage(cid, 27, "Congrulations, your "..pokemon..", as beem Reseted +1.")doPlayerSendTextMessage(cid, 27, "Now your "..pokemon.." have a Reset +"..Resets + Reset..".")doSendAnimatedText(getThingPos(item2.uid), "Reset!", 71)doPlayerSetVocation(cid,4)elsereturn doPlayerSendCancel(cid, "Only use in yours pokemons.")endreturn trueend
  9. Então eu recomendo você por o site no fundo do client no Tibia.pic
  10. Quest_reset.lua function onStepIn(cid, item, position, fromPosition)local TotReset = getPlayerStorageValue(cid,2310)if TotReset >= 10 thendoPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"Boa sorte na quest!!!")elsedoTeleportThing(cid, fromPosition)doSendMagicEffect(getCreaturePos(cid), 1)doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"Voce precisa ter 10 {Resets} para passar!!!")endreturn trueend Movements.xml <movevent type="StepIn" actionid="32000" event="script" value="Quest_reset.lua"/> Adicione o Action Id no piso com o Editor de mapas ( RME ) e so quem tem 10 resets ira passar pelo piso. !
  11. Procuro contato de algum script FL.
  12. Va no items.xml procura pelo id desse corpo e deixa assim: <attribute key="weight" value="2000" /> <attribute key="containerSize" value="10" /> <attribute key="decayTo" value="0" /> <attribute key="duration" value="1500" /> <attribute key="corpseType" value="blood" />
  13. Aquilo é um bloqueio pro players sabe que não pode descer tlg
  14. Faz um system fly normal sem ser de poketibia? não tem nenhum funcional
  15. Para adicionar sprits voce deve ter um client de tibia (Tibia.spr e tibia.dat ) apos isso abra com o object builder ou dat editor e adicione as sprits
  16. Como disse o @America é so trocar os valores... Obs: postei a script ja pronta pq não sei se você sabe mecher nas paradas.... function onLogin(player) if not configManager.getBoolean(configKeys.STAMINA_SYSTEM) then return true end local lastLogout = player:getLastLogout() local offlineTime = lastLogout ~= 0 and math.min(os.time() - lastLogout, 86400 * 21) or 0 offlineTime = offlineTime - 600 if offlineTime < 180 then return true end local staminaMinutes = player:getStamina() local maxNormalStaminaRegen = 7200 - math.min( 7200, staminaMinutes) ---- local regainStaminaMinutes = offlineTime / 180 if regainStaminaMinutes > maxNormalStaminaRegen then local happyHourStaminaRegen = (offlineTime - (maxNormalStaminaRegen * 180)) / 600 staminaMinutes = math.min(2520, math.max(2400, staminaMinutes) + happyHourStaminaRegen) else staminaMinutes = staminaMinutes + regainStaminaMinutes end player:setStamina(staminaMinutes) return true end
  • Quem Está Navegando   0 membros estão online

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