home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS 1992 June / SIMTEL_0692.cdr / msdos / telix / ezdial10.arc / PCPBBS.SLT < prev    next >
Encoding:
Text File  |  1988-07-06  |  1.0 KB  |  57 lines
  1. str code1[] = "C PURSUIT,XXXXXXXX^M"; // Replace the X's with your User ID
  2. str code2[] = "YYYYYYYY^M";           // Replace the Y's with your Password
  3. str cr[] = "^M";
  4.  
  5. main()
  6. {
  7.  
  8. int status, t1, t2, t3, t4, t5, t6;
  9. t1 = track("@",1);
  10. t2 = track("PASSWORD = ",1);
  11. t3 = track("CONNECTED",1);
  12. t4 = track("BUSY",1);
  13. t5 = track("UNRECOGNIZED",1);
  14. t6 = track("NOT OPERATING",1);
  15.  
  16. cputs(cr);
  17.  
  18. while (1)
  19.   {
  20.    terminal();
  21.  
  22.    status = track_hit(0);
  23.  
  24.     if (status == t1)
  25.        cputs(code1);
  26.  
  27.     if (status == t2)
  28.        cputs(code2);
  29.  
  30.     if (status == t3)
  31.        break;
  32.  
  33.     if (status == t4)
  34.        continue;
  35.  
  36.     if (status == t5)
  37.        {
  38.        clear_scr();
  39.        prints("Error dialing City. Press F9 for the City menu.");
  40.        break;
  41.        }
  42.  
  43.     if (status == t6)
  44.        {
  45.        clear_scr();
  46.        prints("Error dialing City. It is not operating. Press F9");
  47.        break;
  48.        }
  49.  
  50.   }
  51. track_free(t1);
  52. track_free(t2);
  53. track_free(t3);
  54. track_free(t4);
  55. track_free(t5);
  56. }
  57.