macropump & LCD

[gfosdike]

Hello all,

I'm using the macropump script to display information on my LCD screen on my pendant.

Does anyone know if it's possible to make the axis letter blink when it's selected?

The line of code below show the Z axis userlabel. If I could either make the letter blink or just appear when selected it would be great!

SetUserLabel (103,"Z" & Format (GetDro(2), "+000.0000;-000.0000"))

Am I trying to ask the impossible, any thoughts? 

regards

Gary

[poppabear]

hmmm try this:
'macropump.m1s

BlinkControl = GetUserDRO(1700) 'every 5 counts (1/2 seconds) it shows or hides the "Z"

if BlinkControl >= 0 and BlinkControl < 5 then
SetUserLabel (103,"Z" & Format (GetDro(2), "+000.0000;-000.0000"))
BlinkControl = BlinkControl + 1
SetUserDRO(1700, BlinkControl)
end if

if BlinkControl >= 5 and BlinkControl < 10 then
SetUserLabel (103," " & Format (GetDro(2), "+000.0000;-000.0000"))
'NOTE the "Z" has been replaced with a space character " "
BlinkControl = BlinkControl + 1
SetUserDRO(1700, BlinkControl)
end if

if BlinkControl > 9 then
SetUserDRO(1700, 0)
end if

'scott

[gfosdike]

Thanks Scott, that's given me something to work with!

One other thing you might be able to give me some advise on if you would'nt mind?

I would like to be able to display what jog mode I'm in via my LCD, as already have what Axis and Jog increments are active on screen.

"If GetOEMLED(117) = 1 then" will get me Velocity active and I then get stuck on how to display the text "Velocity" on the LCD.

What other code would be needed to display diferent text depending what Jog mode I'm in?

I hope this makes sense!

Regards

Gary

[poppabear]

Look at Peter Holmanns modio pendant, he shows how he talks to his LCD via macro pump........

scott

[gfosdike]

Many thanks for pointing me in the right direction Scott, I'm up and running!

[germil]

How can i get some another dat  to lcd 4x20 like that

X position;     X,Y,Z or A  for JOG
Y position;      X1, X10, X100   Multiplier
Z  position;     XX.000 SPINDLE SPEED
A  position;     ESTOP/OK


Or

X  position; Y  position;  (in one line)
Z  position; A  position;  (in one line)

Can you give me an exsample of VB code to do that?

Thank you.
regards,
Milan

[wayne.b]

G'day Milan

Has any helped you out with VB code.?

Cheers

wayneb

[germil]

Thanks for asking, but no, not yet.

[Tony Bullard]

hmmm try this:
'macropump.m1s

BlinkControl = GetUserDRO(1700) 'every 5 counts (1/2 seconds) it shows or hides the "Z"

if BlinkControl >= 0 and BlinkControl < 5 then
SetUserLabel (103,"Z" & Format (GetDro(2), "+000.0000;-000.0000"))
BlinkControl = BlinkControl + 1
SetUserDRO(1700, BlinkControl)
end if

if BlinkControl >= 5 and BlinkControl < 10 then
SetUserLabel (103," " & Format (GetDro(2), "+000.0000;-000.0000"))
'NOTE the "Z" has been replaced with a space character " "
BlinkControl = BlinkControl + 1
SetUserDRO(1700, BlinkControl)
end if

if BlinkControl > 9 then
SetUserDRO(1700, 0)
end if

'scott

Pretty clever Scott, having the macropump frequency do the timing. I like it!

Tony