home *** CD-ROM | disk | FTP | other *** search
- #include "OSK.h"
-
- struct IntuitionBase *IntuitionBase;
- struct GfxBase *GfxBase;
- struct IntuiMessage *Msg;
- struct Window *Window;
- struct Window *fakewindow;
- struct RastPort *rp;
- struct InputEvent Event;
- struct IOStdReq *request;
- struct MsgPort *port;
-
- struct NewWindow win={
- 68,47,504,106,-1,-1,CLOSEWINDOW|GADGETDOWN|GADGETUP,
- ACTIVATE|WINDOWDRAG|WINDOWDEPTH|WINDOWCLOSE,
- NULL,NULL,(STRPTR)"OSK © Copyright 1989 by Jonathan Potter",NULL,NULL,
- 0,0,0,0,WBENCHSCREEN};
-
- struct GList *first,*gadget,*temp;
-
- struct IntuiText iconText={
- 0,1,JAM2,0,1,NULL,(UBYTE *)"ICON",NULL};
- struct Gadget
- iconGadget={
- NULL,419,0,32,10,GADGHCOMP,RELVERIFY|TOPBORDER,BOOLGADGET,
- NULL,NULL,&iconText,NULL,NULL,1000,NULL},
- openGadget={
- NULL,0,0,110,21,GADGHNONE|GADGIMAGE,GADGIMMEDIATE,WDRAGGING,(APTR)&OSKImage,
- NULL,NULL,NULL,NULL,NULL,NULL};
-
- struct NewWindow iconwin={
- 100,10,110,21,-1,-1,GADGETDOWN,BORDERLESS,&openGadget,
- NULL,NULL,NULL,NULL,0,0,0,0,WBENCHSCREEN};
-