gotBASIC.com

For all people interested in the continued usage and evolution of the BASIC programming language.

HomeVB 7+VB 1-6FBQB64QB45GW-BASICMicroRetro

Tektronix 4050 Series BASIC

4051 personal computing

The Tektronix 4050 all-in-one series of computers produced during the late 1970s and early 1980s with the display, keyboard, CPU and tape drive in a single desktop case. Additionally, utilized a GPIB parallel bus interface for connecting external devices. Due to the storage tube approach to the display, the effective resolution of the display was 1024 by 780; utilizing none of the memory of the machine - dedicating all of its memory to code execution. Later models could support a resolution of 4096 by 3072.

Thanks to the lack of flicker with the direct view storage tubes, the 405x computers can be frequently be seen in the 1978 TV series Battlestar Galactica.

The 4051 (released in 1975) has the following specs:

Videos

Documentation

4051 BASIC Simulator

A 4051 BASIC Simulator that runs on Windows created by Brad Srebnik.

More

(The following is an edit of the email sent by Brad after you contact him.)

The Tek 4051 BASIC Simulator can be downloaded from

(link removed)

Please do not distribute the simulator to others. If you know someone who is interested in it, have them contact me by e-mail, or message me on Facebook.

If you display the simulator publicly, credit it as follows:

“4051 BASIC Simulator provided courtesy of Brad Srebnik.”

General Usage

The simulator only runs on Windows.

After downloading the zip file, unzip it and save in a folder.

Run the Tek4051BASIC.exe file to start the simulator. It will slowly initiate the simulated storage tube display. When it stabilizes, press the HOME PAGE key on the gray control window (or type PAGE on your keyboard and press enter).

There is a check box to turn off sound. It is best not to click that box when running a program in the simulator (it may crash).

If you want it to run faster than the normal 4051 speed, click the Fast check box.

If you have a low-resolution display you can click the Keys to Left check box to move the Keys window into view. Then un-check it again to move it back to the right of the main display window.

Running Commands and Programs

Now you can type BASIC commands.

Here’s a short sample program (lower-case is OK):

100 PAGE 
110 SET DEGREES 
120 FOR X=10 TO 120 STEP 5 
130 MOVE X,30 
140 DRAW X,50+40*SIN(3*X) 
150 NEXT X 

If you make a mistake typing a line, you can use backspace or delete, or press CLEAR on the Keys window and start typing that line over again.

After you enter the program, type:

RUN

to run it.

See the Versions.txt file for the list of supported commands and fixes and improvements in the versions of the simulator.

There is a SamplePrograms.txt file that describes the sample programs in the zip file. If you want to run one, the .PGM files must be in the same folder that you ran the simulator EXE from.

Then use the commands:

FIND [n]          example: FIND 1 
OLD 
RUN 

from within the simulator. FIND takes a while (simulator the original cartridge tape drive) so be patient. You may think the simulator is not responding but it should come back after a minute or two.

Press POWER button to end - your program will be lost if not saved first (with FIND [n], then SAVE).

Your screen resolution needs to be fairly good, or the control panel (PAGE key, etc.) will be off the screen. Click the POWER button to end the program. Please let me know when you run it, what version of Windows you used, and if you had any problems.

Feel free to send any questions, bugs, or comments, but know that I’m not putting too much time into supporting it (adding additional commands, fixing minor bugs, etc.) at present. Once in a while I do some work to fix bugs and will try to send an e-mail out when there is an updated version available.

GPIB addressing is mostly not supported.

I can point you to PDF’s of the old programming manuals for it on bitsavers.org. They are quite readable and mostly clear. Also join the Tek 4051 BASIC Facebook group if you haven’t already. And there are six videos I put on YouTube describe some parts of Tek 4051 BASIC programming. Feel free to suggest topics for additional videos.

Regards,

Brad Srebnik