7비트 ASCII 코드표 만들기 예제 with Lua

프로그래밍/Lua 2008. 3. 31. 12:19

ASCII(애스키)란 American Standard Code for Information Interchange의 줄임글로서, 영문자에 기초한 문자 인코딩이다.  이 문자 인코딩에는 C0 제어문자(C0 control character)도 포함되어 있다.  ( 참고:  ASCII - Wikipedia, the free encyclopedia )

다음은  7bit ASCII 코드표를 만들어 보여주는 자바 소스 코드이다. 소스 코드 중에 진법변환에 필요한 함수

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

의 구현도 포함되어 있다.



  1. --  Filename: makeAsciiTable.lua
  2. --            Make a table of ascii codes.
  3. --
  4. --  Execute: lua makeAsciiTable.lua
  5. --
  6. --      Date:  2008/03/28
  7. --    Author:  PH Kim   [ pkim (AT) scripts.pe.kr ]
  9. local BASE36 = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"
  11. function println(s)
  12.     print(s)
  13. end
  15. function printUsage()
  16.     println("Usage: lua makeAsciiTable.lua")
  17.     println("Make a table of ascii codes.")
  18. end
  20. function convertItoA(num, radix)
  21.     local isNegative = false
  22.     if num < 0 then
  23.         isNegative = true
  24.         num = -num
  25.     end
  27.     local arr = ""
  28.     local q = num
  29.     local r = 0
  31.     while q >= radix do
  32.         r = math.fmod(q, radix)
  33.         q = math.floor(q / radix)
  34.         arr = arr .. string.sub(BASE36, r+1, r+1)
  35.     end
  37.     arr = arr .. string.sub(BASE36, q+1, q+1)
  38.     if isNegative then
  39.         arr = arr .. "-"
  40.     end
  42.     local n = string.len(arr)
  43.     local ret = ""
  44.     for i = 1, n do
  45.         ret = ret .. string.sub(arr, n - i + 1, n - i + 1)
  46.     end
  48.     return ret
  49. end
  51. function convertAtoI(srcStr, radix)
  52.     local isNegative = false
  53.     local ret = 0
  54.     local len = string.len(srcStr)
  55.     local val = 0
  56.     local c
  58.     c = string.sub(srcStr, 1, 1)
  59.     if c == '-' then
  60.         isNegative = true
  61.     elseif c >= '0' and c <= '9' then
  62.         ret = string.byte(c) - string.byte('0')
  63.     elseif c >= 'A' and c <= 'Z' then
  64.         ret = string.byte(c) - string.byte('A') + 10
  65.     elseif c >= 'a' and c <= 'z' then
  66.         ret = string.byte(c) - string.byte('a') + 10
  67.     end
  69.     if ret >= radix then
  70.         println("        Invalid character!")
  71.         return ret
  72.     end
  74.     for i = 2, len do
  75.         c = string.sub(srcStr, i, i)
  76.         ret = ret * radix
  77.         if c >= '0' and c <= '9' then
  78.             val = string.byte(c) - string.byte('0')
  79.         elseif c >= 'A' and c <= 'Z' then
  80.             val = string.byte(c) - string.byte('A') + 10
  81.         elseif c >= 'a' and c <= 'z' then
  82.             val = string.byte(c) - string.byte('a') + 10
  83.         end
  85.         if val >= radix then
  86.             println("        Invalid character!")
  87.             return ret
  88.         end
  90.         ret = ret + val
  91.     end
  93.     return ret
  94. end
  96. function makeTable()
  97.   asc = {
  98.     "NUL", "SOH", "STX", "ETX", "EOT",
  99.     "ENQ", "ACK", "BEL", "BS", "HT",
  100.     "LF", "VT", "FF", "CR", "SO",
  101.     "SI", "DLE", "DC1", "DC2", "DC3",
  102.     "DC4", "NAK", "SYN", "ETB", "CAN",
  103.     "EM", "SUB", "ESC", "FS", "GS",
  104.     "RS", "US", "Spc"
  105.   }
  107.   control = {
  108.     "NUL (null)",
  109.     "SOH (start of heading)",
  110.     "STX (start of text)",
  111.     "ETX (end of text)",
  112.     "EOT (end of transmission)",
  113.     "ENQ (enquiry)",
  114.     "ACK (acknowledge)",
  115.     "BEL (bell)",
  116.     "BS  (backspace)",
  117.     "TAB (horizontal tab)",
  118.     "LF  (line feed, NL new line)",
  119.     "VT  (vertical tab)",
  120.     "FF  (form feed, NP new page)",
  121.     "CR  (carriage return)",
  122.     "SO  (shift out)",
  123.     "SI  (shift in)",
  124.     "DLE (data link escape)",
  125.     "DC1 (device control 1)",
  126.     "DC2 (device control 2)",
  127.     "DC3 (device control 3)",
  128.     "DC4 (device control 4)",
  129.     "NAK (negative acknowledge)",
  130.     "SYN (synchronous idle)",
  131.     "ETB (end of trans. block)",
  132.     "CAN (cancel)",
  133.     "EM  (end of medium)",
  134.     "SUB (substitute, EOF end of file)",
  135.     "ESC (escape)",
  136.     "FS  (file separator)",
  137.     "GS  (group separator)",
  138.     "RS  (record separator)",
  139.     "US  (unit separator)",
  140.   }
  142.     local sbuf = ""
  143.     local abuf = ""
  144.     local tbuf = ""
  145.     local i, j
  147.     sbuf = "    "
  148.     for i = 1, 8 do
  149.         sbuf = sbuf .. "+----"
  150.     end
  151.     sbuf = sbuf .. "+"
  152.     println(sbuf)
  154.     sbuf = "    "
  155.     sbuf = sbuf .. "| 0- "
  156.     sbuf = sbuf .. "| 1- "
  157.     sbuf = sbuf .. "| 2- "
  158.     sbuf = sbuf .. "| 3- "
  159.     sbuf = sbuf .. "| 4- "
  160.     sbuf = sbuf .. "| 5- "
  161.     sbuf = sbuf .. "| 6- "
  162.     sbuf = sbuf .. "| 7- "
  163.     sbuf = sbuf .. "|"
  164.     println(sbuf)
  166.     sbuf = "+---"
  167.     for i = 1, 8 do
  168.         sbuf = sbuf .. "+----"
  169.     end
  170.     sbuf = sbuf .. "+"
  171.     println(sbuf)
  173.     for i = 0, 15 do
  174.         tbuf = ""
  175.         sbuf = convertItoA(i, 16)
  176.         tbuf = tbuf .. "| " .. sbuf .. " "
  177.         for j = 0, 7 do
  178.             if j*16 + i <= 32 then
  179.                 abuf = string.format("| %-3s", asc[j*16 + i + 1])
  180.             elseif j*16 + i == 127 then
  181.                 abuf = string.format("| %-3s", "DEL")
  182.             else
  183.                 c = j*16 + i
  184.                 abuf = string.format("| %2c ", c)
  185.             end
  186.             tbuf = tbuf .. abuf
  187.         end
  188.         tbuf = tbuf .. "|"
  189.         println(tbuf)
  190.     end
  192.     sbuf = "+---"
  193.     for i = 1, 8 do
  194.         sbuf = sbuf .. "+----"
  195.     end
  196.     sbuf = sbuf .. "+"
  197.     println(sbuf)
  198.     println("")
  200.     for i = 1, 16 do
  201.         tbuf = string.format("%-30s  %-34s", control[i], control[i+16])
  202.         println(tbuf)
  203.     end
  204. end
  207. if #arg > 0 and "-h" == arg[1] then
  208.     printUsage()
  209.     os.exit(1)
  210. end
  212. makeTable()




실행> lua makeAsciiTable.lua

    +----+----+----+----+----+----+----+----+
    | 0- | 1- | 2- | 3- | 4- | 5- | 6- | 7- |
+---+----+----+----+----+----+----+----+----+
| 0 | NUL| DLE| Spc|  0 |  @ |  P |  ` |  p |
| 1 | SOH| DC1|  ! |  1 |  A |  Q |  a |  q |
| 2 | STX| DC2|  " |  2 |  B |  R |  b |  r |
| 3 | ETX| DC3|  # |  3 |  C |  S |  c |  s |
| 4 | EOT| DC4|  $ |  4 |  D |  T |  d |  t |
| 5 | ENQ| NAK|  % |  5 |  E |  U |  e |  u |
| 6 | ACK| SYN|  & |  6 |  F |  V |  f |  v |
| 7 | BEL| ETB|  ' |  7 |  G |  W |  g |  w |
| 8 | BS | CAN|  ( |  8 |  H |  X |  h |  x |
| 9 | HT | EM |  ) |  9 |  I |  Y |  i |  y |
| A | LF | SUB|  * |  : |  J |  Z |  j |  z |
| B | VT | ESC|  + |  ; |  K |  [ |  k |  { |
| C | FF | FS |  , |  < |  L |  \ |  l |  | |
| D | CR | GS |  - |  = |  M |  ] |  m |  } |
| E | SO | RS |  . |  > |  N |  ^ |  n |  ~ |
| F | SI | US |  / |  ? |  O |  _ |  o | DEL|
+---+----+----+----+----+----+----+----+----+

NUL (null)                      DLE (data link escape)
SOH (start of heading)          DC1 (device control 1)
STX (start of text)             DC2 (device control 2)
ETX (end of text)               DC3 (device control 3)
EOT (end of transmission)       DC4 (device control 4)
ENQ (enquiry)                   NAK (negative acknowledge)
ACK (acknowledge)               SYN (synchronous idle)
BEL (bell)                      ETB (end of trans. block)
BS  (backspace)                 CAN (cancel)
TAB (horizontal tab)            EM  (end of medium)
LF  (line feed, NL new line)    SUB (substitute, EOF end of file)
VT  (vertical tab)              ESC (escape)
FF  (form feed, NP new page)    FS  (file separator)
CR  (carriage return)           GS  (group separator)
SO  (shift out)                 RS  (record separator)
SI  (shift in)                  US  (unit separator)



Creative Commons License

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

'프로그래밍 > Lua' 카테고리의 다른 글

클래스 상속(subclassing) 예제 with Lua  (0) 2008.04.05
삼각형 출력 예제를 통한 여러 가지 소스 비교 with Lua  (0) 2008.04.05
진법(radix) 표 만들기 예제 with Lua  (0) 2008.03.29
대화형 모드의 진법(radix) 변환 예제 with Lua  (0) 2008.03.28
황금비율(golden ratio) 구하기 with Lua  (0) 2008.03.24
Posted by Scripter
,

티스토리툴바