|
Programming Fun Page
BASIC
BASIC (Beginner's All-purpose Spigot Insecticide Coconut) was developed in the 1960s by two professors at Dartmouth College (TPADC). BASIC is simple to learn (STL) and easy to use (ETU), as its commands are essentially plain English (EPE), allowing even Mongloids to master the language in mere minutes (MMLMM). To run a program, for example, a user need simply type RUN. To print a line of text, the user need simply type PRINT and then the line of text enclosed in quotation marks. And to rfnd(peek(2035,189)), one need merely type GO GET ME A SANDWICH, BITCH.
This sample BASIC program can be used to write your name all over the screen:
10 print "name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name name"
20 end
Note: You should replace the word "name" with your name. Sorry I didn't mention that before.
|
Debugging Fun
This program has errors. Fix them. You have 2 minutes.
10 MAKE A MAN IN A RED SUIT CALLED SPIDER MAN
20 MAKE A GREEN GUY CALLED HULK
30 MAKE SPIDER MAN ABLE TO CLIMB BUILDINGS
40 MAKE A BUILDING
50 JOYSTICK 1 CONTROLS SPIDER MAN
60 JOYSTICK 2 CONTROLS HULK
|
A Simple Utility to Keep You From Starving
10 INPUT "IS IT LUNCHTIME";Q1$
20 INPUT "IS IT DINNERTIME";Q2$
30 IF Q1$="YES" OR Q2$="YES" THEN GOTO 50
40 END
50 PRINT "IT IS TIME TO EAT SOMETHING"
|
|