Извините, ничего не найдено.

Не расстраивайся! Лучше выпей чайку!
Регистрация
Справка
Календарь

Вернуться   www.boolean.name > Программирование игр для мобильных телефонов > MidletPascal > Наше Open Source Software

Наше Open Source Software Наработки для использования в Ваших проектах

Ответ
 
Опции темы
Старый 13.04.2012, 17:35   #1
Igor
Мастер
 
Аватар для Igor
 
Регистрация: 03.05.2010
Адрес: Подмосковье
Сообщений: 1,217
Написано 436 полезных сообщений
(для 784 пользователей)
фигуры Лиссажу

Рисует фигуры Лиссажу. kx/ky - отношение частот. Например, (1;2).
fi - смещение (не сдвиг фаз!) Если его плавно менять то фигура "крутится"
procedure drawFigure(kx,ky:integerfi:real);
var 
i:integer;
     
x1,y1,x2,y2:integer;  //используются как координаты точек
     
Ax,Ay:integer//амплитуда по осям
begin
Ax
:=150;
Ay:=250;
x2:=getWidth div 2+trunc(Ax*sin(fi));
y2:=getHeight div 2+trunc(Ay*cos(fi));
setcolor(100,255,0);
for 
i:=1 to 314 do
  
begin
  x1
:=x2;
  
y1:=y2;
  
x2:=getWidth div 2+trunc(Ax*sin(fi+0.02*kx*i));
  
y2:=getHeight div 2+trunc(Ay*cos(fi+0.02*ky*i));
  
drawLine(x1,y1,x2,y2);
  
end;
end
Миниатюры
Нажмите на изображение для увеличения
Название: Figure.jpg
Просмотров: 240
Размер:	16.5 Кб
ID:	16636  
__________________
О¯О ¡¡¡ʁɔvʎнdǝʚǝdǝu dиW
(Offline)
 
Ответить с цитированием
Эти 2 пользователя(ей) сказали Спасибо Igor за это полезное сообщение:
impersonalis (14.04.2012), Rock2roll (15.04.2012)
Старый 13.04.2012, 19:15   #2
ABTOMAT
Ференька
 
Аватар для ABTOMAT
 
Регистрация: 25.01.2007
Адрес: улица Пушкина дом Колотушкина
Сообщений: 10,420
Написано 5,246 полезных сообщений
(для 15,176 пользователей)
Ответ: фигуры Лиссажу

Поцоны дух Лиссажу живёт только в осциллографах!
__________________
Мои проекты:
Анальное Рабство
Зелёный Слоник
Дмитрий Маслов*
Различие**
Клюква**

* — в стадии разработки
** — в стадии проектирования
Для проектов в стадии проектирования приведены кодовые имена

(Offline)
 
Ответить с цитированием
Эти 4 пользователя(ей) сказали Спасибо ABTOMAT за это полезное сообщение:
Igor (13.04.2012), impersonalis (14.04.2012), mr.DIMAS (13.04.2012), Randomize (13.04.2012)
Ответ


Опции темы

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +1, время: 17:41.


vBulletin® Version 3.6.5.
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Перевод: zCarot
Style crйe par Allan - vBulletin-Ressources.com