Grawerowanie po powierzchni walcowej - część 2

Dziś druga część wariacji na temat grawerowania na walcu.

Rysunkiem z końca poprzedniego postu zajmę się w jednej z kolejnych części, w tej części wykorzystamy cykl 27, czyli jeden z cykli SL rzutujący ścieżkę na powierzchnię cylindra. W cyklu tym, w zależności od parametru Q17, programujemy kąt obrotu bezpośrednio we współrzędnych kątowych (0), bądź liniowych (1), należy jednakże pamiętać, że w konturze musi być zdefiniowana oś obrotowa, czyli możemy programować we współrzędnych np. XA, ale nie możemy w XY.

W poniższym listingu zawarta jest też procedura definicji położenia tekstu.

0  BEGIN PGM G MM 

1  BLK FORM 0.1 Z  X-1.2  Y-1.2  Z+9.5

2  BLK FORM 0.2  X+1.2  Y+1.2  Z+10

3  TOOL CALL 6 Z S3000 ;Grawer

4  L  X+0  Y+0  Z+100  A+0 R0 FMAX M3

5  ;--- LISTA PARAMETROW ----

6  Q1001 = 2 ;bezpieczna wysokosc

7  Q1002 = - 0.01 ;glebokosc

8  Q1003 = 40 ;posuw zaglebiania

9  Q1004 = 60 ;posuw roboczy

10 Q1005 = 10 ;promien detalu

11 QS1 = "+H" ;orientacja tekstu

12 ;--- KONIEC LISTY PARAMETROW ---

13 ;--- PROGRAM WYKONWCZY ---

14 CALL LBL 10

15 CYCL DEF 14.0 GEOMETRIA KONTURU

16 CYCL DEF 14.1 PODPR.KONTURU1

17 CYCL DEF 27 NA POW. CYLINDRA ~

 Q1=+Q1002 ;GLEBOKOSC FREZOWANIA ~

 Q3=+0    ;NADDATEK NA STRONE ~

 Q6=+Q1001 ;BEZPIECZNA WYSOKOSC ~

 Q10=+Q1002 ;GLEBOKOSC DOSUWU ~

 Q11=+Q1003 ;WARTOSC POSUWU WGL. ~

 Q12=+Q1004 ;POSUW PRZY ROZWIERC. ~

 Q16=+Q1005 ;PROMIEN ~

 Q17=+1    ;RODZAJ WYMIARU

18 M99

19 QS1 = "-H" ;orientacja tekstu

20 CALL LBL 10

21 CYCL DEF 27 NA POW. CYLINDRA ~

 Q1=+Q1002 ;GLEBOKOSC FREZOWANIA ~

 Q3=+0    ;NADDATEK NA STRONE ~

 Q6=+Q1001 ;BEZPIECZNA WYSOKOSC ~

 Q10=+Q1002 ;GLEBOKOSC DOSUWU ~

 Q11=+Q1003 ;WARTOSC POSUWU WGL. ~

 Q12=+Q1004 ;POSUW PRZY ROZWIERC. ~

 Q16=+Q1005 ;PROMIEN ~

 Q17=+1    ;RODZAJ WYMIARU

22 M99

23 QS1 = "+V" ;orientacja tekstu

24 CALL LBL 10

25 CYCL DEF 27 NA POW. CYLINDRA ~

 Q1=+Q1002 ;GLEBOKOSC FREZOWANIA ~

 Q3=+0    ;NADDATEK NA STRONE ~

 Q6=+Q1001 ;BEZPIECZNA WYSOKOSC ~

 Q10=+Q1002 ;GLEBOKOSC DOSUWU ~

 Q11=+Q1003 ;WARTOSC POSUWU WGL. ~

 Q12=+Q1004 ;POSUW PRZY ROZWIERC. ~

 Q16=+Q1005 ;PROMIEN ~

 Q17=+1    ;RODZAJ WYMIARU

26 M99

27 QS1 = "-V" ;orientacja tekstu

28 CALL LBL 10

29 CYCL DEF 27 NA POW. CYLINDRA ~

 Q1=+Q1002 ;GLEBOKOSC FREZOWANIA ~

 Q3=+0    ;NADDATEK NA STRONE ~

 Q6=+Q1001 ;BEZPIECZNA WYSOKOSC ~

 Q10=+Q1002 ;GLEBOKOSC DOSUWU ~

 Q11=+Q1003 ;WARTOSC POSUWU WGL. ~

 Q12=+Q1004 ;POSUW PRZY ROZWIERC. ~

 Q16=+Q1005 ;PROMIEN ~

 Q17=+1    ;RODZAJ WYMIARU

30 M99

31 ;--- KONIEC PROGRAMU WYKONAWCZEGO ---

32 M30

33 ;--- KALKULACJA ORIENTACJI ---

34 LBL 10

35 QS10 = "+H"

36 QS11 = "-H"

37 QS12 = "+V"

38 QS13 = "-V"

39 Q1010 = STRCOMP( SRC_QS1 SEA_QS10 )

40 Q1011 = STRCOMP( SRC_QS1 SEA_QS11 )

41 Q1012 = STRCOMP( SRC_QS1 SEA_QS12 )

42 Q1013 = STRCOMP( SRC_QS1 SEA_QS13 )

43 LBL 0

44 ;--- KONIEC KALKULACJI ORIENTACJI ---

45 ;--- KONTURY LITER ---

46 LBL 1 ;G

47 FN 10: IF +Q1010 NE +0 GOTO LBL 2 ;G +H

48 L  X+0.56  A-1

49 L  X+0.2  A-1

50 CR  X+0  A-0.8 R+0.2 DR+

51 L  X+0  A-0.2

52 CR  X+0.2  A+0 R+0.2 DR+

53 L  X+0.56  A+0

54 L  X+0.56  A-0.56

55 L  X+0.4  A-0.56

56 LBL 2

57 FN 10: IF +Q1011 NE +0 GOTO LBL 3 ;G -H

58 L  X-0.56  A+1

59 L  X-0.2  A+1

60 CR  X+0  A+0.8 R+0.2 DR+

61 L  X+0  A+0.2

62 CR  X-0.2  A+0 R+0.2 DR+

63 L  X-0.56  A+0

64 L  X-0.56  A+0.56

65 L  X-0.4  A+0.56

66 LBL 3

67 FN 10: IF +Q1012 NE +0 GOTO LBL 4 ;G +V

68 L  X+1  A+0.56

69 L  X+1  A+0.2

70 CR  X+0.8  A+0 R+0.2 DR+

71 L  X+0.2  A+0

72 CR  X+0  A+0.2 R+0.2 DR+

73 L  X+0  A+0.56

74 L  X+0.56  A+0.56

75 L  X+0.56  A+0.4

76 LBL 4

77 FN 10: IF +Q1013 NE +0 GOTO LBL 5 ;G -V

78 L  X-1  A-0.56

79 L  X-1  A-0.2

80 CR  X-0.8  A+0 R+0.2 DR+

81 L  X-0.2  A+0

82 CR  X+0  A-0.2 R+0.2 DR+

83 L  X+0  A-0.56

84 L  X-0.56  A-0.56

85 L  X-0.56  A-0.4

86 LBL 5

87 LBL 0

88 ;--- KONIEC KONTUROW LITER ---

89 END PGM G MM 

A oto rezultat działania powyższego programu:

Jak widać na rysunku znalazły się tam wszystkie 4 orientacje tekstu.

Ponieważ do tworzenia listingów na potrzeby tych postów używam wersji demo iTNC, jestem ograniczony do maksymalnie 100 linii kodu, dlatego też brak jest tu możliwości skalowania, oraz pozycjonowania tekstu. Zajmę się tym w kolejnych częściach, wykorzystując jednak tylko podstawową orientację, czyli +H.