진법(radix) 표 만들기 예제 with Boo

컴퓨터 프로그래밍에서 꼭 알아두어야 할 주요 진법은 당연히 10진법, 2진법, 8진법, 16진법이다.
다음은  0 에서 15 까지의 정수를 10진법, 2진법, 8진법, 16진법의 표로 만들어 보여주는 Boo 소스 코드이다. 진법 변환에 필요한 함수

        convertAtoI(string, radix)
        convertItoA(number, radix)

를 Boo 코드로 자체 작성하여 사용하였다.

1. #  Filename: makeRadixTable.boo
2. #            Show the radix table with 10-, 2-, 8-, 16-radices.
3. #
4. #  Execute: booi makeRadixTable.boo
5. #
6. #      Date:  2009/04/03
7. #    Author:  PH Kim   [ pkim (AT) scripts.pe.kr ]
9. import System
11. BASE36 = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"
13. def println(s as string):
14.     print(s)
16. def printUsage():
17.     println("Usage: booi makeRadixTable.boo")
18.     println("Show the radix table with 10-, 2-, 8-, 16-radices.")
20. def convertItoA(num as long, radix as int) as string:
21.     isNegative = false
22.     if num < 0:
23.         isNegative = true
24.         num = -num
26.     arr as string = ""
27.     q as long = num
28.     r as long = 0
30.     while q >= radix:
31.         r = q % radix
32.         q = q / radix
33.         arr += BASE36[r]
35.     arr += BASE36[q]
36.     if isNegative:
37.         arr += "-"
39.     s as string = ""
40.     n = len(arr)
41.     for i as int in range(n):
42.         s += arr[n - 1 - i]
43.     return s
45. def toAscii(s as String) as int:
46.     objAscii as System.Text.ASCIIEncoding = System.Text.ASCIIEncoding()
47.     val as System.Byte = objAscii.GetBytes(s)[0]
48.     return Convert.ToInt32(val)
50. def convertAtoI(srcStr as string, radix as int) as long:
51.     isNegative = false
52.     ret as long = 0L
53.     m = len(srcStr)
54.     val = 0
55.     c = srcStr[0:1]
57.     if toAscii(c) == toAscii('-'):
58.         isNegative = true
59.     elif toAscii(c) >= toAscii('0') and toAscii(c) <= toAscii('9'):
60.         ret = toAscii(c) - toAscii('0')
61.     elif toAscii(c) >= toAscii('A') and toAscii(c) <= toAscii('Z'):
62.         ret = (toAscii(c) - toAscii('A')) + 10
63.     elif toAscii(c) >= toAscii('a') and toAscii(c) <= toAscii('z'):
64.         ret = (toAscii(c) - toAscii('a')) + 10
66.     if ret >= radix:
67.         raise Exception("        invalid character!")
68.         return ret
70.     for i in range(1, m):
71.         c = srcStr[i:i+1]
72.         ret *= radix
73.         if toAscii(c) >= char('0') and toAscii(c) <= char('9'):
74.             val = toAscii(c) - toAscii('0')
75.         elif toAscii(c) >= char('A') and toAscii(c) <= char('Z'):
76.             val = (toAscii(c) - toAscii('A')) + 10
77.         elif toAscii(c) >= char('a') and toAscii(c) <= char('z'):
78.             val = (toAscii(c) - toAscii('a')) + 10
80.         if val >= radix:
81.             raise Exception("        invalid character!")
82.             return ret
84.         ret += val
86.     return ret
88. def makeTable():
89.     sbuf = ""
90.     abuf = ""
91.     tbuf = ""
93.     for i in range(0, 4):
94.         sbuf += "+-------"
96.     sbuf += "+"
97.     println(sbuf)
99.     sbuf = "|  Dec"
100.     sbuf += "\t|   Bin"
101.     sbuf += "\t|  Oct"
102.     sbuf += "\t|  Hex  |"
103.     println(sbuf)
105.     sbuf = ""
106.     for i in range(0, 4):
107.         sbuf += "+-------"
108.     sbuf += "+"
109.     println(sbuf)
111.     for i in range(0, 16):
112.         sbuf = string.Format("|   {0,2}", i)
113.         abuf = convertItoA(i, 2)
114.         tbuf = string.Format("\t|  {0,4}", abuf)
115.         sbuf += tbuf
117.         abuf = convertItoA(i, 8)
118.         tbuf = string.Format("\t|   {0,2}", abuf)
119.         sbuf += tbuf
121.         abuf = convertItoA(i, 16)
122.         tbuf = string.Format("\t|    {0,-2} |", abuf)
123.         sbuf += tbuf
124.         println(sbuf)
126.     sbuf = ""
127.     for i in range(0, 4):
128.         sbuf += "+-------"
129.     sbuf += "+"
130.     println(sbuf)
132. if len(argv) > 0 and "-h" == argv[0]:
133.     printUsage()
134.     Environment.Exit(1)
136. makeTable()

실행> booi makeRadixTable.boo

+-------+-------+-------+-------+
|  Dec  |   Bin |  Oct  |  Hex  |
+-------+-------+-------+-------+
|    0  |     0 |    0  |    0  |
|    1  |     1 |    1  |    1  |
|    2  |    10 |    2  |    2  |
|    3  |    11 |    3  |    3  |
|    4  |   100 |    4  |    4  |
|    5  |   101 |    5  |    5  |
|    6  |   110 |    6  |    6  |
|    7  |   111 |    7  |    7  |
|    8  |  1000 |   10  |    8  |
|    9  |  1001 |   11  |    9  |
|   10  |  1010 |   12  |    A  |
|   11  |  1011 |   13  |    B  |
|   12  |  1100 |   14  |    C  |
|   13  |  1101 |   15  |    D  |
|   14  |  1110 |   16  |    E  |
|   15  |  1111 |   17  |    F  |
+-------+-------+-------+-------+

크리에이티브 커먼즈 라이선스

이 저작물은 크리에이티브 커먼즈 코리아 저작자표시-비영리-동일조건변경허락 2.0 대한민국 라이선스에 따라 이용하실 수 있습니다.