interface

ANALISA DAN PEMBAHASAN

Pada  rangkaian  ini  kami  menganalisa  alat  yang  telah kami  buat,yaitu RUNNING LED tentang  cara  atau  prinsip  kerja  dari  RUNNING LED ini.Penganalisaan  pada rangkaian RUNNING LED  ini akan kami sajikan dalam 5 metode yaitu :

1.                Analisa Rangkaian Secara Blok Diagram

2.                Analisa Rangkaian Secara Detail

3.                Analisa Program

4.                Flow Chart dan

5.                Cara Kerja Alat

Pada rangkaian ini saya  berusaha melakukan analisa untuk  dapat  lebih  memperjelas  tentang  cara  atau   prinsip  kerja  dari  Rangkaian  RUNNING LED ini,  dengan  harapan  akan  lebih  mudah  untuk dimengerti atau dipahami.

Pada analisis rangkaian secara blok saya juga membagi menjadi Tiga Blok rangkaian yaitu Blok Input, Blok Proses dan Blok Output yang masing-masing memiliki fungsi tersendiri

3.1   Analisa Diagram Blok

AKTIVATOR

OUTPUT

INPUT

PROSES

 

Gambar 3.1 Diagram Blok

3.1.1        Blok Aktivator

Pada blok ini yang termasuk  dalam kategori aktivator adalah tegangan DC yang berasal dari DB 25 dimana pada kaki  atau pin DB 25 terdapat tegangan sebesar 5v.

3.1.2        Blok Input

Pada blok ini yang termasuk dalam kategori  input adalah DB 25 yang akan di input ke button pada program Delphi 7.

3.1.3        Blok Proses

Pada blok ini yang termasuk dalam kategori proses adalah program yang saya buat dengan aplikasi Delphi 7, dengan menggunakan program ini dapat kita tentukan led yang ingin saya nyalakan agar diprogram dan dapat menyala dengan indah sesuai keinginan kita sendiri .

3.1.4         Blok Output      

Yang termasuk dalam kategori output adalah LED. komponen ini sangat berperan penting dalam suatu rangkaian yang telah dibuat ,karena hasil dari proses dan ditampilkan oleh media komponen tersebut. Dengan LED akan mengeluarkan emisi cahaya yang menyala bergantian sesuai dengan program yang dibuat.

 

Gambar 3.2  kategori output

3.2              Analisa Rangkaian Secara Detail

Ketika port printer tercolok kemudian kondisi DB tersebut aktif  dan program sudah disiapkan ketika kita menekan button maka program pun berjalan dengan otomatis data dari pin2 sampain pin9 mendapat tegangan yang dilanjutkan ke tiap-tiap port yang mengalir melalui resistor dan ke led ,sehingga untuk mengaktifkan led kita hanya memberi logika 1 pada program yang kita buat serta kita beri logika 0 untuk led yang mati.Ketika itu led akan menyala dengan indah sesuai dengan ketentuan yang sudah dibuat pada program sebelumnya

3.3              Analisa Program

Pada pembuatan program ini aplikasi yang saya gunakan adalah delphi 7 dan inilah  listing program serta analisa programnya.

Uses

Windows,messages,SysUntils,Variants.Classes,Graphics,Control,Form,Dialog,StdCtrls,ComCtrls;

Fungtion Out32(wAddr:word;bout:byte):byte;stdcall;external’input32.dll’;   //ini adalah sintak untuk inisialisai dari DB25 yang digunakan//

Var

Form1:Tform1;

CB:byte;                        //variabel yang digunakan adala byte ,dan byte didalam program diganti mnjadi Cb//

Implementation

{$R *.dfm}

Procedure Delay (mSec:Integer);

Var StartCoun: longint;

Begin                                                                        //sintax yang diperlukan

StartCount:=GetTickCount;                                    untuk pengaturan dalam

Repeat                                                                      menggunakan delay//

Application.ProcessMessages;

Until (GetTickCount-StartCount)>= mSec;

End;

Procedure Tfrom1.button1.Click(sender: Tobject);      //button 1//

Begin

Cb:=(Out32($378,15));             //led kondisi low menyala//

Delay(250);                   

Cb:=(Out32($378,240));           //led kondisi low menyala//

Delay(250);                   

Cb:=(Out32($378,15));             //led kondisi low menyala//

Delay(250);                   

Cb:=(Out32($378,240));           //led kondisi low menyala//

Delay(250);                   

Cb:=(Out32($378,15));             //led kondisi low menyala//

Delay(250);                   

Cb:=(Out32($378,240));           //led kondisi low menyala//

Delay(250);                   

Cb:=(Out32($378,15));             //led kondisi low menyala//

Delay(250);                   

Cb:=(Out32($378,240));           //led kondisi low menyala//

Delay(250);                   

Procedure Tfrom1.button2.Click(sender: Tobject);      //button2//

Begin

Cb:=(Out32($378,255));           //semua led menyala//

Delay(250);                   

Cb:=(Out32($378,3));               //led pada d0&d1 menyala//

Delay(250);                   

Cb:=(Out32($378,12));             //led pada d2&d3menyala//

Delay(250);                   

Cb:=(Out32($378,48));             //led pada d4&d5 menyala//

Delay(250);                   

Cb:=(Out32($378,192));           //led padad6&d7  menyala//

Delay(250);                   

Cb:=(Out32($378,192));           // led padad6&d7  menyala //

Delay(250);                   

Cb:=(Out32($378,48));             //led pada d4&d5 menyala//

Delay(250);                   

Cb:=(Out32($378,12));             // led pada d2&d3menyala//

Delay(250);                   

Cb:=(Out32($378,3));               //led pada d0&d1 menyala //

Delay(250);                   

Procedure Tfrom1.button3.Click(sender: Tobject);      //button3//

Begin

Cb:=(Out32($378,225));           //led mnyala semua//

Delay(250);                   

Cb:=(Out32($378,3));               //led pada d2,d3,d4.d5 menyala//

Delay(250);                               

Cb:=(Out32($378,225));           //led mnyala semua//

Delay(250);                   

Cb:=(Out32($378,3));               //led pada d2,d3,d4.d5 menyala//

Delay(250);                   

Cb:=(Out32($378,225));           //led mnyala semua//

Delay(250);                   

Cb:=(Out32($378,3));               //led pada d2,d3,d4.d5 menyala//

Delay(250);                   

Cb:=(Out32($378,225));           //led menyala semua//

Delay(250);                   

Cb:=(Out32($378,3));               //led pada d2,d3,d4.d5 menyala//

Delay(250);                   

Cb:=(Out32($378,225));           //led mnyala semua//

Delay(250);                   

Cb:=(Out32($378,3));               //led pada d2,d3,d4.d5 menyala//

Delay(250);                   

Procedure Tfrom1.button4.Click(sender: Tobject);      //Keluar//

Begin

Application.terminate;               //keluar dari program//

End;                              

3.4              Flow Chart

Button 1

Led  nyala semua

Program button 1 jalan

 

                                                    T           Y

 

                                                  

                                                 T        

Button 2

 

Program button 2 jalan

                                                                 Y

 

                                                   T

Button 3

 

Program button 3 jalan

                                                                 Y

 

                                                    T           

keluar

                                                     

                                                Gambar 3.3 flow chart          

                        Pada saat port db disambungkan maka otomatis semua led dalam kondisi menyala , setelah itu pililah salah satu button , maka output akan keluar sesuai program yang telah dibuat pada button tersebut. Kemudian kembali ke kondisi led nyala semua dan selanjutnya kita bisa memilih button berapa saja sesuai output yang ada.

3.5         Cara Kerja Alat

    

     Cara kerja alat ini ada dari program yang saya buat. Pada pembuatan program tersebut cukuplah mudah yaitu ketika PORT DB 25 di hubungkan dengan printer , kemudian dengan membuka program yang telah dibuat terlebih dahulu dengan delphi 7 dan ketentuan yang sudah ditentukan. kemudian dengan  menekan button 1 yang ada pada program maka hasil nya program yang dibuat pada program 1 pun menyala sesuai dengan ketentuan yang telah dibuat.

     Kemudian lanjut pada button yang kedua, dengan mengklik saja dan program pun berjalan dan led menyala sesuai dengan program. Begitu juga pada button 3, yang membedakan hanyalah output yang ada pada led,dengan variasi nyala led yang berbeda-beda sehingga menarik perhatian untuk dilihatnya.Pada button selanjutnya button 4 button ini hanya untuk kita keluar dri program tersebut.