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

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

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

Ответ
 
Опции темы
Старый 14.10.2010, 19:59   #1
Reizel
Задрот
 
Аватар для Reizel
 
Регистрация: 24.07.2009
Адрес: Ивановская область, г. Кинешма
Сообщений: 1,574
Написано 407 полезных сообщений
(для 863 пользователей)
Что то тупит совсем у мну блиц...

Type Hgt
Field Snd:TSound
Field Name:String
EndType


Type Sound
Global LIST:TList=New TList

Function Load(File:String)
While(True)
K=K+1
snd:TSound=Null
snd=LoadSound("Source/Sounds/"+File+"_"+K+".wav")
If(Snd=Null) Exit
S.Hgt=New Hgt
S.Snd=Snd
S.Name=File
ListAddLast(LIST,S)
Wend
EndFunction

Function GetRandom:TSound( file:String )
For S:Hgt=EachIn LIST
If(S.Name=File) K=K+1
Next
R=Rand(1,K)
K=0
For S:Hgt=EachIn LIST
If(S.Name=File) K=K+1
If(K=R) Return S.Snd
Next
EndFunction
EndType


Вот код. В функции GetRandom Ругается на на первую же строчку, говорит что идентификатора Hgt нет. Упорно так. Я и названия менял, и по всякому - ему похрен, юзал копипаст названий, и ему всеравно пофиг!!!
Можт в блицмаксе есть лимит на кол-во типов??????????
(Offline)
 
Ответить с цитированием
Старый 14.10.2010, 20:03   #2
Reks888
Дэвелопер
 
Аватар для Reks888
 
Регистрация: 04.11.2009
Адрес: Украина, Днепропетровск
Сообщений: 1,480
Написано 662 полезных сообщений
(для 1,985 пользователей)
Ответ: Что то тупит совсем у мну блиц...

Замени
S.Hgt=New Hgt
на
S:Hgt=New Hgt
или
S=New Hgt

Привет, Blitz3d!
Кстати, заглянул бы в справку по New - там сразу написано
Type MyType
	Field	a,b,c
End Type

Local t:MyType
t=New MyType
__________________
>type C:\MyProj\*
www.sypiac.weebly.com
>
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Reizel (14.10.2010)
Старый 14.10.2010, 20:08   #3
Reizel
Задрот
 
Аватар для Reizel
 
Регистрация: 24.07.2009
Адрес: Ивановская область, г. Кинешма
Сообщений: 1,574
Написано 407 полезных сообщений
(для 863 пользователей)
Ответ: Что то тупит совсем у мну блиц...

Ох твою ж мать....Чувак, спасибо!!! Я прост сене сижу за БМаксом 5 часов(!) вот видать и переглючило мне моск...Надо ж было так наипацо....
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Reks888 (14.10.2010)
Старый 14.10.2010, 20:20   #4
Randomize
[object Object]
 
Аватар для Randomize
 
Регистрация: 01.08.2008
Адрес: В России
Сообщений: 4,354
Написано 2,470 полезных сообщений
(для 6,850 пользователей)
Ответ: Что то тупит совсем у мну блиц...

Сообщение от Павел
...
Для начала.
Используй нормальный Ide.
Стандартный в топку.

Всегда указывай Local или Global при определении переменной.

Типы объявлять не умеешь.
ИмяПеременной:Тип
Тоесть:
S.Hgt = New Hgt 
Надо писать:
S:Hgt = New Hgt 
Символ точки служит для доступа к методу или свойству типа (почти аналог "\" )

В начале главного файла всегда пиши SuperStrict иначе так и останешься блицером.

А вобще бери на анализ твой код, только отформатированый нормально и рабочий:
SuperStrict

Type Hgt
    Field Snd
:TSound
    Field Name
:String
EndType


Type Sound
    
Global LIST:TList = New TList

    
Function Load(File:String)
        
Local k:Intsnd:TSound
    
        
While(True)
            
1
            snd 
Null
            snd 
LoadSound("Source/Sounds/" File "_" ".wav")
            If(
Snd Null) Exit
            
Local S:Hgt = New Hgt
            S
.Snd Snd
            S
.Name File
            ListAddLast
(LIST, S)
        
Wend
    EndFunction

    
Function GetRandom:TSound(file:String)
        
Local k:Int 0
        Local R
:Int
        
        
For Local S:Hgt EachIn LIST
            If(
S.Name File1
        Next
        R 
Rand(1k)
        
0
        
For Local S:Hgt EachIn LIST
            If(
S.Name File1
            
If(R) Return S.Snd
        Next
    EndFunction
EndType 
И статусы в аське читай. Я в игрушку гамал какбе и альттабатся было лень.
__________________
Retry, Abort, Ignore? █
Intel Core i7-9700 4.70 Ghz; 64Gb; Nvidia RTX 3070
AMD Ryzen 7 3800X 4.3Ghz; 64Gb; Nvidia 1070Ti
AMD Ryzen 7 1700X 3.4Ghz; 8Gb; AMD RX 570
AMD Athlon II 2.6Ghz; 8Gb; Nvidia GTX 750 Ti
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Reizel (22.12.2010)
Старый 14.10.2010, 20:57   #5
Reizel
Задрот
 
Аватар для Reizel
 
Регистрация: 24.07.2009
Адрес: Ивановская область, г. Кинешма
Сообщений: 1,574
Написано 407 полезных сообщений
(для 863 пользователей)
Ответ: Что то тупит совсем у мну блиц...

Random, я написал уже львиную часть игры, просто жестоко ступил.
Знаю я про БМакс синтаксис
(Offline)
 
Ответить с цитированием
Старый 14.10.2010, 20:59   #6
Reizel
Задрот
 
Аватар для Reizel
 
Регистрация: 24.07.2009
Адрес: Ивановская область, г. Кинешма
Сообщений: 1,574
Написано 407 полезных сообщений
(для 863 пользователей)
Ответ: Что то тупит совсем у мну блиц...

ЗЫЖ!!!!
Как лучше реализовать более-менее реалистичный (ну чтоб не совсем уж квадратами) огонь, вид сверху? Кто то можт идейку подкинет???
(Offline)
 
Ответить с цитированием
Старый 14.10.2010, 21:16   #7
Randomize
[object Object]
 
Аватар для Randomize
 
Регистрация: 01.08.2008
Адрес: В России
Сообщений: 4,354
Написано 2,470 полезных сообщений
(для 6,850 пользователей)
Ответ: Что то тупит совсем у мну блиц...

Посмотри стандартные примеры.
Про партиклы слышал? Тоесть из одной части вылетают большим кол-вом частицы и уходят в альфу. Перед этим естессно меняя цвет.
В твоём случае жёлтый и красный. Можно ещё дымок чёрными.
Прикладываю универсальный спрайт. Из него можно сделать всё.
Это просто белая точка градирующая от центра в альфу.
Изображения
 
__________________
Retry, Abort, Ignore? █
Intel Core i7-9700 4.70 Ghz; 64Gb; Nvidia RTX 3070
AMD Ryzen 7 3800X 4.3Ghz; 64Gb; Nvidia 1070Ti
AMD Ryzen 7 1700X 3.4Ghz; 8Gb; AMD RX 570
AMD Athlon II 2.6Ghz; 8Gb; Nvidia GTX 750 Ti
(Offline)
 
Ответить с цитированием
Старый 14.10.2010, 21:19   #8
Reks888
Дэвелопер
 
Аватар для Reks888
 
Регистрация: 04.11.2009
Адрес: Украина, Днепропетровск
Сообщений: 1,480
Написано 662 полезных сообщений
(для 1,985 пользователей)
Ответ: Что то тупит совсем у мну блиц...

Вот есть целый труд про 2д огонь:
http://www.nik.no/2006/Gundersen2.pdf
__________________
>type C:\MyProj\*
www.sypiac.weebly.com
>
(Offline)
 
Ответить с цитированием
Ответ


Опции темы

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

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


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


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