programming a loop

[crazycnc]

Hello all,
I am running a Takisawa EX-110 lathe with a Fanuc 21i-T control. This is my program:

:0100
M98P0101
M98P0102
M98P0103
M30

What I want to do is loop through this program a specific number of times, (say 35 times) and then stop. I know you can use macros to create loops and logic and such but I have never used them. Could somebody help me with this problem?

Thanks a lot!

[beege]

Originally Posted by crazycnc Hello all, I am running a Takisawa EX-110 lathe with a Fanuc 21i-T control. This is my program: :0100 M98P0101 M98P0102 M98P0103 M30 What I want to do is loop through this program a specific number of times, (say 35 times) and then stop. I know you can use macros to create loops and logic and such but I have never used them. Could somebody help me with this problem? Thanks a lot!

So many ways to skin this cat!

You could write a short program:

:O1000
M98P0100L#500
M30

You'd have to end your original program with an M99 instead of an M30.
Then, enter the number of repetitions into your Macro Variable table at #500.

Not sure about the format for repetition values in the M98 line. Some controls are different there. Also, there's a limit to the depth of nested programs, so if you have subs in your subs, this might be problematic.

[crazycnc]

ok, thanks that makes sense. Now I'm trying to figure out how to set or even how to access my variable table....

[crazycnc]

ok, I found my variables. I would like to keep it all in one program if possible. If I were programming my computer, I would do something like this:

:0100

for(int i = 0; i < =35; i++) {
// call program 101
// call program 102
// call program 103
};

M30

Can I do something similar on the lathe?

[christinandavid]

#500=1
WHILE[[#500]LE[35.]]DO1
M98P101
M98P102
M98P103
#1=#1-1
END1

Just change the 35 to however many repeats you need. Set #500 in program. Just make sure your sub programs don't use #500 or WHILE loops...

DP

[crazycnc]

#1=#1-1

Should this be #1=#1+1? I am assuming 'LE' is 'less than or equal'?

[christinandavid]

Yep, you are quite correct, er, looks like I changed my mind halfway through didn't I - sorry 'bout that one.

DP

[crazycnc]

:0100 #500=1 WHILE[[#500]LE[2.]]DO1 M98P101 M98P102 M98P103 #1=#1+1 END1

I ran this program and it didn't stop after 2 parts, just kept on going. I have to leave now, I'll be back in the morning. Thanks for all your input so far, might have a few more questions tomorrow.

[christinandavid]

Aaaaah yes. I appear to have changed my mind twice in my original post...

Change it to #500=#500+1 and all will be well.

Made myself look a right clown there eh? I changed from local macros #1-#33 to common macros #500+ as I wasn't sure if the locals would be affected by jumping in and out of main program.

More often than not I spend longer debugging my programs than coming up with the original concept....

DP

[beege]

Originally Posted by christinandavid #500=1 WHILE[[#500]LE[35.]]DO1 M98P101 M98P102 M98P103 #1=#1-1 END1 Just change the 35 to however many repeats you need. Set #500 in program. Just make sure your sub programs don't use #500 or WHILE loops... DP

Likewise,

:O0100
#500=#500+1
IF [#500 GT 35] GOTO N999
M98P101
M98P102
M98P103
M99
N999M30

[christinandavid]

Damn, couldn't find a single mistake in your post, am I the only one with poor brain/finger co-ordination ('co-operation' may be the right word in my case)?...

Of course the GOTO method would also be the best way to go if you wanted to eliminate the need for sub programs.

DP

[Fanuc Mate]

Hello.

Christian is right with his method. The only thing is though, 500 variables are not cleared until they are physically changed. Therefore use 100 variables.


:0100
WHILE[#100LE35]DO1
M98P0101
M98P0102
M98P0103
#100=#100+1
END1
M30

Fanuc Mate