VOID (*cpx_button)( mrets, nclicks, event )

MRETS *mrets;

WORD nclicks;

WORD *event;

typedef struct
{
 WORD x;   /* X position of mouse */
 WORD y;   /* Y position of mouse */
 WORD buttons;  /* Mask of buttons depressed */
 WORD kstate;  /* Keyboard shift state */
} MRETS;nclicks specifies the number of clicks processed. If this event should terminate the CPX, the function should place a 1 in the WORD pointed to by event.

cpxinfo.cpx_button = cpx_button;

return ( "cpxinfo );

cpx_call()

BOOLEAN (*cpx_call)( work )

GRECT *work;

cpxinfo.cpx_call = cpx_call;

return ( &cpxinfo );

cpx_close()

VOID (*cpx_close)( flag )

BOOLEAN flag;

cpxinfo.cpx_close = cpx_close;

return ( "cpxinfo );

cpx_draw()

VOID (*cpx_draw)( clip )

GRECT *clip;

cpxinfo.cpx_draw = cpx_draw;

return ( &cpxinfo );

cpx_hook()

BOOLEAN (*cpx_hook)( event, msg, mrets, key, nclicks )

WORD event;

WORD *msg;

WORD *mrets;

WORD key, nclicks;

cpxinfo.cpx_hook = cpx_hook;

return ( &cpxinfo );

cpx_init()

CPXINFO (*cpx_init)( xcpb )

XCPB *xcpb;

; Startup stub for CPX's without save area

  .xref _cpx_init

  .text

cpxstart:
  jmp  _cpx_init

  .end
If the CPX has default data which is to be saved back into the CPX with the CPX_Save() function, the following stub should be used (substitute the '.dc.w 1' statement with the appropriate amount of space required to store your data):
; Startup stub for CPX's with save area

  .xref _cpx_init
  .globl _save_vars

  .text

cpxstart:
  jmp  _cpx_init

  .data

_save_vars:
  .dc.w  1

  .end

cpx_key()

VOID (*cpx_key)( kstate, key, event )

WORD kstate;

WORD key;

WORD *event;

cpxinfo.cpx_key = cpx_key;

return ( &cpxinfo );

cpx_m1()

VOID (*cpx_m1)( mrets, event )

MRETS *mrets;

WORD event;

cpxinfo.cpx_m1 = cpx_m1;

return ( &cpxinfo );

cpx_m2()

WORD (*cpx_m2)( mrets, event )

MRETS *mrets;

WORD event;

cpxinfo.cpx_m2 = cpx_m2;

return ( &cpxinfo );

cpx_timer()

VOID (*cpx_timer)( event )

WORD *event;

cpxinfo.cpx_timer = cpx_timer;

return ( &cpxinfo );

cpx_wmove()

VOID (*cpx_wmove)( work )

GRECT *work;

cpxinfo.cpx_wmove = cpx_wmove;

return ( &cpxinfo );

XCONTROL Utility Functions

The XCONTROL utility functions are accessed via the XCPB (XControl Parameter Block) in the following format for users of 'C':

ret = (*xcpb->Function)( param1, param2, ... )

These functions provide functions useful mostly to CPX's as well as functions that closely resemble AES functions better suited for CPX's. The XCONTROL Utility Functions are:

(*xcpb->CPX_Save)()

(*xcpb->Get_Buffer)()

(*xcpb->getcookie)()

(*xcpb->GetFirstRect)()

(*xcpb->GetNextRect)()

(*xcpb->MFsave)()

(*xcpb->Popup)()

(*xcpb->rsh_fix)()

(*xcpb->rsh_obfix)()

(*xcpb->Set_Evnt_Mask)()

(*xcpb->Sl_arrow)()

(*xcpb->Sl_dragx)()

(*xcpb->Sl_dragy)()

(*xcpb->Sl_size)()

(*xcpb->Sl_x)()

(*xcpb->Sl_y)()

(*xcpb->)()

(*xcpb->XGen_Alert)()

(*xcpb->CPX_Save)()

BOOLEAN (*xcpb->CPX_Save)( ptr , num );

VOIDP ptr;

LONG num;

(*xcpb->CPX_Save)( ptr, num );

(*xcpb->Get_Buffer)()

VOIDP (*xcpb->Get_Buffer)( VOID )

bufptr = (*xcpb->Get_Buffer)();

(*xcpb->getcookie)()

WORD (*xcpb->getcookie)( cookie, pvalue )

LONG cookie;

LONG *pvalue;

err = (*xcpb->getcookie)( cookie, pvalue );

(*xcpb->GetFirstRect)()

GRECT *(*xcpb->GetFirstRect)( prect )

GRECT *prect;

rdraw = (*xcpb->GetFirstRect)( prect );

(*xcpb->GetNextRect)()

GRECT *(*xcpb->GetNextRect)( VOID )

rdraw = (*xcpb->GetNextRect)();

VOID
cpx_draw( clip )
GRECT *clip;
{
 GRECT *rdraw;

 rdraw = (*xcpb->GetFirstRect)( clip );

 while( rdraw )
 {
  /* User redraw function */
  my_redraw( rdraw );
  rdraw = (*xcpb->GetNextRect)();
 }
}

(*xcpb->MFsave)()

VOID (*xcpb->MFsave)( flag, mf )

BOOLEAN flag;

MFORM *mf;

(*xcpb->MFsave)( flag, mf );

(*xcpb->Popup)()

WORD (*xcpb->Popup)( items, num_items, default, font, button, world );

CHAR *items[];

WORD num_items, default, font;

GRECT *button, *world;

ret = (*xcpb->Popup)( items, num_items, default, font, button, world );

(*xcpb->rsh_fix)()

VOID (*xcpb->rsh_fix)( num_objs, num_frstr, num_frimg, num_tree, rs_object, rs_tedinfo, rs_strings, rs_iconblk, rs_bitblk, rs_frstr, rs_frimg, rs_trindex, rs_imdope );

WORD num_objs, num_frstr, num_frimg, num_tree;

OBJECT *rs_object;

TEDINFO *rs_tedinfo;

char *rs_strings[];

ICONBLK *rs_iconblk;

BITBLK *rs_bitblk;

LONG *rs_frstr, *rs_frimg, *rs_trindex;

struct foobar *rs_imdope;

(xcpb->rsh_fix)( num_objs, num_frstr, num_frimg, num_tree, rs_object, rs_tedinfo, rs_strings, rs_iconblk, rs_bitblk, rs_frstr, rs_frimg, rs_trindex, rs_imdope );

(*xcpb->rsh_obfix)()

VOID (*xcpb->rsh_obfix)( tree, curob )

OBJECT *tree;

WORD curob;

(*xcpb->rsh_obfix)( tree, curob );

(*xcpb->Set_Evnt_Mask)()

VOID (*xcpb->Set_Evnt_Mask)( mask, m1, m2, time )

WORD mask;

MOBLK *m1;

MOBLK *m2;

LONG time;

typedef struct
{
 WORD m_out; /* 0 = enter, 1 = exit */
 WORD m_x;
 WORD m_y;
 WORD m_w;
 WORD m_h;
} MOBLK;time specifies the length of time to specify for the MU_TIMER event if appropriate.

(*xcpb->Set_Evnt_Mask)( mask, m1, m2, time );

(*xcpb->Sl_arrow)()

VOID (*xcpb->Sl_arrow)( tree, base, slider, obj, inc, min, max, numvar, dir, foo )

OBJECT *tree;

WORD base, slider, obj, inc, min, max;

WORD *numvar;

WORD dir;

VOID (*foo)();

(*xcpb->Sl_arrow)( tree, base, slider, obj, inc, min, max, numvar, dir, foo );

graf_mkstate( &mx, &my, &dum, &dum );
objc_offset( tree, slider, &ox, &oy );
inc = ( ( my < oy ) ? ( -1 ) : ( 1 ) );
(*xcpb->Sl_arrow( tree, base, slider, base, inc, min, max, &numvar, VERTICAL, foo );

(*xcpb->Sl_dragx)()

VOID (*xcpb->Sl_dragx)( tree, base, slider, min, max, numvar, foo )

OBJECT *tree;

WORD base, slider, min, max;

WORD *numvar;

VOID (*foo)();

(*xcpb->Sl_dragx)( tree, base, slider, min, max, numvar, foo );

(*xcpb->Sl_dragy)()

VOID (*xcpb->Sl_dragx)( tree, base, slider, min, max, numvar, foo )

OBJECT *tree;

WORD base, slider, min, max;

WORD *numvar;

VOID (*foo)();

(*xcpb->Sl_dragy)( tree, base, slider, min, max, numvar, foo );

(*xcpb->Sl_size)()

VOID (*xcpb->Sl_size)( tree, base, slider, num_items, visible, direction, min_size )

OBJECT *tree;

WORD base, slider, num_items, visible, direction, min_size ;

(*xcpb->Sl_size)( tree, base, slider, num_items, visible, direction, min_size );

(*xcpb->Sl_x)()

VOID (*xcpb->Sl_x)( tree, base, slider, value, min, max, foo )

OBJECT *tree;

WORD base, slider, value, min, max;

VOID (*foo)();

(*xcpb->Sl_x)( tree, base, slider, value, min, max, foo );

VOID (*xcpb->Sl_y)( tree, base, slider, value, min, max, foo )

OBJECT *tree;

WORD base, slider, value, min, max;

VOID (*foo)();

(*xcpb->Sl_y)( tree, base, slider, value, min, max, foo );

(*xcpb->Xform_do)()

WORD (*xcpb->Xform_do)( tree, editobj, msg )

OBJECT *tree;

WORD editobj;

WORD *msg;

ret = (*xcpb->Xform_do)( tree, editobj, msg );

(*xcpb->XGen_Alert)()

BOOLEAN (*xcpb->XGen_Alert)( id )

WORD id;

ret = (*xcpb->XGen_Alert)( id );