2004-06-12 23:34:04 +02:00
|
|
|
|
.model tiny
|
|
|
|
|
|
.486
|
|
|
|
|
|
smart
|
|
|
|
|
|
.code
|
|
|
|
|
|
|
2004-11-19 18:23:06 +01:00
|
|
|
|
org 0h
|
2004-06-12 23:34:04 +02:00
|
|
|
|
|
|
|
|
|
|
start:
|
|
|
|
|
|
|
|
|
|
|
|
jmp tsr
|
|
|
|
|
|
offsets dd 0
|
|
|
|
|
|
db 'TIMER'
|
|
|
|
|
|
tsr:
|
|
|
|
|
|
pushf
|
|
|
|
|
|
db 2eh,0ffh,1eh
|
|
|
|
|
|
dw offsets
|
|
|
|
|
|
cli
|
|
|
|
|
|
push ax bx es
|
|
|
|
|
|
mov bx,cs:compteur
|
|
|
|
|
|
inc bx
|
|
|
|
|
|
and bx,11b
|
|
|
|
|
|
mov cs:compteur,bx
|
|
|
|
|
|
mov bx,cs:[offset fig+bx]
|
|
|
|
|
|
mov ax,0B800h
|
|
|
|
|
|
mov es,ax
|
|
|
|
|
|
mov es:[0],bl
|
|
|
|
|
|
pop es bx ax
|
|
|
|
|
|
sti
|
|
|
|
|
|
iret
|
|
|
|
|
|
compteur dw 0
|
|
|
|
|
|
fig db '<27>\<5C>/'
|
|
|
|
|
|
end start
|
