Перевод из b3d в bmax. простой вопрос

[Данил]

Вот в упор не помню , как перевести тип из б3д в бмакс.

For t1.CSGTriangleTYPE = Each CSGTriangleTYPE
If t1\mindex = 2
For t2.CSGTriangleTYPE = Each CSGTriangleTYPE
If t2\mindex = 1 And t2\tarid <> t1\id
If t2\del = 0
If CSGTrisIntersect(t1,t2) = 1
CSGSplit t1,t2
EndIf
EndIf
EndIf
Next
EndIf
Next

цитата из б3д.

как перевести на ксорс под бмаксом.

For t1:CSGTriangleTYPE = EachIn CSGTriangleTYPE
If t1.mindex = 2
For t2:CSGTriangleTYPE = EachIn CSGTriangleTYPE
If t2.mindex = 1 And t2.tarid <> t1.id
If t2.del = 0
If CSGTrisIntersect(t1,t2) = 1
CSGSplit t1,t2
EndIf
EndIf
EndIf
Next
EndIf
Next

так не сканает, он орет.

Простой вопрос - Нужно создавать тлист для этого? или можно это обойти? Просто создавать тлист очень проблематично будет.

[SBJoker]

В BlitzMAX в отличие от B3d "правильные" типы, они скорее уже классы.

Type Class_Name 'называем наш тип/класс
    Field object_var:String ' поле, тип переменной String
    Global gvar:Int 'общая для всех объектов этого типа переменная

    Function GetGvar:Int() 'статическая функция, т.е. оступна по имени типа/ класса
        return gval              'например так: Class_Name.GetGval()
    End function

    Method GetField:String() 'метод класса, доступен только посредством объекта,
        'имеет прямой доступ к полям класса относящимся к текущему объекту.
        ' например: Local g:Class_Name=new Class_Name; g.GetField()
        return object_var
    End function

    'есть 2 уникальных метода New и Delete
    'New - конструктор этот метод если он есть вызывается автоматически при создании нового объекта этого типа.
    'Delete - деструктор, вызывается автоматически при удалении из памяти объекта этого типа
End type 'завершаем

'переменные нашего типа создаются с помощью ключевого слова New:
Local obj:MyType=new MyType 'дословно: создать новую локальную переменную типа MyType. При это для этой переменной будет вызван метод New если он есть.

Удаление переменной:
obj=Null

------
А теперь о методах хзранения полученых переменных, независимо от типа, наш ли он или встроеный, переменные можно хранить в:
* Единичной переменной ( Local a:int=15 или Local obj:MyType=new MyType)
* В массиве: Local a:int[]=new int[100] или Local obj:MyType[]=new MyType[100]
* В кольцевом списке: Local list:TList=new TList; list.AddLast("Hello")
* В индексированом списке: Local dict:TMap=New TMap; dict.Insert(obj, "First")

[Данил]

Ну, собсно, SBJoker, ты крут )... расписал все, что не просил, по сути)... просто я давно не связывался с типами б3д, и собсно ,все там забыл... как и в бмакс, так как программирование на полгода бросал, в бмаксе подзабыл...)

в общеМ, все-таки , думаю, способа обойти нету, заменил.

Сдался, по сути.)

[Данил]

В общем. перевожу булеановские функции с б3д на бмакс под ксорс.

Загнулся на xCountSurfaces , не видит меш ,и все. (

Думаю, код кидать бессмысленно, думаю, никто не захочет разбираться в 25 кб писанине...

но кину, надежда умерает последней.

[HolyDel]

* В индексированом списке: Local dict:TMap=New TMap; dict.Insert(obj, "First")

ух ты. в блицмаксе даже такое есть. а он крут!

[SBJoker]

В блитзмаксе всё есть, а чего нет можно на нём же и написать

[dimanche13]

Сообщение от SBJoker

В блитзмаксе всё есть, а чего нет можно на нём же и написать

подписываюсь.

[SBJoker]

э.х. забыл про наследование классов написать...
Кароче есть наследование классов, например:

Type MyExType Extends MyBaseType

End Type

После наследования класс нового типа всегда можно присваивать переменным базового типа, пользоваться локальными переменными базового типа как своими собственными. Пользоваться методами базового типа, если они не переопределены в текущем. В любом случае доступ даже к переопределёному методу базового класса возможен через объект Super. Например:
Super.DoMethod()

Доступ к свои методам помимо указания их имени, возможен посредством объекта Self. Например:
Self.DoMethod()

Эти возможности восновном для исключения неопределённости.

Зачем нужно наследование? Для расширения возможностей базового класса.
Например базовый класс Unit можно расширить до конкретных класов TSolder, TAircraft, TTechnic

В которых будут учтены особенности этих типов юнитов. Однако их можно все поместить в один список или массив и обрабатывать однотипно. Т.к. они фактически одного типа.