test1.inc

TestOS - 带简单GUI的DOS扩展OS// 源代码// ASM// 英文

	       ;org 0x100
	       ;use16
;start:
	       ;push ds
               ;pop  es
shit:              
c11:
  
              
                mov dx,0x177
                mov cx,0xffff
a11:
                in  al,dx
                and al,0x80
                jz   a1a
                loop a11
                jmp  a2
a1a:
                mov dx,0x176
                mov al,0x0
                or  al,0xef
                out dx,al
                mov cx,0xffff
                mov dx,0x177
a3:
                in al,dx
               and al,80h
                jz a4
                loop a3
a2:
                stc
                ret
a4:
                mov dx,0x177
                mov al,0xA0
                out dx, al
                mov cx,0xffff
                mov dx,0x177
a5:  
                in  al,dx
                test al,0x80
                jnz  a6
                test al,0x01
                jnz  error
                test al,0x08 ;
                jnz a7
a6:
                loop a5
                jmp  a2
a7:
                mov dx,0x170
                mov si,packet
                xor ecx,ecx
                mov cx,6
a8:
                lodsw
                out dx,ax
                loop a8

                mov cx,0xffff
                mov dx,0x177
a9:
                in al,dx
                test al,80h
                jnz  b3
                test al,01h
                jnz error
;----------------------------------
 mov dx,0x177
in al,dx
;----------------------------------
                clc
                ret
b3:
                push ecx
                mov  ecx,0xffff
b1:
                nop
                nop
                nop
                nop
                nop
                nop
                nop
                nop
                loop  b1
       
                pop ecx
                loop a9
                jmp a2
error:
                stc
               ; jmp c11
 ;----------------------------------
 mov dx,0x177
in al,dx
;----------------------------------
                ret
                
packet:
		db 0x1B       ;45
		db 0x1
		db 0x0    ;ff
		db 0x0         ;ff
                db 0x2         ;ff
		db 0x0        ;ff
		db 0x0
		db 0x0           ;f
		db 0x0              ;f
		db 0x0
		db 0x0
		db 0x0