Does anyone know Basic Computer programing any more?

Question

10 points to the person who provides the best "green" screen program. You late 80's peeps know who you are.

Answer 1

I had to dig out my old copy of GW Basic. Hey its on a 5.25 floppy!!! I even found my DOS ver3.1 disks...
l am suddenly feeling OLD... :-) We won't even talk about why I still have 5.25 floppies....

Anyway the COLOR statement is used to change the background color. Since you want green you will need to use SCREEN and define an EGA mode (16 colors from 64 in 4 PALETTEs) since CGA(4 color) and MGA (B&W) won't support it.

Two Lines config the EGA card followed by the color command to define fore/background colors:
10 SCREEN 8 ' Mode 2 640 x 200 pixel 80x25 Text EGA
20 PALETTE 'reset to initial color pallett (first 16 colors)
30 COLOR 7,2 'Grey text 7 on Green Background 2
40 Print "Hello World"
50 GOTO 50

Answer 2

I am not in it for the points and cannot provide any program but I have made hundreds of programs from simple X and O , snakes , and stuff like that.

2D and 3D battleship is more of my latest and harder work. And quite a few simple card games. I program with over 3 languages.

I do not know what you mean by Green screen but most of the programs I have made have a black , blue or white background. Some I put the effort into it and make a decorated background because I do not have any Artistic bones in my body.

Answer 3

Wow..taking it back to the old school.
So you want me to simply turn the screen green, or only after certain criteria is met?

Programmed on the old trs-80's and the Apple IIe's

Might take me a while to find my old Liberty Basic program, but is there any If statement you want a green screen to be resorted to, when not met?

Answer 4

Um.. yeah... I think I remember. I learned to program from the manual that came with my first computer - a Commodore VIC-20.

I have a program around here somewhere that can solve a Rubik's Cube. That's the only program I saved for the past few decades.

Answer 5

***Commodore 64 Basic V2.0***
38248 BYTES FREE

READY.

10 ?"Guessing Game!"
20 LET A=INT(RND(1)*1000) + 1
30 ?"Please pick a number between 1 and 1000"
40 INPUT B
50 IF A=B THEN ?"Congratulations, you are a WINNER!!!!!!!!!!!"
60 IF A>B THEN GOTO 200
70 IF A 80 END
200 ?"Too High. Try Again."
210 GOTO 30
300 ?"Too Low. Try Again."
310 GOTO 30

Ahhh.... now if I could remember my pokes, I'd win this contest for sure!

I'm writing a strategy game now in VB 6, and my code doesn't look too much different from this :-/

Answer 6

Who is Basic Computer Programming? Never heard of him.