KUKA 通信子程序 p00.src 注释
DEF P00 ( COMMAND :IN, PGNO_FUNCT :IN, P_ID[] :OUT, E_NO :IN ) DECL P00_COMMAND COMMAND DECL FUNCT_TYPE PGNO_FUNCT DECL CHAR P_ID[] INT E_NO E6AXIS AK_AXIS STRUC E6AXIS REAL A1,A2,A3,A4,A5,A6,E1,E2,E3,E4,E5,E6 $OPERATE.SRC REAL AX_DIST SWITCH COMMAND CASE #INIT_EXT INIT_EXT ( ) CASE #EXT_PGNO EXT_PGNO ( PGNO_FUNCT ) CASE #CHK_HOME CHK_HOME ( ) CASE #EXT_ERR EXT_ERR (P_ID[],E_NO ) ENDSWITCH END ;******************************** ; 函数:初始化外部接口 ;******************************** DEF INIT_EXT ( ) BOOL ERROR INT N PGNO_ERROR=0 ;******************************** ;CHECK HOME ;****************************