IF#6020!=1GOTO1
IF[#319.item[3]==1]+[#319.item[7]==1]GOTO1(如果NC解释器忙，退出程序)

#6022.itemdesc[0]=widgetFunc["PlainTextEdit","normalBody","plainText",0]

IF#6022.itemdesc[0]==""GOTO90
#100=""
widgetFunc["saveFileName","*.nc","",100]
IF#100==""GOTO1
widgetFunc["savefile",#100,"",#6022.itemdesc[0]]

#331.item[2]=1;清除画板
#334.itemnum=0
#334.item[1]=#100
#9047=#100
#9048.channel=0
#9048.permission=widgetFunc["getFileLineNum","","",#100]
#403=#100
#333.item[1]=0
#333.item[13]=1
#904=FIX[[#904.itemnum-1]/10]
#904.item[#904.itemnum-1]=#324
#904.itemdesc[#904.itemnum-1]=#1107.itemtitle[11]+#403
#904.itemversion[#904.itemnum-1]=0
#904.itemnum=#904.itemnum+1

#810.permission=0

GOTO1
N90
widgetFunc["messageBox",#6020.itemtitle[1],#6020.itemtitle[18],""]
N1