Subversion Repositories SvarDOS

Rev

Rev 1056 | Rev 1068 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1056 Rev 1066
Line 102... Line 102...
102
  }
102
  }
103
 
103
 
104
  _asm {
104
  _asm {
105
    push ax
105
    push ax
106
    push bx
106
    push bx
107
    push cx
-
 
108
    push dx
107
    push dx
109
 
108
 
110
    mov ax, 0x3306 /* Get true DOS version number */
109
    mov ax, 0x3306 /* Get true DOS version number */
111
    int 0x21       /* AL=maj_ver_num  AH=min_ver_num  BX,CX=OEM */
110
    int 0x21       /* BL=maj_ver_num  BH=min_ver_num  DL=revision  DH=kernel_memory_area */
112
    mov [maj], bl
111
    mov [maj], bl
113
    mov [min], bh
112
    mov [min], bh
114
    mov [rev], dl
113
    mov [rev], dl
115
    mov [verflags], dh
114
    mov [verflags], dh
116
 
115
 
117
    pop dx
116
    pop dx
118
    pop cx
-
 
119
    pop bx
117
    pop bx
120
    pop ax
118
    pop ax
121
  }
119
  }
122
 
120
 
123
  sprintf(buff, svarlang_str(20,1), maj, min); /* "DOS kernel version %u.%u" */
121
  sprintf(buff, svarlang_str(20,1), maj, min); /* "DOS kernel version %u.%u" */