New Ideas (New Features)

by Jim ⌂ @, Russell, KY, Monday, December 31, 2012, 05:47 (1808 days ago) @ M Santos

A new smile for you and all you are doing for us.

# requires BASIC256 version 0.9.9.25 or later
cls
print "press any key to stop Mr. Winky."
clg
color yellow
circle 150,150,150
color black
chord 50,50,200,200,radians(135),radians(90)
circle 100,100,20
do
if rand <= .7 then
color black
circle 200,100,20
else
color yellow
circle 200,100,20
color black
arc 180,80,40,40,radians(-45),radians(90)
end if
pause rand
until key
end


Complete thread:

 RSS Feed of thread

powered by my little forum