LU
pedido

Fábrica de Scripts

Por LuckOake, 28 de set. de 2013 em Scripts

resolvido
script
166
20.7k
ManoelRibeiroM
29 de setembro de 2013 às 13:06

One shot tem como vc me ajudar? na pagina 2 ou 3 tem o script de teleportar o jogador é uma spell

 

function onCastSpell(cid, var)

local tp_pos = {x = 100, y = 100, z = 7} -- Posição que o target será levado

local effect_player = 10 -- Efeito que sairá no player

local effect_target = 15 -- Efeito que sairá no target

local exhaustion_time = 2 -- Exhaustion (em segundos)

local exhaust = 18501 -- Storage da exhaustion

 

if getTileInfo(getCreaturePosition(cid)).hardcore then

doPlayerSendCancel(cid, "Você não pode usar essa magia em arenas.")

return false

if getCreatureTarget(cid) <= 0 then

doPlayerSendCancel(cid, "Você precisa selecionar um alvo.")

return false

elseif exhaustion.check(cid, exhaust) then

doSendMagicEffect(getCreaturePosition(cid), 2)

doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a magia novamente.")

return false

end

 

local target = getCreatureTarget(cid)

doSendMagicEffect(getCreaturePosition(cid), effect_player)

doSendMagicEffect(getCreaturePosition(target), effect_target)

setPlayerStorageValue(target, 18500, "x = "..(getCreaturePosition(target).x)..",y = "..(getCreaturePosition(target).y)..",z = "..(getCreaturePosition(target).z)..",")

doTeleportThing(target, tp_pos)

exhaustion.set(cid, exhaust, exhaustion_time)

return true

end

 

function onStepIn(cid, item)

local storage = getPlayerStorageValue(cid, 18500)

local pos = {x = string.match(storage, "x = (.-),"), y = string.match(storage, "y = (.-),"), z = string.match(storage, "z = (.-),")}

doTeleportThing(cid, pos)

return true

end

 

 

o luck fez eu (eu nao sei usar spoil) esta dando 1 erro no meu distro e eu queria que o player que solto a magia fosse teleportado para o local junto com o target ,

o erro é o seguinte:

ahh o erro o skydarkyes posto antes de pedir o script de npc para vc...

 

Tá aqui mano, só faltava um end ^^

 

 

 

function onCastSpell(cid, var)
    local tp_pos = {x = 100, y = 100, z = 7} -- Posição que o target será levado
    local effect_player = 10 -- Efeito que sairá no player
    local effect_target = 15 -- Efeito que sairá no target
    local exhaustion_time = 2 -- Exhaustion (em segundos)
    local exhaust = 18501 -- Storage da exhaustion

    if getTileInfo(getCreaturePosition(cid)).hardcore then
        doPlayerSendCancel(cid, "Você não pode usar essa magia em arenas.")
        return false
    end
    if getCreatureTarget(cid) <= 0 then
        doPlayerSendCancel(cid, "Você precisa selecionar um alvo.")
        return false
    elseif exhaustion.check(cid, exhaust) then
        doSendMagicEffect(getCreaturePosition(cid), 2)
        doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a magia novamente.")
        return false
    end

    local target = getCreatureTarget(cid)
    doSendMagicEffect(getCreaturePosition(cid), effect_player)
    doSendMagicEffect(getCreaturePosition(target), effect_target)
    setPlayerStorageValue(target, 18500, "x = "..(getCreaturePosition(target).x)..",y = "..(getCreaturePosition(target).y)..",z = "..(getCreaturePosition(target).z)..",")
    doTeleportThing(target, tp_pos)
    exhaustion.set(cid, exhaust, exhaustion_time)
    return true
end

function onStepIn(cid, item)
    local storage = getPlayerStorageValue(cid, 18500)
    local pos = {x = string.match(storage, "x = (.-),"), y = string.match(storage, "y = (.-),"), z = string.match(storage, "z = (.-),")}
    doTeleportThing(cid, pos)
    return true
end

 

 

 

E sim, eu tenho a autorização do Luck pra postar no tópico, ele quer que eu treine ajudando vocês..

 

Vou tentar realizar alguns pedidos dentro da minha limitação de noobice e pulso torcido.

 

Abraços.

vuduzinV
29 de setembro de 2013 às 13:55

Como vai LuckOake? tambem estou bem,

Queria pedir um script que por exemplo

quando eu der use with... em um Battle Hammer e clicar em 100 Gold Nugget

transformace os "nuggets" em uma Enchanted Small Amethysts

se possivel gostaria do script em action

 

 

Server: 8.60

Experience: 3

 

 

obrigado...

JeanCristianJ
29 de setembro de 2013 às 13:57

Nossa vlw man obrigado mesmo! eu vou dar 1 script para o luck pelo script e outro para vc dps :D

eu tenho 1 script aki e queria que vc adicionasse algo nele, tipo nao pudesse usar o item em protectzone e tivesse exausted para usar esse item, e vc tirasse a funçao de remover o summon! vc nao tem ideia de como iria me ajudar *-* e quando usar o item e o summon ja estiver sumonado, aparecer a msg "Seu monstro ja foi sumonado" *-* *-*!

 

function onUse(cid, item, frompos, item2, topos)

if getTilePzInfo(getCreaturePosition(cid)) == TRUE then
doPlayerSendTextMessage(cid, 6,"Você não pode usar dentro de PZ.")
else
end
if (getPlayerStorageValue(cid, 11548) >= os.time()) then
doPlayerSendTextMessage(cid, 6,"Por medidas de segurança você só pode utilizar este comando em " ..
(getPlayerStorageValue(cid, 11548)-os.time()+(0)) .. " segundos.")
return true
end
storage = 4191
storsol = 1203
if #getCreatureSummons(cid) > 1 then
doPlayerSendCancel(cid,"Your Demonio is already summoned.")
end
if getPlayerStorageValue(cid,storsol) == 1 then
local z = getCreatureSummons(cid)[1]
addEvent(setPlayerStorageValue,100,cid,storsol,-1)
doPlayerSay(cid,"Back my summon!",TALKTYPE_ORANGE_1)
doSendMagicEffect(getCreaturePosition(z), 2)
doSendDistanceShoot(getCreaturePosition(z), getPlayerPosition(cid), 3)
doRemoveCreature(z)
end
local summons = getCreatureSummons(cid)
local pet = {
["Bug"] = {1,250},
["Death Blob"] = {251,1500},
["Worker golem"] = {1501,5000},
["werewolf"] = {5001,9999},
["Mercury Blob"] = {10000,15000},
["Flufly"] = {15001,23000},
["haunted treeling"] = {23001,30000},
["Vampire Bride"] = {30001,40000},
["Grim Reaper"] = {40001,55000},
["Zombie"] = {55001,80000},
["Azure Frog"] = {80001,400000}
}
for k,v in pairs(pet) do -- 1
if getPlayerStorageValue(cid,storsol) < 1 then
if getPlayerLevel(cid) >= v[1] and getPlayerLevel(cid) < v[2] then -- 2
if (table.maxn(summons) < 1)then -- 3
x = doSummonCreature(k, getCreaturePosition(cid))
doConvinceCreature(cid, x)
setPlayerStorageValue(cid,4194,1)
setPlayerStorageValue(cid,11548,os.time()+30)
setPlayerStorageValue(cid,storsol,1)
doCreatureSay(cid, k ..", go!", TALKTYPE_ORANGE_1)
doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 2)
end
end
end
end
return true
end
TredfgT
29 de setembro de 2013 às 14:15

Queria um piso basico que só pudesse passa de fly para um server de poketibia obg.

kttallanK
29 de setembro de 2013 às 14:53

Queria um piso basico que só pudesse passa de fly para um server de poketibia obg.

Nossa man que tenso vocé de fly passa por tudo que e canto ;d

 

colabore dizendo mais informações..

TredfgT
29 de setembro de 2013 às 15:13

queria tipo queria um pra minha quest ke nao da pra passa por fly por cima,e tipo os playres tera ke mata os poke pra da fly e passa no piso e continua a quest.

JeanCristianJ
29 de setembro de 2013 às 15:42

kttallan bem que vc poderia me ajudar né?

29 de setembro de 2013 às 15:43

/\ Ele não é obrigado a lhe ajudar,ninguem é.

 

@Oneshot,voce pode colocar o comando?

vuduzinV
29 de setembro de 2013 às 15:49

Obs: o meu pedido de script ali a cima, ainda não foi resolvido se alguem poder me ajudar ai agradeço muito

Abraços.

29 de setembro de 2013 às 15:56

Huehuehuehueu ela ta bravinha

 

@Oneshot,tem como colocar o comando?pllz

JeanCristianJ
29 de setembro de 2013 às 15:57

muitos pedidos la em cima nao foi resolvido kkk nao foi só o seu :x

LuckOakeL
29 de setembro de 2013 às 16:00

Galera, os pedidos de vocês serão ignorados por descumprir as regras do tópico.

 

Regra 4 - Sem floods, comentários ou conversas no tópico;

Regra 11 - Use um português adequado e detalhe bem seu pedido. Pedidos pouco detalhados ou com português ruim serão ignorados. Se não for bom com português, ao menos TENTE escrever adequadamente.

Como punição não atenderei vocês hoje. Só a partir de amanhã.

Quem não concordar com isso, reporta. Mas ao postar qualquer coisa no tópico falando que não concorda, a pessoa estará floodando, logo será passível de punição no fórum também, não só nesse tópico.

Só postem abaixo se for algum pedido.

JeanCristianJ
29 de setembro de 2013 às 16:06

Tem como você editar o script lá de teleporte para o player ir junto com o alvo para o local que teleporta que vc fez para o menino ai?

--------------------- edit----------------

e o subwatextremefun vc nunca mais vai abrir?

Editado Setembro 29 por JeanCristian

OneshotO
29 de setembro de 2013 às 16:11
local PETS = {
	["Rat"] = {0, 250},
}

function onUse(cid, item, fromPosition, itemEx, toPosition)
	if getTileInfo(getCreaturePosition(cid)).protection then
		return doPlayerSendCancel(cid, "Você não pode invocar dentro de zonas de proteção.")
	end

	if getCreatureStorage(cid, 11548) > os.time() then
		return doPlayerSendCancel(cid, "A energia espiritual não é suficiente. Aguarde ".. getCreatureStorage(cid, 11548) - os.time() .." segundos.")
	end
	
	local summons = getConfigValue("maxPlayerSummons")
	if #getCreatureSummons(cid) > summons then
		return doPlayerSendCancel(cid, "Você já invocou criaturas o bastante.")
	end
	
	local tmp = nil
	for _, uid in ipairs(getCreatureSummons(cid)) do
		if PETS[getCreatureName(uid)] then
			tmp = uid
		end
	end
	
	if tmp then
		return doPlayerSendCancel(cid, "Sua criatura já foi invocada.")
	end
	
	for name, level in pairs(PETS) do
		if getPlayerLevel(cid) > level[1] and getPlayerLevel(cid) <= level[2] then
			local monster = doCreateMonster(name, getCreaturePosition(cid))
			if doConvinceCreature(cid, monster) then
				doCreatureSay(cid, "Go, " .. name .. "!", TALKTYPE_ORANGE_1)
				doCreatureSetStorage(cid, 11548, os.time() + 30)
				doSendMagicEffect(getCreaturePosition(monster), 2)
			end
			break
		end
	end
	return true
end

Alguém pediu algo sobre summon, sem a função do summon voltar, eu fiz um do zero, identado e funcional.

 

Abraços.

Editado Setembro 29 por Oneshot

JeanCristianJ
29 de setembro de 2013 às 16:17

rep+ oneshot vou testar aki vlw!


quando eu sumono o bixo aparece no distro o nome dele, isso é normal?


a cada 30 segundos sumona 1 bixo quando eu clico...tem como colokar limite de summon configuravel?


a nao, sumono só 3 mesmo '-'