DEUTSCHMANN AUTOMATION UNIGATE IC-LONWorks Bedienerhandbuch Seite 37

LONWorks
var SelfDocBuffer: buffer[20];
LON SC");
var SelfDocsize : word ;
// init SelfDocString
LonSelfDocString( SelfDocBuffer[0], SelfDocsize);
// note: new init will activate only if ProgramID or SNVT types are
changed,
// like Configmode or Testmode. In this case also bindings will be lost!
// define ProgramID, default = SC000000 SD... for UG512
LON-module
Set ( LONProgramID , 123456 ) ; // SC123456, SC = normal mode
// define BusMethode for fieldbusIN
Set ( BusdataTriggerMethod , DataChange ) ;
only if changed
moveconst (OnChange, 1); // 1 = TRUE, 0 = FALSE
if OnChange equal TRUE then :LonInitEnd;
Set ( BusdataTriggerMethod , BusEvent ) ;
BusEvent
// note: BusEvent - you receive the same data and you can read out from
wich index
:LonInitEnd;
//************************ LON init end
***************************************************
Set ( RS_State_LED , StaticRed ) ;
//*********** start fieldbus
**************************************************************
BusStart ;
Wait ( Bus_Active ) ;
Get ( BusInputLen16 , wBusInSize ) ;
Get ( BusOutputLen16 , wBusOutSize ) ;
Set ( RS_State_LED , RedGreenFlashing ) ;
//*********************
main***************************************************************
:start ;
Get ( BusDataChanged , bDestination ) ;// sind geänderte Busdaten
gekommen ?
37 Bedienerhandbuch UNIGATE
Deutschmann Automation GmbH & Co. KG
moveConst( SelfDocBuffer[0], "Vorlage
moveConst( SelfDocsize, 14);
// CM006969 Configmode
// TM004711 Testmode
// new fieldbus IN data
// new fieldbus IN data on
®
IC - LONWorks (62) V. 2.4
V1.82 with new
24.7.20