rendered paste bodybegin
inherited;
FHandled := true;
case Number of
20: begin None; end; // IRC: You are connected to RusNet. Please wait...
1..5:begin None; end; // information by server
222: begin None; end; // Codepage: Your codepage is now CP1251
251: begin None; end; // RPL_LUSERCLIENT ":There are <integer> users and <integer> \ invisible on <integer> servers"
252: begin None; end; // RPL_LUSEROP "<integer> :operator(s) online"
253: begin None; end; // RPL_LUSERUNKNOWN "<integer> :unknown connection(s)"
254: begin None; end; // RPL_LUSERCHANNELS "<integer> :channels formed"
255: begin None; end; // RPL_LUSERME :I have <integer> clients and <integer> \ ervers"
265: begin None; end; // Current local users: 126 Max: 149
266: begin None; end; // Current global users: 8670 Max: 11334
324: begin None; end; // RPL_CHANNELMODEIS "<channel> <mode> <mode params>"
331: begin None; end; // RPL_NOTOPIC "<channel> :No topic is set"
332: begin None; end; // RPL_TOPIC "<channel> :<topic>"
333: begin None; end; // TheBot #holywar 0
353: begin None; end; // RPL_NAMREPLY "<channel> :[[@|+]<nick> [[@|+]<nick> [...]]]"
366: begin None; end; // RPL_ENDOFNAMES "<channel> :End of /NAMES list"
367: begin None; end; // RPL_BANLIST "<channel> <banid>"
368: begin None; end; // RPL_ENDOFBANLIST
375: begin None; end; // RPL_MOTDSTART ":- <server> Message of the day - "
372: begin None; end; // RPL_MOTD ":- <text>"
376: begin FAnswer := FAnswer + LoginToIrc; end; // RPL_ENDOFMOTD ":End of /MOTD command" после этого логинмся
421: Log(['Error. ERR_UNKNOWNCOMMAND: ' + Msg + CRLF], Settings.MainLogFile); // ERR_UNKNOWNCOMMAND
432: begin None; end; // ERR_ERRONEUSNICKNAME
433: FAnswer := FAnswer + ChangeNick; // ERR_NICKNAMEINUSE ':irc.perm.ru 433 * TheBot :Nickname is already in use.'#$D#$A
441: begin None; end; // ERR_USERNOTINCHANNEL
442: begin None; end; // ERR_NOTONCHANNEL
443: begin None; end; // ERR_USERONCHANNEL
451: begin None; end; // :You have not registered
471: begin None; end; // ERR_CHANNELISFULL "<channel> :Cannot join channel (+l)"
473: begin None; end; // ERR_INVITEONLYCHAN "<channel> :Cannot join channel (+i)"
474: begin None; end; // ERR_BANNEDFROMCHAN "<channel> :Cannot join channel (+b)"
475: begin None; end; // ERR_BADCHANNELKEY "<channel> :Cannot join channel (+k)"
481: begin None; end; // ERR_NOPRIVILEGES ":Permission Denied- You're not an IRC operator"
482: begin None; end; // ERR_CHANOPRIVSNEEDED "<channel> :You're not channel operator"
else FHandled := false;
end;
{ Log([Nick + ' change nick to ' + NewNick + CRLF], Settings.LogDirectory + Channel + '.' + GetDate + '.txt');
id := UserChnNick(Nick, NewNick, User, Host, Settings.IRCNetWork, Settings.MainLogFile);
if id <= 0 then
begin
ErrorMsg := GetLastBaseError(id, Settings.MainLogFile);
Log(['Error. Adding to base logs ' + ErrorMsg + '.' + CRLF], Settings.MainLogFile)
end;}
end;