cbios/scb.180

   1         title 'System Control Block Definition for CP/M3 BIOS'
   2
   3         public @civec, @covec, @aivec, @aovec, @lovec, @bnkbf
   4         public @crdma, @crdsk, @vinfo, @resel, @fx, @usrcd
   5         public @mltio, @ermde, @erdsk, @media, @bflgs
   6         public @date, @hour, @min, @sec, ?erjmp, @mxtpa
   7
   8
   9 scb$base equ    0FE00H          ; Base of the SCB
  10
  11 @civec  equ     scb$base+22h    ; Console Input Redirection
  12                                 ; Vector (word, r/w)
  13 @covec  equ     scb$base+24h    ; Console Output Redirection
  14                                 ; Vector (word, r/w)
  15 @aivec  equ     scb$base+26h    ; Auxiliary Input Redirection
  16                                 ; Vector (word, r/w)
  17 @aovec  equ     scb$base+28h    ; Auxiliary Output Redirection
  18                                 ; Vector (word, r/w)
  19 @lovec  equ     scb$base+2Ah    ; List Output Redirection
  20                                 ; Vector (word, r/w)
  21 @bnkbf  equ     scb$base+35h    ; Address of 128 Byte Buffer
  22                                 ; for Banked BIOS (word, r/o)
  23 @crdma  equ     scb$base+3Ch    ; Current DMA Address
  24                                 ; (word, r/o)
  25 @crdsk  equ     scb$base+3Eh    ; Current Disk (byte, r/o)
  26 @vinfo  equ     scb$base+3Fh    ; BDOS Variable "INFO"
  27                                 ; (word, r/o)
  28 @resel  equ     scb$base+41h    ; FCB Flag (byte, r/o)
  29 @fx     equ     scb$base+43h    ; BDOS Function for Error
  30                                 ; Messages (byte, r/o)
  31 @usrcd  equ     scb$base+44h    ; Current User Code (byte, r/o)
  32 @mltio  equ     scb$base+4Ah    ; Current Multi-Sector Count
  33                                 ; (byte,r/w)
  34 @ermde  equ     scb$base+4Bh    ; BDOS Error Mode (byte, r/o)
  35 @erdsk  equ     scb$base+51h    ; BDOS Error Disk (byte,r/o)
  36 @media  equ     scb$base+54h    ; Set by BIOS to indicate
  37                                 ; open door (byte,r/w)
  38 @bflgs  equ     scb$base+57h    ; BDOS Message Size Flag (byte,r/o)
  39 @date   equ     scb$base+58h    ; Date in Days Since 1 Jan 78
  40                                 ; (word, r/w)
  41 @hour   equ     scb$base+5Ah    ; Hour in BCD (byte, r/w)
  42 @min    equ     scb$base+5Bh    ; Minute in BCD (byte, r/w)
  43 @sec    equ     scb$base+5Ch    ; Second in BCD (byte, r/w)
  44 ?erjmp  equ     scb$base+5Fh    ; BDOS Error Message Jump
  45                                 ; (word, r/w)
  46 @mxtpa  equ     scb$base+62h    ; Top of User TPA
  47                                 ; (address at 6,7)(word, r/o)
  48         end