Category : C Source Code
Archive   : CEPHES22.ZIP
Filename : QHEAD.ASM

 
Output of file : QHEAD.ASM contained in archive : CEPHES22.ZIP

_TEXT SEGMENT BYTE PUBLIC 'CODE'
_TEXT ENDS
CONST SEGMENT WORD PUBLIC 'CONST'
CONST ENDS
_BSS SEGMENT WORD PUBLIC 'BSS'
_BSS ENDS
_DATA SEGMENT WORD PUBLIC 'DATA'
_DATA ENDS
DGROUP GROUP CONST, _BSS, _DATA
ASSUME CS: _TEXT, DS: DGROUP, SS: DGROUP, ES: DGROUP

; number of 16 bit words in the entire number format
NQ = 24 ; 24, 12
; number of iterations for a divide: 3 -> 77 decimal accuracy
NQDIV = 4 ; 4, 3

; number of 16 bit words in mantissa area:
OMG = NQ-2
; byte offset to last word of mantissa area = 2*OMG+2:
OFFS = OMG+OMG+2


zmul MACRO a,b
ao = 6 + 2*a
bo = 6 + 2*b
co = 8 + 2*a + 2*b
do = 6 + 2*a + 2*b
eo = 4 + 2*a + 2*b
mov ax, word ptr [di]+ao
mul word ptr [si]+bo
add word ptr [bx]+co,ax
adc word ptr [bx]+do,dx
adc word ptr [bx]+eo,cx
ENDM



  3 Responses to “Category : C Source Code
Archive   : CEPHES22.ZIP
Filename : QHEAD.ASM

  1. Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/