Function: CheckUser:boolean;
Begin
$User =;
$Status =;
If ($User != KKK) then
 ($Status == Noob) else
 ($Status == Pro);
end;

Begin
repeat
CheckUser;
until($Status = Invisible);
end.