mem_resi.asm

汇编-主要是一些从csdn收集的一些好的汇编代码

;请问如何写tsr内存驻留程序？ 
 

;--------------------------------------------------------------------------------
;  我这正好有一个 
;--------------------------------------------------------------------------------
code segment 
  assume cs:code,ds:code 
org 100h 

start:  jmp install 
          msg      db 'Current time is: ' 
   	  time0    db ?,? 
                   db ':' 
  	  time1    db ?,? 
                   db ':' 
 	  time2    db ?,?,0,0 
          oldint1c dd ? 
newint1c: push ax 
      push bx 
      push cx 
      push dx 
      push si 
      push di 
      push es 
      mov ax,0200h 
      int 1ah 
      mov al,ch 
      lea si,time0 
      call bcd 
      mov al,cl 
      lea si,time1 
      call bcd 
      mov al,dh 
      lea si,time2 
      call bcd 
      mov ax,0b800h 
      mov es,ax 
      mov di,54*2d 
      lea si,msg 
 disp: mov al,cs:[si] 
      inc si 
      or al,al 
      jz disp0 
      cld 
      stosb 
      inc di 
      jmp disp 
disp0:   pop es 
      pop di 
      pop si 
      pop dx 
      pop cx 
      pop bx 
      pop ax 
      jmp cs:oldint1c 
 bcd:  mov ah,al 
      shr ah,1 
      shr ah,1 
      shr ah,1 
      shr ah,1 
      and al,0fh 
      add ax,'00' 
      xchg ah,al 
      mov cs:[si],ax 
      ret 
install:  push cs 
      pop ds 
      mov ax,351ch 
      int 21h 
      mov word ptr oldint1c,bx 
      mov word ptr oldint1c+2,es 
      lea dx,newint1c 
      mov ax,251ch 
      int 21h 
      mov dx,offset install+120h 
      mov cl,04h 
      shr dx,cl 
      mov ah,31h 
      int 21h 
code ends 
	end start