forum.boolean.name - Как сделать стрельбу

Страница 2 из 2

Показывать 64 сообщений этой темы на одной странице

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=19903)

Артем Валерьевич

11.07.2015 15:03

Ответ: Как сделать стрельбу

Тупость не лечится, так шо можешь валить, мы не в обиде!

softcrasoft

11.07.2015 15:06

Ответ: Как сделать стрельбу

я не тупой. а просто нуб в блице.

L-ee-X

11.07.2015 15:09

Ответ: Как сделать стрельбу

Цитата:

Сообщение от softcrasoft (Сообщение 297613)

я не тупой. а просто нуб в блице.

ТЫ ТУПОЙ

Артем Валерьевич

11.07.2015 15:09

Ответ: Как сделать стрельбу

Тупой нуб в блице.

softcrasoft

11.07.2015 15:13

Ответ: Как сделать стрельбу

кроме вс двоих, мне этого никто не говорил. так что держите свои мнения при себе.

L-ee-X

11.07.2015 15:27

Ответ: Как сделать стрельбу

Вложений: 1

На готовая игра, написал за 10 минут. Большая часть времени ушла на поиски звуков .

PHP код:


		
			
Type Entity 
 Field Mesh 
 Field Name$ 
 Field HP
End Type 

Graphics3D 1024,768,32,2 
camera = CreateCamera() 
strelba = LoadSound ("snd\m107.mp3")
hp = LoadSound("snd\16_Lastlife.wav")
ranenie = LoadSound("snd\die1.wav")
ubit = LoadSound("snd\scream_21.wav")

For i = 1 To 10 
Bot.Entity = New Entity 
Bot\HP = 100
Bot\Name$ = Handle(Bot) 
Bot\Mesh = CreateCube() 
NameEntity Bot\Mesh, Bot\Name$ 
PositionEntity Bot\Mesh, Rnd(-50,50), Rnd(-50,50), 50 
NameEntity Bot\Mesh,Bot\Name$+Chr(34)+"Bot"+Chr(34) 
EntityPickMode Bot\Mesh,3 
Next

old.entity=Null 
Repeat 
RenderWorld() 

ent=CameraPick(camera,MouseX(),MouseY()) 
        If ent<>0 Then 
            old = set.entity  
            set = FindEntity(ent) 
            Text 10, 10 , EntityName(ent) + " HP = " + set\HP
        End If
            
           If MouseHit(1)
            PlaySound strelba
            If ent<>0
            set\HP = set\HP - 10
            
            If set\HP > 10
                PlaySound ranenie
            EndIf
                
            If set\HP <= 0
                PlaySound ubit
                FreeEntity set\Mesh
            EndIf
            
            If set\HP = 10
                HPChannel = PlaySound (hp)
            EndIf    
            EndIf     
            EndIf
Flip() 

Until (KeyHit(1)) 

End 

Function FindEntity.entity(ent) 
    name=EntityName(ent) 
    Return Object.entity(name) 
End Function

Gector

11.07.2015 16:03

Ответ: Как сделать стрельбу

Цитата:

Сообщение от softcrasoft (Сообщение 297616)

кроме вс двоих, мне этого никто не говорил. так что держите свои мнения при себе.

Чувак. Перепутать переменную с командой и половину дня одулпять что она значит - это жестко даже для незрячего новичка. Ты же утверждал что ты профи во многих языках. Хотя у тебя грубейшие ошибки идут одна за другой. В принципе и так было очевидно что ты наврал про это.

Вообще твоя проблема и в зрении тоже. Ты не видишь что в IDE ключевые слова блица подсвечиваются разными цветами. Если бы ты это видел то set не спутал бы с ключевым словом. Хотя бы по этому. Но люди могут и в блокноте кодить без какой либо подсветки. Но для новичка и подсветка бы сгодилась.

softcrasoft

11.07.2015 16:16

Ответ: Как сделать стрельбу

l-ee-x, не понятны две вещи:
1. ************old*=*set.entity**вот я говорил про эту функцию блица. что это?
2. зачем нужен звук hp?
gector, ************old*=*set.entity**тут не set =. правда сама переменная идёт ниже.

softcrasoft

11.07.2015 16:36

Ответ: Как сделать стрельбу

про hp я уже понял)))

L-ee-X

11.07.2015 16:40

Ответ: Как сделать стрельбу

Воспроизведи этот звук и поймешь для чего он, там даже по условию видно когда он воспроизводится... Чтобы понять что за set.entity вкури Type. Потом поймешь. Ты же профи в ООП.

softcrasoft

11.07.2015 16:43

Ответ: Как сделать стрельбу

английскую справку я читать не буду. в ооп я профи.

L-ee-X

11.07.2015 16:45

Ответ: Как сделать стрельбу

old = set.entity увидел? Теперь смотри old.entity и изучай функцию FindEntity.entity(ent) и вместе с ней команду Null и Object

L-ee-X

11.07.2015 16:46

Ответ: Как сделать стрельбу

Цитата:

Сообщение от softcrasoft (Сообщение 297627)

английскую справку я читать не буду. в ооп я профи.

Есть сцуко русская справка>>:(

L-ee-X

11.07.2015 16:47

Ответ: Как сделать стрельбу

Цитата:

Сообщение от softcrasoft (Сообщение 297611)

кроч пойду поищу другой форум.

Поверь мне лучше форума по Blitz3D ты не найдешь... Тут есть ВСЕ

softcrasoft

11.07.2015 16:48

Ответ: Как сделать стрельбу

по типам и т.д нет. по командам да

L-ee-X

11.07.2015 16:53

Ответ: Как сделать стрельбу

Про Type есть тут на форуме переведено все...

L-ee-X

11.07.2015 16:55

Ответ: Как сделать стрельбу

Тыц

softcrasoft

11.07.2015 16:56

Ответ: Как сделать стрельбу

и опять же. а ели я не мышкой а клавой поворачиваюсь

L-ee-X

11.07.2015 17:10

Ответ: Как сделать стрельбу

Там ты мышкой не поворачиваешься а просто курсор по экрану бегает. И если курсор на объекте то идет попадание ...
Object-Handle

L-ee-X

11.07.2015 17:11

Ответ: Как сделать стрельбу

Делай чтоб клавой поворачивался. Тоже за тебя написать? Я тебе уже все условия предоставил. Осталось только покумекать как это все воедино собрать...

softcrasoft

11.07.2015 17:43

Ответ: Как сделать стрельбу

но там к камерапик или где-то там есть слово mouse. а это мышь. или без разницы? можно turnEntity поворачиваться?

softcrasoft

11.07.2015 17:47

Ответ: Как сделать стрельбу

да, и я дико извиняюсь за свою тупость. я теперь понял, что на форуме много инфы. и нужно просто не лениться заглядывать в переводы и faq.
l-ee-x, спасибо за помощь!

L-ee-X

11.07.2015 18:19

Ответ: Как сделать стрельбу

Наконец то.

softcrasoft

11.07.2015 18:30

Ответ: Как сделать стрельбу

лан если даж не найду на форуме, переведу через перевод справку ))

L-ee-X

11.07.2015 18:53

Ответ: Как сделать стрельбу

Дак она там вся почти на русском. Бери и читай.

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

Страница 2 из 2

Показывать 64 сообщений этой темы на одной странице