home *** CD-ROM | disk | FTP | other *** search
/ Computerworld 1996 March / Computerworld_1996-03_cd.bin / idg_cd3 / aplikace / komunika / telixwin / tfw.5 / SETUP.SLT < prev    next >
Text File  |  1995-07-28  |  6KB  |  346 lines
  1. /****************************************************************/
  2. /*                                                              */
  3. /*  Demo of how to alter many of the configuration options of   */
  4. /*  TFW from a SALT script.  This one needs few comments.       */
  5. /*                                                              */
  6. /*                   Copyright 1995 deltaComm Development, Inc. */
  7. /*                                                              */
  8. /****************************************************************/
  9.  
  10. main()
  11. {
  12.  str ss[80];                                // variable declarations
  13.  int cc;
  14.  
  15.  prints();
  16.  prints("Just press <enter> for no change.");
  17.  
  18.  prints();
  19.  printsc("Image File name: ");
  20.  gets(ss);
  21.  if (ss !="")
  22.    _image_file=ss;
  23.  
  24.  prints();
  25.  printsc("Capture File name: ");
  26.  gets(ss);
  27.  if (ss !="")
  28.    _capture_fname=ss;
  29.  
  30.  prints();
  31.  printsc("Usage Log File name: ");
  32.  gets(ss);
  33.  if (ss !="")
  34.    _usage_fname=ss;
  35.  
  36.  prints();
  37.  printsc("Dialing Prefix 1: ");
  38.  gets(ss);
  39.  if (ss !="")
  40.    _dialpref=ss;
  41.  
  42.  prints();
  43.  printsc("Dialing Prefix 2: ");
  44.  gets(ss);
  45.  if (ss !="")
  46.    _dialpref2=ss;
  47.  
  48.  prints();
  49.  printsc("Dialing Prefix 3: ");
  50.  gets(ss);
  51.  if (ss !="")
  52.    _dialpref3=ss;
  53.  
  54.  prints();
  55.  printsc("Dialing Suffix: ");
  56.  gets(ss);
  57.  if (ss !="")
  58.    _dialpost=ss;
  59.  
  60.  prints();
  61.  printsc("Stop Dialing String: ");
  62.  gets(ss);
  63.  if (ss !="")
  64.    _redial_stop=ss;
  65.  
  66.  prints();
  67.  printsc("Telix Directory: ");
  68.  gets(ss);
  69.  if (ss !="")
  70.    _telix_dir=ss;
  71.  
  72.  prints();
  73.  printsc("Script Directory: ");
  74.  gets(ss);
  75.  if (ss !="")
  76.    _script_dir=ss;
  77.  
  78.  prints();
  79.  printsc("Modem Answer String: ");
  80.  gets(ss);
  81.  if (ss !="")
  82.    _auto_ans_str=ss;
  83.  
  84.  prints();
  85.  printsc("Modem Hangup String: ");
  86.  gets(ss);
  87.  if (ss !="")
  88.    _mdm_hang_str=ss;
  89.  
  90.  prints();
  91.  printsc("Modem Connect String: ");
  92.  gets(ss);
  93.  if (ss !="")
  94.    _connect_str=ss;
  95.  
  96.  prints();
  97.  printsc("Modem Init String: ");
  98.  gets(ss);
  99.  if (ss !="")
  100.    _mdm_init_str=ss;
  101.  
  102.  prints();
  103.  printsc("No Connect String 1: ");
  104.  gets(ss);
  105.  if (ss !="")
  106.    _no_connect1=ss;
  107.  
  108.  prints();
  109.  printsc("No Connect String 2: ");
  110.  gets(ss);
  111.  if (ss !="")
  112.    _no_connect2=ss;
  113.  
  114.  prints();
  115.  printsc("No Connect String 3: ");
  116.  gets(ss);
  117.  if (ss !="")
  118.    _no_connect3=ss;
  119.  
  120.  prints();
  121.  printsc("No Connect String 4: ");
  122.  gets(ss);
  123.  if (ss !="")
  124.    _no_connect3=ss;
  125.  
  126.  prints();
  127.  printsc("Answer back String: ");
  128.  gets(ss);
  129.  if (ss !="")
  130.    _answerback_str=ss;
  131.  
  132.  prints();
  133.  printsc("Wait for connect(sec): ");
  134.  gets(ss);
  135.  cc=stoi(ss);
  136.  if (ss !="")
  137.    _dial_time=cc;
  138.  
  139.  prints();
  140.   printsc("Time between attempts(sec): ");
  141.  gets(ss);
  142.  cc=stoi(ss);
  143.  if (ss !="")
  144.    _dial_pause=cc;
  145.  prints();
  146.  
  147.  prints();
  148.  prints("     (Y)es    (N)o     (C)ancel");
  149.  prints();
  150.  printsc("Add line feed to each line? ");
  151.  cc=inkeyw();                                    // Read in a keypress
  152.  toupper(cc);                                    // Make sure it's upper case
  153.  
  154.  if (cc=="Y")
  155.    _add_lf=1;
  156.  else if (cc=="N")
  157.    _add_lf=0;
  158.  
  159.  prints();
  160.  printsc("Echo Terminal characters? ");
  161.  cc=inkeyw();
  162.  toupper(cc);
  163.  
  164.  if (cc=="Y")
  165.    _local_echo=1;
  166.  else if (cc=="N")
  167.    _local_echo=0;
  168.  
  169.  prints();
  170.  printsc("Strip High Terminal characters? ");
  171.  cc=inkeyw();
  172.  toupper(cc);
  173.  
  174.  if (cc=="Y")
  175.    _strip_high=1;
  176.  else if (cc=="N")
  177.    _strip_high=0;
  178.  
  179.  prints();
  180.  printsc("Destructive Backspace? ");
  181.  cc=inkeyw();
  182.  toupper(cc);
  183.  
  184.  if (cc=="Y")
  185.    _dest_bs=1;
  186.  else if (cc=="N")
  187.    _dest_bs=0;
  188.  
  189.  prints();
  190.  printsc("Swap BSP/Cntrl-BSP? ");
  191.  cc=inkeyw();
  192.  toupper(cc);
  193.  
  194.  if (cc=="Y")
  195.    _swap_bs=1;
  196.  else if (cc=="N")
  197.    _swap_bs=0;
  198.  
  199.  prints();
  200.  printsc("Allow Users to Cancel Scripts? ");
  201.  cc=inkeyw();
  202.  toupper(cc);
  203.  
  204.  if (cc=="Y")
  205.    _scr_chk_key=1;
  206.  else if (cc=="N")
  207.    _scr_chk_key=0;
  208.   prints();
  209.  
  210.  prints();
  211.  prints("    ASCII Transfer options:");
  212.  printsc("Echo Characters? ");
  213.  cc=inkeyw();
  214.  toupper(cc);
  215.  
  216.  if (cc=="Y")
  217.    _asc_secho=1;
  218.  else if (cc=="N")
  219.    _asc_secho=0;
  220.  
  221.  prints();
  222.  printsc("Expand blank lines? ");
  223.  cc=inkeyw();
  224.  toupper(cc);
  225.  
  226.  if (cc=="Y")
  227.    _asc_sexpand=1;
  228.  else if (cc=="N")
  229.    _asc_sexpand=0;
  230.  
  231.  prints();
  232.  printsc("Strip high character? ");
  233.  cc=inkeyw();
  234.  toupper(cc);
  235.  
  236.  if (cc=="Y")
  237.    _asc_striph=1;
  238.  else if (cc=="N")
  239.    _asc_striph=0;
  240.  
  241.  prints();
  242.  printsc("Allow Z-modem Auto-Downloads? ");
  243.  cc=inkeyw();
  244.  toupper(cc);
  245.  
  246.  if (cc=="Y")
  247.    _zmod_auto=1;
  248.  else if (cc=="N")
  249.    _zmod_auto=0;
  250.  
  251.  prints();
  252.  printsc("Z-modem Download Crash Recovery? ");
  253.  cc=inkeyw();
  254.  toupper(cc);
  255.  
  256.  if (cc=="Y")
  257.    _zmod_rcrash=1;
  258.  else if (cc=="N")
  259.    _zmod_rcrash=0;
  260.  
  261.  prints();
  262.   printsc("Z-modem Upload Crash Recovery? ");
  263.  cc=inkeyw();
  264.  toupper(cc);
  265.  
  266.  if (cc=="Y")
  267.    _zmod_scrash=1;
  268.  else if (cc=="N")
  269.    _zmod_scrash=0;
  270.  
  271.  prints();
  272.  prints();
  273.  prints("  <Enter> for no change:");
  274.  
  275.  prints();
  276.  printsc(" Remote Abort Character:");
  277.  gets(ss);
  278.  if (ss !="")
  279.    _ASC_REMABORT=ss;
  280.  
  281.  prints();
  282.  printsc(" Time Between Characters(ms):");
  283.  gets(ss);
  284.  if (ss !="")
  285.    _ASC_SCPACING=stoi(ss);
  286.  
  287.  prints();
  288.  printsc(" Time Between Lines(Tenths/sec):");
  289.  gets(ss);
  290.  if (ss !="")
  291.    _ASC_SLPACING=stoi(ss);
  292.  
  293.  prints();
  294.  printsc(" Response Between Lines Character:");
  295.  gets(ss);
  296.  if (ss !="")
  297.    _ASC_SPACECHR=ss;
  298.  
  299.  prints();
  300.  prints();
  301.  prints("  For the following:");
  302.  prints(" 0:Do Nothing");
  303.  prints(" 1:Strip");
  304.  prints(" 2:Add Line");
  305.  prints(" Press <space> for no change");
  306.  
  307.  prints();
  308.  printsc(" CR during ASCII Recieve:");
  309.  cc=inkeyw();                   // Read character
  310.  
  311.  if (not cc==" ")               // Test if changes needed
  312.   {
  313.    cc=stoi(cc);                 // Convert to integer
  314.    _asc_rcrtrans=cc;            // Update variable
  315.   }
  316.  
  317.  prints();
  318.  printsc(" LF during ASCII Recieve:");
  319.  cc=inkeyw();
  320.  if (not cc==" ")
  321.   {
  322.    cc=stoi(cc);
  323.    _asc_rlftrans=cc;
  324.   }
  325.  
  326.  prints();
  327.  printsc(" CR during ASCII Send:");
  328.  cc=inkeyw();
  329.  if (not cc==" ")
  330.   {
  331.    cc=stoi(cc);
  332.    _asc_scrtrans=cc;
  333.   }
  334.  
  335.  prints();
  336.  printsc(" LF during ASCII Send:");
  337.  cc=inkeyw();
  338.  if (not cc==" ")
  339.   {
  340.    cc=stoi(cc);
  341.    _asc_slftrans=cc;
  342.   }
  343.  
  344.  prints();
  345. }
  346.