Hello Guest it is April 17, 2021, 01:22:26 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

1911
Hi M21,

here:
Code: [Select]
'Function to read a Section/entry of a  INI file
Function ReadIni( ByVal file As String, ByVal section As String, ByVal item As String ) As String
ReadIni = " "
Set FileSysObj = CreateObject("Scripting.FileSystemObject")
If FileSysObj.FileExists( file ) Then
Set ini = FileSysObj.OpenTextFile( file, 1, False)

Do While ini.AtEndOfStream = False
TextLine = ini.ReadLine
If TextLine = "[" & section & "]" Then
TextLine = ini.ReadLine
Do While Left( TextLine, 1) <> "["
If InStr( TextLine, item & "=" ) = 1 Then
ReadIni = Mid( TextLine, Len( item ) + 2 )
Exit Do
End If
If ini.AtEndOfStream Then Exit Do
TextLine = ini.ReadLine
Loop
Exit Do
End If
Loop
ini.Close
End If
End Function

not exectly what you need, but shows the principals of file/text handling.

Thomas

1912
have you checked your grounding for noise ?
your power supply for Geko ?

Thomas

1913
Hi,

i think first step will be to get much manuals of the used controler's
as possible.

mitsubishi anyway, and ITRI as well.
maybe you can get a wiring diagram from Ecoca.
as more informations you get from the existing system, as easier it
will be to convert.

Thomas

1914
hate the bloody things, usualy have mine on silent ;)

yust ignore it. (don't hate it).
sometimes it is easier.

Thomas

1915
Hi Emil,

Hi Thomas
Pff 25 years , that mean you are Daddy's on CNC,
have you some on You Tube or links on your retrofitings ?

sorry, i am "prehistoric", means i do do not evan have a
smarthphone, only a mobilephone (phone is the major thing,
yust dial a number and talk).

so i do not have any youtube videos.

sorry again.

Thomas

1916
Hi Hood,

Glad to see Thomas in on this, he is much better at VB than I will ever be :)

Thank You.

Thomas
as writen before:

If Then Else or Maybe

1917
Hi Emil,

@Thomas
It seems that your TO DO plan is well organized....if I think from start on all ; then will do a really mess on my mind !

i am doing retrofit things for almost 25 years now,
had to learn this.

Thomas

1918
OK Emil,

i made a quick head based calculation of your in-/outputs

Based on my OLD inputs:
-home axis x
-home axis y
-home axis z
-vacuum table 1 (pressure gauge 1)
-vacuum table 2 (pressure gauge 2)
-vacuum pump acces
-acces mill 1 (assume is the main spindle)
-acces mill 2 (assume is the drill spindle)
-cone-holder OPEN
-cone holder CLOSE
-thermic inverter
-drill group DOWN
-drill group UP
-dust colector UP
-Inverter OK
-frequency reached
-drive axis C (ATM axis) OK
-pressure reached on the main spindle
-OK Z
-axis overreached (axis limits switches)
-emergency on main panel (emergency switch on the panel)
-machine emergency (chain with pushButtonsMushroom 3, line pressure,lock of main door)
-vacuum termic breaker
-drill unit thermic breaker
-motor stop
-external start
-external stop
-vacuum switch 1
-vacuum switch 2
-inverter frequency level

means  30 inputs


Outputs :
- 9 outputs for drill heads 1,2,3-----9 (activation of the drill heads I assume they need M codes and VB Macro)
-ascension of 4 guides (0-ing hardware fixtures on each corner of table) depending on each side of table you work - need M codes
-axis C (ATM) enable
-up down dust cover
-drill head UP
-drill head DOWN
-OPEN/CLOSE Tool holder clamp
-vacuum side 1 of table
-vacuum side 2 of the table
-enbla axis X,Y,Z
-enable inverter

means 20 outputs

csmio-a has

24 inputs
16 outputs

witch makes a IO extension module necessary.

Thomas


1919
Hi Emil,

there are a couple of macro excamples on CSMIO homepage:

http://www.cs-lab.eu/en/artykul-115-Addons_macros.html


as i have writen before my personal agenda would be:
1. get all the hardware things wired
2. get the axis running
3. get the spindle running
4. then get headache about VB macros

Thomas

don't be afraid of VB,

it's just

If Then Else or Maybe



1920
CS-Lab / Re: Support M10/M11 commands
« on: May 11, 2015, 01:44:18 PM »
Hi Andrew,

you are absolutly wright.

tested on my -M and -S machine, not working,
only with PP.

looking forward to CSMIO answer.

Thomas