Por aqui va un programa Autoit que usa unos ficheros texto de configuración de reglas .nag, que sirven para simplificar el tema de modificar comandos del Arduino sin tener que reprogramar de nuevo ni compilar. Estilo del autoexecute del foro en cuanto a leer archivos .txt configurados con acciones para poder reprogramar usando un "lenguaje nuevo"
http://www.autoitscript.com/forum/topic ... ge__st__40
Ejemplo para el calentador del agua, si la temperatura está por debajo de 60 calentar con el Burner y si esta por encima de 80 parar el burner. También se puede hacer un programa Autoit para controlar el calentador solo en determinadas horas:
Hay que añadir 2 ejecutables del programa de control del arduino con cada fichero.nag de control. (ejecutacalentador.exe ejecutaapagar.exe) en los txts:
Rules_START
0|Water_temp|<|60|||||Burner|=|High|||
1|Water_temp|>=|80|||||Burner|=|Low|||
Código: Seleccionar todo
HotKeySet("F11", "ejecutacalentador") ; f11 calienta el agua en cualquier momento fuera del intervalo
HotKeySet("F10", "ejecutaapagar") ; f10 apaga en cualquier momento
$horadeducharseinicio = 7
$horadeducharsefin = 8
While
While @HOUR > $horadeducharseinicio And @HOUR < $horadeducharsefin
ejecutacalentador() ; llama al programa calentador
WEnd
ProcessClose("ejecutacalentador.exe")
ejecutaapagar() ; llama al programa siempre parado el calentador
While @HOUR < $horadeducharseinicio And @HOUR > $horadeducharsefin
Sleep(100) ;espera que cambie la hora
WEnd
WEnd
Func ejecutacalentador()
If Not ProcessExists("ejecutacalentador.exe") Then Run("ejecutacalentador.exe")
Sleep(1200)
EndFunc ;==>
Func ejecutaapagar()
If Not ProcessExists("ejecutaapagar.exe") Then Run("ejecutaapagar.exe")
Sleep(1200)
EndFunc ;==>
El fichero Nag de ejecutacalentar.exe
Código: Seleccionar todo
NAG FILE V.020
Settings_START
0:DI:Thermostat
1:DO:Valve
2:DI:Valve_feedack
3:DO:Burner
4:DO:Circulator
5::
6::
7::
8::
9::
10::
11::
12::
13::
14:AI:Water_temp
15::
16::
17::
18::
19::
Settings_END
Rules_START
0|Water_temp|<|60|||||Burner|=|High|||
1|Water_temp|>=|80|||||Burner|=|Low|||
2|Thermostat|=|High|AND|Water_temp|>|60|Valve|=|High|||
3|Thermostat|=|Low|OR|Water_temp|<=|60|Valve|=|Low|||
4|Valve_feedack|=|High|||||Circulator|=|High|||
5|Valve_feedack|=|Low|||||Circulator|=|Low|||
Rules_END
Bricolage-autoit ;)