nls/convert.awk


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32

/^\$set/ {
  major++
  minor = 0

  if (major > 1)
    printf "\n" > output
  printf "$set %d %s\n", major, $3 > output

  if (header) {
    majorName = substr($3, 2)
    if (major > 1)
      printf "\n" > header
    printf "#define %sSet %#x\n", majorName, major > header
  }
}

/^\$ #/ {
  minor++

  if (header) {
    minorName = substr($2, 2)
    printf "#define %s%s %#x\n", majorName, minorName, minor > header
  }
}

/^#/ {
  text = substr($0, 3)  
  printf "%d %s\n", minor, text > output
}
  
! /^(\$|#)/ { print > output }