AmateurRadio.com

Courtesy of the ARRL:

Several special event stations will be on the air to commemorate the 70th anniversary of D-Day — the Allied invasion of the Normandy Coast of France in World War II.

In France, TM70JUN will be on the air from June 6 — the actual anniversary date — until June 20. Modes will be SSB, CW, PSK, RTTY, and JT65 on HF and 6 meters. Special event station TM70BMC will operate from Mont Canisy June 5-8.

W9D will be active on SSB, CW, and AM on HF through 6 meters June 6-8 from the First Division War Museum in Winfield, Illinois.

VC3JUNO from Canada will be on the air from June 6 until July 31 to commemorate the 70th anniversary of D-Day; “Juno” was the code name for the beach where Canadian forces landed.

The Riverway Amateur Radio Society will sponsor special event station GB70DDL from June 1 until June 28 from the Sea Cadet headquarters in Stafford, England.

On June 6, 1944, 160,000 Allied troops landed along a 50-mile stretch of heavily-fortified French coastline to fight Nazi Germany on the Normandy beaches. The attack was a major turning point in the war. More than 5000 ships and 13,000 aircraft supported the invasion, in which more than 9000 Allied soldiers were killed or wounded.

72 de Larry W2LJ
QRP – When you care to send the very least!

Paul NA5N posted the preliminary results of QRP to the Field 2014 to QRP-L last night.  For the whole enchilada, you can go here: http://www.zianet.com/qrp/qrpttf/2014/ttf.htm

As you can see, W2LJ came firmly in the middle of the pack – a mere mosquito (Skeeter – Hi!) on the butt of the esteemed leaders.  So, rule of thumb ……. if you ever hear me in a QRP Sprint or any other QRP contest – have no fear! I am a Giver Of Points only, and will most likely never threaten your lead.  😉

Oh, and many, many thanks to Paul Harden NA5N for hosting this really fun QRP event year after year and doing all the hard work that it takes to keep something like this running.

72 de Larry W2LJ
QRP – When you care to send the very least!

My Son Nick

Big news!  Tomorrow I will be testing for my Extra ticket…..but the bigger news is that my 16 year old son – Nick – will be testing for his Technician!

At 16 UTC the noise came in on 30 meters. I see often this kind of noise on 30 meters. Nevertheless, I did a good job with WSPR (5W and end fed antenna)

The XYL and my daughter are having fun in Dubai. Yesterday they went into the Dubai dessert. We keep contact with Facetime every night.

161.3 cm 27.0°  347.7 m/s

Ultrasonic distance sensors can find the range out to 2-4 meters and are popular in e.g. robotics. Here I look at how the accuracy can be improved by compensating for the variation of speed of sound with temperature. It actually varies quite a lot in air and around 0 C it is:

      c = 331.3 + 0.606 * T

where c is in m/s and T is in C. The formula is good to up to at least +/-30 C. There is also a dependence of humidity, but as it is so small it is neglected here.

The equation can be analyzed for sensitivity (a little bit of differentation, you know). The result is that a two-way range measurement creates an error of 1.8 mm/C/m. That means that with a 4 degree C error, the deviation will be 14.4 mm at a range of 2 meters. Not a lot, but more than the wavelength which is 9 mm at 40 kHz. Considering how easy it is to compensate for, then why not give it a try?

I have tested this with the inexpensive HC-SR04, but the compensation is really independent of the type of sensor. First let me analyze a typical example code for this sensor:

• For range in cm the code divides elapsed time in microseconds by 29. That corresponds to c=10,000/29=344.8 m/s. According to the equation above, this is the speed for a temperature of 22.3 C.
• For range in inches it divides elapsed time by 74. That corresponds to c=1,000,000/74 =13513.5 inches/sec =1126 feet/sec or 343.2 m/sec. This boils down to an assumed temperature of 19.6 C. That’s 2.7 degrees lower than the calculation for cm and means that the measurement in inches is lower than that in cm by 2.7*1.8 = 4.9 mm per meter of range. 

Temperature is 27.0°, but the program doesn’t use that value and assumes instead its standard value of speed of sound of 344.8 m/s and finds 160.0 cm.

I integrated an HC-SR04 program from Tautvidas Sipavičius with a code from the Arduino playground that uses the DS1820 1-wire temperature sensor (the last program on that page). In the process I had to convert the range estimation from integer to floating point arithmetic. This may give a speed penalty, but at least it runs fine on my Arduino Mega 2560.

The first image in this post shows that at a temperature of 27 C, the speed of sound is 347.7 m/s and the distance from my desk to the ceiling is found to be 161.3 cm. In the picture to the right, I have disabled the temperature compensation so the default velocity of 344.8 m/s is used instead and the estimated distance falls to 160.0 cm.

In the bottom picture, I have detached the 1-wire bus to the temperature sensor, so the program believes it is 0 C, and finds that the range drops to 154.5 cm.

154.5 cm  0.0°  331.3 m/s

Now, the HC-SR04 isn’t the most advanced of sensors. Other sensors may have a more accurate detection circuit that works more reliably and with better repeatability at longer ranges. I should also say that since I admitted a digit behind the decimal point in my code that wasn’t there in the original, my measurements wandered a bit from ping to ping also. In reality, I don’t think the HC-SR04 has much more accuracy than 1 cm. But it may have some potential for improvement as e.g shown here: “Making a better HC-SR04 Echo Locator“.

Combining a better detector with compensation for speed of sound variations with temperature should be what it takes to get the ultimate range sensor.

The Arduino sketch measures the range every 0.1 second and pauses for a second every 10 seconds to measure the temperature. The code is here (formatted with Hilite Me):

/*
 Ultrasound distance measurement with compensation for temperature
 Ultrasound sensor : HC-SR04
 Temperature sensor: DS1820
 LCD:                2 x 16 lines
 Created by merging code from
     http://www.tautvidas.com/blog/2012/08/distance-sensing-with-ultrasonic-sensor-and-arduino/
 and http://playground.arduino.cc/Learning/OneWire (Last program on this page)
 
 Sverre Holm, 30 May 2014
 la3za (a) nrrl.no
*/

#include <Wire.h>
#include <OneWire.h>
#include <LiquidCrystal.h>
LiquidCrystal lcd(8, 9, 4, 5, 6, 7); 
#define LCD_WIDTH 16
#define LCD_HEIGHT 2

#define FIXEDSPEED 0 // turn off temp compensation if == 1

/* Ultrasound sensor */
int pingPin = 12; 
int inPin = 13; 

/* DS18S20 Temperature chip i/o */

OneWire ds(24); // (4.7K to Vcc is required)

#define MAX_DS1820_SENSORS 1
byte addr[MAX_DS1820_SENSORS][8];

int RepeatTemp = 100; // Temp measurement is done every 100*0.1 sec = 10 sec



void setup() { 
  
  lcd.begin(LCD_WIDTH, LCD_HEIGHT); 
  lcd.print("init ..."); 
  
  //delay(1000);

   if (!ds.search(addr[0])) 
   {
     lcd.setCursor(0,0);
     lcd.print("No more addr");
     ds.reset_search();
     delay(250);
     return;
   }
   if ( !ds.search(addr[1])) 
   {
     lcd.setCursor(0,0);
     lcd.print("No more addr");
     ds.reset_search();
     delay(250);
     return;
   }
   
} 

int HighByte, LowByte, TReading, SignBit, Tc_100, Whole, Fract;
char buf[20];

int cntr = RepeatTemp;

void loop() {
  
  // *** Part 1: Measure temperature ***
  //
  byte i, sensor;
  byte present = 0;
  byte data[12];
  
  if (cntr == RepeatTemp)
  {
    for ( sensor=0; sensor<MAX_DS1820_SENSORS; sensor++ )
     {
       if ( OneWire::crc8( addr[sensor], 7) != addr[sensor][7]) 
       {
         lcd.setCursor(0,0);
         lcd.print("CRC not valid");
         return;
       }
  
       if ( addr[sensor][0] != 0x10) 
       {
         lcd.setCursor(0,0);
         lcd.print("Not DS18S20 dev ");
         return;
       }
  
       ds.reset();
       ds.select(addr[sensor]);
       ds.write(0x44,1);         // start conversion, with parasite power on at the end
  
       delay(1000);     // maybe 750ms is enough, maybe not
       // we might do a ds.depower() here, but the reset will take care of it.
  
       present = ds.reset();
       ds.select(addr[sensor]);    
       ds.write(0xBE);         // Read Scratchpad
  
       for ( i = 0; i < 9; i++) 
       {           // we need 9 bytes
         data[i] = ds.read();
       }
  
       LowByte = data[0];
       HighByte = data[1];
       TReading = (HighByte << 8) + LowByte;
       SignBit = TReading & 0x8000;  // test most sig bit -- only for C, not F
       if (SignBit) // negative
       {
         TReading = (TReading ^ 0xffff) + 1; // 2's comp
       }
       Tc_100 = (TReading*100/2);      
  
       Whole = Tc_100 / 100;  // separate off the whole and fractional portions
       Fract = Tc_100 % 100;
       
         if (MAX_DS1820_SENSORS == 1)
         {
            sprintf(buf, "%c%d.%d\337 ",SignBit ? '-' : ' ', Whole, Fract < 10 ? 0 : Fract);
         }
        else
         { 
            sprintf(buf, "%d:%c%d.%d\337C     ",sensor,SignBit ? '-' : '+', Whole, Fract < 10 ? 0 : Fract);
         }   
   
       lcd.setCursor(0,1); //sensor%LCD_HEIGHT);
       lcd.print(buf);     
     }
     cntr = 0;
  }
  //
  // *** Part 2: Measure distance ***
  //
 // establish variables for duration of the ping, 
 // and the distance result in centimeters:
 long duration;
 float cm;
 float c; // speed of sound
 // The sensor is triggered by a HIGH pulse of 10 or more microseconds.
 // Give a short LOW pulse beforehand to ensure a clean HIGH pulse:
 pinMode(pingPin, OUTPUT); 
 digitalWrite(pingPin, LOW); 
 delayMicroseconds(2); 
 digitalWrite(pingPin, HIGH); 
 delayMicroseconds(10); 
 digitalWrite(pingPin, LOW); 
 // Read the signal from the sensor: a HIGH pulse whose
 // duration is the time (in microseconds) from the sending
 // of the ping to the reception of its echo off of an object.
 pinMode(inPin, INPUT); 
 duration = pulseIn(inPin, HIGH); 
 //
 // estimate speed of sound from temperature:
 //
 if (FIXEDSPEED == 1)
 {
   c = 10000.0/29; // Original value for c in code
 }
 else
 {
  c = 331.3 + 0.606*Tc_100/100;
 }
  
 cm = microsecondsToCentimeters(duration, c); 
 
 lcd.setCursor(0, 0);
 for (i = 0; i < LCD_WIDTH; i = i + 1) {
    lcd.print(" ");
  }
 lcd.setCursor(1, 0); 
 lcd.print(cm,1); lcd.print(" cm");  
 
 lcd.setCursor(8, 1);
 lcd.print(c,1); lcd.print("m/s");
 delay(100); // measure range every 0.1 seconds
 cntr++;
 
 } 

float microsecondsToCentimeters(long microseconds, float c) { 
  // The speed of sound is 340 m/s or 29 microseconds per centimeter.
  // -- actually 29 microsec/cm = 10000/29 = 344.8 m/s, ie 22.3 deg C
  // The ping travels out and back, so to find the distance of the
  // object we take half of the distance travelled.
  return microseconds * c / 20000; 
}