CC-Basic

Hallo Manfred,


'Programmanfang

Define Kollektorsensor AD[1]
Define Speichersensor AD[2]
Define Ladepumpe Port[1]
Define Kollektortemperatur word[1]
Define Speichertemperatur word[2]
Define Ein -1
Define Aus 0


#Kollektorsteuerung

Looktab Temperatur, Speichersensor, Speichertemperatur
Looktab Temperatur, Kollektorsensor, Kollektortemperatur

if Kollektortemperatur > Speichertemperatur + 80 then Ladepumpe = Ein
if Kollektortemperatur < Speichertemperatur + 40 then Ladepumpe = Aus

goto Kollektorsteuerung
end

'die folgende Tabelle sollte 255 Einträge haben in denen zum Wert des
'AD Wandlers die entsprechende Temperatur hinterlegt ist.
'Mit Looktab wird in der Tabelle nach dem Wert gesucht.
'z.B. Table Temperatur'-270 -265 -260 ....... 990 995 1000
'Du kannst dann eine Temperatur von ca -27 bis + 100°C in 0,5K
'Schritten abdecken oder -50 bis +205°C in 1,0K Schritten, oder
oder..
'Die Tabelle ist von deinem Verwendeten Sensor(Messberiech und
'Versärkung) abhängig.

Table Temperatur 205 210 215 220 225 230 235

'oder Z.B. wenn die Tabelle Kty10.tab zur verfügung steht:
'Table Temperatur "Kty10.tab"


'Programm Ende


ich habe es jetzt nicht ausprobiert, aber so in etwa könnte es
funktionieren.



oder frag mal auf diesen Seiten nach : http://ccintern.dharlos.de


mfg Jürgen

Hallo Manfred,

das Programm im Anhang sollte dir weiterhelfen.

MFG Jürgen

Evtl. ist nur die Temperaturtabelle zu kurz??

Hallo Martin,
die Tabelle im Anhang des zweiten Posts(Solarsteuerung.bas) müsste die
richtige Länge haben.