--Wlan Config

WIFI_SSID = "SSID"
WIFI_PASS = "PW"

EibPCIP = "192.168.yy.xx"
EibPCPort = 1234


i = 0
nm = 0
ip = 0
rssi = 0
ssid = 0
quality = 0
f = 0
min = 34
hour = 12
date = "03.März.2016"
time = "12:34"


t1 = 0
t2 = 0
t3 = 0
print(i)


wifi.setmode(wifi.STATION)
wifi.sta.config(WIFI_SSID,WIFI_PASS)

tmr.alarm(0, 2000, 1, function() 
    if wifi.sta.getip() == nil then print("Connecting to AP...")
   else
    ip, nm = wifi.sta.getip()
    print (wifi.sta.getip())
    --print (f.." Verbindungsversuche")
    --dofile("date_time.lua")
    --dofile("signalstrenght.lua")
    i = 1
    --wifi.sta.getap(listap)
    disp:clearScreen()
    tmr.stop(0) 
    end
end)

function i0()
    disp:setRotate90()
    disp:setFont(ucg.font_helvB18_hf)
    disp:setColor(255, 255, 255)
    disp:drawRFrame(67,60, 200,60, 8)
    disp:setFont(ucg.font_helvB18_hf)
    disp:setPrintPos(75, 95)
    disp:print("WLAN")
    disp:setPrintPos(30,160)
    disp:setColor(155,155,255)
    disp:print("THERMOMETER")
    disp:setColor(255,255,255)
    disp:setFont(ucg.font_helvB12_hf)
    disp:setPrintPos(230, 230)
    disp:print("booting...")
end

function i1()
    disp:setRotate90()
    disp:setFont(ucg.font_helvB18_hf)
    disp:setColor(255, 255, 255)
    disp:setPrintPos(100, 35)
    disp:print(date)
    disp:setPrintPos(88, 120)
    disp:drawRFrame(75,55, 180,85, 8)
    disp:setFont(ucg.font_fub42_hf)
    disp:print(hour..":"..min)
    disp:setPrintPos(100,180)
    disp:setFont(ucg.font_helvB12_hf)
    disp:print("Signalstärke: "..quality.." %")
    disp:setPrintPos(100,200)
    disp:print("IP: "..ip) 
end

function i2()
    disp:setRotate90()
    disp:setFont(ucg.font_helvB18_hf)
    disp:setPrintPos(60, 30)
    disp:setColor(255, 255, 255)
    disp:print("Temperaturwerte:")
    disp:setFont(ucg.font_helvB12_hf)
    disp:setColor(155,155,255)
    disp:setPrintPos(95, 53)
    disp:print("Temp1:")
    disp:setPrintPos(100, 113)
    disp:print("Temp2:")
   disp:setPrintPos(95,173)
    disp:print("Temp3:")
    disp:setColor(255,255,255)
    disp:setFont(ucg.font_ncenB24_hf)
    disp:setPrintPos(115, 90)
    --disp:print(t1 .." °C")
    disp:setPrintPos(115,150)
    --disp:print(t2 .." °C")
    disp:setPrintPos(115,210)
    --disp:print(t3 .." °C")
end


-- ESP-01 GPIO Mapping
--Pin 8 scheint nicht geeignet zu sein

fuehl1 = 3
fuehl2 = 8 --10
fuehl3 = 9 --9 
fuehl4 = 10

--Switch für Seitenwechsel
button = 12

function switchcb(level)

  if level == 0 then
    i = i + 1    
  end
  
    print ("Tastendruck: "..level)
    print ("i: "..i)
    disp:clearScreen()
    sendData1()
end

gpio.mode(button, gpio.INT, gpio.PULLUP)
-- Set GPI13 to call our handler on both edges
gpio.trig(button, "up", switchcb)


-- Read Data from DS18B20

function sendData1()
--print(i)
print("Heap: "..node.heap())
require('ds18b20')
--print("Signalstärke: "..rssi)
ds18b20.setup(fuehl1)
t1=ds18b20.read()
if t1 == nil then
 t1 = 0
end
ds18b20.setup(fuehl2)
t2=ds18b20.read()
if t2 == nil then
 t2 = 0
end
ds18b20.setup(fuehl3)
t3=ds18b20.read()
if t3 == nil then
 t3 = 0
end
t1 = string.format("%02.1f",t1)
t2 = string.format("%02.1f",t2)
t3 = string.format("%02.1f",t3)
--print("Temperatur Fühler 1:"..t1.." C")
--print("Temperatur Fühler 2:"..t2.." C")
--print("Temperatur Fühler 3:"..t3.." C")
ds18b20 = nil
package.loaded["ds18b20"]=nil

if i == 3 then i = 1 end
print (i)


if i == 0 then i0() end

if i == 1 then i1() end

if i == 2 then i2() end 
--dofile("akt_values.lua")
end



function init_spi_display()
   -- Hardware SPI CLK  = GPIO14
   -- Hardware SPI MOSI = GPIO13
   -- CS, D/C, and RES can be assigned freely to available GPIOs
   local cs  = 6 -- GPIO12, pull-down 10k to GND
   local dc  = 4 --8 GPIO15
   local res = 11 -- GPIO16 nicht benötigt

   spi.setup(1, spi.MASTER, spi.CPOL_LOW, spi.CPHA_LOW, 8, 8)
   disp = ucg.ili9341_18x240x320_hw_spi(cs, dc, res)
   
   disp:begin(ucg.FONT_MODE_SOLID)
   disp:clearScreen()
   
   disp:setColor(1, 0, 0, 0);
   disp:setColor(0, 0, 0, 0);
end

init_spi_display()

tmr.alarm(3, 5000, 1, function() sendData1() end )
--tmr.alarm(1, 15000, 1, function() dofile ("sendUDP.lua") end )
tmr.alarm(2, 15000, 1, function() disp:clearScreen(); i=i+1  end)


--; dofile("date_time.lua"); wifi.sta.getap(listap)