Programming C, C++, Java, PHP, Ruby, Turing, VB
Computer Science Canada 
Programming C, C++, Java, PHP, Ruby, Turing, VB  

Username:   Password: 
 RegisterRegister   
 WINKING FACE SCREEN SAVER
Index -> Programming, Turing -> Turing Submissions
View previous topic Printable versionDownload TopicRate TopicSubscribe to this topicPrivate MessagesRefresh page View next topic
Author Message
shorthair




PostPosted: Wed Dec 17, 2003 12:39 pm   Post subject: WINKING FACE SCREEN SAVER

alll values are non hardcoded , so you can edit this thing to hell

ENJOY THIS ONE GUYS & GALS
%===============================================================================================
setscreen ("noecho")
setscreen ("nocursor")
var circleradius, eyerad : int
var gapl, gapr : int
%===============================================================================================
var x : int
var y : int
circleradius := 30
eyerad := circleradius div 7
gapl := circleradius div 3
gapr := circleradius div 10
%===============================================================================================
proc face (x, y, sz, col : int)
const eyerad := sz div 7
const gap1 := sz div 3
const gap2 := 2*sz div 5

drawfilloval (x, y, sz, sz, col)
drawoval (x, y, sz, sz, black)
drawfilloval (x - gap2, y + gapl, eyerad, eyerad, black)
drawfilloval (x + gap2, y + gapl, eyerad, eyerad, black)
drawarc (x, y, 3 * sz div 4, 3 * sz div 4 , 200, 340, black)
for decreasing i : eyerad .. 1
drawoval (x + gap2, y + gapl, eyerad, i, yellow)
delay (50)
end for
for i : 1 .. eyerad
drawoval (x + gap2, y + gapl, eyerad, i, black)
delay (50)
end for
end face



loop
%============================================================================================
randint (circleradius, 10, 55)
randint (x, circleradius, maxx - circleradius)
randint (y, circleradius, maxy - circleradius)

%=============================================================================================
face (x, y, circleradius, yellow)
end loop
Sponsor
Sponsor
Sponsor
sponsor
koby93




PostPosted: Fri Jan 09, 2004 9:35 am   Post subject: (No subject)

u wanna rat on ppl because they do these programs in class well here is another one!! Wink Wink Wink Wink Wink
Mazer




PostPosted: Fri Jan 09, 2004 4:25 pm   Post subject: (No subject)

My goodness.

I must say, that the other day I happened to come across a leet amount of bits. I was planning on keeping my bit count at a leet level forever (by donating 2 bits randomly each time I posted) but this program is way too much (if you don't know what I'm talking about with the bits, maybe that's for the best). So simple yet so freakishly cool. show up around the eye when it blinks but I'm sure you can fix that. All you really need is some weird happy-ish music to go along with the winking faces. Though some weird spot Try to get that sound that chocobo's make and have it play every time a face pops up. And in case you don't already know, you can actually compile it into a screensaver (though it'd work better in 3.1 and using fullscreen. Anyways, +all my bits
Tony




PostPosted: Fri Jan 09, 2004 5:07 pm   Post subject: (No subject)

mazer Confused wtf? where did you get 1800 bits? Thinking
Latest from compsci.ca/blog: Tony's programming blog. DWITE - a programming contest.
rizzix




PostPosted: Fri Jan 09, 2004 5:29 pm   Post subject: (No subject)

u know there is a saying.. the more u give the more u recieve. wierd but for the first time i can actually see this happening clearly
shorthair




PostPosted: Fri Jan 09, 2004 5:32 pm   Post subject: (No subject)

Wow thanks mazer , im gonna spice up my name with some color and go donate some bits to a good cause ( SO ALL YOU CODERS , GET YOUR PROGRAMS UP AND THERE MIGHT BE A SURPRISE FOR YOU) Very Happy Very Happy


By the way , my turing documentation wont work ( ts been deleted ) and i cant come by a turorial to compile it as a screensaver , so could someone just give me a quick run through of how its done
Mazer




PostPosted: Fri Jan 09, 2004 6:01 pm   Post subject: (No subject)

tony wrote:
mazer Confused wtf? where did you get 1800 bits? Thinking

huh? wha? Tony, I'm counting 0 bits here. Well, 2 bits once I post this reply.
shorthair




PostPosted: Fri Jan 09, 2004 6:03 pm   Post subject: (No subject)

i already had 500 so he had about 1300 THANKS AGAIN
DanShadow




PostPosted: Fri Jan 09, 2004 6:44 pm   Post subject: (No subject)

wow....thats a lot of bits for just random winking faces....lol
Display posts from previous:   
   Index -> Programming, Turing -> Turing Submissions
View previous topic Tell A FriendPrintable versionDownload TopicRate TopicSubscribe to this topicPrivate MessagesRefresh page View next topic

Page 1 of 1  [ 9 Posts ]
Jump to:   


Style:  
Search: