Разнообразные прикольные, забавные и красочные макросы и VBA программы в Excel.

Шахматы:

Chess_Ko.jpg

3d модель Солнечной системы, с использованием DirectX:

image028.jpg

Генетический алгоритм с 3d анимацией DirectX - моделирование естественного отбора родственных подвидов:

Genetika_3d.jpg

Генетический алгоритм - моделирование естественного отбора

Морской бой:

Morboy.jpg

Фрактал на множестве Жюлиа:

Julia.jpg

Фракталы на форме с API SetPixel

Фрактал на множестве Мандельброта:

Mandelbrot.jpg

Циклоида:

Cicloida.jpg

Фигуры Лиссажу:

image019.jpg

Цветы и циклоиды : анимация.

Цветы и циклоиды Word.

Cvety.jpg

Калейдоскоп.

Калейдоскоп с использованием группировки фигур.

Kaleidoscope.jpg

3d моделирование гравитационного взаимодействия 5 сверхтяжелых частиц, с использованием DirectX:

image025.jpg

Моделирование гравитационного взаимодействия 5 сверхтяжелых частиц

Заставка - мозаика:

Mozaik.jpg

Заставка - матрица:

Matrica_z.jpg

Заставка - питон:

Piton.jpg

Заставка фейерверк:

image020.jpg

Анимация вращающаяся мандала с эффектом оптической иллюзии - свечением вокруг круга:

Flash_mandala.jpg

Анимация пузыри:

Flash_puzyri.jpg

Анимация объемная фигура:

Obyomnaya_figura_dvij.jpg

Игра "Аэрохоккей" с использованием DirectX8, адаптированная под VBA. Работает на движке Excel:

image024.jpg

Игра "Аэрохоккей" упрощенная.

Анимация - мое представление о квантовой неопределенности:

Flash_quarks.jpg

Планетная система с рекурсией на диаграмме 1 .

Планетная система с рекурсией на диаграмме 2 .

Планетная система с рекурсией на диаграмме 3 .

Анимация убегающий круг.

 

Солнечная система на диаграмме.

Макросы и пользовательские функции для работы с цветом

ColorWorks.jpg

 

Учебные примеры использования объектной библиотеки DirectX8, адаптированные под VBA и Excel.

Создание устройства.

Работа с клавиатурой.

Рендеринг треугольника.

Использование матриц. Вращающийся разноцветный треугольник.

Использование источников света. Вращающийся желтый цилиндр.

Циллиндр с наложенной на него текстурой банана.

Использование .x файлов. Вращающийся тигр.

Работа с мышью в DirectInput часть1.

Работа с мышью в DirectInput часть 2.

Alpha blending.- Вращающийся полупрозрачный цилиндр.

Создание плоского зеркала. Пример с тигром и зеркалом. Проигрывание wave файлов с помощью DirectSound. Металлический чайник с текстурным псевдо зеркальным отражением неба.

Многостадийное текстурирование: фарфоровый чайник с цветочком, зеркальной золотой каемкой и отражением неба.

Туман.

Использование точечных и зональных источников света, отрицательных цветов света как источника тени.

 

Продвинутые примеры из DirectX 8.1 SDK, адаптированные под Excel, с переведенными комментариями в тексте программы.

Анимированный дельфин, с эффектом водной каустики:

image029.jpg

Анимированный скелетный меш:

image030.jpg

"Римская свеча", пример использования частиц.

Пример использования щитов.

 

Системная библиотека dx8vb.dll

 

3D математические скульптуры, с использованием DirectX8.

Радужная сфера 880 вершин. Раскраска по координате X.

Тор 1762 вершины. Пятнистая окраска.

Плоская улитка. Раскраска в порядке построения точек.

Раковина. Раскраска в порядке построения точек.

Рогатая раковина. Черно-белая полосатая окраска:

Rakovina_rog.jpg

Рогатая раковина, 6 рогов на виток. Цветная окраска:

Rakovina_rog6.jpg

 

Решения задач по программированию по курсу высшей математики, адаптированные под Excel.

Численное диффеpенциpование.

Численное интегpиpование методом Симпсона.

Решение дифференциального уравнения 1-го порядка.

Решение дифференциального уравнения 1-го порядка методом Эйлера.

Вычисление двойного интеграла способом Боде.

Интерполирование функции многочленом.

Нахождение минимума функции методом наискорейшего спуска.

Решение системы дифференциальных уравнений 1-го порядка методом Рунге-Кутта 4-го порядка.

Решение системы линейных уравнений методом Гаусса.

Решение системы линейных уравнений методом итерации.

Решение системы линейных уравнений с симметрической положительно определенной матрицей методом квадратного корня.

Решение переопределенной системы линейных уравнений методом наименьших квадратов.

Решение системы линейных уравнений методом отражения.

Решение системы нелинейных уравнений методом Ньютона.

Решение системы нелинейных уравнений методом Зейделя.

 

Рэндомайзер макрос для Word.

Чтение текста, обработанного данным макросом, развивает внимательность, интуицию и творческое мышление.

Макрос случайным образом изменяет цвет, размер и надстрочный уровень букв.

Макрос обрабатывает фрагмент текста не более 60000 символов.

Для исключения перегруза системы макрос отключает учет стилей форматирования в настройках Word. Рекомендую читать обработанный текст непродолжительное время.

Повтор данного текста, после обработки макросом:

image021.jpg

 

Некоторые исходные коды.

 

E-mail: kgg0@bk.ru

 

Гостевая книга