Ik ben op zoek naar een toerental simulator.
Ik wil me namelijk met behulp van zoiets een idee proberen te vormen hoe
snel een bepaalde snelheid is, om dan te kunnen beslissen wat de juiste
snelheid is voor wat ik wil maken.
Mag ook een animatie zijn van bv een cirkel met aan de rand een punt welk
dan door het telkens weer opnieuw verplaatsen van het punt de indruk geeft
te draaien.
Deze zou dan instelbaar moeten zijn zodat ik de "snelheid" zelf kan ingeven.
PS, het gaat over zeer trage snelheden, ik den aan een orde van 1 a 2 rpm.
Dank,
MP
Ooit wel eens gedacht aan een klok ?
De secondewijzer draait 1 rpm
--
CU, Rob / gompy.net
Don't follow me, I'm lost too.
Ja hoor,
Maar ik zou graag nog andere snelheden willen zien.
Meer bepaald nog trager.
Maar nu ik het zo zeg, kan ik misschien op zoek naar een videoopname van een
klok, en die wergeven via een prog waar ik de weergavesnelheid kan
instellen.
Je bent bij deze zeer bedankt,
Groetjes,
MP
Ik raak blijkbaar bij jou ook niet binnen.
Heb jij ergens een tijdelijk mailadresje?
Groetjes,
MP
PS alvast bedankt.
Of, kan je het ergens posten, bv op een site?
Dat klopt, ik gebruik ook een fake adres voor de NG's. Hier is de broncode
in BBC Basic 4 Windows.
print "Geef het toerental in r/m. Denk om de decimale punt dus bv. 0.4 voor
1 toer per 2,5 minuten"
t0=time
input "R/M=" t
repeat
alva =2*pi*t*(time-t0)/6000
beta=alva+pi/2
cls
circle 900,700,400
line 900-400*sin(alva),700-400*cos(alva),900+400*sin(alva),700+400*cos(alva)
line 900-400*sin(beta),700-400*cos(beta),900+400*sin(beta),700+400*cos(beta)
wait 2
until false
end
Als je nu nog een interpreter ophaalt, de gratis trial versie van B4W, bij
voorbeeld hier:
http://download.cnet.com/BBC-BASIC-for-Windows/3000-2069_4-10292431.html
Zou het moeten runnen.
Voor een *.exe file, dit progje gecompileerd, zal je toch een e-mail adres
moeten noemen.
Succes,
HWtn
print "Geef het toerental in r/m. Denk om de decimale punt dus b.v.
0.4 voor 1 toer per 2,5 minuten"
t0=time
input "R/M=" t
repeat
alva =2*pi*t*(time-t0)/6000
beta=alva+pi/2
gcol 0
circle 900,700,400
line
900-400*sin(alva),700-400*cos(alva),900+400*sin(alva),700+400*cos(alva)
line
900-400*sin(beta),700-400*cos(beta),900+400*sin(beta),700+400*cos(beta)
wait 2
gcol 15
line
900-400*sin(alva),700-400*cos(alva),900+400*sin(alva),700+400*cos(alva)
line
900-400*sin(beta),700-400*cos(beta),900+400*sin(beta),700+400*cos(beta)
until false
end
HWtn