N1000 DEF INT IND,STEPS,MAX_STEPS,STEP_ENABLE,EXT_ENABLE
N1010 MAX_STEPS=20 ;NUMERO STEP DA ESEGUIRE
N1020 M37 M77
N1030 M72
N1030 INIZIO:
N1040 IND=100
N1050 G64 G90
N1060 IF $A_DBB[1]==1 GOTOF RIT_ZERO
N1070 IF $A_DBB[0]==1 GOTOF CICLO
N1080 IF $A_DBB[0]==3 GOTOF FINE
N1090 GOTOB INIZIO
N1100 CICLO:
N1120 WAITP(Y)
N1130 WAITP(Z)
N1140 WAITP(W)
N1150 WAITP(B)
N1160 G1 Y=R60 F=R69
N1170 POSA[W]=R51 FA[W]=R59
N1180 G1 Z=R71 F=R79
N1190 WAITP(W)
N1200 G1 Y=R70 F=R79
N1210 M38 M73
N1211 M82
;*****************************************************************
N1220 FOR STEPS=1 TO MAX_STEPS
;CONTROLLO VELOCITA'<>0 O PAUSA<>0
N1230 IF (R[IND+2]>0) OR (R[IND+5]>0)
N1240 ID=1 WHEN $R[IND+6]==1 DO M22
N1250 ID=2 WHEN $R[IND+6]==0 DO M23
N1260 ID=3 WHEN $R[IND+4]>0 DO M20
N1270 ID=4 WHEN $R[IND+4]==0 DO M21
N1280 ID=5 WHEN $R[IND+3]>0 DO MOV[B]=1 FA[B]=R[IND+3]*360
N1290 ID=6 WHRN $R[IND+3]==0 DO MOV[B]=0
N1300 ID=7 WHRN $R[IND+7]==1 DO M34
N1310 ID=8 WHRN $R[IND+7]==0 DO M35
N1320 ID=9 WHEN $R[IND+6]==2 DO M28
N1330 IF (R[IND+2]>0)
N1340 G1 Y=R[IND] F=R[IND+2] H1=QU(R[IND+4])
N1350 ELSE
N1360 H1=QU(R[IND+4])
N1370 ENDIF
N1380 IF R[IND+5]>0
N1390 G4 F=R[IND+5]
N1400 ENDIF
N1410 ENDIF
N1420 CANCEL()
N1430 IND=IND+10
N1440 ENDFOR
;*****************************************************************
N1450 M23 M21 M35 M50 M83
N1460 DO MOV[B]=0
N1470 RIT_ZERO:
;N1480 M72
N1490 G1 Y=R60 F=R69
N1480 M72
N1500 G0 B=DC(0) W=R50 F=R59
N1510 G1 Z=R61 F=R69 M67
N1520 M73
N1530 IF $A_DBB[1] == 1 GOTOF FINE
N1540 M93
N1550 GOTOB INIZIO
N1560 FINE:
N1570 M30
有几个地方不太懂,我列举如下:
1、N1060-N1080段中使用的“$A_DBB[*]”这个是和什么参数对应的,在哪可以查到
2、N1120 WAITP(Y) ;
N1170 POSA[W]=R51 FA[W]=R59 是什么意思?
N1280 ID=5 WHEN $R[IND+3]>0 DO MOV[B]=1 FA[B]=R[IND+3]*360
N1500 G0 B=DC(0) W=R50 F=R59 中的DC代表什么意思