home *** CD-ROM | disk | FTP | other *** search
/ Jason Aller Floppy Collection / 147.img / NETMAL46.ZIP / SCRIPTS.ZIP / TELIX.SLT < prev   
Encoding:
Text File  |  1989-04-19  |  2.2 KB  |  93 lines
  1. // This is a sample TELIX script file for automating your NetMail transfers.
  2. //
  3. // General Notes.  You should enter your Hub BBS in your Telix Dialing
  4. // directory.  If it is a multi node system, enter all numbers if you
  5. // wish.  Also enter your logon password in your Telix Dialing
  6. // Directory.  Set Telix up to Autodownload with Zmodem.  Also, this
  7. // script will compile smaller and run faster if you remove all the
  8. // blank lines and comment lines.  (Lines that start with //)
  9.  
  10. str user_name[] = "Your Name ";    //Put your name in the quotes
  11. main()
  12. {
  13.  int stat;
  14.  int t1,
  15.      t2,
  16.      t3,
  17.      t4,
  18.      t5,
  19.      t6;
  20.  int tmark;
  21.  dial ("11 12", 0);         //11 and 12 represent the TELIX.FON entries.
  22.                             //If your hub only has one number, only use
  23.                             //one entry.
  24.  
  25.  if (not _entry_pass)
  26.   {
  27.    prints ("Sorry, I don't know the password for this BBS!");
  28.    return;
  29.   }
  30.  t1 = track("graphics (Enter)=no?", 1);
  31.  t2 = track(" name?", 1);
  32.  t3 = track("will echo)?", 1);
  33.  t4 = track("Press (Enter) to continue?", 1);
  34.  t5 = track(" (Enter)=yes?", 1);
  35.  t6 = track("Command?", 1);
  36.  tmark = timer_start(5000);
  37.  while (not time_up(tmark))
  38.   {
  39.    terminal();
  40.    stat = track_hit(0);
  41.    if (stat == t1)
  42.     {
  43.      delay(5);
  44.      cputs("n q ns");
  45.      cputs("^M");
  46.     }
  47.    else if (stat == t2)
  48.     {
  49.      delay(2);
  50.      cputs(user_name);
  51.      cputs("^M");
  52.     }
  53.    else if (stat == t3)
  54.     {
  55.      delay(2);
  56.      cputs(_entry_pass);
  57.      cputs("^M");
  58.     }
  59.    else if (stat == t4)
  60.     {
  61.      delay(5);
  62.      cputs("^M");
  63.     }
  64.      else if (stat == t5)
  65.       {
  66.        delay(5);
  67.        cputs("N^M");
  68.       }
  69.    else if (stat == t6)
  70.     {
  71.     delay(15);
  72.     cputs("DOOR 17^M");               //Change DOOR 17 to the NetDoor
  73.                                       //Number on your Hub.
  74.   
  75.     delay(15);
  76.     break;
  77.     }
  78.   }
  79.  if (time_up(1))
  80.   prints("Logon failed!");
  81.  timer_free(tmark);
  82.  track_free(0);
  83.  waitfor("receive...");
  84. delay(10);
  85. send('Z', "BBSID.OUT");           //Change BBSID.OUT to your BBS ID CODE
  86. delay(10);
  87.  waitfor("send...");
  88. delay(10);
  89. waitfor("Terminating door...");
  90. hangup();
  91. exittelix(0, 1);
  92. }
  93.