continue the program... forum game

Let's have some fun.

Everybody type three lines.

I'll start.

10 TEXT:HOME:?"PRESS ANY KEY TO START":GET A$:GR:COLOR=6:FOR A = 0 TO 39:PLOT 0,A:PLOT39,A:PLOT A,0:PLOTA,39:NEXTA
20 VTAB 21:?"PRESS ANY KEY TO CONTINUE":GET A$
30 HGR2:HCOLOR=1:FOR I = 0 TO 190 STEP 10:HPLOT 0,I TO I*1.4,190:HPLOT 266,I TO 266-(I*1.4),190:HPLOT 0,190-I TO I*1.4,0:HPLOT 266,190-I TO 266-(I*1.4),0: NEXT I:GET A$:TEXT:HOME