Animate a pendulum: Difference between revisions

m (→‎{{header|C sharp}}: Regularize header markup to recommended on category page)
Line 982:
 
<lang>on animate
clear
clear_screen
move_penmove 50 50
draw_circlecircle 1
x = 50 + 40 * sin ang
y = 50 - 40 * cos ang
draw_lineline x y
draw_circlecircle 5
vel += sin ang / 5
ang += vel
.
ang = 1045</lang>
 
=={{header|Elm}}==
1,983

edits