Tektronix 4041 GPIB controller

From: Monty McGraw <montym_at_swbell.net>
Date: Wed Jan 2 00:14:50 2002

Just ran across your posting on the Tek 4041.

I've got both the Operators and Basic Programming Manuals for the 4041 and two of the computers with tapes!

I ran across the same problem - no 4041 keyboard.

You didn't mention whether you have any of the option ROMs in your 4041. They are in a pullout tray behind a snap in brown panel below the front keypad (use a coin in the slot in the top of the panel). If you have the Program Development ROMs you will be able to write 4041 BASIC programs - otherwise your machine will only execute 4041 programs from tape :(

Since you say you've been able to type some commands on your keyboard converter - I would say you might have the Program Development ROMs. I've got the full set Program Development v2.1 #1 and #2, 4041 Graphics, 4041 Plotting, 4041 Signal Processing and the 4041 Utility ROM.

Here are some control key sequences (listed as RS232 control keys) to try:

Control-A Autonumber
Control-B Break
Control-C Abort
Control-D followed by 1-9,0 User Defined Functions 11-20
Control-E or Backspace Rubout
Control-F followed by 1-9,0 User Defined Functions 1-10
Control-H Rubout
Control-I or Tab Horizontal tab
Control-K Kill to end of line
Control-N Recall Next
Control-O Insert
Control-P Recall Previous
Control-Q Continue 4041 output
Control-R Recall Line
Control-S Stop 4041 output
Control-T Step
Control-U Clear
Control-V Autoload
Control-W Move cursor to beginning of line
Control-X Delete line
Control-\ Move cursor left
Control-] Move cursor right
Control-^ "Meta"-prefix
    followed by C CONTINUE
    followed by L LIST
    followed by R RUN
    followed by other chars ignored
ESCAPE Suppress immediate execution of the following control character

The 4041 BASIC is a lot like 4050 series BASIC, but it has added commands for tape directories, GPIB, and uses a Stream specification format for devices.

My experience and 4041 Operators Manual says that RS232 must be configured before it becomes operational. Their recommendation is to create a file that is automatically loaded and run first on a tape when you press the AutoLoad button on the keypad.

The Tek System Verification tape actually prompts you "TERMINAL CONFIG(1-YES,2-NO)" at the beginning and allows you to key in RS232 parameters which are then saved to the Verification Tape.

Using your "keyboard" try the following commands:


SET DRIVER "COMM(BAU=2400,BIT=7,PAR=ODD):"
SET CONSOLE "COMM(CON=YES):"

If you have two serial ports on your 4041 you may have to add a zero device number to each of the lines (COMM0 instead of COMM).

Permitted COMM parameters and ranges:

BAUd 75,150,300,600,1200,2400,4800 default 2400
IBaud any integer from 2 to 9600 if 0, use the BAUd parameter
BIT 5,6,7,8,9 default 8, includes parity if used (BIT=5 has no parity, BIT=9 must include parity)
PARity NO,ODD,EVEn,HIGh,LOW default NO
STOp 1 or 2 default 2, for BIT=5 and STOp=2 uses 1.5 stop bits
FLAgging NO,INPut,OUTput,BIDirectional, default OUTput
         MODem,AMOdem,EMOdem
EDit RASter,STOrage,402,ANSi,850 default RASter
FORmat ASCii,ITEm default ASCii. ITEm allows full 8bit codes
TYPe-ahead =>100 default 100. max 32K
DS OFF,ON default ON. Data Set Ready output line
CTS OFF,ON default ON. Clear to Send output line
DCD OFF,ON default ON. Data Carrier Detect output line
ERR LOG,REPort default REP. errors displayed immediately
ECHO YES,NO default YES
CONtrol YES,NO default YES
CR CR,CRLf,LFCr default CRLf
LF LF,CRLf,LFCr default CRLf

For the BASIC OPEN command, from my programmers reference guide:

OPEN #logical unit: stream spec [,string var]

ex: 1020 OPEN #1: "TAPE: FILEB (OPEN=UPDATE)",LU1$

Logical Unit 1 is designated as the tape file FileB, to be
updated. LU1$ is given the entire stream spec string.

Here is an input from GPIB device example:

INPUT #"GPIB(PRI=21):": Var

The numeric value Var is read from device 21 on GPIB

I found GET in the full Programmers Reference book - it issues a GPIB Group Execute Trigger command.

Syntax: GET[(numexp[,numexp]...)]

Bus Traffic:
    [ATN UNL]
    [ATN Listen-Address-1]
    [{ATN Listen-Address-2}...]
    ATN 8

Hope this helps,

Monty McGraw

Spring TX
Tek 4041,4052,4054,4631,4662,4957... :)
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://www.classiccmp.org/pipermail/cctalk/attachments/20020102/2d5a123b/attachment.html
Received on Wed Jan 02 2002 - 00:14:50 GMT

This archive was generated by hypermail 2.3.0 : Fri Oct 10 2014 - 23:34:51 BST