0 Members and 3 Guests are viewing this topic.
procedure workslikeacharm(team:byte; botname:string);var i:byte;begin i:=command('/addbot'+intToStr(team)+' '+botname); command('/kick '+intToStr(i));end;
Code: (pascal) [Select]procedure workslikeacharm(team:byte; botname:string);var i:byte;begin i:=command('/addbot'+intToStr(team)+' '+botname); command('/kick '+intToStr(i));end;
That's exactly how I'm doing it and it works fine for me. There must be something wrong with my friend's server but I can't figure what.
Kick() function is enough, no need to play with some string operations like in Command() case