ti. "COIN TOSS"
p. v$. 
p.
p. "         by Scott Leffler"
p. "         wsl@bright.net"
p.
p.
p. "tap screen to start"
ip.
CLS
30
cls
p. "call it in the air"
p.
p.
p.
p.
p. "tap screen to toss coin"
ip.
cls
b.
A= ra. 2
fo.
if a= 0 then p. "          HEADS"
if a= 0 then g. 50
else p. "         TAILS"
50
p.
p.
p.
p.
fo.
p. "play again?" 
p.
p.
p.
p.
fo.
       
p. "SCHEDULE for yes" 
p. "MEMO for no" 
fo.
a = inpen
if posx = 5 then e.
if posx = 3 then g. 30
p.

