#!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
}
}
Showing posts with label macro. Show all posts
Showing posts with label macro. Show all posts
Saturday, January 24, 2015
Wednesday, January 14, 2015
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
}
}
====================================
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
}
}
Monday, November 10, 2014
macro elven arrow
kondisi:
sesuaikan tulisan elven quiver nya, jgn sampe salahmacro ini menggunakan merchant class, klo lsg pake archer class, yg do cart nya hilangkan
jangan full paste, cek lagi kekuatan char anda, tiap char beda²
pastikan pass kafra udah di set dg benar di config.txt]
automacro quiver {
inventory "HuntingQuiver" < 170
location mora
exclusive 1
run-once 1
call {
do ai manual
pause 0.5
do move 100 110
pause 0.5
do talknpc 100 118 b
pause 2
do buy 5 30000
pause 1
do talknpc 106 117 c r0 r0 r0 r0 r0
pause 1
do talknpc 100 118 b
pause 2
do buy 5 30000
pause 1
do talknpc 106 117 c r0 r0 r0 r0 r0
pause 1
do cart add ElvenQuiver
pause 1
do talknpc 100 118 b
pause 2
do buy 5 30000
pause 1
do talknpc 106 117 c r0 r0 r0 r0 r0
pause 1
do talknpc 100 118 b
pause 2
do buy 5 30000
pause 1
do talknpc 106 117 c r0 r0 r0 r0 r0
pause 1
do cart add ElvenQuiver
pause 1
do talknpc 100 118 b
pause 2
do buy 5 30000
pause 1
do talknpc 106 117 c r0 r0 r0 r0 r0
pause 1
do talknpc 100 118 b
pause 2
do buy 5 30000
pause 1
do talknpc 106 117 c r0 r0 r0 r0 r0
pause 1
do cart add ElvenQuiver 80
pause 1
do talknpc 100 118 b
pause 2
do buy 5 30000
pause 1
do talknpc 106 117 c r0 r0 r0 r0 r0
pause 1
do talknpc 100 118 b
pause 2
do buy 5 30000
pause 1
do talknpc 106 117 c r0 r0 r0 r0 r0
pause 1
do cart add ElvenQuiver
pause 1
do talknpc 100 118 b
pause 2
do buy 5 20000
pause 1
do talknpc 106 117 c r0 r0 r0 r0 r0
pause 1
do talknpc 100 118 b
pause 2
do buy 5 12000
pause 1
do talknpc 106 117 c r0 r0 r0 r0 r0
pause 1
do talknpc 100 118 b
pause 2
do buy 5 6000
pause 1
do talknpc 106 117 c r0 r0 r0 r0 r0
release quiver
}
}
automacro storage {
inventory "ElvenQuiver" > 170
location mora
exclusive 1
run-once 1
call {
do ai manual
pause 0.5
do move 52 133
pause 1
do talknpc 48 128 c r0
pause 2
do storage add HuntingQuiver
pause 0.5
do cart get HuntingQuiver
pause 0.5
do storage add HuntingQuiver
pause 0.5
do cart get HuntingQuiver
pause 0.5
do storage add HuntingQuiver
pause 1
release storage
}
}
Macro Jamur Monk
kondisi:
Buat char Aco dan quest Monk sampai mau cari jamur aja, abis itu stoptulisan merah bisa di sesuaikan dg simpos anda
kadang suka stuk pas mau hit jamur nya, ini bisa sekali2 bot nya di relog
automacro payon {
location payon
run-once 1
call warp
timeout 100
}
macro warp {
pause 0.2
do sit
pause 1
do ai manual
pause 0.1
do move 95 59
pause 0.5
do sl 27 94 60
pause 3
do warp 2
pause 2
do move 94 60
pause 8
do ai auto
release payon
}
automacro monk {
location prt_monk
run-once 1
call jamur
timeout 100
}
macro jamur {
pause 0.2
do ai manual
pause 1
do move 192 172
pause 6
do move 332 59
pause 2
do move 341 68
pause 2
do move 339 51
pause 1
do move 332 59
pause 2
do talk 0
pause 2
do talk resp 0
pause 8
do stand
do ai auto
release monk
}
Macro Rebirth Yuno
Kondisi:
- char tsb ada di posisi yuno_in02- char tsb ada zeny 1.285.000
- Char tsb sudah di naikin full skill nya/tidak ada sisa skill
- Char tsb berat nya 0
- Char tsb tidak menggunakan peco2 job knight/crusader,cart job mercen class,falcon char hunter
automacro yunoin {
exclusive 1
run-once 1
location yuno_in02
call {
do ai manual
pause 0.5
do sit
pause 0.5
do move 90 166
pause 1
do talknpc 88 164 c r0
pause 2
do move 93 202
pause 3
do talk 0
pause 3
do move yuno_in05
pause 0.5
do sit
pause 0.5
do ai auto
release yunoin
}
}
automacro yunoin5 {
exclusive 1
timeout 25
location yuno_in05
call {
do ai manual
pause 0.5
do sit
pause 0.5
do move 45 54
pause 1
do talk 0
pause 4
do sit
pause 0.5
do ai auto
release yunoin5
}
}
automacro val {
exclusive 1
run-once 1
location valkyrie
call {
do ai manual
pause 0.5
do sit
pause 0.5
do move 50 75
pause 3
do talk 0
pause 10
do ai manual
release val
}
}
Macro auto balik tempat hunt pakai warp setelah storage
1. tambahkan di config.txt (x dan y sesuaikan seleramu)
autoMoveOnDeath 12. yang dimerahin = sesuaikan seleramu
autoMoveOnDeath_x 29
autoMoveOnDeath_y 226
autoMoveOnDeath_map prontera
3. yang dibiruin = tergantung pakai OK bahasa inggris / indonesia
automacro warp {
map payon
console /Storage closed/
inventory "Blue Gemstone" > 1
run-once 1
call {
do sl 27 100 100
#ganti dengan koordinat di sekitar karaktermu saat storage
pause 1.5
do warp 1
pause 1
do move 100 100
#ganti dengan kode warp tempat huntmu yang sudah dimemo
release warp
}
}
Macro auto balik simpos jika kena warp
#1. macro ini bila bot di magmaring (ve_fild03) dan harus ada butwing di inventory
#2. bila bot di map lain, misal di hode (moc_fild17) maka map (ve_fild03, veins, ve_fild04, ve_fild05, ve_fild06) diganti dengan: moc_fild17, morocc, moc_fild12, moc_fild18, moc_fild11
#3. yang dimerahin = sesuaikan seleramu
automacro warp {
\texclusive 1
\tlocation not ve_fild03
\tlocation not veins
\tlocation not ve_fild04
\tlocation not ve_fild05
\tlocation not ve_fild06\t
\tcall {
\t\tdo is Butterfly Wing
\t\tpause 1
\t\trelease warp
\t}
}
#2. bila bot di map lain, misal di hode (moc_fild17) maka map (ve_fild03, veins, ve_fild04, ve_fild05, ve_fild06) diganti dengan: moc_fild17, morocc, moc_fild12, moc_fild18, moc_fild11
#3. yang dimerahin = sesuaikan seleramu
automacro warp {
\texclusive 1
\tlocation not ve_fild03
\tlocation not veins
\tlocation not ve_fild04
\tlocation not ve_fild05
\tlocation not ve_fild06\t
\tcall {
\t\tdo is Butterfly Wing
\t\tpause 1
\t\trelease warp
\t}
}
Macro Antri Strip Weapon
automacro relog {
hp > 70%
status Strip Weapon
run-once 1
call {
do relog 1
}
}
hp > 70%
status Strip Weapon
run-once 1
call {
do relog 1
}
}
Sunday, January 19, 2014
Macro Auto Invite Guild
#yang dimerahin = sesuaikan seleramu
#yang dibiruin = tergantung pakai openkore bahasa inggris / indonesia
automacro Pub {
console /You are not a guildmaster./
call {
pause 2
do chat create "Guild R> All Job masuk ketik info" 2 0
do look 4
}
}
automacro info {
pubm /info/i
exclusive 1
call {
do c halo kami dari Guild R> All Job 3 130++
do c untuk bergabung dengan Guild ketik: join
}
}
automacro terima {
console /Target telah menerima./i
exclusive 1
call {
do c selamat bergabung :)
}
}
automacro Gagal {
console /Target sudah berada dalam sebuah Guild./i
exclusive 1
call {
do c Anda sudah bergabung dengan sebuah guild
do c silahkan leave guild dan relog
do c lalu masuk pub lagi dan ketik: join
}
}
automacro penuh {
console /Guild anda penuh./i
exclusive 1
call {
do c maaf, Guild saat ini penuh
}
}
automacro join {
pubm /join/i
exclusive 1
macro_delay 0
call {
$namaPlayer = $.lastMatch3
$id = $.lastMatch4
$jobID = @eval ($::players{$::playersID[$id]}->{jobID})
if ($jobID = 4060) goto undang
if ($jobID = 4061) goto undang
if ($jobID = 4062) goto undang
if ($jobID = 4063) goto undang
if ($jobID = 4064) goto undang
if ($jobID = 4065) goto undang
if ($jobID = 4073) goto undang
if ($jobID = 4074) goto undang
if ($jobID = 4075) goto undang
if ($jobID = 4076) goto undang
if ($jobID = 4077) goto undang
if ($jobID = 4078) goto undang
if ($jobID = 4079) goto undang
if ($jobID = 4081) goto undang
if ($jobID = 4083) goto undang
if ($jobID = 4085) goto undang
if ($jobID = 4087) goto undang
if ($jobID = 4096) goto undang
if ($jobID = 4097) goto undang
if ($jobID = 4098) goto undang
if ($jobID = 4099) goto undang
if ($jobID = 4100) goto undang
if ($jobID = 4101) goto undang
if ($jobID = 4102) goto undang
if ($jobID = 4103) goto undang
if ($jobID = 4104) goto undang
if ($jobID = 4105) goto undang
if ($jobID = 4106) goto undang
if ($jobID = 4107) goto undang
if ($jobID = 4108) goto undang
if ($jobID = 4109) goto undang
if ($jobID = 4110) goto undang
if ($jobID = 4111) goto undang
if ($jobID = 4112) goto undang
goto bukan
:bukan
do c maaf, job dan level anda tidak memenuhi syarat
stop
:undang
do guild request $namaPlayer
}
}
#yang dibiruin = tergantung pakai openkore bahasa inggris / indonesia
automacro Pub {
console /You are not a guildmaster./
call {
pause 2
do chat create "Guild R> All Job masuk ketik info" 2 0
do look 4
}
}
automacro info {
pubm /info/i
exclusive 1
call {
do c halo kami dari Guild R> All Job 3 130++
do c untuk bergabung dengan Guild ketik: join
}
}
automacro terima {
console /Target telah menerima./i
exclusive 1
call {
do c selamat bergabung :)
}
}
automacro Gagal {
console /Target sudah berada dalam sebuah Guild./i
exclusive 1
call {
do c Anda sudah bergabung dengan sebuah guild
do c silahkan leave guild dan relog
do c lalu masuk pub lagi dan ketik: join
}
}
automacro penuh {
console /Guild anda penuh./i
exclusive 1
call {
do c maaf, Guild saat ini penuh
}
}
automacro join {
pubm /join/i
exclusive 1
macro_delay 0
call {
$namaPlayer = $.lastMatch3
$id = $.lastMatch4
$jobID = @eval ($::players{$::playersID[$id]}->{jobID})
if ($jobID = 4060) goto undang
if ($jobID = 4061) goto undang
if ($jobID = 4062) goto undang
if ($jobID = 4063) goto undang
if ($jobID = 4064) goto undang
if ($jobID = 4065) goto undang
if ($jobID = 4073) goto undang
if ($jobID = 4074) goto undang
if ($jobID = 4075) goto undang
if ($jobID = 4076) goto undang
if ($jobID = 4077) goto undang
if ($jobID = 4078) goto undang
if ($jobID = 4079) goto undang
if ($jobID = 4081) goto undang
if ($jobID = 4083) goto undang
if ($jobID = 4085) goto undang
if ($jobID = 4087) goto undang
if ($jobID = 4096) goto undang
if ($jobID = 4097) goto undang
if ($jobID = 4098) goto undang
if ($jobID = 4099) goto undang
if ($jobID = 4100) goto undang
if ($jobID = 4101) goto undang
if ($jobID = 4102) goto undang
if ($jobID = 4103) goto undang
if ($jobID = 4104) goto undang
if ($jobID = 4105) goto undang
if ($jobID = 4106) goto undang
if ($jobID = 4107) goto undang
if ($jobID = 4108) goto undang
if ($jobID = 4109) goto undang
if ($jobID = 4110) goto undang
if ($jobID = 4111) goto undang
if ($jobID = 4112) goto undang
goto bukan
:bukan
do c maaf, job dan level anda tidak memenuhi syarat
stop
:undang
do guild request $namaPlayer
}
}
Macro auto invite guild
#kalau pemicunya dari pembicaraan di umum? ya tinggal ganti guild jadi pubm dan $.lastguild jadi $.lastpub
#kalau pemicunya dari whisper? ya tinggal ganti guild jadi pm dan $.lastguild jadi $.lastpm
automacro grup {
guild /grup/
exclusive 1
run-once 1
call {
do party request $.lastguild
release grup
}
#kalau pemicunya dari whisper? ya tinggal ganti guild jadi pm dan $.lastguild jadi $.lastpm
automacro grup {
guild /grup/
exclusive 1
run-once 1
call {
do party request $.lastguild
release grup
}
Macro rough elunium oridecon via npc autostorage
#catatan:
#1. yang dimerahin = sesuaikan seleramu
#2. jangan lupa di config.txt atur bagian autostorage:
storageAuto 1
storageAuto_npc payon 171 226 #kafra payon atas
storageAuto_distance 12
storageAuto_npc_type 1
storageAuto_npc_steps c r1 n
storageAuto_password 0000 #sesuaikan password storagemu
storageAuto_keepOpen 0
storageAuto_useChatCommand
relogAfterStorage 0
minStorageZeny 50
getAuto Rough Elunium {
minAmount 1
maxAmount 100 #sesuaikan dengan berat karaktermu
passive
}
#1. yang dimerahin = sesuaikan seleramu
#2. jangan lupa di config.txt atur bagian autostorage:
storageAuto 1
storageAuto_npc payon 171 226 #kafra payon atas
storageAuto_distance 12
storageAuto_npc_type 1
storageAuto_npc_steps c r1 n
storageAuto_password 0000 #sesuaikan password storagemu
storageAuto_keepOpen 0
storageAuto_useChatCommand
relogAfterStorage 0
minStorageZeny 50
getAuto Rough Elunium {
minAmount 1
maxAmount 100 #sesuaikan dengan berat karaktermu
passive
}
#3. bila ingin mengubah rough oridecon cukup mengganti semua kata Elunium dengan Oridecon
automacro ubahjadielu {
location payon 141 181
inventory "Rough Elunium" > 4
run-once 1
call {
do talk 1
pause 2
do talk resp 1
pause 1.5
release all
}
}
automacro balik {
location not payon 141 181
inventory "Rough Elunium" > 4
run-once 1
call {
do move payon 141 181
pause 5
release balik
}
}
Macro eluminum oridecon from rough via npv
#catatan:
#1. yang dimerahin = sesuaikan seleramu
#2. bila ingin mengubah rough oridecon cukup mengganti semua kata Elunium dengan Oridecon
automacro ubahjadielu {
location payon 141 181
inventory "Rough Elunium" > 4
run-once 1
call {
do talk 1
pause 2
do talk resp 1
pause 1.5
release all
}
}
automacro ambilroughtaruhelu {
location payon 141 181
inventory "Rough Elunium" < 4
cart "Rough Elunium" > 4
run-once 1
call {
do cart get rough elunium 100
pause 1
do cart add elunium
release all
}
}
automacro abis {
location payon 141 181
inventory "Rough Elunium" < 4
cart "Rough Elunium" < 4
run-once 1
call {
do quit
}
}
#1. yang dimerahin = sesuaikan seleramu
#2. bila ingin mengubah rough oridecon cukup mengganti semua kata Elunium dengan Oridecon
automacro ubahjadielu {
location payon 141 181
inventory "Rough Elunium" > 4
run-once 1
call {
do talk 1
pause 2
do talk resp 1
pause 1.5
release all
}
}
automacro ambilroughtaruhelu {
location payon 141 181
inventory "Rough Elunium" < 4
cart "Rough Elunium" > 4
run-once 1
call {
do cart get rough elunium 100
pause 1
do cart add elunium
release all
}
}
automacro abis {
location payon 141 181
inventory "Rough Elunium" < 4
cart "Rough Elunium" < 4
run-once 1
call {
do quit
}
}
Macro great narute to green live
macro divider {
do talk 0
pause 3
do talk resp 1
pause 2
do talk resp 0
pause 1
do talk num 10
pause 1
do talk num 6
pause 1
do cart get @cart(Great Nature) 10
do cart add @inventory(Green Live) 60
call divider
}
macro umstore {
do move 29 71
pause 3
do move umbala 97 154
}
macro return {
do move umbala 219 189
}
automacro StoreGL {
location umbala 97 154
timeout 60
delay 2
call {
do talk 4
pause 2
do talk resp 0
pause 2
do storage add @inventory(Green Live)
pause 1
do cart get @cart(Green Live) 650
pause 1
do storage add @inventory(Green Live)
pause 1
do cart get @cart(Green Live)
pause 1
do storage add @inventory(Green Live)
pause 1
do storage get @storage(Great Nature) 220
pause 1
do cart add @inventory(Great Nature) 220
pause 1
do storage get @storage(Great Nature) 10
pause 1
do storage close
pause 2
call return
}
}
automacro CallD {
location um_in
console /NPC Exist/
timeout 20
delay 2
call divider
}
automacro CallUS {
console /Cart Item Great Nature/
location um_in
inventory "Great Nature" < 2
inventory "Green Live" > 500
timeout 20
delay 2
call umstore
}
do talk 0
pause 3
do talk resp 1
pause 2
do talk resp 0
pause 1
do talk num 10
pause 1
do talk num 6
pause 1
do cart get @cart(Great Nature) 10
do cart add @inventory(Green Live) 60
call divider
}
macro umstore {
do move 29 71
pause 3
do move umbala 97 154
}
macro return {
do move umbala 219 189
}
automacro StoreGL {
location umbala 97 154
timeout 60
delay 2
call {
do talk 4
pause 2
do talk resp 0
pause 2
do storage add @inventory(Green Live)
pause 1
do cart get @cart(Green Live) 650
pause 1
do storage add @inventory(Green Live)
pause 1
do cart get @cart(Green Live)
pause 1
do storage add @inventory(Green Live)
pause 1
do storage get @storage(Great Nature) 220
pause 1
do cart add @inventory(Great Nature) 220
pause 1
do storage get @storage(Great Nature) 10
pause 1
do storage close
pause 2
call return
}
}
automacro CallD {
location um_in
console /NPC Exist/
timeout 20
delay 2
call divider
}
automacro CallUS {
console /Cart Item Great Nature/
location um_in
inventory "Great Nature" < 2
inventory "Green Live" > 500
timeout 20
delay 2
call umstore
}
Macro tempa npc - refine equip npc
macro nempa {
$bahan = Shield [1]
# Ganti Dengan dibawah ini apabila bukan nempa armor
# Shield : $step = c r2 c r0 c n
# Jubah : $step = c r4 c r0 c n
# Alas Kaki : $step = c c r5 r0 c n
# Headgear : $step = c c r8 r0 c n
$step = c r4 c r0 c n
# Ganti Dengan dibawah ini apabila bukan nempa armor
# Shield : $step2 = c r2 c r0 c c r0 c n
# Jubah : $step2 = c r4 c r0 c c r0 c n
# Alas Kaki : $step2 = c r5 c r0 c c r0 c n
# Headgear : $step2 = c r8 c r0 c c r0 c n
$step2 = c r2 c r0 c c r0 c n
do conf autoTalkCont 0
do move 60 64
do sit
:five
$doom = @inventory($bahan)
if ($doom == -1) goto six
if (@inventory(Elunium) == -1) goto exit
do eq @inventory($bahan)
$i = 0
while ($i < 4) as begin
do talknpc 63 60 $step
$i++
end begin
pause 15
do talknpc 63 60 $step2
goto five
:six
if (@inventory(+5 $bahan) == -1) goto eight
if (@inventory(Elunium) == -1) goto exit
pause 90
do eq @inventory(+5 $bahan)
do talknpc 63 60 $step2
goto six
:seven
if (@inventory(+6 $bahan) == -1) goto eight
if (@inventory(Elunium) == -1) goto exit
pause 270
do eq @inventory(+6 $bahan)
do talknpc 63 60 $step2
goto seven
:eight
if (@inventory(+7 $bahan) == -1) goto exit
if (@inventory(Elunium) == -1) goto exit
pause 810
do eq @inventory(+7 $bahan)
do talknpc 63 60 $step2
goto eight
:exit
do conf autoTalkCont 1
log -- Refine Macro End --
}
Macro whisper
#catatan:
#1. yang dimerahin = sesuaikan seleramu
#2. tidak bisa deteksi nickname berkutip ( ' dan " ) dan bergaris miring ( / )
automacro info {
pm /info/
call {
do pm "$.lastpm" ketik job karaktermu ^O^
release all
}
}
automacro AB {
pm /AB|ab/
call {
do pm "$.lastpm" 100 WSP, 100 Strawberry, 100 Blue Gems
release all
}
}
#1. yang dimerahin = sesuaikan seleramu
#2. tidak bisa deteksi nickname berkutip ( ' dan " ) dan bergaris miring ( / )
automacro info {
pm /info/
call {
do pm "$.lastpm" ketik job karaktermu ^O^
release all
}
}
automacro AB {
pm /AB|ab/
call {
do pm "$.lastpm" 100 WSP, 100 Strawberry, 100 Blue Gems
release all
}
}
Macro coating bottle dll
macro release {
pause 0.5
release create
}
automacro store {
inventory "Medicine Bowl" = 0
call kafra
run-once 1
exclusive 1
delay 2
}
macro kafra {
do talknpc 120 62 c r1 c
pause 1
do storage add Glistening Coat
pause 1
do storage get Medicine Bowl 550
pause 1
do storage get Heart Of Mermaid 550
pause 1
do storage get Zenorc's Fang 550
pause 1
do storage get Empty Bottle 550
pause 1
do storage get Alcohol 550
pause 1
do storage close
call release
}
pause 0.5
release create
}
automacro store {
inventory "Medicine Bowl" = 0
call kafra
run-once 1
exclusive 1
delay 2
}
macro kafra {
do talknpc 120 62 c r1 c
pause 1
do storage add Glistening Coat
pause 1
do storage get Medicine Bowl 550
pause 1
do storage get Heart Of Mermaid 550
pause 1
do storage get Zenorc's Fang 550
pause 1
do storage get Empty Bottle 550
pause 1
do storage get Alcohol 550
pause 1
do storage close
call release
}
Macro Pharmacy Acid Bottle dll
#yang dimerahin = sesuaikan keinginan, misal mau pharmacy Fire Bottle dll
##### Red Potion = 8E 01 F5 01 00 00 00 00 00 00
##### Yellow Potion = 8E 01 F7 01 00 00 00 00 00 00
##### White Potion = 8E 01 F8 01 00 00 00 00 00 00
##### Blue Potion = 8E 01 F9 01 00 00 00 00 00 00
##### Adonyne = 8E 01 5D 02 00 00 00 00 00 00
##### Aloevera = 8E 01 5E 02 00 00 00 00 00 00
##### Red Slim = 8E 01 21 02 00 00 00 00 00 00
##### Yellow Slim = 8E 01 22 02 00 00 00 00 00 00
##### White Slim = 8E 01 23 02 00 00 00 00 00 00
##### Alcohol = 8E 01 CA 03 00 00 00 00 00 00
##### Fire Bottle = 8E 01 DF 1B 00 00 00 00 00 00
##### Acid Bottle = 8E 01 E0 1B 00 00 00 00 00 00
##### Plant Bottle = 8E 01 E1 1B 00 00 00 00 00 00
##### Mine Bottle = 8E 01 E2 1B 00 00 00 00 00 00
##### Coating Wax = 8E 01 E3 1B 00 00 00 00 00 00
automacro brew {
run-once 1
sp > 15 %
map prontera
call {
:cek
log jumlah Medicine Bow = @invamount (Medicine Bow)
log jumlah Empty Bottle = @invamount (Empty Bottle)
log jumlah Immortal Heart = @invamount (Immortal Heart)
if (@invamount (Medicine Bowl) = 0) goto storage
if (@invamount (Empty Bottle) = 0) goto storage
if (@invamount (Immortal Heart) = 0) goto storage
if (@invamount (Medicine Bowl) > 0) goto jalan
if (@invamount (Empty Bottle) > 0) goto jalan
if (@invamount (Immortal Heart) > 0) goto jalan
goto end
:storage
do move prontera 37 199
do talknpc 29 207 c r1 n
pause 3
do storage get @storage(Medicine Bowl) 100
pause 3
do storage get @storage(Immortal Heart) 100
pause 3
do storage get @storage(Empty Bottle) 100
pause 3
do storage add @inventory(Acid Bottle)
do storage close
goto jalan
:jalan
do ss 228
do send 8E 01 E0 1B 00 00 00 00 00 00
pause 0.5
goto cek
:end
stop
}
##### Red Potion = 8E 01 F5 01 00 00 00 00 00 00
##### Yellow Potion = 8E 01 F7 01 00 00 00 00 00 00
##### White Potion = 8E 01 F8 01 00 00 00 00 00 00
##### Blue Potion = 8E 01 F9 01 00 00 00 00 00 00
##### Adonyne = 8E 01 5D 02 00 00 00 00 00 00
##### Aloevera = 8E 01 5E 02 00 00 00 00 00 00
##### Red Slim = 8E 01 21 02 00 00 00 00 00 00
##### Yellow Slim = 8E 01 22 02 00 00 00 00 00 00
##### White Slim = 8E 01 23 02 00 00 00 00 00 00
##### Alcohol = 8E 01 CA 03 00 00 00 00 00 00
##### Fire Bottle = 8E 01 DF 1B 00 00 00 00 00 00
##### Acid Bottle = 8E 01 E0 1B 00 00 00 00 00 00
##### Plant Bottle = 8E 01 E1 1B 00 00 00 00 00 00
##### Mine Bottle = 8E 01 E2 1B 00 00 00 00 00 00
##### Coating Wax = 8E 01 E3 1B 00 00 00 00 00 00
automacro brew {
run-once 1
sp > 15 %
map prontera
call {
:cek
log jumlah Medicine Bow = @invamount (Medicine Bow)
log jumlah Empty Bottle = @invamount (Empty Bottle)
log jumlah Immortal Heart = @invamount (Immortal Heart)
if (@invamount (Medicine Bowl) = 0) goto storage
if (@invamount (Empty Bottle) = 0) goto storage
if (@invamount (Immortal Heart) = 0) goto storage
if (@invamount (Medicine Bowl) > 0) goto jalan
if (@invamount (Empty Bottle) > 0) goto jalan
if (@invamount (Immortal Heart) > 0) goto jalan
goto end
:storage
do move prontera 37 199
do talknpc 29 207 c r1 n
pause 3
do storage get @storage(Medicine Bowl) 100
pause 3
do storage get @storage(Immortal Heart) 100
pause 3
do storage get @storage(Empty Bottle) 100
pause 3
do storage add @inventory(Acid Bottle)
do storage close
goto jalan
:jalan
do ss 228
do send 8E 01 E0 1B 00 00 00 00 00 00
pause 0.5
goto cek
:end
stop
}
Macro Paket Soullink
#catatan:
#1. isi paket adalah kaite, kaizel, kaupe, kaahi
#2. berikan 1 baris di paling atas (enter)
#3. format notepad harus UTF-8
#4. karakter dengan macro ini harus dalam status aktif spirit
#5. jika mau ganti emotion bendera dengan emotion /lv maka ganti \*Flag\s\d\* dengan *Heart*
automacro pkt {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (\*Flag\s\d\*|sl)$/
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')
$guild1 = namaGuildmu
$guild2 = namaGuildmu
if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
:oke
do sp 462 $playerID
pause 1.5
do sp 463 $playerID
pause 1.5
do sp 464 $playerID
pause 1
do sp 465 $playerID
pause 1
release pkt
}
}
#1. isi paket adalah kaite, kaizel, kaupe, kaahi
#2. berikan 1 baris di paling atas (enter)
#3. format notepad harus UTF-8
#4. karakter dengan macro ini harus dalam status aktif spirit
#5. jika mau ganti emotion bendera dengan emotion /lv maka ganti \*Flag\s\d\* dengan *Heart*
automacro pkt {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (\*Flag\s\d\*|sl)$/
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')
$guild1 = namaGuildmu
$guild2 = namaGuildmu
if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
:oke
do sp 462 $playerID
pause 1.5
do sp 463 $playerID
pause 1.5
do sp 464 $playerID
pause 1
do sp 465 $playerID
pause 1
release pkt
}
}
Macro priest dengan emo atau bendera
#catatan:
#1. isi paket adalah blessing, agi, sacrament, kyrie
#2. berikan 1 baris di paling atas (enter)
#3. format notepad harus UTF-8
#4. jika mau ganti emotion bendera dengan emotion /swt maka ganti \*Flag\s\d\* dengan *Sweat*
#5. daftar emotion bisa dilihat di tables -> emotions.txt
automacro pkt {
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')
$guild1 = namaGuildmu
$guild2 = namaGuildmu
if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
:oke
do sp 34 $playerID
do sp 29 $playerID
pause 1.5
do sp 2515 $playerID
pause 1.5
do sp 73 $playerID
release pkt
}
}
#1. isi paket adalah blessing, agi, sacrament, kyrie
#2. berikan 1 baris di paling atas (enter)
#3. format notepad harus UTF-8
#4. jika mau ganti emotion bendera dengan emotion /swt maka ganti \*Flag\s\d\* dengan *Sweat*
#5. daftar emotion bisa dilihat di tables -> emotions.txt
automacro pkt {
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')
$guild1 = namaGuildmu
$guild2 = namaGuildmu
if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
:oke
do sp 34 $playerID
do sp 29 $playerID
pause 1.5
do sp 2515 $playerID
pause 1.5
do sp 73 $playerID
release pkt
}
}
Macro paket priest
#catatan:
#1. yang dimerahin = sesuaikan seleramu
#2. isi paket adalah blessing, agi, sacrament, kyrie
#3. urutkan skill dari yang memiliki delay after terendah dan dipadukan dengan pause agar tidak terlewat
automacro pkt {
pubm /paket/
exclusive 1
run-once 1
call {
do sp 34 $.lastpub
do sp 29 $.lastpub
pause 1.5
do sp 2515 $.lastpub
pause 1.5
do sp 73 $.lastpub
release pkt
}
}
#1. yang dimerahin = sesuaikan seleramu
#2. isi paket adalah blessing, agi, sacrament, kyrie
#3. urutkan skill dari yang memiliki delay after terendah dan dipadukan dengan pause agar tidak terlewat
automacro pkt {
pubm /paket/
exclusive 1
run-once 1
call {
do sp 34 $.lastpub
do sp 29 $.lastpub
pause 1.5
do sp 2515 $.lastpub
pause 1.5
do sp 73 $.lastpub
release pkt
}
}
Subscribe to:
Posts (Atom)