Wacth & Learn

Kamis, 22 Juli 2010

Macro FCP

automacro paket {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (f|fcp|FCP)$/
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 paket
$guild1 = Watch N Learn
$guild2 = Howling Corp
$guild3 = - Watch & Learn -
$guild4 = Cest La Vie
$player1 = Howling I

if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
if ($playerguild == $guild3) goto oke
if ($playerguild == $guild4) goto oke
if ($namaPlayer == $player1) goto oke
goto lain

:oke

if ($distance > 2 ) goto jauh

do sp 479 $playerID 5

goto end

:jauh
do e com

goto end
:lain
do c Cuma Untuk Orang Normal...

:end

release paket
}
}

automacro sp {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (fcp|FCP)$/
sp < 10%
exclusive 1
run-once 1
call kering
}

macro kering {
do c sabar all sp ku tinggal $.sp
pause 0.2
release sp
}

Macro Dancer Service

automacro paket {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (se|e)$/
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 paket
$guild1 = Watch N Learn
$guild2 = Howling Corp
$guild3 = - Watch & Learn -
$guild4 = Cest La Vie
$player1 = Howling Sayang Dia

if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
if ($playerguild == $guild3) goto oke
if ($playerguild == $guild4) goto oke
if ($namaPlayer == $player1) goto oke
goto lain

:oke

if ($distance > 10 ) goto jauh

do ss 330 10
delay 180
do ss 304

goto end

:jauh
do e com

goto end
:lain
do c Cuma Untuk Orang Normal...

:end

release paket
}
}

automacro sp {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (\*Flag\s\d\*|e|se)$/
sp < 10%
exclusive 1
run-once 1
call kering
}

macro kering {
do c sabar all sp ku tinggal $.sp
pause 0.2
release sp
}