请问，828d的数控车手动换刀会改变刀号吗？看程序是PLC启动异步子程序，那么异步子程序是怎样改变屏幕上的刀号的？哪位大侠讲解一下，谢谢！

现在调用以下异步子程序后出现17030报警，程序段不允许的数组索引2

PROC PLCASUP1 SAVE SBLOF DISPLOF

;VERSION: 02.12. Feb 07, 2013

;CHANGE : 02.03.00. Mar 04, 2011

;Tracking tools with manually swivelling revolver head

;

DEF INT _T_NEW,_REVPOS,_DP

;------------------------------------

N3 _REVPOS=$A_DBW[0]           ; revolver position from PLC 

                               ;(see function manual Basic Functions P4:PLC 828D Chapter 14.5.1.5)

N4 _T_NEW=$TC_MPP6[1,_REVPOS]  ; T no. of tool in this position

;------------------------------------

N5 IF(_T_NEW>0)                ; there is a tool at the current position

N6   $TC_MAP8[1]=_REVPOS       ; report current revolver position to NCK tool management

N7   _DP=$TC_TP1[_T_NEW]       ; duplo number

  ;----------------------------------

N8   TCA($TC_TP2[_T_NEW],_DP)  ; assign tool identifier to current position

N9 ELSE                        ; there is no tool at the current position

N10   IF($MC_TOOL_MANAGEMENT_MASK B_AND 'H10000') ; MD20310, Bit16: T = position number defined

N11     T=_REVPOS               ; T display: revolver position

N12   ELSE

N13     T0                      ; T display: empty

N14   ENDIF

N15 ENDIF

;------------------------------------

N16 M17