C # Edition
function id15t18 (strtemp)
{
var arrint = new Array (7, 9, 10, 5, 8, 4, 2, 1, 6, 3, 7, 9, 10, 5, 8, 4, 2);
var arrch = new Array (' 1 ', ' 0 ', ' X ', ' 9 ', ' 8 ', ' 7 ', ' 6 ', ' 5 ', ' 4 ', ' 3 ', ' 2 ');
var ntemp = 0, I;
if (strtemp.length==15)
{
strtemp = Strtemp.substr (0,6) + ' + ' + strtemp.substr (6,strtemp.length-6);
for (i = 0; i < strtemp.length i + +)
{
Ntemp + + STRTEMP.SUBSTR (i, 1) * arrint[i];
} strtemp + + arrch[ntemp% 11];
}
return strtemp;
}
VB version
private string Convert15to18 (String strtemp)
{
int[] Arrint = new int[]{7, 9, 10, 5, 8, 4, 2, 1, 6, 3, 7, 9, 10, 5, 8, 4, 2};
String arrch= "10x98765432";
int ntemp = 0;
if (strtemp.length==15)
{
strtemp = strtemp.substring (0,6) + "n" + strtemp.substring (6,strtemp.length-6);
for (int i = 0; i < strtemp.length; i++)
{
ntemp = Int. Parse (Strtemp.substring (i, 1). ToString ()) * Arrint[i];
}
strtemp + + arrch[ntemp% 11];
}
Char dd=arrch[ntemp% 11];
return strtemp;
} |
