|
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: 512 (0x200)
Notes: MEMBER_P, Member_Text
Names: »OLBS «
└─⟦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⟧ ».OLBS «
* CHECK TO SEE IF SECOND TIME HERE // EVALUATE P1,2=?L'115,2'? * FETCH THE NEXT CONTROL REC // IF ?L'223,1'?=1 EVALUATE P1,2=?1?+1 * IF SECOND TIME HERE, INCR // LOCAL OFFSET-115,DATA-'?1?' * INDEX NEXT CONTROL RECORD // RESET PSP * RESTART PD SCREEN DRIVER.
0x000…001 0xa2
0x001…023 »* CHECK TO SEE IF SECOND TIME HERE«
0x023…024 0x56
0x024…025 0x9b
0x025…040 »// EVALUATE P1,2=?L'115,2'?«
0x040…041 0x18
0x041…042 0x9c
0x042…05e »* FETCH THE NEXT CONTROL REC«
0x05e…05f 0x29
0x05f…060 0xa6
0x060…086 »// IF ?L'223,1'?=1 EVALUATE P1,2=?1?+1«
0x086…087 0x0d
0x087…088 0x9b
0x088…0a3 »* IF SECOND TIME HERE, INCR«
0x0a3…0a4 0x2a
0x0a4…0a5 0x9e
0x0a5…0c3 »// LOCAL OFFSET-115,DATA-'?1?'«
0x0c3…0c4 0x15
0x0c4…0c5 0x9b
0x0c5…0e0 »* INDEX NEXT CONTROL RECORD«
0x0e0…0e1 0x2a
0x0e1…0e2 0x8c
0x0e2…0ee »// RESET PSP«
0x0ee…0ef 0x27
0x0ef…0f0 0x9b
0x0f0…10b »* RESTART PD SCREEN DRIVER.«
0x10b…10c 0x2a
0x10c…10d 0x00
0x10d…120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣┆
0x120…140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣┆
[…0x6…]