Hello Guest it is November 21, 2019, 11:48:50 PM

Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - TPS

921
General Mach Discussion / Re: macro for turret for boxford tcl
« on: February 20, 2018, 05:56:22 AM »
sorry correct M6Start macro

922
General Mach Discussion / Re: macro for turret for boxford tcl
« on: February 20, 2018, 05:27:27 AM »
ok here we go, code with comments in english:

Code: [Select]

' TPS 29.01.2018 Version 1.0
' BOXFORD 125TCL
' 8 position ATC with A-Axis

Sub Main()

  Dim newtool As Integer
  Dim acttool As Integer
  Dim grad_pro_tool As Integer
  Dim grad_nach_pin As Integer
  Dim grad_rueckwaerts as Integer
  Dim Anzahl_Takte As Integer
  Dim Dist_schnell As Double
  Dim F_fast As Integer
  Dim F_slow As Integer

If IsLoading() Then
'do nothing during load GCode
' Exit Sub
Else

grad_pro_tool = 45 ' distance between TC places
grad_nach_pin = 10 ' overtravel pin
grad_rueckwaerts = 25 ' trafel back to pin
f_fast = 4000 ' Speed turn fast
f_slow = 2000 ' Speed slow reverse to pin

newtool = GetSelectedTool() ' get the actual tool number
acttool = GetCurrentTool() ' get the new tool number

'let's do some basic checks

' new tool and act tool = 0
If ((newtool = 0) and (acttool = 0)) Then
message("new and acttool = 0 -> do nothing")
Sleep(500)
Exit Sub
End If

' new tool = 0
If (newtool = 0) Then
message("new tool = 0 -> do nothing")
Sleep(500)
Exit Sub
End If

' new tool = act tool
If newtool = acttool Then
message("new tool = act tool -> do nothing")
Sleep(500)
Exit Sub
End If
 
  'check toolnumber ?
If  (((newtool > 8) Or (newtool < 1)) and (newtool <> 0)) Then
DoButton(3)
Sleep(500)
Message (" toolnumber " & newtool & " not in range (1-8). Abort ! ")
Exit Sub
End If

'X-Axis not in reference
If GetOEMLED(807) Then
DoButton(3)
Sleep(500)
Message ("X-Axis not referenced -> Abort !!")
Exit Sub
End If

'Z-Axis not in reference
If GetOEMLED(809) Then
DoButton(3)
Sleep(500)
Message ("Z-Axis not referenced -> Abort !!")
Exit Sub
End If

'let's do something
Message "change tool from: " +CStr(acttool) + " to: " + CStr(newtool)

'calculate number of tools between tools
If newtool > acttool Then Anzahl_Takte = newtool - acttool 
If newtool < acttool Then Anzahl_Takte = 8 - acttool+newtool
   
'number of tool to steps
Dist_schnell = (Anzahl_Takte * grad_pro_tool) + grad_nach_pin


Message "ATC X-Axis to TC position"
Code "G90 G53 G0 X2"
While IsMoving()
Sleep(15)
Wend

Message "ATC Z-Axis to TC position"
Code "G90 G53 G0 Z2"
While IsMoving()
Sleep(15)
Wend

'set A-Axis zero
Code "G92 A0"
'incremental Mode , units per Minute , Exact Stop
Code "G91 G94 G61"

'A-Axis  plus fast
Message "A-Axis plus fast to new tool"
Code "G01 A" & Dist_schnell & "F" & f_fast
While IsMoving()
Sleep(15)
Wend

'A-Axis slow back to pin
Message "A-Axis slow back to pin"
Code "G01 A-" & grad_rueckwaerts &  "F" & f_slow
While IsMoving()
Sleep(15)
Wend

'anounce new tool to system
SetCurrentTool(newtool)

'back to absolute mode
Code "G90" ' back to absolute movement

Message ""
End If

End Sub               


-put this code in your M5Start macro

-delete all code in M6End macro

-this code Needs A-axis for turn axis of TC

-this code requires that a G91 A360 makes exact one turn on TC

-X/Z axis must be referenced

-X-axis refpos = all way to the right side (away from spindle)

-Z-axis refpos = all way up (away from spindle)

Thomas




923
VB and the development of wizards / Re: Boxford ATC
« on: February 20, 2018, 01:54:31 AM »
hi tryed this code the numbers work except the a axis but the motors dont run please advise stephen.brindle@icloud.com or 0044 7775604191 ;D

i have send you a code for ATC here:

http://www.machsupport.com/forum/index.php/topic,36624.msg251085.html#msg251085

please don't start the same Problem at different places:

924
General Mach Discussion / Re: Z speed limiting xy speed
« on: February 20, 2018, 01:46:28 AM »
an other idea might be to use spindlespeed for laserpower


M3 S100 F500
G1 X10  S200
G1 X20  S300
G1 X30  S400
M5

just brainstorming.

925
sorry t have to say this,

it's like a question: can i drive a car with bananas?

sorry again

926
General Mach Discussion / Re: Z speed limiting xy speed
« on: February 19, 2018, 02:24:33 PM »
btw in your Video i have recognized that you are working on a laser Project.

here:

http://www.machsupport.com/forum/index.php/topic,12444.0.html

Tweakie has documented his hard laser road.

as far i got the Information out of this thread the "clue" is to regulate XY Speed instead of laser power.

'hopefully' Tweakie is jumping in here, because i think he has the Experience on laser.

Thomas

927
General Mach Discussion / Re: Z speed limiting xy speed
« on: February 19, 2018, 02:10:44 PM »
ok let's do some basic's


F100
G1 X100 -> will Need 1 Minute because distance is 100mm

F100
G1 Y100 -> will Need 1 Minute because distance is 100mm

F100
G1 X100 Y100 -> will Need about 1 Minute 24 seconds because distance is about 141mm (SQR(X²+Y²))

i hope this example makes clear, that every Z axis movement will slow down XY, because
the real distance is allways longer, than a simple XY movement, because machine is allways
doing constant Speed based on real distance (in CV mode).

Thomas








928
General Mach Discussion / Re: Z speed limiting xy speed
« on: February 19, 2018, 01:42:59 PM »
@TPS
  This does not happen with with X and Y if I make Z constand and change a value  in X or Y.

can you please explain a Little bit, sorry my english is not good enough.

929
General Mach Discussion / Re: Z speed limiting xy speed
« on: February 19, 2018, 01:41:19 PM »
have you tryed "real" (x3) instead of "huge" values?

930
General Mach Discussion / Re: Z speed limiting xy speed
« on: February 19, 2018, 01:05:48 PM »
Hi,
steps per mm and Speed is one thing,
acceleration is an other Point.

i don't know the dimensions of your machine, but i would start with some test's
by entering command into mdi.

for example:

F500
G1 X500 -> measure the needed time

 F500
G1 Y500 -> measure the needed time

F500
G1 X500 Y500 -> measure the needed time

just to make sure not one of the 'major' axis are making the Limit.

then

F500
G1 X500 Y500 Z5 -> measure the needed time

to get a 'feeling' what is 'pushing' the brake.

Thomas