• Anasayfa
  • Ara
    •  
  • Geriş
    • Kullanıcı Adı: Şifre:
      Aktivasyon epostanız mı yok?

Beğenileri görün

Verilen alınan beğenileri görün


Beğenilen mesajların

Sayfa: [1] 2 3 ... 9
Mesaj bilgileri Hayır. beğenilere
Ynt: iyi bir ölcme opertörü nasil olmalidir. kocaman bir Amiiin.. Resimlere izin verilmiyor. Üye Ol ya da Giriş Yap
30 Ekim 2008, 19:45:30
1
Ynt: TOLERANS PROGRAMI ilk dua benden. Resimlere izin verilmiyor. Üye Ol ya da Giriş Yap  Allah razi olsun, yazandan, cizenden velhasil vesile olandan..
ise yarar bi programa benziyor.. (eve gidince indirecem, henüz indiremedim..)

03 Temmuz 2009, 18:14:18
1
GDT toleranslandirma GDT toleranslandirma konusunda güzel bi döküman. isinize yarayacagina eminim...

boyutu      : 556 kb
dosya türü : pdf

Linklere izin verilmiyor. Üye Ol ya da Giriş Yap

saygilar..

31 Ağustos 2009, 19:08:15
1
mesaj yazarken dikkat edilmesi gerekenler.. arkadaslar
genel olarak forumlarda buyuk harfle yazmak karsindakine bagirmak, yuksek sesle konusmak anlami tasidigi icin, mesaj yazarken lutfen dikkat edelim. biliyorum ki burada kimse bilerek boyle bi mesaj yazmaz-yazmak istemez. cok sukur ki seviyeli ve guzel bir forumuz var.

herkese bu konuya dikkat gosterdigi icin tesekkur ederim ve islerinde kolayliklar dilerim.
vesselam.
harek.

21 Ekim 2009, 19:10:12
1
Ynt: ölcümcü olmasaydiniz ne gibi bir iste calisirdiniz???
Linklere izin verilmiyor. Üye Ol ya da Giriş Yap
Bu saatten sonra is degistirecek olsak , herhalde cok genis yada cok gicik tipler olurduk Resimlere izin verilmiyor. Üye Ol ya da Giriş Yap
Ben senarist olurdum : Problar Vadisi - Pusu Resimlere izin verilmiyor. Üye Ol ya da Giriş Yap

beni de Polat Olcumdar yaparmisiniz..  Resimlere izin verilmiyor. Üye Ol ya da Giriş Yap

30 Ocak 2010, 16:24:04
1
Baslangic.. VBScript ve PC-DMIS kod, formul paylaşım alanıdır.

Herkes paylaştığı koddan sorumludur. Pcdmisforum sitesi sorumlu tutulamaz. Resimlere izin verilmiyor. Üye Ol ya da Giriş Yap

Hayirli olsun.

HaReK

04 Aralık 2010, 23:18:24
2
ayni elemani birden fazla olcturmek bu kodu olcum esnasinda ayni elemani tekrar olcturmek icin kullanabiliriz.
C1  Comment satirina geldiginde program duruyor ve bize elemani kac defa olmek istedigimizi soruyor.
girdigimiz rakam kadar ayni elemani olcuyor ve sonuclarida rapora her olcum icin tek tek atiyor.

yesil renkli kodlari kullanabiliriz. olcturecegimiz eleman yesil renkli kodlarin arasinda olmali.
asagiya program olarakta, 3.7 versiyonda kaydedilmistir.
-------------------------------------------------------------------------------------------

C1         =COMMENT/INPUT,NO,FULL SCREEN=NO,'NOKTA1 kac defa olculsun..!'
            ASSIGN/COUNT=0
            DO/

NOKTA1     =FEAT/CONTACT/VECTOR POINT,CARTESIAN
            THEO/<2.56,-7.369,-0.692>,<-0.328198,0.944609,0>
            ACTL/<2.56,-7.369,-0.691>,<-0.328198,0.944609,0>
            TARG/<2.56,-7.369,-0.692>,<-0.328198,0.944609,0>
            SHOW FEATURE PARAMETERS=NO
            SHOW CONTACT PARAMETERS=NO
DIM LOC1= LOCATION OF POINT NOKTA1  UNITS=MM ,$
GRAPH=OFF  TEXT=OFF  MULT=10.00  OUTPUT=BOTH  HALF ANGLE=NO
AX    NOMINAL       +TOL       -TOL       MEAS        DEV     OUTTOL
X        2.560      0.050      0.050      2.560      0.000      0.000 ---#----
Y       -7.369      0.050      0.050     -7.369      0.000      0.000 ---#----
Z       -0.692      0.050      0.050     -0.691      0.000      0.000 ---#----
T        0.000      0.050      0.050      0.000      0.000      0.000 ---#----
END OF DIMENSION LOC1
            ASSIGN/COUNT=COUNT+1
            COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO," Olculen = "+COUNT+"  Toplam olcum = "+C1.INPUT+" "
            UNTIL/COUNT==C1.INPUT

08 Aralık 2010, 17:47:04
1
program sonuna olcum zamani ekleme ----------------------------------------
alttaki kodu programin basina ekleyin..
----------------------------------------
STARTUP    =ALIGNMENT/START,RECALL:,LIST=YES
            ALIGNMENT/END
            MODE/MANUAL
ASSIGN/TIME1=SYSTEMTIME("HH':'mm':'ss")
            ASSIGN/SEC1=RIGHT(TIME1,2)
            ASSIGN/MIN1=MID(TIME1,3,2)
            ASSIGN/HOUR1=LEFT(TIME1,2)
            ASSIGN/HOUR_TO_SEC_1=(HOUR1)*3600
            ASSIGN/MIN_TO_SEC_1=(MIN1)*60
            ASSIGN/TOTAL_SEC_1=(HOUR_TO_SEC_1)+(MIN_TO_SEC_1)+(SEC1)

----------------------------------------
alttaki koduda en sona ekleyin..
----------------------------------------
ASSIGN/TIME2=SYSTEMTIME("HH':'mm':'ss")
            ASSIGN/SEC2=RIGHT(TIME2,2)
            ASSIGN/MIN2=MID(TIME2,3,2)
            ASSIGN/HOUR2=LEFT(TIME2,2)
            ASSIGN/HOUR_TO_SEC_2=(HOUR2)*3600
            ASSIGN/MIN_TO_SEC_2=(MIN2)*60
            ASSIGN/TOTAL_SEC_2=(HOUR_TO_SEC_2)+(MIN_TO_SEC_2)+(SEC2)
            ASSIGN/ELAPSED_SEC=(TOTAL_SEC_2)-(TOTAL_SEC_1)*1
            ASSIGN/ELAPSED_MIN=(ELAPSED_SEC)/60
            COMMENT/OPER,YES,FULL SCREEN=NO,AUTO-CONTINUE=YES,TIME DELAY=1,
            "PROGRAM " +ELAPSED_MIN+ " DK. SURDU"


v3.7 program olarakta eklenmistir.

14 Aralık 2011, 18:57:37
1
belli bir zaman tekrariyla olcum sayin SINAN yoneticimin istegi ile,
ayni programi bizim belirledigimiz tekrar sayisi ve bekleme zamani ile olcum yapar.
her olcumun sonuclarini PDF ye ayri ayri atar. printerinizi pdf e atacak sekilde ayarlayin.

burada iki onemli nokta var.
ilk siradaki LOOP komutundaki NUMBER kismina tekrar sayisini yazin (100 yazan yer-SINAN yoneticim 100 dedigi icin)
ikinci kisimdaki (CALLSUB/WAIT_FOR,:2,,) yazan yere bekleme suresini yazin. (2 yazan yer-saniyedir)
bekleme zamanlarini rapordada gormek istiyorsaniz Beklemeye Basladigi Saat yazan yerdeki COMMENT i REPT yapmalisiniz.

v 3.7 program olarakta eklenmistir.
saygilar. harek..

programin basina ekleyin.
-------------------------------------------------------------------------------
Kod: Linklere izin verilmiyor. Üye Ol ya da Giriş Yap
V1         =LOOP/START,ID=YES,NUMBER=100,START=1,SKIP=,
              OFFSET:XAXIS=0,YAXIS=0,ZAXIS=0,ANGLE=0
            COMMENT/READOUT,NO,
            Beklemeye Hazir..
            ASSIGN/START_WAITING=SYSTEMTIME("H:m:s")


programin sonuna ekleyin.
--------------------------------------------------------------------------------
Kod: Linklere izin verilmiyor. Üye Ol ya da Giriş Yap
CS1        =CALLSUB/WAIT_FOR,:2,,
            COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=YES,TIME DELAY=2,
            "Beklemeye Basladigi Saat "+START_WAITING
            "Beklemeyi Bitirdigi Saat "+SYSTEMTIME("H:m:s")
            GOTO/END_PROGRAM
            PRINT/REPORT,EXEC MODE=START,$
              TO_FILE=ON,AUTO=1,$
              TO_PRINTER=ON,$
              TO_DMIS_REPORT=ON,FILE_OPTION=INDEX,FILENAME=,$
              REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$
              PREVIOUS_RUNS=DELETE_INSTANCES
            SUBROUTINE/WAIT_FOR,
                SECONDS_TO_WAIT = 5 : THE NUMBER OF SECONDS TO WAIT,
                 =
            IF/SECONDS_TO_WAIT<2
            GOTO/END_WAITING
            END_IF/
            IF/SECONDS_TO_WAIT>86000
            GOTO/END_WAITING
            END_IF/
            ASSIGN/START_TIME=SYSTEMTIME("H:m:s")
            ASSIGN/START_HOUR=ELEMENT(1,":",START_TIME)
            ASSIGN/START_MINUTE=ELEMENT(2,":",START_TIME)
            ASSIGN/START_SECOND=ELEMENT(3,":",START_TIME)
            ASSIGN/END_SECOND=START_SECOND+INT(SECONDS_TO_WAIT % 60)
            ASSIGN/END_MINUTE=START_MINUTE+INT((SECONDS_TO_WAIT % 3600) / 60)
            ASSIGN/END_HOUR=START_HOUR+INT(SECONDS_TO_WAIT / 3600)
            IF/END_SECOND>=60
            ASSIGN/END_SECOND=END_SECOND-60
            ASSIGN/END_MINUTE=END_MINUTE+1
            END_IF/
            IF/END_MINUTE>=60
            ASSIGN/END_MINUTE=END_MINUTE-60
            ASSIGN/END_HOUR=END_HOUR+1
            END_IF/
            IF/END_HOUR>=24
            ASSIGN/END_HOUR=END_HOUR-24
            END_IF/
            ASSIGN/END_TIME=END_HOUR+":"+END_MINUTE+":"+END_SECOND
            DO/
            ASSIGN/CURRENT_TIME=SYSTEMTIME("H:m:s")
            UNTIL/CURRENT_TIME==END_TIME
END_WAITING=LABEL/
            ENDSUB/
END_PROGRAM=LABEL/
            LOOP/END

11 Şubat 2012, 18:04:43
1
Dosya Paylasimi-Skydrive Arkadaslar sitemizdeki yer problemlerine bir cozum olarak Skydrive da bir klasor olusturdum ve boyutu fazla olan, sabit dosyalari buraya yukleyip, linklerini mesajin altina ekleyecegim.
Boyutu yuksek olupda paylasmak istediginiz dosyalari alttaki mail ile bana ulastirabilirsiniz, yada mesaja eklesenizde dosyayi alip ben Skydrive a atarim.
Free siteler gibi, dosyalarimizin silinme derdi olmaz.

Linklere izin verilmiyor. Üye Ol ya da Giriş Yap

mail hesabi pcdmisforum@hotmail.com

17 Kasım 2012, 23:17:21
1


Sosyal ağınızla giriş yapın

 
 
Hoşgeldiniz Ziyaretçi. Lütfen giriş yapın veya kayıt olun.
  • Nokta Ziyaretçi: 6
  • Nokta Gizli: 0
  • Nokta Üye: 0

Çevrimiçi kullanıcı bulunmuyor.
  • stats Toplam Üye: 504
  • stats Toplam İleti: 8,183
  • stats Toplam Konu: 1,418
  • stats Toplam Kategori: 11
  • stats Toplam Bölüm: 38
  • stats En Çok Çevrimiçi: 84

En çok Yazanlar

BirazFikrimVar BirazFikrimVar
1,256 İleti
# harek # # harek #
1,043 İleti
Ⓜⓤⓡⓐⓣ Ⓜⓤⓡⓐⓣ
964 İleti
τǺN€®™ τǺN€®™
591 İleti
rebelwhiteâ©
220 İleti
adofm_AK
213 İleti
metroloji16 metroloji16
210 İleti
bakayoko
185 İleti
tarik
171 İleti
3_D
158 İleti

Takvim Aksiyonları

Ekim 2018
Paz Pzt Sal Çar Per Cum Cmt
1 2 3 4 5 6
7 8 9 10 11 12 13
14 15 16 [17] 18 19 20
21 22 23 24 25 26 27
28 29 30 31

Bugün için herhangi bir etkinlik bulunmuyor.

Popüler Kategeriler

'html_below' adlı tema yüklenemiyor.