CNC FORUM

bartek535 · Wysłany: 2008-06-26, 06:41 **problem ze skokami warunkowymi**

IF R2>595.5 GOTOF KRESEK6
IF 595>R2>529.5 GOTOF KRESEK5
IF 529>R2>460 GOTOF KRESKI4
IF 459>R2>395.5 GOTOF KRESKI3
IF 395>R2>330 GOTOF KRESKI2
IF 329.5>R2>250 GOTOF KRESKA1
IF R2<249.5 GOTOF KRESKA

czy ktos wie jak zrobic aby wzależności od wpisanego parametru R2. np 560. program wykonywal skok do etykiety kresek5. a po wpisaniu np 200 do etykiety kreska.

prosze o pomoc:(:(:(

Bingo · Wysłany: 2008-06-26, 08:37

Nie mam w tej chwili Siemensa pod ręką ale myślę że powinno to wyglądać tak:
IF R2>529.5 GOTOF KRESEK6
IF R2>595 AND R2>529.5 GOTOF KRESEK5
IF R2>529 AND R2>460 GOTO F KRESKI4
.....
.....
KRESEK5:
G0 X=5 Y=4

KRESKI4:
G1 X=100 Y=100

bartek535 · Wysłany: 2008-06-26, 12:09

no niestety dalej nie dziala. jedynie gdy R2 jest wieksze od 595.5 wykonywany jest skok do do kresek6 a gdy R2 jest mniejesz to program tak jakby nie sprawdzal dalszych warunkow tylko przeskakuje do pierwszej z brzegu etykiety w moim przypadku jest to etykieta kreska.

moj program:

%_N_BESAA_MPF
;$PATH=/_N_WKS_DIR/_N_BESAA_WPD
N5 TRANS
N10 TRAFOOF
;
M51 ; SPRAWDZ STACJE LEWA
H35 ; BAZY LEWE SCHOWANE
;
N15 R1=713 ;DLUGOSC
N20 R2=566 ;SZEROKOSC
N25 R5=37
N30 R6=32
N35 R7=27
N40 R8=40
N45 R9=23.5
N50 R10=10 ;WYSOKOSC KRESEK
N55 R11=37
N60 R12=20.5
N65 R13=34
N70 R14=40.5
N75 R15=6 ;WYSOKOSC SRODKA
N80 R50=50 ;WYSOKOSC PRZEJAZDU
;
N85 R3=69;ODSTEP
N90 R4=110;luk
;
N95 G64 G54 M51 SOFT CUT2DF G451 CFIN
N100 G53 G90 G0 D0 Z480
N105 IF R2>595.5 GOTOF KRESEK6
IF 595>R2 AND R2>529.5 GOTOF KRESEK5
IF 529>R2 AND R2>460 GOTOF KRESKI4
IF 459>R2 AND R2>395.5 GOTOF KRESKI3
IF 395>R2 AND R2>330 GOTOF KRESKI2
IF 329.5>R2 AND R2>250 GOTOF KRESKA1
IF R2<249.5 GOTOF KRESKA

KRESKA:
N110 WECHSEL(11,3,18000)
N115 G0 X=r1/2 Y=-r3 Z=R50 D1
N120 G1 Z=R15 F5000
N125 G1 X=r1/2 Y=-r3 F8000
N130 G1 X=r1-r4 Y=-r3
N135 CIP X=r1-r4 Y=-r2+r3 I1=r1-r3 J1=-r2/2
N140 G1 X=r1-r4 Y=-r2+r3
N145 G1 x=r3 Y=-r2+r3
N150 G1 x=r3 Y=-r3
N155 G1 x=r1/2 y=-r3
N160 G0 x=r1/2 y=-r3 Z=R50
N165 TRANS
N170 TRAFOOF
N175 D0
N180 G0 G53 Z480
N185 G0 G53 B0 C0
N190 G53 G90 G0 D0 Z480
N195 G53 X2500
N200 M41 ; PRZYSSAWKA LEWA OFF
N205 H34
M30
N210
N215
KRESKA1:
N220 WECHSEL(11,3,18000)
N225 G0 X=r1/2 Y=-r3 Z=R50 D1
N230 G1 Z=R15 F5000
N235 G1 X=r1/2 Y=-r3 F8000
N240 G1 X=r1-r4 Y=-r3
N245 CIP X=r1-r4 Y=-r2+r3 I1=r1-r3 J1=-r2/2
N250 G1 X=r1-r4 Y=-r2+r3
N255 G1 x=r3 Y=-r2+r3
N260 G1 x=r3 Y=-r3
N265 G1 x=r1/2 y=-r3
N270 G0 x=r1/2 y=-r3 Z=R50
N275 G0 X=R3 Y=-R2/2
N280 G1 X=R3 Y=-R2/2 Z=R10
N285 X=R1-R3 Y=-R2/2
N290 G0 X=R1-R3 Y=-R2/2 Z=R50
N295 TRANS
N300 TRAFOOF
N305 D0
N310 G0 G53 Z480
N315 G0 G53 B0 C0
N320 G53 G90 G0 D0 Z480
N325 G53 X2500
N330 M41 ; PRZYSSAWKA LEWA OFF
N335 H34
M30
N340
N345
KRESKI2:

N350 WECHSEL(11,3,18000)
N355 G0 X=r1/2 Y=-r3 Z=R50 D1
N360 G1 Z=R15 F5000
N365 G1 X=r1/2 Y=-r3 F8000
N370 G1 X=r1-r4 Y=-r3
N375 CIP X=r1-r4 Y=-r2+r3 I1=r1-r3 J1=-r2/2
N380 G1 X=r1-r4 Y=-r2+r3
N385 G1 x=r3 Y=-r2+r3
N390 G1 x=r3 Y=-r3
N395 G1 x=r1/2 y=-r3
N400 G0 x=r1/2 y=-r3 Z=R50
N405 G0 X=R3 Y=-R3-((R2-2*R3)/3)
N410 G1 X=R3 Y=-R3-((R2-2*R3)/3) Z=R10
N415 X=R1-R4+R5 Y=-R3-((R2-2*R3)/3)
N420 G0 X=R1-R4+R5 Y=-R3-((R2-2*R3)/3) Z=R50
N425 G0 X=R3 Y=-R2+((R2-2*R3)/3)+R3
N430 G1 X=R3 Y=-R2+((R2-2*R3)/3)+R3 Z=R10
N435 X=R1-R2+R5 Y=-R2+((R2-2*R3)/3)+R3
N440 TRANS
N445 TRAFOOF
N450 D0
N455 G0 G53 Z480
N460 G0 G53 B0 C0
N465 G53 G90 G0 D0 Z480
N470 G53 X2500
N475 M41 ; PRZYSSAWKA LEWA OFF
N480 H34
M30
N485
N490
KRESKI3:

N495 WECHSEL(11,3,18000)
N500 G0 X=r1/2 Y=-r3 Z=R50 D1
N505 G1 Z=R15 F5000
N510 G1 X=r1/2 Y=-r3 F8000
N515 G1 X=r1-r4 Y=-r3
N520 CIP X=r1-r4 Y=-r2+r3 I1=r1-r3 J1=-r2/2
N525 G1 X=r1-r4 Y=-r2+r3
N530 G1 x=r3 Y=-r2+r3
N535 G1 x=r3 Y=-r3
N540 G1 x=r1/2 y=-r3
N545 G0 x=r1/2 y=-r3 Z=R50
N550 G0 X=R3 Y=-R3-((R2-2*R3)/4)
N555 G1 X=R3 Y=-R3-((R2-2*R3)/4) Z=R10
N560 X=R1-R4+R6 Y=-R3-((R2-2*R3)/4)
N565 G0 X=R1-R4+R6 Y=-R3-((R2-2*R3)/4) Z=R50
N570 G0 X=R3 Y=R2/2
N575 G1 X=R1-R3 Y=R2/2 Z=R10
N580 G0 X=R1-R3 Y=R2/2 Z=R50
N585 G0 X=R3 Y=-R2+((R2-2*R3)/4)+R3
N590 G1 X=R3 Y=-R2+((R2-2*R3)/4)+R3 Z=R10
N595 X=R1-R3+R6 Y=-R2+((R2-2*R3)/4)+R3
N600 TRANS
N605 TRAFOOF
N610 D0
N615 G0 G53 Z480
N620 G0 G53 B0 C0
N625 G53 G90 G0 D0 Z480
N630 G53 X2500
N635 M41 ; PRZYSSAWKA LEWA OFF
N640 H34
M30
N645
N650
KRESKI4:
N655 WECHSEL(11,3,18000)
N660 G0 X=r1/2 Y=-r3 Z=R50 D1
N665 G1 Z=R15 F5000
N670 G1 X=r1/2 Y=-r3 F8000
N675 G1 X=r1-r4 Y=-r3
N680 CIP X=r1-r4 Y=-r2+r3 I1=r1-r3 J1=-r2/2
N685 G1 X=r1-r4 Y=-r2+r3
N690 G1 x=r3 Y=-r2+r3
N695 G1 x=r3 Y=-r3
N700 G1 x=r1/2 y=-r3
N705 G0 x=r1/2 y=-r3 Z=R50
N710 G0 X=R3 Y=-R3-((R2-2*R3)/5)
N715 G1 X=R3 Y=-R3-((R2-2*R3)/5) Z=R10
N720 X=R1-R4+R7 Y=-R3-((R2-2*R3)/5)
N725 G0 X=R1-R4+R7 Y=-R3-((R2-2*R3)/5) Z=R=50
N730 G0 X=R3 Y=-R3-((R2-2*R3)/2.5)
N735 G1 X=R1-R4+R8 Y=-R3-((R2-2*R3)/2.5) Z=R10
N740 G0 X=R1-R4+R8 Y=-R3-((R2-2*R3)/2.5) Z=R50
N745 G0 X=R3 Y=-R2+((R2-2*R3)/2,5)+R3
N750 G1 X=R3 Y=-R2+((R2-2*R3)/2.5)+R3 Z=R10
N755 X=R1-R4+R8 Y=-R2+((R2-2*R3)/2.5)+R3
N760 G0 X=R1-R4+R8 Y=-R2+((R2-2*R3)/2.5)+R3 Z=R50
N765 G0 X=R3 Y=-R2+R3+((R2-2*R3)/5)
N770 G1 X=R3 Y=-R2+R3+((R2-2*R3)/5) Z=R10
N775 X=R1-R4+R7 Y=-R2+R3+((R2-2*R3)/5) Z=R10
N780 TRANS
N785 TRAFOOF
N790 D0
N795 G0 G53 Z480
N800 G0 G53 B0 C0
N805 G53 G90 G0 D0 Z480
N810 G53 X2500
N815 M41 ; PRZYSSAWKA LEWA OFF
N820 H34
M30
N825
N830
KRESEK5:
N835 WECHSEL(11,3,18000)
N840 G0 X=r1/2 Y=-r3 Z=R50 D1
N845 G1 Z=R15 F5000
N850 G1 X=r1/2 Y=-r3 F8000
N855 G1 X=r1-r4 Y=-r3
N860 CIP X=r1-r4 Y=-r2+r3 I1=r1-r3 J1=-r2/2
N865 G1 X=r1-r4 Y=-r2+r3
N870 G1 x=r3 Y=-r2+r3
N875 G1 x=r3 Y=-r3
N880 G1 x=r1/2 y=-r3
N885 G0 x=r1/2 y=-r3 Z=R50
N890 G0 X=R3 Y=-R3-((R2-2*R3)/6)
N895 G1 X=R3 Y=-R3-((R2-2*R3)/6) Z=R10
N900 X=R1-R4+R9 Y=-R3-((R2-2*R3)/6)
N905 G0 X=R1-R4+R9 Y=-R3-((R2-2*R3)/6) Z=R=R50
N910 G0 X=R3 Y=-R3-((R2-2*R3)/3)
N915 G1 X=R1-R4+R11 Y=-R3-((R2-2*R3)/3) Z=R10
N920 G0 X=R1-R4+R11 Y=-R3-((R2-2*R3)/3) Z=R50
N925 G0 X=R3 Y=R2/2
N930 G1 X=R1-R3 Y=R2/2 Z=R10
N935 G0 X=R1-R3 Y=R2/2 Z=R50
N940 G0 X=R3 Y=-R2+((R2-2*R3)/3)+R3
N945 G1 X=R3 Y=-R2+((R2-2*R3)/3)+R3 Z=R10
N950 X=R1-R4+R11 Y=-R2+((R2-2*R3)/3)+R3
N955 G0 X=R1-R4+R11 Y=-R2+((R2-2*R3)/3)+R3 Z=R50
N960 G0 X=R3 Y=-R2+R3+((R2-2*R3)/6)
N965 G1 X=R3 Y=-R2+R3+((R2-2*R3)/6) Z=R10
N970 X=R1-R4+R9 Y=-R2+R3+((R2-2*R3)/6) Z=R10
N975 TRANS
N980 TRAFOOF
N985 D0
N990 G0 G53 Z480
N995 G0 G53 B0 C0
N1000 G53 G90 G0 D0 Z480
N1005 G53 X2500
N1010 M41 ; PRZYSSAWKA LEWA OFF
N1015 H34
M30
N1020
N1025
KRESEK6:
N1030 WECHSEL(11,3,18000)
N1035 G0 X=r1/2 Y=-r3 Z=R50 D1
N1040 G1 Z=R15 F5000
N1045 G1 X=r1/2 Y=-r3 F8000
N1050 G1 X=r1-r4 Y=-r3
N1055 CIP X=r1-r4 Y=-r2+r3 I1=r1-r3 J1=-r2/2
N1060 G1 X=r1-r4 Y=-r2+r3
N1065 G1 x=r3 Y=-r2+r3
N1070 G1 x=r3 Y=-r3
N1075 G1 x=r1/2 y=-r3
N1080 G0 x=r1/2 y=-r3 Z=R50
N1085 G0 X=R3 Y=-R3-((R2-2*R3)/7)
N1090 G1 X=R3 Y=-R3-((R2-2*R3)/7) Z=R10
N1095 X=R1-R4+R12 Y=-R3-((R2-2*R3)/7)
N1100 G0 X=R1-R4+R12 Y=-R3-((R2-2*R3)/7) Z=R50
N1115 G0 X=R3 Y=-R3-((R2-2*R3)/3.5)
N1120 G1 X=R1-R4+R13 Y=-R3-((R2-2*R3)/3.5) Z=R10
N1125 G0 X=R1-R4+R13 Y=-R3-((R2-2*R3)/3.5) Z=R50
N1130 G0 X=R3 Y=-R3-((R2-2*R3)/1.75)
N1135 G1 X=R3 Y=-R3-((R2-2*R3)/1.75) Z=R10
N1140 X=R1-R4+R14 Y=-R3-((R2-2*R3)/1.75)
N1145 G0 X=R1-R4+R14 Y=-R3-((R2-2*R3)/1.75) Z=R50
N1150 G0 X=R3 Y=-R2+R3+((R2-2*R3)/1.75)
N1155 G1 X=R3 Y=-R2+R3+((R2-2*R3)/1.75) Z=R10
N1160 G0 X=R3 Y=-R2+R3+((R2-2*R3)/1.75) Z=R50
N1165 G0 X=R3 Y=-R2+((R2-2*R3)/3.5)+R3
N1170 G1 X=R3 Y=-R2+((R2-2*R3)/3.5)+R3 Z=R10
N1175 X=R1-R4+R13 Y=-R2+((R2-2*R3)/3.5)+R3
N1180 G0 X=R1-R4+R13 Y=-R2+((R2-2*R3)/3.5)+R3 Z=R50
N1185 G0 X=R3 Y=-R2+R3+((R2-2*R3)/7)
N1190 G1 X=R3 Y=-R2+R3+((R2-2*R3)/7) Z=R10
N1195 X=R1-R4+R12 Y=-R2+R3+((R2-2*R3)/7) Z=R10
N1200 TRANS
N1205 TRAFOOF
N1210 D0
N1215 G0 G53 Z480
N1220 G0 G53 B0 C0
N1225 G53 G90 G0 D0 Z480
N1230 G53 X2500
N1235 M41 ; PRZYSSAWKA LEWA OFF
N1240 H34
M30

gelo · Wysłany: 2008-06-26, 14:58

A nie powinienes dodac ENDIF na koncu kazdego IF? Inaczej koniec pierwszegi IF jest nie wiadomo gdzie....
Poza tym nie wiem czy nie lepiej warunki wziac w nawiasy i rozbic porownanie
Ja bym sprobowal
IF (R2>595.5) GOTOF KRESEK6
ELSE
IF (R2<595) AND (R2>529.5) GOTOF KRESEK5
ELSE
IF (R2<529) AND (R2>460) GOTOF KRESKI4
ELSE
IF (R2<459) AND (R2>395.5) GOTOF KRESKI3
ELSE
IF (R2<395) AND (R2>330) GOTOF KRESKI2
ELSE
IF (R2<329.5) AND (R2>250) GOTOF KRESKA1
ELSE
IF R2<249.5 GOTOF KRESKA
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF

Jak to nie pomoze to sprobuj tak:
IF (R2>595.5) GOTOF KRESEK6
ENDIF
IF (R2<595) AND (R2>529.5) GOTOF KRESEK5
ENDIF
IF (R2<529) AND (R2>460) GOTOF KRESKI4
ENDIF
IF (R2<459) AND (R2>395.5) GOTOF KRESKI3
ENDIF
IF (R2<395) AND (R2>330) GOTOF KRESKI2
ENDIF
IF (R2<329.5) AND (R2>250) GOTOF KRESKA1
ENDIF
IF R2<249.5 GOTOF KRESKA
ENDIF

bartek535 · Wysłany: 2008-06-27, 08:01

drugi sposob byl dobry. dzieki GELO :mrgreen:

gelo · Wysłany: 2008-06-27, 18:43

Cieszy mnie to ogromnie :smile:

W podziece mozesz wcisnac "pomógl"

pozdrawiam