تبدیل برنامه vb به ++borland c

[s.bahrami]

سلام

کسی می تونه این برنامه رو برای من به ++ borland c تبدیل بکنه لطفا

CODE]
[clearscreen
graphics
r=5/6
read n
if n=0then 420
read x1,y1
y1=y1 * r
for p= 2 to n
read x2,y2
y2=y2*r
drawlinex x1,y1 to x2,y2
x1=x2
y1=y2
next p
goto 80

DATA 38,223,60,180,71,173,65,174,63,179,64,180,62,185,6 2,187,60
DATA 192,60,194,57,200,57,202,55,183,55,182,59,172,58
DATA 171,62,165,57,170,50,220,31,233,31,245,40,260,60,2 90,67,315,72
DATA 345,80,360,87,380,105,400,127,425,145,452,155,502, 164,450,164
DATA 434,162,415,158,395,153,362,138,323,132,283,125

DATA 16,289,92,250,120,250,135,260,157,233,163,247,163, 240,165
DATA 257,164,256,166,272,159,270,153,278,140,280,120,28 5,120
DATA 310,120,330,112

DATA 11,295,127,303,158,278,162,288,162,282,163
DATA 291,164,283,165,315,162,315,157,325,137,323,132

DATA 11,238,77,220,87,192,99,192,102,195,100
DATA 198,102,200,100,203,102,205,98,218,96,255,83

DATA 3,258,114,245,105,228,93
DATA 3,222,86,215,77,210,65,

DATA 4,220,42,210,45,215,40,220,42
DATA 0

END

[/CODE]

[#target]

double r = 5.6;
int n ; cin >> n ;
if (!(n))
{cin >> x1 >> x2;
y1 = y1 * r;
for (int p[ = 2 ; p <= n ; p++)
{
cin >> x2 >>y2;
y2 = y2 * r;
// drawlinex x1,y1 to x2,y2
x1=x2;
y1=y2;
}