Translate


Busan 2001-2017



Regnkalkylator







Status

    18:e Oktober 2018

Kalender

« Oktober 2018 »
M T O T F L S
1 2 3 4 5 6 7
8 9 10 11 12 13 14
15 16 17 18 19 20 21
22 23 24 25 26 27 28
29 30 31

Dagens Namn

Arkiv

Senaste Cachar

2018-07-11 #816
Pataholm
Av : Nevyn2012

2018-07-06 #815
Oskars kyrka
Av : Anders o inger

2018-07-06 #814
Gamla kyrkväge...
Av : Ripan

2018-07-06 #813
Brömsehus
Av : Canonym

2018-05-30 #812
Ödevata FTF
Av : Oscarsundas

2018-05-16 #811
Kattrumpan
Av : Helensfamily

2018-04-18 #810
Träna mera!
Av : Valkyria09

2018-04-13 #809
Svartbäcksmål...
Av : Saibotb

2018-04-13 #808
Dammen
Av : Saibotb

2018-04-13 #807
Avkopplingsplat...
Av : Ripan

Idag 2008

2008-10-18 #13
Calmare nyckel
Av : Anders o Inger

2008-10

2008-10-04 #9
Årtebäckskvar...
Av : Vidkund

2008-10-10 #10
S:t Sigfrieds k...
Av : Anders o Inger

2008-10-11 #11
vargstenen
Av : Ulfheim

2008-10-12 #12
Pestens tid
Av : Izzor

2008-10-18 #13
Calmare nyckel
Av : Anders o Inger

2008-10-23 #14
Bottorp
Av : Ulfheim

2008-10-24 #15
Mokällan
Av : dohco

2008-10-25 #16
Waterpower 2
Av : Granlund

2008-10-28 #31
Mr Bogislav Sto...
Av : Anders o Inger

2009-10

2009-10-01 #126
Kvarnholmen UWa...
Av : izzor

2009-10-04 #127
Hold yours hors...
Av : ripan

2009-10-04 #128
Madesjö kyrka
Av : ripan

2009-10-04 #129
Kingdom of Crys...
Av : ripan

2009-10-15 #130
Sandsjön
Av : Ripan

2009-10-23 #131
The Hospital
Av : Granlund

2010-10

2010-10-12 #156
Crash and kart
Av : pjansberg

2010-10-12 #158
Stensö kanal
Av : 3wahlarna

2011-10

2011-10-15 #374
The maze
Av : Anders o Inger

2011-10-15 #375
Strömsrum 1
Av : Himmelskimmer

2011-10-16 #376
Älgasjön
Av : Ripan

2011-10-16 #377
#1 The one with...
Av : Pretty Saro

2011-10-19 #378
Mulle i skogen
Av : Ulfheim

2011-10-22 #379
Älghults kyrka
Av : Ripan

2011-10-22 #380
Pippi Långstru...
Av : Flici

2011-10-23 #381
Ödevata
Av : Boul

2012-10

2012-10-06 #550
Sandbergen
Av : Tinsun68

2012-10-16 #551
Bron över Ljun...
Av : Bmwkmt

2012-10-27 #552
Fiskeplats
Av : Joppen13

2012-10-29 #553
Bron över Ljun...
Av : Bmwkmt

2014-10

2014-10-12 #665
Milstenen
Av : Ripan

2014-10-26 #666
Kastlösa Info
Av : Stibar

2014-10-26 #667
Smedby kyrka
Av : Istlemin

2014-10-26 #668
Stora smedby
Av : Istlemin

2014-10-26 #669
Kvarnen i smedb...
Av : Istlemin

2014-10-26 #670
Gräsgårds Ham...
Av : Stibar

2014-10-26 #671
Gammalsby sjöm...
Av : Stibar

2014-10-29 #672
Hövdingen #4
Av : Rådaåsen

2015-10

2015-10-03 #709
Bröms 1
Av : Joonte

2015-10-05 #710
Nybygget Wärna...
Av : Palmer

2015-10-31 #711
Stenbron i Sjö...
Av : Stibben1

2015-10-31 #712
Derasjö Reborn
Av : Joppen13

2017-10

2017-10-03 #792
Orranäsasjön ...
Av : Carasp

2017-10-03 #793
Hålldammen
Av : Ripan

2017-10-03 #794
Orrefors Lake
Av : Dolly112

2017-10-03 #795
Gökboet
Av : Joppen13

2017-10-07 #796
Stenen i kurvan
Av : Stibben1

2017-10-15 #797
Alsterån
Av : 19kerstin90

2017-10-15 #798
Mitt i Alsterbr...
Av : 19kerstin90

2017-10-26 #800
Petroleum Tango...
Av : Valkyria09

2017-10-27 #799
Anslagstavlorna
Av : N00bg0d

Administratör

Bookmark and Share
Den 22:e Januari - 2017

Har haft ett par 433mhz sändare/mottagare liggandes sen länge men aldrig använt dom.
Tänkte jag skulle testa och se hur dom fungerar.

Hittade en lämplig antenn som jag lödde dit på sändarmodulen.



Mottagaren:



Modifierade koden till Arduinon som läser av alla tempmätare (7 stycken).
Just nu skickar jag bara ute tempen från givare 1 till en början.





Ser ut som om det fungerar.. Är en 1 grad ute just nu. Frågan är vad som händer när det är minus ute.
Fortsättning följer.

Tack till "Markus Ulfberg" som fick mig att fatta hur jag skulle tolka indatat.

Koden till mottagaren:
#include <VirtualWire.h>
#define RX_PIN 4

int times = 0;
long lasttime = 0;

void setup()
{
Serial.begin(9600);

vw_set_rx_pin(RX_PIN);
vw_set_ptt_inverted(true);
vw_setup(2000);
vw_rx_start();
}

void loop()
{
unsigned long currenttime = millis();

uint8_t buf[VW_MAX_MESSAGE_LEN];
uint8_t buflen = VW_MAX_MESSAGE_LEN;

if (vw_get_message(buf, &buflen))
{
char Sensor1CharMsg[4] = "";
long totaltime = (currenttime - lasttime) / 1000;
int i = 0, Sensor1Data = 0;

lasttime = millis();

for (i = 0; i < buflen; i++) Sensor1CharMsg[i] = char(buf[i]);

Sensor1CharMsg[buflen] = '\0';
Sensor1Data = atoi(Sensor1CharMsg);

Serial.print("Temp : ");
Serial.print(Sensor1Data);
Serial.println(" C");

if(times)
{
Serial.print(totaltime);
Serial.println(" seconds since last update.");
}

times++;
}
}
Arduinon postar värden varje minut, så jag verkar missa en del.



Den 22:e Januari - 2017

Gjorde en funktion och postar alla temp. givare.
Transmit_Data((int) round(TempC_1), 1);
Transmit_Data((int) round(TempC_2), 2);
Transmit_Data((int) round(TempC_3), 3);
Transmit_Data((int) round(TempC_4), 4);
Transmit_Data((int) round(TempC_5), 5);


Vilket ger följande:



Sensor 6 är utblåset i luftvärmepumpen, och 7 är tempen brevid pumpen. 1:an är utegivaren.

Värdena verkar trilla in väldigt sporadiskt, men förr eller senare så har jag fångat alla givarna.
Ska fixa koden så att tiden för uppdateringen motsvarar respektive givare.

Den 23:e Januari - 2017

Att få ut något vettigt från sändarn var inte det enklaste. Ändrade fördröjningen för varje givare
till 2 sekunder så mottagaren skulle hinna med.

I stället för:
sprintf(Send_Temp, "%d-%d", sender_id, send_data);
Som kunde ge "1-20". Så var det enklare att skicka allt som ett enda heltal.
sprintf(Send_Temp, "%d%d", sender_id, send_data);
Vilket ger "120" som är enklare att omvandla. Lär ju aldrig ha mer än 9 givare totalt.

Mottagar koden som den ser ut just nu. Fick omvandla datat tre gånger innan jag fick ut ett heltal.
#include <VirtualWire.h>
#define RX_PIN 4

long lasttime = 0;

void setup()
{
Serial.begin(9600);

vw_set_rx_pin(RX_PIN);
vw_set_ptt_inverted(true);
vw_setup(2000);
vw_rx_start();
}

void loop()
{
unsigned long currenttime = millis();

uint8_t buf[VW_MAX_MESSAGE_LEN];
uint8_t buflen = VW_MAX_MESSAGE_LEN;

if (vw_get_message(buf, &buflen))
{
char Sensor1CharMsg[5] = "", Value[5] = "", Sensor[5] = "", Temp[5] = "";
int Real_Temp = 0, Real_Sensor = 0, i = 0, Sensor1Data = 0;
long totaltime = (currenttime - lasttime) / 1000;

lasttime = millis();

for (i = 0; i < buflen; i++) Sensor1CharMsg[i] = char(buf[i]);

Sensor1CharMsg[buflen] = '\0';
Sensor1Data = atoi(Sensor1CharMsg); // Gör ett heltal av all mottaget data.
itoa(Sensor1Data,Value,10); // Gör en sträng av mottaget data.

sprintf(Sensor, "%c\0", Value[0]); // Filtrera ut vilken givare som skickat data.
sprintf(Temp, "%c%c\0", Value[1], Value[2]); // Filtrera ut tempen.

Real_Temp = atoi(Temp); // Gör om Tempen till ett heltal.
Real_Sensor = atoi(Sensor); // Gör om givare till ett heltal.

Serial.print("Sensor : ");
Serial.println(Real_Sensor);
Serial.print("Temp : ");
Serial.print(Real_Temp);
Serial.println(" C");
Serial.print(totaltime);
Serial.println(" seconds since last update.");
Serial.println("");
}
}
Kommentera gärna.

Den 23:e Januari - 2017

Lyxade till det lite och namngav givarna.
char* Sensor_Name[] = {"Hell", "Outside 1", "Outside 2", "Cellar", "Hallway",
"Attic", "Pump Out", "Pump In"};
---
Serial.print(Sensor_Name[Real_Sensor]);



Men varför ramlar värdena in så sporadiskt? Mätte tiden det tar för mottagaren att processa
ett värde.. 1-2 millisekunder.. Arduinon i källarn skickar max ett värde varannan sekund.

Sensor : 6 (Pump Out) Temp : 47 C
41 seconds since last update. This took 1.00 milliseconds to execute.
Men efter 77 sekunder så hade alla givarna rapporterat in. Så det är väl ok antar jag.
1
1
1
1
0
1
1

Total run time 75 seconds.

1
1
1
1
1
1
1

Total run time 77 seconds
Nästa försök gick inte lika bra.

1
1
1
1
1
1
1

Total run time 814 seconds.
Inte nästa heller.. Fast jag ökat sänd intervallen till 4 sekunder.
1
1
1
1
1
1
1

Total run time 317 seconds.



Den 24:e Januari - 2017

Måste få ut sändarn lite från väggen.



Lödde på 2 meter telefonkabel plus en lysdiod så man ser när den arbetar.
Verkade inte påverka räckvidden någonting.

Just nu så kör bara Arduinon en loop som checkar mottagaren.
Knappast användbar till något annat just nu.. Hittade en intressant funktion som kollar i fall någonting kommit in. Har det det gjort det så kör vi nått annat tills det trillar in nåt.





Ett avbrott i koden på 65 millisekunder (0.065 sekunder).

Men då trixade o fixade jag ju med en massa annat också. Strippar man koden och plockar bort all debug info så lär tiden sjunka till hälften.



Den 24:e Januari - 2017

Allt funkar stabilt som tusan. Dacks att börja göra nåt med kul det.





Min "friendly clock" ide' fick nya höjder.

Sätta alarmet på klockan efter tempen ute? Varna om luftvärmepumpen stannar? Visa aktuell strömförbrukning?

Tänkte bygga något som samlar ihop all data om Temperaturer, Luftfuktighet, lufttryck, Vindhastighet
som jag samlar och visar det på ett snyggt sätt.

Den 25:e Januari - 2017

En sändare till fixad plus klockmodulen med alarm sirenen.



Version 2:



Den 26:e Januari - 2017

Givetvis så sket det sig vid minus grader. Var det under 0:an så blev det alltid 0 grader.
Sensor : 1 (Outside 1) Temp : 0 C
74 seconds since last update. This took 3.00 milliseconds to execute.
Tillbaks till ritbordet.
Fick Ändra lite på sändarkoden. La till ett värde.. "0" = Minus och "1" = Plus.

if(TempC_5 < 0) Transmit_Data((int) round(TempC_5), 5, 0);
else Transmit_Data((int) round(TempC_5), 5, 1);
Och konvertera värdet att alltid vara ett positivt.
void Transmit_Data(int send_data, int sender_id, int negpos)
{
sprintf(Send_Temp, "%d%d%d", sender_id, negpos, abs(send_data));

vw_send((uint8_t *)Send_Temp, strlen(Send_Temp));
vw_wait_tx();
}
Enklaste sättet att konvertera till minusvärde måste vara:
if(Real_NegPos == 0) Real_Temp = Real_Temp - Real_Temp - Real_Temp;
Så nu visas korrekt plus/minus.
Sensor : 1 (Outside 1) Temp : -4 C
74 seconds since last update. This took 3.00 milliseconds to execute.
En liten bieffekt blev att jag kan både få "+0" och "-0". Laugh



All data skickas nu två ggr. Så nu uppdateras alla givare inom 10 minuter.
Har ~30 sek. kvar i cyclen innan data måste postas till webservern, så jag skulle kunna skicka det
3 ggr. Men det duger så länge.

Den 27:e Januari - 2017

Alias ärke och jag tog en runda till biltema efter jobbet i dag.



Letade efter en låda för min "Friendly Clock 2.0".. Trodde inte displayen skulle få plats i denna. Men
det visade sig att det kommer bli kloppeti.

Det som är kvar är att få till barometern som visar lufttrycket, och kanske en temp. givare + luftfuktighetsmätare där den står.

Har ju en DHT21:a liggandes.. Så efter lite pulande..
int DHT_get_moist(void)
{
int moist = round(dht.readHumidity());
return(moist);
}

int DHT_get_temp(void)
{
int temp = round(dht.readTemperature());
return(temp);
}


sprintf(string, "- Luftfuktighet %d - Temp %d C - ", DHT_get_moist(), DHT_get_temp());


Den 28:e Januari - 2017

Kompletterade med en barometer för att kunna läsa av lufttrycket.



Och vindmätarn så klart..



Kan inte komma på fler saker som jag vill mäta eller visa.

Den 30:e Januari - 2017

Bakslag.. La hela kvällen på att försöka fixa till en Nano i stället för en Mega.
Nanon kostar typ 10:-. Megan 60:- kanske.





Visade sig att Nanons minne inte räckte till.. Bla musiken och alla bibliotek för givarna sög musten ur den.
Och jag vill kunna presentera mer data eller häkta på fler givare än jag har nu.
En bortkastad kväll..



Tillbaks till ruta 1 igen.
Sitter o funderar på om jag ska skita i radion och bara använda ett nätverkskort. Med Megan så
har jag hur många portar som helst att leka med.
Och då kan jag plocka precis vilken data jag vill.. I realtid dessutom..

Den 3:e Februari - 2017

Rätt coolt med gamla analoga mätare. Eftersom jag satte en sändare i källaren så kan jag
snappa upp signalen i hela huset.

Slängde ihop ännu en mottagare.



Visar tempen i hallen (vänster) och vad luftpumpen ligger på i effekt för tillfället (höger) .

Den 4:e Februari - 2017

Dax att börja med lådan.


Fasen att min "dremel" vände vitbuk.. Hade varit så mycket enklare med den.



Färdigt hål.




Den 5:e Februari - 2017

Färdig.. Friendly Clock 2.0.. > 700 rader kod senare.


Visar temperaturer/luftfuktighet utomhus, källarn, uppe, och på vinden + antal dagar till lön.
Eller citat från skogstok om dagarna till lön är < 7.

Varnar om pumpen inte ger tillräcklig effekt, om barometern visar på oväder, eller om vindhastigheten
är hög.

Blinkar blått om det är minusgrader ute varje sekund.

Spelar en truddelutt från "Mario Bros." varje hel och halvtimme.
Undrar vad nästa projekt blir..

Den 6:e Februari - 2017

OK.. Så nu har jag en pryl på väggen som kan visa precis vad jag vill..

Enkel påminnelse för sophämtning kanske?

Skapa en tvådimensions array på månader * dagar.
int Calendar[12][31] = {};
Fyll dagarna som ksrr kommer med 1:er.
Calendar[1][7] = 1;
Calendar[1][21] = 1;
Calendar[2][7] = 1;
Calendar[2][21] = 1;
Calendar[3][7] = 1;
Calendar[3][21] = 1;
Calendar[4][4] = 1;
Calendar[4][18] = 1;
Calendar[5][2] = 1;
Calendar[5][16] = 1;
Calendar[5][30] = 1;
Calendar[6][13] = 1;
Calendar[6][27] = 1;
Calendar[7][11] = 1;
Calendar[7][25] = 1;
Calendar[8][8] = 1;
Calendar[8][22] = 1;
Calendar[9][5] = 1;
Calendar[9][19] = 1;
Calendar[10][3] = 1;
Calendar[10][17] = 1;
Calendar[10][31] = 1;
Calendar[11][14] = 1;
Calendar[11][28] = 1;
Calendar[12][12] = 1;
Calendar[12][26] = 1;
Kolla dagens datum +1 och skriv ut på ledremsan.
if (Calendar[month()][day()+1] == 1)
{
sprintf(string,"%sSophamtning i morrn!%s", Fill, Fill);
printStringWithShift(string, very_high_speed);
}
Finns säkert smidigare sätt, men detta var nog det enklaste.

Sen kan man väl lyxa till det lite och göra en kalender som funkar på allt.
int Calendar[12][31] = {};
char* Calendar_Desc[12][31] = {};

Calendar[9][19] = 1;
Calendar_Desc[9][19] = "I morrn fyller Kattfaen ar";

if (Calendar[month()][day()+1] == 1)
{
sprintf(string,"%s%s%s", Fill, Calendar_Desc[month()][day()+1], Fill);
printStringWithShift(string, very_high_speed);
}
Eller bara sätta beskrivningen och kolla om värdet är satt borde också funka.
Calendar_Desc[9][19] = "Kattfaen fyller ar.";

if (Calendar_Desc[month()][day()+1])
{
sprintf(string,"%sI morgon: %s%s", Fill, Calendar_Desc[month()][day()+1], Fill);
printStringWithShift_NO(string, very_high_speed);
}
else if (Calendar_Desc[month()][day()])
{
sprintf(string,"%sI dag: %s%s", Fill, Calendar_Desc[month()][day()], Fill);
printStringWithShift_NO(string, very_high_speed);
}
Får bli det sista...



Den 6:e Februari - 2017

Med kalender och påminnelser.





Den 13:e Februari - 2017

Över 1200 rader kod senare...
Projekt "Friendly clock" ser sitt slut. Kan inte komma på mer info jag vill samla eller visa.

Varnar vid hög vindhastighet.
Varnar om barometertrycket faller >= 6 mb inom en timme.
Varnar om barometern visar regn eller snö.
Varnar om luftpumpen inte ger tillräcklig effekt/stannat.
Varnar om internet ligger nere.
Varnar om utetempen sjunker >= 5 C inom en timme.

Visar högtider och viktiga dagar som sophämtning, födelsedagar tex.
Visar Temperaturer ute, i källarn, uppe, och på vinden.
Visar luftfuktighet i källarn, uppe och på vinden.
Visar barometertryck nu och förra timmens.
Visar alla senaste värden och alla föregående så man kan se om dom höjs eller sjunker.
Visar max/min värden på ute/inne tempen per månad.
Visar luftpumpens uteffekt i procent + In/ut temp till pumpen och diffen mellan de båda.
Visar max/min barometer tryck per månad.
Visar slumpade citat från skogstok :-)
Visar dagar kvar till lön, om dagar < 5 :-)

Displayen dimmas och högtalaren/sirenen stängs av på natten så den inte stör.
Blinkar grönt eller blått varje sekund för +/- grader ute, eller rött vad larm.
Sparar alla data till minnet så den tål en omstart.
Varje hel/halv timme så spelar den en truddelutt från mario bros.
Month 2
Coldest month out 1-
Warmest month out 0+
Coldest month In 18
Warmest month In 22
Airpump 100 %
Last Barometer 1038
Barometer Now 1038

Tomorrow: Alla hjartans dag

Sensor 1 = -1
Sensor 2 = +0
Sensor 3 = +9
Sensor 4 = +23
Sensor 5 = +5
Sensor 6 = +48
Sensor 7 = +24
Sensor 8 = +70
Sensor 9 = +52



Den 28:e Februari - 2017

Tillbaks på file' bänken.



För nostalgikänslan och imponansvärdet.



Visar ute tempen till vänster och till höger antingen luftpumpens effekt (om vinter) eller luftfuktigheten i källarn (om sommar).

Gjorde väl 10-20 andra ändringar och justeringar också, så nu känner jag mig snart nöjd med den.
Got fake transmit! (172)

21:38 - Sensor : 9 (Attic HUM) Value : 51
63 seconds since last update. 000000001
Får mycket skräp tillbaks.. Men det Har nog mest att göra med avståndet och störningar.


Den 1:e Mars - 2017

Fixade lite konstigheter och bytte mätarn. Det gröna matchar pumpens ut temp. Och skalar passar
rätt bra för att visa luftfuktigheten i källarn.



Kärlek.. cool Saknas bara nån snygg inramning. Ekorrehjulet har snurrat ett 305:e dels varv till.

Den 5:e April - 2018

Vindvarnararen till min "Friendly-Clock" fick nya vingar.
Kina plast och sol verkar inte trivas ihop.





Bonusbild.. Granlund von der heest (Alias Ärke) in action.



Comments powered by Disqus
A CkWare Production. Copyright 1996 - 2018. NightMode - Where Do You Wanne Sleep Tonight?
Sidan tog 0,51 sekunder att skapa.