.XLIST

; CLOCK.M
;--- —¨â âì áç¥âç¨ª â¨ª®¢
intr	clock,,<low DX,high CX>,1Ah,00h
;--- ‚ëª«îç¨âì áç¥âç¨ª â¨ª®¢
timer0_off	macro	Tick
	cli
	mov	DX, 43h
	mov	AL, 04h
	out	DX, AL
	mov	DL, 40h
	in	AL, DX
	mov	AH, AL
	in	AL, DX
	xchg	AH, AL
	sti
	mov	Tick, AX
endm
;--- ‚ª«îç¨âì áç¥âç¨ª â¨ª®¢
timer0_on	macro
	cli
	mov	DX, 43h
	mov	AL, 34h
	out	DX, AL
	mov	DL, 40h
	mov	AL, DH
	out	DX, AL
	out	DX, AL
	sti
endm

.LIST
