From 4062fb5489ce54040866306a2a7bafa88c1551ac Mon Sep 17 00:00:00 2001
From: Christian Zufferey <christian@zufferey.com>
Date: Sun, 9 Sep 2018 19:23:34 +0200
Subject: [PATCH] =?UTF-8?q?-=20yeah,=20j'ai=20enfin=20mes=20pulses=20?=
 =?UTF-8?q?=C3=A0=2038kHz=20pour=20ma=20LED=20IR=20qui=20fonctionne,=20j'a?=
 =?UTF-8?q?i=20utilis=C3=A9=20gpio.serout=20!=20-=20install=C3=A9=20le=20s?=
 =?UTF-8?q?cript=20ir=5Fsend.lua=20dans=20ma=20station=20de=20mesure=20min?=
 =?UTF-8?q?i=20OLED=20afin=20de=20pouvoir=20faire=20des=20tests=20de=20dis?=
 =?UTF-8?q?tance=20sur=20batterie?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 IR/ir_send.lua                                   | 11 -----------
 IR/ir_send1.lua                                  |  2 +-
 IR/ir_send3.lua                                  |  1 -
 IR/ir_send4.lua                                  | 16 ++++++++++++++++
 Minid1 OLED/hauteur_eau/station_display/init.lua |  3 ++-
 Minid1 OLED/hauteur_eau/station_mesure/init.lua  |  3 ++-
 6 files changed, 21 insertions(+), 15 deletions(-)
 delete mode 100644 IR/ir_send.lua
 create mode 100644 IR/ir_send4.lua

diff --git a/IR/ir_send.lua b/IR/ir_send.lua
deleted file mode 100644
index 8403e97..0000000
--- a/IR/ir_send.lua
+++ /dev/null
@@ -1,11 +0,0 @@
--- Petit script pour faire clignoter la LED IR
-
-print("\n ir_send.lua  zf180906.1709  \n")
-
-pin_ir_send = 8
-
-gpio.mode(pin_ir_send,gpio.OUTPUT)
-gpio.write(pin_ir_send,gpio.HIGH)
-pwm.setup(pin_ir_send,50,512)
-pwm.start(pin_ir_send)
-
diff --git a/IR/ir_send1.lua b/IR/ir_send1.lua
index 8403e97..af05680 100644
--- a/IR/ir_send1.lua
+++ b/IR/ir_send1.lua
@@ -1,6 +1,6 @@
 -- Petit script pour faire clignoter la LED IR
 
-print("\n ir_send.lua  zf180906.1709  \n")
+print("\n ir_send1.lua  zf180906.1709  \n")
 
 pin_ir_send = 8
 
diff --git a/IR/ir_send3.lua b/IR/ir_send3.lua
index ee1c587..f048288 100644
--- a/IR/ir_send3.lua
+++ b/IR/ir_send3.lua
@@ -22,4 +22,3 @@ end
 
 sendir_tmr1=tmr.create()
 tmr.alarm(sendir_tmr1, 1, tmr.ALARM_AUTO, pulse_ir)
-
diff --git a/IR/ir_send4.lua b/IR/ir_send4.lua
new file mode 100644
index 0000000..16ddf1f
--- /dev/null
+++ b/IR/ir_send4.lua
@@ -0,0 +1,16 @@
+-- Petit script pour faire clignoter la LED IR à 38kHz
+-- ATTENTION, on utilise ici l'astuce du gpio.serout pour faire la pulse,
+-- car on n'arrive pas avec le gpio.write à faire une pulse plus courte que 400uS
+
+print("\n ir_send4.lua  zf180909.1903  \n")
+
+pin_ir_send = 7
+gpio.mode(pin_ir_send,gpio.OUTPUT)
+gpio.write(pin_ir_send,gpio.HIGH)
+
+function pulse_ir()
+    gpio.serout(pin_ir_send,gpio.LOW,{14,13},38)
+end
+
+sendir_tmr1=tmr.create()
+tmr.alarm(sendir_tmr1, 10, tmr.ALARM_AUTO, pulse_ir)
diff --git a/Minid1 OLED/hauteur_eau/station_display/init.lua b/Minid1 OLED/hauteur_eau/station_display/init.lua
index 7cffbe5..d7ede13 100644
--- a/Minid1 OLED/hauteur_eau/station_display/init.lua	
+++ b/Minid1 OLED/hauteur_eau/station_display/init.lua	
@@ -1,5 +1,5 @@
 -- super mini bootstrap 
-print("\n init_minizf1.lua   zf180828.1825   \n")
+print("\n init_minizf1.lua   zf180909.1901   \n")
 
 tmr.alarm(0, 5000, tmr.ALARM_SINGLE, function()
 
@@ -15,5 +15,6 @@ dofile("wifi_ap_start.lua")
 dofile("telnet_srv.lua")
 dofile("web_oled_minid1.lua")
 dofile("start_demo.lua")
+--dofile("ir_send4.lua")
 
 end)
diff --git a/Minid1 OLED/hauteur_eau/station_mesure/init.lua b/Minid1 OLED/hauteur_eau/station_mesure/init.lua
index 12fc17b..bd82b76 100644
--- a/Minid1 OLED/hauteur_eau/station_mesure/init.lua	
+++ b/Minid1 OLED/hauteur_eau/station_mesure/init.lua	
@@ -1,5 +1,5 @@
 -- super mini bootstrap 
-print("\n init_minizf1.lua   zf180826.1810   \n")
+print("\n init_minizf1.lua   zf180909.1921   \n")
 
 tmr.alarm(0, 5000, tmr.ALARM_SINGLE, function()
 
@@ -14,5 +14,6 @@ disp_oled()
 --dofile("wifi_ap_start.lua")
 --dofile("telnet_srv.lua")
 dofile("start_demo.lua")
+dofile("ir_send4.lua")
 
 end)