/*
   simple program to show WMAddArrowButton function in WM.a
		Hans 06/09/96
*/
#include "IWInclude.h"
#include "WMInclude.h"
char status[20];
extern Widget firstshell;

int callback(int *idir )
{
   sprintf(status,"dir = %d but= %d",*idir,WMGetLastButNum());
   WMUpdateGroup( 1 );
   if( *idir == 1 )
   {
     sleep( 2 );
     XtUnrealizeWidget( firstshell );
     XFlush( XtDisplay(firstshell));
     sleep( 5 );
     XtRealizeWidget( firstshell );
   }
   return;
}
int quit()
{
    exit( 0 );
}
  
main()
{
int one=1,two=2,three=3,four=4; 
   strcpy( status, "                   " );
   WMInit(NULL);
   WMSetLoc(500, 500);
   WMAddInfoButton("Arrow Widget Demo",NULL);
   WMAttachRightSide();
   WMNewRow();
   WMAddArrowButton(WM_UP_ARROW,callback, &one);
   WMAddArrowButton(WM_DOWN_ARROW,callback, &two);
   WMAddArrowButton(WM_LEFT_ARROW,callback, &three);
   WMAddArrowButton(WM_RIGHT_ARROW,callback, &four);
   WMAddInfoButton("Status:", NULL);
   WMAddText(status,20,1);
   WMNewRow();
   WMAddFuncButton("Exit",quit,NULL,0,0);
   WMAttachRightSide();
   WMDisplay();
   WMAppMainLoop();
}