/[general]/random/boxshade.kaptn
ViewVC logotype

Diff of /random/boxshade.kaptn

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by nieder, Thu Jun 7 16:13:48 2007 UTC revision 1.3 by nieder, Wed Jul 25 13:44:48 2007 UTC
# Line 2  Line 2 
2    
3  start "boxshade" -> boxshade buttons;  start "boxshade" -> boxshade buttons;
4    
5  boxshade -> "boxshade " input_name " " opts;  boxshade -> "boxshade " input_name " " output_name " " opts;
6  opts:framed :horizontal -> input_opts output_opts ;  opts:framed :horizontal -> input_opts output_opts ;
7    
8  input_name "Alignment file" -> "-in="@string;  input_name "Alignment file" -> "-in="@infile;
9    output_name "Output shaded file" -> "-out="@outfile;
10    
11  input_opts "Input Options" -> thr " " in_types;  input_opts "Input Options" -> thr " " in_types;
12    
13  thr "Similarity threshold" -> "-thr="@float="0.5";  thr "Similarity threshold (0-1.0)" -> "-thr="@float="0.5";
14    
15  in_types "Input file type" -> MSF | ! CLUSTAL | MALIGNED | ESEE | PHYLIP;  in_types "Input file type" -> MSF | ! CLUSTAL | MALIGNED | ESEE | PHYLIP;
16  MSF "MSF" -> "-type=MSF ";  MSF "MSF" -> "-type=MSF ";
# Line 20  ESEE "ESEE" -> "-type=ESEE "; Line 20  ESEE "ESEE" -> "-type=ESEE ";
20  PHYLIP "PHYLIP" -> "-type=PHYLIP ";  PHYLIP "PHYLIP" -> "-type=PHYLIP ";
21    
22    
23  output_opts "Output options" -> numdef split ruler cons endings;  output_opts:horizontal "Output options" -> "-dev="out_type minor_out_opts;
24    minor_out_opts -> numdef split ruler cons "-"endings;
25    
26    out_type :double "Output file type" -> PS | EPS | HPGL | ! RTF | ANSI | VT100 | ReGIS1 | ReGIS2 | LJ250 | ASCII | FIG | PICT | HTML;
27    PS "Postscript" -> "1 ";
28    EPS "Encapsulated Postscript" -> "2 ";
29    HPGL "HPGL" -> "3 ";
30    RTF "RTF( Rich Text Format)" -> "4 ";
31    ANSI "ANSI-screen (PC-version)" -> "6 ";
32    VT100 "VT100-screen (DEC-version)" -> "7 ";
33    ReGIS1 "ReGIS-screen (25 lines each)" -> "8 ";
34    ReGIS2 "ReGIS-file (without breaks)" -> "9 ";
35    LJ250 "LJ250-printer file" -> "a ";
36    ASCII "ASCII file" -> "b ";
37    FIG "FIG file (for XFIG)" -> "c ";
38    PICT "PICT file" -> "d ";
39    HTML "HTML file" -> "e ";
40    
41  numdef "use default numbering" -> "-numdef " | @;  numdef "use default numbering" -> "-numdef " | @;
42  split "split pages into files" -> "-split " | @;  split "split pages into files" -> "-split " | !@;
43  ruler "print ruler" -> "-ruler " | @;  ruler "print ruler" -> "-ruler " | @;
44  cons "create consensus line" -> "-cons " | @;  cons "create consensus line" -> "-cons " | @;
45    
46  endings "Output line endings" ->  dos | mac | ! unix;  endings "Output line endings" ->  @list("dos", "mac", "unix")=3;
 dos "dos" -> "-dos ";  
 mac "mac" -> "-mac ";  
 unix "unix" -> "-unix ";  
47    
48  buttons :horizontal -> @action(boxshade)="OK" @close="Cancel" @preview(start,"Lucidatypewriter",300,200,"Close")="Preview";  buttons :horizontal -> @action(boxshade)="Run boxshade" @close="Cancel" @preview(start,"Lucidatypewriter",400,100,"Close")="Preview";

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

  ViewVC Help
Powered by ViewVC 1.1.17