Launch rocket with countdown and acceleration in stdout: Difference between revisions

Content added Content deleted
(hmmm... the <lang> tag doesn't like pipes or backslashes. Oh well.)
m (changed back slash character into chr(92), it was messing up de code highlighting)
Line 8: Line 8:
<lang freebasic>#define sky 32
<lang freebasic>#define sky 32
dim as string rocket(1 to 7) = { " ^",_
dim as string rocket(1 to 7) = { " ^",_
" / \",_
" / " + chr(92),_
" I I",_
" | |",_
" I H I",_
" | H |",_
" I I",_
" | |",_
" /I/ \I\",_
" /|/ \|" + chr(92),_
"/_II.II_\" }
"/_||.||_" + chr(92) }


dim as double h = 0, dhdt = 0, d2hdt2 = 0.3, t, countdown = 5, dt
dim as double h = 0, dhdt = 0, d2hdt2 = 0.3, t, countdown = 5, dt