|
|
1.1 ! root 1: ;----------------------------- E Q U A T E S ----------------------------- ! 2: ! 3: cr equ 0dh ! 4: lf equ 0ah ! 5: ! 6: ! 7: ;----------------------------- M A C R O S ------------------------------ ! 8: Writel MACRO addr ! 9: push ax ! 10: push bx ! 11: push cx ! 12: push dx ! 13: ! 14: mov dx,offset &addr ;Print ! 15: mov cx,&addr&l ! 16: mov bx,1 ;stdout ! 17: mov ah,40h ;write ! 18: int 21h ! 19: ! 20: pop dx ! 21: pop cx ! 22: pop bx ! 23: pop ax ! 24: ENDM ! 25: ! 26: hxtrans MACRO source, dest, length ! 27: mov cx, length ! 28: mov si, offset source ! 29: mov di, offset dest ! 30: call hextrans ! 31: ENDM ! 32: ! 33: cvt_nibble MACRO ! 34: and ax, 0fh ! 35: add ax, '0' ; convert to ASCII ! 36: cmp ax, '9' ; is it 0-9? ! 37: jbe @f ; yes, jump ! 38: add ax, 'A'-'9'-1 ; make it 'A-F' ! 39: @@: ! 40: ENDM
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.