Нет, ты мне не конкурент!!
Аа... Ну это я недоделал повпихал. Предназначено для создания изображения карты высот.
Как обычно, на Дельфе.
Просто интересно, возможен ли такой вариант записи данных, или есть что лучше.
А вот насчет формирования геологических конструкций, можно, наверное, так: строить цепи рандомно тонкой/толстой кривой линией, обладающей минимальной длиной, а затем производить гауссово размытие.

Не изобретай самокат - я уже велосипед сделал! Видел мой А.Г.Р. v.3.1?

Гы! Проверил: первый макрос Ехселевскго Васика ("Rounder") работаеть. Отображение карты в виде разноцветных пикселов: сработало! Вот демо версия А.Г.Р., строящего 1 тестовую гору посреди карты и отображающего полученную карту (600х600) в виде картинки:
А.Г.Р.-демо версия (12 kb) (это уже ЕХЕ-шник! )
Народ, гляньте, крякните, что думаете.
[Инструкция: чтобы заставить прогу построить гору, тыкните кнопку "Начать составление карты". Чтобы увидеть результат, тыкните кнопку "Показать карту". И увидите чу-у-удо! ]
Так что не злитесь (ну, а вдруг? ), Ваши советы не были бесполезными - есть результат.

_________________
Сообщество креативных механоидов:
aim-fans.ru

Не запатентовано - значит, можно тырить.))
А вообще, мне интересно чисто из интереса (!)
Сделал создание картинки высот, а насчет генератор рельефа идей мало. 1 горой не разбалуешься.

Ну что ж, посмотрим, что ты там нахимичил

_________________
____^_^
___/_@_@\
___\_>?<./

А у меня вот не запускается! Вот! Так что буду свое химичить.

У меня не запускается, требует CC260MT.dll.

_________________
https://sites.google.com/site/intelligencecells
http://www.youtube.com/user/IntelligenceCells

И у меня тоже

_________________
____^_^
___/_@_@\
___\_>?<./

Эй, люди, стойте, не уходите! Я всё поправил. Вот:
А.Г.Р. (демо) (173 kb)
Ну, а щас как?
[Инструкция: чтобы заставить прогу построить гору, тыкните кнопку "Начать составление карты". Чтобы увидеть результат, тыкните кнопку "Показать карту". И увидите чу-у-удо! Надеюсь... ]

_________________
Сообщество креативных механоидов:
aim-fans.ru

Чот оно не перерисовывает гору... Или я делаю что-то не так...
Хотя, вроде по инструкцию: нажал, подождал, посмотрел.

2 Шаман
А настройки работают? А то что-то я разници так и не заметил, сколько их не менял.
А вообще картина не впечатляет. Подумаешь, красное круглое пятно, совсем не интересно.

Короче, нафиг твою прогу, Не запускается, по той же причине.

_________________
https://sites.google.com/site/intelligencecells
http://www.youtube.com/user/IntelligenceCells

Вот склепал экспериментальный генератор случайного рельефа. Формирует горные массивы различные по форме и высоте. Картинка выглядит резко и все это несколько не похоже на горы, потому что еще не применял гауссово размытие. Оно, по идее, должно исправить те резкости и неточности, которые допускает алгоритм, и картинка станет более похожей на горную местность.
Чтоб по глазам не било пока так: белый - низко, черный - высоко. Повторное нажатие кнопки "генерирование" создает еще несколько массивов.
З.Ы. Зацените плз, а то не знаю, зря делал или нет.

Вообще-то перерисовыает, но точно такую же, поэтому незаметно. Только одна: "острота пика". Это единственное значение, необходимое для работы того макроса, который я переписал (пока что только "Rounder") из Ехселевского Васика. Всё остальное - пока муляжно. Так, на будущее.
Вот такой критики я и ждал, к сожалению. Дело в том, что цвета пикселов вычисляются в зависимости от высоты точки ("height") следующим образом:
color = RGB(height, 255 - height, 0)
В общем виде, цвет = RGB(красный, зелёный, синий), где 3-мя значениями определяются интенсивности соответствующих цветовых составляющих (от 0 (чёрный) до 255 (макс. интенсивность)). Так что по моей формуле для точек, значения которых лежат в интервале от 0 до 255 цвет "красный" для точек высотой 255 и "зелёный" - для 0. Правда, я ожидал, что посередине будет жёлтый цвет, но оказалось, что "посередине" к тому же ещё сильно уменьшается общая интенсивность цвета, поэтому и такой неприглядный эффект. Пока не знаю, как изменить формулу. Видимо, общая интенсивность цвета определяется НЕ как сумма интенсивностей составляющих цветов, а, наверное, максимальной интенсивностью одного из составляющих.
Будо думать.
Если есть предложения, скажите. Как видите, пока что мне не удалось сделать плавный цветовой переход от зелёного к красному.
Не знаю, в чём дело у тя, но, судя по всему, у Razum'а во второй раз проблем не возникло...

Добавлено спустя 3 минуты 59 секунд:

Э-э-э, может, ты этого не видел:А.Г.Р. v.3.1 (646 kb)

Добавлено спустя 5 минут 14 секунд:

У-у-у... Конкурент, определённо конкурент. Если такими темпами и дальше будешь работать... Мдя, надо мне поторопиццо...

_________________
Сообщество креативных механоидов:
aim-fans.ru

Видел-видел. Просто мне ж и самому интересно! Давно хотел склепать подобную штуковину.
Вот если разобраться в OpenGL, можно будет даже смоделировать поверхность, а если взять большой размер (10000x10000), то и целую планету.
Правда я губу раскатал, в Open'е ни грамму не шарю.

Ага. нареканий к работе нет. Кроме, разумеется, скучной работы. Все нормально работало, не падало. Тока один раз ошибка деления на ноль была, когда я в настройках все по нулям поставил.
2 Krogoth
Прикольно у тя получилось. Сам алгоритм придумал или свистнул где-нето?

Добавлено спустя 17 минут 46 секунд:

Предлагаю такой алгоритм распределения цвета, который позволяет задать 1024 градации. Пусть высота у нас равна Н.

Для значений высоты 0 - 255: (255, Н, 0),
Для значений 256 - 511: (511 - Н, 255, 0),
Для значений 512 - 767: (0, 255, Н),
Для значений 768 - 1023: (0, 1023 - Н, 255).

Добавлено спустя 1 минуту 5 секунд:

Таким образом, наинизшая точка соответствует полному красному цвету, наивысшая - синему.

Придумал сам. А вот гауссово размытие буду свистить.
Его алгоритм просмотрел = 5 килобайт.

2 Krogoth
Твой алгоритм использует псевдослучайные числа, или целиком на аналитических функциях? Очень, имхо, неплохо получилось.

Рандомным образом я выбираю стартовую точку, а затем около нее аналогичным образом строю вторую. Каждая последующая строится при условии, что расстояние от нее до стартовой больше, чем у предыдущей. Высота определяется относительно высоты предыдущей точки с рандомным отклонением, не превышающим определенное значение (зависит от параметра т.н. "гладкости" горы). А изменение направления отклонения по высоте (вниз/вверх) происходит при определенных условиях, напр., протяженность относительно ровного участка для плавного перевода в противоположное направление.
Вот. Хотя, где-то в коде закрался какой-то глюк (работает не совсем так, как ожидал). Но устранять не буду - эффект явно положительный!

Кульная вещь, красиво рисует.

_________________
Кто сказал - борьба напрасна, зло сильней добра?
Кто сказал - спасайся, вот нора?
Путь тяжел, но цель прекрасна, как огонь костра.
Человек, настал твой час, пора!

Блин, скока не парился, так и не смог изобрести способ нормального плавного перехода от красного к зелёному. Так что поступил проще: сделал простой переход от чёрного к белому. Вот эта новая версия демо-проги:
А.Г.Р. (демо) (212kb)
Инструкция: чтобы заставить прогу построить гору, тыкните кнопку "Начать составление карты". Чтобы увидеть результат, тыкните кнопку "Показать карту". Сделана возможность регулировки дискретности цветового перехода, а также выбора, какой цвет соответствует минимальной высоте, а какой максимальной ("инверсия цвета"). Изменения не будут отображены, пока не будет снова нажата кнопка "показать карту".
Ну как, сойдёт такой способ отображения карты?
З.Ы.: как лучше выглядит:
1) чем выше, тем темнее,
2) чем выше, тем светлее?

_________________
Сообщество креативных механоидов:
aim-fans.ru

CGen версии 2
Ссылка здесь.
Добавил возможность гауссового размытия создаваемого рельефа, регулирование начальной высоты и сохранение в файл.
Попробовал использовать сгенерированную карту высот для экспорта в меховский редактор с помощью программы, написанной Разумом.
Начальная картинка вот.
Что получилось - вот.

2 Шаман
А мой алгоритм не пробовал? Он в принципе должен давать максимальную насыщенность.
2 Krogoth
Колись, где алгоритм размытия надыбал?

ИМХО, ты не учёл, что максимум насышенности - 255. И наблюдается "пилообразная" периодичность: 0 = мин., 255 = макс.; 256 = снова мин.
А принцип, где "красная" оставляющая максимальна для максимальной высоты, а "зелёная" масимальна для нуля, и средние значения вычисляются пропорционально, не проходит - тебе (да и мне) результат этого как раз и не понравился. З.Ы.: для простоты, я сделал высоту варьирующуюся от 0 до 255, так что до 1024 - это ты перебрал. З.З.Ы.: "RGB color" = "Red/Green/Blue color".

Ну сё, пора мне уже взяццо за полное переписывание кода из Васика, а то всё ленюсь да резину тяну... Дайте мне ободрительного пинка, а?..

_________________
Сообщество креативных механоидов:
aim-fans.ru

Делай чёрнобелый рельеф, в меховский редактор можно будет вставить.

_________________
https://sites.google.com/site/intelligencecells
http://www.youtube.com/user/IntelligenceCells

2 Шаман
Ну ты не пробовал видимо. Насыщенность там на максимуме постоянно, Хотя цвета не очень понятно отражают высоту, это да. Вот вам, например, градиент, позырьте.
http://devouringone.narod.ru/pictures/grad.jpg

Не, не пробовал... Точно? Это не важно. Цвета должны отображать разность высот. Это главное.Что, с твоим алгоритмом так получиццо? А, тогда щас попробую.
З.Ы.: осталось всего 1 макрос Васиковский переписать.

Добавлено спустя 2 часа 40 минут 49 секунд:

Вот соответствующий код, если кому интересно:
-------------------------------------------------------------------------------------

for(l=0; l<100; l++){
for(h=0; h<1024; h++){
if(-1<h && h<256) r = 255;
if(255<h && h<512) r = 511 - h;
if(511<h && h<1024) r = 0;

if(-1<h && h<256) g = h;
if(255<h && h<768) g = 255;
if(767<h && h<1024) g = 1023 - h;

if(-1<h && h<512) b = 0;
if(511<h && h<768) b = h;
if(767<h && h<1024>Pixels[h][l] = RGB(r, g, b);
};
};

-------------------------------------------------------------------------------------
Сущь, точно - рабатить!!! Вот доказательство:
1024grad
Это для 1024-х значений h. Тута все цвета радуги. Но мне нуна шоб цвет изменялся тока от красного до зелёного, так что я решил юзнуть тока половину, т.е. 512 значений h. Причём, как я уже говорил, минимуму высоты должен соответствовать зелёный, а максимуму - красный. Так что я ещё впридачу инверснул этот обрезок полоски. В итоге я получил то, что Вы можете увидеть тут (верхняя полоска):
512grag
Но если присмотреться, то можно увидеть, что жёлтая полоска намного уже, чем красная или зелёная. Мне это показалось "нечестным", так что я долго ломал голову над тем, как уравнять все три цвета в правах. Парадоксально, но пришёл к выводу, что для этого нужно изменить простую линейную зависимость на "корень из". Вот какой код в итоге получился:
-------------------------------------------------------------------------------------

for(l=0; l<100; l++){
for(h=0; h<512; h++){
if(h<256) r = sqrt(h*255); else r = 255;
if(h<256>Pixels[h][l] = RGB(r, g, 0);
};
};

-------------------------------------------------------------------------------------
Сравните две полоски вышевыложенного рисунка: верхняя - простая линейная зависимость, нижняя полоска - мой изменённый код. ИМХО, мне удалось добиться равноправия зелёного, жёлтого и красного. Как Вы считаете, "Да" или я дальтоник?
Так что будо переделывать моё черно белое отображение карты на разноцветное. Э, завтра.

_________________
Сообщество креативных механоидов:
aim-fans.ru

Вот. Готовый модуль. Достаточно лишь подключить к основному.

2 KrogothСпасибо, изучу. Правда, там код под дельфи, а я на Си пишу.
2 Шаман
Думаю, никого в правах или в чем либо уравнивать не надо, и испоьзовать стоит обычную линейную зависимость. Хотя смотрится в принципе, и так и сяк нормально.

Перековертил весь код А.Г.Р.-а из Васика в С++. Щас осталось тока последний невнятный баг исправить. Не знаю как, так что у Вас спрошу.
Вот есть у мну две матрицы:

char dmap[600][600];
char dmapcur[600][600];

Как видите, они одинакового размера и формата. Мне нужно заменить всё содержимое матрицы "dmap" на содержимое матрицы "dmapcur". Другими словами, сделать матрицу "dmap" равной матрице "dmapcur". Я написал просто:

dmap = dmapcur;

Но этот финт не прошёл - компиллятор пишет ошибку. Скажите, хто знаеть, как правильно приравнять одну матрицу к другой?
З.Ы.: и ещё второй, менее важный вопрос: как очистить всю матрицу начисто?

Добавлено спустя 36 минут 48 секунд:

З.Ы.: поступила инфа, что сцылко с моим Ехселевским А.Г.Р.-ом стала битая. Не проверял, перезалил свеженько на всякий пожарный:
А.Г.Р. v.3.1. (628 kb)

_________________
Сообщество креативных механоидов:
aim-fans.ru

Ну дак правильно, матрицы целиком не копируются, и компилятор фишку сечет. Извольте поэлементно. Кстати, а что за ошибку-то пишет?