Messages

761

Screen designer tips and tutorials / Re: lion stop screenset

« on: May 20, 2019, 04:49:13 AM »

create your own, it is not so difficult.

have a search for MachScreen to create the Screen.

i Little searching in the Forum will come up with most of the answers for your questions like here:
https://www.machsupport.com/forum/index.php?topic=39117.0

and if something is not working, post your questions here.

762

General Mach Discussion / Re: Mill or Turn?

« on: May 20, 2019, 04:30:01 AM »

i assume you have checked accurate x-axis moves via gauge and mdi moves.
so what is left? all your cut's are to small so IMHO only two things are left:

-spindle rack get's pulled up by cutting force
-tool get's pulled down by cutting force

just trying to think loud.

763

General Mach Discussion / Re: Mill or Turn?

« on: May 19, 2019, 06:21:06 AM »

just an idea, is your tool cutting realy in the Center of the spindle?

764

CS-Lab / Re: Retrofit CNC Bulleri FPM 2813-Osai controll with CSMIO-IP-A

« on: May 18, 2019, 09:49:37 AM »

so please describe (Inputs Outputs function) what the single things should do.

765

CS-Lab / Re: Retrofit CNC Bulleri FPM 2813-Osai controll with CSMIO-IP-A

« on: May 18, 2019, 02:48:30 AM »

make a description how the toolchange should work, and we will see.

766

General Mach Discussion / Re: How do you apply a different offset from home on a slaved axis?

« on: May 17, 2019, 02:41:57 AM »

i am nor realy sure wther a slave axis can be homed seperatly by VBScript (never used one), but you can try this code in VB Scripter window.

Code: [Select]

DoButton(27) 'reference C
While IsMoving()
Sleep(10)
Wend
SetDro(5,123) '123 is the offsetposition you want


767

VB and the development of wizards / Re: edit script

« on: May 16, 2019, 04:32:59 AM »

put this code:

Code: [Select]

Begin Dialog ButtonSample 16,32,100,30,"Start Scan?"
OKButton 10,8,40,14
CancelButton 50,8,40,14
End Dialog

Dim Dlg1 As ButtonSample
Button = Dialog (Dlg1)
If Button = 0 Then
MsgBox "Scan Canceled!"
Exit Sub
End If

behind the OpenDigfile()

768

VB and the development of wizards / Re: edit script

« on: May 16, 2019, 03:12:12 AM »

some Syntax Errors corrected:

Code: [Select]

Zmin     = Question ("minimum value at which the probe drops:")          'the minimum value at which the probe drops, depends On the part To be probed And the length of the stylus
Zmax     = Question ("altitude Z for the rapid movement of the X axis:") 'altitude Z for the rapid movement of the X axis when the scan reaches the bottom of Xmax and returns to Xiniz
Xmax     = Question ("upper right corner end scan x max:")               'upper right corner end scan
Ymax     = Question ("upper right corner end scan Ymax:")                'upper right corner end scan
StepZsu     = Question ("movement in Z + when the probe touches Z high:")   'step shift in Z + when the probe touches
StepX     = Question ("resolution of the scnsione X:")                    'resolution of the scansione, For Y Any value can be Put, For X the maximum stroke of the stylus must Not be exceeded
StepY     = Question ("resolution of the Y scnsione:")                    'resolution of the scnsione, For Y Any value can be Put, For X the maximum stroke of the stylus must Not be exceeded
AvanzZgiu   = Question ("Z 'axis descent speed-:")                          'speed for the relative axes
AvanzZsu    = Question ("Z + axis climb speed:")                            'speed for the relative axes
AvanzX     = Question ("X-axis speed:")                                    'speed for the relative axes
AvanzY     = Question ("velocity Y axis:")                                 'velocity For the relative axes
Xiniz     = Question ("bottom corner X:")                                 'bottom left corner start of scan
Yiniz     = Question ("bottom angle Y:")                                  'bottom left corner start of scan




769

VB and the development of wizards / Re: edit script

« on: May 16, 2019, 02:21:03 AM »

a quick and easy Version is for example

Zmin=Question ("Enter value for Zmin:")


an other Version would be to put Label's(for the description) and OEMDro's (for the values) to
your Screen and get the values via:

Zmin=GetOEMDro(1300) where 1300 is the dro number witch is used in Screen.

770

General Mach Discussion / Re: Motors stalling /growling

« on: May 15, 2019, 02:23:24 AM »

had a quick look to your Profile. only x-axis is set.

Dir Port1 Pin3 LowActive1
Step Port1 Pin4 LowActive1
Step/per 3850
Velocity 103.98
Accel 4

Dir Pulsewidth 0
Step Pulsewidth 0

These two should be set to 5 see reply#30 from reuelt