Hello Guest it is October 16, 2021, 02:08:31 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

1591
General Mach Discussion / Re: Random jolts?
« on: March 20, 2018, 11:55:50 AM »
or some other Software on the pc, witch frezes all

1592
General Mach Discussion / Re: Only X-axis motor is working
« on: March 20, 2018, 11:54:38 AM »
ok, i have rotated my pic, and put both underneath,
just to avoid optical Illusion.

and now i am out of ideas to Point you to the fault

1593
VB and the development of wizards / Re: 2 scripts 1 button
« on: March 20, 2018, 08:51:38 AM »
Looks like i has something to do with your file attributes (see Picture)

can cou cross check with gcode lavori files ?

1594
VB and the development of wizards / Re: 2 scripts 1 button
« on: March 20, 2018, 08:02:11 AM »
---the jobs \ gcode section works well

you mean "GCODE LAVORI" ?

are you sure the files are in C:\mach3\gcode ?

because here it works

1595
VB and the development of wizards / Re: 2 scripts 1 button
« on: March 20, 2018, 07:22:31 AM »
for the Moment i do not understand what you mean,
the script loads here any GCode file in c:\Mach3\GCode

1596
VB and the development of wizards / Re: 2 scripts 1 button
« on: March 20, 2018, 06:40:34 AM »
Code: [Select]
Sub Main()
 Begin Dialog SelectCentering 430,250,125,96,"SELEZIONA GCODE"
   OKButton 15,68,40,14
   CancelButton 70,68,40,14
   GroupBox 12,5,100,52,"GCODE",.GroupBox1
   OptionGroup .OptionGroup1
   OptionButton 20,20,70,8," GCODE LAVORI",.OptionButton1
   OptionButton 20,40,70,8," GCODE MACH3"  ,.OptionButton2
  End Dialog

  Dim Dlg1 As SelectCentering
  Button = Dialog (Dlg1)
 
  If Button = 0 Then Exit Sub
  Selected  = Dlg1.OptionGroup1

  'laser is selected ************************************************************
  If Selected = 0 Then '*********************************************************
 
       
   'Gcode Selection Box
   Dim MyList()
   Begin Dialog GcodeFileDlgL 60, 60, 190, 220, "LAVORI Gcode ", .DlgFuncL
   ListBox 10, 10, 150, 180, MyList(), .List1, 2
   CancelButton 42, 198, 40, 12
   OKButton 90, 198, 40, 12
   
   End Dialog
   
   
   Dim frame As GcodeFileDlgL
   
'   Dim frame As GcodeFileDlg
   
   ' Show the GcodeFile dialog
   button =Dialog(frame)

   
  End If '**************************************************************
 
 
 
  'web is selected ****************************************************
  If Selected = 1 Then '***********************************************
 
     'Gcode Selection Box
   Dim MyList()
   Begin Dialog GcodeFileDlgM 60, 60, 190, 220, "MACH3 Gcode ", .DlgFuncM
   ListBox 10, 10, 150, 180, MyList(), .List1, 2
   CancelButton 42, 198, 40, 12
   OKButton 90, 198, 40, 12
   End Dialog
   
   
   Dim frame1 As GcodeFileDlgM
   
   
   ' Show the GcodeFile dialog
   button = Dialog(frame1)

     
     
  End If '***********************************************
   
End Sub   

Function DlgFuncL( controlID As String, action As Integer, suppValue As Integer)
   
   
   Select Case action
   Case 1 ' Initialize
   temp = Dir( "C:\LAVORI\GCODE\*.*" )
   count = 0
   While temp <> ""
   count = count + 1
   temp = Dir
   Wend
   Dim x() As String
   ReDim x(count)
   x(0) = Dir( "C:\LAVORI\GCODE\*.*" )
   For i = 1 To count
   x(i) = Dir
   Next i
   DlgListBoxArray "List1", x()
   
   Case 2 ' select
   If controlID = "OK" Then
   LoadFIle("C:\LAVORI\GCODE\" &DlgText("List1"))
   End If
   
   End Select
   
End Function

Function DlgFuncM( controlID As String, action As Integer, suppValue As Integer)
   
   
   Select Case action
   Case 1 ' Initialize
   temp = Dir( "C:\MACH3\GCODE\*.*" )
   count = 0
   While temp <> ""
   count = count + 1
   temp = Dir
   Wend
   Dim x() As String
   ReDim x(count)
   x(0) = Dir( "C:\MACH3\GCODE\*.*" )
   For i = 1 To count
   x(i) = Dir
   Next i
   DlgListBoxArray "List1", x()
   
   Case 2 ' select
   If controlID = "OK" Then
   LoadFIle("C:\MACH3\GCODE\" &DlgText("List1"))
   End If
   
   End Select
   
End Function

   



1597
so the quick and easy check would be to hook a oszilloscope to the puls Input of the Controller.

1598
Hello Craig,

you are right that a couple of different parameter Setting should work.
and one ore the other would have some disadvantage.

but at the Moment stage (1 or 2 rev per min), ther must be an other
basic issue to restrain the Motor to spin in a expeted rpm.

Thomas
 

1599
Also TPS:
How and where did you get these values  (Motor 3200U/min -> max Speed 560000mm/min )
Isn't the 560000 mm/min kind of high value?
did you get 3200 from    560000/175?

from a post on the first side

From the above If I have a 10:1 Gear Box Then with 3200 rev/min I will get a actual 320 rev/min and every revolution at 175 mm I will end up with 56,000 mm/mi

ok i missed the 10:1 gearbox,sorry.

and 1 missed 4x on encoder

so we are here

17.5mm/rev Motor
Motor 3200U/min -> max Speed 56000mm/min -> 933.3mm/s

P1 -44 -> 1
P1 -45 -> 1
P1 -46 -> 4375

Motor Tuning
steps per -> 1000

without and electronic gearbox.

btw, what is your paramater P1-00


sorry for the confusing.

1600
General Mach Discussion / Re: Only X-axis motor is working
« on: March 20, 2018, 03:32:09 AM »
Quote
Quote from: TPS on March 19, 2018, 04:29:09 AM
Looks like your board Needs pin14 as enable, have you configured this ?
I'm not sure what you mean. I have an enable ire running from the board #14 to all the drivers. Is there something in Mach3 that needs to be configured that way?

see Picture enable


Quote
I'm not sure where you see that. I triple checked and the 24v supply is correct.

see picture 24V it is the opposite side