Senin, 25 Februari 2013

Modifikasi 2013 Macro Paket & Warp WOE + Plugins Macro

Macro Paket

automacro paket {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (\*Flag\s\d\*|paket)$/
exclusive 1
run-once 1
call {

$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$playerguild = @eval (exists $::players{$::playersID[$playerID]}->{guild} ? $::players{$::playersID[$playerID]}->{guild}{name} : 'null')

#Nama guild yg mau di paket
$guild1 = • » T o D « •
$guild2 = • » T o L « •
$guild3 = • » T o D « •
$guild4 = nama guild

if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
if ($playerguild == $guild3) goto oke
if ($playerguild == $guild4) goto oke
goto lain

:oke

if ($distance > 8 ) goto jauh

#skill blessing
do sp 34 $playerID 10

#skill increase agi
pause 0.5
do sp 29 $playerID 10

#asump
pause 1
do sp 361 $playerID 5
pause 0.2

goto end

:jauh

goto end
:lain
do e ??

:end

release paket
}
}

automacro sp {
sp < 20%
exclusive 1
run-once 1
call kering
}

macro kering {
do c sabar all sp ku tinggal $.sp
pause 10
release sp
}




Macro Warp

automacro brito {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (\*Fla\s\d\*|brito1)$/
exclusive 1
run-once 1
call {
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$playerguild = @eval (exists $::players{$::playersID[$playerID]}->{guild} ? $::players{$::playersID[$playerID]}->{guild}{name} : 'null')

#Nama guild yg mau di paket
$guild1 = • » T o D « •
$guild2 = • » T o L « •
$guild3 = • » T o D « •
$guild4 = nama guild

if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
if ($playerguild == $guild3) goto oke
if ($playerguild == $guild4) goto oke

goto lain
:oke

#skill brito
do c brito1 silahkan masuk !!!
do sl 27 52 248 4
pause 2
do warp 1
pause 0.2
goto end

:lain
do e ??

:end

release brito
}
}

automacro luina {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (\*Fla\s\d\*|aru1)$/
exclusive 1
run-once 1
call {
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$playerguild = @eval (exists $::players{$::playersID[$playerID]}->{guild} ? $::players{$::playersID[$playerID]}->{guild}{name} : 'null')

#Nama guild yg mau di paket
$guild1 = • » T o D « •
$guild2 = • » T o L « •
$guild3 = • » T o D « •
$guild4 = nama guild

if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
if ($playerguild == $guild3) goto oke
if ($playerguild == $guild4) goto oke

goto lain
:oke

#skill luina
do c aru1 silahkan masuk !!!
do sl 27 54 248 4
pause 2
do warp 2
pause 0.2

goto end

:lain
do e ??
:end

release luina
}
}

automacro green {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (\*Fla\s\d\*|sch1)$/
exclusive 1
run-once 1
call {
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$playerguild = @eval (exists $::players{$::playersID[$playerID]}->{guild} ? $::players{$::playersID[$playerID]}->{guild}{name} : 'null')

#Nama guild yg mau di paket
$guild1 = • » T o D « •
$guild2 = • » T o L « •
$guild3 = • » T o D « •
$guild4 = nama guild

if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
if ($playerguild == $guild3) goto oke
if ($playerguild == $guild4) goto oke

goto lain
:oke

#skill green
do c sch1 silahkan masuk !!!
do sl 27 56 248 4
pause 2
do warp 3
pause 0.2

goto end

:lain
do e ??

:end

release green
}
}

automacro trans {
console /Item added to inventory: Blue Gemstone/
exclusive 1
run-once 1
call trans1
}

macro trans1 {
do c Makasih Blue gemnya..
release trans
}

automacro gagal {
console /Skill Warp Portal failed/
exclusive 1
run-once 1
call gagal1
}

macro gagal1 {
do c woi minggir dong....
release gagal
}

automacro abis {
inventory "Blue Gemstone" < 1
exclusive 1
run-once 1
call gem
}

macro gem {
do c gem abis tolong di trans !!
pause 10
release abis
}

0 komentar:

Share

Twitter Delicious Facebook Digg Stumbleupon Favorites More