forum.boolean.name

forum.boolean.name (http://forum.boolean.name/index.php)
-   3D-программирование (http://forum.boolean.name/forumdisplay.php?f=12)
-   -   Вопросы очередного новичка (http://forum.boolean.name/showthread.php?t=9214)

Reks888 18.01.2010 22:59

Ответ: Вопросы очередного новичка
 
Это стандартный блицовский пример, лежит в samples/castle. Если у тебя нет - бери

Вложение 8826

KingMaks 18.01.2010 23:04

Ответ: Вопросы очередного новичка
 
Reks888 не паходу нету. Вот скинь сюда :http://depositfiles.com/ru/
Там Обзор -> и выбереш фаил

Reks888 18.01.2010 23:10

Ответ: Вопросы очередного новичка
 
А чем тебе форумный аттач не нравится? Я конешн залью раз такое дело, вот только придется тебе спасибо говорить)
На те

RlexGm 19.01.2010 09:55

Ответ: Вопросы очередного новичка
 
Цитата:

Сообщение от Hurrit (Сообщение 133931)
Для совмещения этих кусочков кода, надо один кусочек вписать в другой. Ваш К.О.

конешн спс за совет, но когда тупо все сливаешь в одно не работает

-=SCiP=- 19.01.2010 19:04

Ответ: Вопросы очередного новичка
 
Цитата:

EaNub
но когда тупо все сливаешь в одно не работает
Зачем так делать? Не легче ли просмотреть пример и понять как работает он а потом уже по примеру делать.
а сливание в 1н это называется копировать вставить :)

Randomize 19.01.2010 22:01

Ответ: Вопросы очередного новичка
 
Ребят, я с вас хренею.
Прошу подумайте хоть чуть чуть.
Или начинайте пересматривать свои увлечения, просто это уже верх лени.

В этой теме:
30% вопросов, на которые есть ответы у гугла причём на первой странице.
60% оффтоп порождённый 30% процентами
и 10% полезной информации.

IGR 19.01.2010 22:04

Ответ: Вопросы очередного новичка
 
Цитата:

Ребят, я с вас хренею.
Прошу подумайте хоть чуть чуть.
Или начинайте пересматривать свои увлечения, просто это уже верх лени.
угу !! нада закрывать эти две темы, а то совсем обленились !! :)

Morganolla 19.01.2010 22:11

Ответ: Вопросы очередного новичка
 
Не-не... не надо! Я почитываю и учуся... потихоньку... Просто если вам лень отвечать, то и не отвечайте... А зачем еще форум то нужен...? :)

Reizel 20.01.2010 07:32

Ответ: Вопросы очередного новичка
 
Да пусть пишут, че бы не помочь то :) А не хотят учить - ну и хрен с ними :)

PackegerX 20.01.2010 12:42

Ответ: Вопросы очередного новичка
 
здрасьте всем,
есть небольшая проблема решил написать вдруг поможете, короче как сделать удаление объекта после проигрывания секции анимации ?
Код:

     
If CountCollisions(player)=1 Then
cx#=CollisionNX#(player,1)
cy#=CollisionNY#(player,1)
cz#=CollisionNZ#(player,1)
If cy#=-1 Then
 cb=EntityCollided (player,type_box)
                If cb<>0 Then
                If AnimSeq (cb)=0 Then
                        ExtractAnimSeq (cb,0,7)
                        Animate cb,3,0.2,1
                EndIf
                EndIf
EndIf
EndIf

- вот код
почему-то впоследствии нельзя использовать freeentity cb а как тогда удалить по идентификатору объекта?
не для каждого же объекта прописывать удаление по событию )

и как проверить существует ли ентити в мире или нет?

------
а все каким то образом разобрался :)
сделал так )
Код:

If CountCollisions(mario)=1 Then
cx#=CollisionNX#(mario,1)
cy#=CollisionNY#(mario,1)
cz#=CollisionNZ#(mario,1)
        If cx#=0 And cy#=1 Then
                If KeyDown(57)=1 And (EntityCollided (mario,type_land)<>0 Or EntityCollided (mario,type_box)<>0 Or EntityCollided (mario,type_quest)<>0 Or EntityCollided (mario,type_tube)<>0 Or EntityCollided (mario,type_ladder)<>0) Then
                speedy#=5                        ;то скорость вверх 5
                mil1=MilliSecs()                ;и текущее время в милисекундах <40000000
                EndIf
        EndIf
        If cy#=-1 Then
        speedy#=1
      cb=EntityCollided (mario,type_box)
                If cb<>0 Then
                ;If AnimSeq (cb)=0 Then
                        ;ExtractAnimSeq (cb,0,7)
                        ;Animate cb,3,0.2,1
                        cbx#=EntityX# (cb)
                        cby#=EntityY# (cb)
                        cbz#=EntityZ# (cb)
                        cbdel=1
                        FreeEntity cb
                ;EndIf
                EndIf
        EndIf
EndIf
If cbdel=1 Then
PlaySound boxsnd
cb1=LoadAnimMesh ("Models\box.b3d")
PositionEntity cb1,cbx#,cby#,cbz#
ExtractAnimSeq (cb1,0,7)
Animate cb1,3,0.2,1
cbdel=2
EndIf

If cbdel=2 Then
If Animating (cb1)=0 Then
FreeEntity cb1
cbdel=0
EndIf
EndIf


Morganolla 26.01.2010 22:18

Ответ: Вопросы очередного новичка
 
Цитата:

Сообщение от wolfhound512 (Сообщение 133524)
Можно:
Код:

Type Body
        Field x,y,z
End Type

Dim array.Body(10)

For i=0 To 10
        array(i) = New Body
        array(i)\x=Rnd(1,10)
        array(i)\y=Rnd(1,10)
        array(i)\z=Rnd(1,10)
Next

For i=0 To 10
        Text 10, i*10, array(i)\x
        Text 100, i*10, array(i)\y
        Text 200, i*10, array(i)\z
Next

WaitKey()


Пробовал плотно поработать с массивами из типов... Ё-моё, какие же эти типы глюкавые в Блице!!! Весь испелевался!!! И отказался от них... совсем!!!

Hurrit 27.01.2010 20:34

Ответ: Вопросы очередного новичка
 
В блице всё нормально, если умеешь пользоваться. Типы тоже вполне нормальные. Ругать инструмент не надо, лучше руки подправьте. Искренне ваш блицефаг-кун.

Morganolla 29.01.2010 21:50

Ответ: Вопросы очередного новичка
 
Как сделать вид из кабины космического корабля? Чтобы был виден сам антураж кабины... типа сделать сферу и изнутри нанести текстуры...? Киньте ссылки на примерчики... :)

IGR 29.01.2010 21:54

Ответ: Вопросы очередного новичка
 
Цитата:

типа сделать сферу и изнутри нанести текстуры...? Киньте ссылки на примерчики...
ну если кабина в виде сферы тебя устраивает то можно и так !!
FlipMesh еще !! выварачивает меш !!

но нада моделить, тестурить кабину вручную, и загружать !!

Reizel 29.01.2010 22:43

Ответ: Вопросы очередного новичка
 

не первый раз замечаю... у IGR наверно бот стоит который сам в конце предложения "!!" вставляет!! ни больше, ни меньше!! Меня ваще так прикалывает :):):)
IGR, без обид :)


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

vBulletin® Version 3.6.5.
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Перевод: zCarot