[ WE ] 10進位轉16進位 by JASS

[wix3000 (癢，好吃)]

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

至於這個東西的用途嘛.........




沒有 (正色)

完全是為了回答巴哈那邊的問題所寫的

你問我能拿來幹嘛我也不知道啊 (翻滾)

--
███ ︵︵︵︵ █◤  ◢█◤                   ちから
 ██ ／＼｜｜｜█ ◢█◤ 「ひとりでは耐え切れぬ 雷 でもきっと、
 ▄█│‵╯︶︶| ██◤ #                   ふたりなら大丈夫私は信じる！」
 ▔█ ╲  ）  ∕█████◣      +
 +   █ ╮ - │██◣ ◥◥█◣  ◢   第四巻　27ページ…
▂▄▆█│   │██◤*  ◢████◣     雷神の系譜　　           　ψWix

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 219.85.10.90
→ wix3000:有請版上神手找碴
→ sitos:set N = N / 16 (?) 對 Jass 不熟
→ wix3000:感覺程式語言應該會有直接轉換的功能啊 N.to16 之類的(?)