
new


4 print "hit space several times"
5 rem from the book, page 80.  Needs 2 pages.
10 screen 1,2,2:gosub 80
20 screen 2,2,2:gosub 80
30 screen 3,2,2:gosub 80
40 screen 4,2,2:gosub 80
50 screen 1,1,1
60 end
80 line (30,50)-(200,130),2,BF
90 line (0,0)-(255,191),1
95 line (0,0)-(255,191),2
96 line (0,0)-(255,191),3
100 line (90,25)-(190,160),2,B
110 k$=inkey$:if k$="" then 110
120 return

