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
至於這個東西的用途嘛.........
沒有 (正色)
完全是為了回答巴哈那邊的問題所寫的
你問我能拿來幹嘛我也不知道啊 (翻滾)