[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Prosel source files



Hi, y'all!

On Nov 20, 7:04 pm, Michael wrote:
> Thanks very much, Antoine, for making this available!

    Hopefully, Tom will find the REAL source and make the efforts of
Antoine and myself superfluous.  In the meantime, I've taken my
disassembly much further than Antoine has, in an effort to make it as
close as possible to the available 16 bit source.  Comparable snippets
are below my signature.

Willi

*=============================================
Snippet from Antoine's disassembly:
L4159    DA    L418D
         DA    L4194
         DA    L41A3
         DA    L41B2
         DA    L41BD
         DA    L41CB
         DA    L41D8
         DA    L41DD
         DA    L41EB
         DA    L41FD
         DA    L4214
         DA    L4224
         DA    L4235
         DA    L4239
         DA    L423D
L4177    DA    L424F
         DA    L4261
         DA    L4270
         DA    L4280
         DA    L4295
         DA    L42AA
         DA    L42BB
         DA    L42CD
         DA    L42E4
         DA    L42E9
         DA    L42F3

L418D    ASC   "Header"0D
L4194    ASC   "Parent pointer"00
L41A3    ASC   "Backwards link"00
L41B2    ASC   "Block free"00
L41BD    ASC   "Bad file name"00
L41CB    ASC   "Entry length"00
L41D8    ASC   "File"
         ASC   'V'
L41DD    ASC   "Entries/block"00
L41EB    ASC   "Incomplete delete"00
L41FD    ASC   "Directory storage type"00
L4214    ASC   "Not a directory"00
L4224    ASC   "File block count"00
L4235    ASC   "Cre"0F
L4239    ASC   "Cre"1D
L423D    ASC   "Modification date"00
L424F    ASC   "Modification time"00
L4261    ASC   "Stack overflow"00
L4270    ASC   " <-Block in use"00
L4280    ASC   "Block # out of range"00
L4295    ASC   "Unknown storage type"00
L42AA    ASC   "Can't read index"
         ASC   'N'
L42BB    ASC   "Can't read master"
         ASC   '='
L42CD    ASC   "Can't handle directory"
         ASC   '+'
L42E4    ASC   "File"00
L42E9    ASC   "Directory"00
L42F3    ASC   "Index block"00
*=============================================
Snippet from my disassembly:
;
;
;
ERRADR
ER_HEAD DW      head
ER_PAR  DW      parent
ER_LINK DW      link
ER_ULOK DW      unlock     ; ER_UNLOCK
ER_BADN DW      badname    ; ER_BADNAM
ER_LEN  DW      length     ; ER_LENGTH
ER_FCNT DW      ficnt      ; ER_FICNT
ER_CNT  DW      count      ; ER_COUNT
ER_DEL  DW      del
ER_DIRT DW      dirtyp     ; ER_DIRTYP
ER_FILT DW      filtyp     ; ER_FILTYP
ER_BLKC DW      blkcntm    ; ER_BLKCNT
ER_CRED DW      credate
ER_CRET DW      cretime
ER_MODD DW      moddate
ER_MODT DW      modtime
ER_STAK DW      stack      ; ER_STACK
ER_USED DW      usedm
ER_BLOK DW      block      ; ER_BLOCK
ER_STYP DW      unktyp     ; ER_STOTYP
ER_INDX DW      indexm     ; ER_INDEX
ER_MAST DW      master     ; ER_MASTER
ER_BADD DW      baddir     ; ER_BADDIR
NOCOUNT
ER_FSKP DW      filskip    ; ER_FILSKP
ER_DISK DW      dirskip    ; ER_DIRSKP
ER_BSKP DW      ndex       ; ER_BLKSKP
;
;
;
head    ASC     'Header'
        DB      pointer-head
parent  ASC     'Parent'
pointer ASC     ' pointer'
        DB      0
;
link    ASC     'Backwards link'
        DB      0
;
unlock  ASC     'Block free'
        DB      0
;
badname ASC     'Bad file name'
        DB      0
;
length  ASC     'Entry length'
        DB      0
;
ficnt   ASC     'File'
        DB      cnt-ficnt
;
count   ASC     'Entries/block'
        DB      0
;
del     ASC     'Incomplete delete'
        DB      0
;
dirtyp  ASC     'Directory storage type'
        DB      0
;
filtyp  ASC     'Not a directory'
        DB      0
;
blkcntm ASC     'File block'
cnt     ASC     ' count'
        DB      0
;
credate ASC     'Cre'
        DB      date-credate
cretime ASC     'Cre'
        DB      time-cretime
moddate ASC     'Modific'
date    ASC     'ation date'
        DB      0
;
modtime ASC     'Modific'
time    ASC     'ation time'
        DB      0
;
stack   ASC     'Stack overflow'
        DB      0
;
usedm   ASC     ' <-Block in use'
        DB      0
;
block   ASC     'Block # out of range'
        DB      0
;
unktyp  ASC     'Unknown storage type'
        DB      0
;
indexm  ASC     'Can''t read index'
        DB      blk-indexm
master  ASC     'Can''t read master'
        DB      blk-master
baddir  ASC     'Can''t handle directory'
        DB      blk-baddir
filskip ASC     'File'
        DB      0
;
dirskip ASC     'Directory'
        DB      0
;
ndex    ASC     'Index'
blk     ASC     ' block'
        DB      0