home *** CD-ROM | disk | FTP | other *** search
- ;ü¿í½¿«ΓÑ¬á ¼«ñπ½Ñ⌐ ñ½∩ »α«úαá¼¼
- ; TRACER ¿ RV
-
- ;-----------------------------------------------;
- ; Trace servis ;
- ; Make by M.Potanin. ;
- ; See ftrace.h ;
- ;-----------------------------------------------;
-
- _TEXT segment byte public 'CODE'
- assume cs:_TEXT,ds:_TEXT
- public _step
- public _ftrace
- public _save_stat
- _step proc near
- push bp
- push si
- push di
- push ds
- mov _my_ss,ss
- mov _my_sp,sp
- mov ax,_save_stat
- mov bx,_save_stat[2]
- mov cx,_save_stat[4]
- mov dx,_save_stat[6]
- mov si,_save_stat[8]
- mov di,_save_stat[0ah]
- mov bp,_save_stat[0ch]
- mov es,_save_stat[14h]
- mov ds,_save_stat[12h]
- mov ss,cs:_save_stat[10h]
- mov sp,cs:_save_stat[0eh]
- iret
- _step endp
- _ftrace proc near
- cli
- mov cs:_save_stat[10h],ss
- mov cs:_save_stat[0eh],sp
- mov ss,cs:_my_ss
- mov sp,cs:_my_sp
- sti
- mov cs:_save_stat[12h],ds
- pop ds
- mov _save_stat,ax
- mov _save_stat[2],bx
- mov _save_stat[4],cx
- mov _save_stat[6],dx
- mov _save_stat[8],si
- mov _save_stat[0ah],di
- mov _save_stat[0ch],bp
- mov _save_stat[14h],es
- pop di
- pop si
- pop bp
- retn
- _ftrace endp
- _save_stat label word
- dw 16h dup (0)
- _my_stack label dword
- _my_sp label word
- dw ?
- _my_ss label word
- dw ?
- _TEXT ends
- end