Table of Contents

SYSTEM Source

References

Source Listing

SYSTEM.MACRO.txt
  1. MACRO 00001000
  2. &NAME SYSTEM &VOLID=,&EXADD=,&SYSMASK=0,&RUNKEY=0,&SWPTBL=,&PAGTBL=0 00002000
  3. .* THIS MACRO DESCRIBES A SAVED SYSTEM 00003000
  4. GBLA &SYSCNT 00004000
  5. AIF (T'&NAME EQ 'O').CNT 00005000
  6. &SYSCNT SETA &SYSCNT+1 00006000
  7. DC CL8'&NAME' SYSNAME 00007000
  8. DC CL6'&VOLID' SYSVOLID 00008000
  9. DC XL1'&SYSMASK' SYSSMASK 00009000
  10. DC XL.4'&RUNKEY',XL.4'0' SYSRNKEY 00010000
  11. DC XL4'&EXADD' SYSEXADD 00011000
  12. DC A(&SWPTBL) SYSSWPTB 00012000
  13. DC A(&PAGTBL) SYSPAGTB 00013000
  14. DC F'0' SYSRSV1 00014000
  15. SPACE 3 00015000
  16. MEXIT 00016000
  17. .CNT ANOP 00017000
  18. ENTRY SYSCNT 00018000
  19. SYSCNT DC F'&SYSCNT' 00019000
  20. EJECT 00020000
  21. MEND 00021000