Saturday, 8 June 2013

macro paket guild

ini macro bot paket guild yg bisa dipakai untuk memberi paket kepada guild tertentu di pvp atau pada saat woe. kira2 seperti ini isinya :
- memberi paket dengan cara mengibarkan bendera atau mengatakan paket, bisa di edit sesuai kbutuhan
- hanya memberi paket 1x kepada orang yang sama sampai org tersebut hilang dr layar dan muncul kembali atau paket org tersebut telah habis



penting sebelum menggunakan macro ini untuk mengedit statusnametable.txt yg berada di openkore/tables/
cari tulisan :


EFFECTSTATE_DRAGON Riding Dragon (Default)
EFFECTSTATE_WUG Support Warg
EFFECTSTATE_WUGRIDER Riding Warg
EFFECTSTATE_MADOGEAR Madogear
EFFECTSTATE_DRAGON2 Riding Dragon (Black)
EFFECTSTATE_DRAGON3 Riding Dragon (White)
EFFECTSTATE_DRAGON4 Riding Dragon (Blue)
EFFECTSTATE_DRAGON5 Riding Dragon (Red)

dan ganti menjadi :

EFFECTSTATE_DRAGON Riding Dragon
EFFECTSTATE_WUG Support Warg
EFFECTSTATE_WUGRIDER Riding Warg
EFFECTSTATE_MADOGEAR Madogear
EFFECTSTATE_DRAGON2 Riding Dragon
EFFECTSTATE_DRAGON3 Riding Dragon
EFFECTSTATE_DRAGON4 Riding Dragon
EFFECTSTATE_DRAGON5 Riding Dragon

karena akan menyebabkan error saat dia membaca status RK yg sedang menaiki naga!


untuk edit silahkan dibaca penjelasan dibagian bertanda #### untuk penjelasan lebih rinci untuk mengeditnya

########################### JASA PAKET GUILD V.1.0 ###########################
######################## by "Naya" char fnc : amelo , gtx260 ########################
############################# rebirth : naya. , amelo` ##############################
############################ tested at prontera rebirth #############################

#### sebelum menggunakan macro ini pastikan confignya diatur seperti ini ####
#### dealAuto 1
#### itemsTakeAuto 0
#### itemsTakeAuto_party 0
#### itemsGatherAuto 0
####

#### kata2 setelah location adalah nama map tempat bot berada ####
#### kata2 setelah look adalah arah bot ####
#### format penulisan adalah "look (no arah badan) (no arah kepala) ####

automacro arah {
location ein_in01
run-once 1
call {
do look 4 0
}
}

#### kata2 setelah location bisa diganti menjadi koordinat tempat menaruh warper ####
#### jangan lupa mengganti koordinat setelah kata move menjadi koordinat tempat ingin menaruh paketer
####

automacro posisi {
location not ein_in01 270 229
run-once 1
call {
do move 270 229
release all
}
}

#### jika ingin mengganti trigger menjadi kata2 ubah \*Flag\s\d\* menjadi kata2 yg diinginkan ####
#### $guild = • Renaissance™ • adalah nama guildnya, silahkan mengganti sesuai kebutuhan
#### nama $guild1 bisa diganti dan ditambah, jika menambah, jangan lupa tambahkan pada fungsi if ####

automacro paket {
priority 1
console /^\[dist=(.*)\] (.*) \((\d+)\): \*Flag\s\d\*$/
sp >= 15%
exclusive 1
run-once 1
call {

$distance = $.lastMatch1
$nama = $.lastMatch2
$playerID = $.lastMatch3
$stat = @eval ($::players{$::playersID[$playerID]}->statusesString)
$playerguild = @eval (exists $::players{$::playersID[$playerID]}->{guild} ? $::players{$::playersID[$playerID]}->{guild}{name} : 'null')

$guild1 = • Renaissance™ •

if ($playerguild == $guild1) goto sip
goto end

:sip
if ($distance > 5) goto end

if ($stat =~ /Hiding|Cloaking|Chase Walk/i) goto hide
if ($stat =~ /Blessing/i && $stat =~ /Increase Agility/i) goto udah
if ($stat =~ /Increase Agility/i) goto bless
if ($stat =~ /Blessing/i) goto agi
goto paket
:bless
$b = 1
:agi
$a = 1
:paket
do c $nama semangat ya! hati2
if ($a = 1) goto ag
do sp 34 @player($nama) 10
if ($b = 1) goto end
:ag
pause 0.5
do sp 29 @player($nama) 10
goto end

:hide
do c $nama mau dipaket ga sih? ngapain hide coba?
goto end

:udah
do c $nama gantian dong, kan bukan kamu doang yg mau dipaket
goto end

:end
$a = 0
$b = 0
release all
}
}

automacro paketabis {
priority 1
console /\[dist=(.*)\] (.*) \((\d+)\): \*Flag\s\d\*$/
sp < 15%
exclusive 1
run-once 1
call {

do c spku abiss
do e wah
pause 1
do c sabar ya
release all
}
}

paketnya bisa diedit menjadi seperti dibawah ini :

jika ingin memakai paket som dr dancer, ganti automacro menjadi ini :


automacro paket {
priority 1
console /^\[dist=(.*)\] (.*) \((\d+)\): som$/
sp >= 15%
exclusive 1
run-once 1
call {

$distance = $.lastMatch1
$nama = $.lastMatch2
$playerID = $.lastMatch3
$stat = @eval ($::players{$::playersID[$playerID]}->statusesString)
$playerguild = @eval (exists $::players{$::playersID[$playerID]}->{guild} ? $::players{$::playersID[$playerID]}->{guild}{name} : 'null')

$guild1 = • Renaissance™ •

if ($playerguild == $guild1) goto sip
goto end

:sip
if ($distance > 5) goto end
if ($stat =~ /Hiding|Cloaking|Chase Walk/i) goto hide
if ($stat =~ /Gloomy Day/i) goto udah
goto paket

:paket

do c $nama semangat ya! hati2
do sp 2425 @player($nama) 5
goto end

:hide
do c $nama mau dipaket ga sih? ngapain hide coba?
goto end

:udah
do c $nama gantian dong, kan bukan kamu doang yg mau dipaket
goto end

:end
release all
}
}

automacro paketabis {
priority 1
console /\[dist=(.*)\] (.*) \((\d+)\): som$/
sp < 15%
exclusive 1
run-once 1
call {

do c spku abiss
do e wah
pause 1
do c sabar ya
release all
}
}


jika ingin memberi paket sacrament, ganti menjadi ini :


automacro paket {
priority 1
console /^\[dist=(.*)\] (.*) \((\d+)\): \*Flag\s\d\*$/
sp >= 15%
exclusive 1
run-once 1
call {

$distance = $.lastMatch1
$nama = $.lastMatch2
$playerID = $.lastMatch3
$stat = @eval ($::players{$::playersID[$playerID]}->statusesString)
$playerguild = @eval (exists $::players{$::playersID[$playerID]}->{guild} ? $::players{$::playersID[$playerID]}->{guild}{name} : 'null')

$guild1 = • Renaissance™ •

if ($playerguild == $guild1) goto sip
goto end

:sip
if ($distance > 5) goto end
if ($stat =~ /Hiding|Cloaking|Chase Walk/i) goto hide
if ($stat =~ /Sacrament/i) goto udah
goto paket

:paket
do c $nama semangat ya! hati2
do sp 2515 @player($nama) 5
goto end

:hide
do c $nama mau dipaket ga sih? ngapain hide coba?
goto end

:udah
do c $nama gantian dong, kan bukan kamu doang yg mau dipaket
goto end

:end
release all
}
}

automacro paketabis {
priority 1
console /\[dist=(.*)\] (.*) \((\d+)\): \*Flag\s\d\*$/
sp < 15%
exclusive 1
run-once 1
call {

do c spku abiss
do e wah
pause 1
do c sabar ya
release all
}
}

jika ingin menggunakan paket gentle touch revitalize dr shura ganti menjadi ini :

automacro paket {
priority 1
console /^\[dist=(.*)\] (.*) \((\d+)\): \*Flag\s\d\*$/
sp >= 15%
exclusive 1
run-once 1
call {

$distance = $.lastMatch1
$nama = $.lastMatch2
$playerID = $.lastMatch3
$stat = @eval ($::players{$::playersID[$playerID]}->statusesString)
$playerguild = @eval (exists $::players{$::playersID[$playerID]}->{guild} ? $::players{$::playersID[$playerID]}->{guild}{name} : 'null')

$guild1 = • Renaissance™ •

if ($playerguild == $guild1) goto sip
goto end

:sip
if ($distance > 5) goto end
if ($stat =~ /Hiding|Cloaking|Chase Walk/i) goto hide
if ($stat =~ /Revitalize/i) goto udah
goto paket

:paket
do c $nama semangat ya! hati2
do sp 2348 @player($nama) 5
goto end

:hide
do c $nama mau dipaket ga sih? ngapain hide coba?
goto end

:udah
do c $nama gantian dong, kan bukan kamu doang yg mau dipaket
goto end

:end
release all
}
}

automacro paketabis {
priority 1
console /\[dist=(.*)\] (.*) \((\d+)\): \*Flag\s\d\*$/
sp < 15%
exclusive 1
run-once 1
call {

do c spku abiss
do e wah
pause 1
do c sabar ya
release all
}
}

jika ingin mengganti paket menjadi assumptio ubah menjadi ini :

automacro paket {
priority 1
console /^\[dist=(.*)\] (.*) \((\d+)\): \*Flag\s\d\*$/
sp >= 15%
exclusive 1
run-once 1
call {

$distance = $.lastMatch1
$nama = $.lastMatch2
$playerID = $.lastMatch3
$stat = @eval ($::players{$::playersID[$playerID]}->statusesString)
$playerguild = @eval (exists $::players{$::playersID[$playerID]}->{guild} ? $::players{$::playersID[$playerID]}->{guild}{name} : 'null')

$guild1 = • Renaissance™ •

if ($playerguild == $guild1) goto sip
goto end

:sip
if ($distance > 5) goto end
if ($stat =~ /Hiding|Cloaking|Chase Walk/i) goto hide
if ($stat =~ /Assumptio/i) goto udah
goto paket

:paket
do c $nama semangat ya! hati2
do sp 361 @player($nama) 5
goto end

:hide
do c $nama mau dipaket ga sih? ngapain hide coba?
goto end

:udah
do c $nama gantian dong, kan bukan kamu doang yg mau dipaket
goto end

:end
release all
}
}

automacro paketabis {
priority 1
console /\[dist=(.*)\] (.*) \((\d+)\): \*Flag\s\d\*$/
sp < 15%
exclusive 1
run-once 1
call {

do c spku abiss
do e wah
pause 1
do c sabar ya
release all
}
}

No comments:

Post a Comment