diff options
Diffstat (limited to 'libraries/irrlicht-1.8/source/Irrlicht/jpeglib/jmemdosa.asm')
-rw-r--r-- | libraries/irrlicht-1.8/source/Irrlicht/jpeglib/jmemdosa.asm | 758 |
1 files changed, 379 insertions, 379 deletions
diff --git a/libraries/irrlicht-1.8/source/Irrlicht/jpeglib/jmemdosa.asm b/libraries/irrlicht-1.8/source/Irrlicht/jpeglib/jmemdosa.asm index c6ec48b..ecd4372 100644 --- a/libraries/irrlicht-1.8/source/Irrlicht/jpeglib/jmemdosa.asm +++ b/libraries/irrlicht-1.8/source/Irrlicht/jpeglib/jmemdosa.asm | |||
@@ -1,379 +1,379 @@ | |||
1 | ; | 1 | ; |
2 | ; jmemdosa.asm | 2 | ; jmemdosa.asm |
3 | ; | 3 | ; |
4 | ; Copyright (C) 1992, Thomas G. Lane. | 4 | ; Copyright (C) 1992, Thomas G. Lane. |
5 | ; This file is part of the Independent JPEG Group's software. | 5 | ; This file is part of the Independent JPEG Group's software. |
6 | ; For conditions of distribution and use, see the accompanying README file. | 6 | ; For conditions of distribution and use, see the accompanying README file. |
7 | ; | 7 | ; |
8 | ; This file contains low-level interface routines to support the MS-DOS | 8 | ; This file contains low-level interface routines to support the MS-DOS |
9 | ; backing store manager (jmemdos.c). Routines are provided to access disk | 9 | ; backing store manager (jmemdos.c). Routines are provided to access disk |
10 | ; files through direct DOS calls, and to access XMS and EMS drivers. | 10 | ; files through direct DOS calls, and to access XMS and EMS drivers. |
11 | ; | 11 | ; |
12 | ; This file should assemble with Microsoft's MASM or any compatible | 12 | ; This file should assemble with Microsoft's MASM or any compatible |
13 | ; assembler (including Borland's Turbo Assembler). If you haven't got | 13 | ; assembler (including Borland's Turbo Assembler). If you haven't got |
14 | ; a compatible assembler, better fall back to jmemansi.c or jmemname.c. | 14 | ; a compatible assembler, better fall back to jmemansi.c or jmemname.c. |
15 | ; | 15 | ; |
16 | ; To minimize dependence on the C compiler's register usage conventions, | 16 | ; To minimize dependence on the C compiler's register usage conventions, |
17 | ; we save and restore all 8086 registers, even though most compilers only | 17 | ; we save and restore all 8086 registers, even though most compilers only |
18 | ; require SI,DI,DS to be preserved. Also, we use only 16-bit-wide return | 18 | ; require SI,DI,DS to be preserved. Also, we use only 16-bit-wide return |
19 | ; values, which everybody returns in AX. | 19 | ; values, which everybody returns in AX. |
20 | ; | 20 | ; |
21 | ; Based on code contributed by Ge' Weijers. | 21 | ; Based on code contributed by Ge' Weijers. |
22 | ; | 22 | ; |
23 | 23 | ||
24 | JMEMDOSA_TXT segment byte public 'CODE' | 24 | JMEMDOSA_TXT segment byte public 'CODE' |
25 | 25 | ||
26 | assume cs:JMEMDOSA_TXT | 26 | assume cs:JMEMDOSA_TXT |
27 | 27 | ||
28 | public _jdos_open | 28 | public _jdos_open |
29 | public _jdos_close | 29 | public _jdos_close |
30 | public _jdos_seek | 30 | public _jdos_seek |
31 | public _jdos_read | 31 | public _jdos_read |
32 | public _jdos_write | 32 | public _jdos_write |
33 | public _jxms_getdriver | 33 | public _jxms_getdriver |
34 | public _jxms_calldriver | 34 | public _jxms_calldriver |
35 | public _jems_available | 35 | public _jems_available |
36 | public _jems_calldriver | 36 | public _jems_calldriver |
37 | 37 | ||
38 | ; | 38 | ; |
39 | ; short far jdos_open (short far * handle, char far * filename) | 39 | ; short far jdos_open (short far * handle, char far * filename) |
40 | ; | 40 | ; |
41 | ; Create and open a temporary file | 41 | ; Create and open a temporary file |
42 | ; | 42 | ; |
43 | _jdos_open proc far | 43 | _jdos_open proc far |
44 | push bp ; linkage | 44 | push bp ; linkage |
45 | mov bp,sp | 45 | mov bp,sp |
46 | push si ; save all registers for safety | 46 | push si ; save all registers for safety |
47 | push di | 47 | push di |
48 | push bx | 48 | push bx |
49 | push cx | 49 | push cx |
50 | push dx | 50 | push dx |
51 | push es | 51 | push es |
52 | push ds | 52 | push ds |
53 | mov cx,0 ; normal file attributes | 53 | mov cx,0 ; normal file attributes |
54 | lds dx,dword ptr [bp+10] ; get filename pointer | 54 | lds dx,dword ptr [bp+10] ; get filename pointer |
55 | mov ah,3ch ; create file | 55 | mov ah,3ch ; create file |
56 | int 21h | 56 | int 21h |
57 | jc open_err ; if failed, return error code | 57 | jc open_err ; if failed, return error code |
58 | lds bx,dword ptr [bp+6] ; get handle pointer | 58 | lds bx,dword ptr [bp+6] ; get handle pointer |
59 | mov word ptr [bx],ax ; save the handle | 59 | mov word ptr [bx],ax ; save the handle |
60 | xor ax,ax ; return zero for OK | 60 | xor ax,ax ; return zero for OK |
61 | open_err: pop ds ; restore registers and exit | 61 | open_err: pop ds ; restore registers and exit |
62 | pop es | 62 | pop es |
63 | pop dx | 63 | pop dx |
64 | pop cx | 64 | pop cx |
65 | pop bx | 65 | pop bx |
66 | pop di | 66 | pop di |
67 | pop si | 67 | pop si |
68 | pop bp | 68 | pop bp |
69 | ret | 69 | ret |
70 | _jdos_open endp | 70 | _jdos_open endp |
71 | 71 | ||
72 | 72 | ||
73 | ; | 73 | ; |
74 | ; short far jdos_close (short handle) | 74 | ; short far jdos_close (short handle) |
75 | ; | 75 | ; |
76 | ; Close the file handle | 76 | ; Close the file handle |
77 | ; | 77 | ; |
78 | _jdos_close proc far | 78 | _jdos_close proc far |
79 | push bp ; linkage | 79 | push bp ; linkage |
80 | mov bp,sp | 80 | mov bp,sp |
81 | push si ; save all registers for safety | 81 | push si ; save all registers for safety |
82 | push di | 82 | push di |
83 | push bx | 83 | push bx |
84 | push cx | 84 | push cx |
85 | push dx | 85 | push dx |
86 | push es | 86 | push es |
87 | push ds | 87 | push ds |
88 | mov bx,word ptr [bp+6] ; file handle | 88 | mov bx,word ptr [bp+6] ; file handle |
89 | mov ah,3eh ; close file | 89 | mov ah,3eh ; close file |
90 | int 21h | 90 | int 21h |
91 | jc close_err ; if failed, return error code | 91 | jc close_err ; if failed, return error code |
92 | xor ax,ax ; return zero for OK | 92 | xor ax,ax ; return zero for OK |
93 | close_err: pop ds ; restore registers and exit | 93 | close_err: pop ds ; restore registers and exit |
94 | pop es | 94 | pop es |
95 | pop dx | 95 | pop dx |
96 | pop cx | 96 | pop cx |
97 | pop bx | 97 | pop bx |
98 | pop di | 98 | pop di |
99 | pop si | 99 | pop si |
100 | pop bp | 100 | pop bp |
101 | ret | 101 | ret |
102 | _jdos_close endp | 102 | _jdos_close endp |
103 | 103 | ||
104 | 104 | ||
105 | ; | 105 | ; |
106 | ; short far jdos_seek (short handle, long offset) | 106 | ; short far jdos_seek (short handle, long offset) |
107 | ; | 107 | ; |
108 | ; Set file position | 108 | ; Set file position |
109 | ; | 109 | ; |
110 | _jdos_seek proc far | 110 | _jdos_seek proc far |
111 | push bp ; linkage | 111 | push bp ; linkage |
112 | mov bp,sp | 112 | mov bp,sp |
113 | push si ; save all registers for safety | 113 | push si ; save all registers for safety |
114 | push di | 114 | push di |
115 | push bx | 115 | push bx |
116 | push cx | 116 | push cx |
117 | push dx | 117 | push dx |
118 | push es | 118 | push es |
119 | push ds | 119 | push ds |
120 | mov bx,word ptr [bp+6] ; file handle | 120 | mov bx,word ptr [bp+6] ; file handle |
121 | mov dx,word ptr [bp+8] ; LS offset | 121 | mov dx,word ptr [bp+8] ; LS offset |
122 | mov cx,word ptr [bp+10] ; MS offset | 122 | mov cx,word ptr [bp+10] ; MS offset |
123 | mov ax,4200h ; absolute seek | 123 | mov ax,4200h ; absolute seek |
124 | int 21h | 124 | int 21h |
125 | jc seek_err ; if failed, return error code | 125 | jc seek_err ; if failed, return error code |
126 | xor ax,ax ; return zero for OK | 126 | xor ax,ax ; return zero for OK |
127 | seek_err: pop ds ; restore registers and exit | 127 | seek_err: pop ds ; restore registers and exit |
128 | pop es | 128 | pop es |
129 | pop dx | 129 | pop dx |
130 | pop cx | 130 | pop cx |
131 | pop bx | 131 | pop bx |
132 | pop di | 132 | pop di |
133 | pop si | 133 | pop si |
134 | pop bp | 134 | pop bp |
135 | ret | 135 | ret |
136 | _jdos_seek endp | 136 | _jdos_seek endp |
137 | 137 | ||
138 | 138 | ||
139 | ; | 139 | ; |
140 | ; short far jdos_read (short handle, void far * buffer, unsigned short count) | 140 | ; short far jdos_read (short handle, void far * buffer, unsigned short count) |
141 | ; | 141 | ; |
142 | ; Read from file | 142 | ; Read from file |
143 | ; | 143 | ; |
144 | _jdos_read proc far | 144 | _jdos_read proc far |
145 | push bp ; linkage | 145 | push bp ; linkage |
146 | mov bp,sp | 146 | mov bp,sp |
147 | push si ; save all registers for safety | 147 | push si ; save all registers for safety |
148 | push di | 148 | push di |
149 | push bx | 149 | push bx |
150 | push cx | 150 | push cx |
151 | push dx | 151 | push dx |
152 | push es | 152 | push es |
153 | push ds | 153 | push ds |
154 | mov bx,word ptr [bp+6] ; file handle | 154 | mov bx,word ptr [bp+6] ; file handle |
155 | lds dx,dword ptr [bp+8] ; buffer address | 155 | lds dx,dword ptr [bp+8] ; buffer address |
156 | mov cx,word ptr [bp+12] ; number of bytes | 156 | mov cx,word ptr [bp+12] ; number of bytes |
157 | mov ah,3fh ; read file | 157 | mov ah,3fh ; read file |
158 | int 21h | 158 | int 21h |
159 | jc read_err ; if failed, return error code | 159 | jc read_err ; if failed, return error code |
160 | cmp ax,word ptr [bp+12] ; make sure all bytes were read | 160 | cmp ax,word ptr [bp+12] ; make sure all bytes were read |
161 | je read_ok | 161 | je read_ok |
162 | mov ax,1 ; else return 1 for not OK | 162 | mov ax,1 ; else return 1 for not OK |
163 | jmp short read_err | 163 | jmp short read_err |
164 | read_ok: xor ax,ax ; return zero for OK | 164 | read_ok: xor ax,ax ; return zero for OK |
165 | read_err: pop ds ; restore registers and exit | 165 | read_err: pop ds ; restore registers and exit |
166 | pop es | 166 | pop es |
167 | pop dx | 167 | pop dx |
168 | pop cx | 168 | pop cx |
169 | pop bx | 169 | pop bx |
170 | pop di | 170 | pop di |
171 | pop si | 171 | pop si |
172 | pop bp | 172 | pop bp |
173 | ret | 173 | ret |
174 | _jdos_read endp | 174 | _jdos_read endp |
175 | 175 | ||
176 | 176 | ||
177 | ; | 177 | ; |
178 | ; short far jdos_write (short handle, void far * buffer, unsigned short count) | 178 | ; short far jdos_write (short handle, void far * buffer, unsigned short count) |
179 | ; | 179 | ; |
180 | ; Write to file | 180 | ; Write to file |
181 | ; | 181 | ; |
182 | _jdos_write proc far | 182 | _jdos_write proc far |
183 | push bp ; linkage | 183 | push bp ; linkage |
184 | mov bp,sp | 184 | mov bp,sp |
185 | push si ; save all registers for safety | 185 | push si ; save all registers for safety |
186 | push di | 186 | push di |
187 | push bx | 187 | push bx |
188 | push cx | 188 | push cx |
189 | push dx | 189 | push dx |
190 | push es | 190 | push es |
191 | push ds | 191 | push ds |
192 | mov bx,word ptr [bp+6] ; file handle | 192 | mov bx,word ptr [bp+6] ; file handle |
193 | lds dx,dword ptr [bp+8] ; buffer address | 193 | lds dx,dword ptr [bp+8] ; buffer address |
194 | mov cx,word ptr [bp+12] ; number of bytes | 194 | mov cx,word ptr [bp+12] ; number of bytes |
195 | mov ah,40h ; write file | 195 | mov ah,40h ; write file |
196 | int 21h | 196 | int 21h |
197 | jc write_err ; if failed, return error code | 197 | jc write_err ; if failed, return error code |
198 | cmp ax,word ptr [bp+12] ; make sure all bytes written | 198 | cmp ax,word ptr [bp+12] ; make sure all bytes written |
199 | je write_ok | 199 | je write_ok |
200 | mov ax,1 ; else return 1 for not OK | 200 | mov ax,1 ; else return 1 for not OK |
201 | jmp short write_err | 201 | jmp short write_err |
202 | write_ok: xor ax,ax ; return zero for OK | 202 | write_ok: xor ax,ax ; return zero for OK |
203 | write_err: pop ds ; restore registers and exit | 203 | write_err: pop ds ; restore registers and exit |
204 | pop es | 204 | pop es |
205 | pop dx | 205 | pop dx |
206 | pop cx | 206 | pop cx |
207 | pop bx | 207 | pop bx |
208 | pop di | 208 | pop di |
209 | pop si | 209 | pop si |
210 | pop bp | 210 | pop bp |
211 | ret | 211 | ret |
212 | _jdos_write endp | 212 | _jdos_write endp |
213 | 213 | ||
214 | 214 | ||
215 | ; | 215 | ; |
216 | ; void far jxms_getdriver (XMSDRIVER far *) | 216 | ; void far jxms_getdriver (XMSDRIVER far *) |
217 | ; | 217 | ; |
218 | ; Get the address of the XMS driver, or NULL if not available | 218 | ; Get the address of the XMS driver, or NULL if not available |
219 | ; | 219 | ; |
220 | _jxms_getdriver proc far | 220 | _jxms_getdriver proc far |
221 | push bp ; linkage | 221 | push bp ; linkage |
222 | mov bp,sp | 222 | mov bp,sp |
223 | push si ; save all registers for safety | 223 | push si ; save all registers for safety |
224 | push di | 224 | push di |
225 | push bx | 225 | push bx |
226 | push cx | 226 | push cx |
227 | push dx | 227 | push dx |
228 | push es | 228 | push es |
229 | push ds | 229 | push ds |
230 | mov ax,4300h ; call multiplex interrupt with | 230 | mov ax,4300h ; call multiplex interrupt with |
231 | int 2fh ; a magic cookie, hex 4300 | 231 | int 2fh ; a magic cookie, hex 4300 |
232 | cmp al,80h ; AL should contain hex 80 | 232 | cmp al,80h ; AL should contain hex 80 |
233 | je xmsavail | 233 | je xmsavail |
234 | xor dx,dx ; no XMS driver available | 234 | xor dx,dx ; no XMS driver available |
235 | xor ax,ax ; return a nil pointer | 235 | xor ax,ax ; return a nil pointer |
236 | jmp short xmsavail_done | 236 | jmp short xmsavail_done |
237 | xmsavail: mov ax,4310h ; fetch driver address with | 237 | xmsavail: mov ax,4310h ; fetch driver address with |
238 | int 2fh ; another magic cookie | 238 | int 2fh ; another magic cookie |
239 | mov dx,es ; copy address to dx:ax | 239 | mov dx,es ; copy address to dx:ax |
240 | mov ax,bx | 240 | mov ax,bx |
241 | xmsavail_done: les bx,dword ptr [bp+6] ; get pointer to return value | 241 | xmsavail_done: les bx,dword ptr [bp+6] ; get pointer to return value |
242 | mov word ptr es:[bx],ax | 242 | mov word ptr es:[bx],ax |
243 | mov word ptr es:[bx+2],dx | 243 | mov word ptr es:[bx+2],dx |
244 | pop ds ; restore registers and exit | 244 | pop ds ; restore registers and exit |
245 | pop es | 245 | pop es |
246 | pop dx | 246 | pop dx |
247 | pop cx | 247 | pop cx |
248 | pop bx | 248 | pop bx |
249 | pop di | 249 | pop di |
250 | pop si | 250 | pop si |
251 | pop bp | 251 | pop bp |
252 | ret | 252 | ret |
253 | _jxms_getdriver endp | 253 | _jxms_getdriver endp |
254 | 254 | ||
255 | 255 | ||
256 | ; | 256 | ; |
257 | ; void far jxms_calldriver (XMSDRIVER, XMScontext far *) | 257 | ; void far jxms_calldriver (XMSDRIVER, XMScontext far *) |
258 | ; | 258 | ; |
259 | ; The XMScontext structure contains values for the AX,DX,BX,SI,DS registers. | 259 | ; The XMScontext structure contains values for the AX,DX,BX,SI,DS registers. |
260 | ; These are loaded, the XMS call is performed, and the new values of the | 260 | ; These are loaded, the XMS call is performed, and the new values of the |
261 | ; AX,DX,BX registers are written back to the context structure. | 261 | ; AX,DX,BX registers are written back to the context structure. |
262 | ; | 262 | ; |
263 | _jxms_calldriver proc far | 263 | _jxms_calldriver proc far |
264 | push bp ; linkage | 264 | push bp ; linkage |
265 | mov bp,sp | 265 | mov bp,sp |
266 | push si ; save all registers for safety | 266 | push si ; save all registers for safety |
267 | push di | 267 | push di |
268 | push bx | 268 | push bx |
269 | push cx | 269 | push cx |
270 | push dx | 270 | push dx |
271 | push es | 271 | push es |
272 | push ds | 272 | push ds |
273 | les bx,dword ptr [bp+10] ; get XMScontext pointer | 273 | les bx,dword ptr [bp+10] ; get XMScontext pointer |
274 | mov ax,word ptr es:[bx] ; load registers | 274 | mov ax,word ptr es:[bx] ; load registers |
275 | mov dx,word ptr es:[bx+2] | 275 | mov dx,word ptr es:[bx+2] |
276 | mov si,word ptr es:[bx+6] | 276 | mov si,word ptr es:[bx+6] |
277 | mov ds,word ptr es:[bx+8] | 277 | mov ds,word ptr es:[bx+8] |
278 | mov bx,word ptr es:[bx+4] | 278 | mov bx,word ptr es:[bx+4] |
279 | call dword ptr [bp+6] ; call the driver | 279 | call dword ptr [bp+6] ; call the driver |
280 | mov cx,bx ; save returned BX for a sec | 280 | mov cx,bx ; save returned BX for a sec |
281 | les bx,dword ptr [bp+10] ; get XMScontext pointer | 281 | les bx,dword ptr [bp+10] ; get XMScontext pointer |
282 | mov word ptr es:[bx],ax ; put back ax,dx,bx | 282 | mov word ptr es:[bx],ax ; put back ax,dx,bx |
283 | mov word ptr es:[bx+2],dx | 283 | mov word ptr es:[bx+2],dx |
284 | mov word ptr es:[bx+4],cx | 284 | mov word ptr es:[bx+4],cx |
285 | pop ds ; restore registers and exit | 285 | pop ds ; restore registers and exit |
286 | pop es | 286 | pop es |
287 | pop dx | 287 | pop dx |
288 | pop cx | 288 | pop cx |
289 | pop bx | 289 | pop bx |
290 | pop di | 290 | pop di |
291 | pop si | 291 | pop si |
292 | pop bp | 292 | pop bp |
293 | ret | 293 | ret |
294 | _jxms_calldriver endp | 294 | _jxms_calldriver endp |
295 | 295 | ||
296 | 296 | ||
297 | ; | 297 | ; |
298 | ; short far jems_available (void) | 298 | ; short far jems_available (void) |
299 | ; | 299 | ; |
300 | ; Have we got an EMS driver? (this comes straight from the EMS 4.0 specs) | 300 | ; Have we got an EMS driver? (this comes straight from the EMS 4.0 specs) |
301 | ; | 301 | ; |
302 | _jems_available proc far | 302 | _jems_available proc far |
303 | push si ; save all registers for safety | 303 | push si ; save all registers for safety |
304 | push di | 304 | push di |
305 | push bx | 305 | push bx |
306 | push cx | 306 | push cx |
307 | push dx | 307 | push dx |
308 | push es | 308 | push es |
309 | push ds | 309 | push ds |
310 | mov ax,3567h ; get interrupt vector 67h | 310 | mov ax,3567h ; get interrupt vector 67h |
311 | int 21h | 311 | int 21h |
312 | push cs | 312 | push cs |
313 | pop ds | 313 | pop ds |
314 | mov di,000ah ; check offs 10 in returned seg | 314 | mov di,000ah ; check offs 10 in returned seg |
315 | lea si,ASCII_device_name ; against literal string | 315 | lea si,ASCII_device_name ; against literal string |
316 | mov cx,8 | 316 | mov cx,8 |
317 | cld | 317 | cld |
318 | repe cmpsb | 318 | repe cmpsb |
319 | jne no_ems | 319 | jne no_ems |
320 | mov ax,1 ; match, it's there | 320 | mov ax,1 ; match, it's there |
321 | jmp short avail_done | 321 | jmp short avail_done |
322 | no_ems: xor ax,ax ; it's not there | 322 | no_ems: xor ax,ax ; it's not there |
323 | avail_done: pop ds ; restore registers and exit | 323 | avail_done: pop ds ; restore registers and exit |
324 | pop es | 324 | pop es |
325 | pop dx | 325 | pop dx |
326 | pop cx | 326 | pop cx |
327 | pop bx | 327 | pop bx |
328 | pop di | 328 | pop di |
329 | pop si | 329 | pop si |
330 | ret | 330 | ret |
331 | 331 | ||
332 | ASCII_device_name db "EMMXXXX0" | 332 | ASCII_device_name db "EMMXXXX0" |
333 | 333 | ||
334 | _jems_available endp | 334 | _jems_available endp |
335 | 335 | ||
336 | 336 | ||
337 | ; | 337 | ; |
338 | ; void far jems_calldriver (EMScontext far *) | 338 | ; void far jems_calldriver (EMScontext far *) |
339 | ; | 339 | ; |
340 | ; The EMScontext structure contains values for the AX,DX,BX,SI,DS registers. | 340 | ; The EMScontext structure contains values for the AX,DX,BX,SI,DS registers. |
341 | ; These are loaded, the EMS trap is performed, and the new values of the | 341 | ; These are loaded, the EMS trap is performed, and the new values of the |
342 | ; AX,DX,BX registers are written back to the context structure. | 342 | ; AX,DX,BX registers are written back to the context structure. |
343 | ; | 343 | ; |
344 | _jems_calldriver proc far | 344 | _jems_calldriver proc far |
345 | push bp ; linkage | 345 | push bp ; linkage |
346 | mov bp,sp | 346 | mov bp,sp |
347 | push si ; save all registers for safety | 347 | push si ; save all registers for safety |
348 | push di | 348 | push di |
349 | push bx | 349 | push bx |
350 | push cx | 350 | push cx |
351 | push dx | 351 | push dx |
352 | push es | 352 | push es |
353 | push ds | 353 | push ds |
354 | les bx,dword ptr [bp+6] ; get EMScontext pointer | 354 | les bx,dword ptr [bp+6] ; get EMScontext pointer |
355 | mov ax,word ptr es:[bx] ; load registers | 355 | mov ax,word ptr es:[bx] ; load registers |
356 | mov dx,word ptr es:[bx+2] | 356 | mov dx,word ptr es:[bx+2] |
357 | mov si,word ptr es:[bx+6] | 357 | mov si,word ptr es:[bx+6] |
358 | mov ds,word ptr es:[bx+8] | 358 | mov ds,word ptr es:[bx+8] |
359 | mov bx,word ptr es:[bx+4] | 359 | mov bx,word ptr es:[bx+4] |
360 | int 67h ; call the EMS driver | 360 | int 67h ; call the EMS driver |
361 | mov cx,bx ; save returned BX for a sec | 361 | mov cx,bx ; save returned BX for a sec |
362 | les bx,dword ptr [bp+6] ; get EMScontext pointer | 362 | les bx,dword ptr [bp+6] ; get EMScontext pointer |
363 | mov word ptr es:[bx],ax ; put back ax,dx,bx | 363 | mov word ptr es:[bx],ax ; put back ax,dx,bx |
364 | mov word ptr es:[bx+2],dx | 364 | mov word ptr es:[bx+2],dx |
365 | mov word ptr es:[bx+4],cx | 365 | mov word ptr es:[bx+4],cx |
366 | pop ds ; restore registers and exit | 366 | pop ds ; restore registers and exit |
367 | pop es | 367 | pop es |
368 | pop dx | 368 | pop dx |
369 | pop cx | 369 | pop cx |
370 | pop bx | 370 | pop bx |
371 | pop di | 371 | pop di |
372 | pop si | 372 | pop si |
373 | pop bp | 373 | pop bp |
374 | ret | 374 | ret |
375 | _jems_calldriver endp | 375 | _jems_calldriver endp |
376 | 376 | ||
377 | JMEMDOSA_TXT ends | 377 | JMEMDOSA_TXT ends |
378 | 378 | ||
379 | end | 379 | end |