Code Sample of If / End If

[B. Jacobs]

Here is what I've got. I have been playing around with this code so I can insert messages to the operator. Things like Do you want to see the set up instruction? Stuff like this.
I have been having pretty good luck with it untill now. I have been inserting it into the new programs I write. No problems.
I have opened a program that already had some Operator comments in it and I wanted to add this code so I didn't have to check OK every time if I am not doing a manual alignment.
What is happening is the program is skipping over all the comands and going straight to the DCC alignment. I am not getting any messages.
Could someone maybe tell me where I am going wrong. I could post a section of the program if that would help.
Thanks ahead of time.

[rebeldude]

Sounds like you dont have your labels named right or they are not in the right place. If that doesn't help you, send some of the program.

[B. Jacobs]

Rebel, I just sent it to you

[T Miller]

I do that in almost all my program ask if I need to manual align.. post some code so we can take a look

[kbotta]

post it, for help!

[B. Jacobs]

OK here is what I have:

STARTUP =ALIGNMENT/START,RECALL:, LIST= YES
ALIGNMENT/END
MODE/MANUAL
LOADPROBE/BRYAN2MM
TIP/T1A0B0, SHANKIJK=0, 0, 1, ANGLE=0
FORMAT/TEXT, ,HEADINGS, , ;MEAS,NOM,TOL,DEV,OUTTOL, ,
IF/C1.INPUT=="YES"
C1 =COMMENT/YESNO,Would you like to see the set up instructions?
COMMENT/OPER,Take 3 hits on top of part and hit continue when command comes up.
PLN1 =FEAT/PLANE,RECT
THEO/15.0081,8.6863,-26.4119,-0.0059371,-0.0016554,0.999981
ACTL/6.2131,6.3169,-25.4172,-0.0010256,0.0002992,0.9999994
MEAS/PLANE,3
HIT/BASIC,14.9779,8.8658,-26.4118,-0.0059371,-0.0016554,0.999981,6.1767,6.5918,-25.4173,USE THEO = YES
HIT/BASIC,15.0636,8.7044,-26.4115,-0.0059371,-0.0016554,0.999981,6.2313,6.3105,-25.4171,USE THEO = YES
HIT/BASIC,14.9828,8.4886,-26.4124,-0.0059371,-0.0016554,0.999981,6.2312,6.0484,-25.4171,USE THEO = YES
ENDMEAS/
COMMENT/OPER,Take two hits across front of part when command comes up.
LIN1 =FEAT/LINE,RECT,UNBND
THEO/14.9829,8.0997,-26.4955,0.9999472,-0.0102776,0
ACTL/6.1068,5.5885,-25.4999,0.9999825,-0.005921,0
MEAS/LINE,2,WORKPLANE
HIT/BASIC,14.9829,8.0997,-26.4955,-0.0102776,-0.9999472,0,6.1068,5.5885,-25.4999,USE THEO = YES
HIT/BASIC,15.0664,8.0989,-26.4954,-0.0102776,-0.9999472,0,6.2526,5.5876,-25.4998,USE THEO = YES
ENDMEAS/
COMMENT/OPER,Tke 2 hits on right side of part at Dim. 2 (.1952) when command comes up.
LIN2 =FEAT/LINE,RECT,UNBND
THEO/15.1181,8.2663,-26.4952,0.0072577,0.9999737,0
ACTL/6.2869,5.6377,-25.4996,0.0042218,0.9999911,0
MEAS/LINE,2,WORKPLANE
HIT/BASIC,15.1181,8.2663,-26.4952,0.9999737,-0.0072577,0,6.2869,5.6377,-25.4996,USE THEO = YES
HIT/BASIC,15.1219,8.7903,-26.4952,0.9999737,-0.0072577,0,6.2898,6.322,-25.4997,USE THEO = YES
ENDMEAS/
END_IF/
PNT1 =FEAT/POINT,RECT
THEO/15.1168,8.0984,-26.4954,0.9999472,-0.0102776,0
ACTL/6.2867,5.5874,-25.4997,0.9999825,-0.005921,0
CONSTR/POINT,INT,LIN1,LIN2
A0 =ALIGNMENT/START,RECALL:STARTUP, LIST= YES
ALIGNMENT/LEVEL,ZPLUS,PLN1
ALIGNMENT/ROTATE,XPLUS,TO,LIN1,ABOUT,ZPLUS
ALIGNMENT/TRANS,XAXIS,PNT1
ALIGNMENT/TRANS,YAXIS,PNT1
ALIGNMENT/TRANS,ZAXIS,PLN1
ALIGNMENT/END
Hope this is helpful

[B. Jacobs]

Oh I'm stupid. After posting the program I see where it is wrong. I need to heve the yes no coment before the if/endif coment.
DUH

[kbotta]

Shouldn't your 1st If statement be below the Input/comment line...
At 1st glance...
Kev

[kbotta]

Oops, beat me to it Bryan...

[B. Jacobs]

Yep it's one of those days. I'm sure I'm not the only one. But it does make you feel about yea big.
OK i give everyone permision to laugh.

[R. Farr]

The first time you run your program and say yes to the manual alignment, it won't ask you again. The reason is it will always remember c1.input as yes and skip it. If you close out of the program it will lose what c1.input was and prompt you.

You can setup a comment input menu which will allow you to run sections of the program. It all depends on how you want it to run.

Something like this maybe.

C1 =COMMENT/INPUT,What do you want to run?
,
,1 = View Setup Instructions
,2 = Run Manual and DCC alignemnt
,3 = Run DCC alignment only
,4 = Run Part program
IF_GOTO/C1.INPUT == 1,GOTO = SKIP
IF_GOTO/C1.INPUT == 2,GOTO = SKIP
IF_GOTO/C1.INPUT == 3,GOTO = SKIP
IF_GOTO/C1.INPUT == 4,GOTO = SKIP
COMMENT/OPER,You have entered an invalid number.
,
,Please re-type the operation you want to perform.
,
GOTO/C1
SKIP =LABEL/

[B. Jacobs]

Mr. Farr,
I don't understand this. I would like to be able to say yes at the beging of the program when it is being run for the first time. But after that I don't want to have to hit no each time it runs. Could you elaberate on this a little. I am new to this and am learning as I go.
Thanks

[R. Farr]

Nevermind then, what you have should work.

I didn't know you wanted to run the DCC alignment every time. I'm aassuming the manual alignment for a fixture of some sort, and the DCC on the part?

[rebeldude]

LOL,
It happens to the best of us!!!