Senpleman mete, yon macro se sèvi ak fòmil pou trete pati. Pou egzanp, elips, si pa gen okenn makro, nou bezwen kalkile pwen yo sou koub la pwen pa pwen, ak Lè sa a, tou dousman apwoksimatif li ak yon liy dwat. Si li se yon materyo ki gen kondisyon segondè lis, Lè sa a, nou bezwen kalkile yon anpil nan pwen, men apre yo fin aplike makro a, Nou antre fòmil la elips nan sistèm nan ak Lè sa a, nou bay kowòdone Z a epi ajoute yon kantite lajan chak fwa, Lè sa a, la. macro pral otomatikman kalkile kowòdone X la epi fè koupe. An reyalite, fonksyon prensipal la nan macro nan pwogram nan se kalkil.
foto
01
Konsènan pwogram macro
Ki sa ki se yon pwogram macro
Lè pwogramasyon, nou pral estoke yon seri de enstriksyon ki ka ranpli yon fonksyon sèten nan memwa a tankou yon souroutine, epi rele yo ak yon enstriksyon jeneral. Lè w ap itilize li, nou sèlman bezwen bay enstriksyon jeneral sa a pou egzekite fonksyon ki estoke Seri enstriksyon sa yo rele kò pwogram macro itilizatè a, oswa pwogram macro pou kout.
Kòmand jeneral sa a rele kòmandman macro apèl itilizatè. Lè pwogramasyon, pwogramasyon sèlman bezwen memorize enstriksyon macro men pa pwogram macro.
Kilè yo pral itilize pwogram macro?
1) Manyèlman pwograme koub fòmil pwosesis (kalkil senp, antre vit)
2) Chemen koupe regilye (kòm yon modil koupe)
3) Kontwòl entè-pwogram (orè pwogram)
4) Jesyon zouti (mete zouti)
5) mezi otomatik (sond nan machin)
Diferans ki genyen ant pwogram macro ak pwogram nòmal
1) Nan kò a pwogram macro, varyab yo ka itilize, valè yo ka asiyen nan varyab, kalkil yo ka fèt ant varyab, ak pwogram yo ka sote.
2) Nan pwogram òdinè, se sèlman konstan yo ka espesifye, epi operasyon ant konstan yo pa ka fèt. Pwogram yo ka sèlman egzekite sekans epi yo pa ka sote, kidonk fonksyon yo fiks epi yo pa ka chanje.
3) Fonksyon macro a se yon fonksyon espesyal pou itilizatè a amelyore pèfòmans nan zouti machin CNC, ak itilizasyon abil nan pwogram macro nan pwosesis la nan pyès ki sanble yo pral reyalize de fwa rezilta a ak mwatye efò a.
02
Varyab ak fòma nan pwogram macro
Karakteristik nan pwogram macro
Pwogram makro a ka itilize varyab la, epi yo ka itilize varyab la pou fè operasyon korespondan yo; ka valè aktyèl varyab la dwe asiyen nan varyab la pa enstriksyon nan pwogram macro.
Twa Kalite Varyab
Fòm reprezantasyon varyab nan sistèm CNC a se "#" ki te swiv pa 1 a 4 chif, e gen twa kalite varyab:
(1) Varyab lokal yo: #1 ~ #33 se varyab yo itilize lokalman nan pwogram makro a, ki itilize pou transfè varyab endepandan.
(2) Varyab komen: itilizatè a ka itilize li lib, epi li komen nan chak subroutine ak chak pwogram macro ki rele nan pwogram prensipal la. #100 ~ #149, apre yo fin koupe pouvwa a, tout valè varyab yo pral otorize, pandan y ap #500 ~ #509, apre yo fin etenn pouvwa a, valè varyab yo ka sove.
(3) Sistèm varyab: Li defini pa ki te swiv pa 4 chif, li ka jwenn lekti sèlman oswa li / ekri enfòmasyon ki genyen nan processeur zouti machin oswa memwa NC, ki gen ladan paramèt echanj ki gen rapò ak processeur zouti machin, akizisyon eta zouti machin. paramèt, enfòmasyon sistèm tankou paramèt pwosesis.
Senp fòma apèl nan pwogram macro
Rele senp nan pwogram nan macro vle di ke nan pwogram prensipal la, pwogram nan macro ka rele pa yon blòk sèl.
Fòma envokasyon:
G65 P (nimewo pwogram makro) L (kantite repetisyon) (devwa varyab).
Pami yo: G65—macro pwogram apèl lòd;
P (nimewo pwogram macro) - kòd pwogram macro yo dwe rele;
L (kantite repetisyon) - kantite kouri repete nan pwogram macro a, lè kantite repetisyon se 1, li ka omisyon;
(Variable Assignment) - Bay valè varyab yo itilize nan pwogram macro a.
Menm bagay la ant yon pwogram macro ak yon sousroutine se ke yon pwogram macro ka rele pa yon lòt pwogram macro, jiska 4 fwa.
Macro pwogram ekri fòma
Fòma ekri yon pwogram macro se menm jan ak yon sousroutine. Fòm li se:
0-(0001-8999 se nimewo pwogram macro)
N10 kòmand
N-M99
Nan kontni an nan pwogram macro ki pi wo a, anplis enstriksyon yo pwogramasyon souvan itilize, varyab, enstriksyon operasyon aritmetik ak lòt enstriksyon kontwòl kapab tou itilize. Se valè a varyab asiyen nan enstriksyon nan apèl nan pwogram macro.
03
Aplikasyon pwogram macro sistèm FANUC
(1) Grooving pwogram macro
foto
1) WHILE deklarasyon
G00 X52 Z2;
#2=-14;
Li se pwen depa zouti a nan direksyon z (paske lajè zouti a se 4mm, pwen depa fikse nan Z-14)
PANDAN [#2 GE -30] DO2;
Li se yon kontrent nan direksyon z la. Lè z egal a -30, direksyon z la p ap deplase ankò
G00 Z〔#2〕;
Pozisyon aktyèl la nan direksyon z la
#2=#2-2;
Etap la k ap deplase nan direksyon z la, k ap deplase 2mm chak fwa
#1=52;
se pwen depa kouto a nan direksyon x
PANDAN [#1 GE 20] DO1;
Kontrent nan direksyon X, lè dyamèt la egal a 20, li p ap koupe ankò
G01 X〔#1〕F0.2;
Pwofondè koupe nan direksyon x
G00 X〔#1 plis 1〕;
Kantite retraksyon relatif nan direksyon x
#1=#1-1;
Etap distans nan direksyon x (koupe 1mm chak fwa)
FINI1;
G00 X52;
FINI2;
Pwogram konplè:
O1234;
G40 G97 G99;
T0101;
S1000 M3;
G00 X52 Z2;
#2=-14;
PANDAN〔#2GE-30〕DO2; END1;
G00 Z〔#2〕;
#2=#2-2;
#1=52
PANDAN〔#1GE20〕DO1;
G01X〔#1〕F0.2;
G00X〔#1 plis 1〕;
#1=#1-1;
G00 X52;
FINI2;
G00 X150 Z150;
M30;
2) SI deklarasyon
G00 X52 Z-2;
#1=-14;
Li se pwen depa z-direksyon zouti a (lajè zouti a se 4mm)
N2 #1=#1-2;
se etap mouvman an nan direksyon z la
#2=52;
se pwen depa zouti a nan direksyon x
N1#2=#2-1;
se distans etap nan direksyon x (koupe pwofondè 1mm chak fwa)
G01 X〔#2〕F0.2;
Pozisyon aktyèl nan direksyon X
G00 X〔#2 plis 1〕;
Kantite retraksyon relatif nan direksyon X
SI [#2 GE 21] GOTO1;
Kontrent nan direksyon x (lè valè x koupe a 20, pwosedi sa a yo pral fèt, epi yo pa pral retounen)
G00 X52;
X rale nan pozisyon 52
G00 Z〔#1〕;
Pozisyon aktyèl nan direksyon Z
SI [#1 GE -30] GOTO2;
Kontrent nan direksyon Z, lè z egal a -30, direksyon z la p ap deplase.
Pwogram konplè:
O1234;
G40G97G99;
T0101;
S1000M3;
G00 X52 Z-2;
#1=-14;
N2 #1=#1-2;
#2=52;
N1#2=#2-1;
G01 X〔#2〕F0.2;
G00 X〔#2 plis 1〕;
SI〔#2GE21〕GOTO1;
G00X52;
G00Z〔#1〕;
SI[#1GE-30]GOTO2;
G00X200;
Z200;
M5;
M30;
(2) Pwogramasyon Elips
1) Fòma estanda deklarasyon elips WHILE la:
#1=a;
a: pwen depa zouti a se nan direksyon pozitif yon mm parapò ak aks Z elips la.
PANDAN [#1 GE b] DO1;
b: Pwen final pwosesis elips la se nan direksyon negatif b mm parapò ak aks Z elips la (si yo trete yon semi-elips konplè, Lè sa a, a ak b se de valè ki gen menm valè ak siy diferan)
#2= c*SQRT[{1}}#1*231/d*d];
c: aks semiminè elips la
d: semi-gwo aks elips la (kalkile #2 dapre fòmil elips la, semi-majè aks la se d, semi-gwo aks la se c, #2 reprezante valè X, #1 se valè Z. , ak SQRT la vle di rasin kare)
G01 X〔±2*#2 plis e〕Z〔#1±f〕;
e: Desantre (valè dyamèt) aks X elips la parapò ak sistèm kowòdone pyès travay la.
f: Konsantrasyon aks Z elips la parapò ak sistèm kowòdone pyès la
#1=#1-1; distans etap (deplase 1mm chak fwa)
FINI1;
Remak: Lè w vire yon elips konkav, "±" nan parantèz la apre X pran kòm "-"; lè w vire yon elips konvèks, "±" nan parantèz la apre X yo pran kòm "plis".
Lè aks X nan elips la chanje nan direksyon pozitif, "±" nan parantèz yo apre Z pran "plis"; lè X-aks elips la chanje nan direksyon negatif, "±" nan parantèz yo apre Z pran "-"
2) Fòma estanda deklarasyon eliptik IF la
#1=a;
a: pwen depa zouti a se nan direksyon pozitif yon mm parapò ak aks Z elips la.
N1#{{1}b*SQRT〔1-#1*#1/c *c〕;
b: semi-kout aks elips la c: semi-majè aks elips la (dapre fòmil elips X/c plis Y/b=1, SQRT vle di rasin kare)
G01X〔±2*#2 plis d〕Z〔#1±e〕F0.2; d: konpanse (valè dyamèt) aks X elips la parapò ak pwen zewo kowòdone e: aks Z elips la parapò ak plan zewo a.
#1=#1-1;
Distans etap (deplase 1mm chak fwa)
SI [#1 GE -f] GOTO1
f: Mete fen nan pwosesis elips
Remak: Lè w vire yon elips konkav, "±" nan parantèz la apre X pran kòm "-"; lè w vire yon elips konvèks, "±" nan parantèz la apre X yo pran kòm "plis". Lè aks X nan elips la devye nan direksyon pozitif, "±" nan parantèz yo apre Z pran "plis"; lè X-aks elips la devye nan direksyon negatif, "±" nan parantèz yo apre Z pran "-".
foto
WHILE deklarasyon
#1=20;
PANDAN〔#1GE-20〕DO1;
#2=10*SQRT〔{{1}#1*#1/400〕;
G01X〔-2*#2 plis 50〕Z〔#1-25〕;
#1=#1-1;
FINI1;
IF deklarasyon
#1=20;
N1#2=10*SQRT〔1-#1*#1/400〕;
G01X〔-2*#2 plis 50〕Z〔#1-25〕F0.2;
#1=#1-1;
SI[#1GE-20]GOTO1;
pwogram konplè
O1234;
G40G97G99;
T0101;
S1000 M3;
G00 X50 Z2;
G73 U5 R5;
G73 P10 Q20 U0.5 F0.2;
N10 G0 G42 Z-5;
#1=20;
PANDAN〔#1GE-20〕DO1;
#2=10*SQRT〔1-#1*#1/400〕;
G01X〔-2*#2 plis 50〕Z〔#1-25〕F0.2;
#1=#1-1;
FINI1;
G00 X50;
N20 G00 G40 Z2;
G70 P10 Q20;
G00 X200;
Z200;
M5;
M30;
Fòma konplè deklarasyon IF a omisyon (se menm bagay la tou pou deklarasyon IF la, osi lontan ke sik la ajoute). Nan sistèm FANUC-0i, pwogram makro a ka sèlman ajoute nan G73.
(3) Pwosesis parabòl
1) Fòma estanda deklarasyon parabolik WHILE la:
#1=a;
a: pwen an kòmanse nan zouti a se yon mm nan direksyon aks parabolik Z la
PANDAN [#1 GE -b] DO1;
b: se longè pwosesis elips la nan direksyon z la
#2=SQRT〔-#1*5/3〕;
(Dapre fòmil parabolik Z=-3/5*X*X, jwenn valè X, ki se #2, kote SQRT vle di rasin kare)
G01 X〔±2*#2 plis c〕Z〔#1〕;
c: se konpanse (valè dyamèt) aks X parabòl la parapò ak sistèm kowòdone pyès travay la, "±"
Lè w ap pran "plus", li konvèks, epi lè w ap pran "-", li konkav
#1=#1-1; Distans etap (deplase 1mm chak fwa)
FINI1;
2) Fòma estanda deklarasyon parabolik IF la
#1=a;
a: pwen an kòmanse nan zouti a se yon mm nan direksyon aks parabolik Z la
N1 #2=SQRT〔-#1*5/3〕;
(Dapre fòmil parabolik Z=-3/5*X*X, jwenn valè X, ki se #2, kote SQRT vle di rasin kare)
G01 X〔±2*#2 plis b〕Z〔#1〕;
b: Li se konpanse (valè dyamèt) aks X-direksyon parabòl la parapò ak pwen zewo kowòdone a. Lè "±" pran "plis", li konvèks, epi lè "-" pran, li konkav.
#1=#1-1;
(distans etap nan direksyon Z, chak mouvman se 1mm)
SI〔#1 GE -c〕GOTO1; c: longè pwosesis elips la nan direksyon z
Parabolik IF
yon lòt fòm fraz
#1=a;
N1 #2=SQRT〔( plis )#1*5/3〕;
Siy "plus" la ka omisyone
G01 X〔2*#2 plis b〕Z〔-#1〕;
#1=#1 plis 1;
SI [#1 LE c] GOTO1;
Lè w sipoze parabòl la nan direksyon pozitif Z, epi sèvi ak Z〔-#1〕; pou fè parabòl la simetrik ak direksyon negatif la
foto
WHILE deklarasyon
#1=0;
PANDAN [#1 GE -15] DO1;
#2=SQRT〔-#1*5/3〕;
G01 X〔2*#2 plis 30〕Z〔#1〕;
#1=#1-1;
FINI1;
IF deklarasyon
#1=0;
N1 #2=SQRT〔-#1*5/3〕;
G01X〔2*#2 plis 30〕Z〔#1〕;
#1=#1-1;
SI [#1 GE -15] GOTO1;
pwogram konplè
O1234;
G40 G97 G99;
T0101;
S1000 M3;
G00 X42 Z1;
G73 U5 R5;
G73 P10 Q20 U0.5 F0.2;
N10 G00 G42 Z0;
#1=0;
PANDAN [#1 GE -15] DO1;
#2=SQRT〔-#1*5/3〕;
G01 X〔2*#2 plis 30〕Z〔#1〕;
#1=#1-1;
FINI1;
G00 X42;
N20 G00 G40 Z2;
G70 P10 Q20;
G00 X200;
Z200;
M5;
M30;
(4) Diferans ant deklarasyon WHILE ak deklarasyon IF
1) Direksyon de deklarasyon yo diferan
Deklarasyon WHILE a retounen bak
Egzanp: WHILE〔#1 GE 20〕DO1;
G01 X〔#1〕F0.2;
Si nou sipoze ke lè zouti machin nan egzekite fraz sa a, #1=20, li pral kontinye egzekite. Apre egzekite #1=#1-1, valè #1 vin 19, ki pa satisfè kondisyon kontrent yo ankò, kidonk li p ap retounen. (Koupe a 20 nan direksyon X)
G00 X〔#1 plis 1);
#1=#1-1;
FINI1;
2) Deklarasyon SI a retounen pi devan
Egzanp: N1 #2=#2-1;
G01X〔#2〕F0.2; Si nou sipoze ke #2=20 lè zouti machin nan egzekite fraz sa a, li pral kontinye egzekite jiskaske IF〔#2 GE 20〕GOTO1; si kondisyon an toujou satisfè, l ap kontinye retounen nan N1# 2=#2-1; ak valè X aktyèl la ap vin 19, ki pa satisfè kondisyon kontrent yo ankò, epi apre sa egzekite yon lòt
G01X〔#2〕F0.2; Finalman, egzekite pwogram sa a (X direksyon te koupe a 19)
G00X〔#2 plis 1);
SI [#2 GE 20] GOTO1;
3) Jan nou ka wè nan pwogram grooving pi wo a, kantite mo ki nan deklarasyon IF la pi piti anpil pase sa ki nan deklarasyon WHILE.
4) Akòz diferan direksyon pou retounen yo, li yon fraz mwens pou deklarasyon WHILE a ak yon fraz anplis pou deklarasyon IF la pandan pwosesis la.
04
SIEMENS sistèm (tour) aplikasyon pwogram macro
Remak: Pwogram macro a pwograme ak varyab, epi nimewo varyab sistèm Siemens a reprezante pa R.
Pa egzanp, ekri nan metòd pwogramasyon komen: G01X-10
Pwogram macro a ka eksprime tankou:
R1=-10
G01 X=R1
Transfè kondisyonèl:
SI GOTOB: sote bak
IF GOTOF: sote pi devan
ekri nan pwogram komen
GO1X100
Varyab yo ka eksprime tankou:
R1=0
AA: R1=R1 plis 1
G01X=R1
SI R1<100 GOTOB AA
R1 se yon varyab endepandan, valè inisyal la se 0, R1=R1 plis 1 vle di ke valè incrémentielle nan varyab endepandan an se 1, lè pwogram nan ale nan liy sa a chak fwa, valè a nan R1 ogmante pa 1, R1<100 is a conditional expression, IF R1<100 GOTOB AA This line means that if the argument R1<100, the program jumps backward to the mark: AA
Si R1 pi gran pase oswa egal a 100, pwogram nan desann.
Pwogram makro yo ka itilize nan tou de mòd G90 ak G91, men siyifikasyon yo diferan, pou egzanp;
R1=0, G90R1=R1 plis 1, G1X=R1, valè X apre dezyèm pas pwogram sa a se 2.
R1=0, G91R1=R1 plis 1, G1X=R1, valè X apre dezyèm pase pwogram nan se 3. Eksplikasyon: Valè R1 se 1 apre premye a. pas nan pwogram nan, ak valè R1 a se dezyèm pas la Li se 2, men nan mòd G91 li baze sou youn anvan an.
(1) Grooving
foto
T1
TC
T1D1
G0G40X100Z100
M03S1000
G0X54Z2
Byen vit rive nan pwen depa
Z-10
R1=3
Defini lajè lam la kòm 3mm
R2=-10-R1-0.2
Pwen demaraj zouti a se -10, epi yo itilize bò gòch lam la lè yo mete zouti a;
Anviwònman zouti, kidonk lajè lam la ta dwe soustraksyon, 0.2 se alokasyon pou fini.
G1Z=R2F0.1
Zouti a rive nan pwen depa aks Z la
AA:R2=R2-2.5
R3=50
Aks X nan Groove la rive nan pwen an
BB: R3=R3-2
Defini pwofondè koupe chak kouto kòm 2 mm
G1X=R3
X=R3 plis 1
0.5mm retire chip sou yon bò chak pwofondè 2mm nan koupe
IF R3>30 plis 0.4 GOTOB BB
Define the groove depth as 10mm, if R3>30mm, pwogram nan sote dèyè nan mak BB a, epi 0.4 se alokasyon pou fini.
G0X50
Zouti a rive nan pwen depa aks X la
G1Z=R2
IF R2>{{0}} plis 0.2 GOTOB AA
Defini lajè renur la kòm 20mm, ak 0.2 se alokasyon pou fini.
G0X50
G01Z-13
fini
X30
Z-16
G0X50
Z-30
G01X30
Z-16
G0X50
Retire
G0X100
Z100
M05
M30
(2) Elips
1) Fòma debaz
R1=0
Defini varyab R1 ak yon valè inisyal 0
AA:R{{0}b×SQRT (1-R1�R1/a×a)
Dapre ekwasyon elips la, a se semi-majè aks elips la, b se semi-minè aks elips la, ak SQRT se senbòl rasin kare.
G1X=±2×R2 plis XZ=R1-Z
Mete pozisyon ak fòm elips la, plis 2 se konvèks, -2 konkav, X, Z se distans ki genyen ant aks pyès la ak aks elips la (sistèm dyamèt).
R1=R1-1
Mete etap pwosesis la
IF R1>=n GOTOB AA
Si varyab la R1
2) Egzanp pwogramasyon:
foto
T1D1
G0G40X100Z100
M3S1000
G0X52Z2
Z-20
CYCLE95 ()
G42S1500
OO:
R1=20
AA:R{{0}×SQRT (1-R1×R1/400)
G1X=-2×R2 plis 50 Z=R1-40
R1=R1-2
IF R1>=-20 GOTOB AA
PP% 3aX42
G0G40X100Z100
M05
M09
M30
(3) Parabòl
1) Fòma debaz:
R1=0
Mete valè inisyal varyab R1 a 0
AA: R2=SQRT (-R1×n)
Jwenn dapre fòma debaz parabòl la, kote SQRT se senbòl rasin kare, epi n se koyefisyan.
G01X=2×R2 plis n
Z=R1
Chemen pwosesis, plis 2 se konvèks, n se valè pwen an kòmanse nan aks X
R1=R1-1
Valè enkreman varyab la se 1mm
IF R1>-30 GOTOB AA
If the variable R1>-30, pwogram nan sote dèyè nan mak la: AA
2) Egzanp pwogramasyon:
foto
T1
Tc
T1D1
G0G40X100Z100
M03S1000
G0X52Z2
CYCLE95 ()
G0G42
OO:
R1=0
AA:R2=SQRT (-R1×5/3)
G01X=2×R2 plis 30 Z=R1
R1=R1-2
IF R1>-60 GOTOB AA
PP: X52
G0X100Z100
M05
M30
