Messages

2411

FAQs / Re: non consistent speed during arcs

« on: February 21, 2015, 06:53:39 AM »

hi,

have you had a look for the CPU usage during a cut.
just thinking that something else makes this stops.

Thomas

2412

VB and the development of wizards / Re: macro for homing

« on: February 21, 2015, 03:00:42 AM »

Hi,

for Example

Sub main()

   SetParam("VelocitiesX",66.66) 'Value in units/sec
   msgbox GetParam("VelocitiesX")


End Sub

Thomas

2413

VB and the development of wizards / Re: macro for homing

« on: February 19, 2015, 02:31:11 AM »

Hi riporeno,

why was wondering if it was possible to set the speed with a macro.

Get/SetParam()

"VelocitiesX" = X MaxVel from motor tuning page (SetParam as units/second. Mach will multiply X60 for display in motor tuning as units/minute.)
"VelocitiesY"= Y MaxVel from motor tuning page (SetParam as units/second. Mach will multiply X60 for display in motor tuning as units/minute.)
"VelocitiesZ" = Z MaxVel from motor tuning page (SetParam as units/second. Mach will multiply X60 for display in motor tuning as units/minute.)

is that what you are looking for ?

Thomas

2414

VB and the development of wizards / Re: macro for homing

« on: February 18, 2015, 02:41:46 AM »

Hi riporeno,

hi TPS
sorry but I do not understand what you mean
  I have two different input
before zeroing I enable a relay that signal out of limits.
arrival on the micro that indicates the first input.
I go back up to find zero index encoder. on the second input.
thank you
regads

i mean to wire both signals ,home switch and index signal, via
a relay to one input, witch is the reference input. then you
can use in both times the reference function, and not reacting
to an input in the macro.

VB macros are only updated 1/10s so it is very hard to see this index
signal. homing function is updated in a higher priority.

Thomas

2415

VB and the development of wizards / Re: macro for homing

« on: February 18, 2015, 02:37:24 AM »

Hi,

Having got to the home position how are the machine coordinates zeroed?
I found   dooembutton(105)  but that does them all.  How can one zero X and Y leaving Z unchanged?

DoButton( 8 ) -> Zero X
DoButton(9) -> Zero Y
DoButton(10) -> Zero Z

DoButton(22) -> Ref. X
DoButton(23) -> Ref. Y
DoButton(24) -> Ref. Z


Regards Thomas

2416

VB and the development of wizards / Re: macro for homing

« on: February 17, 2015, 02:46:23 AM »

Hi reporemo,

is your home switch and your index wired to seperate inputs ?

just an idea:
wire both signals via a relay to the same input
relay off -> normal home switch
relay on -> index

-then do a reference with higher speed to normal switch
-switch relay
-lower reference speed
-do an other reference with slow speed to index



Thomas

2417

VB and the development of wizards / Re: macro for homing

« on: February 16, 2015, 07:13:59 AM »

Hi riporeno

how can I disable
the signal of the axis limits with the macro language.?

not sure why you want to do this, because if limit's and
reference switch are configured for the the same pin,
it's doing reference first.
regarding to your macro, why dont you do a refernce with
high speed (on normal switch), the do a other one with
1/10 of the origin speed ?

also you can change the feed value set maximum motor tuning in?
(with macro language)

just use G1 F*********instead of G0.

Thomas

2418

VB and the development of wizards / Re: macro for homing

« on: February 12, 2015, 06:34:43 AM »

Hi riporeno,

here my proposal:

Code: [Select]

Sub Main ()
  
'Dichiaro le due velocità di spostamento    
   FeedHoming = 20      'Search speed switches Home
  
'Imposed on the parameter of the speed of Homing for X, Y, Z
   SetParam ("ZRefPer", FeedHoming)
   SetParam ("YRefPer", FeedHoming)
   SetParam ("XRefPer", FeedHoming)

'Call the subprogram for the Home Z

'Z I lift fast for a distance definitely superior to its stroke
  
      Code "G0 Z999999"  'TPS G0 does allways full speed no feedrate needed
      While IsMoving() 'wait for input during move
          If IsActive(INPUT1) Then
            'Without approaching fast, wait half a second and I start homing
            DoOEMButton(1003)
            Sleep 500
            DoButton(24)
           While GetOemLed(809) = true 'TPS wait for Z-Ref finished had a lot trouble using IsMoving()
           Sleep(200)
         Wend
      Wend

'ripeto per gli assi Y e X

      Code "G0 Y-999999" 'TPS G0 does allways full speed no feedrate needed
      While IsMoving() 'wait for input during move
          If IsActive(INPUT2) Then
            DoOEMButton(1003)
            Sleep 500
            DoButton(23)
           While GetOemLed(808) = true 'TPS wait for Z-Ref finished had a lot trouble using IsMoving()
           Sleep(200)
         Wend
      Wend

      Code "G0 X-999999" 'TPS G0 does allways full speed no feedrate needed
      While IsMoving() 'wait for input during move
          If IsActive(INPUT3) Then
            DoOEMButton(1003)
            Sleep 500
            DoButton(22)
           While GetOemLed(807) = true 'TPS wait for Z-Ref finished had a lot trouble using IsMoving()
           Sleep(200)
         Wend
        
      Wend

      Code "(Homing eseguito)"
  
End Sub

without GOTO's and some remarks.

Regards Thomas

PS: code is not tested

here http://www.machsupport.com/forum/index.php/topic,27912.0.html
you can read about my homing problems.

2419

Mach Screens / Re: tooltiptext

« on: February 09, 2015, 03:04:07 AM »

hi andmar2005,

a tooltiptext is only showing up, if you are with the mouse
over the element.

Thomas

2420

VB and the development of wizards / Re: macro for homing

« on: February 09, 2015, 03:02:16 AM »

Hi,
ok than let's try an other road:

   Message ("ref. Z-axis")
   DoOemButton(1024) 'Ref Z
   Sleep(500)
   While GetOemLed(809) = true 'wait normal reference to be finished
       Sleep(200)
   Wend
                Message ("ref. Z-axis to index mark")
                'here you can do your reference onto the index signal

Regards Thomas