Page 1 of 2

PM then Warp Macro REVISED =)[april 19, 2010]

Posted: 16 Jan 2010, 15:53
by gamenikko
EDIT APRIL 19, 2010
I've updated my old macro and posted a new one ^_^:
Read First**********
add

Code: Select all

followAtWarp 0
in your config.txt

Description:
This macro is simillar to Darki's ultimate warp macro but, there's some cons and pros.
Pros : faster. easier to use.
Cons : warp list must be done manually

Usage:
PM your warper "warp list" without the " to view ur warps (you must set ur own warp list)
Then PM the desired warp. ex: warp 1, or warp 2 or warp 3 or warp 4
PM your priest set 0 - to disable the follow at warp mode.
PM your priest set 1 - to enable the follow at warp.

PM 2 Warp

Code: Select all

################################################################################
####+-+-+ +-+ +-+-+-+-+####
####|P|M| |2| |W|A|R|P|####
####+-+-+ +-+ +-+-+-+-+####
####	   +-+-+       ####
####	   |B|Y|       ####
####	   +-+-+       ####
####+-+-+-+-+-+-+-+-+-+####
####|G|a|m|e|N|i|k|k|o|####
####+-+-+-+-+-+-+-+-+-+####

###########################
##########WARPS############
###########################

automacro warp {
	console /\(From: (.*)\) : (warp 1|warp 2|warp 3|warp 4)/
	call {
$x = @arg ("$.pos", 1)
$y = @arg ("$.pos", 2)
$xx = @eval ($x + @random ("-1", "1"))
$yy = @eval ($y + @random ("-1", "1"))
$followSetting = @config (followAtWarp)
$name = $.lastMatch1
$loc = $.lastMatch2
	do sl 27 $xx $yy
pause 2
	if ($loc = "warp 1") goto warp1
	if ($loc = "warp 2") goto warp2
	if ($loc = "warp 3") goto warp3
	if ($loc = "warp 4") goto warp4
stop
###########################
:warp1
	do warp 0
stop
###########################
:warp2
	do warp 1
stop
###########################
:warp3
	do warp 2
stop
###########################
:warp4
	do warp 3
stop
}
}
###########################
######FOLLOW SETTINGS######
###########################

automacro followOptions {
	console /\(From: (.*)\) : (set 0|set 1)/
	call {
$followSetting = @config (followAtWarp)
$name = $.lastMatch1
$value = $.lastMatch2
	if ($value = set 0) goto set0
	if ($value = set 1) goto set1
stop
###########################
:set0
	do conf followAtWarp 0
	do pm "$name" Config 'followAtWarp' is set to 0
stop
###########################
:set1
	do conf followAtWarp 1
	do pm "$name" Config 'followAtWarp' is set to 1
	}
}
###########################

automacro portalOpened {
	exclusive 1
	console /You opened Warp Portal on \((.*), (.*)\)/i
	call {
$followSetting = @config (followAtWarp)
	do pm "$name" I'm warping...
	do pm "$name" SHOULD I FOLLOW AT WARP? 0 - don't | 1 - follow. CURRENTLY: @config (followAtWarp)
	do pm "$name" Just PM me your settings. example: set 0 (changes may work next at warp)
$followSetting = @config (followAtWarp)
###########################
	if ($followSetting = 0) stayDontGo
	if ($followSetting = 1) goto enterPortal
stop
###########################
:stayDontGo
           do move stop
           pause 25
stop
:enterPortal
	do move stop
	pause 10
	do move $.lastMatch1 $.lastMatch2
	}
}
Warp list (change your warp values)

Code: Select all

###########################
#########WARP LIST#########
###########################

automacro warpList {
	console /\(From: (.*)\) : warp list/i
	call {
	do pm "$name" 1-geffen | 2-mosco | 3-TG | 4-payon ######## change this
	}
}
Feel free to post all bugs. ^_^

Re: PM then Warp Macro =)

Posted: 20 Jan 2010, 23:02
by keke808
Gamenikko,

Did you try looking at this link?
http://forums.openkore.com/viewtopic.ph ... eat#p22237

I think it accomplishes the same thing.
By the way I never tested it.

Re: PM then Warp Macro =)

Posted: 21 Jan 2010, 03:19
by gamenikko
keke808 wrote:Gamenikko,

Did you try looking at this link?
http://forums.openkore.com/viewtopic.ph ... eat#p22237

I think it accomplishes the same thing.
By the way I never tested it.
oops yeah they are the same i guess, but its a lot complicated for my eyes hahaha LOL

Re: PM then Warp Macro =)

Posted: 29 Mar 2010, 23:44
by arkantos008
hi gamenikko ive tried your macros txt but im getting an erro on warp1 warp0 warp2 is working but the rest is error saying warpgo1 error:error in 2: @eval ($x @random + ("-2", "2")) failed...

Re: PM then Warp Macro =)

Posted: 29 Mar 2010, 23:49
by arkantos008
ei nikko im getting an error when i tried to use the warp1 saying failed do you think you can check on this?

Re: PM then Warp Macro REVISED =)[april 19, 2010]

Posted: 19 Apr 2010, 11:42
by gamenikko
APRIL 19, 2010 <<<REVISED

Re: PM then Warp Macro REVISED =)[april 19, 2010]

Posted: 17 Oct 2010, 22:37
by arkantos008
gamenikko wrote:APRIL 19, 2010 <<<REVISED

what do you mean by revised?

Re: PM then Warp Macro REVISED =)[april 19, 2010]

Posted: 05 Nov 2010, 02:01
by gamenikko
arkantos008 wrote:
gamenikko wrote:APRIL 19, 2010 <<<REVISED

what do you mean by revised?
Dictionary:

Code: Select all

1.  transitive verb rethink something: to come to different conclusions about somebody or something after thinking again 
2.  transitive verb give updated version of something: to change a previous estimate in order to make it more accurate or realistic 

Microsoft® Encarta® 2009. © 1993-2008 Microsoft Corporation. All rights reserved.

Re: PM then Warp Macro REVISED =)[april 19, 2010]

Posted: 05 Nov 2010, 03:15
by rwnath
arkantos008 wrote:
gamenikko wrote:APRIL 19, 2010 <<<REVISED

what do you mean by revised?
Wow, is this guy serious? :lol:

Re: PM then Warp Macro REVISED =)[april 19, 2010]

Posted: 23 Nov 2010, 09:46
by Pascale
hello
i have problems with this
only modify warp list?
when send pm to priest ( warp 1, warp 2 ... ) and this say in OK

Code: Select all

(From: XXXX) : warp list
[macro] automacro warpList triggered.
1-prontera is not online
(From: XXXX) : warp list
[macro] automacro warpList triggered.
1-prontera is not online
(From: XXXX) : warp 1
[macro] automacro warp triggered.
(From: XXXX) : warp list
[macro] automacro warpList triggered.
(To XXXX) : 1-prontera | 2-payon | 3-Kobolt | 4-Juno
(From: XXXX) : warp 3
[macro] automacro warp triggered.
and dont cast warp D:
please help
im use this OK version " Download latest (trunk, "svn") — recommended"
thanks