proton glcd uygulaması

[yunus417]

iyi çalışmalar arkadaşlar. fastlcd ve pixelv programı ile .inc ve .bas dosyamı oluşturdum. programı da yazdım fakat anlayamadığım bi hata yüzünden proton ide derleyicisi derlemede hata diyor ve hiç hata kodu yok. inc ve bas dosyalarım program dosyası içerisinde . yardımcı olur musunuz.

Include  "dene.inc"Device = 16F877Config XT_OSC,WDT_OFF,PWRTE_ON,BODEN_ON,LVP_OFF,DEBUG_OFF,CP_ALL  Xtal = 4All_Digital= TRUE                  'ADC PORTLARININ TAMAMI DİJİTAL GİRİŞ VEYA ÇIKIŞDeclare LCD_DTPort = PORTD                'GLCD DATA PORTLARI PORTB'YE BAĞLIDeclare LCD_RSPin = PORTC.5                'GLCD RS PİNİ PORTC.5 BAĞLIDeclare LCD_ENPin = PORTC.1                'GLCD ENABLE PİNİ PORTC.1 BAĞLIDeclare LCD_RWPin = PORTC.4                'GLCD RW PİNİ PORTC.4 BAĞLIDeclare LCD_CS1Pin = PORTC.2               'GLCD CS1 PİNİ PORTC.2 BAĞLIDeclare LCD_CS2Pin = PORTC.3               'GLCD CS2 PİNİ PORTC.3 BAĞLIDeclare LCD_Type =  GRAPHIC                'GLCD TİPİ GRAFİK KS0108 128*64B WİNSTARDeclare Internal_Font = On                 Declare Font_Addr = 0ClsDelayMS 500	         Dim  Xpos    As ByteDim  Ypos    As ByteDim  Char    As ByteDim memoria As WordBASLA: For Ypos = 0 To Ypos=7         For Xpos = 0 To Xpos=127              memoria= (Ypos*128)+Xpos             Char = CRead dene+ memoria             LCDWrite Ypos,Xpos,[Char]         Next Xpos     Next Ypos DelayMS 1000   GoTo BASLA   End