马斯利绕线机winding cycle程序翻译

佚名 · 0905

资料

文件大小32.51 KB

文件格式docx

分享时间2024-11-03

更多此类文档

立即下载

还剩15页未读，继续阅读

本资源只提供10页预览，全部文档请下载后查看！喜欢就下载吧，查找使用更方便

立即下载

文本内容:

马斯利绕线机程序翻译winding cycleBlock〃设置正在进行的绕组U01_SetWindinglnProgressTRUE;//Check partspresent on spindles,if therearen*t bobbinsdo nonexecute windingprogram〃检查主轴上的零件，如果没有筒子，则不执行卷绕程序U01_Check_Partslnfos_OnSpindleS,U01_BOBBINSPRESENT WINDINGCYCLE_END;〃检查轴上的零件〃〃，有线轴，卷绕循环结束〃柜台管理//Counter management〃增加计数器加载生产计数U01_lncrease_CounterPCS_LOADED;PCS//=============================================================================*//2014-11-18Spostato quiin altocome richiestoda MarsilliCina//Se Poperatorenon caricai rocchettisullo shuttlee siaccorge quandoormai hachiuso ilriparodeve:1:premere subitostop2:premere ripristinofilo3:attendere chela bobinatricesi fermicon Ierroredi ripristinofilo4:resettare Iunit5:eseguire ilsetpoint eripartire*〃主轴上的零件状态//Parts statuson spindle〃将零件信息存储在主U01_Store_Partslnfos_OnSpindleU01_COILSINPROGRESS FALSE;/轴上如有，错误根据马西里中国的要求搬到这里014-11-18如果操作员没有将线轴装到梭上，并且注意到遮蔽物关闭时，他必须立即按停止键1按线程重置2等待绕线机停止，出现螺纹复位错误3重置装置？4运行设定点并重新启动5〃二』========================〃第二次绕线第二槽位GplAbsAxMove|u01_Yl,

79.45|;//执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4;//-------------------------Winding2-N4-一绕线2-4槽-----------------------〃执行顺时针绕线U01_Wnd;//---------------------------Winding----------------------------------------〃执行轴旋转度GplAbsAxMoveU01_Vl,-

15.00,AccDecPerc:=50;VI15〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4,ConnectValue:=5;GplAbsAxMove^U01Yl,

73.0,U01X4,-

69.0,U01Z

30.0;GplAbsAxMoveU01_Z

434.5;zGplAbsAxMove^U01_Yl,

154.80;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃进入绕线室//Entry intowinding chamber〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4;GplAbsAxMoveU01_X4,-

72.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMoveU01_X4,-

73.5,U01_Z4,

30.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMove^U01Yl,

159.46,U01Z4,

25.00;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;//执彳亍轴旋转度GplAbsAxMoveU01_Vl

0.00,U01_X4,-

100.00;VI0z〃执行主轴释放程序Parallel U01_Release_Spindle_lndex;〃执行插入尾座指数程序Parallel U01_lnsert_Tailstock_lndex;〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4;GplAbsAxMove^U01Yl,

139.46;GplAbsAxMoveU01_X4,-

23.0;〃第二次绕线第三槽位置GplAbsAxMove^U01Yl,

149.14;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4;//-------------------------Winding2-N9-一一绕线2-9槽--------------------〃执行顺时针绕线U01_Wnd;//---------------------------Winding----------------------------------------〃执行轴旋转度GplAbsAxMoveU01_Vl,-

15.00,AccDecPerc:=50;VI15〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4,ConnectValue:=5;GplAbsAxMove|u01Yl,

142.7|U01X4,-

69.0,U01Z4,

30.0;GplAbsAxMoveU01_Z4,

34.5;GplAbsAxMoveU01_Yl,

224.5GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃执行轴连接〃进入绕线室//Entry intowinding chamber〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4;GplAbsAxMoveU01_X4,-

72.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMoveU01_X4,-

73.5,U01_Z4,

30.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMove^U01_Yl,

229.15|U01Z4,

25.00;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃执行轴旋转度GplAbsAxMoveU01_Vl,

0.00,U01_X4,-

100.00;VI0〃执行主轴释放程序Parallel U01_Release_Spindle_lndex;〃执行插入尾座指数程序Parallel U01_lnsert_TailstockJndex;〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4;GplAbsAxMove|u01Yl,

209.15|GplAbsAxMoveU01_X4,-

23.0;〃第二次绕线第四槽位置GplAbsAxMoveluOl.Yl,

218.83;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4;//-------------------------Winding2-N10----------------绕线2-10槽----------〃执行逆时针绕线U01_WndR;//---------------------------Winding----------------------------------------WaitEndOfParallel,U01_Remove_WireScrap,;〃等待清除废金属丝完成〃输入导线张紧器参数U01_Enter_WireTensioner_Parameters10,30,10;GplAbsAxMoveU01_Y3,

0.00,Behaviour:=AX_CONTINUE;//执行轴旋转度GplAbsAxMoveU01_Vl,-

15.00,AccDecPerc:=50;VI15〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4,ConnectValue:=5;GplAbsAxMove|u01Yl,

212.75U01X4,-

69.0,U01Z4,

30.0;zGplAbsAxMoveU01_Z4,

34.5;GplAbsAxMoveU01_Yl,

166.20;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃等待轴移动完成GplWaitEndMovementU01_Y3;Y3〃输入导线张紧器参数U01_Enter_WireTensioner_Parameters15,30,10;〃进入绕线室//Entry intowinding chamber〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4;GplAbsAxMoveU01_X4,-

72.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMove^UOl Yl,

164.0U01X4,-

73.5,U01Z4,

30.0,SpeedPerc:=70,AccDecPerc:=70;zGplAbsAxMove|u01Yl,

161.00,U01Z4,

25.00;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;GplAbsAxMoveU01_Vl,

0.00,U01_X4,-

95.00,SpeedPerc:=60;GplAbsAxMoveU01_Z4,-

8.00;GplAbsAxMoveU01_Vl,

90.00,U01_X4,-

32.00;//------------------------------Last Wrap-------最后一次包头头两组U01_final_wrap_l_2;//------------------------------Last Wrap-------最后一次包头头两组//=============================Third Phase=====================================〃第三相线夹持//Third phasewire clampingGplAbsAxMoveU01X3,-

30.00,U01Y3,

27.00,Behaviour:=AX_CONTINUE;GplAbsAxMoveU01Yl,

8.0,U01Vl,

90.0,U01X4,-

39.0;〃等待轴移动完成GplWaitEndMovementU01_X3,U01_Y3;〃输入导线张紧器参数U01_Enter_WireTensioner_Parameters7,30,10;〃初始绕线头开始//Initial wrapbegin〃设置轴连接GplSetAxesJoinU01_Yl,U01_X3,U01_Y3,U01_Z3,U01_X4,U01_Z4;GplAbsAxMoveU01_Z3,

83.0,U01_Z4,

15.0;GplAbsAxMoveU01Yl,-

21.8,U01X3,-

40.0,U01Y3,

52.0,AccDecPerc:=80;GplAbsAxMoveU01_X4,-

40.5;GplAbsAxMoveU01_Z4,

22.0;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X3,U01_Y3,U01_Z3,U01_X4,U01_Z4;〃设置单位轴进给速度GplSetUnitAxesFeedRate16;〃设置轴连接GplSetAxesJoinU01_Yl,U01_Y3,U01_X4,U01_Z4,ConnectValue:=l;REPEAT5〃重复5次______________________GplAbsAxMoveU01Yl,-

21.8,U01Y3,

52.0;GplAbsAxMoveU01_X4,-

34.5;GplAbsAxMoveU01_Yl,-

20.5;GplAbsAxMoveU01_Z4,

15.00;GplAbsAxMoveU01_Yl-

14.0,U01Y3,

45.0;zGplAbsAxMoveU01_X4,-

37.0;GplAbsAxMoveU01_Yl,-

16.0,U01_X4,-

39.7,U01_Z4,

23.1;END_REPEAT;〃结束重复___________________GplAbsAxMoveU01Yl,-

21.8,U01Y3,

52.0;GplAbsAxMoveU01_X4,-

34.5;GplAbsAxMoveU01Yl,-

20.5;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_Y3,U01_X4,U01_Z4;〃设置单位轴进给速度GplSetUnitAxesFeedRatelOO;〃剪线头//Initial cutGplAbsAxMoveU01_Z4,

0.00;GplAbsAxMoveU01Vl,

80.0,U01X3,-

34.2,U01Z3,

87.3,Behaviour:=AX CONTINUE;GplAbsAxMoveU01_Yl,-

22.0,U01Y3,

59.2,SpeedPerc:=70,AccDecPerc:=70;〃等待轴移动结束GplWaitEndMovementU01_Vl,U01_X3,U01_Z3;〃移动剪刀到水平移动工作位置U01_Move_CuttingDevice_Horizontal_WorkPosition;〃延时DelaySecO.l;GplAbsAxMoveU01_Z3,

88.3;〃关闭剪线程序U01_Close_CuttingDevice;GplAbsAxMoveU01_Y3,

57.9,U01_Z3,

89.5;〃将剪刀装置移动到水平复位位U01_Move_CuttingDevice_Horizontal_RestPosition;置〃执行剪线程序Parallel U01_Open_CuttingDevice;GplAbsAxMoveU01_Vl,

90.0,U01_Z3,

28.0;〃输入导线张紧器参数U01_Enter_WireTensioner_Parameters9,30,10;Parallel U01_Remove_WireScrapAxis_\/ertical_ParkingPosition:=-

29.00,Axis_Depth_ParkingPosition:=-

190.00,NumberOfRepeat:=2,Shaking:=TRUE;〃执行移除线屑程序轴垂直停车位置轴深度停车位置重复次数摇动次数=-29=-

190.00,=2,=TRUE〃进入绕线室//Entry intowinding chamber〃执行主轴释放程序Parallel U01_Release_Spindle_lndex;GplSetAxesJoinU01_Yl,UO1_V1,U01_X4;GplAbsAxMoveU01Vl,

0.0,U01X4,-

23.0,SpeedPerc:=60,AccDecPerc:=75;〃第三次绕线第一槽位置GplAbsAxMoveU01Yl,-

13.47;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_Vl,U01_X4;〃执行插入尾座指数程序Parallel U01_lnsert_Tailstock_lndex;//-------------------------Winding3-N5----------------绕线3-5槽-------------〃执行顺时针绕线U01_Wnd;//---------------------------Winding----------------------------------------〃执行轴旋转度GplAbsAxMoveU01_Vl,-

15.00,AccDecPerc:=50;VI15〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4,ConnectValue:=5;GplAbsAxMove|u01Yl,-

20.1|U01X4,-

69.0,U01Z4,

30.0;GplAbsAxMoveU01_Z4,

34.5;GplAbsAxMove|u01Yl,

61.90GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃执行轴连接〃进入绕线室//Entry intowinding chamber〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4;GplAbsAxMoveU01_X4,-

72.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMoveU01_X4,-

73.5,U01_Z4,

30.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMove^U01_Yl,

66.50,U01Z4,

25.00;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;//执行轴旋转度GplAbsAxMoveU01_Vl,

0.00,U01_X4-

100.00;VI0z〃执行主轴释放程序Parallel U01_Release_Spindle_lndex;〃执行插入尾座指数程序Parallel U01_lnsert_TailstockJndex;〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4;GplAbsAxMove^U01Yl,

46.50;GplAbsAxMoveU01_X4,-

23.0;〃第三次绕线第二槽位置GplAbsAxMove^U01_Yl,

56.22;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4;//-------------------------Winding3-N6——绕线3-6槽------------------------〃执行逆时针绕线U01_WndR;//---------------------------Winding----------------------------------------〃执行轴旋转度GplAbsAxMoveU01_Vl,-

15.00,AccDecPerc:=50;VI15〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4ConnectValue:=5;,GplAbsAxMove^U01Yl,

49.6,U01X4,-

69.0,U01Z4,

30.0;GplAbsAxMoveU01_Z

434.5;zGplAbsAxMove^U01Yl,

132.00;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃进入绕线室//Entry intowinding chamber〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4;GplAbsAxMoveU01_X4,-

72.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMoveU01_X4,-

73.5,U01_Z4,

30.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMove^U01Yl,

136.20,U01Z

25.00;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;//执行轴旋转度GplAbsAxMoveU01_Vl,

0.00,U01_X4,-

100.00;VI0〃执行主轴释放程序Parallel U01_Release_Spindle_lndex;Parallel U01_lnsert_Tailstock_lndex;〃执行插入尾座指数程序〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4;GplAbsAxMove|u01_Yl,

116.20;GplAbsAxMoveU01_X4,-

23.0;〃第三次绕线第三槽位置GplAbsAxMoveU01Yl,

125.91^;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4;//-------------------------Winding3-N11----------------绕线3-11槽----------〃执行逆时针绕线U01_WndR;//---------------------------Winding----------------------------------------//执行轴旋转度GplAbsAxMoveU01_Vl,-

15.00,AccDecPerc:=50;VI15〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4,ConnectValue:=5;GplAbsAxMove|u01Yl,

119.2[U01X4,-

69.0,U01Z4,

30.0;GplAbsAxMoveU01_Z4,

34.5;GplAbsAxMove|u01_Yl,

201.50;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃进入绕线室//Entry intowinding chamber〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4;GplAbsAxMoveU01_X4,-

72.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMoveU01_X4,-

73.5,U01_Z4,

30.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMove^U01Yl

205.90[U01Z4,

25.00;z〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃执行轴旋转度GplAbsAxMoveU01_Vl,

0.00,U01_X4,-

100.00;VI0〃执行主轴释放程序Parallel U01_Release_Spindle_lndex;〃执行插入尾座指数程序Parallel U01_lnsert_Tailstock_lndex;〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4;GplAbsAxMove|u01_Yl,

185.90;GplAbsAxMoveU01_X4,-

23.0;〃第三次绕线第四槽位■GplAbsAxMoveU01Yl,

195.60^〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4;//-------------------------Winding3-12-----------绕线3-12槽------------------〃执行顺时针绕线U01_Wnd;//---------------------------Winding----------------------------------------WaitEndOfParallel,U01_Remove_WireScrapl;〃等待清除废金属丝完成GplAbsAxMoveU01_Y3,

0.00,Behaviour:=AX_CONTINUE;GplAbsAxMoveU01_Vl,-

15.00,AccDecPerc:=50;GplAbsAxMove|u01Yl,

189.o|U01X4,-

69.0,U01Z

30.0;GplSetAxesJoinU01_Yl,U01_Z4;GplAbsAxMoveU01_Z

434.5;zGplAbsAxMove|u01_Yl,

166.20;GplExecuteAxesJoinU01_Yl,U01_Z4;GplWaitEndMovementU01_Y3;〃输入导线张紧器参数U01_Enter_WireTensioner_Parameters15,30,10;〃完成了//Out ofslot〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4;GplAbsAxMoveU01_X4,-

72.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMove^U01Yl,

164.0,U01X4,-

73.5,U01Z4,

30.0,SpeedPerc-70,AccDecPerc:=70;GplAbsAxMove^U01Yl,

161.00,U01Z4,

25.00,SpeedPerc:=70,AccDecPerc:=70;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;GplAbsAxMoveU01_Vl,

0.00,U01_X4,-

95.00;GplAbsAxMoveU01_Z4,-

8.00;GplAbsAxMoveU01_Vl,

90.00,U01_X4,-

30.00;//-------------------------------Last Wrap--------------------------U01_final_wrap;//-------------------------------Last Wrap--------------------------〃最终轴和设备位置//Final axisand devicepositionGplSetAxesJoinU01_Yl,U01_Vl,U01_Y3,U01_Z3,U01_Z4;GplAbsAxMoveU01_Z3,-

29.0,U01_Z4-

55.0;,GplAbsAxMove^U01Yl

20.0,U01VL

0.0,U01Y3,-

190.0;zGplExecuteAxesJoinU01_Yl U01_Vl,U01_Y3,U01_Z3,U01_Z4;/U01_Enter_WireTensioner_Parameters8,30,10;//主轴上的零件状态//Parts statuson spindleU01_Store_Partslnfos_OnSpindleU01_COILSPRESENT FALSE;,U01_Check_WireTensioner_WireStatus8,FALSE;〃第一周期管理//First cyclemanagement U01_Disable_FirstCycle;//----------------------------Cycle End-------------------------------------WINDINGCYCLE_END://----------------------------Cycle End-------------------------------------〃设置正在进行的绕组U01_SetWindinglnProgressFALSE;EndBlock//---------------------------Wire resume——线的中断后重新开始-------------------------------〃检查绕线是否断开//Check WireBreak断线控制//Controllo RotturaFiloGplVarTestU01_FirstCycle；=,,TRUE WIRE_RESUME;/GplVarTestU01_WireResume_Request；=,,TRUE,WIRE_RESUME;〃断线恢复请求GplVarTestU01_WireTensioner_WireBreak_Present/=,,TRUE,WIRE_RESUME;〃存在绕线张紧器钢丝断裂GOTO WIRE_OK;WIRE_RESUME:〃主轴—导线_恢复—程序U01_Spindle_Wire_Resume_Procedure;WIRE_OK://------------------------STARTCYCLE--------------启动循环------------------------〃第一相线夹持//First phasewire clamping〃发布尾架指数Parallel U01_Release_Tailstock_lndex;〃释放尾座深度气动制动器Parallel U01_Release_Tailstock_Depth_PneumaticBrake;打开线夹Parallel U01_Open_WireScrapRemoving_Clamps;GplAbsAxMoveU01_X3,-

20.0,U01_Y3,

20.0,Behaviour:=AX_CONTINUE;WaitEndOfParallel,U01_Release_Tailstock_Depth_PneumaticBrake;〃等待释放尾座深度气动制动器完成〃等待发布尾架指数完成WaitEndOfParallelCUO^Release^ailstockJndex;〃起始GplAbsAxMove^U01Yl,

54.4,U01Vl,

90.0,U01X4,-

102.0,SpeedPerc:=50,AccDecPerc:=50;绕线头位置GplWaitEndMovementU01_X3,U01_Y3;〃运动方式二持续GplAbsAxMoveU01_Z3,

88.00,Behaviour:=AX_CONTINUE;GplAbsAxMoveU01_ZlZ2,-

9.0,U01_Z

415.0;,〃等待结束移动GplWaitEndMovementU01_Z3;WaitEndOfParallel,U01_Open_WireScrapRemoving_Clamps,;〃等待打开线夹完成〃设置单位轴进给速度GplSetUnitAxesFeedRate40;〃设置轴连接GplSetAxesJoinU01_X3,U01_Y3;GplAbsAxMoveU01_Y3,

0.00;GplAbsAxMoveU01_X3,-

40.0;GplAbsAxMoveU01_Y3,

16.0;〃执行轴连接GplExecuteAxesJoinU01_X3,U01_Y3;〃设置单位轴进给速度GplSetUnitAxesFeedRatelOO;〃关闭线夹U01_Close_WireScrapRemoving_Clamps;GplErrorCheck theclamp;//----------------------------Clamps wiremanagement------线夹管理-------------------〃检查线路恢复U01_Check_WireResumeOPEN_CLAMP;〃显示第一周期错误U01_Show_FirstCycle_Error;〃开口钳OPEN_CLAMP:〃存储导线张紧器导线状态U01_Store_WireTensioner_WireStatus;打开线导杆线夹U01_Open_WireGuideBar_WireClamps;////----------------------------First Cyclemanagement------第一周期管理-------------------〃主轴上的零件状态//Parts statusonspindle〃将零件储存在主轴上线圈//U01_Store_Partslnfos_OnSpindleU01_COILSINPROGRESS,FALSE;检查进展〃第一次绕头开始//Initial wrapbegin〃输入导线张紧器参数U01_Enter_WireTensioner_Parameters7,30,10;〃设置轴连接GplSetAxesJoinU01_Y3,U01_Z3,U01_X4,U01_Z4;GplAbsAxMoveU01_Y3,

26.0,U01_Z3,

75.0;GplAbsAxMoveU01_X4,-

39.5,U01_Z4,

15.0;〃执行轴连接GplExecuteAxesJoinU01_Y3,U01_Z3U01_X4,U01_Z4;,〃运动方式二持续GplAbsAxMoveU01_X3,-

40.0,U01_Z3,

83.0,Behaviour:=AX_CONTINUE;〃第一次缠绕线头位置GplAbsAxMove|u01_Yl,

25.o|U01_Y

347.0,AccDecPerc:=100;zGplAbsAxMoveU01_X4,-

40.5,U01_Z4,

22.0,AccDecPerc:=80;〃等待结束移动GplWaitEndMovementU01_X3,U01_Z3;〃设置单位轴进给率GplSetUnitAxesFeedRate16;〃执行轴连接连GplSetAxesJoinU01_Yl,U01_Y3,U01_X4,U01_Z4ConnectValue:=l;z接值二1〃程序重复次绕第一个线头位置REPEATS5GplAbsAxMoveU01_X4,-

34.5;GplAbsAxMoveiu01Yl,

26.0;GplAbsAxMoveU01_Z4,

15.00;GplAbsAxMoveU01Yl,

32.4,U01Y3,

47.0;GplAbsAxMoveU01_X4,-

37.0;GplAbsAxMoveU01Yl,

30.4U01X4,-

39.7,U01Z4,

23.1;zGplAbsAxMoveU01Yl,

25.0,U01Y3,

54.0;〃结束程序循环END_REPEAT;GplAbsAxMoveU01X4,-

34.5;GplAbsAxMoveU01_Yl,

26.0;〃执行轴连接GplExecuteAxesJoinU01_Yl U01_Y3,U01_X4,U01_Z4;,〃设置单位轴进给率GplSetUnitAxesFeedRatelOO;〃第一根线头剪切//Initial Cut绕线模块提起至位GplAbsAxMoveU01_Z4,

0.00;//0GplAbsAxMoveU01_Vl,

80.0,U01_X3,-

34.1,U01_Z3,

87.3,Behaviour:=AX_CONTINUE;〃移动到剪线■GplAbsAxMove^U01Yl,

24.4,U01Y3,

59.2,SpeedPerc:=50,AccDecPerc:=50;GplWaitEndMovementU01_Vl,U01_X3,U01_Z3;〃将剪刀装置移动到水平工作位置U01_Move_CuttingDevice_Horizontal_WorkPosition;〃延时DelaySec

0.2;GplAbsAxMoveU01_Z3,

88.9,SpeedPerc:=

20.0,AccDecPerc:=

30.0;〃关闭剪刀阀U01_Close_CuttingDevice;GplAbsAxMoveU01_Y3,

58.8,U01_Z3,

89.5,SpeedPerc:=

20.0,AccDecPerc:=

20.0;〃将剪刀装置移动到水平复位位置U01_Move_CuttingDevice_Horizontal_RestPosition;〃打开剪刀阀Parallel U01_Open_CuttingDevice;//旋转到度GplAbsAxMoveU01_Vl,

90.0,U01_Z

328.0;90,Parallel U01_Remove__WireScrapAxis_\/ertical_ParkingPosition:=-

29.0,Axis_Depth_ParkingPosition:=-

190.00,NumberOfRepeat:=2,Shaking:=TRUE;〃执行移除线屑程序轴垂直停车位置轴深度停车位置二-重复次数摇动次数=-

29.0,

190.00,=2,二TRUE〃进入绕线室//Entry intowinding chamber〃执行主轴释放程序Parallel U01_Release_Spindle_lndex;〃执行轴连接GplSetAxesJoinU01_Yl,UO1_V1,U01_X4;GplAbsAxMoveU01_Vl,

0.0,U01_X4,-

23.0,SpeedPerc:=60;〃第一个绕线包位置GplAbsAxMove^U01Yl,

33.0;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_Vl,U01_X4;〃执行插入尾座指数程序Parallel U01_lnsert_Tailstock_lndex;//-------------------------Winding1-N1-----------------绕线1-1槽--------〃执行顺时针绕线U01_Wnd;//---------------------------Winding----------------------------------------〃执行翻转线盘跳转到第二槽〃执行轴旋转角度GplAbsAxMoveU01_Vl,-

15.00,AccDecPerc:=50;VIGplSetAxesJoinU01_Yl,U01_X4,U01_Z4,ConnectValue:=5;〃第一次过线回位置〃顺时GplAbsAxMove^U01Yl,

26.8|U01X4,-

69.0,U01Z4,

30.0;针在槽位加逆时针绕减

85.8GplAbsAxMoveU01_Z4,

34.5;〃第一次绕线出线位置顺时针在槽位减逆GplAbsAxMove^U01Yl,

108.50;

5.8时针在槽位加

5.8GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃进入绕线室//Entry intowinding chamber//--------------------------------开始轴连接-------------------------Start_AxesJ oin-〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4;GplAbsAxMoveU01_X4,-

72.0,SpeedPerc:=70AccDecPerc:=70;zGplAbsAxMoveU01_X4,-

73.5,U01_Z4,

30.0,SpeedPerc:=70,AccDecPerc:=70;；//第二GplAbsAxMove^U01Yl,

113.00U01Z4,

25.00,SpeedPerc:=70,AccDecPerc:=70;次绕线入线位置预拉紧位置张紧位置顺时针在上位置上减逆时针在上位置加

54.5〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;//----------------------------------------------------------------End_AxesJoin结束轴连接一〃执行GplAbsAxMoveU01_Vl,

0.00,U01_X4-

100.00,SpeedPerc:=70,AccDecPerc:=70;z轴旋转零度VI〃执行主轴释放程序Parallel U01_Release_Spindle_lndex;〃执行插入尾座指数程序Parallel U01_lnsert_Tailstock_lndex;//--------------------------------------开始轴连接----------挂线程序----------------StarJAxesJoin--〃设置轴连接挂槽第一根线程序〃逆时针减顺时针加GplSetAxesJoinU01_YL U01_X4;|

9.68或者加减

9.6810GplAbsAxMove^U01Yl

93.00;zGplAbsAxMoveU01_X4,-

23.0;〃第二槽绕线位置GplAbsAxMoveU01_Yl,

102.68;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4;//----------------------------------------------------------------End_AxesJoin一结束轴连接//------------------开始绕第二槽线——Winding1-N2——绕线1-2槽〃执行逆时针绕线U01_WndR;//---------------------------Winding----------------------------------------〃执行轴旋转角度GplAbsAxMoveU01_Vl,-

15.00,AccDecPerc:=50;VIGplSetAxesJoinU01_Yl,U01_X4,U01_Z4,ConnectValue:=5;〃第二槽出线位置GplAbsAxMove|u01Yl,

96.5U01X4,-

69.0,U01Z

30.0;GplAbsAxMoveU01_Z4,

34.5;〃第三槽入线位置GplAbsAxMove|u01Yl,

178.20;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃进入绕线室//Entry intowinding chamber〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4;GplAbsAxMoveU01_X4,-

72.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMoveU01_X4,-

73.5,U01_Z4,

30.0,SpeedPerc:=70,AccDecPerc:=70;《；〃第三槽跨线位置GplAbsAxMove U01Yl,

182.69U01Z4,

25.00;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃执行轴旋转零度GplAbsAxMoveU01_Vl,

0.00,U01_X4,-

100.00;VI〃执行主轴释放程序Parallel U01_Release_Spindle_lndex;〃执行插入尾座指数程序Parallel U01_lnsert_Tailstock_lndex;〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4;〃进线槽抖动位置GplAbsAxMoveU01_Yl,

162.69^GplAbsAxMoveU01_X4,-

23.0;〃第三槽绕线位置GplAbsAxMoveU01Yl,

172.37jf//执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4;//-------------------------Winding1-N7-----------------绕线1-7槽------------〃执行逆时针绕线U01_WndR;//---------------------------Winding----------------------------------------〃执行轴旋转角度GplAbsAxMoveU01_Vl,-

15.00,AccDecPerc:=50;VIGplSetAxesJoinU01_Yl,U01_X4,U01_Z4,ConnectValue:=5;GplAbsAxMove|u01Yl,

166.22,U01X4,-

69.0,U01Z4,

30.0;GplAbsAxMoveU01_Z4,

34.5;GplAbsAxMove|u01_Yl

247.90^z〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃进入绕线室//Entry intowinding chamber〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4U01_Z4;zGplAbsAxMoveU01_X4,-

72.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMoveU01_X4,-

73.5,U01_Z4,

30.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMove^U01Yl,

252.38,U01Z4,

25.00,SpeedPerc:=70,AccDecPerc:=70;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃执行GplAbsAxMoveU01_Vl,

0.00,U01_X4,-

100.00,SpeedPerc:=70,AccDecPerc:=70;轴旋转零度VI〃执行主轴释放程序Parallel U01_Release_Spindle_lndex;〃执行插入尾座指数程序Parallel U01_lnsert_Tailstock_lndex;〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4;GplAbsAxMove|u01Yl,

232.38;GplAbsAxMoveU01_X4,-

23.0;GplAbsAxMove|u01_Yl,

242.06;//执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4;//-------------------------Winding1-N8一绕线1-8槽------------------------〃执行顺时针绕线U01_Wnd;//---------------------------Winding----------------------------------------WaitEndOfParallel,U01_Remove_WireScrap,;〃等待清除废金属丝完成〃输入导线张紧器参数U01_Enter_WireTensioner_Parameters10,30,10;GplAbsAxMoveU01_Y3,

0.00,Behaviour:=AX_CONTINUE;〃执行轴旋转度GplAbsAxMoveU01_Vl,-

15.00,AccDecPerc:=50;VI15〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4ConnectValue:=5;GplAbsAxMove|u01_Yl,z

236.0,U01X4,-

69.0,U01Z4,

30.0;GplAbsAxMoveU01_Z4,

34.5;GplAbsAxMove|u01^Yl,

166.20;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃等待移动完成GplWaitEndMovementU01_Y3;Y3〃输入导线张紧器参数U01_Enter_WireTensioner_Parameters15,30,10;〃进入绕线室//Entry intowinding chamber〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4;GplAbsAxMoveU01_X4,-

72.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMove^U01_Yl,

164.0,U01_X4,-

73.5,U01_Z

30.0,SpeedPerc:=60,AccDecPerc:=70;〃移动到封星位置GplAbsAxMove^U01Yl,

161.00,U01Z

425.00;z〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃执行轴旋转零度GplAbsAxMoveU01_Vl,

0.00,U01_X4,-

95.00;VIGplAbsAxMoveU01_Z4-

8.00;z//执行轴旋转度GplAbsAxMoveU01_Vl,

90.00,U01_X4,-

34.00;VI90//------------------------------Last Wrap一最后一次包头头两组--------------------------------U01_final_wrap_l_2;//------------------------------Last Wrap-最后一次包头头两组-----------------------------------第二阶段绕线//=============================Second Phase==〃第二相线夹持//Second phasewire clampingGplAbsAxMoveU01_X3,-

30.0,U01_Y3,

27.0,Behaviour:=AX_CONTINUE;GplAbsAxMove^U01_Yl,

31.2U01Vl,

90.0,U01X4,-

39.0;Z〃等待轴移动完成GplWaitEndMovementU01_X3,U01_Y3;〃初始绕线头开始//Initial wrapbegin〃输入导线张紧器参数U01_Enter_WireTensioner_Parameters7,30,10;〃设置轴连接GplSetAxesJoinU01_Yl,U01_X3,U01_Y3,U01_Z3,U01_X4,U01_Z4;GplAbsAxMove^U01_Z3,

83.0,|u01_Z4,

15.0;GplAbsAxMove^U01Yl,

2.2|U01X3,-

40.0,U01Y3,

47.0,AccDecPerc:=80;GplAbsAxMoveU01_X4,-

40.5;GplAbsAxMoveU01_Z

422.0;z〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X3,U01_Y3,U01_Z3,U01_X4,U01_Z4;〃设置单位轴进给速度GplSetUnitAxesFeedRate12;〃设置轴连接GplSetAxesJoinU01_Yl,U01_Y3,U01_X4,U01_Z4,ConnectValue:=l;REPEAT5〃重复5次____________________GplAbsAxMove^U01_Yl,

1.1\U01_X4,-

38.5;GplAbsAxMove^U01Yl,

2.7|u01X4,-

34.5;GplAbsAxMoveU01_Z4,

15.00;GplAbsAxMove^U01_Yl,

9.2U01Y3,

47.0;GplAbsAxMoveU01_X4,-

37.0;GplAbsAxMove^U01_Yl,

7.2^U01_X4,-

39.7,U01_Z4,

23.1;GplAbsAxMove^U01Yl

2.2|u01Y3,

54.0;z〃结束重复END_REPEAT;GplAbsAxMove^U01_Yl,U01_X4,-

38.5;GplAbsAxMove^U01Yl,

2.7|U01X4,-

34.5;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_Y3,U01_X4U01_Z4;/〃设置单位轴进给速度GplSetUnitAxesFeedRatelOO;〃剪线头//Initial cuttingGplAbsAxMoveU01_Z

40.00;,GplAbsAxMoveU01_Vl,

80.0,U01_X3,-

34.3,U01_Z3,

87.3,Behaviour:=AX_CONTINUE;GplAbsAxMove^U01Yl,

1.0U01Y3,

59.1,SpeedPerc:=70,AccDecPerc:=70;z〃等待轴移动完成GplWaitEndMovementU01_Vl,U01_X3,U01_Z3;〃移动剪刀到水平移动工作位置U01_Move_CuttingDevice_Horizontal_WorkPosition;延时DelaySec

0.2;GplAbsAxMoveU01_Z3,

88.6,SpeedPerc:=

10.0;〃关闭剪线程序U01_Close_CuttingDevice;GplAbsAxMoveU01_Z3,

89.5;〃将剪刀装置移动到水平复位位置U01_Move_CuttingDevice_Horizontal_RestPosition;〃执行剪线程序Parallel U01_Open_CuttingDevice;GplAbsAxMoveU01_Vl,

90.0,U01_Z3,

28.0;〃输入导线张紧器参数U01_Enter_WireTensioner_Parameters8,30,10;Parallel U01_Remove_WireScrapAxis_Vertical_ParkingPosition:=-

29.00/Axis_Depth_ParkingPosition:=-

190.00,NumberOfRepeat:=2,Shaking:=TRUE;〃执行移除线屑程序轴垂直停车位置二轴深度停车位置二重复次数二摇动次-29-

190.00,2,数二TRUE〃进入绕线室//Entry intowinding chamber〃执行主轴释放程序Parallel U01_Release_Spindle_lndex;〃设置轴连接GplSetAxesJoinU01_Yl,UO1_V1,U01_X4;GplAbsAxMoveU01Vl,

0.0,U01X4,-

23.0,SpeedPerc:=60;〃第二次绕线第一槽位置GplAbsAxMoveU01Y

9.76;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_Vl,U01_X4;〃执行插入尾座指数程序Parallel U01_lnsert_Tailstock_lndex;//-------------------------Winding2-N3------------------绕线2-3槽-----------〃执行逆时针绕线U01_WndR;//---------------------------Winding----------------------------------------//执行轴旋转度GplAbsAxMoveU01_Vl,-

15.00,AccDecPerc:=50;VI15〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4,ConnectValue:=5;GplAbsAxMove^U01Yl,

3.3|U01X4,-

69.0,U01Z4,

30.0;GplAbsAxMoveU01_Z

434.5;zGplAbsAxMove^U01Yl,

85.10;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃进入绕线室//Entry intowinding chamber〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4,U01_Z4;GplAbsAxMoveU01_X4,-

72.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMoveU01_X4,-

73.5,U01_Z4,

30.0,SpeedPerc:=70,AccDecPerc:=70;GplAbsAxMove^U01Yl,

90.75U01Z4,

25.00,SpeedPerc:=70,AccDecPerc:=70;〃执行轴连接GplExecuteAxesJoinU01_Yl,U01_X4,U01_Z4;〃执行轴旋转度GplAbsAxMoveU01_Vl,

0.00,U01_X4,-

100.00;VI0〃执行主轴释放程序Parallel U01_Release_Spindle_lndex;〃执行插入尾座指数程序Parallel U01Jnsert_Tailstock_lndex;〃设置轴连接GplSetAxesJoinU01_Yl,U01_X4;GplAbsAxMove^U01Yl,

70.75^;GplAbsAxMoveU01_X4,-

23.0;。

更多此类文档

关于文档

个人认证

优秀文档

获得点赞 0

文件大小32.51 KB

文件格式docx

分享时间2024-11-03

更多此类文档

立即下载