Weiß jemand, wie ich an einen Xmega ein ssd 1306 zum laufen bekomme? Die Eingebaute Libary von Bascom funktioniert nicht, bekomme kein Signal an den I2C Pins raus.
ssd1306 und Xmega
Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen
Aufgrund technischer Veränderungen ist der Mailverkehr innerhalb des Forums (Private Nachrichten) nur noch eingeschränkt möglich. Die Einschränkung ist notwendig, um zusätzliche Betriebskosten für das Forum zu vermeiden. Näheres zu den Hintergründen im Thread "Aktuelles zum Forum".Wir bitten um Verständnis.
Hinweis kann nach Kenntnisnahme deaktiviert werden!
-
-
Das liegt sicher an deinem Programm, das du vergessen hast, anzuhängen
Gruß, Michael -
Quellcode
- '$external _xmegafix_clear
- '$external _xmegafix_rol_r1014
- 'First Enable The Osc Of Your Choice , make sure to enable 32 KHz clock or use an external 32 KHz clock
- Config Osc = Enabled , 32mhzosc = Enabled
- 'configure the systemclock
- Config Sysclock = 32mhz , Prescalea = 1 ', Prescalebc = 1_1
- Enable Interrupts
- Config Priority = Static , Vector = Application , Lo = Enabled , Med = Disabled , Hi = Enabled 'Enable Lo Level Interrupts
- Config Com2 = 38400 , Mode = Asynchroneous , Parity = none , Stopbits = 1 , Databits = 8 ' , Clockpol = 0
- Open "Com2:" For Binary As #5
- Dim Twi_start As Byte 'GAAANZ Wichtig
- 'Open "twic" For Binary As #2
- 'I2cinit #2 'set i2c pins to right state , open collector , pull up activated
- 'Config Twic = 1300000
- Config Scl = Portd.5 ' used i2c pins
- Config Sda = Portd.4
- Config Twi = 400000 ' i2c speed
- I2cinit
- $lib "i2c_twi.lbx" ' we do not use software emulated I2C but the TWI
- $lib "glcdSSD1306-I2C.lib" ' override the default lib with this special one
- #if _build < 20784
- Dim ___lcdrow As Byte , ___lcdcol As Byte ' dim these for older compiler versions
- #endif
- Config Graphlcd = Custom , Cols = 128 , Rows = 64 , Lcdname = "SSD1306"
- do
- Print #5 , "123"; " t"
- Cls
- Setfont Font8x8tt ' select font
- Lcdat 1 , 1 , "BASCOM-AVR"
- Lcdat 2 , 10 , "1995-2015"
- Lcdat 8 , 5 , "MCS Electronics" , 1
- loop
- Waitms 3000
- 'Showpic 0 , 0 , Plaatje
- End
- $include "font8x8TT.font" ' this is a true type font with variable spacing
- 'Plaatje:
- ' $bgf "ks108.bgf" ' include the picture data
-
Du verwendest die hw-twi, dann musst du auch die pins dafür verwenden. Liegen die nicht im port c? Welchen xmega verwendest du?Raum für Notizen
-----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------- -
Ich fand dazu mal dieses file (es lief, mit Grafik).
*********************************************
' 1ter Test des ATMEL XMEGA-C3 Xplained mit
' ATxmega384c3 und Display UG-283HSWEG04 (128x32) mit Controller SSD1306
'
' die Displayansteuerung basiert auf der SW von Hkipnik:
' bascom-forum.de/showthread.php…lay-SPI&highlight=ssd1306
' bitte auch die dortigen Licencebedingungen beachten
*****************************************************
Auf dem Xmega384 Xplained Board ist so ein Display drauf.
Leider gibt's ja das oben genannte Forum nicht mehr, so dass auch die Lizenzbedingungen nicht mehr zu sehen sind.
Das file heißt "SSD1306-hug_2016_0312_hk_neu.zip"
Vielleicht kann Hkipnik das wieder frei geben.
Das Beispiel im Bascom-Ordner kann nur text. -
ich depp, hatte die falschen Pins!!!!
Dummer Anfängerfehler die libary geht also.
DANKE -
Welche hast du jetzt genommen? Portc oder porte? Es gibt doch 2 hw-twis.Raum für Notizen
-----------------------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------------------