|
|
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: 768 (0x300)
Notes: MEMBER_P, Member_Text
Names: »SDA20 «
└─⟦14ba21fd6⟧ Bits:30009812 REF.NO PWD34 PGM 5727-UT6 FEAT9074 UTILITIES US Z250-0041-2 REV/LEV 05.01 SEQ. 1/2 DISKET 2S 96TPI INTERNAL 88.03.04 31
└─⟦93ec53657⟧
└─⟦this⟧ ».SDA20 «
// LOCAL AREA-SYSTEM // IF ?L'98,1'?/N GOTO NORPLACE // IF ?L'97,1'?/Y INCLUDE SDA25 ?1?,?2?,?3?,?4?,?5?,YES,YES,?6'255'? // IF ?L'97,1'?/P INCLUDE SDA25 ?1?,?2?,?3?,?4?,?5?,YES,PARTIAL,?6'255'? // IF ?L'97,1'?/N INCLUDE SDA25 ?1?,?2?,?3?,?4?,?5?,YES,NO,?6'255'? // GOTO DONE20 // TAG NORPLACE // IF ?L'97,1'?/Y INCLUDE SDA25 ?1?,?2?,?3?,?4?,?5?,NO,YES,?6'255'? // IF ?L'97,1'?/P INCLUDE SDA25 ?1?,?2?,?3?,?4?,?5?,NO,PARTIAL,?6'255'? // IF ?L'97,1'?/N INCLUDE SDA25 ?1?,?2?,?3?,?4?,?5?,NO,NO,?6'255'? // TAG DONE20