1 | ;+ |
---|
2 | ; |
---|
3 | ; @history |
---|
4 | ; Sebastien Masson (smasson\@lodyc.jussieu.fr) |
---|
5 | ; June 2005 |
---|
6 | ;- |
---|
7 | ; |
---|
8 | @cm_general |
---|
9 | ; |
---|
10 | ; printer environment |
---|
11 | ; |
---|
12 | ; printer_human_names: a string array specifying the name of the |
---|
13 | ; available printers such as ['color printer', |
---|
14 | ; 'black and while'] |
---|
15 | ; printer_machine_names: a string array specifying the IP address or |
---|
16 | ; the name usable by the lpr command |
---|
17 | ; |
---|
18 | ; print_command: a scalar or array variable of string type, defining |
---|
19 | ; the command that must be used to print a postscript. |
---|
20 | ; This command must be defined/build in a way that it the |
---|
21 | ; instruction: |
---|
22 | ; print_command+printer_machine_names[i]+' '+file.ps |
---|
23 | ; or |
---|
24 | ; print_command[i]+printer_machine_names[i]+' '+file.ps |
---|
25 | ; is working. default definition is '\lpr -P' |
---|
26 | ; |
---|
27 | COMMON for_printers, printer_human_names, printer_machine_names, print_command |
---|
28 | ; |
---|
29 | ; page configuration |
---|
30 | ; |
---|
31 | ; page_size: a 2 elements array specifying the size of the page |
---|
32 | ; in cm (for example a4 pages: page_size = [21.,29.7] |
---|
33 | ; page_margins: a 4 elements array specifying the size in cm of the |
---|
34 | ; margins on left, right, bottom, up side of the page |
---|
35 | ; (where nothing is supposed to be drawn). |
---|
36 | ; default is [1., 1., 1., 1.] |
---|
37 | ; key_portrait = 1 for portrait page or 0 for landscape page |
---|
38 | ; |
---|
39 | COMMON page_setup, page_size, page_margins |
---|
40 | COMMON keys_ps, key_portrait |
---|
41 | ; |
---|
42 | ; postscript archiving |
---|
43 | ; |
---|
44 | ; archive_ps = 0 -> nothing is done |
---|
45 | ; archive_ps = 1 -> each printed ps has its name and creation date |
---|
46 | ; written in the bottom-left corner of the page |
---|
47 | ; and is gzipped in the psdir directory |
---|
48 | ; archive_ps > 1 -> question is asked to know if ps file has to be |
---|
49 | ; archived or not |
---|
50 | ; |
---|
51 | COMMON ps_archiving, archive_ps |
---|
52 | ; |
---|
53 | ; graphic window size |
---|
54 | ; |
---|
55 | ; windowsize_scale: the size of the graphic window will (should) be equal to |
---|
56 | ; windowsize_scale * page_size. default definition is |
---|
57 | ; windowsize_scale = 1. The smaller windowsize_scale |
---|
58 | ; is, the larger are the differences between the plots in |
---|
59 | ; graphic window and the corresponding plots in postscript |
---|
60 | ; mode. |
---|
61 | ; |
---|
62 | COMMON windowsize_scale, windowsize_scale |
---|