Een nijlpaard met een sik, had wekenlang de hik.
Hij zei: “Kijk mij, ik ben zo lekker dik”.
Doe je handen omhoog, doe je handen omlaag.
Doe je handen omhoog, doe je handen omlaag.

Een vogeltje dat vloog, gleed langs de regenboog.
Hij zei: “Kijk mij, ik ben zo lekker hoog”.
Doe je handen omhoog, doe je handen omlaag.
Doe je handen omhoog, doe je handen omlaag.

Een dikke chimpansee, die kreeg een goed idee.
Hij zei: “Kijk mij, doe allemaal maar mee”.
Doe je handen omhoog, doe je handen omlaag.
Doe je handen omhoog, doe je handen omlaag.

Click here to view the video on YouTube.

Click here to view the video on YouTube.

Ons 19 inch scherm van Medion doet ‘t niet meer. Na een hele lange tijdje wachten doet hij het soms nog wel, na honderden keren uit-en aanzetten.
Heb haar vanochtend open geschroefd: en raad eens? Een aantal elco’s staan bol, gelukkig nog niet lek of ontploft. Goedkope rommel uit China dus.

Conrad is inmiddels bezig met de levering van 9 elco’s. Ben voor een wat hogere capaciteit gegaan en neem nu de Low ESR’s van Yageo, deze zijn beter dan SamWah, CapXon, Rudycon, KZC serie van United Chemicon, Teapo, Xunda, RaxWah… zeggen ze…

Update: De Elco’s zijn er in gesoldeerd. Omdat ik 35V ipv 25V had besteld en een iets grotere capaciteit heb gekozen zijn ze iets groter, het past er net in… En… hij doet ‘t weer prima!

FUNCTION FC370_DAYOFYEAR : INT
TITLE= 'FC370_DAYOFYEAR'
NAME : DAYOFYR
FAMILY : PROCESS
AUTHOR : VMI_JFO
 VERSION : '1.0' //Jfo - 29 juni 2011: This function calculates the number of the day of the year.
 // This will generate 1-365 for normal years, and 1-366 for leap years.
 // NOTE: this will work until year 2100! Year 2100, 2200, 2300... are NOT leap years!
VAR_INPUT
END_VAR

VAR_TEMP
 Err_ReadDate : INT; // error code return

 tmpDATE : DT; // time structure
 current_DT AT tmpDATE: ARRAY[1..8] OF BYTE; // array for access to time structures

 zdn : INT; // help variable
 year : INT; // year, format: ?? (19XX - 20XX)
 num_of_month : INT; // number of month, jan -1, feb -2,...
 day_of_month : INT; // no comments 
 day_of_week : INT; // !!! sun -1, mon -2, tus -3,..., .

 days : ARRAY[1..12] OF INT; // array with number of days of all months

 i : INT;
 numberofdays : INT;

 result_INT : INT;
 result_REAL : REAL;
END_VAR

BEGIN

 Err_ReadDate := READ_CLK( CDT := tmpDATE); // Getting of current date
 year := WORD_TO_INT(SHR(IN:=current_DT[1],N:=4))*10 + WORD_TO_INT(current_DT[1] AND 16#0F); // calculation of year
 num_of_month := WORD_TO_INT(SHR(IN:=current_DT[2],N:=4))*10 + WORD_TO_INT(current_DT[2] AND 16#0F); // calculation numb of month
 day_of_month := WORD_TO_INT(SHR(IN:=current_DT[3],N:=4))*10 + WORD_TO_INT(current_DT[3] AND 16#0F); // calculation of day
 day_of_week := WORD_TO_INT(current_DT[8] AND 16#0F); // calculation day of week

 //---------------------------------------------------------------------------
 // Fill in the number of days of the months
 //---------------------------------------------------------------------------
 days[1] := 31; //jan
 days[2] := 28; //feb (note: leap year day will be added further...)
 days[3] := 31; //mrt
 days[4] := 30; //apr
 days[5] := 31; //may
 days[6] := 30; //jun
 days[7] := 31; //jul
 days[8] := 31; //aug
 days[9] := 30; //sep
 days[10] := 31; //oct
 days[11] := 30; //nov
 days[12] := 31; //dec

 //---------------------------------------------------------------------------
 // Leap year? If it is a leap year then we have to add 1 extra day for month february.
 //---------------------------------------------------------------------------
 result_INT := year / 4;
 result_REAL := INT_TO_REAL(year) / 4;

 IF result_REAL - INT_TO_REAL(result_INT) = 0 THEN
 days[2] := days[2] + 1; //feb
 END_IF;

 //---------------------------------------------------------------------------
 // Calculate number days of previous months.
 //---------------------------------------------------------------------------
 numberofdays := 0;
 FOR i:= 1 TO num_of_month - 1 BY 1 DO
 numberofdays := numberofdays + days[i];
 END_FOR;

 //---------------------------------------------------------------------------
 // Calculate number days of current months.
 //---------------------------------------------------------------------------
 numberofdays := numberofdays + day_of_month;

 //---------------------------------------------------------------------------
 // Move result to the output.
 //---------------------------------------------------------------------------
 FC370_DAYOFYEAR := numberofdays;
END_FUNCTION

Hij zegt als hij naar buiten kijkt:
zeg weet wat je wat ik doe?
Hoewel het twintig graden vriest
ga ik naar buiten toe.

En zonder jas en zonder das
stapt hij dan in de kou.
Eerst wordt hij wel een beetje rood
maar daarna prachtig blauw.

En als de koningin daarna
naar buiten toe wil gaan.
Dan ziet ze – rillend op het gras
een blauwe sneeuwpop staan.

Ze snapt niet wat er is gebeurd.
Ze weet niet hoe dat kan.
Maar gilt als ze wat beter kijkt:
o jee – dat is mijn man!