#Macro Paket Guild (Bless, Agi dan Kyrie)
automacro paketlol {
console /\[dist=(.*)\] (.*) \((\d+)\): (\\s\d\*|paket|lol|)$/
run-once 1
call {
$distance = $.lastMatch1
$namaPlayer = $.lastMatch2
$playerID = $.lastMatch3
$playerguild = @eval (exists $::players{$::playersID[$playerID]}->{guild} ? $::players{$::playersID[$playerID]}->{guild}{name} : 'null')
#Nama guild yg mau di paketlol
$guild1 = ¤ Legend of Light ¤
$guild2 = —¤ GraZelle ¤—
$guild3 = ¤ Legend of Light ¤
if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
if ($playerguild == $guild3) goto oke
goto lain
:oke
if ($distance > 10) goto jauh
#blessing
do sp 34 $playerID 10
pause 0.5
#inc. agi
do sp 29 $playerID 10
#kyrie
pause 2
do sp 73 $playerID 10
goto end
:jauh
do c deketan $namaPlayer jgn jauh2 klo minta Paket !!
goto end
:lain
do e ??
:end
release paketlol
}
}
#Macro Warper Guild
automacro aru {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (\*\s\d\*|a1|aruna)$/
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')
#Nama guild yg mau di warp
$guild1 = - Legend of Light -
$guild2 = - LoL Support -
$guild3 = —¤ GraZelle ¤—
$guild4 = ¤ Legend of Light ¤
if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
if ($playerguild == $guild3) goto oke
if ($playerguild == $guild4) goto oke
goto lain
:oke
#skill aru
do c Aru 1 Gate Opened !!
$x = @arg("$.pos", 1)
$y = @arg("$.pos", 2)
$x0 = @eval($x + @rand(1,2))
$x1 = @eval($x - @rand(1,2))
$y0 = @eval($y - @rand(1,2))
$x2 = @random("$x0", "$x1")
do sl 27 256 109
pause 2
do warp 1
pause 0.2
goto end
:lain
do e ??
:end
release aru
}
}
automacro sch {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (\*\s\d\*|s1|swaz)$/
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')
#Nama guild yg mau di warp
$guild1 = - Legend of Light -
$guild2 = - LoL Support -
$guild3 = —¤ GraZelle ¤—
$guild4 = ¤ Legend of Light ¤
if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
if ($playerguild == $guild3) goto oke
if ($playerguild == $guild4) goto oke
goto lain
:oke
#skill sch
do c Sch 1 Gate Opened !!
$x = @arg("$.pos", 1)
$y = @arg("$.pos", 2)
$x0 = @eval($x + @rand(1,2))
$x1 = @eval($x - @rand(1,2))
$y0 = @eval($y - @rand(1,2))
$x2 = @random("$x0", "$x1")
do sl 27 256 109
pause 2
do warp 2
pause 0.2
goto end
:lain
do e ??
:end
release sch
}
}
automacro luina {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (\*\s\d\*|l1|luina)$/
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')
#Nama guild yg mau di warp
$guild1 = - Legend of Light -
$guild2 = - LoL Support -
$guild3 = —¤ GraZelle ¤—
$guild4 = ¤ Legend of Light ¤
if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
if ($playerguild == $guild3) goto oke
if ($playerguild == $guild4) goto oke
goto lain
:oke
#skill luina
do c Luina 1 Gate Opened !!
$x = @arg("$.pos", 1)
$y = @arg("$.pos", 2)
$x0 = @eval($x + @rand(1,2))
$x1 = @eval($x - @rand(1,2))
$y0 = @eval($y - @rand(1,2))
$x2 = @random("$x0", "$x1")
do sl 27 256 109
pause 2
do warp 3
pause 0.2
goto end
:lain
do e ??
:end
release luina
}
}
#untuk warpernya tinggal diedit2 aja namanya sesuai yang di memo,
#jangan lupa location cast nya diedit (kode map xxx yyy) biar ga tabrakan ama warper lain
#warper ini menggunakan format UTF-8