MARÓ PROGRAM KIEGÉSZÍTÉS 2012.07.05.

G65 P5000 X10 Y10 Z45 W40 A3 F100 B30 S2000 C60 E1 Q5 R2

Karakterek jelentése:
(X= FÚRÁSI POZICIÓ )
(Y= FÚRÁSI POZICIÓ )
(Z= FÚRÁSI MÉLYSÉG)
(W= ANYAG VASTAGSÁGA Z IRÁNYBAN)
(A= BEVEZETÉSI ÉS KITÖRÉSI SZAKASZON AZ F=B% S=C%)
(F= ELŐTOLÁS)
(S= FORDULATSZÁM)
(B= SZÁZALÉKOS ELŐTOLÁS CSÖKKENTÉS)
(C= SZÁZALÉKOS FORDULATSZÁM CSÖKKENTÉS)
(E= BIZTONSÁGI TÁVOLSÁG A SZAKASZOS FÚRÁS VISSZAPOZICIONÁLÁSI TÁVOLSÁGÁRA)
(Q= FOGÁSVÉTEL)
(R= FÚRÁS POZICIONÁLÁSI BIZTONSÁGI TÁVOLSÁGA Z IRÁNYBAN)

A makróban a következő karaktereket tesztelje:
1.ha a kezelő nem adta meg a (C) karaktert akkor a fordulatszám 100% maradjon
2.ha a kezelő nem adta meg a (B) karaktert akkor az előtolás 100% maradjon, de szakítsa meg a program futását, írja ki, hogy (a % értéke az F címen 100% lett) majd ciklusstarttal engedélyezze a program futását.
3.ha a kezelő nem adta meg a (X, Y, Z, W, R,) karaktereket akkor tiltsa le a program futását
4.ha a kezelő nem adta meg a (E) karaktert akkor az (E) értéke legyen egy
5.ha a kezelő nem adta meg a (S) karaktert akkor örökölje az utoljára programozott fordulatszámot
6.ha a kezelő nem adta meg a (F) karaktert akkor örökölje az utoljára programozott előtolást
7.ha (Q) értéke nulla vagy üres akkor a fúrást telibe fúrással végezze el.
--------------------------------------------------------------------------------------------------------------------

IF[#3#0] THEN =100
IF[#EQ#0] THEN #2= #=200 (%ÉRTÉK F CÍMEN 100% LETT
IF[#EQ#0] [#25EQ] OR [#EQ#0] OR [#EQ#0] OR [#18EQ#0] GOTO
IF[#8#0] =

IF[#1EQ#0] #19=#
IF[#EQ#0] #9=#
IF[#EQ#0] [#170] #100= GOTO50
--------------------------------------------------------------------------
N50 S[#19*#3/100] F[#9*#2/100]
G X#24 Y#25 Z-#26 R#18
---------------------------------------------------------------------
N100 #=200 (ÁLTALÁNOS KITÖLTÉSI HIBA)