Kapanadze Cousin - DALLY FREE ENERGY

[Jeg]

My enhanced  PWM version for arduino (see previous Plaxius post)

A0 and A1 pots for Duty cycles 1 and 2
A3 pot for fine frequency
A2 pot for coarse frequency
A4 and A5  3 positions rotary switch for 3 frequency ranges
-----------------------------------------


//Pgm Timing vars
unsigned long previousMillis = 0; // will store last time valuse measured
unsigned long interval = 20; // interval at which to Measure values (milliseconds)
unsigned long currentMillis = 0;
long Fine, Frequency ;

//pwm vars
unsigned pwm1; // Value read from A0 to give PWM duty cycle output in terms of 0-5V
unsigned pwm2;// Value read from A1 to give PWM duty cycle output in terms of 0-5V

void setup()
{
//Set up PWM
  pinMode(9, OUTPUT);
  pinMode(10, OUTPUT);
  pinMode(A0, INPUT);
  pinMode(A1, INPUT);
  pinMode(A2, INPUT);
  pinMode(A3, INPUT);
  pinMode(A4, INPUT_PULLUP);
  pinMode(A5, INPUT_PULLUP);

// clock 1/1
  CLKPR = 128;
  CLKPR = 0;

//phase/frequency correct mode. SELECT THIS FOR INVERTED OUTPUTS.
  TCCR1A = _BV(COM1A1) | _BV(COM1B1) | _BV(COM1B0) ;
}

void loop()
{
unsigned long currentMillis = millis();
if (currentMillis - previousMillis >= interval)
  {
   previousMillis = currentMillis;

   Fine = analogRead(A2);
   Frequency = analogRead(A3);

   if (bitRead(PINC,4) == 0) // switch RANGE closed ?
    {
     TCCR1B = _BV(WGM13) | _BV(CS10) ;  /// clock 1 = high range
     ICR1 = Frequency + Fine / 10 ;
    }

   if (bitRead(PINC,5) == 0)
    {
    TCCR1B = _BV(WGM13) | _BV(CS10) | _BV(CS11); // clock 1/64 = mid range
     ICR1 = Frequency + Fine / 10 ;
    }

   if (bitRead(PINC,4) == 1 && (bitRead(PINC,5) == 1))
    {
     TCCR1B = _BV(WGM13) | _BV(CS10) | _BV(CS12);  // clock 1/1024 = low range
     ICR1 = Frequency * 10 + Fine ;
    }

   if (ICR1<= 1)
    {
     ICR1= 2;
    }

   pwm1 = analogRead(A0); // read duty from A0 for PWM 1
   pwm2 = analogRead(A1); // read duty from A2 for PWM 2

   OCR1A  = map(pwm1,0,1023,0,ICR1); // map the duty cycle to the available steps
   OCR1B  = map(pwm2,0,1023,0,ICR1); //map the duty cycle to the available steps

  }
}

Cheors
What a nice surprise like plaxius's one!!! Thanks a lot for your kind gift! Arduino is a really valuable tool for every experimenter. What are the frequency ranges you are talking about?

[Jeg]

Pepper
I can see your passion my friend. I remember my self for all the sleepless nights when i was thinking that i had the secret in my hands. But you know, in this job only the bench work can prove or disprove your own assumptions. The only thing you have to do is to be objective with your own experimental conclusions. By the time you will see  that OU as Void said is not something easy to be achieved, or else everyone here we would have something to demonstrate.
For me Nelson's device is the real deal, but it is just a waste of time trying to replicate a working device just by assuming how it works. Your experiments have to guide you step by step until reaching Nelson's level or else you will be lost.

Void Very sorry for your scope mate! It is one of my nightmares when thinking that my Rigol could have such a tragic end. I have already destroyed an analog one and three frequency generators until now due to high voltage. Hope your scope wasn't any expensive gear!

[Void]

Void Very sorry for your scope mate! It is one of my nightmares when thinking that my Rigol could have such a tragic end. I have already destroyed an analog one and three frequency generators until now due to high voltage. Hope your scope wasn't any expensive gear!

Thanks Jeg. The scope was not cheap, but it was not a really high end one.
It was a pretty good scope though. It was a Siglent. It was kind of strange how it blew. When
I went to connect the earth ground wire to the negative side of the high voltage cap,
there was a big light blue arc of about 5mm or more from the negative side of the cap to the
earth ground wire, and then the scope display went out immediately. The high voltage driver module
was being powered with a battery, but the scope itself is not isolated from ground, so it may
have been some kind of ground loop back to the scope that caused it to blow out. Not sure... 
Next time I'll make sure I keep the scope probe ground lead earth grounded at all times when
working with really high voltages.

All the best...

[cheors]

Cheors
What a nice surprise like plaxius's one!!! Thanks a lot for your kind gift! Arduino is a really valuable tool for every experimenter. What are the frequency ranges you are talking about?

From 1Hz to 4 MHz.

But of course, the higher the frequency the worst the resolution.
Cannot be used to find a frequency linearly.

[Hoppy]

Hi Void,

I know how it feels. I blew out a channel on my Rigol scope whilst working on the Daly contraption.