Device = 16F887 'MCU 16F887
Xtal = 4 'KRİSTAL 4MHZ
Declare LCD_DTPort = PORTD 'GLCD DATA PORTLARI PORTB'YE BAĞLI
Declare LCD_RSPin = PORTC.5 'GLCD RS PİNİ PORTC.5 BAĞLI
Declare LCD_ENPin = PORTC.1 'GLCD ENABLE PİNİ PORTC.1 BAĞLI
Declare LCD_RWPin = PORTC.4 'GLCD RW PİNİ PORTC.4 BAĞLI
Declare LCD_CS1Pin = PORTC.2 'GLCD CS1 PİNİ PORTC.2 BAĞLI
Declare LCD_CS2Pin = PORTC.3 'GLCD CS2 PİNİ PORTC.3 BAĞLI
Declare LCD_Type = GRAPHIC 'GLCD TİPİ GRAFİK KS0108 128*64B WİNSTAR
Declare Internal_Font = On
Declare Font_Addr = 0
Cls 'GLCD EKRANINI TEMİZLE
BASLA:
Print At 0,0,"GLCD UYGULAMALARI 1 "
DelayMS 1000
End
Include "ARIALK12.txt"