اشکال در برگردان یک کد از C++ به VB6

[djfalcon2005]

سلام دوستان
این مشکلی که من پیدا کردم شاید به نظر ساده حل شه ولی من 2 روز تمام وفت گداستم نتونستم حلش کنم
اینجا مطرحش می کنم شاید شما دوستان تونستید حلش کنید

اما مشکل:

من می خوام این کد رو از ++C به VB6 تبدیل کنم ولی هر جوری که برناممو می نویسم جواب ذرست بهم نمیده (از بابت سورس ++C کاملا مطمئنم) کد رو پایین براتون می ذارم



#include <stdio.h>
void Y2K (unsigned char inbyte);
short Y=0;
void main()
{
unsigned char a[15];
int i;
a[0]=0xAA;
a[1]=0x06;
a[2]=0x00;
a[3]=0x02;
a[4]=0x0C;
a[5]=0x00;
a[6]=0x00;
a[7]=0x00;
a[8]=0x03;
a[9]=0x00;
a[10]=0x00;
a[11]=0x00;
a[12]=0x01;
a[13]=0x01;
a[14]=0x00;
for (i=0;i<=14;i++)
Y2K(a[i]);
printf("\n%04X",Y);
}

void Y2K (unsigned char inbyte)
{
int i =0;
Y = (short)(Y^(unsigned char)inbyte<<8);
int byte1 = 8;
do
{
if((Y & 0x8000) != 0)
{
Y = (short)(Y<<1^0x1021);
if (i==0)continue;
}
Y =(short)(Y<<1);
}while(--byte1>0);
}


با تشکر
فرزاد علیزاده

[djfalcon2005]

یعنی کسی نیست جواب بده ؟؟؟!!!!؟؟؟؟

[hamed aj]

با سلام

دوست عزیز ، سورسی رو که خودت تبدیل کردی و به نتیجه نرسیدی اینجا بگذار تا کار برای کسانی که می خواهند کمکت کنن راحت تر بشه و نیاز نباشه همه از اول کار رو شروع کنن

موفق باشید

[djfalcon2005]

با سلام

دوست عزیز ، سورسی رو که خودت تبدیل کردی و به نتیجه نرسیدی اینجا بگذار تا کار برای کسانی که می خواهند کمکت کنن راحت تر بشه و نیاز نباشه همه از اول کار رو شروع کنن

موفق باشید

سلام ممنون که به این تاپیک سر زدید اینم سورس من فقط توضیحی که باید بدم اینه که داده ها بصورت رشته در تکست باکس وارد میشن و تو لیبل نتیجه رو می بینید.

برای مثال اگر بخواههیم داده های سورس C رو وارد کنیم به اين صورت وارد می کنیم:

ََAA0600020C00000003000000010100

با تشکر

[djfalcon2005]

کسی نیست جواب بده ؟؟؟!!!!؟؟؟؟