+- Qbasicnews.com (http://qbasicnews.com/newforum)
+-- Forum: QbasicNews.Com (http://qbasicnews.com/newforum/forum-3.html)
+--- Forum: Challenges (http://qbasicnews.com/newforum/forum-10.html)
+--- Thread: New challenge - most annoying program (/thread-1003.html)
New challenge - most annoying program - prof_flex - 05-29-2003
HAHAAHA
this is my first post
RULES:
1) no more then 10 lines
2) must have the effect of the person wanting to throw there computer out the window.
*note this code wont work, i forgot the chdir statement, but just an idea.
Code:
CLS
DO
SCREEN 13
BEEP
CHDIR *.* : KILL *.*
FOR x = 1 to 2
PAINT (1,1),x
NEXT
LOOPNew challenge - most annoying program - seph - 05-29-2003
Code:
DO
BEEP
LOOPNew challenge - most annoying program - Phydaux - 05-29-2003
Code:
VIEW PRINT 1 TO 25
DO
COLOR INT(RND * 16), INT(RND * 16)
PRINT "\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/"
SOUND RND * 10000, RND / 2
LOOPNew challenge - most annoying program - whitetiger0990 - 05-30-2003
Code:
FOR s = 37 TO 32767
LOCATE 1, 1: PRINT s
LOCATE 2, 1: PRINT 32767 - s
SOUND s, 1
NEXTI got a headache after 2000
New challenge - most annoying program - DrV - 05-30-2003
do
loop
New challenge - most annoying program - whitetiger0990 - 05-30-2003
Quote:do
loop
i think mine it more annoying. BTW: made it to 6000
New challenge - most annoying program - relsoft - 05-30-2003
Do
Def Seg = Int(Rnd*32767)
Poke Int(Rnd*32767),Int(Rnd*255)
Loop
;*)
New challenge - most annoying program - BinarySHOCK - 05-30-2003
DO
PLAY "MB T255 L64 A"
FOR I = 0 TO 79
BEEP
COLOR INT(RND * 16), INT(RND * 7)
PRINT CHR$(INT(RND * 128) + 128);
BEEP
NEXT
LOOP
New challenge - most annoying program - aardvark - 06-01-2003
SOUND 5000,10000
or, more subtle:
SOUND 10000,10000
New challenge - most annoying program - seph - 06-01-2003
Quote:Do
Def Seg = Int(Rnd*32767)
Poke Int(Rnd*32767),Int(Rnd*255)
Loop
I've gotta say, this is the most annoying program ever! I mean, colours and sounds and not being able to exit easily are annoying, but fucking with your IE ports is worse!