Вниз  Pascal
- 15.07.2013 / 22:09
ВитаминКО
  Супермодератор

ВитаминКО 
Сейчас: Offline
Подключение библиотеки. Какой - сказать не могу, не интересовался (не было нужды).
Даже в бейсике без этого не обойтись, находил примеры. Пояндекси
__________________
 わからない!!
- 16.07.2013 / 21:02
St@SyaN
  Пользователь

St@SyaN 
Сейчас: Offline
ВитаминКО, я нашел, как стащить положение указателя (код ниже), про нажатие ни слова, либо ассемблер.
  1. uses dos;         {работа прерывании тут}
  2.  var r:registers;  {наш ключ к спасению:)}
  3.  rx,ry:integer;
  4.  begin
  5.  r.ax:=3;         {захотели получить координаты нахождения}
  6.  intr($33,r);
  7.  rx:=r.cx;         {координата X}
  8.  ry:=r.dx;        {координата Y}
  9.  end.

хотя надо r.bx посмотреть...

Изменено St@SyaN (16.07 / 21:02) (всего 1 раз)
- 16.07.2013 / 21:22
St@SyaN
  Пользователь

St@SyaN 
Сейчас: Offline
разобрался, реально r.bx хранит
- 19.09.2013 / 17:37
NIKO
  Пользователь

NIKO 
Сейчас: Offline
Перевелся вчера на новый факультет, и сразу стала проблема - надо изучить Паскаль. Вот сейчас сижу и вникаю. Хорошо что есть некоторые знания php, поэтому проще немного.
А потом ещё за С++ надо браться. :-(
- 19.09.2013 / 17:56
Virus-ON
  Пользователь

Virus-ON 
Сейчас: Offline
NIKO, Проще паскаля только бейсик. Там и вникать то нечего :)
- 19.09.2013 / 19:21
ВитаминКО
  Супермодератор

ВитаминКО 
Сейчас: Offline
Virus-ON (19.09.2013/17:56)NIKO, Проще паскаля только бейсик. Там и вникать то нечего :)золотые слова! :gg:
__________________
 わからない!!
- 20.09.2013 / 03:21
RblSb
  Пользователь

RblSb 
Сейчас: Offline
Virus-ON, Посмотри как тяжело людям в теме по бэйсику :gg: Всё новое понимать тяжело, только те кто это понимают, этого не понимают :gy:
- 27.09.2013 / 11:18
Askalite
  Пользователь

Askalite 
Сейчас: Offline
'A'..'Z' - как понять это выражение?
- 27.09.2013 / 11:31
Helltar
  Пользователь

Helltar 
Сейчас: Offline
Askalite, эммм... го весь код сюда.
- 27.09.2013 / 11:35
Askalite
  Пользователь

Askalite 
Сейчас: Offline
эм. case ch of
     'A'..'Z', 'a'..'z' :
WriteLn('Буква');
     '0'..'9' :
WriteLn('Цифра');
     '+', '-', '*', '/' :
WriteLn('Оператор');
     else WriteLn
('Специальный
символ')
end;

Изменено Askalite (27.09 / 11:36) (всего 1 раз)
Наверх  Всего сообщений: 540
Фильтровать сообщения
Поиск по теме
Файлы топика (22)