home *** CD-ROM | disk | FTP | other *** search
- Assume CS:Code_Segment
- Assume SS:Code_Segment
-
- Code_Segment Segment Para Public 'CODE'
- Org 100h
-
- Main_Line Proc Near
- ; Get RB12 Misc Register contents
- Mov DX,22h ; RB12 index register
- Mov AL,6Fh ; Set it to port 6Fh
- Out DX,AL ; Enable the index register
- In AL,23h ; Read RB12 register
-
- ; Set RB12 Bit(1) to disable A20 address line
- Mov AH,AL ; Save RB12 contents in AH
- Mov DX,22h ; RB12 index register
- Mov AL,6Fh ; Set RB12 port 6Fh
- Out DX,AL ; Enable write to RB12
- Mov AL,AH ; Original RB12 contents to AL
- ; *** Or AL,02h ; Bit(1)=0 sets A20 = zero
- AND AL,0FDh ; Bit(1)=1 enables A20 line
- Out 23h,AL ; Write RB12 data register
-
- Exit:
- Mov AX,4C00h ; Return code = 0
- Int 21h ; Call DOS
- Main_Line Endp
-
- Code_Segment Ends ; End of code Segment
-
-
-
-
- Comment |
- Stack_Segment Segment Para Stack 'Stack'
- Dw 128 dup (?) ; 128 words of stack space
- Stack_Segment Ends
- |
-
-
-
-
- End Main_Line ; Program entry point
-
-