home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / Editor / FREDV19A.LHA / FrexxEd / fpl / CMode.FPL < prev    next >
Encoding:
Text File  |  1995-07-21  |  2.1 KB  |  61 lines
  1. // $Id: CMode.FPL 1.7 1995/07/21 10:31:18 jskov Exp $
  2. // $VER: CMode.FPL 1.0 (15.06.95) © Jesper Skov
  3.  
  4. //»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»» CModePrefs() ««
  5. export void CModePrefs()
  6. {
  7.   PromptInfo(-1,"CMode preferences",-1,-1,
  8.    "C_comment_start_skip",
  9.    "C_comment_start",
  10.    "C_comment_end",
  11.    "C_line_comment_start",
  12.    "C_line_comment_body",
  13.    "C_line_comment_end",
  14.    "C_tab_size",
  15.    "C_comment_column"
  16.    );
  17. }
  18.  
  19. //»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»» CModeInit() ««
  20. export void CModeInit()
  21. {
  22.   // Set comment strings for C mode
  23.   SetInfo(-1,"comment_start_skip",ReadInfo("C_comment_start_skip"));
  24.   SetInfo(-1,"comment_start",ReadInfo("C_comment_start"));
  25.   SetInfo(-1,"comment_end",ReadInfo("C_comment_end"));
  26.   SetInfo(-1,"line_comment_start",ReadInfo("C_line_comment_start"));
  27.   SetInfo(-1,"line_comment_body",ReadInfo("C_line_comment_body"));
  28.   SetInfo(-1,"line_comment_end",ReadInfo("C_line_comment_end"));
  29.   SetInfo(-1,"comment_column",ReadInfo("C_comment_column")); // set comment col
  30.   SetInfo(-1,"comment_mode",1);            // enable comment mode
  31.  
  32.   SetInfo(-1,"comment_begin","//");        // Set fold comment
  33.  
  34.   SetInfo(-1,"tab_size",ReadInfo("C_tab_size")); // Set tabulator size
  35.  
  36.   SetInfo(-1,"c_indent_mode",1);            // enable c-indent-mode
  37.  
  38.   SetInfo(-1,"c_mode",1);// enable self
  39. }
  40.  
  41. //»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»» CMode Settings ««
  42. ConstructInfo("C_comment_start_skip","","","WHGS","",0,0,"//\\*+ ");
  43. ConstructInfo("C_comment_start","","","WHGS","",0,0,"/* ");
  44. ConstructInfo("C_comment_end","","","WHGS","",0,0," */");
  45. ConstructInfo("C_line_comment_body","","","WHGS","",0,0,"»");
  46. ConstructInfo("C_line_comment_end","","","WHGS","",0,0,"««*/");
  47. ConstructInfo("C_line_comment_start","","","WHGS","",0,0,"/*");
  48.  
  49. ConstructInfo("C_comment_column","","","WHGI","",0,999,45);
  50. ConstructInfo("C_tab_size","","","WHGI","",0,999,4);
  51.  
  52.  
  53. ConstructInfo("c_mode", "","", "LBH","", 0,0,0);
  54.  
  55. AddMode(0, "c_mode", "c_mode_ext", "c_mode_exe");
  56.  
  57. //»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»» CMode menu ««
  58. MenuAdd("s", "CMode...", "CModePrefs();", "", 6,6,-1); // Add to PackageSettings
  59. MenuBuild();
  60.  
  61.