تحويل وظيفة JavaScript إلى VB6


مرحبا، كيف يمكنني تحويل وظيفة جافا سكريبت هذه إلى vb6؟

جافا سكريبت
function TParams () {
        this.length = 4;
        this.Rut    =  "";
   this.Perfil     = "";
   this.erc = 0;
   this.ercdesc="";
   }

[Spanish translated and removed]

الحل 1

انشر باللغة الإنجليزية من فضلك…. سيتمكن المزيد من الأشخاص من قراءة سؤالك (وبالتالي الإجابة عليه).

الحل 5

الدالة GF256()
const LOG = new Uint8Array(256);
const EXP = new Uint8Array(256);
لـ (دع الأس = 1، القيمة = 1؛ الأس < 256؛ الأس ++) {
القيمة = القيمة > 127؟ ((القيمة << 1) ^ 285) : القيمة << 1؛
سجل[value] = الأس % 255؛
خبرة[exponent % 255] = القيمة؛
}
}

وظيفة مول (أ، ب) {
إرجاع أ && ب ؟ خبرة[(LOG[a] + سجل[b]) % 255]: 0;
}

وظيفة شعبة (أ، ب) {
عودة EXP[(LOG[a] + سجل[b] *254) %255];
}

وظيفة بوليمول (poly1، poly2) {
سيكون هذا حاصل الضرب متعدد الحدود، الذي قمنا بتخصيصه مسبقًا.
معاملات const = new Uint8Array(poly1.length + poly2.length – 1);
لـ (دع الفهرس = 0؛ الفهرس < coeffs.length؛ فهرس ++) {
دع معامل = 0؛
لـ (دع p1index = 0؛ p1index <= فهرس؛ p1index++) {
const p2index = فهرس – p1index؛
معامل ^= مول(poly1[p1index]، بولي2[p2index]);
}
معاملات[index] = معامل؛
}
معاملات العودة
}

وظيفة بوليريست (العائد، المقسوم عليه) {
const quotientLength = Dividor.length – divisor.length + 1;
دع الباقي = new Uint8Array(dividend);
for (let count = 0; count < quotientLength; count++) {
إذا (الراحة[0]) {
عامل ثابت = div(rest[0]المقسوم عليه[0]);
const subtr = new Uint8Array(rest. length);
subtr.set(polyMul(مقسم، [factor])، 0)؛
بقية = بقية.خريطة ((القيمة، الفهرس) => القيمة ^ ​​subtr[index].شريحة(1);
}
آخر {
بقية = بقية. شريحة (1)؛
}
}
عودة الراحة
}

وظيفة getGeneratorPoly(درجة) {
دع lastPoly = جديد Uint8Array ([1]);
لـ (دع الفهرس = 0؛ الفهرس < درجة؛ فهرس ++) {
lastPoly = polyMul(lastPoly, new Uint8Array([1, EXP[index]]));
}
إرجاع آخر بولي؛
}

وظيفة getEDC(البيانات، كلمات المرور) {
درجة ثابتة = كلمات مشفرة – طول البيانات؛
const messagePoly = new Uint8Array(codewords);
messagePoly.set(data, 0);
return polyRest(messagePoly, getGeneratorPoly(degree));
}

コメント

タイトルとURLをコピーしました