SCREEN 13
CIRCLE (150, 100), 100, 14
PAINT (150, 100), 14
CIRCLE (130, 60), 10, 0
CIRCLE (165, 60), 10, 0
CIRCLE (130, 60), 3, 4
CIRCLE (165, 60), 3, 4
PAINT (165, 60), 4
PAINT (130, 60), 4
PSET (145, 90), 0
DRAW "R2 D2 L2 U2 "
CIRCLE (140, 120), 50, 0, 5
LOCATE 1, 17: COLOR 12: PRINT "SMILE"
SLEEP 5
CLS
SCREEN 13
LOCATE 9, 9: COLOR 4: PRINT "YOU'VE JUST BEEN ERASED"
SLEEP 1000