ASCII Art "Flight Simulator"
TI-BASIC, 62 bytes
:Input A
:A
:For(N,3,8
:ClrHome
:Output(8,1,&quot;----I     I----
:Output(N,Ans,&quot;--O--
:Ans+(Ans&lt;6)-(Ans&gt;6
:End

Note that TI-BASIC does not support _ or | and therefore I replaced with a capital I and -. This should not effect byte count.