Prosedur Perancangan Peringatan Tumpukan Barang Pada Konveyor

Deskripsi

Proses pemindahan barang dari konveyor A ke konveyor B, menggunakan sistem robotik untuk pemindahannya. Barang diambil oleh robot dari konveyor A yang sedang berjalan secara perlahan lalu dipindahkan ke konveyor B yang dalam keadaan tidak berjalan. Barang-barang yang dipindahkan disusun secara bertumpuk, lalu setelah tumpukan telah memenuhi batas syarat maksimal penumpukan yang ditentukan, yaitu maksimum 5 tumpukan barang maka konveyor B pun berjalan menuju gudang penyimpanan. Sebagai tanda peringatan bahwa tumpukan barang telah mencapai 5 tumpukan, maka akan dibuat tampilan teks yang bertuliskan ''Tumpukan Barang Sudah 5, Konveyor B Berjalan''. Lalu dibuat juga tanda peringatan bahwa tumpukan barang belum mencapai 5 tumpukan, maka akan dibuat tampilan teks yang bertuliskan ''Tumpukan Barang Belum Maksimal''. Selama tanda peringatan tampilan teks yang bertuliskan ''Tumpukan Barang Belum Maksimal'' terus muncul, maka robot akan terus mengambil barang dari konveyor A dan memindahkannya ke konveyor B.

Listing programnya adalah sebagai berikut :

Penjelasan dari listing program diatas adalah sebagai berikut :

program pemindahan_barang;

uses crt;
procedure hitung;
var
A,B,C:integer; > variabel bertipe data integer
procedure hitung;
writeln('barang pada konveyor A :'); > menampilkan barang pada konveyor A :
readln(A); > input nilai A
writeln('barang pada konveyor B :'); > menampilkan barang pada konveyor B :
readln(B); > input nilai B
C := A + B; > operasi hitung C = A + B
writeln(C); > menampilkan nilai C
if C >= 5 then > apabila lebih besar atau sama dengan 5
writeln('Tumpukan Barang Sudah 5, Konveyor B Berjalan'); > menampilkan 'Tumpukan Barang Sudah 5, Konveyor B Berjalan'
else > apabila tidak sesuai dengan pernyataan diatas
writeln('Tumpukan Barang Belum Maksimal'); > menampilkan 'Tumpukan Barang Belum Maksimal'
readln; > membaca dari setiap tampilan diatas sebelum program otomatis keluar
end. > mengakhiri program


Secara sederhana, program diatas dapat dituliskan dalam bentuk sebagai berikut :

Solusi

Dengan adanya tanda peringatan berupa tampilan teks, maka tidak akan terjadi kesalahan pada saat proses pengambilan dan penumpukkan barang. Ketika robot berhenti mengambil barang sedangkan tumpukan barang belum 5, maka tanda peringatan berupa tampilan teks yang bertuliskan ''Tumpukan Barang Belum Maksimal'' akan tampil pada layar, sehingga robot dapat melanjutkan kembali proses pengambilan barangnya sampai posisi penumpukan 5 barang. Sedangkan apabila posisi tumpukan barang sudah mencapai 5 tumpukan tetapi robot masih mengambil barang dari konveyor A, maka tanda peringatan berupa tampilan teks yang bertuliskan 'Tumpukan Barang Sudah 5, Konveyor B Berjalan'' akan tampil pada layar, sehingga robot akan berhenti mengambil barang dari konveyor A. 

Referensi :
1. http://raviananuraeni.blogspot.com/2012/12/contoh-procedure.html