; This program creates an INT 60H ISR from scratch using TSR

·MODEL TINY
.CODE
	ORG 1OOH ;Force code at Offset 1OOH
.STARTUP
	JMP INSTALL
ISR_60H PROC FAR
	PUSH AX
	PUSH DX
	PUSH DS
	MOV AX, CS
	MOV DS, AX
	MOV DX, OFFSET MSG
	MOV AH, 09H
	INT 21H
	POP DS
	POP DX
	POP AX
	IRET
ISR_60H ENDP

INSTALL PROC
	MOV AX, CS
	MOV DS, AX
	MOV AH, 25H
	MOV AL, 60H
	MOV DX, OFFSET ISR_60H
	INT 21H
	MOV AH, 31H
	MOV AL, 00H
	MOV DX, OFFSET INSTALL
	MOV CL, 04
	SHR DX, CL
	INC DX
	INT 21H
INSTALL ENDP
END

; This program initiates the above TSR

.MODEL TINY
.CODE
.STARTUP
	MOV CX, 5	;loop 5 times
L1: 	INT 60H	; Display the message
	LOOP L1
.EXIT
END