Angeregt von diesem Beitrag:
SSD1306 OLED Display
und aufgrund meiner Shopping-Tour habe ich mir mal so ein kleines 0.96 Zoll Display geholt.
Kostet keine 6 Euro inklusive Versand.
Das Ding ist verdammt klein, die Anzeigefläche wie ein Daumennagel, 24,4mm diagonal
Es passen bem 8x8TT Font etwa 18 Zeichen in eine Zeile bei 8 Zeilen in der Höhe.
bei 16x16 Fonts sind es 8 Zeichen mal 4 Zeilen
Sehr angenehm ist die schnelle Anbindung an einen Arduino Nano, nur 4 Leitungen.
Die Pullup-Widerstände sind scheinbar an Bord, wie man auf dem Bild sieht, arbeitet das alles ohne.
Leider gibt es diese SSD1306 Displays nur bis maximal 1,3 Zoll , doppelt so groß bei gleicher Pixelanzahl wäre mir lieber
Alles anzeigen
096.jpg
SSD1306 OLED Display
und aufgrund meiner Shopping-Tour habe ich mir mal so ein kleines 0.96 Zoll Display geholt.
Kostet keine 6 Euro inklusive Versand.
Das Ding ist verdammt klein, die Anzeigefläche wie ein Daumennagel, 24,4mm diagonal
Es passen bem 8x8TT Font etwa 18 Zeichen in eine Zeile bei 8 Zeilen in der Höhe.
bei 16x16 Fonts sind es 8 Zeichen mal 4 Zeilen
Sehr angenehm ist die schnelle Anbindung an einen Arduino Nano, nur 4 Leitungen.
Die Pullup-Widerstände sind scheinbar an Bord, wie man auf dem Bild sieht, arbeitet das alles ohne.
Leider gibt es diese SSD1306 Displays nur bis maximal 1,3 Zoll , doppelt so groß bei gleicher Pixelanzahl wäre mir lieber
Quellcode: 0.96 Zoll SSD1306
- $regfile = "m328pdef.dat"
- $crystal = 16000000
- $hwstack = 80
- $swstack = 64
- $framesize = 80
- Led Alias Portb.5
- Ddrb.5 = 1
- Config Scl = Portc.5 ' used i2c pins
- Config Sda = Portc.4
- Config Twi = 400000 ' i2c speed
- I2cinit
- Waitms 100
- $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
- Config Graphlcd = Custom , Cols = 128 , Rows = 64 , Lcdname = "SSD1306"
- Cls
- Setfont Font8x8tt ' select font
- Lcdat 1 , 1 , "BASCOM-AVR 2.0.8.3 " , 1
- Lcdat 8 , 5 , "MCS Electronics " , 1
- Dim Lsyssec As Long
- Config Dcf77 = Pind.2 , Timer = 1 , Timer1sec = 1 , Debug = 1
- Enable Interrupts
- Config Date = Dmy , Separator = .
- Setfont Font16x16
- Do
- Lcdat 4 , 1 , Time$
- Led = 1
- Waitms 100
- Led = 0
- Waitms 900
- Loop
- $include "font8x8TT.font"
- $include "font16x16.font"