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
}

Read More

Macro Bot Warp

hi mate,
kali ini saya ingin berbagi makro pada openkore yang berguna untuk warp dengan kita sebutkan kata"warp1" dan sebagainya. bisa dipakai pada saat saya hunt bersama bot gandengan dan berfungsi untuk balik ke kota tanpa saya harus mengetik di console openkore,berikut ini adalah macronya.anda bisa edit lagi macro disini jika anda mau,



automacro warp1 { >>>>kata warp1 bisa anda ganti dengan selera anda
pubm /warpkota/ >>>>"pubm" untuk pesan yg kita tulis di umum jika anda ingin diWM bisa diganti dengan kata "pm" dan "warpkota" adalah kata kunci yg harus diketik supaya bot membuka warp,kata warpkota bisa anda ganti sesuai selera anda.
call warp1 >>>>ini digunakan untuk mentriger atau menjalankan namamakro warp1 yang ada dibawah.
}

macro warp1 { >>>>kata warp1 ini harus sama dengan yang diatas,misal yang diatas anda ganti "warper berarti ini jg harus anda ganti kata warper"
do e lv
$x = @arg("$.pos", 1)
$y = @arg("$.pos", 2)
$x0 = @eval($x + @rand(1,2))
$x1 = @eval($x - @rand(1,2))
$y0 = @eval($y - @rand(1,2))
$x2 = @random("$x0", "$x1")
do sl 27 $x2 $y0 >>>> mksud dr ini adalah agar kita bisa menggunakan random kordinat agar bisa membuka warp tanpa harus mengisi koordinat khusus
pause 2
do warp 0 >>>>kalau yg ini adalah memo yg kita gunakan bs warp 0 s/d warp 3
do c masuk njink !! >>>>ini hanya tambahan dan tidak harus ada.
stop
release warp1
}

Read More