Advertisement
sebyvs

Untitled

May 25th, 2020
23
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.79 KB | None | 0 0
  1. PROC Path_20()
  2. TPReadNum z_param, "La ce distanta sa vopsesc? (translare pe z)";
  3. MoveJ Target_50,v2000,fine,tWeldGun\WObj:=wobj1;
  4. MoveJ Target_60,v2000,fine,tWeldGun\WObj:=wobj1;
  5.  
  6. MoveJ RelTool(Target_50,-100,0,z_param),v2000,fine,tWeldGun\WObj:=wobj1;
  7. MoveJ RelTool(Target_60,-100,0,z_param),v2000,fine,tWeldGun\WObj:=wobj1;
  8.  
  9. MoveJ RelTool(Target_50,-200,0,z_param),v2000,fine,tWeldGun\WObj:=wobj1;
  10. MoveJ RelTool(Target_60,-200,0,z_param),v2000,fine,tWeldGun\WObj:=wobj1;
  11.  
  12. MoveJ RelTool(Target_50,-300,0,z_param),v2000,fine,tWeldGun\WObj:=wobj1;
  13. MoveJ RelTool(Target_60,-300,0,z_param),v2000,fine,tWeldGun\WObj:=wobj1;
  14.  
  15. MoveAbsJ jp2,v5000\t:=1,fine,tWeldGun\WObj:=wobj1;
  16. ENDPROC
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement