Macro Cek PVP

#!cekpvp
#xvanct@yahoo.com

automacro cekPront {
priority 0
console /prontera (.*) \/ 128 /
run-once 1
call {
$prontera = $.lastMatch1
pause 2
do talk resp 6
call cek
}
}

automacro cekIzlude {
priority 1
console /izlude (.*) \/ 128 /
run-once 1
call {
$izlude = $.lastMatch1
pause 2
do talk resp 6
call cek
}
}

automacro cekPayon {
priority 2
console /payon (.*) \/ 128 /
run-once 1
call {
$payon = $.lastMatch1
pause 2
do talk resp 6
call cek
}
}

automacro cekAlberta {
priority 3
console /alberta (.*) \/ 128 /
run-once 1
call {
$alberta = $.lastMatch1
pause 2
do talk resp 6
call cek
}
}

automacro cekMorocc {
priority 4
console /morocc (.*) \/ 128 /
run-once 1
call {
$morocc = $.lastMatch1
pause 2
do talk resp 6
do pm $nama ======$.hour:$.minute:$.second======
do pm $nama prontera $prontera / 128 ]
do pm $nama izlude   $izlude / 128 ]
do pm $nama payon    $payon / 128 ]
do pm $nama alberta  $alberta / 128 ]
do pm $nama morocc   $morocc / 128 ]
do pm $nama ==================
release all
}
}

macro cek {
do talknpc 86 85 n
}


automacro cekPVP {
location pvp_y_room 70 90 90 70
console /\From: (.*)\) : cekpvp/
call {
$nama = $.lastMatch1
call cek
release all
}
}

Macro Auto Trans n Kafra

perhatikan yang di Bold !!

====================================

automacro transexy {
location alberta
weight > 25%
timeout 30
call {
do ai manual
do deal @player(Reason)
pause 5
do deal add @inventory (Yggdrasil Seed)
pause 1
do ai auto
release all
}
}

automacro restok {
location alberta
weight < 25%
run-once 1
call {
do talknpc 28 229 c r1 n
pause 3
do ai manual
pause 1
do storage get @storage(Yggdrasil Seed) 250
pause 1
do storage close
pause 1
do ai auto
release mail3
}
}