|
NonSoloBolleDiAcqua
| Inviato il: 3/10/2013,16:57
|
Questo è il codice...cerca di ascoltare la musica...le parole sono complicaterrime...se riesci a capirlo mi inginocchio!!!!!
CODICE <i>Sub Analysis( sfa ) ' sfa va da 300 a 900 cioè dal 2° magnete al 4° magnete ...vengono estratti 300 punti mediante femm da magnete a magnete...la spira viene fatta partire dal centro del secondo magnete in modo da avere i dati tutti configurati...se partiva dal primo mancava la parte negativa....
pind(1) = 0 ' associa il vettore ai piani simmetrici
pind(2) = 1
pind(3) = 2
pind(4) = 3
pind(5) = 3
pind(6) = 2
pind(7) = 1
pind(8) = 0
mm = NPOINT / DISTANZA_MAGNETI ' tira fuori il rapporto dei millimetri
nsp = 0 ' azzera il numero di spire
DrawCoil (Sfa - 300) / mm ' disegna la bobina nel primo grafico centrata al posto giusto (si fa per dire ma è solo dimostrativa)
pgx = pgx + 1 ' incrementa i punti sul grafico per il disegno di F e DF
TF = 0 ' AZZERA IL FLUSSO
c = -1 ' Azzero la colonna
For ls = 1 To 45 Step 2 'verifico tutte le possibili spire ...ogni 2 millimetri si ha una spira...
c = c + 1 ' incremento la colonna
rspira = ls * mm ' Raggio della spira
For p = 1 To 8 ' scorro gli 8 piani tra i due magneti
r = p
If Spira(c * 8 + r - 1) = 1 Then ' se la spira è abilitata allora calcolo il flusso al suo interno c=colonna r=riga della matrice bidimenzionale che rappresenta le spire (0= alto a destra 183=basso a sinistra)
nsp = nsp + 1 ' incremento il numero di spire analizzate...
For X = Sfa - rspira To Sfa + rspira ' mi centro sul punto e analizzo il quadrato ...diventa un cerchio dopo ...per analizzare meno punti e andare più veloci
For Y = 0 To 300 '
d = Sqr((X - Sfa) * (X - Sfa) + Y * Y) ' calcolo la distanza tra il punto in considerazione e il centro spira
If d <= rspira Then ' effettuo la somma sole se il punto cande dentro la spira
TF = TF + Plane(X, Y, pind(p)) ' Sommo il valore del flusso del punto dello spazio in questione
End If
Next Y
Next X
End If
Next p
Next ls
' disegna T
DrawF()
' disegna DF derivando TF (cioè dal secondo punto in poi si calcola TFPREC-TF)
DrawDF()
TFPREC=TF
end sub</i>
Modificato da NonSoloBolleDiAcqua - 3/10/2013, 18:15
---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).
|
| | | | | | |
qqcreafis
| Inviato il: 3/10/2013,19:00
|
CITAZIONE For X = Sfa - rspira To Sfa + rspira ' mi centro sul punto e analizzo il quadrato ...diventa un cerchio dopo ...per analizzare meno punti e andare più veloci
quanto vale l'incremento ? (è automatico?)
vabbè è un intero andrà per 1
Modificato da qqcreafis - 3/10/2013, 20:54
---------------
ODE AD UNO STUDENTE MERITEVOLE (Sermone)
Allora Xyz è stato bravo! noi dobbiamo riconoscere che è stato molto bravo, bisogna dirlo !
In un mondo dove tutto SEMBRA uguale a tutto.
In un mondo dove chi abbruttisce la dignità dell’intelligenza umana si arroga meriti.
In un mondo in cui si dice che i giovani non hanno speranza perché “tanto non troveranno lavoro” perché tanto non “non avranno la pensione”.
Xyz è stato bravo! ha capito tutto, ha fatto un compito perfetto.
Xyz ci da una SPERANZA.
Xyz non ha seguito le falsità che ci circondano.
Xyz si è impegnato ed è riuscito nel suo intento.
|
| | |
qqcreafis
| Inviato il: 3/10/2013,19:56
|
CITAZIONE For X = Sfa - rspira To Sfa + rspira ' mi centro sul punto e analizzo il quadrato ...diventa un cerchio dopo ...per analizzare meno punti e andare più veloci
For Y = 0 To 300 '
d = Sqr((X - Sfa) * (X - Sfa) + Y * Y) ' calcolo la distanza tra il punto in considerazione e il centro spira
If d <= rspira Then ' effettuo la somma sole se il punto cande dentro la spira
TF = TF + Plane(X, Y, pind(p)) ' Sommo il valore del flusso del punto dello spazio in questione
End If
Next Y
Next X
il centro spira ha coordinate (Sfa,0)
Plane(X, Y, pind(p)) suppongo sia la matrice di dati del campo
ogni celletta ha una sua sup e quindi sommare B il flusso è corretto dato che tutte le sup sono uguali
il cuore del programma mi sembra giusto (ma è compilato o interpretato? perchè nel mio pc ci mette 12minuti)
Modificato da qqcreafis - 3/10/2013, 21:23
---------------
ODE AD UNO STUDENTE MERITEVOLE (Sermone)
Allora Xyz è stato bravo! noi dobbiamo riconoscere che è stato molto bravo, bisogna dirlo !
In un mondo dove tutto SEMBRA uguale a tutto.
In un mondo dove chi abbruttisce la dignità dell’intelligenza umana si arroga meriti.
In un mondo in cui si dice che i giovani non hanno speranza perché “tanto non troveranno lavoro” perché tanto non “non avranno la pensione”.
Xyz è stato bravo! ha capito tutto, ha fatto un compito perfetto.
Xyz ci da una SPERANZA.
Xyz non ha seguito le falsità che ci circondano.
Xyz si è impegnato ed è riuscito nel suo intento.
|
| | |
NonSoloBolleDiAcqua
| Inviato il: 3/10/2013,20:16
|
CITAZIONE (qqcreafis @ 3/10/2013, 20:00) CITAZIONE For X = Sfa - rspira To Sfa + rspira ' mi centro sul punto e analizzo il quadrato ...diventa un cerchio dopo ...per analizzare meno punti e andare più veloci quanto vale l'incremento ? (è automatico?) vabbè è un intero andrà per 1
si é un ciclo for---> lo scrivo in c/java....lo conosci per forza ricordo che avevi sviluppato delle applet...se non ero:
CODICE for(x=sfa-rspira; x<=sfa+spira; x++)
for(y=0; y<=300; y++)
{
d = Sqr((X - Sfa) * (X - Sfa) + Y * Y);
If (d <= rspira)
TF += Plane(X, Y, pind[p]);
}
---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).
|
| | |
qqcreafis
| Inviato il: 3/10/2013,20:31
|
ho messo sopra la conclusione
si si ho capito non sono più tanto abituato al for next degli anni verdi.
comunque bisogna stare attenti alle divisioni per interi , ma forse VB è robusto il C invece no
il liguaggio che conosco meglio è il c c++(ma l'ultimo programma ormai sono quasi 10 anni ..., sai il vizio di excel .. troppo comodo impigrisce e poi l'avvento di windows ha reso difficile l'interfaccia con il sistema operativo, tanto difficile in c++ che poi si desiste
Modificato da qqcreafis - 3/10/2013, 23:17
---------------
ODE AD UNO STUDENTE MERITEVOLE (Sermone)
Allora Xyz è stato bravo! noi dobbiamo riconoscere che è stato molto bravo, bisogna dirlo !
In un mondo dove tutto SEMBRA uguale a tutto.
In un mondo dove chi abbruttisce la dignità dell’intelligenza umana si arroga meriti.
In un mondo in cui si dice che i giovani non hanno speranza perché “tanto non troveranno lavoro” perché tanto non “non avranno la pensione”.
Xyz è stato bravo! ha capito tutto, ha fatto un compito perfetto.
Xyz ci da una SPERANZA.
Xyz non ha seguito le falsità che ci circondano.
Xyz si è impegnato ed è riuscito nel suo intento.
|
| | |
NonSoloBolleDiAcqua
| Inviato il: 3/10/2013,20:50
|
CITAZIONE (qqcreafis @ 3/10/2013, 20:56) il cuore del programma mi sembra giusto
Le testuggini lo hanno testato...e per loro è ok!
CITAZIONE (qqcreafis @ 3/10/2013, 20:56) ma è compilato o interpretato? perchè nel mio pc ci mette 12minuti)
Compilato...ma è una fetecchia...lo velocizzeremo sicuramente di un fattore 10/50...ma considera che se cambio linguaggio...perdo alcune testuggini! 
Io lo devo testare per benino...ma da quelle prove che ho fatto sembra che tenga...tiene anche la spira che si allarga ... la potenza (pdp) ritorna...e ritorna il fatto che la spira che prende contemporaneamente i due magneti ha la potenza massima .... io purtroppo continuo a vederlo come un df/dt mi spiace ma faccio prima... 
La velocità è legata alla macchina...il tempo lo calcola dopo il primo giro.
CITAZIONE (qqcreafis @ 3/10/2013, 21:31) comunque bisogna stare attenti alle divisioni per interi , ma forse VB è robusto il C invece no
Le variabili sono tutte double...
CITAZIONE (qqcreafis @ 3/10/2013, 21:31) il liguaggio che conosco meglio è il c c++(ma l'ultimo programma ormai sono quasi 10 anni ..., sai il vizio di excel .. troppo comodo impigrisce e poi l'avvento di windows ha reso difficile l'interfaccia con il sistema operativo, tanto difficile in c++ che poi si desiste
In vb6 la grafica è semplice semplice...inoltre 'viaggia' in coppia con il compilatore VC6/VC6++...se gestito in modo 'intelligente' ci si fanno delle cose fantastiche. Se vuoi ti invio il cd...secondo me , tu, dopo una settimana creerai il panico!
Ti assicuro che i compilatori di una volta erano molto più complessi e articolati di quelli di oggi...fammi indovinare...usavi il Compilatore della Borland? Oppure scrivevi $cc -c c.c. Usavi i vt100? Lavoravi sui vax?  Usavi l'editor edt? Non mi dire che conosci il vi.....che bei ricordi...unix sistem v 
Guarda questo ultimo lavoretto...non è un video è un SW sempre fatto in VB6...scarricalo e lancia l'eseguibile...
Secondo te...quanto tempo ci si impiega per avere una visualizzazione 3D dell'amico nostro?
In questa applicazione il 2d è fortemente limitato...o no?
Modificato da NonSoloBolleDiAcqua - 3/10/2013, 22:06
---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).
|
| | |
qqcreafis
| Inviato il: 3/10/2013,21:36
|
, ho fatto anche di peggio...
azz azz quanto tempo...
ma mi stai smascherando
CITAZIONE io purtroppo continuo a vederlo come un df/dt mi spiace ma faccio prima...
io li uso entrambi sono equivalenti, il fatto è che molti (inesperti) non considerano il campo locale per il calcolo del flusso e sbagliano .
il df fa sparire il centro della spira e quello che conta è il campo sul conduttore , questo mi da subito "il colpo d'occhio"
CITAZIONE dopo una settimana
un tempo avrei piazzato delle belle sciabolate ora il tempo ed altre cose minano... (l'ultimo programma che ho fatto permetteva di visualizzare l'immagine di interferenza di una sorgente luminosa infinitamente lontana nel fuoco di uno specchio sferico/parabolico , e tra l'altro facevo una quadrettatura simile al loop di sopra, ma non sommavo dei numeri ma due componenti in pratica vettoriali per calcolare l'interferenza nel punto considerato, uno sballo.. vabbè me lo dico da solo)
---------------
ODE AD UNO STUDENTE MERITEVOLE (Sermone)
Allora Xyz è stato bravo! noi dobbiamo riconoscere che è stato molto bravo, bisogna dirlo !
In un mondo dove tutto SEMBRA uguale a tutto.
In un mondo dove chi abbruttisce la dignità dell’intelligenza umana si arroga meriti.
In un mondo in cui si dice che i giovani non hanno speranza perché “tanto non troveranno lavoro” perché tanto non “non avranno la pensione”.
Xyz è stato bravo! ha capito tutto, ha fatto un compito perfetto.
Xyz ci da una SPERANZA.
Xyz non ha seguito le falsità che ci circondano.
Xyz si è impegnato ed è riuscito nel suo intento.
|
| | |
NonSoloBolleDiAcqua
| Inviato il: 3/10/2013,22:02
|
CITAZIONE (qqcreafis @ 3/10/2013, 22:36) ma mi stai smascherando
L'ho usato per svilupparci life tanti,tanti,tanti anni fa...ti ricordi del programma delle cellule che vivevano nel piano...quel programma lo avrai fatto anche tu...non mentire...anzi...chissà se facciamo la bobina a forma di cannone...se spara le spire...
Modificato da NonSoloBolleDiAcqua - 4/10/2013, 19:46
---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).
|
| | | | | | |
NonSoloBolleDiAcqua
| Inviato il: 4/10/2013,08:17
|
CITAZIONE (ElettroshockNow @ 4/10/2013, 02:38) PS:ma il pdp ?
Cioè l'unità di misura i piedi di porco? E' una lunga storia ma la cosa penso si capisca.
La Potenza (anche espressa in quel modo) ci permette di capire quale è la cosa migliore da fare...ad esempio è meglio una bobina chiatta con i magneti un poco più distanti tra di loro ma 1,5 cm uno dall'altro oppure la tua? Con il nostro amico tra non molto sarà possibile saperlo.
Ad esempio nel grafico della v1.1 sono presenti delle bobine composte da una sola spira con diametro sempre più grande...la PTot ci da un valore numerico che ci fa capire come stanno realmente le cose e ci permette di scegliere la migliore sia la questione del rame che per il flusso.
Il lavoro riprenderà non prima di lunedì 
---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).
|
| | |
ElettroshockNow
| Inviato il: 4/10/2013,08:39
|
Sisi .... l'unità di misura pdp e' chiara e utile anzi utilissima ....ma nella versione rilasciata non c'è traccia !!!
Ciao e nuovamente grazie
|
| | |
NonSoloBolleDiAcqua
| Inviato il: 4/10/2013,09:36
|
Scarica la V1.1 ...vedrai che li c'è!
---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).
|
| | |
qqcreafis
| Inviato il: 4/10/2013,16:07
|
XBolle: Complimenti per l'avventura ...
Ma nel filmato dove compari? compari nella tavola rotonda dove illustra la macchina?
femm^2/(2R0) è l'energia max erogata compresa quella sulla R0 resistenza interna e sul carico max (R0)
Quella solo sul carico è metà del totale
Sarebbe importante calcolare, penso, anche il rapporto potenza volume pacco spire(volume rame) per capire quando convenga aggiungere una fase piuttosto che allargare la bobina
inoltre sarebbe importante poter variare la distanza laterale tra coppie di magneti in modo da simulare un piggott più o meno compatto
mi sfugge p0 p1...(fare un piccolo help)
Sbaglio o già così è il software più accurato su questo tipo di generatore?
Modificato da NonSoloBolleDiAcqua - 4/10/2013, 19:49
---------------
ODE AD UNO STUDENTE MERITEVOLE (Sermone)
Allora Xyz è stato bravo! noi dobbiamo riconoscere che è stato molto bravo, bisogna dirlo !
In un mondo dove tutto SEMBRA uguale a tutto.
In un mondo dove chi abbruttisce la dignità dell’intelligenza umana si arroga meriti.
In un mondo in cui si dice che i giovani non hanno speranza perché “tanto non troveranno lavoro” perché tanto non “non avranno la pensione”.
Xyz è stato bravo! ha capito tutto, ha fatto un compito perfetto.
Xyz ci da una SPERANZA.
Xyz non ha seguito le falsità che ci circondano.
Xyz si è impegnato ed è riuscito nel suo intento.
|
| | |
NonSoloBolleDiAcqua
| Inviato il: 4/10/2013,18:42
|
CITAZIONE (qqcreafis @ 4/10/2013, 17:07) XBolle: Complimenti per l'avventura ...
Si è lui ma io non ero sul tavolo...ero in piedi fuori a ridosso della porta... All'epoca le persone importanti erano semplici e capaci...ora sono arroganti e saccenti...in 20 anni è drasticamente cambiata la situazione. Cmq ognuno ha preso la sua strada...l'inprinting c'è stato...altro che...ma il progetto (che non ha avuto un gran successo...ha avuto per anni solo tanto clamore....anche perchè oggi analizzandolo bene ha permesso di fare grandi cose...ma non ha avuto successo nel suo obbiettivo principale...anzi quello che all'epoca si ipotizzava (giustamente) è crollato senza pietà) .
Quando si inizia a fare analisi ...si parte da qualcosa e spesso non si sa l'arrivo.
---------------
Chi sa raccontare bene le bugie ha la verità in pugno (by PinoTux).
Un risultato se non è ripetibile non esiste (by qqcreafis).
|
|
| | |
|
Versione Mobile!
 
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
