home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS 1992 June / SIMTEL_0692.cdr / msdos / telix / telicex.arc / NBBS24.SLT < prev    next >
Text File  |  1988-09-12  |  444b  |  30 lines
  1. //
  2. //Script to log on to Telenet's local access number and call
  3. //                    Net BBS at 2400BPS
  4. //
  5.  
  6. str T_ID[] = "D1";
  7. str cr[] = "^M";
  8.  
  9. main()
  10. {
  11.  alarm(2);
  12.  {
  13.  cputs_tr("@~D~^M~~");
  14.  
  15.  }
  16.    cputs(T_ID);
  17.    cputs("^M");
  18.  if (not waitfor("@", 20))
  19.   {
  20.    prints("Log-on failed!");
  21.    return;
  22.   }
  23.    cputs("909631");
  24.    cputs("^M");
  25.  if (waitfor("CONNECTED"))
  26.    delay(20);
  27.    cputs("bbs");
  28.    cputs("^M");
  29. }
  30.