Messages

111

VB and the development of wizards / Re: code "G04 P2.0" problem

« on: April 28, 2008, 01:03:03 PM »

hi ron

I AM SORRY, i found the problem. let me explain to you what i did.
i began thinking why the outputs of the second port could be disabled almost immediately after is enabled them. i early day i have been programming PLC's. when that happend in PLC's most of the time i had used the specific register twice. this was exactly what happend i my system. a few months ago a have made some test programs in brains. i used the output 5 and 6 and these programs where still enabled in brains control. i disabled the specific brain and everything works fine now.

i hope it did not keep you awake....

thanks Antoine

112

VB and the development of wizards / Re: code "G04 P2.0" problem

« on: April 28, 2008, 12:26:07 PM »

hi ron,

you are right. your test program works fine. the problem is in my hardware. u use 2 parallelports; one (LPT1)on the motherboard of the computer and one extra PCI port. the outputs connected to the first port (lpt1) work exactly as they should. but if i use the same program to control the outputs on the second port they just pulse. if i write a VBscript with one line: activatesignal(output6), output6 is high for just a 0.1 second or so.

i don't understand the difference between the two ports?

thanks antoine

113

VB and the development of wizards / Re: code "G04 P2.0" problem

« on: April 27, 2008, 12:15:57 PM »

hi,

thank you for your reply. I cannot get the code statement working. i open a vb window, type just the commands:

ActivateSignal(Output5) 
Code "G4 P2"

then i compile and run the program. the program ignores the code statement!
another strange thing is that my outputs 1 2 3 and 4 on my first i/o card can be switched on by the statement ActivateSignal(...). the output 5 and 6 just pulse with the same statement. does that has something to do with hardware or has mach trouble with outputs 5 and 6.

thanks
antoine

114

VB and the development of wizards / Re: code "G04 P2.0" problem

« on: April 25, 2008, 02:28:10 AM »

i am sorry but i do not understand fully what you mean with your latest reply (probably because i am dutch).

what i understand is that i should delete the While IsMoving() function. but can i use the G4 command to delay the activation or deactivation of outputs or is the G4 function not the right one to use for my case?

if i cannot use the G4 command to delay the activation or deactivation of output what function should i use. or do i have to solve this in by hardware?

thanks

antoine
the netherlands

115

VB and the development of wizards / Re: code "G04 P2.0" problem

« on: April 24, 2008, 02:36:31 PM »

thank you for your reply,

what i want with the "G4 p2.0" is that the output 5 stay high for 2 second and then it has to be deactivated. is that possible with the G4 code the way i used it in mach 3 (lathe)?

116

VB and the development of wizards / code "G04 P2.0" problem

« on: April 24, 2008, 12:36:25 PM »

hi again,

i have the next macro which runs perfect except for the [ code "G04 P2.0" ] part. i am sure the subroutine is executed but the output is not latched for 2 seconds. i hope someone can help me because it is an essential part of my machine. (i run mach3 2.63 version on windows xp).

'SetUserDRO(1200,GetSelectedTool())
'OldTool = GetOEMDRO (1200)
wantedtool = GetOEMDRO (1200) 'GetSelectedTool()
MaxToolNum = 8      'Max number of tools for the changer

If newtool = wantedtool Then
Message ("Selected Tool already loaded")
Exit Sub
End If

'While wantedtool > MaxToolNum
'Tool = Question ("Enter New Tool Number up to " & MaxToolNum)
'Wend

While wantedtool <> newtool

Call actualtool
Call rotateCW
     
Wend 

Call stop_and_lock_turret



'//// Subroutines /////////

Sub actualtool

   If isActive(Input1) And isactive(Input2) And isactive(Input3) And Not isactive(Input4) Then
      NewTool = 1
      End If
   If isActive(Input1) And isactive(Input2) And Not isactive(Input3) And Not isactive(Input4) Then
      NewTool = 2
      End If
   If isActive(Input1) And isactive(Input2) And Not isactive(Input3) And isactive(Input4) Then
      NewTool = 3
      End If
   If isActive(Input1) And Not isactive(Input2) And Not isactive(Input3) And isactive(Input4) Then
      NewTool = 4
      End If
   If isActive(Input1) And Not isactive(Input2) And isactive(Input3) And isactive(Input4) Then
      NewTool = 5
      End If
   If Not isActive(Input1) And Not isactive(Input2) And isactive(Input3) And isactive(Input4) Then
      NewTool = 6
      End If
   If Not isActive(Input1) And isactive(Input2) And isactive(Input3) And isactive(Input4) Then
      NewTool = 7
      End If
   If not isActive(Input1) And isactive(Input2) And isactive(Input3) And not isactive(Input4) Then
      NewTool = 8
      End If
     
      setcurrenttool(newtool)
     
End Sub


Sub rotateCW
   ActivateSignal(Output6)
      While IsMoving()
      Wend
     
End Sub

Sub stop_and_lock_turret

   DeActivateSignal(Output6)
      While IsMoving()
      Wend
   ActivateSignal(Output5) 
      Code "G4 P2"    'Wait for the tool to rotate onto ratchet stop
      While IsMoving()
      Wend
   DeActivateSignal(Output5)
      While IsMoving()
      Wend
     
End Sub   
   

thanks

antoine
the netherlands

117

VB and the development of wizards / Re: some VB questions

« on: April 20, 2008, 01:28:25 PM »

thank you,

just what i needed. i 

antoine

118

VB and the development of wizards / some VB questions

« on: April 20, 2008, 07:12:19 AM »

hi,

i just started with VB programming in Mach3 (version 2.63). in "general config" i switched "run marco pump" on.

but i have the following questions:

1. my macrocode runs but only if i start it manually. how can i let it run continuously when mach starts.
2. i want an extra button on a standard mach screen (lathe) to jump to my own developed screen. how can i edit de default mach screens.
3. i have a button and a button script on my own developed mach screen. but when i press the button (with my mouse) the VB buttonscript does not run?

thanks,

antoine
the netherlands

119

VB and the development of wizards / Re: Macro VB Script for Lathe Toolchanger

« on: April 19, 2008, 10:52:34 AM »

hi,

thanks for all these replies, they have been a great help to get started. but i have 3 questions about the VBcode:

1. how can i become the "GetOEMDRO (1200)". I cannot find this on my screens in MACH3 turning. is it possible to become this dro on a screen.
2. the Code "G4 P1.0" does not work at all. the line is executed but it does not delay? is it a configuration fault somewhere in mach?
2. my macro only runs if i start i manually, i thought it would run continuously.

thanks

antoine
the Netherlands

120

General Mach Discussion / Re: Calling all post processors. ( Help me to help you )

« on: March 25, 2008, 04:57:33 PM »

hi,

can anyone help me to become a postprocessor for alphacam (version 7) --> mach3 (turning).

thanks

antoine
the netherlands