Модераторы: volvo877, Snowy, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Вставки ассемблера 
:(
    Опции темы
Okonner
Дата 16.12.2006, 18:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 25
Регистрация: 5.11.2006
Где: Питер

Репутация: нет
Всего: нет



Всем желаю здоровья! Проблема состоит в том, что надо использовать буфер клавиатуры для фиксирования 
последней нажатой клавиши, но не могу понять, нужно ли здесь работать со стеком? Или тут достаточно колцевой очереди - самого буфера клавы??? 
Код

Program Laba3;
Uses
    CRT;

    Procedure Zatalkivanie;
       begin
            asm
              cli
              sub ax, ax
              mov es, ax
              mov al, es:[41ah]
              mov es:[41ch], al
              sti
            end;

            clrscr;
            write('Buffer is empty!!!!');
            readkey;
            clrscr;
            writeln('Please, enter sequence and press "ENTER" ');

            asm
            @m1:
              mov ah, 0
              int 16h
              stosb
              mov ah, 2
              mov dl, al
              int 21h
              cmp al, 13
              jne  @m1
            end;
       end;

     Procedure Vivod;
       begin
            asm

            end;
       end;

Begin
  clrscr;
  Zatalkivanie;
End.


Добавлено @ 18:42 
И, вообще, как мне быть дальше? Помогите пожалуйста, иначе мне будет пипец  smile 
PM MAIL   Вверх
Zero
Дата 16.12.2006, 19:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2169
Регистрация: 23.10.2004
Где: Россия, г. Рязань

Репутация: нет
Всего: 24



Okonner, тут раздел Паскаль, а у тебя грубо говоря по ассемблеру. В соответствующем разделе, тебе быстрее подскажут.
PM MAIL ICQ   Вверх
Letov
Дата 26.4.2007, 15:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 321
Регистрация: 22.2.2007
Где: Санкт-Петербург

Репутация: нет
Всего: 4



ReadKey???


--------------------
Не бывает плохих языков программирования. Бывают плохие программисты...

PM MAIL   Вверх
Snowy
Дата 26.4.2007, 16:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: нет
Всего: 484



Кольцевой очереди достаточно.
Вот только не совсем понял.
Ты хочешь определить последнюю нажатую клавишу или записать что-то в буфер? или что-то другое?
PM MAIL   Вверх
dumb
Дата 27.4.2007, 01:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


sceloglauxalbifacies
****


Профиль
Группа: Экс. модератор
Сообщений: 2929
Регистрация: 16.6.2006

Репутация: нет
Всего: 158



Snowy, фильтруй некрофилию... smile
Цитата(Okonner @  16.12.2006,  18:40 Найти цитируемый пост)
Помогите пожалуйста, иначе мне будет пипец

ему уже давно "пипец"... smile 

по существу вопроса сказать нечего, так как сам он(вопрос) поставлен нечетко.

ps. после прочтения сжечь.
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi"
THandle
Rrader
volvo877

Запрещается!

1. Обсуждать и делится взломанными компонентами или программным обеспечением

2. Публиковать ссылки на варез

3. Оффтопить

  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, THandle, Rrader, volvo877.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Object Pascal: кроссплатформенные технологии | Следующая тема »


 




[ Время генерации скрипта: 0.0453 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.