\X START\READ PR_ORDER.MAC
\ON KEY F10 JUMP MASTER\+
\X BEGIN\+
\MOVE 1 TO #1003
\X AIRFOIL\+
\ON KEY 7181\ON KEY 18688\ON KEY 20736\+
\READ AIRFOIL5.PIC
\ON ERROR JUMP NONEWFONT
\READ FONT_USA.FON\CLEAR ON ERRORS\JUMP NEWFONT
\X NONEWFONT\READ 081109PW.FON
\X NEWFONT
\LOC 0,0\WID 20 C\HEI 40\OVE 0
HOW AN AIRPLANE
WING PROVIDES LIFT
\SHOW 80,76,1\READ 081109PW.FON
\LOC 0,42\WID 207 DOTS\HEI 12\SCRO 0,X,43
Direction of Forward Motion
\DRAW C4J5,63,R212G5U1E5H5D1F4L211
\LOC 222,68\WID 55 DOTS C\HEI 24\SCRO 0,X,33
LEADING
EDGE
\LOC 8,68\WID 65 DOTS C
TRAILING
EDGE
\LOC 20,98\WID 280 DOTS\HEI 120\OVE 1,A,7
This cross-section view of an airplane
wing shows that the wing bulges at the
top near the front and then tapers to a
point at the back.  This shape causes
air to flow in a manner that creates
lower pressure on the top, which effec-
tively "pulls" the wing up.
\LOC 20,100\WID 280 DOTS\HEI 99\OVE 1,A,6
\BL 0,175,319,200\WAIT RET 40\BL 8,68,71,92\+
\BL 220,69,278,92\+
When the airplane is moving very slowly,
as when taxiing or starting its takeoff
run, even pressure is exerted above and
below the wing and therefore it cannot
lift the airplane.  Here, greatly en-
larged air molecules are shown passing
over and under the wing.
\LOC 30,182\HEI 12\OVE 0,A,220
Press the "return" key to continue...
\CLEAR SPRITES\ROUNDS 2444 SPEED 7
\SPRITE P=3,1 T=R X=A L=-7,-5\SPRINT 2
\SPRITE P=4,29\SPRINT 2\SPRITE P=3,59\SPRINT 2
\SPRITE P=4,89\SPRINT 2\SPRITE P=3,119\SPRINT 2
\SPRITE P=4,149\SPRINT 2\SPRITE P=3,179\SPRINT 2
\SPRITE P=4,209\SPRINT 2\SPRITE P=3,239\SPRINT 2
\SPRITE P=4,279\SPRINT 2\ON KEY 7181 JUMP CONT4
\RUN
\X CONT4\ON KEY 7181\BL 0,68,79,99\BL 80,69,200,75
\SHOW 80,76,1\BL 80,92,200,99\BL 200,69,319,99
\READ 081109PW.FON\LOC 20,100\WID 280 DOTS\HEI 100\OVE 1,A,222
The air passing over the wing travels
further and faster than the air which
passes under the wing.  As the airplane
picks up speed, this causes the pressure
on top to be lower than on the bottom.
The wing "pulls" in the direction of the
lower pressure, lifting the airplane.
\LOC 30,182\HEI 12\OVE 0,A,221
Press the "return" key to continue...
\LOC 240,42\WID 75 DOTS C\HEI 24\SCRO 0,X,35
Direction
of lift
\DRAW J234,41C5F4D1H5L1G5U1E5D27R1U27
\CLEAR SPRITES\ROUNDS 2444 SPEED 7
\SPRITE P=5,1 T=R X=A L=-5,-7
\SPRITE P=6,19\SPRINT 2\SPRITE P=5,39\SPRINT 2
\SPRITE P=6,59\SPRINT 2\SPRITE P=5,79\SPRINT 2
\SPRITE P=6,99\SPRINT 2\ON KEY 7181 JUMP CONT5
\RUN
\X CONT5\ON KEY 7181\BL 0,68,79,99\BL 80,69,200,75
\SHOW 80,76,1\BL 80,92,200,99\BL 200,69,319,99
\LOC 20,100\WID 280 DOTS\HEI 100\OVE 1,A,4\READ 081109PW.FON
It should be noted that the propeller or
jet engine serves merely to move the
wing (and the airplane) forward through
the air, but they do NOT provide the
lift.  The distinctive shape of the wing
--known as an AIRFOIL--is what causes
the airplane to fly.
\CLEAR SPRITES\ROUNDS 2444 SPEED 4
\SPRITE P=5,1 T=R X=A L=-5,-7\SPRINT [2]
\SPRITE P=6,19\SPRINT 2\SPRITE P=5,39\SPRINT 2
\SPRITE P=6,59\SPRINT 2\SPRITE P=5,79\SPRINT 2
\SPRITE P=6,99\SPRINT 2\ON KEY 7181 JUMP MASTER
\RUN
\X MASTER\READ #97:MENU.TXT
\*
