Можно. Попробуйте следующий код:
Procedure settime(hour, min, sec, hundreths : byte); assembler; asm
mov ch, hour mov cl, min mov dh, sec mov dl, hundreths mov ah, $2d int $21 end;
Procedure setdate(Year : word; Month, Day : byte); assembler; asm
mov cx, year mov dh, month mov dl, day mov ah, $2b int $21 end;
|