\ON KEY F10 JUMP MENU
\MOVE 1 TO #1004
\CLEAR SCREEN
\LOC 140,3\HEI 189\OV 1,A,218\WID 180 DOTS
When the heart beats,
blood flows into the 
upper two chambers
called the atria, then
through the tricuspid
and mitral valves to
the ventricals.  It
is then pumped to the
body, brain, and lungs 
through the pulmonary
artery and the aorta.
\LOC 0,138\WID 320 DOTS C\OV 0,A,229\HEI 82
From THE ENGINE OF LIFE by
John Keenan and Russell Hoffman.
Copyright (c) 1984-1990 by
Real Estate Development Corp.,
Greenwich, Connecticut.
\ROUNDS 222 SPEED 97
\READ DAPPLED2.PIC
\ON KEY 7181 JUMP NEXT1
\SHOW 12,0,1,8
\X NEXT1\ON KEY 7181
\MOVE 0 TO #99
\X BEGIN
\MOVE 0 TO #99
\ON KEY F10 JUMP MENU
\*OVE 1 TO #1006
\MOVE 1 TO H
\NAME #4=CORRECT\MOVE 1 TO CORRECT
\NAME #5=CALLED\MOVE 0 TO CALLED
\JUMP REAL_START
\X START
\CLEAR SPRITES
\IF CALLED=0\MOVE 1 TO H
\IF CORRECT=2\ROUNDS 405
\ELSE\ROUNDS 405 SPEED 6\ENDIF
\SPRITE R=13,14 L=16,57\SPRINT [2]
\SPRITE R=133,133 L=0,20 W=16,57,23,63\SPRINT 5
\SPRITE L=2,20 X=NO A=NO W=0,0,319,199
\SPRITE S=1,3 R=16,102 I=2,2\SPRINT [12]
\SPRITE S=52,3\SPRINT [12]
\SPRITE S=98,3 R=16,74 I=4,4\SPRINT [12]
\SPRITE S=264,3 R=16,61\SPRINT [12]
\SPRITE R=71,163 I=4,4 S=169,1\SPRINT [12]
\SPRITE S=1,3 I=2,2 R=126,244\SPRINT [7]
\SPRITE S=53,3 R=130,216\SPRINT [7]
\SPRITE S=99,3 R=130,224\SPRINT [7]
\SPRITE S=264,3 R=130,328\SPRINT [7]
\SPRITE R=151,202 S=131,3\SPRINT [7]
\SPRITE R=151,293 I=4,4 S=169,2\SPRINT [7]
\SPRITE R=146,325
\SPRITE S=1,12 L=0,20 I=48,48\SPRINT [8]
\SPRITE S=192,12 R=147,325\SPRINT [8]
\SPRITE S=1,3 I=8,8 R=252,449\SPRINT [13]
\SPRITE S=192,3 R=252,450\SPRINT [13]
\SPRITE L=20,50
\X NO_CONDUCT
\IF CORRECT=2\ELSE\JUMP NO_EKG\ENDIF
\SPRITE S=6,3 L=10,50 I=7,7 R=0,155\SPRINT [14]
\SPRITE R=143,164 I=44,44 S=265,15\SPRINT [14]
\SPRITE R=164,225 I=8,8 S=500,8\SPRINT [14]
\SPRITE R=226,515 I=5,5 S=600,8\SPRINT [14]
\X NO_EKG
\RUN FROM H
\BLANK 0,152,118,187\MOVE C TO H
\IF CALLED=0\JUMP START\ENDIF
\MOVE 0 TO CALLED
\RETURN
\X FAILED\MOVE 3 TO #774\JUMP MENU
\X REAL_START\IF #774>1\JUMP MENU\ENDIF\ON ERROR JUMP FAILED
\READ CONDUC90.PIC\ON ERROR\MOVE 0 TO #774
\ON KEY F10 JUMP MENU
\IF B=17408\JUMP MENU\ENDIF
\CLEAR SCREEN\SHOW 0,20,5
\LOC 140,30\HEI 169\WID 180 DOTS\OVE 0,A,223
The conducting system,
shown to the left,
channels the heart's
electrical impulse
which causes the heart
to contract.  The flow
of electricity starts
in the right atria and
spreads across the
atria and then down the
septum to the ventricals.
\LOC 30,187\OVE 0,A,231\WID 281 DOTS\HEI 12
Press "return" to continue text
\ON KEY 7181 JUMP CONT1
\JUMP START
\X CONT1
\ON KEY 7181
\LOC 20,0\OVE 0,A,216\WID 280 DOTS C\HEI 12
ANATOMY OF THE CONDUCTING SYSTEM
\DRAW J42,10,C7R234
\LOC 140,12\OVE 0,A,228\WID 180 DOTS\HEI 180
\"
\"
Each heartbeat begins
in a specialized clump
of cells located in the
wall of the right
atrium near the superior
vena cava. This group
of cells is called the
Sinoatrial Node or
SA Node for short.
\BL 120,132,319,185
\SHOW 0,20,5\SHOW 16,57,2
\DRAW J140,121,C4R100J140,132,C4R46
\DRAW J25,55,C5,U4E1D5R5G1L5E10D1G9
\LOCATE 20,31\OVE 22\HEI 44\WID 55 DOTS
SA NODE
\BL 0,187,319,199\WAIT RET -1
\LOC 140,12\OVE 0,A,229\WID 180 DOTS\HEI 180
\"
The cells in the SA
node depolarize at a
faster rate than cells
elsewhere in the heart.
While other cells are
still pumping potassium
ions in and sodium ions
out, the flow in the SA
node reverses.  The
depolarization wave that
causes the heart to con-
tract originates in the
\LOC 40,154\OVE 0,A,229\WID 280 DOTS\HEI 44
the SA node.  For that reason, it is
called the heart's pacemaker.
\LOCATE 0,31\OVE 8\HEI 44\WID 100 DOTS
THE PACEMAKER
\WAIT RETURN -1
\X CONT4
\SHOW 0,20,5
\BL 120,12,319,154\BL 0,154,319,199
\ROUNDS 75 SPEED 41
\MOVE 1 TO CALLED\MOVE 10 TO H
\CALL START
\DRAW J38,82,C3R4F1L5D5H1U5F10U1H8
\LOC 45,98\OVE 0\WID 50 DOTS\HEI 33
AV Node
\LOC 140,12\OVE 0,A,227\WID 180 DOTS\HEI 180
\"
When the SA Node fires
off an electrical
impulse, the impulse
spreads across the right
and left atrium, causing
those chambers to
contract.  Before the
artial contraction is
complete, the impulse
reaches the Atrio-
ventricular Node, also
known as the AV Node.
\"
\WAIT RET -1\CLEAR SPRITES
\SPRITE L=0,20 W=33,82,200,189\SPRINT [5]
\ROUNDS 1 SPEED 1\RUN
\MOVE 1 TO CALLED\ROUNDS 82 SPEED 5
\MOVE 15 TO H
\CALL START
\ROUNDS 146 SPEED 30\RUN FROM H
\SHOW 26,130,6\LOC 14,100\OVE 0\WID 70 DOTS\HEI 55
Closeup of
AV NODE
\LOC 140,20\OVE 0,A,227\WID 180 DOTS\HEI 180
\"
The AV Node, shown in
closeup here, contains
special fibers that slow
down the electrical
signals before trans-
mitting them toward the
ventricles.  This slow-
down gives the atria
time to complete their
contraction before the
ventricles receive their
signal to contract.
\WAIT RET -1\CLEAR SPRITES
\SPRITE L=0,20 W=0,95,200,189
\SPRINT [5]\ROUNDS 1 SPEED 1\RUN
\BL 0,149,80,179\CLEAR SPRITES
\SPRITE S=247,9 I=32,32 R=1,2 L=0,20\SPRINT 12
\SPRITE R=2,9 S=1,12 L=0,20 I=24,24\SPRINT 8
\SPRITE S=192,12 R=2,9\SPRINT [8]
\ROUND 9 SPEED 85\RUN\CLEAR SPRITES
\FRAME 0,20,120,130\MOVE 1 TO #99
\SHOW 0,20,28,28,G
\LOC 83,83\WID 17 DOTS\OVE 0\HEI 14
AV
\LOC 65,93\WID 50 DOTS\OVE 0\HEI 14
Bundle
\DRAW J61,90,C6,U4E1D5R5G1L5E10D1G9
\LOC 0,98\OVE 0\WID 38 DOTS\HEI 54
Right
\WID 27 DOTS
and
\WID 31 DOTS
left
\WID 61 DOTS
branches
\DRAW J55,114,C8,L5G1R6D5E1U5G10U1E9
\LOC 140,13\OVE 0,A,222\WID 180 DOTS\HEI 180
After the electrical
impulses pass through
the AV Node, they enter
the AV Bundle.  The AV
Bundle divides into the
right and left branches.
The fibers in the bunches
transmit the signal with
great speed down into the
ventricles.  Notice that
the atria are beginning
to repolarize as the
ventricles are starting
to depolarize.
\WAIT RET -1\SHOW 0,20,28
\DELETE FRAME 28\MOVE 0 TO #99
\BL 104,73,110,99\CLEAR SPRITES
\SPRITE S=1,3 I=2,2 R=26,144 L=2,20
\SPRINT [7]
\SPRITE S=53,3 R=30,116\SPRINT [7]
\SPRITE S=99,3 R=30,124\SPRINT [7]
\SPRITE S=264,3 R=30,228\SPRINT [7]
\SPRITE R=51,97 S=131,3\SPRINT [7]
\SPRITE R=51,193 I=4,4 S=169,2\SPRINT [7]
\SPRITE R=46,225
\SPRITE S=1,12 L=0,20 I=48,48\SPRINT [8]
\SPRITE S=192,12 R=47,225\SPRINT [8]
\ROUNDS 64 SPEED 44\RUN FROM 25
\LOC 140,14\OVE 0,A,228\WID 180 DOTS\HEI 180
\"
\"
The impulses pass into
the Purkinje Fibers
which fan out across
the walls of the
ventricles.  The
Purkinje Fibers
transmit the impulses
swiftly through the
ventricles causing
them to contract.
\"
\"
\DRAW J35,141,C9L5D1R5D5R1U5G10U1E10
\DRAW J98,141,C12D5R1U5R5D1L5F10U1H10
\LOC 22,157\OVE 0\WID 150 DOTS\HEI 12
Purkinje Fibers
\WAIT RET -1\BL 1,141,45,156
\BL 98,141,115,156\BL 0,156,144,166
\LOC 20,0\WID 260 DOTS C\OVE 0,A,226\HEI 12
THE CONDUCTING SYSTEM IN ACTION
\DRAW J25,10,C0,R13C13,R221C0R20
\LOC 140,13\WID 180 DOTS\OVE 0,A,227\HEI 180
\"
\"
\"
\"
Repolarization follows
depolarization in a
constant cycle of
electrical activity.
\"
Press "return" to go
back to the main menu.
\"
\ON KEY 7181 JUMP MENU
\SPRITE S=1,3 I=8,8 R=133,228\SPRINT [13]
\SPRITE S=192,3\SPRINT [13]
\SPRITE S=242,9 I=32,32 R=122,124 L=0,20\SPRINT 7
\ROUNDS 248 SPEED 4\RUN FROM C
\MOVE 0 TO CALLED
\JUMP START
\X MENU\CLEAR SPRITES\FRAME ?
\IF A=28\DELETE FRAME 28\MOVE 0 TO #99\ENDIF
\READ MENU.TXT
\END
\*END OF TEXT
