123456789101112131415161718192021222324252627 |
- .sect .text; .sect .rom; .sect .data; .sect .bss
- .define .csa2
- .sect .text
- .csa2:
- ! bx, descriptor address
- ! ax, index
- mov dx,(bx) ! default
- sub ax,2(bx)
- cmp ax,4(bx)
- ja 1f
- sal ax,1
- add bx,ax
- mov bx,6(bx)
- test bx,bx
- jnz 2f
- 1:
- mov bx,dx
- test bx,bx
- jnz 2f
- .extern ECASE
- .extern .fat
- mov ax,ECASE
- push ax
- jmp .fat
- 2:
- jmp bx
|