home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Gold Fish 2
/
goldfish_vol2_cd1.bin
/
files
/
comm
/
net
/
casiolink
/
layout.c
< prev
next >
Wrap
C/C++ Source or Header
|
1993-08-07
|
6KB
|
179 lines
extern UBYTE Datei[],ParamString[];
struct Screen *Scr = NULL;
APTR VisualInfo = NULL;
struct Window *Wnd = NULL;
struct Gadget *CasioLinkGList = NULL;
struct Menu *Menus = NULL;
struct Gadget *CasioLinkGadgets[CasioLink_CNT];
char ShortCut[] = "PpAaSsEeLlRrOo";
struct MinList BufferList = {NULL,NULL,NULL};
struct TextAttr topaz8 = {(STRPTR)"topaz.font", 8, 0x00, 0x41};
struct IntuiText IText[] = {
1, 0, JAM1, 82, 27, &topaz8, (UBYTE *)"Datei", &IText[1],
1, 0, JAM1,209, 27, &topaz8, (UBYTE *)"Buffer", &IText[2],
1, 0, JAM1,473, 27, &topaz8, (UBYTE *)"Konfiguration", &IText[3],
1, 0, JAM1, 22, 75, &topaz8, (UBYTE *)"Status:", &IText[4],
1, 0, JAM1, 22,112, &topaz8, (UBYTE *)"Buffer:", NULL};
struct NewMenu CasioLinkNewMenu[] = {
NM_TITLE, (STRPTR)"Projekt", NULL, 0, NULL, NULL,
NM_ITEM, (STRPTR)"Editor", (STRPTR)"E", 0, 0, NULL,
NM_ITEM, (STRPTR)"Drucken", (STRPTR)"P", 0, 0, NULL,
NM_ITEM, (STRPTR)"Shell", (STRPTR)"S", 0, 0, NULL,
NM_ITEM, (STRPTR)NM_BARLABEL, NULL, 0, 0, NULL,
NM_ITEM, (STRPTR)"Drucker-Emulation", NULL, CHECKIT|MENUTOGGLE, 0, NULL,
NM_ITEM, (STRPTR)NM_BARLABEL, NULL, 0, 0, NULL,
NM_ITEM, (STRPTR)"Quit", (STRPTR)"Q", 0, 0, NULL,
NM_TITLE, (STRPTR)"Hilfe", NULL, 0, NULL, NULL,
NM_ITEM, (STRPTR)"Info", (STRPTR)"I", 0, 0, NULL,
NM_ITEM, (STRPTR)"Hilfe", (STRPTR)"H", 0, 0, NULL,
NM_END, NULL, NULL, 0, 0, NULL };
UWORD CasioLinkGTypes[] = {
BUTTON_KIND,
BUTTON_KIND,
BUTTON_KIND,
BUTTON_KIND,
BUTTON_KIND,
BUTTON_KIND,
BUTTON_KIND,
NUMBER_KIND,
TEXT_KIND,
TEXT_KIND,
TEXT_KIND,
LISTVIEW_KIND
};
struct NewGadget CasioLinkNGad[] = {
23, 33, 80, 18, (UBYTE *)"S_peichern", NULL, GD_Speichern, PLACETEXT_IN, NULL, NULL,
106, 33, 60, 18, (UBYTE *)"L_aden", NULL, GD_Laden, PLACETEXT_IN, NULL, NULL,
193, 33, 70, 18, (UBYTE *)"_Senden", NULL, GD_Senden, PLACETEXT_IN, NULL, NULL,
266, 33, 80, 18, (UBYTE *)"_Empfangen", NULL, GD_Empfangen, PLACETEXT_IN, NULL, NULL,
349, 33, 70, 18, (UBYTE *)"_Löschen", NULL, GD_Loeschen, PLACETEXT_IN, NULL, NULL,
446, 33, 60, 18, (UBYTE *)"_RS232", NULL, GD_Konf_RS, PLACETEXT_IN, NULL, NULL,
509, 33, 80, 18, (UBYTE *)"S_onstiges", NULL, GD_Konf_Sonst, PLACETEXT_IN, NULL, NULL,
371, 11, 48, 17, (UBYTE *)"bytes:", NULL, GD_bytes, PLACETEXT_LEFT, NULL, NULL,
18, 73,578, 17, NULL, NULL, GD_Status, PLACETEXT_ABOVE, NULL, NULL,
402, 59,200, 17, (UBYTE *)"Parameter:", NULL, GD_Parameter, PLACETEXT_LEFT, NULL, NULL,
100, 96,200, 17, Datei, NULL, GD_Datei, PLACETEXT_LEFT, NULL, NULL,
18,110,578,116, NULL, NULL, GD_BufferListe, PLACETEXT_ABOVE, NULL, NULL
};
ULONG *CasioLinkGTags[] = {
(ULONG *)(GT_Underscore), (ULONG *)'_', (ULONG *)(TAG_DONE),
(ULONG *)(GT_Underscore), (ULONG *)'_', (ULONG *)(TAG_DONE),
(ULONG *)(GA_Disabled), (ULONG *)TRUE, (ULONG *)(GT_Underscore), (ULONG *)'_', (ULONG *)(TAG_DONE),
(ULONG *)(GA_Disabled), (ULONG *)TRUE, (ULONG *)(GT_Underscore), (ULONG *)'_', (ULONG *)(TAG_DONE),
(ULONG *)(GT_Underscore), (ULONG *)'_', (ULONG *)(TAG_DONE),
(ULONG *)(GT_Underscore), (ULONG *)'_', (ULONG *)(TAG_DONE),
(ULONG *)(GT_Underscore), (ULONG *)'_', (ULONG *)(TAG_DONE),
(ULONG *)(GTNM_Border), (ULONG *)TRUE, (ULONG *)(TAG_DONE),
(ULONG *)(GTTX_Border), (ULONG *)TRUE, (ULONG *)(TAG_DONE),
(ULONG *)(GTTX_Text), (ULONG *)ParamString, (ULONG *)(TAG_DONE),
(ULONG *)(TAG_DONE),
(ULONG *)(GTLV_Labels), (ULONG *)&BufferList, (ULONG *)(GTLV_ReadOnly), (ULONG *)TRUE, (ULONG *)(TAG_DONE)
};
long SetupScreen()
{
if(!(Scr = LockPubScreen(NULL)))
return(6);
if(!(VisualInfo = GetVisualInfo(Scr, TAG_DONE)))
return(7);
return(0);
}
void CloseDownScreen()
{
if(VisualInfo)
{
FreeVisualInfo(VisualInfo);
VisualInfo = NULL;
}
if(Scr)
{
UnlockPubScreen(NULL, Scr);
Scr = NULL;
}
}
long OpenWind()
{
struct NewGadget ng;
struct Gadget *g;
UWORD lc, tc;
if(!(g = CreateContext( &CasioLinkGList))) return(8);
for(lc = 0, tc = 0; lc < CasioLink_CNT; lc++)
{
CopyMem((char * )&CasioLinkNGad[lc], (char *)&ng, sizeof(struct NewGadget));
ng.ng_VisualInfo = VisualInfo;
ng.ng_TextAttr = &topaz8;
ng.ng_LeftEdge += 4;
ng.ng_TopEdge += 11;
CasioLinkGadgets[lc] = g = CreateGadgetA((ULONG)CasioLinkGTypes[lc], g, &ng, (struct TagItem*)&CasioLinkGTags[tc]);
while(CasioLinkGTags[tc]) tc += 2;
tc++;
if(!g) return(9);
}
if(!(Menus = CreateMenus(CasioLinkNewMenu, GTMN_FrontPen, 0L, TAG_DONE))) return(10);
LayoutMenus(Menus, VisualInfo, GTMN_TextAttr, &topaz8, TAG_DONE);
if(!(Wnd = OpenWindowTags( NULL,
WA_Left, 10,
WA_Top, 10,
WA_Width, 620,
WA_Height, 256,
WA_IDCMP, BUTTONIDCMP|TEXTIDCMP|LISTVIEWIDCMP|IDCMP_MENUPICK|IDCMP_RAWKEY|\
IDCMP_CLOSEWINDOW|IDCMP_REFRESHWINDOW|IDCMP_VANILLAKEY,
WA_Flags, WFLG_DRAGBAR|WFLG_DEPTHGADGET|WFLG_CLOSEGADGET|\
WFLG_SMART_REFRESH|WFLG_ACTIVATE,
WA_Gadgets, CasioLinkGList,
WA_Title, "Casio 850 <-> AMIGA",
WA_PubScreen, Scr,
WA_MinWidth, 620,
WA_MinHeight, 256,
WA_MaxWidth, 620,
WA_MaxHeight, 512,
TAG_DONE ))) return(11);
SetMenuStrip(Wnd, Menus);
GT_RefreshWindow(Wnd, NULL);
DrawBevelBox(Wnd->RPort, 21, 17, 155, 49, GT_VisualInfo, VisualInfo, GTBB_Recessed, TRUE, TAG_DONE);
DrawBevelBox(Wnd->RPort, 191, 17, 238, 49, GT_VisualInfo, VisualInfo, GTBB_Recessed, TRUE, TAG_DONE);
DrawBevelBox(Wnd->RPort, 444, 17, 155, 49, GT_VisualInfo, VisualInfo, GTBB_Recessed, TRUE, TAG_DONE);
PrintIText(Wnd->RPort, IText, 0, 0);
return(0);
}
void CloseWind()
{
if(Menus)
{
ClearMenuStrip(Wnd);
FreeMenus(Menus);
Menus = NULL;
}
if(Wnd)
{
CloseWindow(Wnd);
Wnd = NULL;
}
if(CasioLinkGList)
{
FreeGadgets(CasioLinkGList);
CasioLinkGList = NULL;
}
}