function CI10T16 takes integer N returns string
local integer A
local string S = ""
if N < 0 then
set S = "Error"
return S
endif
loop
set A = ModuloInteger(N, 16)
set S = SubString("0123456789ABCDEF",A,A+1) + S
set N = ( N - A ) / 16
exitwhen N == 0
endloop
return S
endfunction
负数懒得处理,所以会回传error
至于这个东西的用途嘛.........
没有 (正色)
完全是为了回答巴哈那边的问题所写的
你问我能拿来干嘛我也不知道啊 (翻滚)