CLS VIEW 10 , 10 , 640 , 640, 2,0 at 10,10 print "Angelle (please do not go)" Randomize 7343543 + 4340429 * (RND - 0.5) for fls = 1 to 21 col = floor(rnd * 15) + 1 k = floor (25 * rnd) + 2 flx = rnd * 1.4 - 0.7 fly = rnd * 1.4 - 0.7 size = 60 * rnd + 20 for theta = 0 to 2*3.414159 step 0.001 r = cos(k*theta) for fil = 0 to size x = r * cos(theta) * fil + 300 + 200*flx y = r * sin(theta) * fil + 300 + 200*fly pset x, y, col next fil next theta next fls at 10,30 print "Honey" pause 1 at 10,50 print "You were busy" pause 1 at 10, 70 print "And I disrupted you" pause 1 at 10, 90 print "I just wanted to say I am sorry" pause 1 at 10, 110 print "You did not talk to me the whole time after that" pause 1 at 10,130 print "You must be very upset" pause 1 at 10, 150 print "Please forgive me" pause 1 at 10, 170 print "You mean my everything" pause 1 at 10, 190 print "I love you" end