//********** init 2. RS interface (fieldbus) ***********************************
Set ( BusBaudrate , 57600 ) ;      // 9600 = default
//Set ( FBRS_ANZ_DAT_BITS , 8 ) ;  // 8    = default
//Set ( FBRS_ANZ_STOP_BITS , 1 ) ; // 1    = default

//Set ( FBRS_PARITY , 0 ) ;
// PARITY_NO		0     default
// PARITY_ODD		1
// PARITY_EVEN		2
// PARITY_MARK		3	/* Paritybit immer 1 */
// PARITY_SPACE		4	/* Paritybit immer 0 */

Set ( FBRS_TYPE , 2 ) ;
// RS_TYP_232	0x01	default
// RS_TYP_485	0x02
// RS_TYP_422	0x03


//************ start 2.RS interface (fieldbus) *********************************

BusStart ;
Wait ( Bus_Active ) ;

//********************* main ***************************************************
:start ;
Get ( availableBusData , wBusInSize ) ;
 if wBusInSize equal w0 then :Loop;
 ReadBus ( aBusInBuf[0] , wBusInSize ) ;
...

:Loop;

...
jump :start;