MACRO PROGRAM YAZMAYI ÖGRENMEK İSTEYENLER

Başlatan ismeterol, Şubat 08, 2008, 12:42:19 ÖS

« önceki - sonraki »

0 Üyeler ve 1 Ziyaretçi konuyu incelemekte.

Yazdır
Aşağı git Sayfa 1 2 3 4 5 6 7 8 9
Kullanıcı Eylemleri

canip

#75
Temmuz 07, 2009, 09:08:22 ÖS
şimdi arkadaşlar yanlış anlamayın ama okuduklarımdan anladığım kadarıyla konuşuyorum.
ilk başta bazı değerleri parametre yapıyoruz sanırım 1 gibi 2 gibi. önüne #koyarak. ve bunlara değer atıyoruz.ve bu değerlere bakarak programı yazıyoruz.
yani #1 i yap dediğimizde o parametreye verilen değeri yapıyor. sonrasında if[#1 eq #2] goto n20 misal dediğimizde birinci değeri ikinciye eşitlediği zaman n20 satırına gidiyor aşağıda yada yukarıda.sonrasında durum yine aynı devam ediyor. eğer #1 deki değerden farklı bir yere gitmek istiyorsak onu toplama işlemiyle gösteriyoruz makinaya #1 sonra ıf [#1 eq #1] goto n10 sonra  [#1+5] diye devam ediyor sanırım. yanlışım varsa düzeltirseniz sevinirim. bi ara basic le uğraştım baya onunla aşağı yukarı aynı. hatta mantığı aynı sanırım. yani bunu yapan bilgisayar programını da yapabilir tabi bence :)

birkan66

#76
Temmuz 07, 2009, 11:52:51 ÖS
iyi güzel ama daha o her numaranında istersen karsılıgı var makina #24 x #25y #26z #9f vb ilerleme anlamına geliyor kitabına bakmadan biraz zor anlarsın mesela bunlara degerverirken otamtik o deger atanabiliyot G65 P9550 X150 Y50 Z20 DERSEN YUKARDA YAZDIGIM SEYLERE DEGER VERMİŞ OLURSUN

canip

#77
Temmuz 08, 2009, 01:43:46 ÖS
şimdi rakama değer atayabilmek için onu parantez içinde okutmamız gerekmiyor mu yani. şunun gibi mesela [#1=x50] [#2=y20] [#3=z10]. bunu program satırına yazınca belittiğimiz noktaya gitmek için şöyle mi yapıyoruz g65 p2000 misal. p2000 de de ilk satır g0 g90 #1 #2 #3. yani direk bunu yazınca o noktaya gidiyormu onu merak ettim

birkan66

#78
Temmuz 08, 2009, 04:03:19 ÖS
O 001
#1=50 
#2=20 
#3=10 
G0 G90 X#1 Y#2 Z#3 SEKLINDE  YAZMAN GEREKIR

canip

#79
Temmuz 08, 2009, 04:35:03 ÖS
Alıntı yapılan: birkan66 - Temmuz 08, 2009, 04:03:19 ÖS
O 001
#1=50 
#2=20 
#3=10 
G0 G90 X#1 Y#2 Z#3 SEKLINDE  YAZMAN GEREKIR
teşekkürler kardeşim. bi denemeye çalışacağım bakalım olacak mı. bi yerden başlamak lazım bunlara

crisis

#80
Temmuz 08, 2009, 11:35:16 ÖS
Alıntı yapılan: canip - Temmuz 07, 2009, 09:08:22 ÖS
şimdi arkadaşlar yanlış anlamayın ama okuduklarımdan anladığım kadarıyla konuşuyorum.
ilk başta bazı değerleri parametre yapıyoruz sanırım 1 gibi 2 gibi. önüne #koyarak. ve bunlara değer atıyoruz.ve bu değerlere bakarak programı yazıyoruz.
yani #1 i yap dediğimizde o parametreye verilen değeri yapıyor. sonrasında if[#1 eq #2] goto n20 misal dediğimizde birinci değeri ikinciye eşitlediği zaman n20 satırına gidiyor aşağıda yada yukarıda.sonrasında durum yine aynı devam ediyor. eğer #1 deki değerden farklı bir yere gitmek istiyorsak onu toplama işlemiyle gösteriyoruz makinaya #1 sonra ıf [#1 eq #1] goto n10 sonra  [#1+5] diye devam ediyor sanırım. yanlışım varsa düzeltirseniz sevinirim. bi ara basic le uğraştım baya onunla aşağı yukarı aynı. hatta mantığı aynı sanırım. yani bunu yapan bilgisayar programını da yapabilir tabi bence :)
basic le mantık aynı
işleyiş farklı

alemci_11984

#81
Ağustos 01, 2009, 10:41:07 ÖS
paylaşım yapan herkesin eline, koluna, aklına ve emeğine sağlık paylaşımlar için çok teşekkürler

birkan66

#82
Kasım 28, 2010, 10:42:34 ÖS Son düzenlenme: Ocak 09, 2012, 06:37:02 ÖS birkan66
O7000 (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 BASLAMA MESAFES])
#502= 3. (EMNIYET MESAFESI 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 DERINLIK
C=Z DALMA HIZI
D=KESME HIZI
E=BASKA HARF VARMI (1.=EVET,0.=HAYIR)
#503 YAZI BOYU


HARF SEÇME KODLARI
BOSLUK=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.

%
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 SONRA SICRADIGI YER)
N100 G90 G00 Z#502
G91 G00 X[#500 *2.0000] (BOSLUK BIRAKIYOR)
N200 M99
%

mrtplt

#83
Ocak 09, 2012, 05:32:38 ÖS
arkadaslar makro programı lazım pc de kurmak icn yenym yardımcı olsanız cokiyi olur tesekürler simdiden

yaman

#84
Mart 19, 2012, 09:24:18 ÖS
macro temel denemeler

iso cod yazım                          MACRO YAZIM
                                            #1=50  (X DEGERİ)    buradaki bu degerleri neye gore buldunuz acaba   #1=50 mesela yardimci olursaniz sevinirim
                                            #2=90  (Y DEGERİ)
                                            #3=30   (Z DEGERİ)
                                                                                         
G0X50Y-90Z50M08                  G0X#1Y-#2Z50M08
G81Z-30R5F300                      G81Z-#3R5F300
X-50                                     X-#1
Y90                                      Y#2
X50                                      X#1
G80                                      G80
G0Z200                                 G0Z200
M05                                      M05
M09                                      M09


alinti ismeterol
"Seni neyin değiştireceğini düşün ve onun peşinden koş."

Erdem usta

#85
Mart 20, 2012, 01:04:25 ÖÖ
aynen o degerleri neye gore verdınız x-50. neye gore x-#1 oluyo.
Yumuşak olma ezilirsin , sert olma kırılırsın.!

yaman

#86
Mart 27, 2012, 10:54:27 ÖS
bu aralar pek giren olmuyo sanırım cevap vermediklerine göre...
"Seni neyin değiştireceğini düşün ve onun peşinden koş."

ostim06

#87
Nisan 27, 2012, 08:24:01 ÖS
slm herkese ben de macroyu yenı ogrenıyorum emegınıze tsk

muratadana

#88
Mayıs 23, 2012, 10:09:51 ÖS
programları inceleyip öğrenmeye çalışıyorum.
hepinize  teşekkür ediyorum

tatar4040

#89
Mayıs 25, 2012, 09:49:28 ÖS
usta (neden makro program) bize verecegi avantajlar nedır nasıl bır kolaylık saglar şu şu işe yarar bu şu işe tarar deyilde şu bizim NE İŞİMİZE yarar diye başlamak istiyorum saygılar
paylastikca cogalan tek sey bilgidir
Yazdır
Yukarı git Sayfa 1 2 3 4 5 6 7 8 9
Kullanıcı Eylemleri