DATA_BLOCK DB 80
TITLE =
VERSION : 0.1


  STRUCT 	
   Schrijf_naar_ct_1620 : DWORD ;	
   Schrijf_naar_ct_1621 : DWORD ;	
   Schrijf_naar_ct_1622 : DWORD ;	
   Schrijf_naar_ct_1623 : DWORD ;	
   Schrijf_naar_ct_1624 : DWORD ;	
   Schrijf_naar_ct_1625 : DWORD ;	
   Schrijf_naar_ct_1626 : DWORD ;	
   Schrijf_naar_ct_1627 : DWORD ;	
   Lees_vanaf_ct_1620 : DWORD ;	
   Lees_vanaf_ct_1621 : DWORD ;	
   Lees_vanaf_ct_1622 : DWORD ;	
   Lees_vanaf_ct_1623 : DWORD ;	
   Lees_vanaf_ct_1624 : DWORD ;	
   Lees_vanaf_ct_1625 : DWORD ;	
   Lees_vanaf_ct_1626 : DWORD ;	
   Lees_vanaf_ct_1627 : DWORD ;	
  END_STRUCT ;	
BEGIN
   Schrijf_naar_ct_1620 := DW#16#0; 
   Schrijf_naar_ct_1621 := DW#16#0; 
   Schrijf_naar_ct_1622 := DW#16#0; 
   Schrijf_naar_ct_1623 := DW#16#0; 
   Schrijf_naar_ct_1624 := DW#16#0; 
   Schrijf_naar_ct_1625 := DW#16#0; 
   Schrijf_naar_ct_1626 := DW#16#0; 
   Schrijf_naar_ct_1627 := DW#16#0; 
   Lees_vanaf_ct_1620 := DW#16#0; 
   Lees_vanaf_ct_1621 := DW#16#0; 
   Lees_vanaf_ct_1622 := DW#16#0; 
   Lees_vanaf_ct_1623 := DW#16#0; 
   Lees_vanaf_ct_1624 := DW#16#0; 
   Lees_vanaf_ct_1625 := DW#16#0; 
   Lees_vanaf_ct_1626 := DW#16#0; 
   Lees_vanaf_ct_1627 := DW#16#0; 
END_DATA_BLOCK

FUNCTION FC 80 : VOID
TITLE =
//Setting CT memorygroup 16 SP Unidrive
//
//01 = 403
//02 = 3.00
//03 = 11 (profibusadres)
//04 = 5
//05 = 16
//06 = 157
//07 = 200
//08 = OFF
//09 = ON
//10 t/m 19 = leesdata
//20 t/m 29 = schrijfdata
//30 = OFF
//31 = Off
//32 = OFF
//33 = OFF
//34 = OFF
//35 = 9158049 (versienummer)
//36 = OFF
//37 = OFF
//38 = 0
//39 = 16
//40 = 16
//41 = 0
//42 = 0
//43 = 0
//44 = 0
//45 = 0
//46 = 0
//47 = 0
//48 = 0
//49 = 0
//50 = 0
//51 = 0
//
//Na wijziging eerst 16.00 op 1000 zetten en daarna de rode knop bedienen.
//Na wijziging eerst 16.00 op 1070 zetten en daarna de rode knop bedienen.
//
//CT data via DB 80
VERSION : 0.1

BEGIN
NETWORK
TITLE =
//DB 80 koppelen aan CT-data

//SCHRIJVEN NAAR CT

//Ct adres 16.20
      L     DB80.DBD    0; 
      T     AD    80; 
//Ct adres 16.21
      L     DB80.DBD    4; 
      T     AD    84; 
//Ct adres 16.22
      L     DB80.DBD    8; 
      T     AD    88; 
//Ct adres 16.23
      L     DB80.DBD   12; 
      T     AD    92; 
//Ct adres 16.24
      L     DB80.DBD   16; 
      T     AD    96; 
//Ct adres 16.25
      L     DB80.DBD   20; 
      T     AD   100; 
//Ct adres 16.26
      L     DB80.DBD   24; 
      T     AD   104; 
//Ct adres 16.27
      L     DB80.DBD   28; 
      T     AD   108; 


//LEZEN VANAF CT

//Ct adres 16.10
      L     ED    80; 
      T     DB80.DBD   32; 
//Ct adres 16.11
      L     ED    84; 
      T     DB80.DBD   36; 
//Ct adres 16.12
      L     ED    88; 
      T     DB80.DBD   40; 
//Ct adres 16.13
      L     ED    92; 
      T     DB80.DBD   44; 
//Ct adres 16.14
      L     ED    96; 
      T     DB80.DBD   48; 
//Ct adres 16.15
      L     ED   100; 
      T     DB80.DBD   52; 
//Ct adres 16.16
      L     ED   104; 
      T     DB80.DBD   56; 
//Ct adres 16.17
      L     ED   108; 
      T     DB80.DBD   60; 


END_FUNCTION