Se sei già registrato           oppure    

Orario: 12/05/2024 10:07:02  

 

Energia Alternativa ed Energia Fai Da Te > PPTEA

VISUALIZZA L'ALBUM

Pagine: (5)   1   2   [3]   4   5    (Ultimo Msg)


PPTEA e ACS712
FinePagina

ElettroshockNow

Avatar
GigaWatt


Gruppo:Utente
Messaggi:4656

Stato:



Inviato il: 25/1/2013,18:54

CITAZIONE
se facciamo la differenza CADS1-CADS2

Caso semionda positiva ---------682,66-853,33= -170.67
Caso semionda negativa---------341.33-170.66= +170.67



Ciao
ElettroshockNow

 

NonSoloBolleDiAcqua

Avatar
PetaWatt


Gruppo:AMMINISTRATORE
Messaggi:13786

Stato:



Inviato il: 25/1/2013,19:09

Bene bravo...ci ho provato....vedi che ho torto io!
faccine/biggrin.gif



---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).

 

NonSoloBolleDiAcqua

Avatar
PetaWatt


Gruppo:AMMINISTRATORE
Messaggi:13786

Stato:



Inviato il: 27/1/2013,09:15

Nella speranza di non scrivere altre cretinate ( faccine/tongue.gif ) cerchiamo di vedere cosa passa per il sensore...heehhe.
Questo è il codice che in un solo colpo prende i dati della sinusoide...per ora lo facciamo per un solo sensore.
Lo visualizzeremo con il programma oscilloscopio che ho fatto a suo tempo e non terminato...lo allego. Basta mettere la porta e automaticamente aggancia i dati...cambiare la base tempi ...e dovrebbe andare.
Un saluto
Bolle
faccine/smile.gif



10 CONSTANT NUM_ELE =40
100 DIM V(51) AS WORD
150 VBT=300
300 BT=USBINP
350 IF BT=-1 THEN :ULT_VAL
400 VBT=BT
450 :ULT_VAL CADSEQ(V,1,VBT,NUM_ELE)
500 CLR A
550 CLR S
600 A++
650 USBOUT=V(A)
700 S+=V(A)
750 IF A<>NUM_ELE THEN 600
950 WAITMS 100
1000 GOTO 300




Scarica allegato

OscilloscopioPPTEA.rar

( Numero download: 254 )



---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).

 

ElettroshockNow

Avatar
GigaWatt


Gruppo:Utente
Messaggi:4656

Stato:



Inviato il: 27/1/2013,09:23

Il mio sogno.......
CADSEQ ......
e implementare il protocollo WIFi PPTEA su arduino faccine/biggrin.gif

Torno a sfrullinare ......... faccine/unsure.gif

 

NonSoloBolleDiAcqua

Avatar
PetaWatt


Gruppo:AMMINISTRATORE
Messaggi:13786

Stato:



Inviato il: 27/1/2013,09:50

A questo punto dovrebbe essere un gioco da ragazzi per te implementare il tutto con la CADSEQ...l'unica cosa che va impostata è VBT...cioè il tempo in cui vanno campionati i valori...e per far questo hai l'oscilloscopio del PPTEA...perchè variando la base tempi vedi quello più appropriato.
Buona sfrullinata!
Ciao
Bolle



---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).

 

ElettroshockNow

Avatar
GigaWatt


Gruppo:Utente
Messaggi:4656

Stato:



Inviato il: 27/1/2013,10:02

faccine/laugh.gif faccine/laugh.gif faccine/laugh.gif Grande Bolle
La prossima settimana implemento il CADSEQ.........
e proverò a fare una libreria del WIFI (Certo due info sul protocollo non mi dispiacerebbero .....Thanks)

Saluti
ElettroshockNow




Modificato da ElettroshockNow - 27/1/2013, 11:24
 

NonSoloBolleDiAcqua

Avatar
PetaWatt


Gruppo:AMMINISTRATORE
Messaggi:13786

Stato:



Inviato il: 28/1/2013,00:13

Senti,
stavo guardando il codice che hai scritto per Arduino...e non ho capito le prime istruzioni del loop ...non dovrebbe esserci un while anche su questa (la prima) istruzione?Altrimenti il valore del primo byte non viene letto... faccine/cool.gif

CODICE
if (mySerial.available())


Ciao
Bolle



---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).

 

ElettroshockNow

Avatar
GigaWatt


Gruppo:Utente
Messaggi:4656

Stato:



Inviato il: 28/1/2013,07:34

CITAZIONE
void loop() {

if (mySerial.available()) {
inByte = mySerial.read();
//Serial.write(inByte);
}
long Tout = 10000; //Timeout in caso di Blocco nelle funzioni While
ADR1R = inByte;
if (ADR1R == ADR1){

Vero.......
Il valore letto dalla seriale viene messo nella variabile inByte e solo se uguale ad ADR1 esegue tutte le istruzioni nel secondo IF.
Altrimenti il programma è libero faccine/wink.gif .
Certo si poteva far di meglio ,ma funzionava e ho continuato su quella strada (complicandolo un pochino faccine/smile.gif ).

Era solo per testare il tutto.....

Ps: ieri ho dedicato un pò di tempo implementando CADSEQ .........e :
-Usando CADSEQ non riesco ad avere una risoluzione sufficiente a non avere oscillazioni sul valore (200 campionature non sono sufficienti)-
-Senza CADSEQ (codice nella pagine precedente) funziona bene,ma se aggiungo un'altra istruzione IF le variabili PMED e AMED diventano 0 !!!!!!

Ciao ElettroshockNow

 

NonSoloBolleDiAcqua

Avatar
PetaWatt


Gruppo:AMMINISTRATORE
Messaggi:13786

Stato:



Inviato il: 28/1/2013,11:18

Ho fatto la prova con un sensore simile se non uguale a quello che usi tu ( +/-30A ..praticamente tanti per misurare basse potenze ma buoni per misurare dai 100W in su) facendo girare l'eseguibile oscilloscopio, settando i parametri come da figura (occhio al 512...si fatica un poco)...e si ottiene la sinusoide anche con 40 punti...dove prende sempre ed ameno due 'gobbette' faccine/biggrin.gif
Si potrebbe anche scendere con i tempi e prenderla più fitta...ma così penso che vada più che bene: faccine/smile.gif .
La parte grafica serve per tarare il sistema...cioè in questo modo si può effettuare un debug grafico di quello che succede...si può prendere la semionda superiore e quella inferiore e far i calcoli dell'assorbimento.


50 CONSTANT NELE = 40
100 DIM V(NELE) AS WORD
150 VBT=300
300 BT=USBINP
350 IF BT=-1 THEN :ULT_VAL
400 VBT=BT
450 :ULT_VAL CADSEQ(V,1,VBT, NELE)
500 CLR A
550 CLR S
600 A++
650 USBOUT=V(A)
700 S+=V(A)
750 IF A< NELE THEN 600
950 WAITMS 100
1000 GOTO 300

ForumEA/PPTEA_IMG_FORUM/pptea_oscilloscopiorid.jpg


Ciao
Bolle



---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).

 

ElettroshockNow

Avatar
GigaWatt


Gruppo:Utente
Messaggi:4656

Stato:



Inviato il: 28/1/2013,12:01

Ieri ho fatto le tue stesse prove , ma anche campionando a NELE 120 con VBT 100 le oscillazioni risultavano sempre maggiori della semplice somma ripetuta 400 volte ......Ciao

CITAZIONE
700 S+=V(A)

A cosa serve? Cosa mi sfugge?

 

NonSoloBolleDiAcqua

Avatar
PetaWatt


Gruppo:AMMINISTRATORE
Messaggi:13786

Stato:



Inviato il: 28/1/2013,13:10

CITAZIONE (ElettroshockNow @ 28/1/2013, 12:01)
CITAZIONE
700 S+=V(A)

A cosa serve? Cosa mi sfugge?

Sarebbe servita per la checksum...ma alla fine non l'ho più inviata: faccine/rolleyes.gif .
Controllo con NELE=120...e verifico la forma d'onda.
Ciao
Bolle



---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).

 

NonSoloBolleDiAcqua

Avatar
PetaWatt


Gruppo:AMMINISTRATORE
Messaggi:13786

Stato:



Inviato il: 28/1/2013,16:52

Ho partorito la nuova versione dell'oscilloscopio con 120 elementi...il codice che carico nel PPTEA è questo e funzica. Occorre considerare che 120 Word sono molte per il PPTEA quindi occorre capire se hai sforato con le variabili. Per saperlo fai andare il debug del compiler e vedi se l'area di memoria ti da errore.
Cmq questo gira perfettamente.


50 CONSTANT NELE = 120
100 DIM V(NELE) AS WORD
150 VBT=300
300 BT=USBINP
350 IF BT=-1 THEN :ULT_VAL
400 VBT=BT
450 :ULT_VAL CADSEQ(V,1,VBT, NELE)
500 CLR A
600 A++
650 USBOUT=V(A)
750 IF A< NELE THEN 600
950 WAITMS 200
1000 GOTO 300


Questo è il grafico che esce fuori con i dati. Ho aggiunto anche lo slider verticale per allineare lo zero...i punti visualizzati sono molti di più di quello precedente ( 3 volte di più si è passati da 40 a 120).

ForumEA/PPTEA_IMG_FORUM/PPTEA_Oscilloscopio2rid.jpg





Scarica allegato

OscilloscopioPPTEA1_1.rar

( Numero download: 181 )



---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).

 

ElettroshockNow

Avatar
GigaWatt


Gruppo:Utente
Messaggi:4656

Stato:



Inviato il: 28/1/2013,18:36

Sicuramente questa è la condizione peggiore ,ma esiste anche lei.......
http://www.energialternativa.info/Public/NewForum/ForumEA/8/9/7/4/3/4/9/1359393079.jpg

Quella che vedi è la traccia dell'assorbimento di un aspirapolvere al minimo ,quindi con tutte le semionde tagliate ........
Anche se a prima vista sembra una buona immagine ,quando eseguo la media ,le oscillazioni sono troppo ampie da essere considerate "accettate".


 

NonSoloBolleDiAcqua

Avatar
PetaWatt


Gruppo:AMMINISTRATORE
Messaggi:13786

Stato:



Inviato il: 28/1/2013,18:47

Per quello che penso...40 vanno più che bene...potresti metterne 80 di valori...ma il problema sembra un altro, dovuto alle oscillazioni cioè al rumore. Prova a mettere un condensatore da 20n-200n...vedi cosa combina.Io non ottengo tutte quelle oscillazioni...ma considera che se legge quei valori...quei valori arrivano al CADS...quanti volt per divisione sei nella immagine? Domani ci provo anche io...provo con un phon. faccine/smile.gif

Ciao
Bolle
PS:Perchè c'è quella forma d'onda? faccine/blink.gif




Modificato da NonSoloBolleDiAcqua - 28/1/2013, 19:04


---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).

 

ElettroshockNow

Avatar
GigaWatt


Gruppo:Utente
Messaggi:4656

Stato:



Inviato il: 28/1/2013,18:59

E' il triac che taglia le semionde faccine/ohmy.gif per ridurrei i giri.....
http://www.energialternativa.info/Public/NewForum/ForumEA/8/9/7/4/3/4/9/1359395760.jpg

 
 InizioPagina
 

Pagine: (5)   1   2   [3]   4   5    (Ultimo Msg)

Versione Mobile!

Home page       TOP100-SOLAR      Home page forum