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

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

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

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

Ответ
 
Опции темы
Старый 14.01.2010, 23:41   #151
KingMaks
Знающий
 
Аватар для KingMaks
 
Регистрация: 26.11.2009
Сообщений: 313
Написано 35 полезных сообщений
(для 95 пользователей)
Ответ: Вопросы очередного новичка

Может кто знает?

Rand (1,128 ) - только чтобы могли попасться только ети числа : 16,32,48,64,80,96,112,128

Чтобы лучше объяснить подам не правильный код : "Rand (1,128 ) Step 16"
__________________
StimuL
Maks
(Offline)
 
Ответить с цитированием
Старый 14.01.2010, 23:50   #152
NitE
злобный флудер
 
Регистрация: 10.07.2007
Сообщений: 2,585
Написано 789 полезных сообщений
(для 1,476 пользователей)
Ответ: Вопросы очередного новичка

боже мой... где твой абстрактное мышление ? почему всегда надо всё пытатся сделать через как можно большую жопу ?

i=Rand(1,8)
select s
case i=1 : s=12
case i=2 : s=32
и т.д.
end select
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
KingMaks (14.01.2010)
Старый 14.01.2010, 23:53   #153
H@NON
Дэвелопер
 
Регистрация: 17.01.2007
Сообщений: 1,552
Написано 351 полезных сообщений
(для 774 пользователей)
Ответ: Вопросы очередного новичка

если нужно чтобы из рандома совпал ряд чисел, то делай через Select :
result = false
While result = false
      number = Rand(1,128)
      Select number
           case 16,32,48,64,80,96,112,128
           result = true
      End select
Wend
(Offline)
 
Ответить с цитированием
Эти 3 пользователя(ей) сказали Спасибо H@NON за это полезное сообщение:
Katenok (15.01.2010), KingMaks (15.01.2010), Nex (15.01.2010)
Старый 14.01.2010, 23:54   #154
Reks888
Дэвелопер
 
Аватар для Reks888
 
Регистрация: 04.11.2009
Адрес: Украина, Днепропетровск
Сообщений: 1,480
Написано 662 полезных сообщений
(для 1,985 пользователей)
Ответ: Вопросы очередного новичка

Сообщение от NitE Посмотреть сообщение
боже мой... где твой абстрактное мышление ? почему всегда надо всё пытатся сделать через как можно большую жопу ?

i=Rand(1,8)
select s
case i=1 : s=12
case i=2 : s=32
и т.д.
end select
гы-гы. Ты собсно делаешь через ту же жопу.
i=Rand(1,
n=i*16

Вообще зависит от того для каких целей ты будешь применять. Если тебе нужно чтобы було True если значение кратно 16, то делай i=Rand(1,12
If i mod 16 = 0 Then allisgood=True
__________________
>type C:\MyProj\*
www.sypiac.weebly.com
>
(Offline)
 
Ответить с цитированием
Эти 5 пользователя(ей) сказали Спасибо Reks888 за это полезное сообщение:
baton4ik (15.01.2010), Harter (15.01.2010), KingMaks (15.01.2010), Reizel (15.01.2010), SBJoker (15.01.2010)
Старый 15.01.2010, 15:58   #155
Reizel
Задрот
 
Аватар для Reizel
 
Регистрация: 24.07.2009
Адрес: Ивановская область, г. Кинешма
Сообщений: 1,574
Написано 407 полезных сообщений
(для 863 пользователей)
Ответ: Вопросы очередного новичка

Блин вот только что хотел написать это
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Reks888 (15.01.2010)
Старый 15.01.2010, 18:41   #156
RlexGm
ПроЭктировщик
 
Регистрация: 11.11.2009
Сообщений: 172
Написано 17 полезных сообщений
(для 34 пользователей)
Ответ: Вопросы очередного новичка

чет я не допёр а как воспроизвести звук топота(подскажите плз
когда удерживаю бежать то он начинает звук многократно повторять причем до конца доигрывает только 1 раз а потом как получается как дрелью...
(Offline)
 
Ответить с цитированием
Старый 15.01.2010, 18:48   #157
Reizel
Задрот
 
Аватар для Reizel
 
Регистрация: 24.07.2009
Адрес: Ивановская область, г. Кинешма
Сообщений: 1,574
Написано 407 полезных сообщений
(для 863 пользователей)
Ответ: Вопросы очередного новичка

Создай в типе поле Sount_TOP_TOP И делай так:
if чувак_перемещается
If soundPlaying(P\Sound_TOP_TOP) Then P\Sound_TOP_TOP=PlaySound(Sound_TOP_TOP)
endif
endif
(Offline)
 
Ответить с цитированием
Старый 15.01.2010, 18:52   #158
PackegerX
Нуждающийся
 
Аватар для PackegerX
 
Регистрация: 15.01.2010
Сообщений: 58
Написано 13 полезных сообщений
(для 34 пользователей)
Ответ: Вопросы очередного новичка

ЕаНуб, ну вот я например примерно так делаю: (хоть это и не правильно )
sound=loadsound("sound.mp3")
;цикл
while not keyhit(1)
if keydown(30)=1 or keydown (32)=1 then
if snd_rn=1 then
playsound (sound)
snd_rn=0
endif
endif
if keydown(30)=0 and keydown (32)=0 then
snd_rn=1
endif
wend
(Offline)
 
Ответить с цитированием
Старый 15.01.2010, 18:54   #159
Reks888
Дэвелопер
 
Аватар для Reks888
 
Регистрация: 04.11.2009
Адрес: Украина, Днепропетровск
Сообщений: 1,480
Написано 662 полезных сообщений
(для 1,985 пользователей)
Ответ: Вопросы очередного новичка

PackegerX
Ох...Сколько же народу на булку прет. Боюсь количество недопроЭктов вскоре увеличится вдвое
Ты откуда к нам заявился? Поисковик или вики?
__________________
>type C:\MyProj\*
www.sypiac.weebly.com
>
(Offline)
 
Ответить с цитированием
Старый 15.01.2010, 19:00   #160
PackegerX
Нуждающийся
 
Аватар для PackegerX
 
Регистрация: 15.01.2010
Сообщений: 58
Написано 13 полезных сообщений
(для 34 пользователей)
Ответ: Вопросы очередного новичка

Rexxar, я с Земли такая планета третья от солнца (поисковик)
Я сейчас в процессе - марио в 3д помоему многие начинают с этого хотя я думал что идею хорошую придумал))
(Offline)
 
Ответить с цитированием
Старый 15.01.2010, 19:03   #161
Reks888
Дэвелопер
 
Аватар для Reks888
 
Регистрация: 04.11.2009
Адрес: Украина, Днепропетровск
Сообщений: 1,480
Написано 662 полезных сообщений
(для 1,985 пользователей)
Ответ: Вопросы очередного новичка

Сообщение от PackegerX Посмотреть сообщение
Rexxar, я с Земли такая планета третья от солнца (поисковик)
Я сейчас в процессе - марио в 3д помоему многие начинают с этого
Ключевое слово выделено. Неправду ты говоришь - все делают супер мега РПГ которая убьет обливион, готику и (вставить название РПГ). А марио это то как раз чего нет у нас на форуме. Как сделаешь демку - сразу пости в проЭкты. Народ обрадуется, обещаю
__________________
>type C:\MyProj\*
www.sypiac.weebly.com
>
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Reizel (15.01.2010)
Старый 15.01.2010, 20:31   #162
Taugeshtu
scientist.alien
 
Аватар для Taugeshtu
 
Регистрация: 12.02.2007
Сообщений: 2,098
Написано 1,030 полезных сообщений
(для 2,593 пользователей)
Ответ: Вопросы очередного новичка

Нет в прогрессе, но был цельный конкурс ажно в 2007-м году...
__________________
Public service announcement: вы можете заблокировать отображение сообщений определённого пользователя, добавив его ник в список игнорируемых.
Tau lab.
We LOVE you. We MADE you.
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Reks888 (16.01.2010)
Старый 16.01.2010, 01:52   #163
Morganolla
Бывалый
 
Аватар для Morganolla
 
Регистрация: 03.12.2008
Адрес: наша раша
Сообщений: 762
Написано 129 полезных сообщений
(для 245 пользователей)
Ответ: Вопросы очередного новичка

Еще вопросик - а как в блитце уберечься от повторных инклудов? В сях писали типа If no define... #define.... А?
__________________
Reality Simulation Games
Core 2 Duo 2,8GHz, RAM 1Gb, ATI R5670 1Gb. WinXP 32
(Offline)
 
Ответить с цитированием
Старый 16.01.2010, 02:57   #164
SBJoker
Злобный Админ
 
Аватар для SBJoker
 
Регистрация: 04.09.2005
Сообщений: 5,926
Написано 3,415 полезных сообщений
(для 9,330 пользователей)
Ответ: Вопросы очередного новичка

Всё инклудить в главный файл, т.к. блитз в отличие от с++ не имеет раздельной компиляции исходников, и рассматривает весь код в целом.
Здесь инклуд - просто добавление исходника в проект.
__________________
(Offline)
 
Ответить с цитированием
Эти 2 пользователя(ей) сказали Спасибо SBJoker за это полезное сообщение:
Morganolla (16.01.2010), Nex (16.01.2010)
Старый 16.01.2010, 13:53   #165
RlexGm
ПроЭктировщик
 
Регистрация: 11.11.2009
Сообщений: 172
Написано 17 полезных сообщений
(для 34 пользователей)
Ответ: Вопросы очередного новичка

Сообщение от PackegerX Посмотреть сообщение
ЕаНуб, ну вот я например примерно так делаю: (хоть это и не правильно )
sound=loadsound("sound.mp3")
;цикл
while not keyhit(1)
if keydown(30)=1 or keydown (32)=1 then
if snd_rn=1 then
playsound (sound)
snd_rn=0
endif
endif
if keydown(30)=0 and keydown (32)=0 then
snd_rn=1
endif
wend
Запускает звук на звук подрят и получается пердеш какойтонет ли какого нить примерчика?
(Offline)
 
Ответить с цитированием
Ответ


Опции темы

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

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

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Я новичок! alcosholik Blitz3D 123 02.08.2014 22:55
Вопросы новичка в БМаксе ELIAS 2D-программирование 14 08.02.2010 10:43
Re: Я новичок! evel Болтовня 60 30.09.2007 11:23
Помогите новичку _maxim_ 3D-программирование 7 17.09.2006 15:48
Вопросы...помогите новичку Round 3D-программирование 3 10.09.2006 21:47


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


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