time:
mov al,0
out 70h,al
in al,71h
cmp al,[.second]
je @f
mov [.second],al
mov al,2
out 70h,al
in al,71h
mov [.minute],al
mov al,4
out 70h,al
in al,71h
mov [.hour],al
@@:
ret
.second db 0
.minute db 0
.hour db 0
voilà pour la lecture de la RTC
pour ecrire, remplacer les in al,71h par des out 71h,al, et les preceder par des lectures des valeurs hour, minute, second au lieu de les faire suivre par une ecriture de ces memes valeurs.
me:
nop
ret
|