automacro createPub {
console /^Your Coordinates: /i
exclusive 1
delay 2
call {
$chatroomname = Flag = Fullbuffs | HP = Heal
do chat create "$chatroomname"
}
}

automacro sampleGuildBuffer {
console /\[dist=(.*)\] (.*) \((\d+)\): \*(.*)\*$/i
exclusive 1
call {
$dist = $.lastMatch1
$name = $.lastMatch2
$index = $.lastMatch3
$emo = $.lastMatch4

if (checkGuild("$index")) goto guild
goto end

:guild
if ($dist > 8) goto outOfRange
if ($emo == Flag 3) goto buffs
if ($emo == Help) goto heal
goto end

:outOfRange
do e e9
goto end

:heal
do chat leave
do sp 28 $index #heal
pause 2
do sp 28 $index #heal
pause 2
do sp 28 $index #heal
goto pub

:buffs
do chat leave
do sp 34 $index #blessing
do sp 29 $index #agi up
pause 4
do sp 361 $index #assumptio
pause 5
do sp 66 $index #impositio
goto pub

:pub
do chat create "$chatroomname"
do e e29
goto end

:end
}
}

sub checkGuild {
my $index = shift;
my $quild = $players{$playersID[$index]}->{guild} ? $players{$playersID[$index]}->{guild}{name} : "none";
if ($quild =~ /soulless/i || ($config{guild} && existsInList($config{guild}, $quild))) {
return 1
}
return 0
}