Membuat Program LCD 16*2 Dengan BASCOM-8051

Kali ini saya mencoba menuliskan program sederhana ldc 16x2 menggunakan pemrograman BASCOM-8051. Modul LCD menggunakan PORT1 pada mikrokontroler AT89S51. Pada program ini menggunakan kondisi pada pin 0 port 0 (P0.0). Jangan lupa pada diberi trimpot pada modul LCD nya (di pin 3 LCD) untuk pengaturan kontras blok - blok LCD.

$regfile = "8052.dat"
$crystal = 12000000
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = P1.4 , Db5 = P1.5 , Db6 = P1.6
Config Lcdpin = Pin , Db7 = P1.7 , E = P1.3 , Rs = P1.2
Cursor Off
Sensor Alias Port0.0

Krisman_sentrablog:
While Sensor = 0
Cls
Lcd "Program Berhasil"
Lowerline
Lcd "Krisman Silalahi"
Waitms 70
Wend
Cls
Lcd "Krisman Silalahi"
Lowerline
Lcd "sentraBLOG"
Waitms 70
Goto Krisman_sentrablog