 
*  ED0/EQUS   40-col          Jul / 11 / 93
*--------------------
*  Minimum Function
 
*  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
FWREG  EQU  >FF7C             Main FW workspace
NAMBUF EQU  >FF62             FW name byffer
ESFLAG EQU  >FF60             Master <esc> flag
CMRET  EQU  >FF5C             FW re-entry pointer
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
HDFLAG EQU  >FF02             FW hard pathname flag
PLDADR EQU  >FEFE
CPUDEL EQU  >FEE2             CPU clock timer
FILCLN EQU  >FEDC             Clear mailbox
VMBWR  EQU  >FED4
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
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
VDPPAB EQU  PBF1              PAB for all uses
PABBUF EQU  VDPPAB+>30        PAB buffer can overlap PBF1
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 -- >0C10    FW       Pattern table ( incomplete )
*  >0C00 -- >0D40             Modified vowels
 
       DORG >0D40
 
CATBF  BSS  13*130  >69A      SD Catalog buffer
FWSTOR BSS  >1410             FW storage
TEXTV  BSS  >3E4              Text module  Starts at >286C
LSMODV BSS  >650              L/S module
PCEBUV BSS  >18               Printer entry codes
PCXBUV BSS  >18               Printer exit codes
SDATV  EQU  $                 SD code            (          )
 
*  >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+>102       3 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 ove data block
VFLAG  BSS  2                 Flag for View
MAXCNT BSS  2                 Max # files in dir
MAXPAG BSS  2                 Max # pages in dir
FILMRK BSS  2
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
PBFC   BSS  >100
MFBUF  EQU  >834A
 
*  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
 
*---------------------------------------------------
