time_scor=0
scor='0100'
simb=string_length(scor)
for(i=1;i<=simb;i+=1)
{
p=power(16,simb-i)
k=string_char_at(scor,i)
switch (k)
{
case '0': time_scor+=p*0 break;
case '1': time_scor+=p*1 break;
case '2': time_scor+=p*2 break;
case '3': time_scor+=p*3 break;
case '4': time_scor+=p*4 break;
case '5': time_scor+=p*5 break;
case '6': time_scor+=p*6 break;
case '7': time_scor+=p*7 break;
case '8': time_scor+=p*8 break;
case '9': time_scor+=p*9 break;
case 'A': time_scor+=p*10 break;
case 'B': time_scor+=p*11 break;
case 'C': time_scor+=p*12 break;
case 'D': time_scor+=p*13 break;
case 'E': time_scor+=p*14 break;
case 'F': time_scor+=p*15 break;
}

}