10 clear : print "Apple Spam! ";: gosub 10