hookshot

Elgenady · Mar 2, 2013

i want hookshoot script when use items on action teleport player there

Sirion_Mido · Mar 2, 2013

Here We Are

Lua:

local reqActnId = 11111 -- Action id the hookshot will work on
local maxDstnce = 15 -- Max hookshot stretch lenght (in SQ)
function grappleAnim(parameters)
	if (parameters.counter == 10) then
		local fromPosition = getCreaturePosition(parameters.cid)
		doTeleportThing(parameters.cid, parameters.toPosition, FALSE)
		doSendMagicEffect(fromPosition, CONST_ME_POFF)
		return TRUE
	end
	parameters.counter = parameters.counter + 1
	doSendDistanceShoot(getCreaturePosition(parameters.cid), parameters.toPosition, CONST_ANI_THROWINGSTAR)
	doSendDistanceShoot(getCreaturePosition(parameters.cid), parameters.toPosition, CONST_ANI_ARROW)
	doSendDistanceShoot(getCreaturePosition(parameters.cid), parameters.toPosition, CONST_ANI_SMALLSTONE)
	addEvent(grappleAnim, 100, parameters)
end
local useWorms = FALSE
local waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}
function onUse(cid, item, fromPosition, itemEx, toPosition)
	if isInArray(waterIds, itemEx.itemid) == TRUE then
		if itemEx.itemid ~= 493 then
			if useWorms == FALSE or useWorms == TRUE and doPlayerRemoveItem(cid, ITEM_WORM, 1) == TRUE then
				if math.random(1, (100 + (getPlayerSkill(cid, SKILL_FISHING) / 10))) <= getPlayerSkill(cid, SKILL_FISHING) then
					doPlayerAddItem(cid, ITEM_FISH, 1)
				end
				doPlayerAddSkillTry(cid, SKILL_FISHING, 1)
			end
		end
		doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)
		return TRUE
	end
	if (itemEx.actionid == reqActnId and getDistanceBetween(getCreaturePosition(cid), toPosition) <= maxDstnce) then
		doSendDistanceShoot(fromPosition, toPosition, CONST_ANI_HUNTINGSPEAR)
		doSendMagicEffect(toPosition, CONST_ME_BLOCKHIT)
		local parameters = {cid = cid, toPosition = toPosition, counter = 0}
		addEvent(grappleAnim, 100, parameters)
	else
		doPlayerSendCancel(cid, "Nothing to hook to in range.")
		doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
	end
	return TRUE
end

i think you should Rep++ for this big script

ctf76 · Mar 2, 2013

@up
You made it :O?

Ninja · Mar 2, 2013

Made a quick search and found this, http://otland.net/f132/reworking-old-script-fit-my-server-164855/. "Thread that contains the very same script"

Edit: The author of this script is Molinero by the way.

ctf76 · Mar 2, 2013

Sirion_Mido said:

Here We Are

Lua:

local reqActnId = 11111 -- Action id the hookshot will work on
local maxDstnce = 15 -- Max hookshot stretch lenght (in SQ)
function grappleAnim(parameters)
	if (parameters.counter == 10) then
		local fromPosition = getCreaturePosition(parameters.cid)
		doTeleportThing(parameters.cid, parameters.toPosition, FALSE)
		doSendMagicEffect(fromPosition, CONST_ME_POFF)
		return TRUE
	end
	parameters.counter = parameters.counter + 1
	doSendDistanceShoot(getCreaturePosition(parameters.cid), parameters.toPosition, CONST_ANI_THROWINGSTAR)
	doSendDistanceShoot(getCreaturePosition(parameters.cid), parameters.toPosition, CONST_ANI_ARROW)
	doSendDistanceShoot(getCreaturePosition(parameters.cid), parameters.toPosition, CONST_ANI_SMALLSTONE)
	addEvent(grappleAnim, 100, parameters)
end
local useWorms = FALSE
local waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}
function onUse(cid, item, fromPosition, itemEx, toPosition)
	if isInArray(waterIds, itemEx.itemid) == TRUE then
		if itemEx.itemid ~= 493 then
			if useWorms == FALSE or useWorms == TRUE and doPlayerRemoveItem(cid, ITEM_WORM, 1) == TRUE then
				if math.random(1, (100 + (getPlayerSkill(cid, SKILL_FISHING) / 10))) <= getPlayerSkill(cid, SKILL_FISHING) then
					doPlayerAddItem(cid, ITEM_FISH, 1)
				end
				doPlayerAddSkillTry(cid, SKILL_FISHING, 1)
			end
		end
		doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)
		return TRUE
	end
	if (itemEx.actionid == reqActnId and getDistanceBetween(getCreaturePosition(cid), toPosition) <= maxDstnce) then
		doSendDistanceShoot(fromPosition, toPosition, CONST_ANI_HUNTINGSPEAR)
		doSendMagicEffect(toPosition, CONST_ME_BLOCKHIT)
		local parameters = {cid = cid, toPosition = toPosition, counter = 0}
		addEvent(grappleAnim, 100, parameters)
	else
		doPlayerSendCancel(cid, "Nothing to hook to in range.")
		doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
	end
	return TRUE
end

i think you should Rep++ for this big script

LOL? Credit the creator.

R3ignlasting · Mar 2, 2013

Sirion_Mido said:

Here We Are

Lua:

local reqActnId = 11111 -- Action id the hookshot will work on
local maxDstnce = 15 -- Max hookshot stretch lenght (in SQ)
function grappleAnim(parameters)
	if (parameters.counter == 10) then
		local fromPosition = getCreaturePosition(parameters.cid)
		doTeleportThing(parameters.cid, parameters.toPosition, FALSE)
		doSendMagicEffect(fromPosition, CONST_ME_POFF)
		return TRUE
	end
	parameters.counter = parameters.counter + 1
	doSendDistanceShoot(getCreaturePosition(parameters.cid), parameters.toPosition, CONST_ANI_THROWINGSTAR)
	doSendDistanceShoot(getCreaturePosition(parameters.cid), parameters.toPosition, CONST_ANI_ARROW)
	doSendDistanceShoot(getCreaturePosition(parameters.cid), parameters.toPosition, CONST_ANI_SMALLSTONE)
	addEvent(grappleAnim, 100, parameters)
end
local useWorms = FALSE
local waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}
function onUse(cid, item, fromPosition, itemEx, toPosition)
	if isInArray(waterIds, itemEx.itemid) == TRUE then
		if itemEx.itemid ~= 493 then
			if useWorms == FALSE or useWorms == TRUE and doPlayerRemoveItem(cid, ITEM_WORM, 1) == TRUE then
				if math.random(1, (100 + (getPlayerSkill(cid, SKILL_FISHING) / 10))) <= getPlayerSkill(cid, SKILL_FISHING) then
					doPlayerAddItem(cid, ITEM_FISH, 1)
				end
				doPlayerAddSkillTry(cid, SKILL_FISHING, 1)
			end
		end
		doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)
		return TRUE
	end
	if (itemEx.actionid == reqActnId and getDistanceBetween(getCreaturePosition(cid), toPosition) <= maxDstnce) then
		doSendDistanceShoot(fromPosition, toPosition, CONST_ANI_HUNTINGSPEAR)
		doSendMagicEffect(toPosition, CONST_ME_BLOCKHIT)
		local parameters = {cid = cid, toPosition = toPosition, counter = 0}
		addEvent(grappleAnim, 100, parameters)
	else
		doPlayerSendCancel(cid, "Nothing to hook to in range.")
		doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
	end
	return TRUE
end

i think you should Rep++ for this big script

You no get rep++ mens

Veronika · Mar 2, 2013

guys
heba = siron mido
you will find heba in all siron mido threads
heba make stupid threads about scripts-then siron mido answer to be famous

- - - Updated - - -

http://otland.net/f132/items-teleport-182502/
http://otland.net/f132/hookshot-182676/#post1768398
http://otland.net/f81/promotion-using-action-180295/

Elgenady · Mar 2, 2013

Veronika idk siron mido in rl but its true siron help me in all scripts and there thread he tried to help me and he can't and cyko helped me and there othere threads limos helped me so im siron mido and cyko and limos wwwwwowwwww

Sirion_Mido · Mar 2, 2013

First: i didnt say i make that script bUSAHUasbu
Second: I find this script in my computer , not searched for it
Third:

Veronika said:
guys
heba = siron mido
you will find heba in all siron mido threads
heba make stupid threads about scripts-then siron mido answer to be famous

- - - Updated - - -

http://otland.net/f132/items-teleport-182502/
http://otland.net/f132/hookshot-182676/#post1768398
http://otland.net/f81/promotion-using-action-180295/

GO REQUEST A SCRIPT NOW AND I MAKE IT AT THE MOMENT , BUT DONT THINK ABOUT EVENT..

Veronika · Mar 2, 2013

heba said:
Veronika idk siron mido in rl but its true siron help me in all scripts and there thread he tried to help me and he can't and cyko helped me and there othere threads limos helped me so im siron mido and cyko and limos wwwwwowwwww

Nice English

Sirion_Mido · Mar 2, 2013

Sirion_Mido said:
First: i didnt say i make that script bUSAHUasbu
Second: I find this script in my computer , not searched for it
Third:

GO REQUEST A SCRIPT NOW AND I MAKE IT AT THE MOMENT , BUT DONT THINK ABOUT EVENT..

gogo request? i am ready ...

Elgenady · Mar 2, 2013

Veronika shut up please and don't comment on me thread again and yea my english is bad :S cuz im not from usa

Sirion_Mido · Mar 2, 2013

idiot...
anyone close this third , go ninja close this theard

Elgenady · Mar 2, 2013

yea sirion i want anyone delete this theard please and please look in my othere thread if u can help me

Cornex · Mar 2, 2013

heba said:
Veronika shut up please and don't comment on me thread again and yea my english is bad :S cuz im not from usa

You don't need to be from USA to speak understandable english ;p

And yes, sirion don't made this script. Like ninja said, credits go to Molinero

Elgenady · Mar 3, 2013

http://otland.net/f132/scripts-problem-182736/

help me here if u can please

Veronika · Mar 3, 2013

fail

Elgenady · Mar 4, 2013

i want it work like this photo please

http://oi50.tinypic.com/34obwwo.jpg

Sirion_Mido · Mar 4, 2013

_CorneX_ said:
You don't need to be from USA to speak understandable english ;p

And yes, sirion don't made this script. Like ninja said, credits go to Molinero

said i find in my computer before..

Elgenady · Mar 4, 2013

u can't edite ??

hookshot

Veteran OT User

Experienced Member

New Member

Global Moderator

New Member

Well-Known Member

Banned User

Veteran OT User

Experienced Member

Banned User

Experienced Member

Veteran OT User

Experienced Member

Veteran OT User

Web Developer

Veteran OT User

Banned User

Veteran OT User

Experienced Member

Veteran OT User

Similar threads