В макросе LOADTL/*, найди место вывода номера...
Обычно выводиться здесь:
IF(MODE.MACHINE.TOOLCHG)
IF (GLOBAL.TOOLCHG_BLOCK)
CALL(USE1SET/"MODE.MACHINE.TOOLCHG",LINEAR,POSITION,NURBS,CLW,CCLW)
ELSE
OUTPUT(MODE.MACHINE.TOOLCHG, NEWLIN) ENDIF
ELSE
IF (GLOBAL.TOOLCHG_BLOCK)
CALL(USE1SET/GLOBAL.TOOLCHG_TREG,LINEAR,POSITION,NURBS,CLW,CCLW)
ELSE
OUTPUT(REGISTER.[GLOBAL.TOOLCHG_TREG],NEWLIN)
ENDIF
ENDIF
перед ним присвой регистру D значение номера инструмента.
Например:
**************************
REGISTER.D.VALUE=cldatan.1
IF(MODE.MACHINE.TOOLCHG)
.
.
.
endif
**************************
А дальше все зависит, от того, как у тебя выглядит вывод смены инсрумента:
- если есть M6 или что то типа того (M6 T1 D1), то в таблице функций Function Definition к M6 дописывает регистер D, должно выводиться (не забываем про модальность)
- если в строчке нет функции (T1 D1), тут нужно переделать вывод
Например:
1 - вариант, не забываем про сортировку вывода регистров и функций, меню Sort... и модальность регистра конечно
OUTPUT(MODE.MACHINE.TOOLCHG,Register.D, NEWLIN)
2 - вариант, простой, прямой и всегда дает рабочий вывод... (модальность регистра
)
*OUTPUT(MODE.MACHINE.TOOLCHG, NEWLIN)
OUTPUT(Register.T,Register.D, NEWLIN)