IPB
ЛогинПароль:

> Правила раздела!

1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!

2 страниц V < 1 2  
Closed Topic Открыть новую тему 
> нажатие кнопок..., считывание нажатия в цикле без его ост.
сообщение
Сообщение #21


Пионер
**

Группа: Пользователи
Сообщений: 81
Пол: Мужской
Реальное имя: Шурик

Репутация: -  0  +


MuXa , если хочеш , то можеш посмотреть мой вариант змейки.
Вот тут :
http://forum.pascal.net.ru/index.php?showtopic=3681


--------------------
Двадцать пятый час в сутках может появиться всего лишь из-за небольшой ошибки в программе.
Чтобы не воспользоваться сумасшедшими возможностями, нужно быть идиотом.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #22


-
****

Группа: Пользователи
Сообщений: 480
Пол: Мужской

Репутация: -  4  +


Цитата
вплоть до потери информации на харде...

какое прерывание и в каком состоянии надо цеплять, чтоб такого результата добится <_< ? или может IAT потасовать smile.gif


--------------------
бб
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #23


Ищущий истину
******

Группа: Пользователи
Сообщений: 4 825
Пол: Мужской
Реальное имя: Олег

Репутация: -  45  +


Цитата
какое прерывание и в каком состоянии надо цеплять, чтоб такого результата добится  ?

Со статусом модератора форума "Ассемблер" не поспоришь, ;) smile.gif однако INT13h!!!
Сам лично потерял информацию с харда таким образом однажды...

ЗЫ: да иногда и с INT21 можно делов натворить smile.gif


--------------------
Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #24


Знаток
****

Группа: Пользователи
Сообщений: 303
Пол: Мужской
Реальное имя: Роман

Репутация: -  2  +


Флейм пошёл жестокий...

Код
repeat

 key := readkey;
 if key=#0 then
   key := readkey;

 case key of
 #75:; {Left}
  begin
     x:=x-stepX;
     if (x < minX) then
        stepX := -stepX; {поменять направление движения на обратное}
  end;

 #77: {Right}
  begin
     x:=x+stepX;
     if (x > maxX) then
        stepX := -stepX;
  end;

 #72:; {Up} аналогично

 #80:; {Down}
 end;

until key=#27; {Esc}


Сообщение отредактировано: romtek -


--------------------
Romiras HomeLab- материалы и статьи по разработке ПО, моделирование алгоритмов, обработка и анализ информации, нейронные сети, машинное зрение и прочее.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

2 страниц V < 1 2
Closed Topic Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 4.05.2024 7:26
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name