|
DataMuseum.dkPresents historical artifacts from the history of: IBM System/3 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about IBM System/3 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1524 (0x5f4)
Types: s3xseg
Names: »S$ETT«
└─⟦d0bc1a931⟧ Bits:30009189 5704-sc1.V08.ccp
└─⟦64693a1c9⟧
└─⟦this⟧ »S$ETT«
└─⟦4498c64f7⟧ Bits:30009191 5704-sc2.V05.ccp
└─⟦95ee7795b⟧
└─⟦this⟧ »S$ETT«
MACRO 00010000
$ETT 00020000
.* 00030000
.* MACRO EQUATES FOR OFFSETS TO ITEMS IN THE 00040000
.* 'TERMINAL TABLE' FOUND IN PAS. 00050000
.* 12/11/72 00060000
.* 00070000
TEXT 00080000
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 00090000
* * 00100000
* EQUATES TO ITEMS IN 'TERMINAL TABLE' IN 'PAS'. * 00110000
* 12/11-72 * 00120000
* * 00130000
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 00140000
SPACE 00150000
TT EQU 0 START OF TERMINAL TABLE 00160000
* LNG CONTENTS 00170000
SPACE 00180000
TTCHN@ EQU TT+1 @ OF NEXT ENTRY. (CONTAINS 00190000
* 2 ZERO IN HIGH-ORDER BYTE IF LAST) 00200000
SPACE 00210000
TTNAME EQU TTCHN@+6 NAME OF TERMINAL 00220000
* 6 00230000
SPACE 00240000
TTFT@ EQU TTNAME+2 @ OF MAP TABLE ENTRY CURRENTLY 00250000
* 2 USED BY THIS TERMINAL 00260000
SPACE 00270000
TTIFT EQU TTFT@+25 INPUT FORMT TABLE. ONE BIT FOR 00280000
* 25 EACH INPUT, OUTPUT/IINPUT, 00290000
* DETECTABLE FIELD. FIRST FIELD 00300000
* IS RIGHT-MOST OR LOW ORDER BIT. 00310000
* CAPACITY IS 200 FIELDS. 00320000
SPACE 00330000
TTIFTL EQU 25 LENGTH OF IFT. 00340000
SPACE 00350000
TTINLH EQU TTIFT+2 LENGTH OF HOLD AREA NEEDED FOR 00360000
* 2 AN INPUT OPERATION. 00370000
SPACE 00380000
TTL EQU TTINLH-TT+1 LENGTH OF ONE TT ENTRY. 00390000
EJECT 00400000
MEND 00410000