Quite BASIC

From Rosetta Code