home *** CD-ROM | disk | FTP | other *** search
/ TopWare Tools / TOOLS.iso / tools / top1415 / ask.chs next >
Encoding:
Text File  |  1992-10-25  |  8.4 KB  |  294 lines
  1. {
  2.    int i,j;
  3.    char temp[80];
  4.    i=pick_file("ask.txt","Inquire what variable?",2,0);
  5.    i=i+1;
  6.    while (i>0){
  7.       if(i==1){
  8.          /* file_autoindent */
  9.          j=ask("file_autoindent");
  10.          msg("Value for %s is [%ld]","file_autoindent",j);
  11.       }
  12.       else if(i==2){
  13.          /* file_bspace */
  14.          j=ask("file_bspace");
  15.          msg("Value for %s is [%ld]","file_bspace",j);
  16.       }
  17.       else if(i==3){
  18.          /* file_changes */
  19.          j=ask("file_changes");
  20.          msg("Value for %s is [%ld]","file_changes",j);
  21.       }
  22.       else if(i==4){
  23.          /* file_cmode */
  24.          j=ask("file_cmode");
  25.          msg("Value for %s is [%ld]","file_cmode",j);
  26.       }
  27.       else if(i==5){
  28.          /* file_column */
  29.          j=ask("file_column");
  30.          msg("Value for %s is [%ld]","file_column",j);
  31.       }
  32.       else if(i==6){
  33.          /* file_dirty */
  34.          j=ask("file_dirty");
  35.          msg("Value for %s is [%ld]","file_dirty",j);
  36.       }
  37.       else if(i==7){
  38.          /* file_id_no */
  39.          j=ask("file_id_no");
  40.          msg("Value for %s is [%ld]","file_id_no",j);
  41.       }
  42.       else if(i==8){
  43.          /* file_in_mark */
  44.          j=ask("file_in_mark");
  45.          msg("Value for %s is [%ld]","file_in_mark",j);
  46.       }
  47.       else if(i==9){
  48.          /* file_insmode */
  49.          j=ask("file_insmode");
  50.          msg("Value for %s is [%ld]","file_insmode",j);
  51.       }
  52.       else if(i==10){
  53.          /* file_line */
  54.          j=ask("file_line");
  55.          msg("Value for %s is [%ld]","file_line",j);
  56.       }
  57.       else if(i==11){
  58.          /* file_matching */
  59.          j=ask("file_matching");
  60.          msg("Value for %s is [%ld]","file_matching",j);
  61.       }
  62.       else if(i==12){
  63.          /* file_name */
  64.          ask("file_name",temp);
  65.          msg("Value for %s is [%s]","file_name",temp);
  66.       }
  67.       else if(i==13){
  68.          /* file_new */
  69.          j=ask("file_new");
  70.          msg("Value for %s is [%ld]","file_new",j);
  71.       }
  72.       else if(i==14){
  73.          /* file_number */
  74.          j=ask("file_number");
  75.          msg("Value for %s is [%ld]","file_number",j);
  76.       }
  77.       else if(i==15){
  78.          /* file_path */
  79.          ask("file_path",temp);
  80.          msg("Value for %s is [%s]","file_path",temp);
  81.       }
  82.       else if(i==16){
  83.          /* file_rmargin */
  84.          j=ask("file_rmargin");
  85.          msg("Value for %s is [%ld]","file_rmargin",j);
  86.       }
  87.       else if(i==17){
  88.          /* file_smart_tabs */
  89.          j=ask("file_smart_tabs");
  90.          msg("Value for %s is [%ld]","file_smart_tabs",j);
  91.       }
  92.       else if(i==18){
  93.          /* file_tabsize */
  94.          j=ask("file_tabsize");
  95.          msg("Value for %s is [%ld]","file_tabsize",j);
  96.       }
  97.       else if(i==19){
  98.          /* file_timed */
  99.          j=ask("file_timed");
  100.          msg("Value for %s is [%ld]","file_timed",j);
  101.       }
  102.       else if(i==20){
  103.          /* file_w_height */
  104.          j=ask("file_w_height");
  105.          msg("Value for %s is [%ld]","file_w_height",j);
  106.       }
  107.       else if(i==21){
  108.          /* file_w_left */
  109.          j=ask("file_w_left");
  110.          msg("Value for %s is [%ld]","file_w_left",j);
  111.       }
  112.       else if(i==22){
  113.          /* file_w_top */
  114.          j=ask("file_w_top");
  115.          msg("Value for %s is [%ld]","file_w_top",j);
  116.       }
  117.       else if(i==23){
  118.          /* file_w_width */
  119.          j=ask("file_w_width");
  120.          msg("Value for %s is [%ld]","file_w_width",j);
  121.       }
  122.       else if(i==24){
  123.          /* file_wordwrap */
  124.          j=ask("file_wordwrap");
  125.          msg("Value for %s is [%ld]","file_wordwrap",j);
  126.       }
  127.       else if(i==25){
  128.          /* file_x */
  129.          j=ask("file_x");
  130.          msg("Value for %s is [%ld]","file_x",j);
  131.       }
  132.       else if(i==26){
  133.          /* file_y */
  134.          j=ask("file_y");
  135.          msg("Value for %s is [%ld]","file_y",j);
  136.       }
  137.       else if(i==27){
  138.          /* sys_autoindent */
  139.          j=ask("sys_autoindent");
  140.          msg("Value for %s is [%ld]","sys_autoindent",j);
  141.       }
  142.       else if(i==28){
  143.          /* sys_autostrip */
  144.          j=ask("sys_autostrip");
  145.          msg("Value for %s is [%ld]","sys_autostrip",j);
  146.       }
  147.       else if(i==29){
  148.          /* sys_autotrail */
  149.          j=ask("sys_autotrail");
  150.          msg("Value for %s is [%ld]","sys_autotrail",j);
  151.       }
  152.       else if(i==30){
  153.          /* sys_backups */
  154.          ask("sys_backups",temp);
  155.          msg("Value for %s is [%s]","sys_backups",temp);
  156.       }
  157.       else if(i==31){
  158.          /* sys_bounce */
  159.          j=ask("sys_bounce");
  160.          msg("Value for %s is [%ld]","sys_bounce",j);
  161.       }
  162.       else if(i==32){
  163.          /* sys_bspace */
  164.          j=ask("sys_bspace");
  165.          msg("Value for %s is [%ld]","sys_bspace",j);
  166.       }
  167.       else if(i==33){
  168.          /* sys_carraige */
  169.          j=ask("sys_carraige");
  170.          msg("Value for %s is [%ld]","sys_carraige",j);
  171.       }
  172.       else if(i==34){
  173.          /* sys_cmode */
  174.          j=ask("sys_cmode");
  175.          msg("Value for %s is [%ld]","sys_cmode",j);
  176.       }
  177.       else if(i==35){
  178.          /* sys_cols */
  179.          j=ask("sys_cols");
  180.          msg("Value for %s is [%ld]","sys_cols",j);
  181.       }
  182.       else if(i==36){
  183.          /* sys_delete */
  184.          j=ask("sys_delete");
  185.          msg("Value for %s is [%ld]","sys_delete",j);
  186.       }
  187.       else if(i==37){
  188.          /* sys_extensions */
  189.          temp[0]=0;
  190.          if(get_str(temp,"Which extension? (1-10)",2)){
  191.             j=atoi(temp);
  192.             if((j>0)&&(j<11)){
  193.                ask("sys_extensions",j,temp);
  194.                msg("Value for %s[%ld] is [%s]","sys_extensions",j,temp);
  195.             }   
  196.          }
  197.       }
  198.       else if(i==38){
  199.          /* sys_fcount */
  200.          j=ask("sys_fcount");
  201.          msg("Value for %s is [%ld]","sys_fcount",j);
  202.       }
  203.       else if(i==39){
  204.          /* sys_inmacro */
  205.          j=ask("sys_inmacro");
  206.          msg("Value for %s is [%ld]","sys_inmacro",j);
  207.       }
  208.       else if(i==40){
  209.          /* sys_insmode */
  210.          j=ask("sys_insmode");
  211.          msg("Value for %s is [%ld]","sys_insmode",j);
  212.       }
  213.       else if(i==41){
  214.          /* sys_matching */
  215.          j=ask("sys_matching");
  216.          msg("Value for %s is [%ld]","sys_matching",j);
  217.       }
  218.       else if(i==42){
  219.          /* sys_mouse */
  220.          j=ask("sys_mouse");
  221.          msg("Value for %s is [%ld]","sys_mouse",j);
  222.       }
  223.       else if(i==43){
  224.          /* sys_rdefs */
  225.          ask("sys_rdefs",temp);
  226.          msg("Value for %s is [%s]","sys_rdefs",temp);
  227.       }
  228.       else if(i==44){
  229.          /* sys_recording */
  230.          j=ask("sys_recording");
  231.          msg("Value for %s is [%ld]","sys_recording",j);
  232.       }
  233.       else if(i==45){
  234.          /* sys_rmargin */
  235.          j=ask("sys_rmargin");
  236.          msg("Value for %s is [%ld]","sys_rmargin",j);
  237.       }
  238.       else if(i==46){
  239.          /* sys_rows */
  240.          j=ask("sys_rows");
  241.          msg("Value for %s is [%ld]","sys_rows",j);
  242.       }
  243.       else if(i==47){
  244.          /* sys_sdefs */
  245.          ask("sys_sdefs",temp);
  246.          msg("Value for %s is [%s]","sys_sdefs",temp);
  247.       }
  248.       else if(i==48){
  249.          /* sys_smart_tabs */
  250.          j=ask("sys_smart_tabs");
  251.          msg("Value for %s is [%ld]","sys_smart_tabs",j);
  252.       }
  253.       else if(i==49){
  254.          /* sys_tabsize */
  255.          j=ask("sys_tabsize");
  256.          msg("Value for %s is [%ld]","sys_tabsize",j);
  257.       }
  258.       else if(i==50){
  259.          /* sys_timed */
  260.          j=ask("sys_timed");
  261.          msg("Value for %s is [%ld]","sys_timed",j);
  262.       }
  263.       else if(i==51){
  264.          /* sys_word_delim */
  265.          ask("sys_word_delim",temp);
  266.          msg("Value for %s is [%s]","sys_word_delim",temp);
  267.       }
  268.       else if(i==52){
  269.          /* sys_wordwrap */
  270.          j=ask("sys_wordwrap");
  271.          msg("Value for %s is [%ld]","sys_wordwrap",j);
  272.       }
  273.       else if(i==53){
  274.          /* sys_zoom */
  275.          j=ask("sys_zoom");
  276.          msg("Value for %s is [%ld]","sys_zoom",j);
  277.       }
  278.       else if(i==54){
  279.          /* version */
  280.          ask("version",temp);
  281.          msg("Value for %s is [%s]","version",temp);
  282.       }
  283.       else if(i==55){
  284.          /* ws_size */
  285.          j=ask("ws_size");
  286.          msg("Value for %s is [%ld]","ws_size",j);
  287.       }        
  288.                                                         
  289.       getkey();
  290.       
  291.       i=pick_file("ask.txt","Inquire what variable?",2,i-1);
  292.       i=i+1;
  293.    }
  294. }