Rev | Line | |
---|
[9] | 1 | .define .lar2
|
---|
| 2 | .text
|
---|
| 3 |
|
---|
| 4 | .lar2:
|
---|
| 5 | ! bx, descriptor address
|
---|
| 6 | ! ax, index
|
---|
| 7 | pop cx
|
---|
| 8 | pop dx ! base address
|
---|
| 9 | push cx
|
---|
| 10 | push si
|
---|
| 11 | mov si,dx
|
---|
| 12 | sub ax,(bx)
|
---|
| 13 | mov cx,4(bx)
|
---|
| 14 | imul cx
|
---|
| 15 | add si,ax
|
---|
| 16 | sar cx,#1
|
---|
| 17 | jnb 1f
|
---|
| 18 | xorb ah,ah
|
---|
| 19 | lodsb
|
---|
| 20 | pop si
|
---|
| 21 | pop bx
|
---|
| 22 | push ax
|
---|
| 23 | jmp (bx)
|
---|
| 24 | 1:
|
---|
| 25 | pop dx ! saved si
|
---|
| 26 | mov ax,4(bx)
|
---|
| 27 | pop bx ! return address
|
---|
| 28 | sub sp,ax
|
---|
| 29 | mov ax,di ! save di
|
---|
| 30 | mov di,sp
|
---|
| 31 | rep
|
---|
| 32 | mov
|
---|
| 33 | mov di,ax
|
---|
| 34 | mov si,dx
|
---|
| 35 | jmp (bx)
|
---|
Note:
See
TracBrowser
for help on using the repository browser.