Reklamlar

reklam reklam

Gönderen Konu: MACRO İLE YAZI YAZMA  (Okunma sayısı 51128 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı scorpionteam

  • Forum Sorumlusu
  • *****
  • İleti: 588
  • +70/-2
  • Cinsiyet: Bay
MACRO İLE YAZI YAZMA
« : Nisan 23, 2008, 04:37:31 ÖS »
O7000(YAZI YAZMA PROGRAMI)
O07000 (YAZI YAZMA PROGRAMI)
T1 M06
N10 M03 S8000
G90 G54 G00 X-0.2 Y0. M08
G43 H01 Z3.
#503= 10.
#500= [ #503 / 1.782 ]
#501= 1. (Z YAZMAYA BAŞLAMA MESAFES])
#502= 3. (EMNİYET MESAFESİ Z)
G65 P7001 A1. B-0.02 C15. D40. E1. (A)
G65 P7001 A2. B-0.02 C15. D40. E1. (B)
G65 P7001 A3. B-0.02 C15. D40. E1. (C)
G65 P7001 A4. B-0.02 C15. D40. E1. (D)
G65 P7001 A5. B-0.02 C15. D40. E1. (E)
G65 P7001 A6. B-0.02 C15. D40. E1. (F)
G65 P7001 A7. B-0.02 C15. D40. E1. (G)
G65 P7001 A8. B-0.02 C15. D40. E1. (H)
G65 P7001 A9. B-0.02 C15. D40. E1. (I)
G65 P7001 A10. B-0.02 C15. D40. E1. (J)
G65 P7001 A11. B-0.02 C15. D40. E1. (K)
G65 P7001 A12. B-0.02 C15. D40. E1. (L)
G65 P7001 A13. B-0.02 C15. D40. E1. (M)
G65 P7001 A14. B-0.02 C15. D40. E1. (N)
G65 P7001 A15. B-0.02 C15. D40. E1. (O)
G65 P7001 A16. B-0.02 C15. D40. E1. (P)
G65 P7001 A17. B-0.02 C15. D40. E1. (R)
G65 P7001 A18. B-0.02 C15. D40. E1. (S)
G65 P7001 A19. B-0.02 C15. D40. E1. (T)
G65 P7001 A20. B-0.02 C15. D40. E1. (U)
G65 P7001 A21. B-0.02 C15. D40. E1. (V)
G65 P7001 A22. B-0.02 C15. D40. E1. (W)
G65 P7001 A23. B-0.02 C15. D40. E1. (X)
G65 P7001 A24. B-0.02 C15. D40. E1. (Y)
G65 P7001 A25. B-0.02 C15. D40. E1. (Z)
N20 G28 G91 Z0 (REFERANS NOKTASI)
M30


Program O7000

A=HARF SEÇME
B=Z DERİNLİK
C=Z DALMA HIZI
D=KESME HIZI
E=BAŞKA HARF VARMI (1.=EVET,0.=HAYIR)
#503 YAZI BOYU
 

HARF SEÇME KODLARI
BOŞLU=0. A=1. B=2. C=3. D=4. E=5. F=6. G=7. H=8. I=9. J=10. K=11. L=12. M=13. N=14. O=15. P=16.
 Q=17. R=18. S=19. T=20. U=21. V=22. W=23. X=24. Y=25. Z=26.


7001 NOLU ALT PROGRAM

%
O07001
IF [ #1 EQ 0. ] GOTO100
IF [ #1 EQ 1. ] GOTO1
IF [ #1 EQ 2. ] GOTO2
IF [ #1 EQ 3. ] GOTO3
IF [ #1 EQ 4. ] GOTO4
IF [ #1 EQ 5. ] GOTO5
IF [ #1 EQ 6. ] GOTO6
IF [ #1 EQ 7. ] GOTO7
IF [ #1 EQ 8. ] GOTO8
IF [ #1 EQ 9. ] GOTO9
IF [ #1 EQ 10. ] GOTO10
IF [ #1 EQ 11. ] GOTO11
IF [ #1 EQ 12. ] GOTO12
IF [ #1 EQ 13. ] GOTO13
IF [ #1 EQ 14. ] GOTO14
IF [ #1 EQ 15. ] GOTO15
IF [ #1 EQ 16. ] GOTO16
IF [ #1 EQ 17. ] GOTO17
IF [ #1 EQ 18. ] GOTO18
IF [ #1 EQ 19. ] GOTO19
IF [ #1 EQ 20. ] GOTO20
IF [ #1 EQ 21. ] GOTO21
IF [ #1 EQ 22. ] GOTO22
IF [ #1 EQ 23. ] GOTO23
IF [ #1 EQ 24. ] GOTO24
IF [ #1 EQ 25. ] GOTO25
IF [ #1 EQ 26. ] GOTO26

(A )
N1 G91 G00 X [ #500 * 0.2203 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X [ #500 * 0.7796 ] Y [ #500 * 1.782 ] F#7
X [ #500 * 0.7796 ] Y - [ #500 * 1.782 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 0.4018 ] Y [ #500 * 0.9186 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 0.7554 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 0.6222 ] Y - [ #500 * 1.0366 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(B )
N2 G91 G00 X [ #500 * 0.1923 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y [ #500 * 1.782 ] F#7
X [ #500 * 1.041 ]
G02 R [ #500 * 0.4179 ] J - [ #500 * 0.4179 ] Y - [ #500 * 0.8358 ]
G01 X - [ #500 * 1.041 ]
G90 G00 Z#502
G91 G00 Y - [ #500 * 0.9462 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X [ #500 * 1.1422 ] F#7
G03 R [ #500 * 0.4731 ] J [ #500 * 0.4731 ] Y [ #500 * 0.9462 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 1.3345 ] Y - [ #500 * 1.0642 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(C )
N3 G91 G00 X [ #500 * 1.3288 ] Y [ #500 * 0.1719 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01
G02 R [ #500 * 0.891 ] I - [ #500 * 0.3288 ] J [ #500 * 0.828 ] Y [ #500 * 0.828 ] X - [ #500 * 1.2198 ] F#7
G02 R [ #500 * 0.891 ] I [ #500 * 0.891 ] X [ #500 * 1.2198 ] Y [ #500 * 0.828 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 1.3288 ] Y - [ #500 * 1.828 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200
(D )
N4 G91 G00 X [ #500 * 0.1129 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y [ #500 * 1.782 ] F#7
X [ #500 * 0.633 ]
G02 R [ #500 * 0.891 ] J - [ #500 * 0.891 ] Y - [ #500 * 1.782 ]
G01 X - [ #500 * 0.633 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 0.1129 ] Y - [ #500 * 0.118 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(E )
N5 G91 G00 X [ #500 * 1.5895 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 1.1791 ] F#7
Y [ #500 * 1.782 ]
X [ #500 * 1.1791 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 0.4535 ] Y - [ #500 * 0.8319 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 0.7256 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 0.4104 ] Y - [ #500 * 1.068 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(F )
N6 G91 G00 X [ #500 * 0.2474 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y [ #500 * 1.782 ] F#7
X [ #500 * 1.5051 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 0.7306 ] Y - [ #500 * 0.891 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 0.7744 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 0.2474 ] Y - [ #500 * 1.009 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(G )
N7 G91 G00 X [ #500 * 1.4273 ] Y [ #500 * 1.009 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X [ #500 * 0.4636 ] F#7
G02 R [ #500 * 0.891 ] X - [ #500 * 1.782 ] I - [ #500 * 0.891 ]
G02 R [ #500 * 0.891 ] I [ #500 * 0.891 ] X [ #500 * 1.2891 ] Y [ #500 * 0.797 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 1.3981 ] Y - [ #500 * 1.806 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(H )
N8 G91 G00 X [ #500 * 0.2587 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y [ #500 * 1.782 ] F#7
G90 G00 Z#502
G91 G00 X [ #500 * 1.4825 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y - [ #500 * 1.782 ] F#7
G90 G00 Z#502
G91 G00 Y [ #500 * 0.891 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 1.4825 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 0.2587 ] Y - [ #500 * 1.009 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(I )
N9 G91 G00 X [ #500 * 0.4908 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X [ #500 * 1.0182 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 0.5091 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y [ #500 * 1.782 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 0.5091 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X [ #500 * 1.0182 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 1.5091 ] Y - [ #500 * 1.8999 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(J )
N10 G91 G00 X [ #500 * 0.9405 ] Y [ #500 * 1.9 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X [ #500 * 0.7128 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 0.3564 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y - [ #500 * 1.3067 ] F#7
G02 R [ #500 * 0.4752 ] I - [ #500 * 0.4752 ] X - [ #500 * 0.9504 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 0.3465 ] Y - [ #500 * 0.5932 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(K )
N11 G91 G00 X [ #500 * 0.4174 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y [ #500 * 1.782 ] F#7
G90 G00 Z#502
G91 G00 Y - [ #500 * 0.891 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X [ #500 * 1.0145 ] Y [ #500 * 0.891 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 0.7972 ] Y - [ #500 * 0.7001 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X [ #500 * 0.9478 ] Y - [ #500 * 1.0818 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 1.5825 ] Y - [ #500 * 0.118 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(L )
N12 G91 G00 X [ #500 * 1.4625 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 0.9251 ] F#7
Y [ #500 * 1.782 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 0.5374 ] Y - [ #500 * 1.9 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(M )
N13 G91 G00 X [ #500 * 0.3317 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y [ #500 * 1.782 ] F#7
X [ #500 * 0.6682 ] Y - [ #500 * 1.782 ]
X [ #500 * 0.6682 ] Y [ #500 * 1.782 ]
Y - [ #500 * 1.782 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 1.6682 ] Y - [ #500 * 0.118 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(N )
N14 G91 G00 X [ #500 * 0.2705 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y [ #500 * 1.782 ] F#7
X [ #500 * 1.4589 ] Y - [ #500 * 1.782 ]
Y [ #500 * 1.782 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 1.7294 ] Y - [ #500 * 1.9 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(O )
N15 G91 G00 X [ #500 * 1.6364 ] Y [ #500 * 0.7544 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y [ #500 * 0.5091 ] F#7
G03 R [ #500 * 0.6364 ] I - [ #500 * 0.6364 ] X - [ #500 * 1.2728 ]
G01 Y - [ #500 * 0.5091 ]
G03 R [ #500 * 0.6364 ] I [ #500 * 0.6364 ] X [ #500 * 1.2728 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 1.6364 ] Y - [ #500 * 0.7544 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(P )
N16 G91 G00 X [ #500 * 0.4918 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y [ #500 * 1.782 ] F#7
X [ #500 * 0.5722 ]
G02 R [ #500 * 0.4440 ] J - [ #500 * 0.4440 ] Y - [ #500 * 0.8880 ]
G01 X - [ #500 * 0.5722 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 0.4918 ] Y - [ #500 * 1.0119 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(Q )
N17 G91 G00 X [ #500 * 1.714 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 0.4700 ] Y [ #500 * 0.4700 ] F#7
G90 G00 Z#502
G91 G00 X [ #500 * 0.3923 ] Y [ #500 * 0.1664 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y [ #500 * 0.5091 ] F#7
G03 R [ #500 * 0.6364 ] I - [ #500 * 0.6364 ] X - [ #500 * 1.2728 ]
G01 Y - [ #500 * 0.5091 ]
G03 R [ #500 * 0.6364 ] I [ #500 * 0.6364 ] X [ #500 * 1.2728 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 1.6364 ] Y - [ #500 * 0.7544 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

( R )
N18 G91 G00 X [ #500 * 0.4129 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y [ #500 * 1.782 ] F#7
X [ #500 * 0.7934 ]
G02 R [ #500 * 0.3807 ] J - [ #500 * 0.3807 ] Y - [ #500 * 0.7614 ]
G01 X - [ #500 * 0.7934 ]
G90 G00 Z#502
G91 G00 X [ #500 * 0.6739 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X [ #500 * 0.5001 ] Y - [ #500 * 1.0205 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 1.5870 ] Y - [ #500 * 0.118 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(S )
N19 G91 G00 X [ #500 * 1.6543 ] Y [ #500 * 1.6772 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91
G03 R [ #500 * 0.891 ] I - [ #500 * 0.5929 ] J - [ #500 * 0.6650 ] X - [ #500 * 0.6682 ] Y [ #500 * 0.2227 ] F#7
G03 R [ #500 * 0.4455 ] J - [ #500 * 0.4455 ] Y - [ #500 * 0.891 ]
G01 X [ #500 * 0.2572 ]
G02 R [ #500 * 0.4469 ] I - [ #500 * 0.0359 ] J - [ #500 * 0.4455 ] X [ #500 * 0.4109 ] Y - [ #500 * 0.4455 ]
G02 R [ #500 * 0.4469 ] I - [ #500 * 0.4469 ] X - [ #500 * 0.4109 ] Y - [ #500 * 0.4455 ]
G01 X - [ #500 * 0.3100 ]
G02 R [ #500 * 0.891 ] I [ #500 * 0.0263 ] J [ #500 * 0.8906 ] X - [ #500 * 0.5877 ] Y [ #500 * 0.2450 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 0.3456 ] Y - [ #500 * 0.3630 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(T )
N20 G91 G00 X [ #500 * 1. ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y [ #500 * 1.782 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 0.891 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X [ #500 * 1.782 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 1.891 ] Y - [ #500 * 1.9 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(U )
N21 G91 G00 X [ #500 * 1.7637 ] Y [ #500 * 1.9 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 Y - [ #500 * 1.0182 ] F#7
G02 R [ #500 * 0.7637 ] I - [ #500 * 0.7637 ] X - [ #500 * 1.5274 ]
G01 Y [ #500 * 1.0182 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 0.2362 ] Y - [ #500 * 1.9 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(V )
N22 G91 G00 X [ #500 * 1.6682 ] Y [ #500 * 1.9 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 0.6682 ] Y - [ #500 * 1.782 ] F#7
X - [ #500 * 0.6682 ] Y [ #500 * 1.782 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 0.3317 ] Y - [ #500 * 1.9 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(W )
N23 G91 G00 X [ #500 * 1.8591 ] Y [ #500 * 1.9 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 0.3500 ] Y - [ #500 * 1.782 ] F#7
X - [ #500 * 0.5091 ] Y [ #500 * 1.782 ]
X - [ #500 * 0.5091 ] Y - [ #500 * 1.782 ]
X - [ #500 * 0.3500 ] Y [ #500 * 1.782 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 0.1408 ] Y - [ #500 * 1.9 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(X )
N24 G91 G00 X [ #500 * 1.8909 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 1.782 ] Y [ #500 * 1.782 ] F#7
G90 G00 Z#502
G91 G00 X [ #500 * 1.782 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 1.782 ] Y - [ #500 * 1.782 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 0.109 ] Y - [ #500 * 0.118 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(Y )
N25 G91 G00 X [ #500 * 1.6615 ] Y [ #500 * 1.9 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 0.6615 ] Y - [ #500 * 0.882 ] F#7
Y - [ #500 * 0.8909 ]
G90 G00 Z#502
G91 G00 Y [ #500 * 0.8909 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 0.6615 ] Y [ #500 * 0.882 ] F#7
G90 G00 Z#502
G91 G00 X - [ #500 * 0.3385 ] Y - [ #500 * 1.9 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(Z )
N26 G91 G00 X [ #500 * 1.891 ] Y [ #500 * 0.118 ]
G90 G00 Z#501
G90 G01 Z#2 F#3
G91 G01 X - [ #500 * 1.782 ] F#7
X [ #500 * 1.782 ] Y [ #500 * 1.782 ]
X - [ #500 * 1.782 ]
G90 G00 Z#502
G91 G00 X - [ #500 * 0.109 ] Y - [ #500 * 1.9 ]
IF [ #8 EQ 1. ] GOTO100
IF [ #8 EQ 0. ] GOTO200

(HER HARFTEN SORA SIÇRADIĞI YER)
N100 G90 G00 Z#502
G91 G00 X [ #500 * 2.0000 ] (BOŞLUK BIRAKIYOR)
N200 M99
%





« Son Düzenleme: Nisan 29, 2008, 04:13:48 ÖÖ Gönderen: pako34 »
YÜKSELMEK İSTEYEN YERİNE ADAM YETİŞTİRSİN

Çevrimdışı scorpionteam

  • Forum Sorumlusu
  • *****
  • İleti: 588
  • +70/-2
  • Cinsiyet: Bay
MACRO İLE YAZI YAZMA
« Yanıtla #1 : Nisan 23, 2008, 05:11:37 ÖS »
BU PROGRAMI DENEDİM ÇALIŞIYOR. kafanıza takılan bir şey olursa sorun
YÜKSELMEK İSTEYEN YERİNE ADAM YETİŞTİRSİN

Çevrimdışı poyrazsawa

  • Operatör
  • **
  • İleti: 17
  • +0/-1
  • Cinsiyet: Bay
Ynt: MACRO İLE YAZI YAZMA
« Yanıtla #2 : Nisan 23, 2008, 05:40:39 ÖS »
arkadaşım emigine sağlık yanlız a b c  ... z kadar yazdıgın programı tam anlam verremedim açıklarsan sevinirim

Çevrimdışı scorpionteam

  • Forum Sorumlusu
  • *****
  • İleti: 588
  • +70/-2
  • Cinsiyet: Bay
MACRO İLE YAZI YAZMA
« Yanıtla #3 : Nisan 23, 2008, 06:30:47 ÖS »
N1(A)
YAZAN PROGRAM A harfini işler
N2(B)
YAZAN program b harfini işler
7000 nolu program G65 (macro çağırma)ile 7001 nolu programı çağırır.A harfi yanındaki rakam ilede yazılmak istenen harfin programını çağırır.bu programı yalçın yiğit isimli bir arkadaş istemişti güle güle kullansın
YÜKSELMEK İSTEYEN YERİNE ADAM YETİŞTİRSİN

Çevrimdışı scorpionteam

  • Forum Sorumlusu
  • *****
  • İleti: 588
  • +70/-2
  • Cinsiyet: Bay
MACRO İLE YAZI YAZMA
« Yanıtla #4 : Nisan 23, 2008, 06:36:56 ÖS »
G65P7001A9.0B-.02C15.0D40.0E1.0 (I) ( E0 OLMAYACAK EĞER SIFIR OLURSA BOŞLUK BIRAKMAZ)
BU SATIRDAKİ E0 YANLIŞDI DÜZELTTİM DAHA ÖNCE ALAN ARKADAŞLAR DÜZELTSİN ASLINDA E0 İLE E1 ARASINDAKİ FARKI BİLMENİZ YETER AMA YİNEDE UYARIYIM DEDİM.
YÜKSELMEK İSTEYEN YERİNE ADAM YETİŞTİRSİN

Çevrimdışı nurican

  • Operatör
  • **
  • İleti: 17
  • +0/-1
Ynt: MACRO İLE YAZI YAZMA
« Yanıtla #5 : Nisan 23, 2008, 06:47:07 ÖS »
arkadaşım emeğine sağlık gerçekten tebrik ederim  ben bişi merak ettim bu kadar diez ve if le senmi uğraştın gerçekten birdaha lazım olursa böyle kasmana gerek yok istediğin yazıyı bana bi mail atıver (fontunu felan yani) ben sana direktpostunu göndereyim her zaman kardeşlerimize yardıma hazırız.... :) :) :) :) :)

NURİCANIN CANI SIKILMIŞ BU MESAJI 23 NİSAN 2008'DE YAZMIŞ.O TARİHTEN BU TARİHE KADAR
SİTEYE HİÇ GİRMEMİŞ.BİRDE HER ZAMAN YARDIMA HAZIRIZ DİYOR.ARKADAŞLAR LÜTFEN BÖYLE YAPMAYIN.
« Son Düzenleme: Temmuz 26, 2008, 07:26:22 ÖS Gönderen: pako34 »

Çevrimdışı scorpionteam

  • Forum Sorumlusu
  • *****
  • İleti: 588
  • +70/-2
  • Cinsiyet: Bay
MACRO İLE YAZI YAZMA
« Yanıtla #6 : Nisan 23, 2008, 07:08:18 ÖS »
BU PROGRAM CAM KULLANMAYI BİLMEYEN ARKADAŞLAR İÇİN.YOKSA YAZI YAZMADAN KOLAY NE VAR.
YAZILAR HAAS SİSTEMDEN FANUC İÇİN DÜZENLEDİM HAAS TAN ALMASAYDIMDA CAM'DEN ÇIKARIP MACROYA ÇEVİREBİLİRDİM >:( >:( >:( >:(
önumüzdeki günlerde türkçe harfleride ekliyeceğim
« Son Düzenleme: Nisan 23, 2008, 08:44:45 ÖS Gönderen: pako34 »
YÜKSELMEK İSTEYEN YERİNE ADAM YETİŞTİRSİN

Çevrimdışı scorpionteam

  • Forum Sorumlusu
  • *****
  • İleti: 588
  • +70/-2
  • Cinsiyet: Bay
MACRO İLE YAZI YAZMA
« Yanıtla #7 : Nisan 24, 2008, 11:25:30 ÖÖ »
24.4.2008 TARİHİNDEN ÖNCE BU PROGRAMI ALAN ARKADAŞLAR TEKRAR ALSIN YENIDEN GÜNCELLEDİM
bütün harfleri kontrol etmemiştim hatalı harfler varmış.hepsini düzelttim problemsiz çalışıyor
YÜKSELMEK İSTEYEN YERİNE ADAM YETİŞTİRSİN

Çevrimdışı poyrazsawa

  • Operatör
  • **
  • İleti: 17
  • +0/-1
  • Cinsiyet: Bay
Ynt: MACRO İLE YAZI YAZMA
« Yanıtla #8 : Nisan 24, 2008, 05:53:25 ÖS »
sağol arkadaşım şimdi daha açıklayıcı oldu emeğe saygı kolay gelsin

Çevrimdışı yalçınyiğit

  • Programcı
  • ***
  • İleti: 96
  • +2/-0
  • Cinsiyet: Bay
Ynt: MACRO İLE YAZI YAZMA
« Yanıtla #9 : Mayıs 06, 2008, 02:12:38 ÖS »
pako34 senden allah razı olsun elıne vede emeğine saglık

Çevrimdışı service

  • service
  • Operatör
  • **
  • İleti: 39
  • +3/-0
  • Cinsiyet: Bay
  • ABDULLAH
Ynt: MACRO İLE YAZI YAZMA
« Yanıtla #10 : Mayıs 12, 2008, 11:26:26 ÖS »
öncelikle pako arkadaşımıza teşekkur ederim yanlız benim bir ricam var deneme yapmadan önce arkadaşların #500 lu başlayan değişkenlere dikkat etmesi gerekir bazı üreticiler bu değişkenlerde veri saklaya biliyor örnek takım problarının dataları veya spindle problarının dataları gibi bunlardan emin olmadan denemeyin lutfen geri dönüşümü problemlerle karşılaşmayasınız
« Son Düzenleme: Ekim 05, 2008, 09:27:02 ÖS Gönderen: service »

Çevrimdışı scorpionteam

  • Forum Sorumlusu
  • *****
  • İleti: 588
  • +70/-2
  • Cinsiyet: Bay
MACRO İLE YAZI YAZMA
« Yanıtla #11 : Mayıs 13, 2008, 12:15:21 ÖÖ »
öncelikle service teşekkürler. ben kayarotomatlarda özellikle #500 ile #530 arası macroları kullanıyorum.kendime bazı standartlar yaptım mesela parça boyu #500 parça çapı #530 gibi böylece hem veri makine kapansada,program farklı yerden başlasada değişmiyor hemde daha kolay program yapıyorum.bazen insan macro yazarken içinde boğuluyor başa döndüğünde kendi bile yazdığını anlamada zorlanıyor
YÜKSELMEK İSTEYEN YERİNE ADAM YETİŞTİRSİN

Çevrimdışı Rastlanti

  • Rastlanti
  • Bölüm Sorumlusu
  • *****
  • İleti: 302
  • +25/-4
  • Cinsiyet: Bay
  • CNC'İzmir
    • turkeycnc
Ynt: MACRO İLE YAZI YAZMA
« Yanıtla #12 : Haziran 15, 2008, 06:05:40 ÖS »
pako kardeşim bir örnek program yazarmısın örneğin:TURKEYCNC  yazacağım  bunun progamını yazarmısın teşekürler..daha açıklayıcı olur...
« Son Düzenleme: Haziran 15, 2008, 07:27:42 ÖS Gönderen: turkeycnc »
Ben türk'üm iliklerime kadar ATATÜRK'üm.....

Çevrimdışı scorpionteam

  • Forum Sorumlusu
  • *****
  • İleti: 588
  • +70/-2
  • Cinsiyet: Bay
MACRO İLE YAZI YAZMA
« Yanıtla #13 : Haziran 17, 2008, 01:55:29 ÖÖ »
O07000 (YAZI YAZMA PROGRAMI)
T1 M06
N10 M03 S8000
G90 G54 G00 X-0.2 Y0. M08
G43 H01 Z3.
#503= 10. (YAZI BOYU)
#500= [ #503 / 1.782 ]
#501= 1. (Z YAZMAYA BAŞLAMA MESAFES])
#502= 3. (EMNİYET MESAFESİ Z)

G65 P7001 A19. B-0.02 C15. D40. E1. (T)
G65 P7001 A20. B-0.02 C15. D40. E1. (U)
G65 P7001 A17. B-0.02 C15. D40. E1. (R)
G65 P7001 A11. B-0.02 C15. D40. E1. (K)
G65 P7001 A5. B-0.02 C15. D40. E1. (E)
G65 P7001 A24. B-0.02 C15. D40. E1. (Y)
G65 P7001 A3. B-0.02 C15. D40. E1. (C)
G65 P7001 A14. B-0.02 C15. D40. E1. (N)
G65 P7001 A3. B-0.02 C15. D40. E1. (C)
G91G28 Z0 Y0 X0
M30

O7001 NOLU ALT PROGRAMI MAKİNAYA YÜKLÜYORSUN.BU ŞEKİLDE ALT PROGRAMDAN SANA LAZIM OLAN HARFİ ALIP İŞLİYOR

YÜKSELMEK İSTEYEN YERİNE ADAM YETİŞTİRSİN

Çevrimdışı akin

  • Operatör
  • **
  • İleti: 19
  • +0/-0
Ynt: MACRO İLE YAZI YAZMA
« Yanıtla #14 : Ağustos 21, 2008, 11:26:18 ÖS »
ARKADAŞLAR BU MACROYO FANUC O-M KONTROL İŞLEME MERKEZİNDE DE KULLANABİLİRMİYİZ BİLGİLENDİRİRSENİZ SEVİNİRİZ.. EMEKLENİRİNİZ İÇİN ŞİMDİDEN TEŞEKKÜRLER ...