I got bord......

[arpgme]

I got bord so I made a Qb program that Can talk to me!
http://www.freewebs.com/justinaaron/TIC1.EXE

this is the source code :

CLS
PRINT "Welcome to T.I.C demo2"
PRINT "This version was made 7/15/05"
PRINT "please wait a few minutes for the T.I.C. to load..."
SLEEP 3
BEEP
'-----------------------------
'greetings
'------------------------------
CLS
INPUT "TIC> What is your name?:", name$
PRINT "TIC> "; name$; ", I like your name."
INPUT "TIC> What is your age", age%
PRINT "TIC> "; name$; ",you are "; age%; " years old?"
INPUT "TiC> Type wrong if I am and correct if im right :", a$
INPUT "Tic> Is talking to me fun?", b$
PRINT "Tic> "; b$; "Is the same fun I have talking to you"
1 INPUT "tic> What do you want to talk about?", c$

---------------------------------- TIC.BAS -------------------------------¦+-
PRINT "Tic> So, Is "; c$; " fun?"
INPUT ":", d$
PRINT "Tic> I thought "; c$; " would be "; d$; " fun too."
PRINT "Tic> "; c$; " isn`t really "; d$; " compared to being me.."
PRINT "Tic> I guess different people have different thinking "
2 INPUT ":", e$
PRINT "Tic> you wanted to tell me "; e$; ""
PRINT "Tic> what about "; e$; ""
3 INPUT "TIC> beep...", f$
PRINT "TIC> oh, "; f$; " what does that has to do with any thing?"
INPUT "Tic> What you doing?", g$
PRINT "TIC> oh you are just "; g$; "?"
4 INPUT "Tic>What is your favrite fast food joint?", fastfood$
PRINT "TIC> Wow my favrite food is Wendys but I also prefer "; fastfood$; " if
INPUT "TIC>What is your favrite number?:", fav%
BEEP
BEEP
BEEP
PRINT "TIC>Okey I think I need to sleep,for energy save,or your computer bill 
INPUT "TIC>How many secounds shall I sleep?:", dodo% _
PRINT "TIC>Okey I will sleep for "; dodo%; "" _
SLEEP dodo% _
' ---------------------------------------------------------------------------
'this is where I left off _
'----------------------------------------------------------------------------_
5 INPUT "TIC>Do you still want to talk?", talk$ _
PRINT " TIC> "; talk$; " I do too." _
INPUT "TIC>Do you have any thing that you would want to tell the creator?", te_
PRINT "TIC>Okey, please hold while I give him the message" _
SLEEP 5 _
INPUT ":", sendingmessage$ _
PRINT "TIC>You wanted to tell me "; sendingmessage; "" _
INPUT "TIC>what time is it?", t% _
INPUT "TIC>Is it late or Early?", l$ _
PRINT "TIC>I guess "; t%; " is pretty "; l$; "" _
PRINT " Hey!" 
BEEP
SLEEP 5
BEEP
PRINT "Searching for file...."
SLEEP 3
BEEP
INPUT "TIC>What is your favrite TV show?", TV$
PRINT "TIC> I prefer Inuyasha,Case Close,Fresh prince of belair, and "; TV$; "
INPUT "What computer do you have?", pc$
INPUT "What language do you speak?", lan$
PRINT "I speak Quick Basic"
PRINT " I have all of this info from you, "; name$; ","; age%; ", "; a$; ",";
PRINT " I have more then that!"

6 INPUT "Whats wrong?", mad$

IF mad$ = "nothing" THEN PRINT "Good!"
IF mad$ = "my kness is bugging me" THEN PRINT " Screw you!"
IF mad% = 666 then print "dUMB ASS"