; DXF teaching extension: run inline before the page is built.
IF#6002.itemnum==13GOTO810
IF#6002.itemnum!=10GOTO899
IF#6013.itemnum>0GOTO899
IF#6014.itemnum>0GOTO899
IF#6015.itemnum>0GOTO899
#6002.itemnum=13
#6002.item[10]=10
#6002.item[11]=3
#6002.item[12]=2
N810
#6002.itemtype[10]=2
#6002.itemtype[11]=2
#6002.itemtype[12]=2
#6002.itemunit[10]="mm"
#6002.itemunit[11]="mm"
#6002.itemunit[12]="mm"
#6002.itemtitle[10]="成品孔径 D"
#6002.itemtitle[11]="刀具直径 I"
#6002.itemtitle[12]="每层切深 Q"
#6002.itemdesc[10]="Z0为工件表面；先有底孔；结束返回R平面"
#6002.itemunit[0]="G81钻孔<<G82钻孔<<G83钻孔<<G196 圆插补扩孔"
IF#9980.item[2]!=1GOTO811
#6002.itemtitle[10]="Finished diameter D"
#6002.itemtitle[11]="Tool diameter I"
#6002.itemtitle[12]="Depth per layer Q"
#6002.itemdesc[10]="Surface Z0; pilot hole required; return to R"
#6002.itemunit[0]="G81<<G82<<G83<<G196 Circular Bore Milling"
N811
#6002.channel=0
WHILE#6002.channel<#6003.itemnumDO8
#6003.itemunit[#6002.channel]=#6002.itemunit[0]
#6002.channel=#6002.channel+1
END8
GOTO812
N899
widgetFunc["messageBox","DXF G196","Parameter allocation conflict: need #6002 with 10 fields and free #6013..#6015. Merge before installation.",""]
GOTO999
N812
IF#899.version==1GOTO1
#899.version=1
#899.itemdesc[0]="/env/dxf/dxf.ui"
widgetFunc["QFrame","dxfframe","refresh",""]
N1

N999
