|
DataMuseum.dkPresents historical artifacts from the history of: IBM System/36 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about IBM System/36 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1024 (0x400)
Notes: MEMBER_P, Member_Text
Names: »OLRO «
└─⟦27db88c4d⟧ Bits:30009807 AS/ENTRY - S/36 SYST SUPP PROG SYST SUPP PGM 5363 DA Z250-0323-0 Refer to Memo 033109 Product Number 5727SS6 Rel 05 Created 19950301 Level 01 Seq 011 of 011
└─⟦5f03407d3⟧
└─⟦this⟧ ».OLRO «
* CHECK FOR RWS CONFIGURED ON OTHER LINE // LOAD PSPEXT // RUN // IF ?L'272,1'?=2 IF ?L'221,1'?=2 IF ?L'225,1'?=1 LOCAL OFFSET-116,DATA-'4' // ELSE IF ?L'272,1'?=3 IF ?L'221,1'?=2 IF ?L'225,1'?=1 LOCAL OFFSET-116,DATA-'4' // ELSE IF ?L'221,1'?=2 IF ?L'227,1'?=1 LOCAL OFFSET-116,DATA-'7' // ELSE IF ?L'221,1'?=1 IF ?L'228,1'?=1 LOCAL OFFSET-116,DATA-'8' // ELSE IF ?L'272,1'?=2 IFF ?L'226,1'?=1 LOCAL OFFSET-116,DATA-'1' // ELSE IF ?L'272,1'?=3 IFF ?L'226,1'?=1 LOCAL OFFSET-116,DATA-'1' // ELSE IF ?L'272,1'?=2 IF ?L'226,1'?=1 LOCAL OFFSET-116,DATA-'6' // ELSE IF ?L'272,1'?=3 IF ?L'226,1'?=1 LOCAL OFFSET-116,DATA-'6' // ELSE IFF ?L'272,1'?=2 IFF ?L'226,1'?=1 LOCAL OFFSET-116,DATA-'3' // ELSE IFF ?L'272,1'?=2 IF ?L'226,1'?=1 LOCAL OFFSET-116,DATA-'5' // RESET PSP