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