1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
.model tiny
.code
.startup
jmp Init
Msg db 'Resident module installed!',10,13,'$'
Old_09h dw 0,0
New09h:
mov ah, 02h
mov dl, 'A'
int 21h
jmp dword ptr cs:Old_09h
Init:
mov ah, 09h
mov dx, offset Msg
int 21h
mov ax, 3509h
int 21h
mov Old_09h, bx
mov Old_09h+2, es
mov ax, 2509h
lea dx, New09h
int 21h
lea dx, Init
int 27h
end
|
