Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 25.05.2010, 11:55   #1
[ira]
Новичок
Джуниор
 
Регистрация: 25.05.2010
Сообщений: 2
По умолчанию из турбо си в си++ билдер 6

Ребята,помогите перенести код из турбо си в си++ билдер 6
Программа рисует кривую дракона аля:



А вот код на турбо си:
#include<stdio.h>
#include "grasptc.h" //хидер для инстиллизации графики в турбо си.в билдере-то не нужен он)

int x=0,y=0,dx=4,dy=0,n,xmin=10,xmax=-10,ymin=10,ymax=-10,ixC,iyC;
float fx,fy,xC,yC;

float xreal(int x);
float yreal(int y);
void curve(int prescan);
void step(int r,int prescan);

void main(){
n=256;//4islo otrezkov
curve(1);
initgr();/*инстиллизация графики.для перехода в билдер надо лишь значть что x_max=640 а y_max=480 значения int соотвественно.*/
fx=x_max/(xmax-xmin);
fy=y_max/(ymax-ymin);
f=(fx < fy ? fx : fy)*0.7;
ixC=(xmin+xmax)/2;
iyC=(ymin+ymax)/2;
xC=x_max/2;
yC=y_max/2;
x=y=0;
dx=4;
dy=0;
move(xreal(x+dx/4),yreal(y));
curve(0);
endfr();
}

void curve(int prescan){
int i,j,r;
for(i=1;i<=n;i++)
{
j=1;
while((j&1)==0) j>>-1;
r=j&3;
step(r,prescan);
}
}

void step(int r,int prescan){
int t,dx1,dy1;
if(prescan)
{
x+=dx;
y+=dy;
if(x<xmin) xmin=x;
if(x>xmax) xmax=x;
if(y<ymin) ymin=y;
if(y>ymax) xmax=y;
}
else
{
dx1=dx/4; dy1=dy/4;
draw(xreal(x+dx1),yreal(y+dy1));
x+=dx; y+=dy;
draw(xreal(x-dx1),yreal(y-dy1));
}
if(r==1){t=dx;dx=-dy; dy=t;}
else{t=dx;dx=dy;dy=-t;}
}
float xreal(int x){
return xC+f*(x-ixC);
}

float yreal(int y){
return yC+f*(y-iyC);
}
[ira] вне форума Ответить с цитированием
Старый 30.05.2010, 11:45   #2
[ira]
Новичок
Джуниор
 
Регистрация: 25.05.2010
Сообщений: 2
По умолчанию

никто не может помочь?(
[ira] вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Билдер С++ или не С++? mutabor Свободное общение 3 28.03.2010 17:47
Билдер в Delphi garyanikin Общие вопросы Delphi 7 16.01.2010 03:50
из Visual C++ в C++ Билдер ГЫнок Общие вопросы C/C++ 0 19.03.2009 16:58