home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / CODING / DEMOS / BLA2SRC.ZIP / MPU.INC < prev    next >
Encoding:
Text File  |  1994-02-13  |  1.6 KB  |  71 lines
  1. ;  ----------------------       MPU.INC       ----------------------
  2. ;  MPU routines.
  3. ;  (C) 1994 JCAB/VangeliSTeam
  4.  
  5.  
  6.  
  7.  
  8. ; ===========================
  9. ; Data.
  10.  
  11. MPU_Port  DW 331h
  12. MPU_Count DW 1
  13. MPU_Notes DW 9 DUP(0)
  14.  
  15.  
  16.  
  17.  
  18. ; ===========================
  19. ; Wait loop for the MPU card.
  20.  
  21. MPU_Loop:       NOP
  22. ;SetBorder 63,63,63
  23.                 XOR     AH,AH
  24.         @@lp:    DEC    AH
  25.                  JZ     @@err
  26.                  IN     AL,DX
  27.                  SHL    AL,CL
  28.                  JC     @@lp
  29. ;SetBorder 0,0,0
  30.         @@ret:  RET
  31.         @@err:  MOV     AL,BYTE PTR CS:[@@ret]
  32.                 MOV     BYTE PTR CS:[MPU_Loop],AL
  33.                 RET
  34.  
  35. ; ===========================
  36. ; Reset the MPU card.
  37.  
  38. MPU_Reset:      MOV     DX,CS:[MPU_Port]
  39.                 MOV     AL,0FFh
  40.                 OUT     DX,AL
  41.                 MOV     CL,1
  42.                 CALL    MPU_Loop
  43.                 DEC     DX
  44.                 IN      AL,DX
  45.                 INC     DX
  46.                 MOV     AL,3Fh
  47.                 OUT     DX,AL
  48.                 CALL    MPU_Loop
  49.                 DEC     DX
  50.                 IN      AL,DX
  51.                 MOV     AL,0FFh
  52.                 CALL    MPU_Send
  53.                 RET
  54.  
  55. ; ===========================
  56. ; Send a byte.
  57.  
  58. MPU_Send:       MOV     DX,CS:[MPU_Port]
  59.                 MOV     CL,2
  60.                 PUSH    AX
  61.                 CALL    MPU_Loop
  62.                 POP     AX
  63.                 DEC     DX
  64.                 OUT     DX,AL
  65.                 RET
  66.  
  67.  
  68.  
  69.  
  70. ;  ----------------------    End of MPU.INC   ----------------------
  71.