Indexing wraparound labeling - Tia Portal programı ve C# kodu

 





Bu yöntem, şişe, kavanoz gibi silindirik ürünleri etiketleme de kullanılır. Yalnız, etiketin rastgele bir yere yere değil belirli bir pozisyona yapışması istenir. Soldaki Cyl_1 ve Cyl_2 pnömatik silindirleri ürün aralayıcı olarak çalışır ve ürünleri tek tek çevirme istasyonuna bırakır. İstasyonda iş bitmediyse yeni ürün gelmemelidir. Çevirme istasyonunda sürekli dönen bir merdane olduğundan, ürün Cyl_3 ile yakalanır ve kendi etrafında dönmeye başlar.. Bir sensör veya barkod okuyucu ile etiket konumu belirlenir ve etiket aplikatörüne start sinyali verilir. Etiket aplikatöründen, etiket yapıştırıldı (dispense end) sinyali alınabilir. C# programında bu sinyali simüle etmek için bir buton kullandım. Gözünüzde daha iyi canlanması için bu videoyu izleyebilirsiniz.. 





Video da bir sensör ile şişenin sapı algılanarak indeksleme yapılmış. Sensör, şişe sapını ilk gördüğünde değil ikinci kez gördüğünde etiketleme yapılmış. Çünkü ilk görme, şişe dönmeye başlamadan önce olabilir, bu da etiketin yanlış yere yapışarak kaymasına neden olur. Sensörün ikinci görüşünden sonra etiketi yapıştırmak mantıklı bir çözüm.. Bu tip etiketleme işlerinde şişeyi çok hızlı döndürmek de istenmeyen bir şeydir, hız arttıkça etiket konumundaki kaymalar da artacaktır.. Ben de aynı şekilde ikinci görmede etiketleme yaptım.


Tia da üst kısımda bulunan tırnağa tıklayarak aşağı inen pencerede Constant ları tanımlayarak programın daha okunur hale gelmesini sağlayabilirsiniz.. Program adımlarını constant olarak tanımlamış olduk.




Bu şekilde C# ile simülasyon yapmak için ne bir pistona, ne bir plc ye, ne de bir etiket aplikatörüne ihtiyaç var.. Yani yöntem, önce sanal olarak projeyi kafanızda canlandırıp, sonra gerçeğe dönüştürmek.. Tabi ki plc programını yazarken de sanki "makina önünüzde canlanmış" gibi durması da programcı için bulunmaz bir nimet.. Gerçek sistem önünüzde olmadığından her parçanın nasıl çalıştığını bilmeniz gerekiyor haliyle. Sonuç olarak, gerçek sistem yapıldığında PLC programınız neredeyse hazır olmuş oluyor.


Bir HMI ile bağlayabileceğiniz DB miz var :



Q0.0-Q0.3 arası çıkışlar rezerve durumda kullanmadım.. Çevirici istasyondaki servo motor için kullanılabilir. Şişeyi çevirmek için gerçekte motora ihtiyaç var ama simülasyonda motora gerek kalmadan C# ile şişeyi çevirebiliriz :) PLCSIM deki PLC input larına C# ile yazıyoruz, PLC output larını C# tan sadece okuyoruz, simülasyon bu şekilde gerçekleşiyor..




Tia Portal S7-1200 programı..


















ve Csharp programı..




Kullanılan kütüphanelerle ve PLCSIM ayarlarıyla ilgili önemli bilgilere, önceki post lardan bakabilirsiniz...
Bendeki timer1 interval 150ms.. Formun büyüklüğü 745;531.. panel1 in büyüklüğü 716;323


using System;
using System.Collections.Generic;
using System.Drawing;
using System.Windows.Forms;
using Nakov.TurtleGraphics;
using S7.Net;

namespace wrapAround
{

    public partial class MainForm : Form
    {
        Plc _S71200 = new Plc(CpuType.S71200, "127.0.0.1", 0, 1);
        
        float x_pos=-350,y_pos=0,bottleAngle=0;
        bool turning, cylinder_1, cylinder_2, cylinder_3, conveyor, s1, s2, cyl3_sensor;
        bool barcodeScannerTrig, sGoodRead, labelStart, dispenseEnd, start, stop, tetik_var, movement;
        float cyl1_pos=10,cyl2_pos=10,cyl3_pos=10;
        
        
        public MainForm()
        {
            InitializeComponent();
            _S71200.Open();
        }
        void Timer1Tick(object sender, EventArgs e)
        {
            //label1.Text=""+x_pos;        //for debugging
            //label2.Text=""+cyl3_pos;
            //label10.Text=""+cyl2_pos;
            
            ushort stepNo = (ushort)_S71200.Read("MW50"); // Adım numarası
            lblAdim.Text = "Step No: " + stepNo;
            
            cylinder_1 = (bool)_S71200.Read("Q0.4");  // 
            cylinder_2 = (bool)_S71200.Read("Q0.5");
            cylinder_3 = (bool)_S71200.Read("Q0.6");
            labelStart= (bool)_S71200.Read("Q0.7");
            barcodeScannerTrig= (bool)_S71200.Read("Q1.0");
            conveyor= (bool)_S71200.Read("Q1.1");
            
            if(labelStart) lblEtiket.Text="Label printing...";
            if(barcodeScannerTrig) tetik_var=true;
            if(cylinder_1 && cyl1_pos<90) cyl1_pos += 10;
            if(!cylinder_1 && cyl1_pos>10) cyl1_pos -= 10; 
            if(cylinder_2 && cyl2_pos<90) cyl2_pos += 10; 
            if(!cylinder_2 && cyl2_pos>10) cyl2_pos -= 10; 
            if(cylinder_3 && cyl3_pos<45) cyl3_pos += 5; 
            if(!cylinder_3 && cyl3_pos>10) cyl3_pos -= 5; 
            
            if(x_pos<-190 && x_pos>-210){
                s1=true;
                _S71200.Write("I0.0",1); // S1
            }else{
                s1=false;
                _S71200.Write("I0.0",0);
            }
            
            if(x_pos>-100 && x_pos<-75){
                s2=true;
                _S71200.Write("I0.1",1);
            }else{
                s2=false;
                _S71200.Write("I0.1",0);
            }
            
            if(bottleAngle>119 && bottleAngle<151){
                sGoodRead=true;
                _S71200.Write("I0.2",1);
                tetik_var=false;
            }else{
                sGoodRead=false;
                _S71200.Write("I0.2",0);
            }
            
            
            if(conveyor && x_pos<-200) {x_pos += 5; movement=true;}
            if(!movement && conveyor && cyl1_pos==90 && cyl2_pos==10) {x_pos += 5;movement=true;}
            if(!movement && conveyor && x_pos>-145 && x_pos<20){ x_pos += 5;movement=true;}
            if(!movement && conveyor && stepNo==0 && cyl3_pos<40) x_pos += 5;
            movement=false;
            
            if(x_pos>350){ x_pos=-350; bottleAngle=0;y_pos=0;}
            if(x_pos>300){ lblEtiket.Text=""; sGoodRead=false; }
                
            if(cyl3_pos==45){
                turning=true;
                _S71200.Write("I0.6",1);  //cyl3_sensor
                txtCyl3_sensor.BackColor=Color.LightGreen;
                cyl3_sensor=true;
            }else{
                turning=false;
                _S71200.Write("I0.6",0);
                txtCyl3_sensor.BackColor=Color.LightGray;
                cyl3_sensor=false;}
            
            
            Turtle.Init(panel1);
            Turtle.ShowTurtle=false;
            Turtle.PenUp();
            Turtle.MoveTo(x_pos,y_pos);
            Turtle.RotateTo(bottleAngle);
            Turtle.PenDown();
            for (int i = 0; i <= 23; i++) {
                    Turtle.Rotate(15);
                    Turtle.Forward(10.04f);
                    if(i==1 && turning == true) {
                        x_pos=Turtle.X;
                        y_pos=Turtle.Y;
                        bottleAngle=Turtle.Angle;
                    }
                    
                    
                }
            Turtle.Rotate(97);
            Turtle.Forward(30);
            
            //cylinder_1
            Turtle.PenUp();
            Turtle.MoveTo(-210,-95);
            Turtle.RotateTo(0);
            Turtle.PenColor = Color.Black;
            Turtle.PenSize=20;
            Turtle.PenDown();
            Turtle.Forward(30);
            Turtle.PenColor = Color.Green;
            Turtle.PenSize=10;
            Turtle.Forward(cyl1_pos);
            
            //cylinder_2
            Turtle.PenUp();
            Turtle.MoveTo(-115,-95);
            Turtle.RotateTo(0);
            Turtle.PenColor = Color.Black;
            Turtle.PenSize=20;
            Turtle.PenDown();
            Turtle.Forward(30);
            Turtle.PenColor = Color.Green;
            Turtle.PenSize=10;
            Turtle.PenDown();
            Turtle.Forward(cyl2_pos);
            
            //turning roller on top
            Turtle.PenUp();
            Turtle.MoveTo(20,85);
            Turtle.RotateTo(0);
            Turtle.PenDown();
            Turtle.PenColor = Color.Black;
            Turtle.PenSize=10;
            for (int i = 0; i <= 23; i++) {
                    Turtle.Rotate(15);
                    Turtle.Forward(10.04f);
                    
                }
            
            //cylinder_3
            Turtle.PenUp();
            Turtle.MoveTo(60,-130);
            Turtle.RotateTo(0);
            Turtle.PenColor = Color.Black;
            Turtle.PenSize=20;
            Turtle.PenDown();
            Turtle.Forward(30);
            Turtle.PenColor = Color.Green;
            Turtle.PenSize=10;
            Turtle.Forward(cyl3_pos);
            Turtle.PenColor = Color.Gray;
            Turtle.PenSize=7;
            Turtle.Rotate(90);
            Turtle.Forward(30);
            Turtle.PenColor = Color.Black;
            for (int i = 0; i <= 23; i++) {
                    Turtle.Rotate(-15);
                    Turtle.Forward(2f);
                }
            Turtle.PenUp();
            Turtle.Backward(30);
            Turtle.PenDown();
            Turtle.PenColor = Color.Gray;
            Turtle.Backward(30);
            Turtle.PenColor = Color.Black;
            for (int i = 0; i <= 23; i++) {
                    Turtle.Rotate(-15);
                    Turtle.Forward(2f);
                }
            
            //S1
            Turtle.PenUp();
            Turtle.MoveTo(-160,50);
            Turtle.RotateTo(0);
            Turtle.PenDown();
            if(s1) Turtle.PenColor = Color.Yellow; else Turtle.PenColor = Color.Black;
            Turtle.PenSize=15;
            Turtle.Forward(20);
            
            //S2
            Turtle.PenUp();
            Turtle.MoveTo(-50,50);
            Turtle.RotateTo(0);
            Turtle.PenDown();
            if(s2) Turtle.PenColor = Color.Yellow; else Turtle.PenColor = Color.Black;
            Turtle.Forward(20);
            
            //Barcode reader or scanner
            Turtle.PenUp();
            Turtle.MoveTo(120,50);
            Turtle.RotateTo(45);
            Turtle.PenDown();
            if(sGoodRead && cyl3_pos==45 && stepNo!=60) Turtle.PenColor = Color.LightGreen; else Turtle.PenColor = Color.Black;
            Turtle.Forward(20);
            Turtle.Backward(20);
            if(tetik_var){
                Turtle.PenColor = Color.Red;
                Turtle.PenSize=2;
                Turtle.Backward(60);
            }
            
            //Label applicator or label printer applies a label to the bottle based on barcode position
            Turtle.PenUp();
            Turtle.MoveTo(26,42);
            Turtle.RotateTo(-50);
            Turtle.PenDown();
            Turtle.PenSize=7;
            if(labelStart) Turtle.PenColor = Color.Red; else Turtle.PenColor = Color.BlueViolet;
            Turtle.Forward(70);
            
        }
        
        static int RandomAngle(int min, int max) {
            Random random=new Random();
            return random.Next(min,max);
        
        }
        void BtnStartMouseDown(object sender, MouseEventArgs e)
        {
            start=true;
            _S71200.Write("I0.4",1);
        }
        void BtnStartMouseUp(object sender, MouseEventArgs e)
        {
            start=false;
            _S71200.Write("I0.4",0);
        }
        void BtnStopMouseDown(object sender, MouseEventArgs e)
        {
            stop=true;
            _S71200.Write("I0.5",1);
        }
        void BtnStopMouseUp(object sender, MouseEventArgs e)
        {
            stop=false;
            _S71200.Write("I0.5",0);
        }
        void BtnPrintedMouseDown(object sender, MouseEventArgs e)
        {
            _S71200.Write("I0.3",1);  // dispense end label printed
        }
        void BtnPrintedMouseUp(object sender, MouseEventArgs e)
        {
            _S71200.Write("I0.3",0);
            lblEtiket.Text="PRINTED..";
        }
        
    }
}

Yorumlar

Yorum Gönder

Bu blogdaki popüler yayınlar

VBA - Mscomm (seri port) ile veri loglama

Resim
  Youtube da izleyebilirsin.. Örnek projemizde, seri port ile haberleşen bir cihazdan (barkod okuyucu, terazi, PLC, Arduino..) Excel sayfasına bilgi alacağız. Yazılımı geliştirmek için tek ihtiyacımız Excel oluyor.. Seri haberleşme için eskiden beri (yaklaşık 30 yıldır) VB6 ile kullanılan MSCOMM32.OCX isimli ActiveX bileşeni kullanıyoruz. Önceki yazıda bahsetmiştim, yine hatırlatayım, bu tip bileşenleri kullanabilmemiz için Excel versiyonumuz 32-bit olmalıdır. Hesap > Excel Hakkında penceresinde en üstte yazıyor.. Office versiyonu önemli değil 2007-2021 arası hatta 365 olabilir, hepsinde çalışır.. (365 bulut sürümü hariç, orada VBA değil kodlaması Basic e göre çok daha zor olan TypeScript veya JavaScript kullanılıyor..)  Neyse ki Microsoft, eski VBA müşterilerini kızdırmamak için VBA desteğini yeni Office uygulamalarında da devam ettiriyor. Senaryo şu şekilde; seri porttan gelen virgül ile ayrılmış bilgiler 6. satıra gelecektir.. Her bilgi geldiğinde 10. satır bir alt...
Devamı

RJ45 2 - Novexx barkod yazıcıya, S7-1200 plc ile etiket yazdırma

Resim
  Aslında burada anlattığım konu, yazıcı markasından bağımsızdır.  Bir önceki RJ45 yazısında   Ascii TCP  protokolünden bahsetmiştim.. Yazıcıya a b c gibi bildiğimiz ascii karakterler yollayacağız, yani yazıcı markasına göre yazıcı dili değişmekte fakat sonuçta yöntem değişmemektedir. Bu işi yaparken ethernet kablosuyla veya TCP/IP ile çalışacağız. Ama birazdan değineceğim Byte Array gönderme yöntemiyle, S7-1200 e ek modül takarak RS232 ile de yazıcıya etiket bilgisi yollanabilir, sadece plc de kullanılan blok komut değişecektir. Ama ek modül kullanmaya gerek yok. Ethernet portu zaten bu plc de mevcut ve onu kullanacağız. TCP/IP haberleşmede blok komut olarak  TSEND_C  ile bu işi gerçekleştireceğiz. Yazıcımız yok diyelim, bu durum burada anlatacağım plc programını yapmanıza engel değil. PC de çalışan Hercules isimli bir program, yazıcı yerine geçebiliyor. Yazıcı yerine bu programı kullanacağız. Ama gerçek bir plc ye ihtiyaç var, malesef bazı işlerde PLCSIM ...
Devamı

Köpüğü alınmış Windows AtlasOS

Resim
  Yeni bir bilgisayar alırsanız artık Windows 11 kurulmuş olarak geliyor. Windows 10 a göre daha hızlı olduğu söyleniyor. Microsoft, Windows 7 ve Windows 10 için sistem gereksinimi olarak en az 2 GB ram önerirken, bu rakamı Windows 11 de 4 GB olarak yükseltmiş.. Microsoft, Windows un nedense gerektiğinden daha düşük ram gereksinimi olduğuna inanmamızı istiyor. Windows 10 u 2 GB ram i olan bir bilgisayara kurunca, kağnı modunda çalıştığını daha doğrusu çalışamadığını biliyoruz. Yeni bilgisayar alacaksanız ve imkanınız varsa sistemde en az 16 GB ram olmasını tavsiye ederim. Neyse ki düşük ram ve işlemciye sahip bir bilgisayarı kasan Windows’u, AtlasOS ile hızlandırmak mümkün oluyor. Windows masaüstünüzün sanki bir Linux dağıtımı masaüstü kullanıyor gibi hızlandığını fark edeceksiniz. Abartmış olabilirim :) AtlasOS için tıraşlanmış veya budanmış Windows da diyebiliriz. AtlasOS aslında bildiğimiz Windows. Yeni kurulmuş bir Windows 10 Pro veya Windows 11 Pro da uygulanabiliyor. Sonu gel...
Devamı