script yazmak

sedat.otomasyon · 8 Nis 2009

arkadaşlar dokunkatik ekranlarda script yazan kimse yokmu .yardımcı olsun bunu nasıl öğrenebiliriz....saygılarımla iyi çalışmalar...

ilhan_mkp_ilhan · 8 Nis 2009

arkadaşım marka model belirtirsen yardımcı olmaya çalışırız bende deltada scrip(makro) içeren örnek varr

sedat.otomasyon · 8 Nis 2009

ilhan_mkp_ilhan' Alıntı:
arkadaşım marka model belirtirsen yardımcı olmaya çalışırız bende deltada scrip(makro) içeren örnek varr

by ilhan_mkp
ben telemekaniq ürünlerinden xbtgt srisi ekran kullanıyorum.xbtgt 2110 ve üst serileri..bu script bütün ekranlar için geçerlimi.yoksa değişiyormu tabiki elinizde varsa gönderirseniz memnun olurum.tekrar görüşmek üzere...

ilhan_mkp_ilhan · 8 Nis 2009

değişiyor üstat fakat üç aşağı beş yukarı benzer olur ben telemecanique kullanmadımm ne amaçla scrip yazmak istiyosun söylersen belki yardımcı olan çıkar

ilhan_mkp_ilhan · 8 Nis 2009

Kod:

$2 = INITCOM(0, 0, 1, 0, 0, 6, 0)
SELECTCOM(0)
$101=13
$102=10

CHR($800, "FR"FX"")
$3 = PUTCHARS($800, 6, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

CHR($104, "?")
$3 = PUTCHARS($104, 1, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#1. değişken
IF $M200 > 0 THEN GOTO LABEL 1
CHR($M200, ".")
LABEL 1
$3 = PUTCHARS($M200, 10, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#2. değişken
IF $M220 > 0 THEN GOTO LABEL 2
CHR($M220, ".")
LABEL 2
$3 = PUTCHARS($M220, 20, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#3. değişken
IF $M240 > 0 THEN GOTO LABEL 3
CHR($M240, ".")
LABEL 3
$3 = PUTCHARS($M240, 20, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#4. değişken
IF $M260 > 0 THEN GOTO LABEL 4
CHR($M260, ".")
LABEL 4
$3 = PUTCHARS($M260, 20, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#5. değişken
IF $M280 > 0 THEN GOTO LABEL 5
CHR($M280, ".")
LABEL 5
$3 = PUTCHARS($M280, 20, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#6. değişken
IF $M300 > 0 THEN GOTO LABEL 6
CHR($M300, ".")
LABEL 6
$3 = PUTCHARS($M300, 20, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

##7. değişken
IF $M320 > 0 THEN GOTO LABEL 7
CHR($M320, ".")
LABEL 7
$3 = PUTCHARS($M320, 20, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)


#8. değişken
#$700=(1@D15)
$700=(1@D170)
DELAY(100)
$3 = PUTCHARS($700, 2, 800)
$701=(1@D171)
DELAY(100)
$3 = PUTCHARS($701, 1, 800)
CHR($800, ".")
DELAY(100)
$3 = PUTCHARS($800, 1, 800)
DELAY(100)
SWAP($180, $701, 1)
DELAY(100)
$3 = PUTCHARS($180, 1, 800)
DELAY(100)
#$702=(1@D172)
#$3 = PUTCHARS($702, 1, 800)
DELAY(100)

$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)


#9. değişken
$3 = PUTCHARS($700, 2, 800)
$3 = PUTCHARS($701, 1, 800)
$3 = PUTCHARS($800, 1, 800)
$3 = PUTCHARS($180, 1, 800)
#$3 = PUTCHARS($702, 1, 800)
CHR($350, "m")
$3 = PUTCHARS($350, 1, 800)

$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)


CHR($103, "P1")
$3 = PUTCHARS($103, 2, 800)

$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

CLEARCOMBUFFER(0, 1)
END

üstadımm böyle bişi deltada şu an delta manuelini alıp örneğe baksan bi şeyler şekillenir sanırım bu örnekte seri porta veri döküyoruzz

sedat.otomasyon · 8 Nis 2009

ilhan_mkp_ilhan' Alıntı:
$2 = INITCOM(0, 0, 1, 0, 0, 6, 0)
SELECTCOM(0)
$101=13
$102=10

CHR($800, "FR"FX"")
$3 = PUTCHARS($800, 6, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

CHR($104, "?")
$3 = PUTCHARS($104, 1, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#1. değişken
IF $M200 > 0 THEN GOTO LABEL 1
CHR($M200, ".")
LABEL 1
$3 = PUTCHARS($M200, 10, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#2. değişken
IF $M220 > 0 THEN GOTO LABEL 2
CHR($M220, ".")
LABEL 2
$3 = PUTCHARS($M220, 20, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#3. değişken
IF $M240 > 0 THEN GOTO LABEL 3
CHR($M240, ".")
LABEL 3
$3 = PUTCHARS($M240, 20, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#4. değişken
IF $M260 > 0 THEN GOTO LABEL 4
CHR($M260, ".")
LABEL 4
$3 = PUTCHARS($M260, 20, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#5. değişken
IF $M280 > 0 THEN GOTO LABEL 5
CHR($M280, ".")
LABEL 5
$3 = PUTCHARS($M280, 20, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#6. değişken
IF $M300 > 0 THEN GOTO LABEL 6
CHR($M300, ".")
LABEL 6
$3 = PUTCHARS($M300, 20, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

##7. değişken
IF $M320 > 0 THEN GOTO LABEL 7
CHR($M320, ".")
LABEL 7
$3 = PUTCHARS($M320, 20, 800)
$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#8. değişken
#$700=(1@D15)
$700=(1@D170)
DELAY(100)
$3 = PUTCHARS($700, 2, 800)
$701=(1@D171)
DELAY(100)
$3 = PUTCHARS($701, 1, 800)
CHR($800, ".")
DELAY(100)
$3 = PUTCHARS($800, 1, 800)
DELAY(100)
SWAP($180, $701, 1)
DELAY(100)
$3 = PUTCHARS($180, 1, 800)
DELAY(100)
#$702=(1@D172)
#$3 = PUTCHARS($702, 1, 800)
DELAY(100)

$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

#9. değişken
$3 = PUTCHARS($700, 2, 800)
$3 = PUTCHARS($701, 1, 800)
$3 = PUTCHARS($800, 1, 800)
$3 = PUTCHARS($180, 1, 800)
#$3 = PUTCHARS($702, 1, 800)
CHR($350, "m")
$3 = PUTCHARS($350, 1, 800)

$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

CHR($103, "P1")
$3 = PUTCHARS($103, 2, 800)

$3 = PUTCHARS($101, 1, 800)
$3 = PUTCHARS($102, 1, 800)

CLEARCOMBUFFER(0, 1)
END

üstadımm böyle bişi deltada şu an delta manuelini alıp örneğe baksan bi şeyler şekillenir sanırım bu örnekte seri porta veri döküyoruzz

sayın ilhan_mkb cavabınız için sağolun ama elimdeki telemecanique script örneklerine baktığımda tamamen farklı.sadece java scriptin kodalrı birbirini tutuyor..(then,if,else gibi)benim scriptle yapmak isteğim dokunmatik ekranlarda animasyonyapmak.değişkenlerle scripti haberleştirmek gibi_reçete hazırlanması,,vs..

ceyhanII · 8 Nis 2009

script ile tam olarak ne yapılmak isteniyor, onu yazarsanız ve boş vakit bulursam yardımcı olmaya çalışayım. Bu konuda kendini geliştirmek isteyen arkadaşlar bir programlama dilini bilmeli pc programcısı gibi düşünebilmelidir. Gerisi telemecanique, siemens, delta vb HMI ürünlerinin help dosyalarında bol bol gezintiye ve deneme yanılmaya ihitiyaç duyar.

sedat.otomasyon · 9 Nis 2009

sqayın ceyhan bey evet;
1 benim script dili ile ilgili pek bilgim yok;
java script cam adresine baktım pc scriptlerinden bahsediyo,yani hmi ekranların scriptleri ile çok farklı,
bunun için dediğiniz gibi help manueli kısmına bakmak gerekiyor,,,ama işte baksam bile anlamıyorum,benim öğrenebileceğim çözüm yolu varmı yani illa pc programcısımı olmak gerekiyor..

ceyhanII · 9 Nis 2009

İşin zorluğu şurda. Java Script en fazla web tarayıcılarda kullanılan bir betik dili. Dolayısıyla internette bulabileceğin tüm örnekler web tarayıcılar ile ilgili uygulamalar. Ama bu bizim gibi endüstriyel programcıların işine pek yaramaz. Java Scrip' in sintaksını anlayıp HMI' ın kendi nesne modeline göre bunları uygulamak gerekiyor. İşin kötü yanı HMI notları da yetersiz olduğu için insanın bayağı ot yolmak zorunda kalması.
Bu durumda önerim evren genişliyor, evren genişliyor, evren genişliyor, evren genişliyor diye bol bol sabır. Sabrın sonu selamettir biliyorsun.

sedat.otomasyon · 12 Nis 2009

sayın ceyhan bey hakikaten çok güzel açıkladınız.popülaritenizi yükselttim.))))saygılarımla

script yazmak

sedat.otomasyon

Üye

ilhan_mkp_ilhan

Üye

sedat.otomasyon

Üye

ilhan_mkp_ilhan

Üye

ilhan_mkp_ilhan

Üye

sedat.otomasyon

Üye

ceyhanII

Üye

sedat.otomasyon

Üye

ceyhanII

Üye

sedat.otomasyon

Üye

Benzer Konular

script yazmak

Üye

Üye

Üye

Üye

Üye

Üye

Üye

Üye

Üye

Üye

Benzer Konular

Privacy & Transparency

Privacy & Transparency