
new

5 rem from the book, page 80, needs 2 pages
10 screen 3,2,2:color 2:cls
20 for i=20 to 145 step 25
30 line(10+i,5+i/2)-(230-i/3, 105+i/2),2,b
40 next
50 paint(35,20),3,2
60 paint(85,55),2,2
70 paint(135,95),4,2
80 k$=inkey$:if k$="" then 80

