My First Program!!! Whee!

[midnightsky255]

Lookie what I did...


---------Programmed in QBasic---------

' Michael Lentine
' 2005 Dec 31
' "Hey Band" Address Inquiry

CLS

DIM nombre AS STRING
DIM direccion AS STRING
DIM ciudad AS STRING
DIM estado AS STRING
DIM zip AS STRING
DIM contesta AS STRING

INPUT " What is your name?", nombre
INPUT " What is your street address?", direccion
INPUT " In what city do you live?", ciudad
INPUT " In what state do you live?", estado
INPUT " What is your Zip Code, Fucker?", zip
PRINT

DO
INPUT " Hey Band...", contesta
PRINT

IF contesta <> "Hey What..." THEN
PRINT " ...No... Go find a member of the LVR Patriots and ask them... "
PRINT
END IF
LOOP UNTIL contesta = "Hey What..."

PRINT " YAY! Band Party at this address:"
PRINT
PRINT " "; nombre
PRINT " "; direccion
PRINT " "; ciudad; ", "; estado; " "; zip

---------/Programmed in QBasic---------

^_^!!

-Misha
=^^= ~~