 
*  ED0/EQUS   40-col          Jul / 16 / 93
*-------------------
*  All Characters
 
*  Editor and System equates
*---------------------------
 
FWPOSN EQU  >EBC8
FWBLEN EQU  >FFD8-FWPOSN      >1410
 
CFILE# EQU  >FFA6             FWb equates
VFILF  EQU  >FFAE             VFILL
VSBRF  EQU  >FFB2             VSBR to R0
VMBRF  EQU  >FFB6             Data VMBR
VMBWF  EQU  >FFBA             Data VMBW
FILENT EQU  >FFCC
KSCANF EQU  >FFD0             Enhanced KSCAN
LDR11  EQU  >FF9C             FW departure address
FWREG  EQU  >FF7C             Main FW workspace
NAMBUF EQU  >FF62             FW name byffer
ESFLAG EQU  >FF60             Master <esc> flag
GRMAD  EQU  >FF5E             GROM address
CMRET  EQU  >FF5C             FW re-entry pointer
MODFLG EQU  >FF5A             Module flag
BTLN   EQU  >FF58
QDXFL  EQU  >FF52             QD flag
INDSK  EQU  >FF52             FW alternate drive #s
INCOL  EQU  >FF26             FW color index
QDSAV  EQU  >FF20
EDPRNT EQU  >FF1E             Ed printer name pointer
COLRS  EQU  >FF1C             FW color table
RDISK  EQU  >FF18             Drive #s
HDFLAG EQU  >FF02             FW hard pathname flag
PLDADR EQU  >FEFE
REPETS EQU  >FEE4
CPUDEL EQU  >FEE2             CPU clock timer
FILCLN EQU  >FEDC             Clear mailbox
VMBWR  EQU  >FED4
VSBWF  EQU  >FECC
VSTRWF EQU  >FEC4
BL2UT  EQU  12
USL    EQU  >E9B0
FLNBFF EQU  >8322             First byte of FILENT buffer
 
PAD    EQU  >8300
SCNWS  EQU  >8308             Main workspace for ED
DR#    EQU  >8320             R12 of SCNWS
BUFMWS EQU  >8328             Buffer manager workspace
TBLND  EQU  BUFMWS+2          R1 of BUFMWS
EDBFND EQU  BUFMWS+4          R2 of BUFMWS
FASTVW EQU  >8388             Video driver placed in PAD for speed
DSPACE EQU  >83B6             Fast space data
FLOOPC EQU  >83B8             Fast inner loop
FAC    EQU  >834A
SCNAME EQU  >8356
KEYRT  EQU  >8375
TIMER  EQU  >8379
GPLST  EQU  >837C
GPLWS  EQU  >83E0
SOUND  EQU  >8400
VDPRD  EQU  >8800        System equates
VDPWD  EQU  >8C00
VDPWA  EQU  >8C02
 
 
*  General screen equates
*------------------------
 
C24    EQU  24                Normal screen length
SW     EQU  40                Normal screen width
LLL    EQU  80                Normal line length
 
*  VBank #0  Memory Map
*----------------------
 
FCSRP  EQU  >08F0             Cursor pattern in FW table
 
*  >0000  -- >03C0            Edit/View screen
 
 
       DORG >03C0
 
PBF1   BSS  >100              Sector buffer
COMVE  BSS  >76+4             Edit-mode Key-table
COMVC  BSS  >76+4             Comd-mode Key-table
RSMSV  BSS  >56+2             RS message line
TABBUV BSS  >42               3 tabsets  * 22  = >42
RSFBUV BSS  >50               RS/FS  storage
SDLBUV BSS  >50               Deleted Line
DEVBUV BSS  >50               PDevname storage
TFLBUV BSS  >50               Temp load file
PSDBUV BSS  >50               PrintDir device
LOCLRV EQU  $
 
*  >0800 -- >0C00             FW Pattern table
*  >0C00 -- >1000             IBM Character graphics
 
SITBL1 EQU  >8200             Screen image table default for VWTR
SITBL2 EQU  >8204             SIT for SD
 
       DORG >1000
 
SDV    BSS  >3C0              SD screen
LINBUV BSS  >50               Set up SD line at entry
SDHBUV BSS  >50               Set up blank SD header line at entry
CATBF  BSS  13*128  >680      SD Catalog buffer
       BSS  13*128            Extra space for HD sub-dirs
VDPPAB BSS  >50               PAB for all uses
PABBUF BSS  >100              PAB buffer for text records
TEXTV  BSS  >400              Text module
LSMODV BSS  >650              L/S module
       BSS  >24               Lprogf
       BSS  >4C               Heldr
PCEBUV BSS  >18               Printer entry codes
PCXBUV BSS  >18               Printer exit codes
DSKBUV BSS  >06               >05,DSKx. storage
HDPBUV BSS  >50               Hardpath name storage
TMPBFV BSS  >50               Temporary storage for FILNAM
SDATV  EQU  $                 SD code (includes Exit code)
 
*  SDATV equ >2DD6
*  Leaves >0EFE  for SDATV assuming >20 pushdown by old AVPC
 
*  >3BD4 -- >3FF0             Disk buffer
*  >3BE4 --  no 9938
 
 
*  TI-WR buffer absolute addresses
*---------------------------------
 
       DORG >37F0            >4000->810
 
CPUSCN BSS  >810
CTXTM6 EQU  CPUSCN+>56        Start of 2nd line
CTEXT  EQU  CPUSCN+>5C        Command entry
CTXTND EQU  CTEXT+>50
CPUSND EQU  $
 
*  Overlap Temporary buffers on start of REPBUF
 
SDTMBV EQU  $->F0             >3EB4 - temp for SD screen data
REPBM6 EQU  $->AC             >3F54
REPBUF EQU  REPBM6+6          >3F5A
DEVNAM EQU  $->50             >3FB0 - temp for SD pdev name
REPBND EQU  $-1               >3FF9 - leave 6 more for initial TABs
 
*  L/S module overlays CPUSCN after Error line
 
OVRLAY EQU  CPUSCN+>AC+4      2 lines worth - past error line
 
*  Data pointers for SD utility area overlaying L/S start
 
       DORG OVRLAY+>3A        Allow for PAB and data block
 
DREGS  BSS  >20               Enough to step over data block
VFLAG  BSS  2                 Flag for View
MAXCNT BSS  2                 Max # files in dir
MAXPAG BSS  2                 Max # pages in dir
PGFTOP BSS  2                 Top of current page
CSRFIL BSS  2                 File # on page under cursor
DVF80  BSS  2                 Current file flag
TEMPF  BSS  2                 Temp storage
DRBLN  BSS  2                 Length word for DRBLN
DRBF   BSS  >28               Working line/name  buffer
TMPBF  BSS  >50               Name buffer
MFBUF  BSS  >50
PBFC   BSS  >100
 
*  Hi-Mem Buffers
*----------------
 
       DORG >A000
 
FILNAM BSS  >50               FW mailbox also
LINBF0 BSS  >56               >A050
ERMBUF EQU  LINBF0
LINBUF EQU  LINBF0+6          >A056
LNBFM1 EQU  LINBUF-1          >A0A5
TEMPM6 BSS  6                 >A0A6
TMPBUF BSS  >50               >A0AC
TMPBND EQU  TMPBUF+>4F        >A0FB
SQSBUF BSS  >56               >A0FC
BUFCOD EQU  $                 >A152
 
 
*  Memory references in upper hi-mem
 
MSG24  EQU  >C800              Initial message lines
 
       DORG >FFC8
 
TBL    BSS  2                 >FFC8
MKTBL  BSS  2                 >FFCA
RMRG   BSS  2                 >FFCC
LMRG   BSS  2                 >FFCE
CRNTAB BSS  1                 >FFD0
CRNTBL BSS  1                 >FFD1
EOF    BSS  2                 >FFD2
EOFONS BSS  2                 >FFD4
FORMO  BSS  4                 >FFD6
TABTP  BSS  16                >FFD8
TABTND EQU  $-1
INDT   BSS  2                 >FFE8
FORMM2 EQU  FORMO-2
CHNGED BSS  2                 >FFEA
 
 
*  Message pointer table offsets
*-------------------------------
 
VERPT  EQU  0                 Version
TXTRAN EQU  2                 Transfer length
MODEP  EQU  4                 Edit...
MSVPT  EQU  6                 Save File
MLFPT  EQU  8                 Load File
MPFPT  EQU  10                Print file
MLTPT  EQU  12                Load Temp
MSDPT  EQU  14                Enter dir #
MDPPT  EQU  16                SDir Print
MQEPT  EQU  18                Quit
MODFP  EQU  20                LF,...
MODLP  EQU  22                Move,..
MODSP  EQU  24                Find,Repl
MFSPT  EQU  26                Find
MRSPT  EQU  28                Replace
MMLPT  EQU  30                Move
MCLPT  EQU  32                Copy
MSLPT  EQU  34                Show
MDLPT  EQU  36                Delete
MPGPT  EQU  38                Purge
IOERP  EQU  40                IO Error
TBFPT  EQU  42                TBFull
MTABP  EQU  44                Tabset select
EMLPT  EQU  46                Enter MARK
MMTPT  EQU  48                Tabs
CMLPT  EQU  50                Command line entries
RSMSP  EQU  52                RS running msg
WLDPT  EQU  54                Wildcard
HDMPT  EQU  56                Hard path
 
*---------------------------------------------------
