Click above to get retro games delivered to your door ever month!

 IPXEvtIni()
------------------------------------------------------------------------------
 Purpose:
 Initialise the IPX event handler.

 Syntax:
 bResult = IPXEvtIni( [cFuncName] )

 Parameters:
 cFuncName  The name of the function to call, when an IPX event occurs.

 Returns:
 A logical value.

 Description:
 IPXEvtIni() sets up an IPX event so that if an incoming packet is received
 on the listening ipx socket, the CA-Clipper function cFuncName is called.
 IPXEvtIni() passes the name of the CA-Clipper function cFuncName to
 Clipper's event scheduling system. When an incoming packet is received on
 any listening socket set up using IPXSktOpn(), CA-Clipper will stop what
 its doing and call the function cFuncName, when the function returns,
 CA-Clipper carries on with what it was doing previously.

 NOTE: The name of the CA-Clipper function passed to IPXEvtIni() must not
 include the brackets, ie: to pass the function name ONIPX() to IPXEvtIni(),
 it must be passed as "ONIPX."
 To cancel the event IPXEvtIni() must be called without cFuncName.

 Example:
 // To listen for an incoming packet and automatically display it on the
 // bottom line of the screen, by setting and event:

 if( IPXSktOpn() == 0 )  // default = 21845
    IPXEvtIni( "ONIPX" )
 endif

 // ONIPX() will now be called every time and incoming
 // IPX packet is received.

 FUNCTION ONIPX()
 LOCAL cPacket
    cPacket := IPXPktGet()
    @ 24,0 say cPacket
 return NIL

 Notes:
 This function only works with CA-Clipper 5.x.