Temp min and max

Maybe even an Ultrasonic or InfraRed distance sensor - for a touchfree solution, just mount it on the top of your tank.

f is a xap.Filter() object and "add" is a method for that Object, it allows you to ADD a filter condition to some Filter that you are constructing.   Filters are use to make sure that your code only triggers when the correct xAP packet is noticed. see http://www.dbzoo.com/livebox/hah_plugboard_v2#filter

See this section about the ":" token.  http://www.lua.org/manual/5.1/manual.html#2.5.8

A call v:name(args) is syntactic sugar for v.name(v,args), except that v is evaluated only once

Try this script, sorry I've had to post it, I couldn't upload it (Brett ??), you will need to change this line   f:add("xap-header","source", "dbzoo.livebox.Controller:1wire.1") to match the temperature sensor you want to monitor :-

--[[

  Monitor a temperature sensor and output the

  maximum and minimum values

--]]

--module(...,package.seeall)

require("xap")

info={

   version="1.0", description="Max-Min Monitor"

}

-- setup some variables

  MinTemp = 999

  MaxTemp = 999

function TempChangeTrigger(frame)

-- We only get to this routine if a temperature change has been triggered

-- Create a local variable and put the current temperature in it

  local CurrTemp = frame:getValue("input.state","text")

-- Initialise the min and max temps if this is the first run

  if (tonumber(MinTemp) == 999) then

    MinTemp = CurrTemp; 

  end

  if (tonumber(MaxTemp) == 999) then

    MaxTemp = CurrTemp; 

  end

-- Do we have a new minimum temperature

  if (tonumber(CurrTemp) < tonumber(MinTemp)) then 

    MinTemp = CurrTemp; 

  end

-- Do we have a new maximum temperature

  if (tonumber(CurrTemp) > tonumber(MaxTemp)) then 

    MaxTemp = CurrTemp; 

  end

-- Debug lines

--  print("MinTemp : " .. MinTemp)

--  print("MaxTemp : " .. MaxTemp)

-- Prepare an xap message to be broadcast

  Msg = " Min: " .. MinTemp .. " - Max: " .. MaxTemp

  displayLCD(Msg)

end

function displayLCD(msg)

-- Send a message to the LCD

   local msg=string.format([[

xap-header

{

class=xAPBSC.cmd

target=dbzoo.livebox.Controller:lcd

}

output.state.1

{

id=*

state=on

text=%s

}]], msg)

   xap.sendShort(msg)

end

function init()

-- print("Max-Min Monitor - init")

-- Create a filter, the conditions needed to call our "action" routine

  f  = xap.Filter()

-- We want a temperature change to trigger our routine

  f:add("xap-header","source", "dbzoo.livebox.Controller:1wire.1")

-- This is the function we call when a match is made to the filters

  f:callback(TempChangeTrigger)

end

xap.init("dbzoo.lua.maxmin","FF01DE00")

init()

xap.process()

Try this second attempt, it exposes two endpoints, see the code.  Let me know how you get on.  It's still a work in progress ;)

Karl

It isn't an applet yet, log in to the HAH cd into the plugboard directory and run it manually :-

cd /etc/plugboard
lua <script name>

I'll convert the current version for you tonight, as is.  I'll then look at trying to make it more flexible, it just might take a while.  What I will do is add more notes into the existing code, and then perhaps you can add your own.

I can put some error checking in place for that sort of thing, the output you provided is very helpful, if you get any other errors just post like that it again,

Thanks

Karl

I think Brett is likely to wince at the code anyway!!

Thanks Brett, I'm getting there slowly.  I'll have a stab at the rolling window, if this is coded correctly I guess the code could be used for both a time frame or entire time.

Ok, here's an Applet, just drop this in the plugboard directory and restart the HAH/plugboard service.

If you read through it, you can see that the time frame is customisable, currently set to 24 hours.  It records any new minimum or maximum temperatures and resets a timer if a new minimum or maximum temperature is recorded.  If after the timeframe no new temperatures have been recorded it sets the minimum and maximum to be the current temperature, as clear as mud I know, but I think it's what you asked for.

Alan, it should also ignore "?" temperatures, although other non-numeric values will cause it to fail.  I need to improve this.  I also need to look at the arrays for multiple sensors, but I though it best to get it working in principle first.

Brett, I've struggled with local and global variables a bit, the code works, but I think I could improve it.  If you could give me some pointers when you get a minute I'd appreciate it, thanks.

Did you remember to alter the sensor you're monitoring?

-- We want a temperature change to trigger our routine
  f:add("xap-header","source", "dbzoo.livebox.dev.Controller:1wire.1")

There is a sensor there, but I've got this on my dev system, so in the middle it says dev, did you take that out ?

  f:add("xap-header","source", "dbzoo.livebox.dev.Controller:1wire.1")

becomes

  f:add("xap-header","source", "dbzoo.livebox.Controller:1wire.1")

Hi All

I've got an outside weather-station and I'd like to min-max the temp - what do I need to change the statement .....

-- We want a temperature change to trigger our routine
  f:add("xap-header","source", "dbzoo.livebox.CurrentCost:temp")

For the following ....

xAPSource = sanday.cumulus.ASROCK

xAPClass and xAPSection = weather.report

key = TempC

Thanks in advance

;-) EJ

Using XFX this is what a xAP message looks like from the device that you might want to monitor.  So cut and paste the source into the code, and that should be it.

xap-header
{
v=12
hop=1
uid=FF00DB80
class=xAPBSC.event
source=dbzoo.livebox.Controller:1wire.1
}
input.state
{
state=on
text=24.4
displaytext=HAH-Temp 24.4
}

-- We want a temperature change to trigger our routine
  f:add("xap-header","source", "dbzoo.livebox.CurrentCost:temp")

-- We want a temperature change to trigger our routine
  f:add("xap-header","source", "dbzoo.livebox.Controller:1wire.1")

OK, you're going to need to change two things.  your source is "sanday.cumulus.ASROCK", but you also need to change some other parts of the code.  Get the maxminApplet.lua script and look for these lines :-

-- Create a local variable and put the current temperature in it
  CurrTemp = frame:getValue("input.state","text")

Now you need to change the getValue statement to get the name of the value you want, so change "input.state" to "weather.report", this is the section it's getting the value from, and change "text" to "TempC".

That should do it.

Hi... now getting

Loading /etc/plua: variable 'CurrTemp' is not declared
stack traceback:
    [C]: in function 'error'
    /usr/share/lua/5.1/pl/strict.lua:40: in function </usr/share/lua/5.1/pl/strict.lua:38>
    (tail call): ?
    /etc/plugboard/MinMaxTempApplet.lua:36: in function 'callback'
    /usr/share/lua/5.1/xap/init.lua:392: in function 'dispatch'
    /usr/share/lua/5.1/xap/init.lua:97: in function 'fun'
    /usr/share/lua/5.1/pl/list.lua:360: in function 'foreach'
    /usr/share/lua/5.1/xap/init.lua:96: in function 'callback'
    /usr/share/lua/5.1/xap/init.lua:203: in function 'dispatch'
    /usr/share/lua/5.1/xap/init.lua:117: in function 'process'
    /etc/plugboard/plugboard.lua:73: in main chunk
    [C]: ?
lugboard/MinMaxTempApplet.lua     [ Max-Min Monitor ]

EJ

It looks exactly  like your snippet....

The source is the latest download....

I see exactly what's written above...

Sorry...

EJ

Whoda thought it?  Blinkin' case sensitive in one location but not in another....I'll keep that one in the bag of eternal delights!

It works!  lower case !!!!!

Thanks

I can now see max and min temperatures from my outdoor weather station.....just a cool 1.2C at present, but I've a feeling it'll get much chillier later.....

EJ

Humm..that sounded a bit snippy...sorry guys, I realise that you can't be held responsible for other coder's prediliction for Upper and Lower case variable names......!

Got down to -0.4C last night.....cool!....... ;-) EJ