我有s7-300 siemens840d source,请哪位高手解释其内容及为什么这么编？

owjh

我有s7-300 siemens840d source,请哪位高手解释其内容及为什么这么编？ [复制链接]

bhg—db //Achtung: Parameter BHGIn und BHGOut im FB 1 beachten //Please note FB 1-parmeter BHGIn, BHGOut DATA_BLOCK "strdat" //strdat - ist Anwender DB, is User DB VERSION : 0.0 STRUCT disp : STRING [32 ] := 'sunrise '; //disp ist Datum fuer Bedienhandgeraet //disp is data for the handheld unit END_STRUCT ; BEGIN END_DATA_BLOCK DB120_GUD DATA_BLOCK DB 120 //Anwender DB STRUCT SPDL : STRING [32 ] := 'SPINDLE'; ARM : STRING [32 ] := 'ARM'; MAZ : STRING [32 ] := 'MAGAZINE'; MAZV : STRING [32 ] := 'MAZ_CAPACITY'; TXX : STRING [32 ] := 'T_CODE'; SM19 : STRING [32 ] := 'VATC_M19'; ATCX : STRING [32 ] := 'VATC_X'; ATCY : STRING [32 ] := 'VATC_Y'; ATCZ : STRING [32 ] := 'VATC_Z'; PWD : STRING [32 ] := 'SERVICE_PWD'; MCSX: STRING [32 ] := 'MACHINE_X'; MCSY: STRING [32 ] := 'MACHINE_Y'; MCSZ: STRING [32 ] := 'MACHINE_Z'; WCSX: STRING [32 ] := 'RELATIVE_X'; WCSY: STRING [32 ] := 'RELATIVE_Y'; WCSZ: STRING [32 ] := 'RELATIVE_Z'; RCX: STRING [32 ] := 'RC_X'; RCY: STRING [32 ] := 'RC_Y'; RCZ: STRING [32 ] := 'RC_Z'; NSP : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; NARM : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; NMAZ : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; NMAZV : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; NTXX : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; ASP : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; AX : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; AY : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; AZ : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; NPWD : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; MX : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; MY: STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; MZ : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; WX : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; WY : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; WZ : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; CX : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; CY : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; CZ : STRUCT SYNTAX_ID:BYTE; bereich_u_einheit:byte; spalte:word; zeile:word; bausteintyp:byte; ZEILENANZAHL:BYTE; typ:byte; laenge:byte; END_STRUCT; END_STRUCT; BEGIN END_DATA_BLOCK gpob840d //840D ORGANIZATION_BLOCK OB 1 VERSION: 2.0 VAR_TEMP OB1_EV_CLASS : BYTE; OB1_SCAN_1 : BYTE; OB1_PRIORITY : BYTE; OB1_OB_NUMBR : BYTE; OB1_RESERVED_1 : BYTE; OB1_RESERVED_2 : BYTE; OB1_PREV_CYCLE : INT; OB1_MIN_CYCLE : INT; OB1_MAX_CYCLE : INT; OB1_DATE_TIME : DATE_AND_TIME; END_VAR BEGIN CALL FC 2; //HIER ANWENDERPROGRAMM EINFUEGEN //Insert Userprogram from here END_ORGANIZATION_BLOCK //************************************************************* ORGANIZATION_BLOCK OB 100 VERSION: 2.3 VAR_TEMP OB100_EV_CLASS : BYTE; OB100_STRTUP : BYTE; OB100_PRIORITY : BYTE; OB100_OB_NUMBR : BYTE; OB100_RESERVED_1 : BYTE; OB100_RESERVED_2 : BYTE; OB100_STOP : WORD; OB100_RESERVED_3 : WORD; OB100_RESERVED_4 : WORD; OB100_DATE_TIME : DATE_AND_TIME; END_VAR BEGIN Call fb 1, db 7( MCPNum :=1, MCP1In :=P#E0.0, MCP1Out :=P#A0.0, MCP1StatSend :=P#A8.0, MCP1StatRec :=P#A12.0, MCP1BusAdr :=6, MCP1Timeout :=S5T#700MS, MCP1Cycl :=S5T#200MS, NCCyclTimeout :=S5T#200MS, NCRunupTimeout :=S5T#50S); //HIER ANWENDERPROGRAMM EINFUEGEN //Insert Userprogram from here END_ORGANIZATION_BLOCK //************************************************************* ORGANIZATION_BLOCK OB 40 VERSION: 3.2 VAR_TEMP OB40_EV_CLASS : BYTE; OB40_STRT_INF : BYTE; OB40_PRIORITY : BYTE; OB40_OB_NUMBR : BYTE; OB40_RESERVED_1 : BYTE; OB40_MDL_ID : BYTE; OB40_MDL_ADDR : INT; OB40_POINT_ADDR : DWORD; OB40_DATE_TIME : DATE_AND_TIME; //Belegung durch das Grundprogramm //data for the Basicprogram GP_IRFromNCK : BOOL; //Interrupt from NCK GP_TM : BOOL; //Toolmanagment GP_InPosition : ARRAY [1..31] OF BOOL; //InPos Signal from FC15,16,18 GP_AuxFunction : ARRAY [1..10] OF BOOL; //Auxilary functions GP_FMBlock : ARRAY [1..10] OF BOOL; //not used //HIER ANWENDER-Lokaldaten EINFUEGEN //Insert User-data from here END_VAR BEGIN CALL FC 3; //HIER ANWENDERPROGRAMM EINFUEGEN //Insert Userprogram from here END_ORGANIZATION_BLOCK

SuperStar515

啊！没用过，帮不上忙了，那就帮你顶啦

owjh

这还只是source的一部分，其中block的内容结构还能大概看懂，block有150个块，但这为什么这么遍就一头雾水了，请哪位高手帮帮忙，小第谢谢了

owjh

还有 比如说：块OB40： CALL FB 1 , DB7 MCPNum :=1 MCP1In :=P#I 0.0 MCP1Out :=P#Q 0.0 MCP1StatSend :=P#Q 8.0 MCP1StatRec :=P#Q 12.0 MCP1BusAdr :=6 MCP1Timeout :=S5T#700MS MCP1Cycl :=S5T#200MS MCP2In := MCP2Out := MCP2StatSend := MCP2StatRec := MCP2BusAdr := MCP2Timeout := MCP2Cycl := MCPMPI := MCP1Stop := MCP2Stop := MCP1NotSend := MCP2NotSend := BHG := BHGIn := BHGOut := BHGStatSend := BHGStatRec := BHGInLen := BHGOutLen := BHGTimeout := BHGCycl := BHGRecGDNo := BHGRecGBZNo := BHGRecObjNo := BHGSendGDNo := BHGSendGBZNo := BHGSendObjNo := BHGMPI := BHGStop := BHGNotSend := NCCyclTimeout :=S5T#200MS NCRunupTimeout:=S5T#50S ListMDecGrp := NCKomm :=TRUE MMCToIF := HWheelMMC :=FALSE MsgUser := UserIR := IRAuxfuT := IRAuxfuH := IRAuxfuE := UserVersion := MaxBAG := MaxChan := MaxAxis := ActivChan := ActivAxis := UDInt := UDHex := UDReal := //HIER ANWENDERPROGRAMM EINFUEGEN //Insert Userprogram from here SET = DB10.DBX 56.1 等等