Hallo,
Ich programmiere in Bascom und möchte ein 27*4 Zeiliges Display von Pollin anschließen. Doch das hat zwei controller und muß es an einem M16 an PortC betreiben. Die Datei ist für PortB, hab schon die adressen am Anfang geändert von $17 und $18 auf $14 und $15 aber das hilft nix.
Habt vieleicht einer ahnung wie mann dies ändern könnte?[_init_lcd]
.equ Lcdddr = $14
.equ Lcdport = $15
_init_lcd:
* Basic : Waitms 10
.obj Ef8f
.obj Bb87
.obj E380
.obj Bb88
.obj E003
_init_lcd1:
.obj 9ac2
.obj 98c2
.obj 9ac3
.obj 98c3
* Basic : Waitms 1
.obj 950a
Brne _Init_LCD1
.obj 98c4
.obj 9ac2
.obj 98c2
.obj 9ac3
.obj 98c3
* Basic : Waitms 1
.obj E080
* Sts {___lcde} , R24
.obj E288
rcall _Lcd_control
.obj E08e
rcall _Lcd_control
.obj E086
rcall _Lcd_control
.obj Ef8f
* Sts {___lcde} , R24
.obj E288
rcall _Lcd_control
.obj E08e
rcall _Lcd_control
.obj E086
Rjmp _Lcd_control
[end]
[_write_lcd]
_write_lcd:
.obj 9468
Rjmp _Write_lcd_Byte
_lcd_control:
.obj 94e8
_write_lcd_byte:
.obj 2f98
Rcall _Write_lcd_Nibble
.obj 2f89
.obj 9582
_write_lcd_nibble:
* Lds R2 , {___lcde}
.obj 2022
Brne _Write_lcd_nibble2
.obj F980
.obj 6084
.obj 7f85
.obj Bb88
.obj 98c2
Rjmp _Write_lcd_nibble3
_write_lcd_nibble2:
.obj F980
.obj 6088
.obj 7f89
.obj Bb88
.obj 98c3
_write_lcd_nibble3:
@genus(100)
.obj 9508
[end]
[_cls]
$external _write_lcd
_cls:
.obj E081
Rcall _Lcd_control
* Basic : Waitms 3
.obj E880
Rjmp _Lcd_control
[end]
MFG
Jörg
Dieses Display kannst du ohne Libary ansteuern. Siehe Bild und Beispielcode https://www.roboternetz.de/phpBB2/viewtopic.php?t=3603
Gruß Frank
Lesezeichen