CC-Basic

[Manfred H. (mantig)]

Hallo,  ich schaffe es nicht in CC-Basic für die M-Unit ein
Differenzberechnung für meine Kollektoranlage zu schreiben.
Zum Beispiel wenn der Kollektor um 8°C größer als der
Speicher ist, dann sollte die Pumpe eingeschaltet werden.
Wer kann mir da helfen. Bedanke mich im voraus. Manfred

[Jürgen C (Gast)]

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

[Jürgen C (Gast)]

Hallo Manfred,

das Programm im Anhang sollte dir weiterhelfen.

MFG Jürgen

[Martin Schneider (Gast)]

Evtl. ist nur die Temperaturtabelle zu kurz??

[Jürgen C (Gast)]

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