Re-enactment of the program that made me start programming

Nostalgia...

So I downloaded a version of QBasic today. This is a re-enactment of one of the first computer programs that I wrote in 1995 when I was 11 years old sitting in computer class.

The code might have been copied from QBasic help, but looking through here, http://www.qbasicnews.com/qboho/, I couldn't seem to a find an example that does this. Anyone seen an example in QBasic help that draws random purple rectangles on screen?

Basically, when I saw that I could do this with a computer...write commands and create something from nothing...I was hooked.

Source code here:
SCREEN 7
COLOR 5, 0
RANDOMIZE TIMER
DO CLS x = INT(RND * 320) y = INT(RND * 200) size = INT(RND * 10) + 10 LINE (x, y)-(x + size, y + size), , BF
LOOP WHILE INKEY$ = ""

Category:

Education

Tags:

• nostalgia
• qbasic
• quickbasic
• purple
• squares
• programming
• software