Warning: session_start(): Session cannot be started after headers have already been sent in /home/tvrreohg/public_html/manga.php on line 13
{|j ~ d Z ddlmZmZmZmZ dZ G d de Z G d de Z
d Z e d k( r e e y
y
) a turtle-example-suite:
tdemo_planets_and_moon.py
Gravitational system simulation using the
approximation method from Feynman-lectures,
p.9-8, using turtlegraphics.
Example: heavy central body, light planet,
very light moon!
Planet has a circular orbit, moon a stable
orbit around the planet.
You can hold the movement temporarily by
pressing the left mouse button with the
mouse over the scrollbar of the canvas.
)ShapeTurtlemainloopVec2D c e Zd Zd Zd Zd Zy)GravSysc . g | _ d| _ d| _ y )Nr g{Gz?)planetstdt)selfs 3/usr/lib64/python3.12/turtledemo/planet_and_moon.py__init__zGravSys.__init__ s c F | j D ] }|j y )N)r init)r ps r r z GravSys.init s A
FFH r c t d D ]B }| xj | j z
c_ | j D ] }|j D y )Ni' )ranger r
r step)r ir s r startz
GravSys.start s9 u A FFdgg F\\ " r N)__name__
__module__ __qualname__r r r r r r r s r r c $ e Zd Zd Zd Zd Zd Zy)Starc t j | | | j || _ | j | || _ |j j | || _ | j d | j y )N)shapeuser) r r penupmsetposvr appendgravSys
resizemodependown)r r$ xr& r( r! s r r z
Star.__init__' s` E*
A t$ r c | j j }| j | _ | j d|z | j z z | _ y )N ?)r( r
accar& r r
s r r z Star.init1 s8
\\__#b&-'r c t dd }| j j D ]Q }|| k7 s |j | j z
}|t |j
z t
| dz z |z z
}S |S )Nr )Vecr( r posGr$ abs)r r/ planetr& s r r. zStar.acc5 si !Hll**F~JJL+ajQ*A-- + r c | j j }| j | j || j z z | j j
j
| dk7 r7| j | j | j j
d | j | _
| j || j z z | _ y )Nr ) r( r
r% r4 r& r index
setheadingtowardsr. r/ r0 s r r z Star.step< s
\\__ DHHJDFF*+ << % %d +q 0 OODLL )=)=a)@ A B"TVV)#r N)r r r r r r. r r r r r r & s ($r r c t } | j | j j dd | j | j | j
d | j d | j | j dd | j | j }| j | j dd | j | j }t d }|j |d |j |d | j j d| | j j d d t }t! d
t# dd t# dd |d }|j% d
|j' d |j t! dt# dd t# dd |d }|j) d |j' d t! d t# dd t# dd |d }|j) d |j' d |j+ |j- y)Nr Z compoundorangebluer7 i@B g circleyellowg?i0 greeng? i' r- zDone!)r reset getscreentracerhtpufdlt
begin_polyrD end_polyget_polyr addcomponentregister_shaper r r3 color shapesizepencolorr r )sm1m2 planetshapegssunearthmoons r mainra F s AGGIKKM1 DDFDDFDDGDDHLLNHHQJJL
BLLNHHQsOJJL
B
#K R) R'KKM ;7KKM1
B
wAa#a+r8
rf sO $ 9 8 f $6 $@%N zF J r