Subversion Repositories SvarDOS

Rev

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

Rev 1376 Rev 1377
Line 103... Line 103...
103 
}
 103 
}
104 
 
 104 
 
105 
 
 105 
 
106 
static void FCLOSE(unsigned short handle) {
 106 
static void FCLOSE(unsigned short handle) {
107 
  _asm {
 107 
  _asm {
108 
    push bx
 - 
 
109 
 
 - 
 
110 
    mov ah, 0x3e
 108 
    mov ah, 0x3e
111 
    mov bx, handle
 109 
    mov bx, handle
112 
    int 0x21
 110 
    int 0x21
113 
 
 - 
 
114 
    pop bx
 - 
 
115 
  }
 111 
  }
116 
}
 112 
}
117 
 
 113 
 
118 
 
 114 
 
119 
static unsigned short FREAD(unsigned short handle, void *buff, unsigned short bytes) {
 115 
static unsigned short FREAD(unsigned short handle, void *buff, unsigned short bytes) {
Line 149... Line 145...
149 
}
 145 
}
150 
 
 146 
 
151 
 
 147 
 
152 
static void FSEEK(unsigned short handle, unsigned short bytes) {
 148 
static void FSEEK(unsigned short handle, unsigned short bytes) {
153 
  _asm {
 149 
  _asm {
154 
    push bx
 - 
 
155 
    push cx
 - 
 
156 
    push dx
 - 
 
157 
 
 - 
 
158 
    mov ax, 0x4201  /* move file pointer from cur pos + CX:DX */
 150 
    mov ax, 0x4201  /* move file pointer from cur pos + CX:DX */
159 
    mov bx, handle
 151 
    mov bx, handle
160 
    xor cx, cx
 152 
    xor cx, cx
161 
    mov dx, bytes
 153 
    mov dx, bytes
162 
    int 0x21
 154 
    int 0x21
163 
 
 - 
 
164 
    pop dx
 - 
 
165 
    pop cx
 - 
 
166 
    pop bx
 - 
 
167 
  }
 155 
  }
168 
}
 156 
}
169 
#endif
157 
#endif
170 
 
 158 
 
171 
 
 159