{$CLEO}
{$INCLUDE SF}
0000:
repeat
wait 0
until samp.Available()
chatmsg "TagRemover by gumball3000" -1
0B34: samp register_client_command "removetag" to_label @gumball_123
while true
wait 0
end
:gumball_123
alloc 0@ 256
alloc 1@ 256
format 0@ "gumball3000[TAG]"
format 1@ "[TAG]"
0AB1: @removeTag 2 0@ 1@ 2@
chatmsg "%s" -1 2@
0C11: memset destination 0@ value 0 size 256
format 0@ "[TAG]gumball3000"
0AB1: @removeTag 2 0@ 1@ 2@
chatmsg "%s" -1 2@
free 0@
free 1@
samp.CmdRet()
:removeTag
{0@ - name
1@ - tag}
alloc 2@ 256
0C17: 3@ = strlen 0@
0C10: memcpy destination 2@ source 0@ size 3@
if
0C18: $NOT_STRING = strstr string1 2@ string2 1@
then
2@++
0C17: 4@ = strlen 1@
if
0C18: $NOT_STRING = strstr string1 2@ string2 1@
then
0062: 3@ -= 4@
0C0D: struct 0@ offset 3@ size 1 = 0
else
005A: 0@ += 4@
end
end
free 2@
0AB2: 1 0@