#1551.itemversion[#1551]=23

#1551.itemtitle[#1551]=^11.item[0]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[1]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[2]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[3]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[4]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[5]+"@"

#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[6]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[7]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[8]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[9]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[10]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[11]+"@"

#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[12]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[13]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[14]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[15]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[16]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[17]+"@"

#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[18]+"@"

#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+INT[^11.itemversion[19]]+"@"
#1551.itemtitle[#1551]=#1551.itemtitle[#1551]+^11.item[19]

#1574.item[0]=""
#1574.item[1]=""
#1574.item[2]=""
#1574.item[3]=""
#1574.item[4]=""
#1574.item[5]=""
#1574.item[6]=""
#1574.item[7]=""
#1574.item[8]=""
#1574.item[9]=""
#1574.item[10]=""
#1574.item[11]=""
#1574.item[12]=""
#1574.item[13]=""

IF^11.item[18]==0GOTO1
IF^11.item[18]==1GOTO2
IF^11.item[18]==2GOTO3
GOTO4
N1
#1574.item[14]="G17"

CircleByThreePt[^11.item[0],^11.item[1],^11.item[6],^11.item[7],^11.item[12],^11.item[13],22,23];计算圆心坐标

^12.item[0]=#22
^12.item[1]=#23

^12.item[2]=SQRT[[^11.item[0]-^12.item[0]]*[^11.item[0]-^12.item[0]]+[^11.item[1]-^12.item[1]]*[^11.item[1]-^12.item[1]]];计算半径
^12.item[3]=^12.item[2]
IF[[^11.item[6]-^11.item[0]]*[^11.item[12]-^11.item[6]]+[^11.item[7]-^11.item[1]]*[^11.item[13]-^11.item[7]]<0]THEN^12.item[3]=-^12.item[2]

IF[^11.item[6]-^11.item[0]]*[^11.item[13]-^11.item[1]]-[^11.item[7]-^11.item[1]]*[^11.item[12]-^11.item[0]]>0GOTO10;当前为逆圆,起点与终点互换
GOTO11
N10
^12.item[4]=1

^12.item[5]=^11.item[12]
^12.item[6]=^11.item[13]
^12.item[7]=^11.item[14]
^12.item[8]=^11.item[15]
^12.item[9]=^11.item[16]
^12.item[10]=^11.item[17]

^12.item[11]=^11.item[0]
^12.item[12]=^11.item[1]
^12.item[13]=^11.item[2]
^12.item[14]=^11.item[3]
^12.item[15]=^11.item[4]
^12.item[16]=^11.item[5]
GOTO12
N11
^12.item[4]=0

^12.item[5]=^11.item[0]
^12.item[6]=^11.item[1]
^12.item[7]=^11.item[2]
^12.item[8]=^11.item[3]
^12.item[9]=^11.item[4]
^12.item[10]=^11.item[5]

^12.item[11]=^11.item[12]
^12.item[12]=^11.item[13]
^12.item[13]=^11.item[14]
^12.item[14]=^11.item[15]
^12.item[15]=^11.item[16]
^12.item[16]=^11.item[17]
N12
GOTO4

N2
#1574.item[14]="G18"

CircleByThreePt[^11.item[0],^11.item[2],^11.item[6],^11.item[8],^11.item[12],^11.item[14],22,23];计算圆心坐标

^12.item[0]=#22
^12.item[1]=#23

^12.item[2]=SQRT[[^11.item[0]-^12.item[0]]*[^11.item[0]-^12.item[0]]+[^11.item[2]-^12.item[1]]*[^11.item[2]-^12.item[1]]];计算半径
^12.item[3]=^12.item[2]
IF[[^11.item[6]-^11.item[0]]*[^11.item[12]-^11.item[6]]+[^11.item[8]-^11.item[2]]*[^11.item[14]-^11.item[8]]<0]THEN^12.item[3]=-^12.item[2]

IF[^11.item[6]-^11.item[0]]*[^11.item[14]-^11.item[2]]-[^11.item[8]-^11.item[2]]*[^11.item[12]-^11.item[0]]>0GOTO20;当前为逆圆,起点与终点互换
GOTO21
N20
^12.item[4]=1

^12.item[5]=^11.item[12]
^12.item[6]=^11.item[13]
^12.item[7]=^11.item[14]
^12.item[8]=^11.item[15]
^12.item[9]=^11.item[16]
^12.item[10]=^11.item[17]

^12.item[11]=^11.item[0]
^12.item[12]=^11.item[1]
^12.item[13]=^11.item[2]
^12.item[14]=^11.item[3]
^12.item[15]=^11.item[4]
^12.item[16]=^11.item[5]
GOTO22
N21
^12.item[4]=0

^12.item[5]=^11.item[0]
^12.item[6]=^11.item[1]
^12.item[7]=^11.item[2]
^12.item[8]=^11.item[3]
^12.item[9]=^11.item[4]
^12.item[10]=^11.item[5]

^12.item[11]=^11.item[12]
^12.item[12]=^11.item[13]
^12.item[13]=^11.item[14]
^12.item[14]=^11.item[15]
^12.item[15]=^11.item[16]
^12.item[16]=^11.item[17]
N22
GOTO4

N3
#1574.item[14]="G19"

CircleByThreePt[^11.item[1],^11.item[2],^11.item[7],^11.item[8],^11.item[13],^11.item[14],22,23];计算圆心坐标

^12.item[0]=#22
^12.item[1]=#23

^12.item[2]=SQRT[[^11.item[1]-^12.item[0]]*[^11.item[1]-^12.item[0]]+[^11.item[2]-^12.item[1]]*[^11.item[2]-^12.item[1]]];计算半径
^12.item[3]=^12.item[2]
IF[[^11.item[7]-^11.item[1]]*[^11.item[13]-^11.item[7]]+[^11.item[8]-^11.item[2]]*[^11.item[14]-^11.item[8]]<0]THEN^12.item[3]=-^12.item[2]

IF[^11.item[7]-^11.item[1]]*[^11.item[14]-^11.item[2]]-[^11.item[8]-^11.item[2]]*[^11.item[13]-^11.item[1]]>0GOTO30;当前为逆圆,起点与终点互换
GOTO31
N30
^12.item[4]=1

^12.item[5]=^11.item[12]
^12.item[6]=^11.item[13]
^12.item[7]=^11.item[14]
^12.item[8]=^11.item[15]
^12.item[9]=^11.item[16]
^12.item[10]=^11.item[17]

^12.item[11]=^11.item[0]
^12.item[12]=^11.item[1]
^12.item[13]=^11.item[2]
^12.item[14]=^11.item[3]
^12.item[15]=^11.item[4]
^12.item[16]=^11.item[5]
GOTO32
N31
^12.item[4]=0

^12.item[5]=^11.item[0]
^12.item[6]=^11.item[1]
^12.item[7]=^11.item[2]
^12.item[8]=^11.item[3]
^12.item[9]=^11.item[4]
^12.item[10]=^11.item[5]

^12.item[11]=^11.item[12]
^12.item[12]=^11.item[13]
^12.item[13]=^11.item[14]
^12.item[14]=^11.item[15]
^12.item[15]=^11.item[16]
^12.item[16]=^11.item[17]
N32
GOTO4

N4

IF#912.itemmax[0]==1THEN#1574.item[0]=#1574.itemtitle[0]+^12.item[5]
IF#912.itemmax[1]==1THEN#1574.item[1]=#1574.itemtitle[1]+^12.item[6]
IF#912.itemmax[2]==1THEN#1574.item[2]=#1574.itemtitle[2]+^12.item[7]
IF#912.itemmax[3]==1THEN#1574.item[3]=#1574.itemtitle[3]+^12.item[8]
IF#912.itemmax[4]==1THEN#1574.item[4]=#1574.itemtitle[4]+^12.item[9]
IF#912.itemmax[5]==1THEN#1574.item[5]=#1574.itemtitle[5]+^12.item[10]

IF#912.itemmax[0]==1THEN#1574.item[6]=#1574.itemtitle[6]+^12.item[11]
IF#912.itemmax[1]==1THEN#1574.item[7]=#1574.itemtitle[7]+^12.item[12]
IF#912.itemmax[2]==1THEN#1574.item[8]=#1574.itemtitle[8]+^12.item[13]
IF#912.itemmax[3]==1THEN#1574.item[9]=#1574.itemtitle[9]+^12.item[14]
IF#912.itemmax[4]==1THEN#1574.item[10]=#1574.itemtitle[10]+^12.item[15]
IF#912.itemmax[5]==1THEN#1574.item[11]=#1574.itemtitle[11]+^12.item[16]

#1574.item[12]=#1574.itemtitle[12]+^12.item[3]

IF^11.itemversion[19]==1THEN#1574.item[13]=#1574.itemtitle[13]+INT[^11.item[19]]

#1551.itemdesc[#1551]="G02"+#1574.item[6]+#1574.item[7]+#1574.item[8]+#1574.item[9]+#1574.item[10]+#1574.item[11]+#1574.item[12]

#1551.item[#1551]=#1574.item[14]+"G01"+#1574.item[0]+#1574.item[1]+#1574.item[2]+#1574.item[3]+#1574.item[4]+#1574.item[5]+#1574.item[13]+"
"
#1551.item[#1551]=#1551.item[#1551]+"G02"+#1574.item[6]+#1574.item[7]+#1574.item[8]+#1574.item[9]+#1574.item[10]+#1574.item[11]+#1574.item[12]+"
"

#1551=#1551+1
#1551.channel=FIX[#1551/10]
widgetFunc["SysFunc","0","parser","/env/teach/parsenode"]
