Вопрос № 44449: Здраствуйте, очень нужна помощь... Нужно в кратчайшие сроки сделать дипломный проект в программе ТАСМ (под ДОС). Затормозил на создании часов. Читал много документации, но так ничего и не получается, нервы на исходе :) Можете ли выложить какието нара...
Вопрос № 44.449
Здраствуйте, очень нужна помощь... Нужно в кратчайшие сроки сделать дипломный проект в программе ТАСМ (под ДОС). Затормозил на создании часов. Читал много документации, но так ничего и не получается, нервы на исходе :) Можете ли выложить какието наработки или "намекнуть" - как сделать программу такого вида: Досовское окно в котором отображается системные часы(время как в Виндовсе) вида ЧЧ:ММ.
Как говорится "горю!!", плз помогите.
Заранее благодарен..
Отвечает: Евгений Иванов
Здравствуйте, Бородин Евгений Викторович / kain!
Очень просто. Перехватываешь таймер на каждую секунду, берёшь время и выводишь на экран.
--------- Что имеем - не храним, потерявши - плачем
Ответ отправил: Евгений Иванов (статус: Профессор) Россия, Нижний Новгород Тел.: +78313145721 Организация: M2Media.ru Адрес: Нижний Новгород, ул.Малая Ямская WWW:Eugene Ivanov ICQ: 214;88;90;76 ---- Ответ отправлен: 28.05.2006, 10:26
Отвечает: Пан Павел Константинович
Здравствуйте, Бородин Евгений Викторович / kain!
В целях не предоставления этого кода как Лаб. Работы, код не оптимизирован и не прокомментирован.
Так же, код может не верно работать, но это мало вероятно(простоя его не компилировал и не запускал на исполнение).
CSEG segment
assume cs:CSEG,ds:CSEG,ss:CSEG,es:CSEG
org 100h
.286
Begin:
cli
;===========================
mov ah,02h
int 1ah
xor dx,dx
;===========================
@1:
;ch = 03 (Hours)
;cl = 33 (Minute)
;Example: 03:33
mov al,ch
shr al,04h
add al,30h
int 29h
;===========================
mov al,ch
and al,0fh
add al,30h
int 29h
cmp dl,01h
je @@2
;===========================
mov al,':'
int 29h
;===========================
xchg cl,ch
inc dx
jmp @@1
;===========================
@2:
sti
;=========================
ret ;exit
;=========================
CSEG ends
end Begin
С, Уважением MnEm0n!C.
--------- Hello Worlds
Ответ отправил: Пан Павел Константинович (статус: 10-ый класс)
Ответ отправлен: 28.05.2006, 15:05 Оценка за ответ: 5 Комментарий оценки: Спасибо за ответ четкий ответ - все понятно!