CHAT MAIOR

25 de mar. de 2011

[COD] Decimal para Binário (Pawn)

Aqui uma função que converte números decimais para binários

stock
DecimalToBinary
(iNum)
{
new
sTemp[0b00110010],
iExecutions = 0b0,
iLp = 0b0,
sTmp[0b00110010];

while(
iNum % 0b010 == 0b01 || iNum % 0b010 == 0b0 && iNum > 0b0)
{
++
iExecutions,++iLp,valstr(sTemp[iExecutions],iNum % 0b010);

strcat(sTemp,sTemp[iExecutions]),iNum = iNum / 0b010;
}
for(new
j = strlen(sTemp); j > -0b01; --j)
sTmp[strlen(sTmp)] = sTemp[j];

return
strval(sTmp);
}

~ DraKiNs

Nenhum comentário:

Postar um comentário