{$CLEO}
0000:
:samp_aveblyad
wait 0
samp.Available()
jf @samp_aveblyad

var
2@ : string
3@ : string
end
repeat
wait 0
:findtext
alloc 0@ 64
alloc 1@ 256
SAMP.GetChatString(99, 1@, 0, 0, 0)
if
0AD4: 0@ = scan_string 1@ format "Администратор %s забанил игрока %s" 2@ 3@
then
free 0@
free 1@
jump @active
else
jump @findtext
end
until false

:active
wait 0
chatmsg "Active admin %s banned %s" 0xFFFFFFFF 2@ 3@

:repeater
wait 0
jump @repeater