|
Основной форум Сюда все проблемы связанные с программированием. |
26.07.2010, 16:49
|
#31
|
ПроЭктировщик
Регистрация: 07.06.2010
Сообщений: 105
Написано 5 полезных сообщений (для 13 пользователей)
|
Ответ: Нужна помощь!
дайте плиз FAQ по lib_keys.
|
(Offline)
|
|
27.07.2010, 02:07
|
#32
|
Разработчик
Регистрация: 24.11.2008
Адрес: UA
Сообщений: 504
Написано 110 полезных сообщений (для 225 пользователей)
|
Ответ: Нужна помощь!
У меня только такое:
Lib_keys - Библиотека для определения одновременно нажатых клавиш
get_key_states; - с-но сама функция
|
__________________
Уважай собеседника, а лучше подари ему +
|
(Offline)
|
|
27.07.2010, 12:15
|
#33
|
Бывалый
Регистрация: 18.08.2009
Сообщений: 745
Написано 146 полезных сообщений (для 215 пользователей)
|
Ответ: Нужна помощь!
это всем и так известно. а как правильно узнавать потом из каких кодов результат состоит? я делаю так:
сравниваю результат с кодами в порядке убывания.
если результат больше - код в массив пишем, а от результата его отнимаем.
когда результат станет равен 0, то все коды будут у нас в массиве.
|
(Offline)
|
|
27.07.2010, 14:39
|
#34
|
ПроЭктировщик
Регистрация: 18.12.2007
Сообщений: 157
Написано 24 полезных сообщений (для 27 пользователей)
|
Ответ: Нужна помощь!
В яве это делается примерно так (цитата из доков):
// Check user input and update positions if necessary
int keyState = getKeyStates();
if ((keyState & LEFT_PRESSED) != 0) {
sprite.move(-1, 0);
}
else if ((keyState & RIGHT_PRESSED) != 0) {
sprite.move(1, 0);
}
Если в паскале есть битовые операции, то можно и в нём аналогично. Значения констант:
javax.microedition.lcdui.game.GameCanvas
public static final int DOWN_PRESSED 64
public static final int FIRE_PRESSED 256
public static final int GAME_A_PRESSED 512
public static final int GAME_B_PRESSED 1024
public static final int GAME_C_PRESSED 2048
public static final int GAME_D_PRESSED 4096
public static final int LEFT_PRESSED 4
public static final int RIGHT_PRESSED 32
public static final int UP_PRESSED 2
|
(Offline)
|
|
Сообщение было полезно следующим пользователям:
|
|
27.07.2010, 18:57
|
#35
|
Знающий
Регистрация: 20.03.2010
Сообщений: 271
Написано 16 полезных сообщений (для 32 пользователей)
|
Ответ: Нужна помощь!
Вот для тебя пример сделал
Program keys;
uses keys; const UP_PRESSED = 2; DOWN_PRESSED = 64; LEFT_PRESSED = 4; RIGHT_PRESSED = 32; FIRE_PRESSED = 256; GAME_A_PRESSED = 512; GAME_B_PRESSED = 1024; GAME_C_PRESSED = 2048; GAME_D_PRESSED = 4096; var img: image; key: integer; x,y: integer;
procedure cls; begin setcolor(255,255,255); fillrect(0,0,getwidth,getheight); end;
procedure init; begin img:=loadimage('/icon.png'); x:=20; y:=20; keys.init; keys.show; end;
Begin init; repeat key:=keys.get_key_states; if keys.get_bit(key, LEFT_PRESSED)<>0 then x:=x-5; if keys.get_bit(key, RIGHT_PRESSED)<>0 then x:=x+5; if keys.get_bit(key, UP_PRESSED)<>0 then y:=y-5; if keys.get_bit(key, DOWN_PRESSED)<>0 then y:=y+5; cls; drawimage(img,x,y); keys.refresh; delay(50); until keys.get_bit(key, FIRE_PRESSED)<>0; End.
__________________
¯¯¯¯\——-/¯¯¯¯ респект любителям BMX
|
(Offline)
|
|
Сообщение было полезно следующим пользователям:
|
|
27.07.2010, 22:04
|
#36
|
ПроЭктировщик
Регистрация: 07.06.2010
Сообщений: 105
Написано 5 полезных сообщений (для 13 пользователей)
|
Ответ: Нужна помощь!
чето у меня библа какя-то косячная чтоли, ошибки сыплются на примере от psih1
брал здесь: http://forum.boolean.name/showthread.php?t=7438
|
(Offline)
|
|
27.07.2010, 22:09
|
#37
|
Знающий
Регистрация: 20.03.2010
Сообщений: 271
Написано 16 полезных сообщений (для 32 пользователей)
|
Ответ: Нужна помощь!
у меня все робит без проблем
__________________
¯¯¯¯\——-/¯¯¯¯ респект любителям BMX
|
(Offline)
|
|
27.07.2010, 23:24
|
#38
|
ПроЭктировщик
Регистрация: 07.06.2010
Сообщений: 105
Написано 5 полезных сообщений (для 13 пользователей)
|
Ответ: Нужна помощь!
у меня ни одну функцию не признает
psih1 кинь плиз свою lib_keys
|
(Offline)
|
|
28.07.2010, 10:01
|
#39
|
Знающий
Регистрация: 20.03.2010
Сообщений: 271
Написано 16 полезных сообщений (для 32 пользователей)
|
Ответ: Нужна помощь!
Вот либа и пример
__________________
¯¯¯¯\——-/¯¯¯¯ респект любителям BMX
|
(Offline)
|
|
Сообщение было полезно следующим пользователям:
|
|
28.07.2010, 18:56
|
#40
|
ПроЭктировщик
Регистрация: 07.06.2010
Сообщений: 105
Написано 5 полезных сообщений (для 13 пользователей)
|
Ответ: Нужна помощь!
psih1 благодарю теперь рубит
только для моего проекта не катит, неприятные глюки от keys.refresh
Последний раз редактировалось NetBuilding, 28.07.2010 в 22:19.
|
(Offline)
|
|
29.07.2010, 21:07
|
#41
|
Знающий
Регистрация: 20.03.2010
Сообщений: 271
Написано 16 полезных сообщений (для 32 пользователей)
|
Ответ: Нужна помощь!
как реализовать графическую форму при нажатии на которую вводится текс в обычной форме showTextBox и при нажатии ок выводится в канавасе
(drawText)
__________________
¯¯¯¯\——-/¯¯¯¯ респект любителям BMX
|
(Offline)
|
|
29.07.2010, 22:04
|
#42
|
Бывалый
Регистрация: 18.08.2009
Сообщений: 745
Написано 146 полезных сообщений (для 215 пользователей)
|
Ответ: Нужна помощь!
алармы в КАНАВАСЕ наступают!
а в чем проблема то? если в переносах, то lib_text в помощь. если в коммандах, то хелп->туториал->работа с формами
|
(Offline)
|
|
29.07.2010, 22:47
|
#43
|
Знающий
Регистрация: 20.03.2010
Сообщений: 271
Написано 16 полезных сообщений (для 32 пользователей)
|
Ответ: Нужна помощь!
мне теорию я сам сделаю хотябы переход между конвасом в форму и наоборот
__________________
¯¯¯¯\——-/¯¯¯¯ респект любителям BMX
|
(Offline)
|
|
Ваши права в разделе
|
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
|
|
|
Часовой пояс GMT +4, время: 10:07.
|