Извините, ничего не найдено.

Не расстраивайся! Лучше выпей чайку!
Регистрация
Справка
Календарь

Вернуться   forum.boolean.name > Программирование игр для компьютеров > Blitz3D > 2D-программирование

2D-программирование Вопросы, касающиеся двумерного программирования

Ответ
 
Опции темы
Старый 17.10.2009, 23:19   #1
pkfire
AnyKey`щик
 
Регистрация: 15.10.2009
Сообщений: 2
Написано 0 полезных сообщений
(для 0 пользователей)
Помогите пожалуста

я новичок и плохо в программировании понимаю, делаю простую фунцкию:

status = 1
If KeyDown(208)
status + 1
endIf
но при нажатии на эту клавишу статус не прибавляется(

Последний раз редактировалось moka, 18.10.2009 в 02:22. Причина: используй тэг [CODE]
(Offline)
 
Ответить с цитированием
Старый 17.10.2009, 23:46   #2
Android
Бывалый
 
Регистрация: 29.03.2007
Сообщений: 662
Написано 199 полезных сообщений
(для 448 пользователей)
Ответ: Помогите пожалуста

status = 1
If KeyDown(208)
status = status + 1
End If
(Offline)
 
Ответить с цитированием
Старый 18.10.2009, 00:07   #3
Hurrit
Мастер
 
Аватар для Hurrit
 
Регистрация: 27.01.2008
Адрес: Россия, СКФО, ЧР, Грозный
Сообщений: 1,144
Написано 578 полезных сообщений
(для 2,207 пользователей)
Ответ: Помогите пожалуста

Чувак изучи сначала основы программирование, а то ты не сможешь написать нфс, кризис и прочее!!!11!
(Offline)
 
Ответить с цитированием
Старый 18.10.2009, 01:15   #4
EvilChaotic
Мастер
 
Аватар для EvilChaotic
 
Регистрация: 05.04.2008
Сообщений: 910
Написано 530 полезных сообщений
(для 3,006 пользователей)
Ответ: Помогите пожалуста

Он не будет прибавлятся = ) Т.к. ты в эту переменную пихаешь 1цу в цикле.. если у тебя вообще это в цикле....
global Status%
Function NewStatus()
;status = 1
If KeyHit(208) = 1
status% = status%  + 1
EndIf 
End Function
Попробуй, закоменти строчку status = 1 А во вторых надо писать так.. status = status + 1.. И я думаю сюда подойдет KeyHit а не Down.
__________________

EvilChaotic About
(Offline)
 
Ответить с цитированием
Старый 18.10.2009, 02:24   #5
moka
.
 
Регистрация: 05.08.2006
Сообщений: 10,429
Написано 3,454 полезных сообщений
(для 6,863 пользователей)
Ответ: Помогите пожалуста

Graphics 400,300
Repeat
 If KeyHit(208)
  status%=status+1
 EndIf
 Print status
 Flip
 Cls
Until KeyHit(0)
Писал в броузере, могут быть ошибки.
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Arles (18.10.2009)
Старый 18.10.2009, 10:59   #6
pkfire
AnyKey`щик
 
Регистрация: 15.10.2009
Сообщений: 2
Написано 0 полезных сообщений
(для 0 пользователей)
Ответ: Помогите пожалуста

спс всем!у меня еще один вопрос
я тут делаю наипростейшее меню
Graphics 800600

Global status% = 1
типа делаю переменные цвета текста
RedNew
% = 100 
BlurNew
% = 100
GreenNew
% = 100

RedOpt
% = 100
BlurOpt
% = 100
GreenOpt
% = 100

RedExit
% = 100
BlurExit
% = 100
GreenExit
% = 100

условия при которых меняется цвет
If staus%=
RedNew
% = 250 And BlurNew% = And GreenNew% = And RedOpt% = 100 And BlurOpt% = 100 And GreenOpt% = 100 And RedExit% = 100 And BlurExit% = 100 And GreenExit% = 100
EndIf
If 
status% = 
RedNew
% = 100 And BlurNew% = 100 And GreenNew% = 100 And RedOpt% = 250 And BlurOpt% = And GreenOpt% = And RedExit% = 100 And BlurExit% = 100 And GreenExit% = 100
EndIf

If 
status% = 3
RedNew
% = 100 And BlurNew% = 100 And GreenNew% = 100 And RedOpt% = 100 And BlurOpt% = 100 And GreenOpt% = 100 And RedExit% = 250 And BlurExit% = And GreenExit% = 0
EndIf

While 
Not KeyHit(1)
при нажатии на клавишу статус меняется
If KeyHit(208) = 1
status
% = status%  + 1
EndIf
создаем сам текст
SetFont ArialBlFNT
Color RedNew
%,BlurNew%,GreenNew%
Text 350200"New Game" 
Color RedOpt%,BlurOpt%,GreenOpt%
Text 355,250"Options"
Color RedExit%,BlurExit%,GreenExit%
Text 365,300"Exit"

Wend
End 
Меню доделовать не стал т.к. при нажатие на клавишу цвет не меняется(
Помогите плиз!
(Offline)
 
Ответить с цитированием
Старый 18.10.2009, 12:30   #7
EvilChaotic
Мастер
 
Аватар для EvilChaotic
 
Регистрация: 05.04.2008
Сообщений: 910
Написано 530 полезных сообщений
(для 3,006 пользователей)
Ответ: Помогите пожалуста

Graphics 800, 600,16,0

Global status% = 1
; типа делаю переменные цвета текста
Global  RedNew% = 100 
Global BlurNew% = 100
Global GreenNew% = 100

Global RedOpt% = 100
Global BlurOpt% = 100
Global GreenOpt% = 100

Global RedExit% = 100
Global BlurExit% = 100
Global GreenExit% = 100

; условия при которых меняется цвет

While Not KeyHit(1)
; при нажатии на клавишу статус меняется
If KeyHit(208) = 1
status% = status%  + 1
If status > 3 Then status = 1
EndIf

Select status%
	Case 1
		RedNew% = 250 
		 BlurNew% = 0 
		GreenNew% = 0 
		RedOpt% = 100 
		BlurOpt% = 100 
		GreenOpt% = 100 
		RedExit% = 100 
		BlurExit% = 100 
		GreenExit% = 100
	Case 2
		RedNew% = 100 
		BlurNew% = 100 
		GreenNew% = 100 
		RedOpt% = 250 
		BlurOpt% = 0 
		GreenOpt% = 0 
		RedExit% = 100 
		BlurExit% = 100 
		GreenExit% = 100
	Case 3
		RedNew% = 100 
		BlurNew% = 100 
		GreenNew% = 100 
		RedOpt% = 100 
		BlurOpt% = 100 
		GreenOpt% = 100 
		RedExit% = 250 
		BlurExit% = 0 
		GreenExit% = 0
         Default
		RedNew% = 100 
		BlurNew% = 100 
		GreenNew% = 100 
		RedOpt% = 100 
		BlurOpt% = 100 
		GreenOpt% = 100 
		RedExit% = 100 
		BlurExit% = 100 
		GreenExit% = 100 
End Select
; создаем сам текст
;SetFont ArialBlFNT

Color RedNew%,BlurNew%,GreenNew%
Text 350, 200, "New Game" 
Color RedOpt%,BlurOpt%,GreenOpt%
Text 355,250, "Options"
Color RedExit%,BlurExit%,GreenExit%
Text 365,300, "Exit"
;Tem 
Color 255,255,255
Text 20,20,"Status " + Status
 Flip 
Cls

Wend
Наверное секцию смены цвета тоже нужно было добавить в цикл = ))))))
А вообще это очень плохая реализация подцвета текста в меню. Нужно проверять координаты мыши в координатах позоции тексту, что-то типо невидимого ректа, который возвратит 1цу если пересеклась мышь с ним, а если возвратит 1цу можно и задать определенному тексту цвет = )
__________________

EvilChaotic About
(Offline)
 
Ответить с цитированием
Старый 18.10.2009, 14:21   #8
ABTOMAT
Ференька
 
Аватар для ABTOMAT
 
Регистрация: 26.01.2007
Адрес: улица Пушкина дом Колотушкина
Сообщений: 10,741
Написано 5,461 полезных сообщений
(для 15,675 пользователей)
Ответ: Помогите пожалуста

pkfire, зачем And юзаешь? And - это конъюнкция, в данном случае не нужна. Если хочешь чтоб несколько операторов были выполнены подряд - пиши каждый на своей строчке. Или используй двоеточие, если хочешь уместить их в одну строку.

SetFont - в цикле не нужен совершенно.
И да, действительно реализация плохая.
Советую почитать справку по всем операторам, которые ты используешь. Видно явное непонимание того, что они делают, отсюда такие несуразности в коде.
__________________
Мои проекты:
Анальное Рабство
Зелёный Слоник
Дмитрий Маслов*
Различие**
Клюква**

* — в стадии разработки
** — в стадии проектирования
Для проектов в стадии проектирования приведены кодовые имена

(Offline)
 
Ответить с цитированием
Старый 18.10.2009, 19:55   #9
ІГРОГРАЙКО
ПроЭктировщик
 
Аватар для ІГРОГРАЙКО
 
Регистрация: 20.06.2009
Адрес: Україна
Сообщений: 152
Написано 10 полезных сообщений
(для 24 пользователей)
Ответ: Помогите пожалуста

Чувак наверно толька начал програмировать и думает что ему тут все сразу возьмутса помогать. Да тебе помогут. Но лучше б ты попрактиковалса сам примерно пол года. Сам выучиш - будеш знать, а будеш спрашвать - ничево в мозгах не останетса и всегда надо будет начинать с начала...
__________________
Blitz3D, XNA, WebGL, OpenGL, Unity3D
PC: ASUS A55VM Core i3 (2.4Ghz), 6 Gb RAM, Nvidia GF 630M GT 2Gb
(Offline)
 
Ответить с цитированием
Ответ


Опции темы

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +4, время: 06:33.


vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot
Style crйe par Allan - vBulletin-Ressources.com