#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
}
}
Sunday, January 19, 2014
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
}
}
Subscribe to:
Posts (Atom)