glcd resim gösterme

[seçili]

arkadaşlar picbasicpulus ile resmi önce bas ve incilode dosyası oluşturuyoruz
peki bunu nasıl hex haline getirecem aşada hazırlanmış bas kodları var bunlara ilave edeceyim neler vardır defınce bit -reg vesayire bunları yazıp aşayada bas kodlarınımı yazıyoruz bu konuda açıklamalı döküman olan varmıdır yardımcı olan herkese teşekkürler





include "PROTON_G4.INT"

Dim Xpos As Word
Dim Ypos As Byte
Dim Addr As Word
Dim char As Byte



START:

For Ypos = 0 To 26,5
For Xpos = 0 To 531

Addr = (Ypos*532)+Xpos
Char = Cread yeni+Addr
LcdWrite Ypos,Xpos,[Char]
Next
Next

DelayMs 100

Goto START


Include "yeni.inc"

 

[seçili]

burda kodlarda hata varmıdır MİCROCODE SUTİDO İLE hex se çevirince hata veriyor yanlışlık nerede

proton proğramı ile hex se çevirdiyimde ERROR USB KEY NOT FOUNT DİYE HATA VERİYOR




Device = 16F877
Config XT_OSC,WDT_OFF,PWRTE_ON,BODEN_ON,LVP_OFF,DEBUG_OFF,CP_ALL
XTAL = 4
ALL_DIGITAL= TRUE 'ADC PORTLARININ TAMAMI DİJİTAL GİRİŞ VEYA ÇIKIŞ
LCD_DTPORT = PORTD 'GLCD DATA PORTLARI PORTB'YE BAĞLI
LCD_RSPIN = PORTC 'GLCD RS PİNİ PORTC.5 BAĞLI
LCD_ENPIN = PORTC.1 'GLCD ENABLE PİNİ PORTC.1 BAĞLI
LCD_RWPIN = PORTC.4 'GLCD RW PİNİ PORTC.4 BAĞLI
LCD_CS1PIN = PORTC.2 'GLCD CS1 PİNİ PORTC.2 BAĞLI
LCD_CS2PIN = PORTC.3 'GLCD CS2 PİNİ PORTC.3 BAĞLI
LCD_TYPE = GRAPHIC 'GLCD TİPİ GRAFİK KS0108 128*64B WİNSTAR
INTERNAL_FONT = On
FONT_ADDR = 0
GLCD_EXTERNAL_PRINT = PPRINT
Cls
DelayMS 500
Dim Xpos As Byte
Dim Ypos As Byte
Dim Addr As Word
Dim char As Byte
BASLA:
For Ypos = 0 To 7
For Xpos = 0 To 127

Addr = (Ypos*128)+Xpos
char = CRead a+Addr
LCDWrite Ypos,Xpos,[char]
Next
Next
DelayMS 100
GoTo BASLA
Include "a.inc"

 

[muratmert4]

S.A.
Kodlar proton kodları bence hemen protona geç derim pbp den farkı yok basic tabanlı bir program olduğu için zorlanmazssın. ve Include "a.inc" bu dosyaya ihtiyacın olacak.

 

[seçili]

S.A.
Kodlar proton kodları bence hemen protona geç derim pbp den farkı yok basic tabanlı bir program olduğu için zorlanmazssın. ve Include "a.inc" bu dosyaya ihtiyacın olacak.

muratmert kardeşim cevabın için sağol Include "a.inc" dosyasını pixelv[1].2 ile oluşturuyorum peki bu dosyayı komutlaramı ekleyeceyim ekrana nasıl resim göndereceyimi bilmiyorum teşekkürler

 

[graski]

seçili ; Bende öncelikle PROTON 'a geçmeni önereceğim. PBP 'de GLCD ile çalışmak daha zordur

Senin verdiğin kodların bulunduğu örnek, aşağıdaki siteden alınmış ve Herşey Detaylıca anlatılmış. ---- "a.inc dosyasını projeni kaydettiğin klasörün içine atmalısın." -- Örneğin linkini de ayırdım altta.

[URL="http://............r[/URL]

Örnek program ;

[URL="http://..............
[/URL]
MicrocodeStudio 'nun verdiği hatada lisans hatası olmalı.
-ERROR USB KEY NOT FOUNT

Aykut adlı arkadaşın örneğidir.Emeğe saygı anlamında eklemek istedim ..

 

[seçili]

evet tüm proplem lisans hatasıymış şimdi düzgün çalışıyor bende örneklerden öğreniyorum
fakat hata verince yanlışlıkmı var diye terettüde girdim sizlerle paylaşmak istedim zaten emek benimdir diye hiç bir kelime kullanmadım yapmamda yazdığım mesajlara bakabilirsiniz herkese teşekkürler saygılarımla