home *** CD-ROM | disk | FTP | other *** search
- ;
- ;; SlowDown for self-booting software
- ;;
- ;; BOOTSLOW
- ;;
- ;; Copyright 1991 Alexander R. Pruss
- ;;
- ;; May be freely distributed, modified and used provided that no copyright
- ;; messages are removed, and this sentence together with the next are
- ;; always included in unmodified form. If you like this program a lot, you are
- ;; invited to show your appreciation by making a tax-deductible donation to
- ;; the Pro-Life or Anti-Abortion movement, but are under no obligation, moral
- ;; or otherwise to do so (especially if you disagree with the goals of this
- ;; movement.)
- ;
- Clear macro reg
- xor reg,reg
- endm
-
- Stat macro reg
- or reg,reg
- endm
-
- Puts macro name
- mov si,offset name
- mov cx,&name&_string_length
- call near ptr _puts
- endm
-
- String macro name, str
- local StrBeg,StrEnd
- StrBeg = $
- name db str
- StrEnd = $
- &name&_string_length = StrEnd-StrBeg
- endm
-
- Getch macro
- Clear ah
- int 16h
- endm
-
- DOSGetch macro
- mov ah,DOSGetchF
- int 21h
- endm
-
- BPutch macro char
- mov al,char
- mov ah,TTYWrite
- mov bx,0007h
- int 10h
- endm
-
-
- TTYWrite = 0eh
- WriteHandle = 040h
- ReadHandle = 03Fh
- CloseHandle = 03eh
- OpenRDOnly = 03d00h
- OpenWROnly = 03d01h
- OpenRDWR = 03d02h
- CreatHandle = 03ch
- ArchBit = 1 shl 5
- DOSGetchF = 08h
- CR = 0dh
- LF = 0ah
- BSeg = 0040h
-
- BootPos = 7c00h
-
- TOLOWER = 020h
-
-