clg
For n = 1 to 150
color rgb(50+n,50+n,50+n)
circle rgb(150,150,150-n)
next n
For n = 1 to 150
color rgb(50+n,50+n,50+n)
circle rgb(150,150,150-n)
next n
This is a set of small programs in Basic-256, related to various topics. Just copy,paste and run. Note : Sometimes programs do not run in recent BASIC 256 versions.
No comments:
Post a Comment