• Silahkan bergabung dengan chat kami di Telegram group kami di N3Forum - https://t.me/n3forum
  • Welcome to the Nyit-Nyit.Net - N3 forum! This is a forum where offline-online gamers, programmers and reverser community can share, learn, communicate and interact, offer services, sell and buy game mods, hacks, cracks and cheats related, including for iOS and Android.

    If you're a pro-gamer or a programmer or a reverser, we would like to invite you to Sign Up and Log In on our website. Make sure to read the rules and abide by it, to ensure a fair and enjoyable user experience for everyone.

Macro

ferry_gukguk

Gukguk Love Cat
Level 2
@om ferry
Iya kaya anti bot gitu... saya klo mau masuk biasanya talk textnya tulis manual pas consol jalan...
masalahnya klo tiba2 dc trus ga diawasin kan ga isa balik lagi...
klo pas jalan manual saya pake
talk npcnya
talk resp 0
talk text ..... nah klo pas manual kan keliatan di consolnya,
klo mau dibikin jadi auto gimana??
ada ga coding macro byar dya bisa ngambil 5 huruf dari blakang kata2 yang dikeluarin sama npc, kaya di coding excel gitu
hmm apa kata2 npc itu tetep setiap waktu nya?
apa beda2?

dicoba paling pake console + regexp
 

reindheart

3 SD
Level 2
@reindheart
yang musti di edit,
ntar kalo posting scirpt ky d atas pake tag yah..

trus,
console nya di ganti kk,
jadi trigged nya pas ada char guild di layar

tapi biasanya yang otomatis kaya gitu yang spiriter nya di 1grup sama player yg otomatis d spirit ny..
jadi ga pake macro, main ny d config

maaf kk ferry ngulang, maksutnya tirigerd pas ada char guild gimana? biasa di kasih contoh consolenya gimana? maklum masih bingung eheheheh
 

reindheart

3 SD
Level 2
pake 1 grup aja lebih gampang kok kk.
1 grupin
trus pake partySkill :wink:

nda om ferry sekalian aku mau belajar macros perasaan di kore kalo ada orang muncul di layar gak nonggolin apa2 deh heem jadi gimana biar trigerdnya ke panggil pas pas anggota guild ada di layar heem
 

gunknight

PAUD
Banned
om mau tanya dong kok pas mau ngebot spirit soul linker, jadi kayak begini



Can't locate object method "statusActive" via package "Actor : You" at plugins/macro/Macro/Automacro.pm line 269.


itu kira kira automacro.pm nya di apain ya?
thx ya sebelumnya :D
 

chilo1

TK B
Level 1
@reindhart : itu buat autobuff yah? coba pake config party skill trus di bawahnya tambahin target_isGuild & notPartyOnly 1
itu auto trigger pas anggota guild muncul di layar jangkauan bot ntar dia auto buff
 

ferry_gukguk

Gukguk Love Cat
Level 2
nda om ferry sekalian aku mau belajar macros perasaan di kore kalo ada orang muncul di layar gak nonggolin apa2 deh heem jadi gimana biar trigerdnya ke panggil pas pas anggota guild ada di layar heem
coba liat squelchDomains di config ada value apa?
biasa nya ada kok,..
kalo engga juga ada nama player sama distance yang muncul di console ny..

om mau tanya dong kok pas mau ngebot spirit soul linker, jadi kayak begini

Can't locate object method "statusActive" via package "Actor : You" at plugins/macro/Macro/Automacro.pm line 269.

itu kira kira automacro.pm nya di apain ya?
thx ya sebelumnya :D
bole di liat macros.txt nya?
kalo kira2 macros.txt ga ada error, coba macro plugins nya di reinstall, (copy paste sama macro plugins yang baru)
 

gunknight

PAUD
Banned
coba liat squelchDomains di config ada value apa?
biasa nya ada kok,..
kalo engga juga ada nama player sama distance yang muncul di console ny..



bole di liat macros.txt nya?
kalo kira2 macros.txt ga ada error, coba macro plugins nya di reinstall, (copy paste sama macro plugins yang baru)
udah bisa om hehe,
trus saya mau tanya lagi nih, di PS yg saya mainin ada NPC kayak judi gitu, pas saya mau cari pake command nl, gak ada NPC yang kedeteksi, tapi pas ml, jadi ada ( sepertinya ditukar monster dengan NPC)
itu gimana ya caranya supaya bisa jalan botnya?
thanks :D
 

ferry_gukguk

Gukguk Love Cat
Level 2
udah bisa om hehe,
trus saya mau tanya lagi nih, di PS yg saya mainin ada NPC kayak judi gitu, pas saya mau cari pake command nl, gak ada NPC yang kedeteksi, tapi pas ml, jadi ada ( sepertinya ditukar monster dengan NPC)
itu gimana ya caranya supaya bisa jalan botnya?
thanks :D
sip,

itu biasanya salah serverType,
dicoba antara 8 sampe 8_5
jangan lupa paket nya di extract ya pake packet extractor..
 

Jesc

PAUD
Level 1
Hay all..i lagi blajar macro nih..lagi coba2 di PS sih sblum maen ke idRO..mo nanya nih, ini macro i di bawah uda ke trigger, tapi masalahnya cuma 1..abis reload SP, & balik lagi ke tempat hunt..kok bot nya diem ya..ga mo lanjutin huntnya..salah dimanakah?

Code:
automacro isihp {
map cmd_fild04
sp < 10% 
run-once 1
call isihp2
}

macro isihp2 {
do c @go 11    #tele ke gonryun
do talknpc 164 130 c n    #npc healer
pause 3
do talknpc 151 130 c c r0 c n   #npc portal, back to cmd_fild04
pause 1
release all
}
salah dimana ya?
 

ferry_gukguk

Gukguk Love Cat
Level 2
Hay all..i lagi blajar macro nih..lagi coba2 di PS sih sblum maen ke idRO..mo nanya nih, ini macro i di bawah uda ke trigger, tapi masalahnya cuma 1..abis reload SP, & balik lagi ke tempat hunt..kok bot nya diem ya..ga mo lanjutin huntnya..salah dimanakah?

Code:
automacro isihp {
map cmd_fild04
sp < 10% 
run-once 1
call isihp2
}

macro isihp2 {
do c @go 11    #tele ke gonryun
do talknpc 164 130 c n    #npc healer
pause 3
do talknpc 151 130 c c r0 c n   #npc portal, back to cmd_fild04
pause 1
release all
}

salah dimana ya?
coba d macro ny d tambah reload all sesudah release all
 

titoet

2 SD
Level 2
kk maff kalau leech ya bingung banget soalnya bahasa macro . ada macro buat buffer party gak ?? selama ini saya pake yang partyskill ( yang di config ) thx ya ( maff kalau tulisan ane agak membingungkan )
 

ferry_gukguk

Gukguk Love Cat
Level 2
kk maff kalau leech ya bingung banget soalnya bahasa macro . ada macro buat buffer party gak ?? selama ini saya pake yang partyskill ( yang di config ) thx ya ( maff kalau tulisan ane agak membingungkan )
cek disini bro
Code:
http://www.nyit-nyit.net/index.php?/topic/23017-share-macro/
 

RnDy

PAUD
Level 1
gan ..
ane punya problem macro soullink nih.. tentang masalah jarak nya .. tolong di cross check yak gan ..
iki gag mau kasi sprit dari jarak mana pun .. tetep jawabanya dari bot nya command :jauh

nih macro nya gan ..
Code:
automacro link {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (\*Kiss\*|\*Kiss 2\*|\*Flag\s\d\*)$/
sp > 10%
call linker
}

macro linker {
$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 = Avazor Reborn
$guild2 = Gold Saint Zodiac
$guild3 = PirateS OfThE CaribbeaN
$guild4 = My LiFe Mu RuLeS

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

:ok
if ($distance > 5) goto jauh
do e lv

:ok
if ($distance > 5) goto jauh
$jobID = @eval ($::players{$::playersID[$id]}->{jobID})
if ($jobID = 7) goto knight
if ($jobID = 13) goto knight
if ($jobID = 4008) goto knight
if ($jobID = 4014) goto knight
if ($jobID = 12) goto assassin
if ($jobID = 4013) goto assassin
if ($jobID = 10) goto smith
if ($jobID = 4011) goto smith
if ($jobID = 14) goto paladin
if ($jobID = 21) goto paladin
if ($jobID = 4015) goto paladin
if ($jobID = 4022) goto paladin
if ($jobID = 4012) goto sniper
if ($jobID = 11) goto sniper
if ($jobID = 16) goto professor
if ($jobID = 4017) goto professor
if ($jobID = 8) goto priest
if ($jobID = 4009) goto priest
if ($jobID = 15) goto champion
if ($jobID = 4016) goto champion
if ($jobID = 4010) goto wizard
if ($jobID = 4018) goto stalker
if ($jobID = 18) goto creator
if ($jobID = 4019) goto creator
if ($jobID = 4020) goto clown
if ($jobID = 4021) goto clown
if ($jobID = 19) goto clown
if ($jobID = 20) goto clown
if ($jobID = 4047) goto star
if ($jobID = 4049) goto soul
if ($jobID = 23) goto snoob
goto jauh

:jauh
do e e5
do c Jangan Jauh" Kali, $namaPlayer ~~
goto end	

:lain
do e fst
do c Mau Gratisan ??
stop
release link

:end
release link

:snoob
do sp 451 $id
stop
release link

:star
do sp 448 $id
stop
release link
:soul
do sp 461 $id
stop
release link
:knight
do sp 452 $id
stop
release link
:priest
do sp 454 $id
stop
release link
:wizard
do sp 453 $id
stop
release link
:smith
do sp 458 $id
stop
release link
:sniper
do sp 460 $id
stop
release link
:assassin
do sp 457 $id
stop
release link
:paladin
do sp 450 $id
stop
release link
:champion
do sp 447 $id
stop
release link
:professor
do sp 449 $id
stop
release link
:creator
do sp 445 $id
stop
release link
:clown
do sp 455 $id
stop
release link
:stalker
do sp 456 $id
stop
release link
}


automacro SPAbis {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (\*Kiss\*|\*Kiss 2\*|\*Flag\s\d\*)$/
sp < 20%
call Abis
}

macro Abis {
do e e32
do c sp gw gan, abis.. >.<
do c sabar yo??
release SPAbis
}

tolong pencerahanya ya gan ..
 

kmpg

PAUD
Level 1
Kakak2 ada yang bisa bantu ga?
casenya gini:
saya mau nyediain jasa warp, macro yang saya dapet dari N3 dah jalan tapi kadang client warpnya suka buru2 dan berdiri di area warp, jadi gagal deh warpnya jadi saya pingin di buka warp ulang untuk itu. tapi sampe sekarang lom menemukan titik temu :(, berikut macro saya. mohon sedianya kakaq2 mengoreksi.

Terima kasih


Code:
automacro one {
console /Anda duduk./i
call {
do chat create "Veins 5000|TV 5001|Mosco 5002" 2 0 1111
}
}

automacro two {
console /(.*) \(level (\d+)\) Mengajukan Transaksi/i
call {
do pm "$.lastMatch1" Warp ke Veins 5.000 z
do pm "$.lastMatch1" Warp ke TV  5.001 z
do pm "$.lastMatch1" Warp ke Mosco 5.002 z
do pm "$.lastMatch1" Kesalahan/kegagalan Warp bukan tanggung jawab kami
}
}

automacro three {
console /Anda mendapatkan 5.000 zeny./i
set repeat 1
call {
do chat leave
pause 1
do e thx
#do sp 28 "$.lastMatch1" 10
#pause 0.2
#skill blessing
#do sp 34 "$.lastMatch1" 10
#skill increase agi
#pause 1
#do sp 29 "$.lastMatch1" 10
do c @random ("Terima kasih sudah menggunakan Jasa kami, Tolong Jangan Berdiri Diarea WARP!!")
do e thx
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$i = @player($namaPlayer)
$warpslot = 3

:loop
$posx = @rand (1,4)
$posy = @rand (1,4)
$cellIsFull = 0

do eval $::Macro::Data::varStack{cellIsFull} = 0;foreach (@{$::playersList->getItems()}) { next if (($_->{pos_to}{x} != $posx) || ($_->{pos_to}{y} != $posy));$::Macro::Data::varStack{cellIsFull} = 1; last;}

if ($cellIsFull == 1) goto loop
$mex = @arg ("$.pos", 1)
$mey = @arg ("$.pos", 2)
$herex = @eval ($mex + $posx)
$herey = @eval ($mey + $posy)
do sl 27 $herex $herey
pause 1.3
do warp $warpslot
pause 2
do warp veins
}
console /Skill Warp Portal gagal (Kebutuhan)./i
set repeat 1
call {
do c @random ("PLIS DEH, GADA ULANGAN LAGI KALO GAGAL")
do e thx
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$i = @player($namaPlayer)
$warpslot = 3

:loop
$posx = @rand (1,4)
$posy = @rand (1,4)
$cellIsFull = 0

do eval $::Macro::Data::varStack{cellIsFull} = 0;foreach (@{$::playersList->getItems()}) { next if (($_->{pos_to}{x} != $posx) || ($_->{pos_to}{y} != $posy));$::Macro::Data::varStack{cellIsFull} = 1; last;}

if ($cellIsFull == 1) goto loop
$mex = @arg ("$.pos", 1)
$mey = @arg ("$.pos", 2)
$herex = @eval ($mex + $posx)
$herey = @eval ($mey + $posy)
do sl 27 $herex $herey
pause 1.3
do warp $warpslot
pause 2
do warp veins
}
}

automacro four {
console /Anda mendapatkan 5.001 zeny./i
set repeat 1
call {
do chat leave
pause 1
do e thx
#do sp 28 "$.lastMatch1" 10
#pause 0.2
#skill blessing 
#do sp 34 "$.lastMatch1" 10
#skill increase agi
#pause 1
#do sp 29 "$.lastMatch1" 10
do c @random ("Terima kasih sudah menggunakan Jasa kami, Tolong Jangan Berdiri Diarea WARP!!")
do e thx
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$i = @player($namaPlayer)
$warpslot = 1

:loop
$posx = @rand (1,4)
$posy = @rand (1,4)
$cellIsFull = 0

do eval $::Macro::Data::varStack{cellIsFull} = 0;foreach (@{$::playersList->getItems()}) { next if (($_->{pos_to}{x} != $posx) || ($_->{pos_to}{y} != $posy));$::Macro::Data::varStack{cellIsFull} = 1; last;}

if ($cellIsFull == 1) goto loop
$mex = @arg ("$.pos", 1)
$mey = @arg ("$.pos", 2)
$herex = @eval ($mex + $posx)
$herey = @eval ($mey + $posy)
do sl 27 $herex $herey
pause 1.3
do warp $warpslot
pause 2
do warp ve_fild03
}
console /Skill Warp Portal gagal (Kebutuhan)./i
set repeat 1
call {
do c @random ("PLIS DEH, GADA ULANGAN LAGI KALO GAGAL")
do e thx
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$i = @player($namaPlayer)
$warpslot = 1

:loop
$posx = @rand (1,4)
$posy = @rand (1,4)
$cellIsFull = 0

do eval $::Macro::Data::varStack{cellIsFull} = 0;foreach (@{$::playersList->getItems()}) { next if (($_->{pos_to}{x} != $posx) || ($_->{pos_to}{y} != $posy));$::Macro::Data::varStack{cellIsFull} = 1; last;}

if ($cellIsFull == 1) goto loop
$mex = @arg ("$.pos", 1)
$mey = @arg ("$.pos", 2)
$herex = @eval ($mex + $posx)
$herey = @eval ($mey + $posy)
do sl 27 $herex $herey
pause 1.3
do warp $warpslot
pause 2
do warp ve_fild03
}

}

automacro five {
console /Anda mendapatkan 5.002 zeny./i
set repeat 1
call {
do chat leave
pause 1
do e thx
#do sp 28 "$.lastMatch1" 10
#pause 0.2
#skill blessing
#do sp 34 "$.lastMatch1" 10
#skill increase agi
#pause 1
#do sp 29 "$.lastMatch1" 10
do c @random ("Terima kasih sudah menggunakan Jasa kami, Tolong Jangan Berdiri Diarea WARP!!")
do e thx
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$i = @player($namaPlayer)
$warpslot = 2

:loop
$posx = @rand (1,4)
$posy = @rand (1,4)
$cellIsFull = 0

do eval $::Macro::Data::varStack{cellIsFull} = 0;foreach (@{$::playersList->getItems()}) { next if (($_->{pos_to}{x} != $posx) || ($_->{pos_to}{y} != $posy));$::Macro::Data::varStack{cellIsFull} = 1; last;}

if ($cellIsFull == 1) goto loop
$mex = @arg ("$.pos", 1)
$mey = @arg ("$.pos", 2)
$herex = @eval ($mex + $posx)
$herey = @eval ($mey + $posy)
do sl 27 $herex $herey
pause 1.3
do warp $warpslot
pause 2
do warp mosk_fild02
}
console /Skill Warp Portal gagal (Kebutuhan)./i
set repeat 1
call {
do c @random ("PLIS DEH, GADA ULANGAN LAGI KALO GAGAL")
do e thx
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$i = @player($namaPlayer)
$warpslot = 2

:loop
$posx = @rand (1,4)
$posy = @rand (1,4)
$cellIsFull = 0

do eval $::Macro::Data::varStack{cellIsFull} = 0;foreach (@{$::playersList->getItems()}) { next if (($_->{pos_to}{x} != $posx) || ($_->{pos_to}{y} != $posy));$::Macro::Data::varStack{cellIsFull} = 1; last;}

if ($cellIsFull == 1) goto loop
$mex = @arg ("$.pos", 1)
$mey = @arg ("$.pos", 2)
$herex = @eval ($mex + $posx)
$herey = @eval ($mey + $posy)
do sl 27 $herex $herey
pause 1.3
do warp $warpslot
pause 2
do warp mosk_fild02
}
}
 

ferry_gukguk

Gukguk Love Cat
Level 2
Kakak2 ada yang bisa bantu ga?
casenya gini:
saya mau nyediain jasa warp, macro yang saya dapet dari N3 dah jalan tapi kadang client warpnya suka buru2 dan berdiri di area warp, jadi gagal deh warpnya jadi saya pingin di buka warp ulang untuk itu. tapi sampe sekarang lom menemukan titik temu :(, berikut macro saya. mohon sedianya kakaq2 mengoreksi.

Terima kasih


Code:
automacro one {
console /Anda duduk./i
call {
do chat create "Veins 5000|TV 5001|Mosco 5002" 2 0 1111
}
}

automacro two {
console /(.*) \(level (\d+)\) Mengajukan Transaksi/i
call {
do pm "$.lastMatch1" Warp ke Veins 5.000 z
do pm "$.lastMatch1" Warp ke TV  5.001 z
do pm "$.lastMatch1" Warp ke Mosco 5.002 z
do pm "$.lastMatch1" Kesalahan/kegagalan Warp bukan tanggung jawab kami
}
}

automacro three {
console /Anda mendapatkan 5.000 zeny./i
set repeat 1
call {
do chat leave
pause 1
do e thx
#do sp 28 "$.lastMatch1" 10
#pause 0.2
#skill blessing
#do sp 34 "$.lastMatch1" 10
#skill increase agi
#pause 1
#do sp 29 "$.lastMatch1" 10
do c @random ("Terima kasih sudah menggunakan Jasa kami, Tolong Jangan Berdiri Diarea WARP!!")
do e thx
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$i = @player($namaPlayer)
$warpslot = 3

:loop
$posx = @rand (1,4)
$posy = @rand (1,4)
$cellIsFull = 0

do eval $::Macro::Data::varStack{cellIsFull} = 0;foreach (@{$::playersList->getItems()}) { next if (($_->{pos_to}{x} != $posx) || ($_->{pos_to}{y} != $posy));$::Macro::Data::varStack{cellIsFull} = 1; last;}

if ($cellIsFull == 1) goto loop
$mex = @arg ("$.pos", 1)
$mey = @arg ("$.pos", 2)
$herex = @eval ($mex + $posx)
$herey = @eval ($mey + $posy)
do sl 27 $herex $herey
pause 1.3
do warp $warpslot
pause 2
do warp veins
}
console /Skill Warp Portal gagal (Kebutuhan)./i
set repeat 1
call {
do c @random ("PLIS DEH, GADA ULANGAN LAGI KALO GAGAL")
do e thx
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$i = @player($namaPlayer)
$warpslot = 3

:loop
$posx = @rand (1,4)
$posy = @rand (1,4)
$cellIsFull = 0

do eval $::Macro::Data::varStack{cellIsFull} = 0;foreach (@{$::playersList->getItems()}) { next if (($_->{pos_to}{x} != $posx) || ($_->{pos_to}{y} != $posy));$::Macro::Data::varStack{cellIsFull} = 1; last;}

if ($cellIsFull == 1) goto loop
$mex = @arg ("$.pos", 1)
$mey = @arg ("$.pos", 2)
$herex = @eval ($mex + $posx)
$herey = @eval ($mey + $posy)
do sl 27 $herex $herey
pause 1.3
do warp $warpslot
pause 2
do warp veins
}
}

automacro four {
console /Anda mendapatkan 5.001 zeny./i
set repeat 1
call {
do chat leave
pause 1
do e thx
#do sp 28 "$.lastMatch1" 10
#pause 0.2
#skill blessing 
#do sp 34 "$.lastMatch1" 10
#skill increase agi
#pause 1
#do sp 29 "$.lastMatch1" 10
do c @random ("Terima kasih sudah menggunakan Jasa kami, Tolong Jangan Berdiri Diarea WARP!!")
do e thx
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$i = @player($namaPlayer)
$warpslot = 1

:loop
$posx = @rand (1,4)
$posy = @rand (1,4)
$cellIsFull = 0

do eval $::Macro::Data::varStack{cellIsFull} = 0;foreach (@{$::playersList->getItems()}) { next if (($_->{pos_to}{x} != $posx) || ($_->{pos_to}{y} != $posy));$::Macro::Data::varStack{cellIsFull} = 1; last;}

if ($cellIsFull == 1) goto loop
$mex = @arg ("$.pos", 1)
$mey = @arg ("$.pos", 2)
$herex = @eval ($mex + $posx)
$herey = @eval ($mey + $posy)
do sl 27 $herex $herey
pause 1.3
do warp $warpslot
pause 2
do warp ve_fild03
}
console /Skill Warp Portal gagal (Kebutuhan)./i
set repeat 1
call {
do c @random ("PLIS DEH, GADA ULANGAN LAGI KALO GAGAL")
do e thx
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$i = @player($namaPlayer)
$warpslot = 1

:loop
$posx = @rand (1,4)
$posy = @rand (1,4)
$cellIsFull = 0

do eval $::Macro::Data::varStack{cellIsFull} = 0;foreach (@{$::playersList->getItems()}) { next if (($_->{pos_to}{x} != $posx) || ($_->{pos_to}{y} != $posy));$::Macro::Data::varStack{cellIsFull} = 1; last;}

if ($cellIsFull == 1) goto loop
$mex = @arg ("$.pos", 1)
$mey = @arg ("$.pos", 2)
$herex = @eval ($mex + $posx)
$herey = @eval ($mey + $posy)
do sl 27 $herex $herey
pause 1.3
do warp $warpslot
pause 2
do warp ve_fild03
}

}

automacro five {
console /Anda mendapatkan 5.002 zeny./i
set repeat 1
call {
do chat leave
pause 1
do e thx
#do sp 28 "$.lastMatch1" 10
#pause 0.2
#skill blessing
#do sp 34 "$.lastMatch1" 10
#skill increase agi
#pause 1
#do sp 29 "$.lastMatch1" 10
do c @random ("Terima kasih sudah menggunakan Jasa kami, Tolong Jangan Berdiri Diarea WARP!!")
do e thx
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$i = @player($namaPlayer)
$warpslot = 2

:loop
$posx = @rand (1,4)
$posy = @rand (1,4)
$cellIsFull = 0

do eval $::Macro::Data::varStack{cellIsFull} = 0;foreach (@{$::playersList->getItems()}) { next if (($_->{pos_to}{x} != $posx) || ($_->{pos_to}{y} != $posy));$::Macro::Data::varStack{cellIsFull} = 1; last;}

if ($cellIsFull == 1) goto loop
$mex = @arg ("$.pos", 1)
$mey = @arg ("$.pos", 2)
$herex = @eval ($mex + $posx)
$herey = @eval ($mey + $posy)
do sl 27 $herex $herey
pause 1.3
do warp $warpslot
pause 2
do warp mosk_fild02
}
console /Skill Warp Portal gagal (Kebutuhan)./i
set repeat 1
call {
do c @random ("PLIS DEH, GADA ULANGAN LAGI KALO GAGAL")
do e thx
$distance = $.lastMatch2
$namaPlayer = $.lastMatch3
$playerID = $.lastMatch4
$i = @player($namaPlayer)
$warpslot = 2

:loop
$posx = @rand (1,4)
$posy = @rand (1,4)
$cellIsFull = 0

do eval $::Macro::Data::varStack{cellIsFull} = 0;foreach (@{$::playersList->getItems()}) { next if (($_->{pos_to}{x} != $posx) || ($_->{pos_to}{y} != $posy));$::Macro::Data::varStack{cellIsFull} = 1; last;}

if ($cellIsFull == 1) goto loop
$mex = @arg ("$.pos", 1)
$mey = @arg ("$.pos", 2)
$herex = @eval ($mex + $posx)
$herey = @eval ($mey + $posy)
do sl 27 $herex $herey
pause 1.3
do warp $warpslot
pause 2
do warp mosk_fild02
}
}
itu tinggal kamu trigger console aja..
kalo warp failed, maka buka ulang portal sebanyak settingan retry portal di macros kamu..
 
Top