2 * Source generated with ARexxBox 1.12 (May 18 1993)
3 * which is Copyright (c) 1992,1993 Michael Balzer
6 #include <exec/types.h>
8 #include <rexx/storage.h>
11 #include "MultiView.h"
13 #define RESINDEX(stype) (((long) &((struct stype *)0)->res) / sizeof(long))
15 char RexxPortBaseName
[80] = "MULTIVIEW";
16 char *rexx_extension
= "MULTIVIEW";
18 struct rxs_command rxs_commandlist
[] =
20 { "ABOUT", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_about
, 1 },
21 { "ACTIVATEWINDOW", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_activatewindow
, 1 },
22 { "BEEPSCREEN", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_beepscreen
, 1 },
23 { "CLEARSELECTED", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_clearselected
, 1 },
24 { "COPY", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_copy
, 1 },
25 { "DOTRIGGERMETHOD", "METHOD/A", NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_dotriggermethod
, 1 },
26 { "GETCURRENTDIR", NULL
, "CURRENTDIR", RESINDEX(rxd_getcurrentdir
), (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_getcurrentdir
, 1 },
27 { "GETFILEINFO", NULL
, "FILEINFO", RESINDEX(rxd_getfileinfo
), (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_getfileinfo
, 1 },
28 { "GETOBJECTINFO", "MYVAR/S,MYSTEM/K", "RESULT", RESINDEX(rxd_getobjectinfo
), (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_getobjectinfo
, 1 },
29 { "GETTRIGGERINFO", "MYVAR/S,MYSTEM/K", "RESULT", RESINDEX(rxd_gettriggerinfo
), (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_gettriggerinfo
, 1 },
30 { "MARK", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_mark
, 1 },
31 { "MAXIMUMSIZE", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_maximumsize
, 1 },
32 { "MINIMUMSIZE", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_minimumsize
, 1 },
33 { "NORMALSIZE", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_normalsize
, 1 },
34 { "OPEN", "NAME/K,CLIPBOARD/S,CLIPUNIT/K/N", NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_open
, 1 },
35 { "PRINT", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_print
, 1 },
36 { "PUBSCREEN", "NAME/A", NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_pubscreen
, 1 },
37 { "QUIT", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_quit
, 1 },
38 { "RELOAD", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_reload
, 1 },
39 { "SAVEAS", "NAME/K,IFF/S", NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_saveas
, 1 },
40 { "SCREEN", "TRUE/S,FALSE/S", NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_screen
, 1 },
41 { "SCREENTOBACK", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_screentoback
, 1 },
42 { "SCREENTOFRONT", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_screentofront
, 1 },
43 { "SNAPSHOT", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_snapshot
, 1 },
44 { "WINDOWTOBACK", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_windowtoback
, 1 },
45 { "WINDOWTOFRONT", NULL
, NULL
, 0, (void (*)(struct RexxHost
*,void **,long,struct RexxMsg
*)) rx_windowtofront
, 1 },
46 { NULL
, NULL
, NULL
, NULL
, NULL
}
51 static struct arb_p_link link0
[] = {
52 {"WINDOWTO", 1}, {"S", 4}, {"RELOAD", 11}, {"QUIT", 12}, {"P", 13}, {"OPEN", 16},
53 {"NORMALSIZE", 17}, {"M", 18}, {"GET", 23}, {"DOTRIGGERMETHOD", 28}, {"C", 29}, {"BEEPSCREEN", 32},
54 {"A", 33}, {NULL
, 0} };
56 static struct arb_p_link link1
[] = {
57 {"FRONT", 2}, {"BACK", 3}, {NULL
, 0} };
59 static struct arb_p_link link4
[] = {
60 {"NAPSHOT", 5}, {"CREEN", 6}, {"AVEAS", 10}, {NULL
, 0} };
62 static struct arb_p_link link6
[] = {
63 {"TO", 7}, {NULL
, 0} };
65 static struct arb_p_link link7
[] = {
66 {"FRONT", 8}, {"BACK", 9}, {NULL
, 0} };
68 static struct arb_p_link link13
[] = {
69 {"UBSCREEN", 14}, {"RINT", 15}, {NULL
, 0} };
71 static struct arb_p_link link18
[] = {
72 {"INIMUMSIZE", 19}, {"A", 20}, {NULL
, 0} };
74 static struct arb_p_link link20
[] = {
75 {"XIMUMSIZE", 21}, {"RK", 22}, {NULL
, 0} };
77 static struct arb_p_link link23
[] = {
78 {"TRIGGERINFO", 24}, {"OBJECTINFO", 25}, {"FILEINFO", 26}, {"CURRENTDIR", 27}, {NULL
, 0} };
80 static struct arb_p_link link29
[] = {
81 {"OPY", 30}, {"LEARSELECTED", 31}, {NULL
, 0} };
83 static struct arb_p_link link33
[] = {
84 {"CTIVATEWINDOW", 34}, {"BOUT", 35}, {NULL
, 0} };
86 struct arb_p_state arb_p_state
[] = {
87 {-1, link0
}, {24, link1
}, {25, NULL
}, {24, NULL
}, {19, link4
},
88 {23, NULL
}, {20, link6
}, {21, link7
}, {22, NULL
}, {21, NULL
},
89 {19, NULL
}, {18, NULL
}, {17, NULL
}, {15, link13
}, {16, NULL
},
90 {15, NULL
}, {14, NULL
}, {13, NULL
}, {10, link18
}, {12, NULL
},
91 {10, link20
}, {11, NULL
}, {10, NULL
}, {6, link23
}, {9, NULL
},
92 {8, NULL
}, {7, NULL
}, {6, NULL
}, {5, NULL
}, {3, link29
},
93 {4, NULL
}, {3, NULL
}, {2, NULL
}, {0, link33
}, {1, NULL
},