Народ, помогите сделать Будильник на Turbo debugger

Тема в разделе "WASM.BEGINNERS", создана пользователем Crixalis, 3 сен 2008.

  1. Crixalis

    Crixalis New Member

    Публикаций:
    0
    Регистрация:
    3 сен 2008
    Сообщения:
    16
    ПГТА (Пензенская государственная технологическая академия)
     
  2. Crixalis

    Crixalis New Member

    Публикаций:
    0
    Регистрация:
    3 сен 2008
    Сообщения:
    16
    Народ, я несобираюсь быть программером как вы, я хочу выучить язык программирования в рамках моего задания, я просто попросил помощи, и не просил критиковать меня...
     
  3. Mikl___

    Mikl___ Супермодератор Команда форума

    Публикаций:
    14
    Регистрация:
    25 июн 2008
    Сообщения:
    3.792
    В чем вопрос? Хочешь выучить язык -- учи. Но ведь на самом деле, ты не просто просишь помощи -- тебе хочется, что бы твое задание писал кто-то другой, причем на халяву. Отсюда и вполне ожидаемая реакция
     
  4. _basmp_

    _basmp_ New Member

    Публикаций:
    0
    Регистрация:
    10 июл 2005
    Сообщения:
    2.939
    Crixalis
    Это кто? Инженеры по колбасе? Тогда прогить вам и правда.. Хотя кто знает? Может вам линию консервную программить придется. Там узкого спеца мало. Надо и то и то хоть на полпальца знать.
     
  5. Crixalis

    Crixalis New Member

    Публикаций:
    0
    Регистрация:
    3 сен 2008
    Сообщения:
    16
    Жуй мопед)
     
  6. Crixalis

    Crixalis New Member

    Публикаций:
    0
    Регистрация:
    3 сен 2008
    Сообщения:
    16
    Ты чурка штоль? По русски писать научись а потом пиши)
     
  7. DEEP

    DEEP Андрей

    Публикаций:
    0
    Регистрация:
    27 апр 2008
    Сообщения:
    491
    Адрес:
    г. Владимир
    А вот этого тебе явно говорить не стоило.
    ибо:
    1) Русский язык госп. _basmp_, думаю, знает получше твоего.
    2) Он правильно сказал. Если такое задают, то Паскаль надо (хотя бы самый церковно-приходской минимум) знать.

    ЗЫ. А вообще в Сети дочёрта и более готовых сырцов.
     
  8. toto

    toto New Member

    Публикаций:
    0
    Регистрация:
    15 июн 2008
    Сообщения:
    36
    Crixalis гопнег
     
  9. _basmp_

    _basmp_ New Member

    Публикаций:
    0
    Регистрация:
    10 июл 2005
    Сообщения:
    2.939
    Crixalis
    Ого! Интересные звуки от просящего и ничего взамен не предлагающего. Фы это так надеетесь, что люди вам помогать кидаться будут? Приходят мысли почему вам не помогают в офе. Впрочем, почему-же, один-два лишних нолика справа и заострять внимания на вашем мычании никто больше не будет. А так, в рядах вооруженных сил полно вакансий для крутых и брутальных хлопцев. Зачем вам автоматические линии, програмление и проч голимые железки? От них больше голова болит, слепнешь, на стульчике ссыхаешься, вид теряешь, а вот пальцы редко когда получается правильно расположить.. Армия - другое дело. Сплошное здоровье. Любовь и поклонение всех дунь в округе. Думать не просто не надо, это запрещено по уставу. Много возможностей покончать товарищей. Ну и чины, командирство.. Сердце радуется. Возможно, стоит бросить настолько нелюбимый институт?
     
  10. _basmp_

    _basmp_ New Member

    Публикаций:
    0
    Регистрация:
    10 июл 2005
    Сообщения:
    2.939
    DEEP
    Вообще-то г. Crixalis прав. Русяз (и другие язы) знаю плохо. Постоянно в личку получаю раздраженные отписи, мол, как я смею так ставить запятые и 'что за местечковое произношение'. Как человек вежливый (мне так нравится пока), я, обычно, не пишу где я видел ув. тов. с их образцовостью, грамотностью и мнениями о моем слоге. Но факт, что на мову, любую, ресурсов выделено у меня по минимуму.
    Современные технологические линии - сложная вещь (у меня родственница работает по теме и сужу я по ее проектам). Встраиваемые в них управляющие системы по мощности приближаются к десктопам, работают под спец осью, спец железом итд. Ну и все тонкости происходящие от встроенности. Имхо пас-ом не перебиться. Напр., в qnx стандарт - C. Да и под AVR паса пока не видел. Хотя, Пенза.. кто знает как там?
     
  11. Crixalis

    Crixalis New Member

    Публикаций:
    0
    Регистрация:
    3 сен 2008
    Сообщения:
    16
    Никого нехотел обидеть, извините, паскаль знаю, но td совсем другое, разберусь как-нить, на счёт будильника кое-чё надумал:
    Код:
    MOV AH,4AH ;номер функции
    INT 21H ;перераспределение
    ;---указываем на блок параметров
    MOV AX,DS ;в ES - сегмент
    MOV ES,AX ;
    MOV BX,OFFSET PARAMETERS ;в BX - смещение
    ;---сохранить копии SS и SP
    MOV KEEP_SS,SS ;сохраняем SS
    MOV KEEP_SP,SP ;сохраняем SP
    ;---указываем на строку имени файла
    MOV DX,OFFSET FILENAME ;смещение - в DX
    MOV DS,AX ;
    ;---загрузка программы
    MOV AH,4BH ;функция EXEC
    MOV AL,0 ;выбираем "загрузку и запуск"
    INT 21H ;запускаем задачу
    ;---впоследствии, восстанавливаем регистры
    MOV SS,KEEP_SS ;восстанавливаем SS
    MOV SP,KEEP_SP ;восстанавливаем SP

    ;---замена прерывания---------------------------------
    mov ah,25h
    mov al,4ah
    lea dx,Entry
    int 21h

    ; int 4ah
    ;---сбрасываем будильник------------------------------
    mov ah,07h
    int 1ah
    ;---устанавливаем будильник-------]--------------------
    mov ah,06h
    mov ch,hours
    mov cl,minutes
    mov dh,seconds
    int 1ah
    ;---выгружаемся----------------------------------------
    mov ax,3100h
    mov dx,(Init-Main+100h+0fh)/16
    int 21h
    init endp
    Code ends
    end Main



    вот, будет штото наподобие, тока звук осталось присобачить, эта запись часть этого http://www.wasm.ru/forum/viewtopic.php?id=20759
     
  12. JCronuz

    JCronuz New Member

    Публикаций:
    0
    Регистрация:
    26 сен 2007
    Сообщения:
    1.240
    Адрес:
    Russia
    ta
     
  13. Crixalis

    Crixalis New Member

    Публикаций:
    0
    Регистрация:
    3 сен 2008
    Сообщения:
    16
    TD другое, но похоже на ассемблер, надо будет самому попробовать в нём написать
     
  14. toto

    toto New Member

    Публикаций:
    0
    Регистрация:
    15 июн 2008
    Сообщения:
    36
    чо???
    td это turbo дебагер, это не компелятор, ta это turbo assembler, и пишут именно на ta, а на td отлаживают, товарищ JCronuz уже ведь вас поправил (:
     
  15. Crixalis

    Crixalis New Member

    Публикаций:
    0
    Регистрация:
    3 сен 2008
    Сообщения:
    16
    Это я знаю, у меня вопрос: реально ли сделать будильник на turbo debugger?
     
  16. Y_Mur

    Y_Mur Active Member

    Публикаций:
    0
    Регистрация:
    6 сен 2006
    Сообщения:
    2.494
    Для этого нужна супер Дзен Медитация ;)))
     
  17. Crixalis

    Crixalis New Member

    Публикаций:
    0
    Регистрация:
    3 сен 2008
    Сообщения:
    16
    Балин, а чё нам тогда мозги парят на счёт будильника, мож он под градусом был (препод)))))
     
  18. Y_Mur

    Y_Mur Active Member

    Публикаций:
    0
    Регистрация:
    6 сен 2006
    Сообщения:
    2.494
    Ага забрёл на wasm, прочёл эту статью и решил над вами поприкалываться ;))
     
  19. _basmp_

    _basmp_ New Member

    Публикаций:
    0
    Регистрация:
    10 июл 2005
    Сообщения:
    2.939
    Думаю, речь идет об отладке в тд. Но даже если и писать, то делаем следующее

    копипастим это
    Код (Text):
    1. #include <dos.h>
    2. #include <conio.h>
    3.  
    4.  
    5. void (__interrupt __far *prev_int_1c)();
    6.  
    7.  
    8. /*
    9. struct dostime_t {
    10.         unsigned char hour;     /* 0-23 */
    11.         unsigned char minute;   /* 0-59 */
    12.         unsigned char second;   /* 0-59 */
    13.         unsigned char hsecond;  /* 1/100 second; 0-99 */
    14. };
    15. */
    16. struct dostime_t alarm_time;
    17. struct dostime_t current_time;
    18.  
    19.  
    20. void alarm()
    21.   {
    22.     putch('\a');    // бикаем
    23.  
    24.     alarm_time.minute++;
    25.     if(alarm_time.minute > 59){
    26.       alarm_time.minute = 0;
    27.       alarm_time.hour++;
    28.     }
    29.   }
    30.  
    31.  
    32. void __interrupt __far timer_rtn()
    33.   {
    34.     _dos_gettime( &current_time );
    35.     if(current_time.hour == alarm_time.hour)
    36.       if(current_time.minute == alarm_time.minute)
    37.         alarm();
    38.     _chain_intr( prev_int_1c );
    39.   }
    40.  
    41.  
    42. void init()
    43.   {
    44.     prev_int_1c = _dos_getvect( 0x1c );
    45.     _dos_setvect( 0x1c, timer_rtn );
    46.   }
    47.  
    48.  
    49. void main()
    50.   {
    51.     /*
    52.        устанавливаем время в alarm_time
    53.     */
    54.     // alarm_time.hour = ...
    55.     // alarm_time.minute = ...
    56.    
    57.     /* устанавливаем перехватчик */
    58.     init();
    59.    
    60.     /*
    61.        Выходим оставляя в резиденте то, что до init()
    62.     */
    63.     _dos_keep( 0, (FP_OFF( init ) + 15) >> 4 );
    64.   }
    компилим openwatcom-овским дос компилером в com. Открываем в ТД смотрим код. Если надо - переписываем на бумажку и с бумажки вбиваем перед преподом. Получаем почетное имя 'куль хацкер'.

    подробности в ow help и в папочке 'samples\clibexam'

    PS всвязи с нашей чурковской врожденной тупизной и ленью, нас заломило доустановить досовые тулзы и либы, посему проверка не производилась, но для господина благородного русского это проблемой быть не должно.

    PS2 все это можно писать и не на С, а на пасе. Например тут (http://dn.codegear.com/article/20792) лежит исторический турбоПаскаль 3.02 с примерами (160кб). Умеет делать ком-овые файлы.
     
  20. Crixalis

    Crixalis New Member

    Публикаций:
    0
    Регистрация:
    3 сен 2008
    Сообщения:
    16
    ОГРОМНОЕ СПАСИБО!!!