#IFSAME !2 ITEM //if ITEM is second arg, item name replacement was used #IFDEF !1 !A [] $463 !1 !3 //add obj#,item# pair to current item group #ELSE !A [] $463 !1.OBJ !3 //add obj#,item# pair to current item group #ENDIF #SET ZD$ !ZD //increment element counter #IF (!0>3) DEPENDENT_ITEM !4 !5 !6 !7 !8 !9 #ENDIF #ELSE #IFDEF !1 !A [] $463 !1 !2 //add obj#,item# pair to current item group #ELSE !A [] $463 !1.OBJ !2 //add obj#,item# pair to current item group #ENDIF #SET ZD$ !ZD //increment element counter #IF (!0>2) DEPENDENT_ITEM !3 !4 !5 !6 !7 !8 !9 #ENDIF #ENDIF