IPB
ЛогинПароль:

> Внимание!

Давайте пожалуйста своим демо названия!
В названии темы указывайте название!

 
 Ответить  Открыть новую тему 
> Физическая модель растяжимой веревки
Бравый генерал
сообщение 7.04.2006 19:52
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 39
Пол: Мужской
Реальное имя: Василий

Репутация: -  -2  +


Программа не работает в Windows2000, наверно из-за используемого модуля VESA.
Веревка состоит из некоторого количества узлов. Узлы можно фиксировать (и снимать фиксацию) правой кнопкой мыши. ЛЮБОЙ узел можно перетаскивать мышей, удерживая левую ее кнопку. ЛЮБОЙ узел можно зафиксировать.
'q' - сбросить все фиксации
'ESC' - выход
ЕХЕ-шник использует конфиг, который хранится в файле "config.txt". Формат конфига:
1-я строка: длина веревки в пикселях
2-я строка: кол-во узлов
3-я строка: радиус узлов
4-я строка: масса одного узла
5-я строка: коэффициент упругости веревки
6-я строка: коэффициент сопротивления воздуха
7-я строка: сила тяжести
8-я строка: кол-во зафиксированных узлов (K)
Дальше идет K строк, в каждой из которых записаны через пробел три числа: номер зафиксированного узла, его координата по оси Х, его координата по оси Y.
Для примера я составил три конфига, хранящиеся в архиве в файлах "1.txt", "2.txt", "3.txt". Для использования скопируйте содержимое какого-либо из файлов в файл конфига - "config.txt". Примите во внимание, что в самом начале координаты будут задаватся только фиксированным узлам! Остальные узлы будут с координатами "ноль". Так что не пугайтесь, пока веревка будет некоторое время приходит в состояние покоя. =)
Физика довольно реалистична, не бойтесь поэкспериментировать =) Например, закрепите концы веревки, растянув ее в горизонтальном положении, и дерните за второй слева узел - вы увидите как по веревке до правого конца пройдет волна и, отразившись, вернется обратно. Или, например, опять же закрепите концы веревки, но чтобы она не растянулась, а образовала дугу, и когда она придет в покой отпустите один из концов. =) Или загрузите конфиг "3.txt" и нажмите 'q'. smile.gif Вобщем наслаждайтесь!


Прикрепленные файлы
Прикрепленный файл  Rope.rar ( 29.61 килобайт ) Кол-во скачиваний: 4247
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 7.04.2006 19:55
Сообщение #2


Гость






Правила Форума (Пункт 10)

Твое решение?
 К началу страницы 
+ Ответить 
Бравый генерал
сообщение 7.04.2006 20:50
Сообщение #3


Новичок
*

Группа: Пользователи
Сообщений: 39
Пол: Мужской
Реальное имя: Василий

Репутация: -  -2  +


Не понял?

Ааа.... Код. Он просто грязный, я для личного пользования писал. Вот.

Сообщение отредактировано: Бравый генерал - 7.04.2006 21:02


Прикрепленные файлы
Прикрепленный файл  MOUSE.PAS ( 2.73 килобайт ) Кол-во скачиваний: 2803
Прикрепленный файл  VEREVKA.PAS ( 3.59 килобайт ) Кол-во скачиваний: 3063
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
2 чел. читают эту тему (гостей: 2, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 4.11.2024 8:25
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"