this is kind of like the insults program(not by me) try out both the insults program is funny(kind of)

watch

                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    REM Project: annoy
REM Created: 8/26/2005 3:25:36 PM
REM
REM ***** Main Source File *****
REM

rem print start logo
center text screen width()/2,screen height()/2,"START"
width=text width("START")
height=text height("START")

repeat
ink rgb(255,0,255),0

if mouseclick()=1
goto start
endif
cls
if mousex()>screen width()/2-width/2 or mousex()<screen width()/2+width/2
if mousey()>screen height()/2+height/2 or mousey()>screen height()/2-height/2
box screen width()/2-width/2,screen height()/2-height/2,screen width()/2+width/2,screen height()/2+height/2+5,255,255,255,255
endif
endif
center text screen width()/2,screen height()/2,"START"
until sc=2

start:
for n=1 to 1000000
ink rgb(rnd(255),rnd(255),rnd(255)),0
text rnd(screen width()),rnd(screen height()),"YOU SUCK"
sleep 200
next n