Hello Guest it is December 06, 2019, 02:42:17 AM

Author Topic: G01 Arc no arc?  (Read 1525 times)

0 Members and 1 Guest are viewing this topic.

G01 Arc no arc?
« on: July 25, 2012, 01:43:51 PM »
Hi,

My arc is not coming out as planned, it seems it just doing straight linear lines from point to point.

Here is the macro code I'm using:

' Arc #2

Dim x_start as Double 
Dim z_start as Double
Dim TextLine as String

x_start = 1.01
z_start = 1.240 ' 1.2 ' 1.240

For i= 1 to 24
   Code "G00 X1.0 Z1.25" ' 1.22
      While(IsMoving())
         Sleep(100)
      Wend
   Code "G00 X" & x_start & "Z1.25" ' 1.22
      While(IsMoving())
         Sleep(100)
      Wend
   Code "G01 X1.0 Z" & z_start & "I1.0 K1.0" ' K val?
      While(IsMoving())
         Sleep(100)
      Wend
      ' Msgbox "Arc #" & i & " done."
   x_start = x_start + 0.010
   z_start = z_start - 0.010
Next I


Offline alenz

*
  •  137 137
    • View Profile
Re: G01 Arc no arc?
« Reply #1 on: July 25, 2012, 07:07:49 PM »
Maybe the G01 should be a G02 or G03?
Re: G01 Arc no arc?
« Reply #2 on: July 28, 2012, 01:24:27 PM »
g1 linear
g2 clockwise
g3 counterclockwise
i used to program by hand till i learned cad cam
now id rather skin a cat than write a program by hand