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
(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
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.
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.