struct DiskObject
{
   UWORD         do_Magic;
   UWORD         do_Version;
   struct Gadget      do_Gadget;
   UBYTE         do_Type;
   char         *do_DefaultTool;
   char         **do_ToolTypes;
   LONG         do_CurrentX;
   LONG         do_CurrentY;
   struct DrawerData   *do_DrawerData;
   char         *do_ToolWindow;
   LONG         do_StackSize;
};

void showToolTypes(struct WBArg *wbarg)
{
   struct   DiskObject *dobj;
   char   **toolarray;
   char   *s;
   BOOL   success = FALSE;
    printf("Lock=0x%lx, Nom=%s\n", wbarg->wa_Lock, wbarg->wa_Name);

   if((*wbarg->wa_Name) && (dobj=GetDiskObject(wbarg->wa_Name)))
   {
      printf("We have read the DiskObject (icon) for this arg\n");
      toolarray = (char **)dobj->do_ToolTypes;

      if(s=(char *)FindToolType(toolarray,"FILETYPE"))
      {
         fprintf(conwin,"    Found tooltype FILETYPE with value %s\n",s);
      }
      if(s=(char *)FindToolType(toolarray,"FLAGS"))
      {
         fprintf(conwin,"    Found tooltype FLAGS with value %s\n",s);
         if(MatchToolValue(s,"BOLD"))
            fprintf(conwin,"      BOLD flag requested\n");
         if(MatchToolValue(s,"ITALICS"))
            fprintf(conwin,"      ITALICS flag requested\n");
         }
      /* Free the diskobject we got */
      FreeDiskObject(dobj);
      success = TRUE;
   }
   else if(!(*wbarg->wa_Name)){
      fprintf(conwin,"  Must be a disk or drawer icon\n");
   }
   else
   {
      fprintf(conwin,"  Can't find any DiskObject (icon) for this WBArg\n");
   }
}

struct WBArg{
BPTR   wa_Lock;   /* Verrou sur le répertoire */
BYTE   *wa_Name;   /* Nom de l'icône */
};

#include <exec/types.h>
#include <workbench/workbench.h> /* Les structures DiskObject et AppIcon */
#include <workbench/startup.h>   /* Les structures WBStartup et WBArg */
#include <exec/libraries.h>

struct Library *IconBase;
struct Library *WBBase;

int main(int argc, char **argv)
{
   struct   DiskObject   *dskobj;
   struct   MsgPort      *mport;
   struct   AppIcon      *appicon;
   struct   AppMessage   *appmsg;
   
   ULONG x;
   
   if(IconBase = OpenLibrary("icon.library",37))
   {
      if (WBBase=OpenLibrary("workbench.library",37))
      {
         /* On obtient l'image d'une icône par défaut (ici un disque) */
         dskobj=GetDefDiskObject(WBDISK);
         if(dskobj!=0)
         {
            /* toujours NULL pour une AppIcon ! */
            dskobj->do_Type=NULL;

            /* Création du port de communication pour que le Workbench puisse nous répondre */
            mport=CreateMsgPort();
            if(mport)
            {
               /* On met l'icône sur le Workbench */
               appicon=AddAppIconA(0,0,"AppIcon",mport,NULL,dskobj,NULL);
               if(appicon)
               {
                  /* On attend un message de la part du Workbench */
                  WaitPort(mport);

                  /* Attention, il peut y avoir plusieurs messages ! */
                  while(appmsg=GetMsg(mport))
                  {
                     if(appmsg->am_NumArgs==0)
                        /* Si NumArgs est nul, alors on a double-cliqué sur l'AppIcon */
                        printf("Double-clic sur l'icône !\n");

                     else if(appmsg->am_NumArgs>0)
                     {
                        /* Si NumArgs est >0 alors l'AppIcon a été activée avec */
                        /* une ou plusieurs autre(s) icônes */
                        printf("Il y a %ld icônes lâchées sur l'AppIcon\n", appmsg->am_NumArgs);
                        for(x=0;xam_NumArgs;x++)
                           printf("Icône #%ld, nom='%s'\n",x+1,appmsg->am_ArgList[x].wa_Name);
                     }
                     /* On répond au message */
                     ReplyMsg(appmsg);
                  }
                  RemoveAppIcon(appicon);
               }
               DeleteMsgPort(mport);
            }
            FreeDiskObject(dskobj);
         }
         CloseLibrary(WBBase);
      }
      CloseLibrary(IconBase);
   }

   return(0);
}

#include <exec/types.h>

#include <workbench/workbench.h>
#include <workbench/startup.h>

#include <exec/libraries.h>

#include <dos/dostags.h>

#include <stdio.h>

struct Library *WBBase;

int main(int argc, char **argv)
{
   struct   MsgPort   *msgport;
   struct   AppMenuItem   *appitem;
   struct   AppMessage   *appmsg;
   LONG   result, x;
   BPTR   file;
   
   if (WBBase = OpenLibrary("workbench.library",37))
   {
      /* On crée notre port de communication */
      if(msgport = CreateMsgPort())
      {
         /* On ajoute notre AppMenu aux menus du Workbench */
         appitem=AddAppMenuItemA(NULL,      /* Notre numéro ID */
               (ULONG)"c:NewShell",         /* Notre commande */
               "Cli",                         /* Le texte à afficher */
               msgport,                 /* Notre port de communication */
               NULL);                         /* Pas de paramètres */
         if(appitem)
         {
            WaitPort(msgport);
            appmsg=(struct AppMessage *)GetMsg(msgport)

            printf("AppMenuItem sélectionné avec %ld icônes\n",appmsg->am_NumArgs);
            for(x=0;xam_NumArgs;x++)
               printf("Icône #%ld nom : '%s'\n",x+1,appmsg->am_ArgList[x].wa_Name);

            /* On ouvre une fenêtre pour tout message à afficher */
            if( file=Open("CON:0/40/640/150/Fenêtre de sorite/auto/close/wait",MODE_OLDFILE))
            {
               result=SystemTags((UBYTE *)appmsg->am_UserData,SYS_Input,file,
                     SYS_Output,NULL,
                     SYS_Asynch,TRUE,
                     TAG_DONE);
               /* La commande a échoué */
               if(result == -1) Close(file);
            }
            ReplyMsg((struct Message *)appmsg);
            RemoveAppMenuItem(appitem);
         }

         /* On efface tous les messages potentiellement restants dans la file d'attente */
         while(appmsg=(struct AppMessage *)GetMsg(msgport))
            ReplyMsg((struct Message *)appmsg);

         DeleteMsgPort(msgport);
      }
      CloseLibrary(WBBase);
   }

   return(0);
}

#include <exec/types.h>
#include <workbench/workbench.h>
#include <workbench/startup.h>
#include <exec/libraries.h>

#include <stdio.h>


struct Library      *IntuitionBase;
struct Library      *WBBase;

int main(int argc, char **argv)
{
   struct   MsgPort      *msgport;
   struct   Window      *win;
   struct   AppWindow   *appwin;
   struct   IntuiMessage   *imsg;
   struct   AppMessage   *appmsg;
   struct   WBArg      *WBarg;

   ULONG   winsig,
      appwinsig,
      signals,
      id=1,
      userdata = 0;
   BOOL   done=FALSE;
   int   i;

   if (IntuitionBase = OpenLibrary("intuition.library", 37))
   {
      if (WBBase = OpenLibrary("workbench.library", 37))
      {
         if (msgport = CreateMsgPort())
         {
            if (win = OpenWindowTags(NULL,
            WA_Width,   200,            /* Largeur */
            WA_Height,   50,            /* Hauteur */
            WA_IDCMP,   CLOSEWINDOW,         /* Messages que l'on désire recevoir */
            WA_Flags,   WINDOWCLOSE | WINDOWDRAG,   /* Les gadgets de la fenêtre */
            WA_Title,   "AppWindow",         /* Nom de la fenêtre */
            TAG_DONE))
            {
               if (appwin = AddAppWindow(id, userdata, win, msgport, NULL))
               {
                  winsig = 1 << win->UserPort->mp_SigBit;
                  appwinsig = 1 << msgport->mp_SigBit;

                  while (!done)
                  {
                     /* On attend des signaux IDCMP ou de l'AppWindow */
                     signals = Wait( winsig | appwinsig );

                     if(signals & winsig)   /* Message IDCMP*/
                     {
                        while (imsg=GetMsg(win->UserPort))
                        {
                           if (imsg->Class = CLOSEWINDOW) done=TRUE;
                           ReplyMsg(imsg);
                        }
                     }
                     if(signals & appwinsig)   /* AppMessage */
                     {
                        while (appmsg =GetMsg(msgport))
                        {
                           printf("AppMessage : Type = %ld, ID = %ld, Arguments=%ld\n",
                           appmsg->am_Type,   /* Type de message */
                           appmsg->am_ID,      /* Numéro du message */
                           appmsg->am_NumArgs   /* Arguments */
                           );
                           WBarg = appmsg->am_ArgList;
                           for (i=0; iam_NumArgs; i++)
                           {
                              printf("arg(%ld): Name='%s', Lock=%lx\n",
                              i,      /* numéro */
                              WBarg->wa_Name,   /* Nom de l'icône */
                              WBarg->wa_Lock   /* Verrou sur le répertoire */
                              );
                              WBarg++;
                           }
                           ReplyMsg(appmsg);
                        }
                     }
                  } 
                  RemoveAppWindow(appwin);
               }
               CloseWindow(win);
            }
            /* On efface tous les messages en attente */
            while(appmsg = (struct AppMessage *)GetMsg(msgport))
            {
               ReplyMsg((struct Message *)appmsg);
            }
            DeleteMsgPort(msgport);
         }
         CloseLibrary(WorkbenchBase);
      }
      CloseLibrary(IntuitionBase);
   }

   return(0);
}