Siemens PLC SCL Programlama Sorusu

Katılım
20 Eyl 2006
Mesajlar
394
Puanları
3
Yaş
35
Arkadaşlar merhaba,

Aşağıdaki programı kısa yoldan yapma yöntemi var mıdır? Yardımlarınızı rica ederim.

IF #QShiftRegister[53]= True THEN
#bDenemeCapSensor := True;
ELSIF #QShiftRegister[100]= True AND NOT #QShiftRegister[53]= True AND NOT #QShiftRegister[54]= True AND NOT #QShiftRegister[55]= True AND NOT #QShiftRegister[56]= True
AND NOT #QShiftRegister[57]= True AND NOT #QShiftRegister[58]= True AND NOT #QShiftRegister[59]= True AND NOT #QShiftRegister[60]= True AND NOT #QShiftRegister[61]= True AND NOT #QShiftRegister[62]= True
AND NOT #QShiftRegister[63]= True AND NOT #QShiftRegister[64]= True AND NOT #QShiftRegister[65]= True
AND NOT #QShiftRegister[66]= True AND NOT #QShiftRegister[67]= True AND NOT #QShiftRegister[68]= True
AND NOT #QShiftRegister[69]= True AND NOT #QShiftRegister[70]= True AND NOT #QShiftRegister[71]= True
AND NOT #QShiftRegister[72]= True AND NOT #QShiftRegister[73]= True AND NOT #QShiftRegister[74]= True
AND NOT #QShiftRegister[75]= True AND NOT #QShiftRegister[76]= True AND NOT #QShiftRegister[77]= True
AND NOT #QShiftRegister[78]= True
AND NOT #QShiftRegister[79]= True AND NOT #QShiftRegister[80]= True AND NOT #QShiftRegister[81]= True
AND NOT #QShiftRegister[82]= True
AND NOT #QShiftRegister[83]= True AND NOT #QShiftRegister[84]= True AND NOT #QShiftRegister[85]= True
AND NOT #QShiftRegister[86]= True
AND NOT #QShiftRegister[87]= True AND NOT #QShiftRegister[87]= True AND NOT #QShiftRegister[89]= True
AND NOT #QShiftRegister[90]= True
AND NOT #QShiftRegister[91]= True AND NOT #QShiftRegister[92]= True AND NOT #QShiftRegister[93]= True
AND NOT #QShiftRegister[94]= True
AND NOT #QShiftRegister[95]= True AND NOT #QShiftRegister[96]= True AND NOT #QShiftRegister[97]= True
AND NOT #QShiftRegister[98]= True AND NOT #QShiftRegister[99]= True

THEN
#bDenemeCapSensor := False;
END_IF;
 

macix

Onursal Üye
Onursal Üye
Katılım
11 Mar 2007
Mesajlar
816
Puanları
18
Bu bir FB midir yoksa FC mi sadece merak ettiğim için sordum #QShiftRegister[] input, output, temp yada stat kısmında mı bilmiyoruz. Bunun haricinde program gayet kısa ve net inan bana lader'de da yerleştirmeye çalışırsan daha büyük bir program olacak.
 

tigruden

Üye
Katılım
3 Ağu 2010
Mesajlar
95
Puanları
8
Yaş
32
Konum
Kocaeli
yazdığınız programın %90 ı if şartı olduğundan kısaltma şansınız yok maalesef. Sadece "= true" yazmasanız da olur.
 

rotsis

Üye
Katılım
7 Ağu 2011
Mesajlar
734
Puanları
8
Yaş
34
Arkadaşlar merhaba,

Aşağıdaki programı kısa yoldan yapma yöntemi var mıdır? Yardımlarınızı rica ederim.

IF #QShiftRegister[53]= True THEN
#bDenemeCapSensor := True;
ELSIF #QShiftRegister[100]= True AND NOT #QShiftRegister[53]= True AND NOT #QShiftRegister[54]= True AND NOT #QShiftRegister[55]= True AND NOT #QShiftRegister[56]= True
AND NOT #QShiftRegister[57]= True AND NOT #QShiftRegister[58]= True AND NOT #QShiftRegister[59]= True AND NOT #QShiftRegister[60]= True AND NOT #QShiftRegister[61]= True AND NOT #QShiftRegister[62]= True
AND NOT #QShiftRegister[63]= True AND NOT #QShiftRegister[64]= True AND NOT #QShiftRegister[65]= True
AND NOT #QShiftRegister[66]= True AND NOT #QShiftRegister[67]= True AND NOT #QShiftRegister[68]= True
AND NOT #QShiftRegister[69]= True AND NOT #QShiftRegister[70]= True AND NOT #QShiftRegister[71]= True
AND NOT #QShiftRegister[72]= True AND NOT #QShiftRegister[73]= True AND NOT #QShiftRegister[74]= True
AND NOT #QShiftRegister[75]= True AND NOT #QShiftRegister[76]= True AND NOT #QShiftRegister[77]= True
AND NOT #QShiftRegister[78]= True
AND NOT #QShiftRegister[79]= True AND NOT #QShiftRegister[80]= True AND NOT #QShiftRegister[81]= True
AND NOT #QShiftRegister[82]= True
AND NOT #QShiftRegister[83]= True AND NOT #QShiftRegister[84]= True AND NOT #QShiftRegister[85]= True
AND NOT #QShiftRegister[86]= True
AND NOT #QShiftRegister[87]= True AND NOT #QShiftRegister[87]= True AND NOT #QShiftRegister[89]= True
AND NOT #QShiftRegister[90]= True
AND NOT #QShiftRegister[91]= True AND NOT #QShiftRegister[92]= True AND NOT #QShiftRegister[93]= True
AND NOT #QShiftRegister[94]= True
AND NOT #QShiftRegister[95]= True AND NOT #QShiftRegister[96]= True AND NOT #QShiftRegister[97]= True
AND NOT #QShiftRegister[98]= True AND NOT #QShiftRegister[99]= True

THEN
#bDenemeCapSensor := False;
END_IF;

dostum tam olarak ne yapmak istiyor yazılım paylaşırsan farklı yöntemler deneyebiliriz
bDenemeCapSensor : kapasitif bir sensör mü ? eğer öyleyse çıkışta olması ne alaka ?
senin işi pwm çözer bence-tabi çıkışı bu şekilde kontrol etmek istiyorsan :)
 

Sponsor Bağlantı

Forum istatistikleri

Konular
105,594
Mesajlar
743,807
Kullanıcılar
392,483
Son üye
Hindistanlı

Yeni konular

Üst