.model tiny
.code
	org	100h
start:	jmp	ini

int21:	cmp	ah,4ch
	jne	Call_Old
	xor	al,al
Call_Old:
	jmp	dword ptr cs:old21
old21	dw	?,?

ini:	mov	ax,3521h
	int	21h
	mov	old21,bx
	mov	old21+2,es
	
	mov	dx,offset int21
	mov	ax,2521h
	int	21h

	mov	dx,offset ini
	int	27h
end start