Elektroonikafoorum.com

Täisversioon: Kuu tõusu- ja loojangu ajad
Teile näidatakse hetkel lihtsustatud versiooni tekstist. Vaadake täisversiooni õiges formaadis.
Lehti: 1 2 3 4 5
Kas keegi teab algoritmi/valemeid nende aegade arvutamiseks? Tahan oma akva kontrollerile kuukalendri selgeks teha. Esialgu saavutasin vaid selle, et lambi heledust juhitakse Kuu faasi (vanuse) järgi. Aga siis on tema jaoks Kuu pidevalt taevas mis pole päris korrektne...
Oleks maru hea saada säärane algoritm, mida kannatab PICi kõhus ja assembleris jooksutada.
Ainuüksi Kuu vanuse arvutamine võtab aega tervelt 0,5 ms !
Kõhutunde pealt soovitan PIC-ile külge panna üks järjestikliidesega välkmälu integraalskeem, milles on Kuu tõusude ja loojumiste kalender Sulle sobival kujul. Nimelt sisaldab vastav valem kindlasti päris paljusid siinuseid ja muid trigonomeetrilisi funktsioone ja seega assembleris on seda veidi tüütu realiseerida. Vähemalt üks Basicus kirjutatud programm neid sisaldab: http://www.skyandtelescope.com/resources...page=2&c=y , fail "moonup.bas".

Ehk on lihtsam Basicu interpretaator PIC-i sisse lisada ja selle abil jooksutada seda algoritmi?

Kuna rangelt võttes on seda algoritmi vaja jooksutada vaid jooksva päeva jaoks, siis võib ju seda teha käivitamisel ja edaspidi südaöösiti.
Mina teeksin tabeli baasil ja interpoleeriks vahepealsed väärtused mingi polünoomi abil.
(09-04-2012, 11:11 AM)andrei Kirjutas: [ -> ]...Vähemalt üks Basicus kirjutatud programm neid sisaldab: http://www.skyandtelescope.com/resources...page=2&c=y , fail "moonup.bas".....
Tänks!!!
Ma hakkan failist algot välja sõeluma. Basic-u interpretaator on küll 1 võimalustest kuid tüütu - KOGU koodi peaks ringi kirjutama. JA trigonomeetria lib on mul PICi asmi jaoks olemas ja isegi ära proovitud. Isegi arcsin jms. funktsioonid.
Arvutaks tõesti korra ööpäevas kui asi väga pikaldane. Vist on sest tolle Kuu faasi arvutamise peale raiskan ka tervelt 0,5ms 32MHz takti juures !
Tabel...? Kas see peaks olema võimalik? Selles mõttes et mõistliku aja jaoks ette arvutatuna (no ikka paarkümmend aastat vähemalt) oleks ta vist liiga mahukas. Ja üldse oleks kena kui prose arvutaks asja võimalusel ikkagi jooksvalt. Mul on faasi arvutuses nagunii Y3K viga sees Smile
(09-04-2012, 09:35 PM)felch Kirjutas: [ -> ]
(09-04-2012, 11:11 AM)andrei Kirjutas: [ -> ]fail "moonup.bas"
Kuu faasi arvutamise peale raiskan ka tervelt 0,5ms 32MHz takti juures !
Mul on faasi arvutuses nagunii Y3K viga sees Smile
Miks see kuu liikumine nii kiire on et pool ms igavik tundub?

Kirjutasin selle bas-i C-ks ringi.
Proovisin et PICi C-s on funktsioonid olemas ja
katsetasin siis PC LCC-32 all.

Töötab, kiiresti, kõik on ilus aga tulemus on et
MOON UP ALL DAY

Tore programm. Sad
Ilmselt sai kuskil midagi natuke ...

Eile õhtul otsisin ja leidsin ühe teise "kuuuurija"
http://www.moshier.net/ seal cmoon.zip

Too oli nõus arvutama sellise vahemikus
interval from 3000 B.C. to 3000 A.D.
sellise täpsusega
* Years Arc
* from J2000 Seconds
* ---------- -------
* 0 0
* 100 .006
* 200 .006
* 500 .015
* 1000 .28
* 2000 6.4
* 3000 38.
* 10000 9400.

Kõik muutujad ikka double, 12 kohta peale koma.
Ainult et kasutas funktsioone milliseid ma näinud pole.
nt epsiln() ?

Vot selline lugu.
Tuleb ikka neid astronoomidest kursa-vendi-õdesid kiusata.







Tundub, et mõistlik vähemalt PC peal Basicu interpretaator korraks käima lüüa võrdlevate arvutuste tegemiseks.
Selle programmiga õnnestub ka teisi aegu ja teateid saada.
Kui kuskile mujale "rännata" või ajahüppeid sooritada.
Nüüd jääb ainult aru saada mis on mis.

Ja siis võib juba PICi peal proovida.
Mul siin juhuslikult käepärast 20 MHz isend.
(10-04-2012, 11:54 AM)A.R. Kirjutas: [ -> ]Töötab, kiiresti, kõik on ilus aga tulemus on et
MOON UP ALL DAY


See võib olla täiesti õige tulemus! Samuti see, kui mõni päev Kuu ei tõusegi.
(11-04-2012, 05:45 PM)felch Kirjutas: [ -> ]
(10-04-2012, 11:54 AM)A.R. Kirjutas: [ -> ]Töötab, kiiresti, kõik on ilus aga tulemus on et
MOON UP ALL DAY
See võib olla täiesti õige tulemus! Samuti see, kui mõni päev Kuu ei tõusegi.

Kui läksin sinnalõunapoolkerale siis seal ta oli
MOON DOWN ALL DAY
Ja nende kahe vahel liikudes siis kukkus kraade ja aegu näitama.
Mul see väljastus oli natuke teisiti kui seal basicus.

Kuidas Sinu aeg sisse tuleb? PICist?
Ja koht on püsikoht moblast?
Või muutub?

Sa nii põnevalt salapärane.
Kuidas selle kiirusega ikkagi on?
Ja mis PIC on kasutusel? 32MHz ja ?
Siis näeks kas translaator seda tunnistab.
Mul siin läheb proovimiseks PIC18F4550 USBst
sisse-välja. Kui huvi enne otsa ei saa. Sad

Mina loen aega DS1337 kivist. Koordinaadid kavatsen ette anda (PC-proge juhib kontrollerit ja monitoorib).
Salapärane...oh ei. Ma pole veel koodi endale selgeks teinud ega asmi valanud. Eriti hull ei tundu olevat. Ehk pole tegelikult kah.
Kkontrolleri andmed (skeemid, koodid nii prose - PIC18F46J11@32MHz kui ka PC proge @ Visual Basic) on kõik minu kodukal: copy-paste akvaariumifoorumist

- kontrolleri lähtekood ja kivisse "raiutav" kood (xx.hex fail): http://parsek.yf.ttu.ee/~felc/Aqua5/aqua5a_asm.zip
- Läpaka/lauaarvuti juhtprogrammi lähtekood: http://parsek.yf.ttu.ee/~felc/Aqua5/Aqua5_VB_kood.zip
- Sama asi aga installer Windowsi jaoks (lähtekoodi ei ole): http://parsek.yf.ttu.ee/~felc/Aqua5/Aqua5setup.exe
- Skeem ja trükiplaadi joonis + (NB!!!) plaadi vigade loetelu: http://parsek.yf.ttu.ee/~felc/Aqua5/aqua5a_cad.zip
- detailide loetelu (ja hinnad): http://parsek.yf.ttu.ee/~felc/Aqua5/aqua5_jupid.xls
- pilt kokkumonteeritud kontrollerist: http://parsek.yf.ttu.ee/~felc/Aqua5/aqua5_1.jpg
Skeem ja plaat on joonistatud Eagle nimelise progega, mille saab tõmmata (tasuta): www.cadsoft.de lehelt.
- Pisike kasutamisejuhend kah: http://parsek.yf.ttu.ee/~felc/Aqua5/Juhend.doc

Hakkan nüüd "moonup'i" uurima.
AR, mis formaadis too kood koordinaate ja ajatsooni tahab? Miski näide oleks kasulik.
Lehti: 1 2 3 4 5