Hello everything is fine
#define SSD1306_I2C_ADDRESS 0x3C // 011110+SA0+RW - 0x3C or 0x3D
// Address for 128x32 is 0x3C
// Address for 128x64 is 0x3D (default) or 0x3C (if SA0 is grounded)
/*=========================================================================
SSD1306 Displays
-----------------------------------------------------------------------
The driver is used in multiple displays (128x64, 128x32, etc.).
Select the appropriate display below to create an appropriately
sized framebuffer, etc.
SSD1306_128_64 128x64 pixel display
SSD1306_128_32 128x32 pixel display
SSD1306_96_16
-----------------------------------------------------------------------*/
// #define SSD1306_128_64
#define SSD1306_128_32
// #define SSD1306_96_16
/*=========================================================================*/
I made the same clock file and the one you are using does not work
Sub Process_Globals
Public Serial1 As Serial
Private wifi As ESP8266WiFi
Private clock As Timer
Private ssd As AdafruitSSD1306
Private d1pins As D1Pins
End Sub
Private Sub AppStart
Serial1.Initialize(115200)
Log("AppStart")
'example of connecting to a local network
If wifi.Connect2("Help-Info Central Tec 2.4G", "Pp1c2s3m4") Then
Log("Connected to network")
TimeNIST.Start
clock.Initialize("clock_Tick", 1000)
ssd.InitializeI2C(d1pins.D1, 0x3c)
ssd.ClearDisplay
TimeIsAvailable
Else
Log("Failed to connect to network")
End If
End Sub
Public Sub TimeIsAvailable
clock.Enabled = True
End Sub
Private Sub Clock_Tick
ssd.ClearDisplay
ssd.GFX.SetCursor(0, 0)
ssd.GFX.ConfigureText(1, ssd.WHITE, False)
ssd.GFX.DrawText("Date: ").DrawText(TimeNIST.GetDate).DrawText(CRLF).DrawText(CRLF)
ssd.GFX.ConfigureText(2, ssd.WHITE, False)
ssd.GFX.DrawText(NumberFormat(TimeNIST.GetHours, 2, 0)).DrawText(":").DrawText(NumberFormat(TimeNIST.GetMinutes, 2, 0))
ssd.GFX.DrawText(":").DrawText(NumberFormat(TimeNIST.GetSeconds, 2, 0))
ssd.Display
End Sub[/CODE]