Advertisement
Guest User

Untitled

a guest
May 24th, 2019
79
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 0.56 KB | None | 0 0
  1. automacro coat {
  2.     console /\[dist=(.*)\] (.*) \((\d+)\): (\*Flag\s\d\*|coat)$/
  3.     run-once 1
  4.    
  5.     call {
  6.         $distance = $.lastMatch1
  7.         $namaPlayer = $.lastMatch2
  8.         $playerID = $.lastMatch3
  9.         $playerguild = @eval (exists $::players{$::playersID[$playerID]}->{guild} ? $::players{$::playersID[$playerID]}->{guild}{name} : 'null')
  10.         $guild1 = Guilda1
  11.         $guild2 = GuildWars2
  12.         if ($playerguild == $guild1) goto coat
  13.         if ($playerguild == $guild2) goto coat
  14.         goto no
  15.         :coat
  16.         do sp 479 $playerID 10
  17.         goto end
  18.         :no
  19.         goto end
  20.         :end
  21.         release coat
  22.     }
  23. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement