home *** CD-ROM | disk | FTP | other *** search
/ Crawly Crypt Collection 2 / crawlyvol2.bin / apps / dtp / ghost / gs301src / atari / gp_atar1.h < prev    next >
Text File  |  1994-09-17  |  12KB  |  254 lines
  1. /* Copyright (C) 1989, 1992, 1993 Aladdin Enterprises.  All rights reserved.
  2.  
  3. This file is part of Ghostscript.
  4.  
  5. Ghostscript is distributed in the hope that it will be useful, but
  6. WITHOUT ANY WARRANTY.  No author or distributor accepts responsibility
  7. to anyone for the consequences of using it or for whether it serves any
  8. particular purpose or works at all, unless he says so in writing.  Refer
  9. to the Ghostscript General Public License for full details.
  10.  
  11. Everyone is granted permission to copy, modify and redistribute
  12. Ghostscript, but only under the conditions described in the Ghostscript
  13. General Public License.  A copy of this license is supposed to have been
  14. given to you along with Ghostscript so you can know your rights and
  15. responsibilities.  It should be in a file named COPYING.  Among other
  16. things, the copyright notice and this notice must be preserved on all
  17. copies.  */
  18.  
  19. /* gp_atar1.h */
  20.  
  21. /* Ghostscript header file for gp_atar1.c */
  22.  
  23. #include <stdlib.h>
  24. #include <gemdefs.h>
  25. #include <aesbind.h>
  26. #include <vdibind.h>
  27. #include <support.h>
  28.  
  29. #include "string_.h"
  30. #include "gx.h"
  31. #include "gsexit.h"
  32. #include "gp.h"
  33. #include "time_.h"
  34. #include "gxdcolor.h"
  35. #include "gserrors.h"
  36. #include "math_.h"
  37. #include "st_defs.h"
  38.  
  39. #ifdef USE_RSC                            /* CF */
  40. #include "gsatari.h"
  41. char    rscname[]="gsatari.rsc";
  42. #else
  43.  
  44. #include "st_bitmp.c"    /* File containing ghostscript bitmaps. */
  45.  
  46. /* Menu bar when windows are enabled. */
  47.  
  48. OBJECT menuobj[] = {
  49.  
  50. /* 0 */  {-1,  1,  9, G_IBOX,  0, 0, 0L,                   0, 0, 80,  25},
  51. /* 1 */  { 9,  2,  2, G_BOX ,  0, 0, 0x1100L,              0, 0, 80, 513},
  52.  
  53. /* 2 */  { 1,  3,  6, G_IBOX,  0, 0, 0L,                   2, 0, 27, 769},
  54. /* 3 */  { 4, -1, -1, G_TITLE, 0, 0, UL" GS ",           0, 0,  4, 769},
  55. /* 4 */  { 5, -1, -1, G_TITLE, 0, 0, UL" File ",           4, 0,  6, 769},
  56. /* 5 */  { 6, -1, -1, G_TITLE, 0, 0, UL" Window ",        19, 0,  8, 769},
  57. /* 6 */  { 2, -1, -1, G_TITLE, 0, 0, UL" Options ",       10, 0,  9, 769},
  58. /* 7 */  { 8, -1, -1, G_TITLE, 0, DISABLED, UL"",         30, 0, 10, 769},
  59. /* 8 */  { 2, -1, -1, G_TITLE, 0, DISABLED, UL"",         40, 0, 10, 769},
  60.  
  61. /* 9 */  { 0,  10, 41, G_IBOX,  0, 0, 0L,                 0, 769, 80, 19},
  62.  
  63. /* 10 */  { 19, 11, 18, G_BOX ,  0, 0, 0xff1100L,            2, 0, 20, 8},
  64. /* 11 */  { 12, -1, -1, G_STRING ,  0, 0, UL"  About ST-GS", 0, 0, 20, 1},
  65. /* 12 */  { 13, -1, -1, G_STRING ,  0, 0x08, UL" ------------------ ",  0, 1, 20, 1},
  66. /* 13 */  { 14, -1, -1, G_STRING ,  0, 0, UL"1",             0, 2, 20, 1},
  67. /* 14 */  { 15, -1, -1, G_STRING ,  0, 0, UL"2",             0, 3, 20, 1},
  68. /* 15 */  { 16, -1, -1, G_STRING ,  0, 0, UL"3",             0, 4, 20, 1},
  69. /* 16 */  { 17, -1, -1, G_STRING ,  0, 0, UL"4",             0, 5, 20, 1},
  70. /* 17 */  { 18, -1, -1, G_STRING ,  0, 0, UL"5",             0, 6, 20, 1},
  71. /* 18 */  { 10, -1, -1, G_STRING ,  0, 0, UL"6",             0, 7, 20, 1},
  72.  
  73. /* 19 */  { 31, 20, 30, G_BOX ,  0, 0, 0xff1100L,                  6, 0, 19, 11},
  74. /* 20 */  { 21, -1, -1, G_STRING ,  0, 0, UL"  Open File ... ❎o ", 0, 0, 19, 1},
  75. /* 21 */  { 22, -1, -1, G_STRING ,  0, 0, UL"  Open Page ... ❎g ", 0, 1, 19, 1},
  76. /* 22 */  { 23, -1, -1, G_STRING ,  0, 0, UL"  Print ...     ❎p ", 0, 2, 19, 1},
  77. /* 23 */  { 24, -1, -1, G_STRING ,  0, DISABLED, UL" ----------------- ", 0, 3, 19, 1},
  78. /* 24 */  { 25, -1, -1, G_STRING ,  0, DISABLED, UL"  Previous Page ❎v ", 0, 4, 19, 1},
  79. /* 25 */  { 26, -1, -1, G_STRING ,  0, DISABLED, UL"  Next Page     ❎n ", 0, 5, 19, 1},
  80. /* 26 */  { 27, -1, -1, G_STRING ,  0, DISABLED, UL" ----------------- ", 0, 6, 19, 1},
  81. /* 27 */  { 28, -1, -1, G_STRING ,  0, 0, UL"  Load Config   ❎l ", 0, 7, 19, 1},
  82. /* 28 */  { 29, -1, -1, G_STRING ,  0, 0, UL"  Save Config   ❎s ", 0, 8, 19, 1},
  83. /* 29 */  { 30, -1, -1, G_STRING ,  0, DISABLED, UL" ----------------- ", 0, 9, 19, 1},
  84. /* 30 */  { 19, -1, -1, G_STRING ,  0, 0, UL"  Quit GS       ❎q ", 0, 10, 19, 1},
  85.  
  86. /* 31 */  { 41, 32, 38, G_BOX ,  0, 0, 0xff1100L,              21, 0, 16, 7},
  87. /* 32 */  { 33, -1, -1, G_STRING ,  0, 0, UL"  Cycle Forw ❎w ", 0, 0, 16, 1},
  88. /* 33 */  { 34, -1, -1, G_STRING ,  0, 0, UL"  Cycle Back ❎b ", 0, 1, 16, 1},
  89. /* 34 */  { 35, -1, -1, G_STRING ,  0, DISABLED, UL" -------------- ", 0, 2, 16, 1},
  90. /* 35 */  { 36, -1, -1, G_STRING ,  0, 0, UL"  Iconify    ❎i ", 0, 3, 16, 1},
  91. /* 36 */  { 37, -1, -1, G_STRING ,  0, 0, UL"  Close Top  ❎u ", 0, 4, 16, 1},
  92. /* 37 */  { 38, -1, -1, G_STRING ,  0, DISABLED, UL" -------------- ", 0, 5, 16, 1},
  93. /* 38 */  { 31, -1, -1, G_STRING ,  0, 0, UL"  Copy Image ❎c ", 0, 6, 16, 1},
  94. /* 39 */  { 40, -1, -1, G_STRING ,  0, DISABLED, UL"",         0, 7, 16, 1},
  95. /* 40 */  { 31, -1, -1, G_STRING ,  0, DISABLED, UL"",         0, 8, 16, 1},
  96.  
  97. /* 41 */  {  9, 42, 47, G_BOX ,  0, 0, 0xff1100L,              12, 0, 20, 6},
  98. /* 42 */  { 43, -1, -1, G_STRING ,  0, 0, UL"  PS Help           ", 0, 0, 20, 1},
  99. /* 43 */  { 44, -1, -1, G_STRING ,  0, 0, UL"  No Pause          ", 0, 1, 20, 1},
  100. /* 44 */  { 45, -1, -1, G_STRING ,  0, DISABLED, UL" ------------------ ", 0, 2, 20, 1},
  101. /* 45 */  { 46, -1, -1, G_STRING ,  0, 0, UL"  Device ...     ❎d ", 0, 3, 20, 1},
  102. /* 46 */  { 47, -1, -1, G_STRING ,  0, 0, UL"  Page Size ...  ❎a ", 0, 4, 20, 1},
  103. /* 47 */  { 41, -1, -1, G_STRING ,  0, 0, UL"  Resolution ... ❎r ", 0, 5, 20, 1},
  104. /* 48 */  { 41, -1, -1, G_STRING ,  LASTOB, 0, UL"", 0, 6, 20, 1}
  105.  
  106. };
  107.  
  108. /* About ST-GS dialog object. */
  109.  
  110. BITBLK bannerblk[] = {
  111.     (char *)FullBanner, 38, 52, 0, 0, 2
  112. };
  113.  
  114. OBJECT aboutobj[] = {
  115. /* 0 */ {-1, 1, 5, G_BOX, 0x80, OUTLINED, 0x21100L, 0, 0, 53, 13},
  116. /* 1 */ {2, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL "General Help", 2,9, 24,1},
  117. /* 2 */ {3, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL "Unsightly Fonts", 2,11, 24,1},
  118. /* 3 */ {4, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL "Interpreter Errors", 27,11, 24,1},
  119. /* 4 */ {5, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL "Obscure Features", 27,9, 24,1},
  120.  
  121. /* 5 */ {0, 6, 7, G_BOX, NONE, NORMAL, 0xFF1101L, 2,1, 49,7},
  122.  
  123. /* 6 */ {7, -1, -1, G_IMAGE, NONE, NORMAL, UL bannerblk, 6,1, 38, 0x0403},
  124. /* 7 {5, -1, -1, G_STRING, LASTOB, NORMAL, UL "Atari ST Version 3.01 --- Tim Gallivan, 1994", 2,5, 45,1} */
  125. /* 7 */{5, -1, -1, G_STRING, LASTOB, NORMAL, UL "Atari ST Version 3.01 --- Beta Test Version 1", 2,5, 46,1}
  126. };
  127.  
  128. /* Resolution dialog object. */
  129.  
  130. OBJECT resobj[] = {
  131. /* 0 */ {-1, 1, 14, G_BOX, 0x80, OUTLINED, 0x32021100L, 0, 0, 30, 9},
  132.  
  133. /* 1 */ {11, 2, 10, G_BOX, NONE, SHADOWED, 0xFF1111L, 2,1, 16,7},
  134. /* 2 */ {3, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"\001", 1,1, 4,1},
  135. /* 3 */ {4, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"\001", 6,1, 4,1},
  136. /* 4 */ {5, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"\002", 1,5, 4,1},
  137. /* 5 */ {6, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"\002", 6,5, 4,1},
  138. /* 6 */ {7, -1, -1, G_BOXCHAR, NONE, SHADOWED, 0x30FF1100L, 1,3, 4,1},
  139. /* 7 */ {8, -1, -1, G_BOXCHAR, NONE, SHADOWED, 0x38FF1100L, 6,3, 4,1},
  140. /* 8 */ {9, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"\001", 11,1, 4,1},
  141. /* 9 */ {10, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"\002", 11,5, 4,1},
  142. /* 10 */ {1, -1, -1, G_BOXCHAR, NONE, SHADOWED, 0x30FF1100L, 11,3, 4,1},
  143.  
  144. /* 11 */ {12, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"Default", 20,1, 8,1},
  145. /* 12 */ {13, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"Cancel", 20,3, 8,1},
  146. /* 13 */ {14, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"Done", 20,7, 8,1},
  147. /* 14 */ {0, -1, -1, G_BUTTON, 0x21, SHADOWED, UL"Apply", 20,5, 8,1}
  148.  
  149. };
  150.  
  151. /* Device dialog object. */
  152.  
  153. char devices[DEVICES][DNAMELEN] = {
  154.     "stvdi", "djet500",
  155.     "bj10e", "necp6",
  156.     "cdj500", "cdj550",
  157.     "epson",  "slm"
  158. };
  159.  
  160. OBJECT devobj[] = {
  161. /* 0 */ {-1, 1, 5, G_BOX, 0x80, OUTLINED, 0x21100L, 0, 0, 39,11},
  162. /* 1 */ {2, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"Default", 29,2, 8,1},
  163. /* 2 */ {3, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"Cancel", 29,4, 8,1},
  164. /* 3 */ {4, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"Apply", 29,6, 8,1},
  165. /* 4 */ {5, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"Done", 29,8, 8,1},
  166.  
  167. /* 5 */ {0, 6, 13, G_BOX, NONE, SHADOWED, 0xFF1111L, 2,1, 25,9},
  168. /* 6 */ {7, -1, -1, G_BUTTON, SELECTABLE, 0x21, UL devices[0], 2,1, 10,1},
  169. /* 7 */ {8, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL devices[1], 13,1, 10,1},
  170. /* 8 */ {9, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL devices[2], 2,3, 10,1},
  171. /* 9 */ {10, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL devices[3], 13,3, 10,1},
  172. /* 10 */ {11, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL devices[4], 2,5, 10,1},
  173. /* 11 */ {12, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL devices[5], 13,5, 10,1},
  174. /* 12 */ {13, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL devices[6], 2,7, 10,1},
  175. /* 13 */ {5, -1, -1, G_BUTTON, 0x21, SHADOWED, UL devices[7], 13,7, 10,1}
  176. };
  177.  
  178. /* Page size dialog object. */
  179.  
  180. char sizes[DEVICES][DNAMELEN] = {
  181.     "letter", "legal",
  182.     "11x17",  "ledger",
  183.     "a1",     "a2",
  184.     "a3",     "a4"
  185. };
  186.  
  187. OBJECT sizobj[] = {
  188. /* 0 */ {-1, 1, 5, G_BOX, 0x80, OUTLINED, 0x21100L, 0, 0, 39,11},
  189. /* 1 */ {2, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"Default", 29,2, 8,1},
  190. /* 2 */ {3, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"Cancel", 29,4, 8,1},
  191. /* 3 */ {4, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"Apply", 29,6, 8,1},
  192. /* 4 */ {5, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"Done", 29,8, 8,1},
  193.  
  194. /* 5 */ {0, 6, 13, G_BOX, NONE, SHADOWED, 0xFF1111L, 2,1, 25,9},
  195. /* 6 */ {7, -1, -1, G_BUTTON, SELECTABLE, 0x21, UL sizes[0], 2,1, 10,1},
  196. /* 7 */ {8, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL sizes[1], 13,1, 10,1},
  197. /* 8 */ {9, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL sizes[2], 2,3, 10,1},
  198. /* 9 */ {10, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL sizes[3], 13,3, 10,1},
  199. /* 10 */ {11, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL sizes[4], 2,5, 10,1},
  200. /* 11 */ {12, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL sizes[5], 13,5, 10,1},
  201. /* 12 */ {13, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL sizes[6], 2,7, 10,1},
  202. /* 13 */ {5, -1, -1, G_BUTTON, 0x21, SHADOWED, UL sizes[7], 13,7, 10,1}
  203. };
  204.  
  205. char saveline[MAXLEN]="";
  206.  
  207. OBJECT savemsg[] = {
  208. /* 0 */  {-1,  1,  1,  G_BOX, 0, 0x10,   0x00021100L, 0, 0, 22, 3},
  209. /* 1 */  { 0, -1, -1, G_STRING, 0x20, 0, UL saveline,  0, 1, 20, 1},
  210. };
  211.  
  212. /* Object for output selection dialog. */
  213.  
  214. OBJECT printobj[] = {
  215. /* 0 */  {-1, 1, 4,   G_BOX,    0x80,       OUTLINED, 0x21100L,   11,1, 43,11},
  216. /* 1 */  {2, -1, -1,  G_BUTTON, SELECTABLE, SHADOWED, UL"Default", 33,2, 8,1},
  217. /* 2 */  {3, -1, -1,  G_BUTTON, SELECTABLE, SHADOWED, UL"Cancel",  33,4, 8,1},
  218. /* 3 */  {4, -1, -1,  G_BUTTON, SELECTABLE, SHADOWED, UL"Print",   33,8, 8,1},
  219. /* 4 */  {0,  5, 12,  G_BOX,    NONE,       SHADOWED, 0xFF1111L,   2,1, 29,9},
  220. /* 5 */  {6, -1, -1,  G_BUTTON, SELECTABLE, SHADOWED, UL"File   ->", 2,1,11,1},
  221. /* 6 */  {7, -1, -1,  G_BUTTON, SELECTABLE, SHADOWED, UL"Device ->", 2,3, 11,1},
  222. /* 7 */  {8, -1, -1,  G_STRING, NONE,       NORMAL,   UL"None        ",  16,1, 12,1},
  223. /* 8 */  {9, -1, -1,  G_STRING, NONE,       NORMAL,   UL"stvdi       ", 16,3, 12,1},
  224. /* 9 */  {10, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"PRN:",  2,7, 7,1},
  225. /* 10 */ {11, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"CEN:",  11,7, 7,1},
  226. /* 11 */ {12, -1, -1, G_BUTTON, SELECTABLE, SHADOWED, UL"File",  20,7, 7,1},
  227. /* 12 */ { 4, -1, -1, G_STRING, LASTOB,     NORMAL,   UL"Send Output To:", 7,5, 15,1}
  228. };
  229.  
  230. #if 0
  231. OBJECT outobj[] = {
  232. /* 0 */  {-1,  1,  4,  G_BOX, 0x80, 16, 0x00021100L,        0, 0, 26, 5},
  233. /* 1 */  { 2, -1, -1, G_STRING, 0,  0, UL"Send Output To:", 5, 1, 15, 1},
  234. /* 2 */  { 3, -1, -1, G_BUTTON, 0x01,  0x20, UL" CEN: ",        2, 3, 6, 1},
  235. /* 3 */  { 4, -1, -1, G_BUTTON, 0x01,  0x20, UL" PRN: ",       10, 3, 6, 1},
  236. /* 4 */  { 0, -1, -1, G_BUTTON, 0x61,  0x20, UL" File ",       18, 3, 6, 1}
  237. };
  238. #endif
  239.  
  240. /* Icon object. */
  241.  
  242. BITBLK iconblk[] = {
  243.     (char *)FullReaper, 6, 48, 0, 0, 1
  244. };
  245.  
  246. OBJECT iconobj[] = {
  247. /* 0 */  {-1, 1, 1, G_BOX,  0x80, 0, 0x00001100L, 0, 0, 0x3000, 0x3000},
  248. /* 1 */  { 0,-1,-1, G_IMAGE, LASTOB, 0, UL iconblk, 0, 0, 0x3000, 0x3000}
  249. };
  250.  
  251. #endif /* USE_RSC */
  252.  
  253. /* end gp_atar1.h */
  254.