Subversion Repositories SvarDOS

Rev

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

Rev 1571 Rev 1572
Line 48... Line 48...
48 
  }
 48 
  }
49 
  return(res);
 49 
  return(res);
50 
}
 50 
}
51 
 
 51 
 
52 
 
 52 
 
53 
unsigned short _dos_freemem(unsigned short segn) {
 - 
 
54 
  unsigned short res = 0;
 - 
 
55 
  _asm {
 - 
 
56 
    push es
 - 
 
57 
    mov ah, 0x49
 - 
 
58 
    mov es, segn
 - 
 
59 
    int 0x21
 - 
 
60 
    pop es
 - 
 
61 
    jnc done
 - 
 
62 
    mov res, ax
 - 
 
63 
    done:
 - 
 
64 
  }
 - 
 
65 
  return(res);
 - 
 
66 
}
 - 
 
67 
 
 - 
 
68 
 
 - 
 
69 
unsigned short mdr_dos_allocmem(unsigned short siz) {
 - 
 
70 
  unsigned short segnum = 0;
 - 
 
71 
 
 - 
 
72 
  _asm {
 - 
 
73 
    push bx
 - 
 
74 
 
 - 
 
75 
    mov ah, 0x48
 - 
 
76 
    mov bx, siz
 - 
 
77 
    int 0x21
 - 
 
78 
    jc done
 - 
 
79 
    mov segnum, ax
 - 
 
80 
 
 - 
 
81 
    done:
 - 
 
82 
 
 - 
 
83 
    pop bx
 - 
 
84 
  }
 - 
 
85 
 
 - 
 
86 
  return(segnum);
 - 
 
87 
}
 - 
 
88 
 
 - 
 
89 
 
 - 
 
90 
unsigned short mdr_dos_resizeblock(unsigned short siz, unsigned short segn) {
 53 
unsigned short mdr_dos_resizeblock(unsigned short siz, unsigned short segn) {
91 
  unsigned short res = 0;
 54 
  unsigned short res = 0;
92 
 
 55 
 
93 
  _asm {
 56 
  _asm {
94 
    push bx
 57 
    push bx