Lonkero:

The code works for me. I tested the following script under Kixtart 4.10 RC2 and it correctly spits out KIXTART:
code:
? BaseConverter("44680832201","10","36")

exit 0

FUNCTION BaseConverter($v,$f,$t)
$y = CDBL(1)
$c = ""
$n = 0
FOR $i = LEN($V) TO 1 STEP -1
$x = SUBSTR(UCASE($V),$i,1)
IF ASC($x) > 57
$x = ASC($x) - 55
ENDIF
$n = $y * $x + $n
$y = $y * $f
NEXT
WHILE $N
$a = INT($n - (INT($n/$t) * $t))
$n = ($n-$a)/$t
IF $a > 9
$a = CHR($a + 55)
ENDIF
$c = "$a$c"
LOOP
$BaseConverter = $c
ENDFUNCTION



[ 11 June 2002, 00:43: Message edited by: sealeopard ]
_________________________
There are two types of vessels, submarines and targets.