Come gestire un Inverter Grid Tie- pagina 12 Mobile - Solare Fotovoltaico

Solare Fotovoltaico
Come gestire un Inverter Grid Tie
VISUALIZZA L'ALBUM

Pag: (30) < ... 9 10 11 [12] 13 14 15 ...> (Ultimo Msg)

FinePagina

supersolar
KiloWatt

Utente
Msg:272

Stato:

Inviato il: 30/6/2013,22:24

Per quanto mi riguarda le foto le posso postare nel weekend poichè saro' fuori tutta la settimana.
X Elettroshock: Le domande sono rivolte a me?

marpad65
KiloWatt

Utente
Msg:230

Stato:

Inviato il: 30/6/2013,22:25

appena mi è possibile le faccio e le pubblico ... comunque il pic è in una scheda a parte .. è inserita nello stampato completamente ricoperto di vernice ...

una foto la trovi qui, ultima pagina .. questo è il 600 ma cambia di poco
http://powerjack888.blogspot.it/2013/01/60...50-version.html

ciao
marpad

---------------

supersolar
KiloWatt

Utente
Msg:272

Stato:

Inviato il: 30/6/2013,22:31

CITAZIONE (marpad65 @ 30/6/2013, 16:20)
io ho il 24 - 52V ... è completamente diverso da quello di Elettro (dalle sue foto pubblicate) .... mah! spero di capirci qualcosa faccine/dry.gif

tu come ti trovi? hai già fatto dei test sulla velocità di intervento del MPPT

ciao
marpad

Ancora posso non ho avuto modo di testarlo a fondo anche xchè fino a stamattina era dato per morto ma per mia fortuna è resuscitato.

ElettroshockNow

GigaWatt

Utente
Msg:4656

Stato:

Inviato il: 30/6/2013,22:35

Cavolo e' praticamente un'altro inverter faccine/smile.gif

PIC? Che curiosa decisione di sostituire persino il processore !!! Ma l'evoluzione è l'evoluzione ...

Le domande erano rivolte a marpad , perché mi aveva chiesto delle info , ma non ho avuto più risposta ...... e la curiosità mi sta' uccidendo faccine/biggrin.gif

marpad65
KiloWatt

Utente
Msg:230

Stato:

Inviato il: 30/6/2013,22:39

CITAZIONE (supersolar @ 30/6/2013, 23:31)
fino a stamattina era dato per morto ma per mia fortuna è resuscitato.

BENE!!

Se riesco a finire il 4° stadio di riduzione(mio progetto), in settimana faccio qualche prova

---------------

ElettroshockNow

GigaWatt

Utente
Msg:4656

Stato:

Inviato il: 30/6/2013,23:13

Vedendo bene le foto postate nel link, lo hanno migliorato , ma non stravolto .
Si basa cmq su un Atmega e con qualche misurazione sulla scheda si potrebbe adattare il firmware anche a lui ........
Però il connettore che prima nella versione 1200 c'era è nuovamente scomparso faccine/smile.gif ....... e se risparmiano su un connettore dubito che possono aver installato un Atmega168 o 328 .......

marpad65
KiloWatt

Utente
Msg:230

Stato:

Inviato il: 30/6/2013,23:27

penso che il connettore ci sia ed è nella parte inferiore della foto .... guardando l'inverter, sembra che non sia connesso alla scheda ma per essere sicuro dovrei fare una lieve opera di deassemblaggio, cosa che per il momento non riesco per motivi di spazio ... per atmega ci provo

---------------

ElettroshockNow

GigaWatt

Utente
Msg:4656

Stato:

Inviato il: 1/7/2013,13:20

Oggi come promesso ho aggiornato il firmware al mio POWER JACK pswgt 1200-14-28-220 Rev 3.5
Specifico cosi' in dettaglio il modello in quanto ho riscontrato che i partitori resistivi all'interno dell'inverter variano molto da modello e modello ,quindi di conseguenza anche i fattori di conversione.

Quindi ho deciso di modificare la tabellina riportando solo i fattori di proporzione testati .

Modello inverter : POWER JACK pswgt 1200-14-28-220 REV3.5 :
-FATTORE CONV. TENSIONE 0X78
-FATTORE CONV. CORRENTE 0XFF (CON NUOVA TABELLA CORRENTE e POTENZA in quanto è stato raggiunto il valore massimo impostabile al fattore)

Nuova tabellina corrente :
0x12 = 4A
0x14 = 5A
0x16 = 6A
0x18 = 7A

Nuova tabellina potenza :
0x02 = 30W
0x04 = 60W
0x06 = 90W

Mi son fermato perchè lo alimentavo con l'alimentatore .... ho le batterie scariche faccine/smile.gif
Esempio di EEprom da me provata: 18 06 46 37 FF 78 FF 00
quindi immetteva da 14V ed interrompeva se la tensione scendeva sotto gli 11V e la potenza massima di immissione era 90W con picchi massimi di assorbimento di 7A

Ricordo nuovamente l'importanza dei Fattori di conversione , calcolandoli sperimentalmente se non presenti nella guida

Ciao
ElettroshockNow

A dimenticavo .... nel test ho avuto un'amara rilevazione... il PowerJack in questione assorbe ben 11W quando non immette ..... faccine/sad.gif

Modificato da ElettroshockNow - 1/7/2013, 15:04

maiollo

KiloWatt

Utente
Msg:109

Stato:

Inviato il: 3/7/2013,15:47

Seguo con interesse questa discussione. Ottimi faccine/clap.gif
se può servire questo dc dc input 13-40Vdc step up da 12v 60A a 80 euro:

www.aliexpress.com/store/product/DC..._608188337.html
Ciao.

ElettroshockNow

GigaWatt

Utente
Msg:4656

Stato:

Inviato il: 3/7/2013,17:32

CITAZIONE (maiollo @ 3/7/2013, 16:47)
se può servire questo dc dc input 13-40Vdc step up da 12v 60A a 80 euro:

Che bestiolina di step down faccine/smile.gif ..... 60A sono una bella corrente faccine/biggrin.gif .....sarei proprio curioso di sbirciare il contenuto ..... faccine/laugh.gif

Oggi ho finito la versione del firmware con il sensore amperometrico ....... spero per domenica di postarlo ....entro domenica ..

La modifica necessita anche di un intervento hardware (ho cercato di renderlo il più semplice possibile ,evitando componenti esterni).

In pratica il sensore ACS712 messo in serie alle utenze misura la corrente ,ma potendo leggere la corrente solo ogni 10ms (il micro è libero da altri impegni solo 1mS ogni 10mS faccine/smile.gif ) sono stato costretto ad aggiungere un diodo con il catodo verso il pin28 dell'Atmega8 , aggiungendo inoltre un condensatore da 100nF con una restistenza da 1Mohm tra il pin e massa.
Cosi' facendo ho realizzato un piccolo rilevatore di picchi che mi consente di mantenere il picco per un tempo abbastanza lungo per poterlo leggere faccine/smile.gif

Attraverso le impostazioni della Eeprom ,sarà possibile impostare la corrente di intervento ,il tempo che deve rimanere presente tale assorbimento prima di immettere e la corrente di disinserimento (risposta immediata).....

Ho in mente di aggiungere la funzione di autotaratura ,in quanto è un pò rognosetta .....
come vorrei anche aggiungere funzioni speciali tipo:
-l'inverter immette la potenza regolata tramite il potenziometro (quindi massimo la basale di casa),ma se sente un assorbimento che supera la soglia impostata ,l'nverter immetterà la massima potenza impostata nella Eeeprom...
Che dite ... ?

Ciao
ElettroshockNow

chrispat
KiloWatt

Utente
Msg:160

Stato:

Inviato il: 3/7/2013,19:54

@Elettro
sembra fantasitco! quasi un sogno... non vedo l'ora di mettere in pratica. Spero solo di farcela...
...allora mi offro come cavia "UTONTO" per la tua guida, se ce la faccio io allora è alla portata di tutti!

Grazie dalla community Elettro, stai portandoci verso nuovi inesplorati mondi fotovoltaici a cui nessun uomo era mai giunto prima! faccine/clap.gif

---------------
6x pannelli poly 130Wp + 2x pannelli 80Wp
Inverter charger UPS Mppsolar PIP-2424MS
2x bat...

solarino
milliWatt

Utente
Msg:6

Stato:

Inviato il: 4/7/2013,08:58

Ciao a tutti sono nuovo del forum anche se vi seguo da molto tempo.
Complimenti per il forum e complimenti ad elettoshock per le modifiche al fw dell'inverter.

@elettroshock
ho seguito il thread tedesco ed ho trovato diverse versioni in C del SW da compilare. Puoi dirmi, perfavore, da quale sei partito ?

sono molto interessato anche perche' vorrei iniziare a smanettare con il fotovoltaico e quell'inverter (il 300w per iniziare) potrebbe fare proprio per me....

Se possibile, vorrei collaborare con voi per ottimizare/migliorare il fw.

grazie per le info e per il lavorone che hai fatto.
saluti

ElettroshockNow

GigaWatt

Utente
Msg:4656

Stato:

Inviato il: 4/7/2013,15:27

Il Firmware (II Parte)

Eccomi ........ e ringrazio faccine/smile.gif

Quella che propongo è la versione migliorata del precedente firmware.
Può essere caricata anche senza nessuna modifica hardware ,ma è chiaro che le uniche implementazioni saranno la possibilità di variare i parametri ......

Cmq se invece volete .... osate

Lo schema credo che chiarisca :

La resistenza R78 và rimossa e vanno aggiunti i componenti come da schema.

Un esempio :

E' chiaro che il sensore amperometrico và messo in serie all'utilizzatore o alla linea da tenere monitorata

La procedura per l'aggiornamento firmware rimane invariata con l'aggiunta delle seguenti impostazioni :
-Soglia Attivazione (Da 3 in su ,con valore proporzionato alla corrente dipendente dal tipo di sensore)
-Tempo Attivazione (espresso in secondi )
-Soglia Disattivazione (Da 3 in su )
-Taratura Offset Manuale (non necessario, ma utile per visualizzare il valore della taratura automatica)
-Configurazione GTI (per ora solo 3 configurazioni faccine/smile.gif )

Procedura per configurare l'Offset del sensore automaticamente:

Per configurare l'Offset ,basterà caricare 0x00 nella configurazione GTI accertandosi che sia connesso ed alimentato il sensore l'ACS712 ,ma senza nessun carico (Da prove fatte posso confermare che il programmatore può restare connesso all'inverter alimentato sia lato AC che DC con la possibilità di aggiornare il firmware ,ma sopratutto variare i parametri della Eeprom senza disconnettere nulla .... E' chiaro che ad ogni aggiornamento avverrà un riavvio del sistema faccine/smile.gif )

Caricato il nuovo firmware con impostato 0x00 l'inverter dopo l'automatico riavvio misurerà l'offset e lo memorizza nella Eeprom in posizione 0x0E (se si legge successivamente la memoria si può vedere il valore sulla posizione Offset ) ed inoltre cambierà la configurazione GTI da 0x00 a 0x02 ,quindi l'inverter immetterà energia nella rete solo se si oltrepasseranno le soglie ...
Impostando 0x01 l'inverter immette sempre..... quindi disattivando il Sensore Amperometrico faccine/smile.gif

E' chiaro che la funzione del potenziometro resta invariata in tutte le configurazioni ,e se non installato l'inverter immetterà il massimo impostato dalle soglie

Esempio soglie (puramente indicativi ):
Impostando 7 sia nella attivazione che nella disattiva ho rilevato l'immissione se il carico superava un assorbimento di 500mA (110W circa ) e si smettava di immettere se il carico assorbiva meno di 300mA
Impostando 10 = 1000mA / 800mA
impostando 15 = 1400mA /1150mA
ecc ecc ecc
Quindi si è liberi di scegliere le proprie preferenze ....
Ho aggiunto anche il tempo per evitare immissioni nei picchi di assorbimento rapidi ... quindi se ad esempio impostiamo 10 nel Time ,l'inverter immetterà solo se per dieci secondi continuativi l'assorbimento supera la soglia impostata.

Ciao e buon grid a tutti faccine/smile.gif
ElettroshockNow

PS:Il codice Base in C QUI
-TOP CODE-
/* ***************************************************************************** ** ** Project : GTI ** ** Component : GTI (ATmega8) ** ** Modulename : System ** ** Filename : GTI.c ** ** Abstract : This file is the implementation file for a grid tie ** inverter firmware ** ** Date : 2012-05-25 ** Date mod : 2012-12-16 Modifications for Green power 350W, 14-28V inverter ** ***************************************************************************** */ /* **=========================================================================== ** 1 GENERAL ** 1.1 Revisions **=========================================================================== */ #define VERSION 100 //modifications by PetriK /* **=========================================================================== ** 1.2 References **=========================================================================== */ // Hardware // -------------- MCU LIB CONFIGURATION #define FOSC (16000) // 16 MHz external crystal #define F_CPU (FOSC*1000) // needed for AVR GCC /* **=========================================================================== ** 1.3 Global user settings **=========================================================================== */ // define hardware #define PJ14V // 14-28V nicht getestet!!! //#define PJ28V // 28-52V //#define _USE_LCD // LCD via HC164 serial shift register //#define _DUMPLOAD // wenn Dumpload anschliessbar #define _USE_BATTERY // if defined, disable MPPT and just seek for highest power // define software (features) //#define _PURESINE // exakte Sinustabelle #define _MPPDELAY 30 // MPPTracker alle x*10ms #define _MPPPOWERDIFF 4 // Leistungsdifferenz #define _MPPMAXSTEP 15 // maximale Stepweite /* **=========================================================================== ** 2. INCLUDE FILES ** 2.1 Standard include files **=========================================================================== */ #include <avr/io.h> #include <avr/wdt.h> #include <avr/interrupt.h> #include <avr/pgmspace.h> #include <util/delay.h> // benötigt F_CPU !!! #include <string.h> #include <stdint.h> /* **=========================================================================== ** 2.2 Application include files **=========================================================================== */ /* **=========================================================================== ** 3. DECLARATIONS ** 3.1 Internal constants **=========================================================================== */ //PowerJack GTI 300 und 600 //Pinbeschreibung ATmega8: // PortB #define PWMDISABLE 0 #define PWMOUT 1 #define FANCONTROL 2 // 1 = EIN, 0 = AUS #define _MOSI 3 // Daten/RS für LCD #define _E 4 // Enable für LCD #define _SCK 5 // CLK für LCD // PortC #define ADCUE 0 // Eingangsspannung Teiler 20:1 #define ADCIE 1 // Eingsngsstrom (150mV / A) #define ADCUAC 2 // Netz-Sinus 4.5Vpp, ref 2.5V #define ADCTEMP 3 // Temperaturmessung #define DUMPLOAD 5 // 1 = AUS // PortD 1 = EIN, 0 = AUS #define RELAIS 1 // Eingangsrelais #define LED3 2 // grün, Power #define LED2 3 // grün, MPPTracker + #define LED4 4 // grün, MPPTracker - #define LED1 5 // rot, Fehler #define ACCAPTURE 6 // Netz Sinus Vss 4.5V #define ACREF 7 // +2.5V // FuseBits1 = [CKOPT]; // FuseBits0 = [SUT1, BODLEVEL, BODEN]; // ProgMode = SPI; // Temperatur: je höher der Wert desto höher die Temperatur // entsteht aus 1023 - ADWert #define _TempFanOn 680 // #define _TempFanOff 660 // #define _TempMax 850 // Übertemperatur #ifdef PJ14V // Green Power 350W, 14-28V //Spannungsgrenzen -> Spannungen nachfolgend in Zehntel Volt eintragen #define _CurrMax 1000 // maximal zulässiger Strom ca.10 Ampere, modified by PetriK #define _PeMax 2000 // maximale Eingangsleistung ca.200.0W, modified by PetriK // Schaltschwellen für Eingang Relais #define _UeRelOn 200 // ??? Relais ein 20V #define _UeRelOff 170 // ??? Relais aus 17.5V #define _UePwmOn 180 // Inverter startet 18V, modified by PetriK #define _UePwmOff 175 // Inverter stopt 17.5V, modified by PetriK #define _UeDumpLoadOn 300 // Dumpload zuschalten #define _UeDumpLoadOff 280 #define _IeMin 2 #define _MUXUE 0x40 // ?? #define _MUXIE 0x41 // ?? #define _MUXUGRID 0x42 // ?? #define _MUXTEMP 0x43 // ?? #define _SCALE_UE 120 // Input voltage scaling; R1=2K, R2=18K = 100mV/V of input voltage, modified by PetriK #define _SCALE_IE 1000 // Input current scaling; R30=18K, R26=27K = 120mV/A of input current as voltage, modified by PetriK #define _SCALE_UG 200 // Grid voltage scaling; ?? Not sure what is the input pin for this and dont have test equipment - 200 seems to be working #else #ifdef PJ28V // PowerJack 28-52V //Spannungsgrenzen -> Spannungen nachfolgend in Zehntel Volt eintragen #define _CurrMax 900 // maximal zulässiger Strom ca.9A #define _PeMax 3000 // maximale Eingangsleistung ca.3000W // Schaltschwellen für Eingang Relais (1V =~ 11 AD-digits) #define _UeRelOn 200 // Relais ein #define _UeRelOff 180 // Relais aus #define _UePwmOn 240 // Inverter startet ~24V #define _UePwmOff 200 // Inverter stopt ~20V #define _UeDumpLoadOn 540 // Dumpload zuschalten #define _UeDumpLoadOff 520 #define _IeMin 2 #define _MUXUE 0x00 #define _MUXIE 0x01 #define _MUXUGRID 0x02 #define _MUXTEMP 0x03 #define _SCALE_UE 227 // 227/256=0.89 #define _SCALE_IE 530 // 530/256=2.07 #define _SCALE_UG 200 // 200/256=0.78 #else #error 'please define a GTI type' #endif #endif /* **=========================================================================== ** 3.2 Internal macros **=========================================================================== */ #define LED1_ON (PORTD|=(1<<led1)) #define LED2_ON (PORTD|=(1<<led2)) #define LED3_ON (PORTD|=(1<<led3)) #define LED4_ON (PORTD|=(1<<led4)) #define LED1_OFF (PORTD&=~(1<<led1)) #define LED2_OFF (PORTD&=~(1<<led2)) #define LED3_OFF (PORTD&=~(1<<led3)) #define LED4_OFF (PORTD&=~(1<<led4)) #define FAN_ON (PORTB|=(1<<fancontrol)) #define FAN_OFF (PORTB&=~(1<<fancontrol)) #define DUMPLOAD_ON (PORTC|=(1<<dumpload)) #define DUMPLOAD_OFF (PORTC&=~(1<<dumpload)) // für LCD (via HC164) // SCK an HC164 Pin 8 // E an HC164 Pin 8 // MOSI an HC164 Pin 1 + 2 und LCD RS // LCD R/W an Vss // HC164 Qa..Qh an LCD D0..D7 // HC164 CLR (Pin 9) an VCC (+5V) #define SCK_HIGH (PORTB|=(1<<_SCK)) #define E_HIGH (PORTB|=(1<<_E)) #define MOSI_HIGH (PORTB|=(1<<_MOSI)) #define SCK_LOW (PORTB&=~(1<<_SCK)) #define E_LOW (PORTB&=~(1<<_E)) #define MOSI_LOW (PORTB&=~(1<<_MOSI)) /* **=========================================================================== ** 3.3 Internal type definitions **=========================================================================== */ typedef struct { uint8_t MppUp :1; uint8_t GridConnected :1; uint8_t OverTemp :1; uint8_t FanOn :1; uint8_t DumpOn :1; uint8_t T100ms :1; uint8_t Dummy1 :1; uint8_t Dummy2 :1; } tdef_STATUS; /* **=========================================================================== ** 3.4 Global variables (declared as 'extern' in some header file) **=========================================================================== */ /* **=========================================================================== ** 3.5 Internal function prototypes (defined in Section 5) **=========================================================================== */ void PortsInit( void ); void AdcInit( void ); void ACompInit( void ); void Timer1Init( void ); void Timer2Init( void ); void CheckUE( void ); void CheckUGrid( void ); void CheckTemp( void ); void SetDumpload( void ); void MPPTracker( void ); void WDT_On( uint8_t ); void WDT_Off( void ); void LCD_Init( void ); void LCD_Cmd( uint8_t ); void LCD_Data( uint8_t ); void PrintVal(uint16_t, uint8_t, uint8_t); void LCD_PrintVal(uint8_t, uint8_t, uint16_t, uint8_t, uint8_t); void LCD_PrintStr(uint8_t, uint8_t, int8_t *); void wait( uint16_t ); uint16_t FSQRT( uint32_t); /* **=========================================================================== ** 3.6 Internal variables **=========================================================================== */ // 'Sinustabelle' zur Modulation der Pulsbreite #ifdef _PURESINE const uint8_t Sine[100] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10, 20, 30, 40, 50, 60, 70, 80, 89, 99, 108, 117, 126, 135, 143, 152, 160, 167, 175, 182, 189, 196, 202, 208, 214, 219, 224, 229, 233, 237, 240, 243, 246, 249, 251, 252, 253, 254, 255, 255, 255, 255, 254, 253, 252, 251, 249, 246, 243, 240, 237, 233, 229, 224, 219, 214, 208, 202, 196, 189, 182, 175, 167, 160, 152, 143, 135, 126, 117, 108, 99, 89, 80, 70, 60, 50, 40, 30, 20, 10, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; #else const uint8_t Sine[100] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 10, 20, 30, 40, 50, 60, 70, 79, 89, 98, 107, 116, 125, 133, 142, 150, 157, 165, 172, 179, 186, 192, 198, 204, 209, 214, 219, 223, 227, 230, 233, 236, 239, 242, 245, 247, 249, 251, 252, 255, 255, 254, 253, 252, 251, 249, 246, 243, 240, 237, 233, 229, 224, 219, 214, 208, 202, 196, 189, 182, 175, 167, 160, 152, 143, 135, 126, 117, 108, 99, 89, 80, 70, 60, 50, 40, 30, 20, 10, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; #endif volatile tdef_STATUS Status; volatile uint8_t SinePhase; // Zähler für StateMachine zur Ansteuerung UCC3806 volatile uint8_t FGridCnt; volatile uint8_t RelCnt; volatile uint16_t Ue; volatile uint16_t UGrid; volatile uint16_t Uac; volatile uint16_t Ie; volatile uint16_t Temp; volatile uint16_t FGrid; volatile uint16_t Power; volatile uint16_t LastPower; volatile uint16_t PulseWidth; #ifdef _USE_LCD static const uint8_t LCDline[3] = {0, 0x80-1, 0xC0-1}; static int8_t Printstring[16]; #endif /* **=========================================================================== ** 4. GLOBAL FUNCTIONS (declared as 'extern' in some header file) **=========================================================================== */ /////////////////////////////////////////////////////////////////////////////// // Hauptprogramm int16_t main( void ) { static uint8_t disp = 0; cli(); // clear Global Interrupt Enable wdt_reset(); WDT_On(WDTO_250MS); PortsInit(); AdcInit(); ACompInit(); Timer1Init(); Timer2Init(); LED1_ON; LED2_ON; LED3_ON; LED4_ON; wait(20000); LED1_OFF; LED2_OFF; LED3_OFF; LED4_OFF; WDT_On(WDTO_250MS); #ifdef _USE_LCD LCD_Init(); #endif WDT_On(WDTO_250MS); sei(); // set Global Interrupt Enable for(;<img src='faccine/wink.gif' alt="faccine/wink.gif" style="max-width:260px;max-height:360px;"/> // loop ca 5us { if( Status.T100ms ) // alle 100ms { wdt_reset(); Status.T100ms = 0; #ifdef _USE_LCD if( disp>=3 ) { LCD_Cmd(0x80); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data('V'); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data('A'); LCD_Data(' '); LCD_PrintVal(1, 3, Ue, 3, 1); LCD_PrintVal(1, 10, Ie, 4, 2); LCD_Cmd(0xC0); if( Status.OverTemp ) LCD_Data('T'); else LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data('W'); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data(' '); LCD_Data('V'); LCD_Data(' '); LCD_PrintVal(2, 2, Power, 4, 1); LCD_PrintVal(2, 12, UGrid, 3, 0); disp = 0; } else disp++; #endif } } } /* **=========================================================================== ** 5. INTERNAL FUNCTIONS (declared in Section 3.5) **=========================================================================== */ void PortsInit( void ) { PORTB = 0x21; // DDRB = (1<<pwmdisable)|(1<<pwmout)|(1<<fancontrol)|(1<<_MOSI)|(1<<_E)|(1<<_SCK); PORTC = 0x00; // ADC0-4, DumpLoad DDRC = (1<<dumpload); PORTD = 0x00; // pd0 Relais, pd2,5 Leds0..3 , PD6,7 Analog Comparator DDRD = 0x3F; // DDRD = (1<<relais)|(1<<led1)|(1<<led2)|(1<<led3)|(1<<led4); } void AdcInit( void ) { ADCSRA = (1<<aden)|(1<<adps2)|(1<<adps1); // Vorteiler 64 ADMUX = _MUXUE; // REFS1,REFS0 = Vref 5V ADCSRA |= (1<<adsc); // start conversion } void ACompInit( void ) { ACSR = (1<<acie); // enable analog comparator Interrupt } ISR(ANA_COMP_vect) { ACSR = 0; // disable Interrupt um Storungen zu unterdrücken SinePhase = 0; if( FGridCnt<5 ) FGridCnt++; // initialisiere Timer2 TCNT2 = 0; TCCR2 = (1<<wgm21)|(1<<cs21); // CTC operation, Prescaler 8 TIFR |= (1<<ocf2); // lösche Interrupt TIMSK |= (1<<ocie2); // enable Interrupt TOIE2; } void Timer1Init( void ) { OCR1A = 0; TCCR1A = (0<<wgm10)|(1<<wgm11)|(1<<com1a1); TCCR1B = (1<<wgm12)|(1<<cs10); } void Timer2Init( void ) { TCCR2 = 0; // disable counter TCNT2 = 0; // clear counter OCR2 = 200; // 200*500ns = 100us TCCR2 = (1<<wgm21)|(1<<cs21); // CTC operation, OCR2 Top, Prescaler 8 TIFR |= (1<<ocf2); // lösche Interrupt TIMSK |= (1<<ocie2); // enable Interrupt TOIE2; } ISR(TIMER2_COMP_vect) // jede 100us { uint16_t tmp; static uint32_t tmpL; static uint8_t T1sCnt = 0; static uint16_t T100msCnt = 0; static uint8_t UgCnt = 0; static uint32_t UgSum = 0; static uint16_t UeSum = 0; static uint8_t UeCnt = 0; static uint16_t IeSum = 0; static uint8_t IeCnt = 0; uint16_t ADCval; if( (ADCSRA&(1<<adsc))==0 ) // ADC fertig? (sollte immer der Fall sein) { ADCval = ADCW; // lese ADC ein switch( ADMUX ) { case _MUXUE: // letzte Messung war Ue ADMUX = _MUXIE; // nächste Messung Ie ADCSRA |= (1<<adsc); // ADC starten if( UeCnt<64 ) { UeSum += ADCval; // Ue aufsummieren UeCnt++; } break; case _MUXIE: // letzte Messung war Ie ADMUX = _MUXUGRID; // nächste Messung Unetz ADCSRA |= (1<<adsc); // ADC starten if( IeCnt<64 ) { IeSum += ADCval; // Ie aufsummieren IeCnt++; } break; case _MUXUGRID: // letzte Messung war Ugrid ADMUX = _MUXTEMP; // nächste Messung Temp ADCSRA |= (1<<adsc); // ADC starten if( UgCnt<64 ) { // TRMS Messung Unetz if( ADCval>512) ADCval = ADCval-512; else ADCval = 512-ADCval; UgSum += (uint32_t)ADCval*ADCval; // Quadrate aufsummieren UgCnt++; } else // nach ~26ms ohne Nulldurchgang { UgSum = 0; // Werte 'ungültig' machen UgCnt = 0; UGrid = 0; } break; case _MUXTEMP: // letzte Messung war Temp ADMUX = _MUXUE; // nächste Messung Ue ADCSRA |= (1<<adsc); // ADC starten ADCval = 1023-ADCval; Temp = (Temp+Temp+Temp+ADCval+2)>>2; // filtere Temperatur break; default: // redundant!!! ADMUX = _MUXUE; // nächste Messung Ue ADCSRA |= (1<<adsc); // ADC starten break; } } // schalte PWM nach 1ms für 8ms ein switch( SinePhase++ ) { default: break; case 1: // TRMS Berechnung UGrid 1.Teil tmpL = (UgSum+(UgCnt/2))/UgCnt; UgSum = 0uL; UgCnt = 0; break; case 2: // TRMS Berechnung UGrid 2.Teil tmp = ((uint32_t)FSQRT(tmpL)*_SCALE_UG)>>8; UGrid = (UGrid+tmp+1)>>1; // Auflösung V break; case 3: // Berechnung und Filterung Ue tmp = (UeSum+(UeCnt/2))/UeCnt; tmp = ((uint32_t)tmp*_SCALE_UE)>>8; Ue = (Ue+tmp+1)>>1; // Auflösung 1/10V UeSum = 0; UeCnt = 0; break; case 4: // Berechnung und Filterung Ie tmp = (IeSum+(IeCnt/2))/IeCnt; tmp = ((uint32_t)tmp*_SCALE_IE)>>8; Ie = (Ie+tmp+1)>>1; // Auflösung 1/10A IeSum = 0; IeCnt = 0; break; case 5: // Leistung berechnen Power = ((uint32_t)Ue*Ie)/100; // Auflösung 1/10W Uac = (Uac+Uac+Uac+UGrid+2)>>2; // filtere Uac für Anzeige break; case 6: // MPP-Tracker MPPTracker(); break; case 7: // Netzspannung überwachen CheckUGrid(); break; case 8: // Eingangsspannung überwachen CheckUE(); break; case 10: // ~1ms nach Nulldurchgang break; case 52: // ~6ms nach Nulldurchgang ACSR = (1<<aci); ACSR = (1<<acie); // enable analog comparator Interrupt break; case 90: // ~9ms nach Nulldurchgang break; case 110: // 11ms nach Nulldurchgang if( FGridCnt ) // NetzOK Zähler reduzieren FGridCnt--; break; case 220: // und 22ms nach Nulldurchgang if( FGridCnt ) // NetzOK Zähler reduzieren FGridCnt--; break; } if( !(PORTB&(1<<pwmdisable))&&(SinePhase>=10)&&(SinePhase<=90) ) OCR1A = (uint32_t)PulseWidth*Sine[SinePhase]>>8; else OCR1A = 0; // PWM ausschalten if( T100msCnt>=1000 ) // alle 100ms { T100msCnt = 0; Status.T100ms = 1; if( T1sCnt>=10 ) // jede Sekunde { T1sCnt = 0; if( (Ue<_UePwmOff)||(!Status.GridConnected)||(Status.OverTemp) ) LED1_ON; // Fehler-LED EIN else LED1_OFF; // Fehler-LED AUS CheckTemp(); // Temperaturüberwachung } else T1sCnt++; } else T100msCnt++; } void CheckUE( void ) { if( (Ue<_UePwmOff)||(!Status.GridConnected)||(Status.OverTemp) ) { OCR1A = 0; PORTB |= (1<<pwmdisable); PulseWidth = 0; LastPower = 0; LED2_OFF; LED3_OFF; LED4_OFF; } else if( (Ue>_UePwmOn)&&(Status.GridConnected)&&(Temp<_TempMax) ) { if( PORTB&(1<<pwmdisable) ) { LED4_ON; Status.MppUp = 1; LastPower = 0; PulseWidth = 5; PORTB &= ~(1<<pwmdisable); } } else {} #ifdef _DUMPLOAD SetDumpload(); #endif } // Prüft, ob Netzspannung anliegt void CheckUGrid( void ) { if( (UGrid>200)&&(FGridCnt>=4) ) Status.GridConnected = 1; else Status.GridConnected = 0; } // Prüft die Temperatur und schaltet ggf. Lüfter aus/ein void CheckTemp( void ) { if( (Temp>_TempFanOn) ) { Status.FanOn = 1; // Lüfter ein FAN_ON; if( Temp>_TempMax ) Status.OverTemp = 1; else Status.OverTemp = 0; } else if( Temp<_TempFanOff ) { Status.FanOn = 0; // Lüfter aus FAN_OFF; } else {} } #ifdef _USE_BATTERY // // MPPTracker modfified for battery use, i.e. always max power, not seeking best power point. Use this for battery power to GTI // void MPPTracker( void ) { static uint8_t StepSize = 5; static uint8_t MpptCnt = 0; if( ++MpptCnt>=_MPPDELAY ) { MpptCnt = 0; if( (Ue<_UePwmOn)||(Ie>_CurrMax)||(Power>_PeMax) ) // bei diesen Fehlern { Status.MppUp = 0; // Suchrichtung niedrigerer Strom } else { Status.MppUp = 1; } LastPower = Power; if( Status.MppUp ) // Suchrichtung höherer Strom { if( PulseWidth<(512-_MPPMAXSTEP) ) PulseWidth += StepSize; LED2_OFF; LED3_ON; } else // Suchrichtung niedrigerer Strom { if( PulseWidth>(_MPPMAXSTEP+2) ) PulseWidth -= StepSize; LED2_ON; LED3_OFF; } } } #else // // Original MPPTracker seeking for best power point, use for solar PV only. With a battery this creates load peaks. // void MPPTracker( void ) { static uint8_t StepSize = 1; static uint8_t MpptCnt = 0; if( ++MpptCnt>=_MPPDELAY ) { MpptCnt = 0; if( (Ue<_UePwmOn)||(Ie>_CurrMax)||(Power>_PeMax) ) // bei diesen Fehlern { Status.MppUp = 0; // Suchrichtung niedrigerer Strom } else if( Power<(LastPower+_MPPPOWERDIFF) ) // wenn die Leistung nicht ansteigt { // dann kehre die Suchrichtung um StepSize = 1; if( Status.MppUp ) Status.MppUp = 0; else Status.MppUp = 1; } else // wenn die Leistung steigt { if( StepSize<_MPPMAXSTEP ) // Schrittweite erhöhen StepSize++; } LastPower = Power; if( Status.MppUp ) // Suchrichtung höherer Strom { if( PulseWidth<(512-_MPPMAXSTEP) ) PulseWidth += StepSize; LED2_OFF; LED3_ON; } else // Suchrichtung niedrigerer Strom { if( PulseWidth>(_MPPMAXSTEP+2) ) PulseWidth -= StepSize; LED2_ON; LED3_OFF; } } } #endif #ifdef _DUMPLOAD void SetDumpload( void ) { // Ue ist größer als Einschaltschwelle if( (Ue>_UeDumpLoadOn)||(Status.GridConnected==0) ) { DUMPLOAD_ON; Status.DumpOn = 1; } else if( Ue<_UeDumpLoadOff ) { DUMPLOAD_OFF; Status.DumpOn = 0; } else {} } #endif void WDT_On(uint8_t WDtimeout) // Watch-Dog On { WDTCR = (1<<wdce) | (1<<wde); // WD Change enable WDTCR = WDtimeout; // set WD to timeout periode } void WDT_Off(void) // Watch-Dog Off { WDTCR = (1<<wdce) | (1<<wde); // WD Change enable WDTCR = 0x00; // WD disable (off), Turn off WDT } uint16_t FSQRT(uint32_t Quadrat) // Dauer: ~600-800 cycles { uint16_t Wurzel = 0; // Startwert Wurzel uint16_t tmp = 512; // Korrekturwert (Intervallhalbierung) while(tmp) { if( ((uint32_t)(Wurzel+tmp) * (Wurzel+tmp)) <= Quadrat ) Wurzel+=tmp; tmp=tmp>>1; // /2 } return (Wurzel); // Wurzel zurückgeben } void wait( uint16_t val ) { volatile uint16_t tmp = val; while(tmp--); } #ifdef _USE_LCD void LCD_Cmd( uint8_t Wert ) { uint8_t maske = 0x80; while( maske ) { if( Wert&maske ) MOSI_HIGH; else MOSI_LOW; SCK_HIGH; SCK_LOW; maske = maske>>1; } MOSI_LOW; // RS = 0 E_HIGH; E_LOW; wait(800); } void LCD_Data( uint8_t Wert ) { uint8_t maske = 0x80; while( maske ) { if( Wert&maske ) MOSI_HIGH; else MOSI_LOW; SCK_HIGH; SCK_LOW; maske = maske>>1; } MOSI_HIGH; // RS = 1 E_HIGH; E_LOW; wait(800); } void LCD_Init( void ) { SCK_LOW; MOSI_LOW; E_LOW; wait(6000); LCD_Cmd(0x38); wait(600); LCD_Cmd(0x38); wait(600); LCD_Cmd(0x38); wait(600); LCD_Cmd(0x0c); wait(600); LCD_Cmd(0x01); wait(6000); LCD_Cmd(0x06); wait(600); } void PrintVal(uint16_t Val, uint8_t Digits, uint8_t Comma ) { uint8_t n, tmp; if (Comma) // decimal point to be printed? { Comma=(Digits-Comma); if (Comma) // { Digits++; // add one digit for '.' } else { Comma = 10; // print leading zeros (e.g. 007) } } tmp = (Digits-1); Printstring[Digits]=0; // null-terminate string in advance while (Digits--) // solange Zahlen zum Darstellen { if(Comma || Val) // if something is left for printing { n = (Val%10)+Ɔ' } else { n = ' ' // leading spaces } if (Comma) { if (Digits==Comma) { Printstring[Digits]='.' Digits--; Comma = 0; } } Val = Val/10; Printstring[Digits]=n; } if(Printstring[tmp]== ' ') { Printstring[tmp] = Ɔ' } } // PrintVal void LCD_PrintVal(uint8_t y, uint8_t x, uint16_t Val, uint8_t Digits, uint8_t Colon) { PrintVal(Val, Digits, Colon); LCD_PrintStr(y, x, Printstring); // 'Printstring[8]' set in PrintVal() } void LCD_PrintStr(uint8_t y, uint8_t x, int8_t *ucStr) { uint8_t i=0; LCD_Cmd((uint8_t)(LCDline[y]+x)); while ((ucStr[i]!=0) && (i<=16)) { LCD_Data((uint8_t)ucStr[i]); i++; } } #endif /* **=========================================================================== ** END OF FILE **=========================================================================== */
-BOTTOM CODE-

Firmware_GT_con_Limitatore_Eeprom_Sensore_Amperometrico.hex

danye

KiloWatt

Utente
Msg:258

Stato:

Inviato il: 4/7/2013,17:33

Magnifico ElettroShockNow!
Vorrei acquistare un inverter per cominciare a "giocare" da almeno 600w, quale modello mi consigli e soprattutto dove lo posso ordinare?
Potrei anche ordinarlo dalla cina... un sito affidabile?
Di nuovo grazie mitico!

---------------
1x185Wp poli direzione sud
1xRegolatore MPPT EpSolar Tracer 3015
7x batterie auto da recup...

ElettroshockNow

GigaWatt

Utente
Msg:4656

Stato:

Inviato il: 4/7/2013,18:39

Grazie danye ,
ma molto del lavoro è stato fatto dal tedesco faccine/smile.gif ......

Personalmente compro tranquillamente dall'oriente pagando ovviamente con Paypal (alti metodi li adotto solo su siti affidabili )... successivamente aspetto i 40 giorni ...... al 41 esimo giorno apro una contestazione e dopo 19 giorni se ancora non mi è arrivata la merce trasformo la contestazione in reclamo e ricevo il rimborso....

Per l'affidabilità mi fido molto dei feedback (Ebay) , e ritengo un venditore affidabile se supera il 98% ...

Ciao

InizioPagina

Pag: (30) < ... 9 10 11 [12] 13 14 15 ...> (Ultimo Msg)

Versione Completa!