Running Text Di LCD Topview Simulator

Selamat pagi Sobat Blogger, Jumpa lagi Dengan saya Dalam Rangka Indahnya Berbagi Ilmu, Jika Kemarin-kemarin Saya sudah Mempost Tentang

Rangkaian Program LCD 16x2 menggunakan Topview Simulator, Kali ini Dengan Berlabelkan Microprosesor juga, Kita Akan Membuat Program Running Text Di LCD Topview Simulator

Program Ini Adalah Program Yang dikhususkan untuk LCD 16x2 di Topview Simulator, Sama halnya dengan postingan saya Sebelumnya yaitu Rangkain Program LCD Menggunakan Topview Simulator Namun Dalam Tampilannya Program ini Berbentuk Text yg Muncul Satu persatu, Nah Sekarang kita Akan membuat program yg lebih Ok lagi, yaitu Program Running Text di LCD Topview Simulator Yang nanti hasil akhirnya Akan Berbentuk Tulisan yang Berjalan, Persis Seperti Kita Membuat Running Text Tapi Masih Dalam Bentuk LCD.

Tanpa Basa-Basi Lama, Kita Mulai Saja Programnya:

* Instal dulu software Topview Simulator Di komputer Anda, 

jika Belum Punya, Silahkan Download Disini>>>

* Buka Program Topview Simulato Anda, Dan pertama Kali Anda akan Dihadapkan Dengan Topview Simulator - Select Device; 

* Silahkan Pilih pada Select Device nya, Dan kali ini Kita menggunakan Atmel 89C52 >>> Klik Ok.

* Lalu Klik File pada Menu Bar, Lalu Pilih External Module Setting, Pilih LCD

* Maka Akan Muncul Sperti Gambar Dibawah ini, Pada Select LCD Pilihlah Type 2liness X 16 Character. dan Data Bus Width nya Kita gunakan 8 Bit

* Lalu Klik Port Line Selection, Yg Dilingkari Merah

* Silahkan Anda Setting Control Line  dan Port Line, Hingga Sesuai dengan Gambar Dibawah ini >>> Lalu Klik Ok.

* Klik Menu View pada Menu Bar >>> Pilih External Modules >>> Klik LCD

Nah.... Selesai Sudah Kita Mengkonfigurasi LCD nya, Sekarang Kita Coba Merangkai Programnya.. :D

* Silahkan Ketikkan Di Notepad Anda Script dibawah ini , Lalu Simpan Dalam Bentuk/Type .Asm

$MOD51

GESERL EQU 00011011B ; 0 0 0 1 S/C R/L X X untuk geser ke kiri

GESERR EQU 00011111B ; 0 0 0 1 S/C R/L X X untuk geser ke kanan

ORG 000H

CLR P3.5

CALL INIT_LCD

START: CALL WRITE_CHAR;CALL INIT_LCD

CALL WRITE_CHAR2

CALL GESER

SJMP START

;

GESER:

MOV R6,#40 ;R7 = 40; GESER SEBANYAK 40 KARAKTER

LAGI: MOV R1,#GESERl ;R1 PERINTAH UNTUK GESER DARI KIRI KE KANAN

CALL WRITE_INST

CALL LDELAY

DJNZ R6,LAGI ;R7=R7-1, JIKA R7 ? 0 MAKA LOMPAT KE LAGI

WRITE_CHAR:

MOV DPTR,#WORD1 ;DPTR = [ ADDRESS WORD1 ]

MOV R3,#25 ;R3=25 pemesanan karakter

MOV R1,#80H ;R1=80H,ADDRESS DDRAM START POSITION

CALL WRITE_INST

;

WRITE1:CLR A ; A = 0

MOVC A,@A+DPTR ; A = [A+ DPTR]

MOV R1,A ; R1 = A

INC DPTR ; DPTR = DPTR +1

CALL WRITE_DATA;

DJNZ R3,WRITE1 ; R3 = R3-1,

RET

WRITE_CHAR2:

MOV DPTR,#WORD2 ;DPTR = [ ADDRESS WORD1 ]

MOV R3,#25 ;R3=16,NUMBER CHARACTER TO BE DISPLAY

MOV R1,#0C0H ;R1=80H,ADDRESS DDRAM START POSITION

CALL WRITE_INST

;

WRITE2:CLR A ; A = 0

MOVC A,@A+DPTR ; A = [A+ DPTR]

MOV R1,A ; R1 = A

INC DPTR ; DPTR = DPTR +1

CALL WRITE_DATA;

DJNZ R3,WRITE2 ; R3 = R3-1,

RET

;

INIT_LCD:

MOV R1,#00000001B ;CLEAR LCD / MEMBUAT LCD JADI KOSONG

CALL WRITE_INST ;

MOV R1,#00111000B ;Fungsi SET,

;DATA 8 BIT,2 LINE FONT 5X7

CALL WRITE_INST ;

MOV R1,#00001100B ;DISPLAY ON,

;CURSOR OFF,CURSOR BLINK OFF

CALL WRITE_INST

MOV R1,#00000110B ;ENTRY MODE, SET INCREMENT

CALL WRITE_INST

RET

;

WRITE_INST:

CLR P3.6 ; RS = P2.0 = 0, WRITE MODE INSTRUCTION

MOV P0,R1 ; D7 S/D D0 = P0 = R1

SETB P3.7 ; EN = 1 = P2.1

CALL DELAY ; CALL DELAY TIME

CLR P3.7 ; EN = 0 = P2.1

RET

;

WRITE_DATA:

SETB P3.6 ; RS = P2.0 = 1, WRITE MODE DATA

MOV P0,R1 ; D7 S/D D0 = P0 = R1

SETB P3.7 ; EN = 1 = P2.1

CALL DELAY ; CALL DELAY TIME

CLR P3.7 ; EN = 0 = P2.1

RET

;

LDELAY: MOV R2,#087H ; UNTUK MENGATUR KECEPATAN GESER

LD1: ACALL DELAY

DJNZ R2,LD1

RET

DELAY: MOV R0,#0

DELAY1: MOV R7,#0FH

DJNZ R7,$

DJNZ R0,DELAY1

RET

;

WORD1: DB '        SELAMAT DATANG DI'; UNTUK MENGISI PADA LCD BARIS PERTAMA (80H)

WORD2: DB '         STMIK BUDIDARMA  '; UNTUK MENGISI LCD PADA BARIS KE 2 (0C0H)

;

END

*Setelah Program diatas selesai anda ketik dan anda simpan, Buka Kembali Topview simulator Anda.

*Open File yg anda simpan Tadi, Lalu Build/jalankan

*Tarraaa... Simulasi Anda Berhasil.

Mungkin hanya ini yang dapat saya share tentang Program Running Text di LCD Topview Simulator. Silahkan baca Tentang Artikel Microprosessor Lainnya Seperti Rangkaian Program Untuk LCD 16x2 Menggunakan Topview Simulator.

Atas Kunjungan Anda, Kami Ucap "Terima Kasih".