
;************************************************************************
; Select video mode                                                     *
; Entry: Mode - Mode to be selected                                     *
;************************************************************************

Mode    EQU     [BP+4]

        PUBLIC  _Set_Mode

_Set_Mode       PROC NEAR
        PUSH    BP
        MOV     BP,SP
        MOV     AL,Mode                 ;Fetch mode number
        XOR     AH,AH                   ;Function = SELECT MODE
        INT     10H                     ;Ask BIOS to set the mode
        POP     BP
        RET
_Set_Mode       ENDP
