ЭЭЭ удержание более трёх клавиш? И не будет "залипания" и проч?
Вообще говоря, в чём проблема сделать без массива тогда?
While Not KeyHit(1)
Local KeysCount%=0
For i=1 To 237
KeysCount=KeysCount+KeyDown(i)
Next
AppTitle KeysCount
Wend
End
При зажатии 4ой ("буквенной") клавиши слышим харакетрный звуковой сигнал.
Может у вас какие винды волшебные, канеш, но я сколько помню всегда так было.
В этом и трабл - иначе б можно было обйтись и говнокодным
if KeyDown(code_left) and KeyDown(code_up) and KeyDown(code_fire) and KeyDown(code_map)
|
По теме: автор, клавиатура, это не геймпад - на ней, в первую очередь, текст набирают,
поэтому ограничение, емнип, 3+3 ("левая половина"+"правая половина" клавы).
Надо больше. Хотя бы десять
|
Юзай гейм-девайсы.
апд:
кстати вот -
http://phorum.key.ru/viewtopic.php?f=17&t=48114
кстати - обратите внимание на "дельные" советы в начале тамошней темы
.
Более 3+3 удержаний от клавы - это частности моделей (реализованные отдельными методами), и проектирование игры под такие тербования:
1) очень "дружелюбно" (как фиксированное граф.разрешение 201х2301)
2) заставляет задуматься об адекватности интерфейса (10 зажатых клавиш?! это тренажёр кистей рук что-ли?).