DirectX'о-заменитель

[Каденов Мират]

Я решил написать что-то вроде DirectX, но чисто Software. Может в будущем и переведу на hardware. Мне нужны алгоритмы, технологии. Например в "VB&3D" я задал вопрос про нормали. Потом нужен будет алгоритм текстуризации и т.д. Пока даже нет странички проекта, но в будущем может появится. Если кто заинтересован, пишите.

[ED HUNTER]

Это великое слово смысл... Не случайно ведь было оно кем- то когдато придуманно?...
Какой смысл создания заменителя DirectX?

Всем известно, что на VB квейка не напишешь. Не для кого не новость, что VB слишком медленная система для крутых 3D.

Ты пробовал писать игрушки на DirectX? Если нет- попробуй, может избавишся от этого решения.

И помни: Пока Мы программируем и работаем в windows, DirectX и прочий их софт будет жить.

Ты бы лучше начал с создания новой ОС типа AntiWinDos, что на Visual Basic'е не менее нереально...

В любом случае, задумка хорошая, но повторяю: НЕ ДЛЯ Basic!
Вот такое моё личное, субьективное мнение. Может и неправильное?

vbmaker@mail.ru

[Каденов Мират]

Конечно, VB вещь очень медленная и квадротекстурирование с картами смещения, криволинейными полигонами, NURBS-поверхностями, с фуллреальной физикой, рэйтрэйсинг, рэйкастинг, реалтайм Гуро-шейдинг и еще куча страшных слов на VB с фпсом 100 не получится, по можно ведь сделать что-то типа 3dsmax'а. Многочасовой рендеринг и крутая картинка. Я предлагаю что-то типа Linux'а - этот двжиок будет делать не одна компания, а энтузиасты. Линукс лучше Окно из-за того, что в нем ошибок меньше, ведь тестеров, отладчиков к нему (линуксу) очень много. И еще то, что можно с очень большой гордостью сказать - ЭТО МОЕ!. Этот движок будет с полностью открытым кодом. Любой желающий может переделать его, добавить новые функции. Потом можно будет часть функций заменить на hardware и тогда по скорости ничем не уступать DirectX'у. Главное в моем движке - открытый код, куча бета-тестеров и главное - ВСЕ СВОИМИ РУКАМИ! Даже если быстрее DirectX не получится (но круче - возможно) 3D MAX сфарганить получится. Даже если тебе не охота этим заниматься, то хоть чем можешь, помоги. Я даже могу один это сделать (типа очень хорошо понимаю d3drm), но будет это для меня очень трудно.

[ED HUNTER]

Будем держать контакт... Убедил ты меня... прийму участие.
С чего начнем???

[GoGosha]

На форме пикчебокс и кнопка
В массив AllPixls записываются все пиксели 3d мира, нажав на кнопку мы увидем вё это в перспективе теория здесь http://kvant.mccme.ru/1974/03/p09.htm в ... кванте .... за 1974 год, статье ... проэктивная плоскость

Код: Выделить всё


Private Type OnePixel
    Color(3) As Byte
    Lite As Byte
    ModelId As Integer
    SubModelId As Integer
End Type
            'x    y    z
Dim AllPixls(300, 300, 300) As OnePixel

Private Sub Command1_Click()
    Dim YK As Long
    Dim XK As Long
           
    Dim X1 As Long, X2 As Long
    Dim Y1 As Long, Y2 As Long
    Dim Z1 As Long, Z As Long
    Dim Curx As Long, Cury As Long
   
    On Error Resume Next
   
    X1 = 100
    Y1 = 100
    Z1 = -200
           
    For X2 = 0 To 200
        For Y2 = 0 To 200
            XK = (X2 - X1)
            YK = (Y2 - Y1)
           
            For Z = 0 To 200
                Curx = (Z - Z1) * XK / (-Z1) + X1
                Cury = (Z - Z1) * YK / (-Z1) + Y1
               
                If AllPixls(Curx, Cury, Z).ModelId = 0 Or Curx < 0 Or Cury < 0 Then
                    'Picture1.PSet (X2, Y2), vbWhite
                   
                Else
                    Picture1.PSet (X2, Y2), AllPixls(Curx, Cury, Z).Color(0)
                    Exit For
                End If
                'DoEvents
            Next Z
        Next Y2
    Next X2
End Sub

Private Sub Form_Load()
    'For a = 90 To 110
    '    For b = 90 To a
    '        AllPixls(a, b, 10).ModelId = 1
    '        AllPixls(a, b, 10).Color(1) = 255
    '    Next b
    'Next a
    Dim y As Long
   
'    For a = 0 To 20
'        y = Abs(100 - a ^ 2) ^ 0.5
'
'        AllPixls(50, 50 + y, 20 + a).Color(0) = 255
'        AllPixls(50, 50 + y, 20 + a).ModelId = 1
'
'        AllPixls(50, 50 - y, 20 + a).Color(0) = 255
'        AllPixls(50, 50 - y, 20 + a).ModelId = 1
'    Next a

    For Z = 0 To 300
        For s = 0 To 200
            AllPixls(40, 20 + s, Z).Color(0) = s
            AllPixls(40, 20 + s, Z).ModelId = s

            AllPixls(60, 20 + s, Z).Color(0) = 255 - s
            AllPixls(60, 20 + s, Z).ModelId = 255 - s
        Next s
    Next Z
End Sub


[Urvin]

Все триДэ в алгоритмах: http://www.enlight.ru:8002/faq3d/main.htm

[Каденов Мират]

В общем-то 3D проекция, полигонизация, z-буфер у меня уже работают. Когда оформлю как следует, опубликую. Вот тогда уже и будет совместная работа. Скоро понадобятся текстурирование и затенение. Алгоритмы последних я знаю, но реализовать их будет трудновато.

[ED HUNTER]

Ты главное комментируй по-больше, шоб мы потом разобрались...

[Каденов Мират]

У меня в исходниках комментирована практически каждая строка. В среднем 80% комментариев. Я ее уже послал на один сайт и жду ответа. Когда опубликуется, сообщу.

[ED HUNTER]

Посмотрим...

Заходите на www.punto.ru- сервак для поика...

[Каденов Мират]

Не понял, зачем нужен http://www.punto.ru, да что это вообще такое? Ответа от сайта пока нет, но отправил то я только вчера[/url]

[gaidar]

А чё не нам?

[ИМ БЕРЗКИЙ]

А чё не нам?

www.punto.ru- новая машина для поиска, без банеров, по- видимому, пока что...

У них в разделе Софт есть одна полезная программка Punto Switcher. Сам скачал, и Вам рекомендую.
С клавой связанна, раскладку менять быстро может, ошибки исправлять при ввводе текста и т.д. Скачаете, сами увидите...

[GoGosha]

А чё не нам?

www.punto.ru- новая машина для поиска, без банеров, по- видимому, пока что...

У них в разделе Софт есть одна полезная программка Punto Switcher. Сам скачал, и Вам рекомендую.
С клавой связанна, раскладку менять быстро может, ошибки исправлять при ввводе текста и т.д. Скачаете, сами увидите...

Да и незабудте пожертвовать на развитие проэкта, там даже номер кошелька указан(жалко без пароля ):)
И если кто Пунто Свитер скачает сразу ему VB отключаете

[Каденов Мират]

А чё не нам?

Понимаете, у вас посещаемость намного больше, а я них она маленькая, так как сайт начинающий Я решил поднять ее хотя бы на 2-3 человека. Ну а сайт vbstreets.narod.ru (интересно, меня за это не исключат из форума?)

[GoGosha]

А чё не нам?

Понимаете, у вас посещаемость намного больше, а я них она маленькая, так как сайт начинающий Я решил поднять ее хотя бы на 2-3 человека. Ну а сайт vbstreets.narod.ru (интересно, меня за это не исключат из форума?)

Что-то я даже там ничего такого не нашёл

[gaidar]

Да зачем же исключать . Хотя как раз нам-то было бы получше.

А не плагиаторам ...

[Каденов Мират]

Да, пока еще разрешаются мелкие вопросы публикации Но ожидается в скорем времени. Но тут проблема. Я уезжаю недели на две, так что проект придется приостановить.

[Vovik]

Я решил написать что-то вроде DirectX, но чисто Software. Может в будущем и переведу на hardware. Мне нужны алгоритмы, технологии. Например в "VB&3D" я задал вопрос про нормали. Потом нужен будет алгоритм текстуризации и т.д. Пока даже нет странички проекта, но в будущем может появится. Если кто заинтересован, пишите.

А как мона увидеть то, что уже есть? Я тож как-то хотел этим заняться...

[KDima]

Я решил написать что-то вроде DirectX, но чисто Software. Может в будущем и переведу на hardware. Мне нужны алгоритмы, технологии. Например в "VB&3D" я задал вопрос про нормали. Потом нужен будет алгоритм текстуризации и т.д. Пока даже нет странички проекта, но в будущем может появится. Если кто заинтересован, пишите.

А как мона увидеть то, что уже есть? Я тож как-то хотел этим заняться...

Я хачу портировать его под J2ME!

[Mikle]

Я тоже думал над таким проектом, только не заменитель DX (OGL), их не перегнать, и вовсе не по той причине, какую указал ED HUNTER в первом посте.
Я хотел сделать рэй-трейсинговый двиг без Zбуфера, в его стандартном понимании. Зато с АБСОЛЮТНО реальными отражениями и преломлениями, чего при полигонном подходе не достичь.

[13GHOST]

Идея мне определенно нравится...

[KDima]

Идея мне определенно нравится...

Надо релизить!

[d3drm]

На это будет интересно посмотреть, но вот для чего это может быть применимо?

[KDima]

J2ME?

[Каденов Мират]

Чувствую себя некрофилом, теме уже 4 с половиной года.

Эх, какой я молодой и наивный был. DirectX убьем, 3dsmax сделаем, ага, вот соберемся и убьем. И сделаем. На Visual Basic'е. И драйвера напишем, будет быстрее бегать. Тоже на VB.

Убейте меня, как же мне стыдно И тему тоже, если можно. Ну фигли, 13 лет было

P.S. А проецировал я через арктангесы, про матрицы даже не слышал тогда.... *Хватается за голову*

P.P.S Вижуал Бейсик, молодость моя... *Смахнул слезу*

[BV]

...раз автор просит, тему прикрываю.