Jetter JVM-407B-HMI, Руководство пользователя

Страница: 159 / 300

Jetter AG 159
JVM-407B SAE J1939 STX API
Task main autorun
// Initializing CAN 1
bySAEJ1939Channel := 1 ;
own_Source_Address := 20 ;
SAEJ1939Init (bySAEJ1939Channel, own_Source_Address);
// Engine Hours, Revolutions -- on Request
SAEJ1939AddRx (bySAEJ1939Channel, 65253 , 0x00 , 1 , 0 ,
SAEJ1939_DWORD, sizeof(EngineTotalHours), EngineTotalHours,
EngineHoursTbl, 5000 , 150 );
// Required for a cyclical task
TaskAllEnableCycle ();
EnableEvents;
End_Task ;
Task t_RequestPGN_5000 cycle 5000
Var
Return_value : Int;
End_Var ;
// Requesting total machine operating hours
Return_value := SAEJ1939RequestPGN (bySAEJ1939Channel, 0x00 ,
65253 );
If Return_value Then
Trace ('PGN Request failed');
End_If ;
End_Task ;