You are here

hex값끼리 바로 연산할 수 있는 방법 없을까요? 그리고...

안녕하세요..
요즘 여기서 정말 많이 배우고 있습니다. siteboss님, Admin님 모두 다시 한 번 감사드립니다.

hex값을 정수로 변환하지 않고 10미만의 정수와 바로 연산하는 명령어가 있는지 궁금합니다.

그리고, hex값의 자릿수가 8자리로 고정되어 있는데, 연산결과값이 8자리가 되지 않을 때 자동으로 앞에 '0'을
채우는 기능이 있는지도 궁금하네요. 저는 지금 아래와 같이 하고 있는데요. 단계를 좀 줄일 수 있는 방법이 없을런지요?
코드 슬림화를 위해서...

set a_hex_val "000019ab"
set a_deci_val [scan $a_hex_val %x]

set b_hex_val [format %x [expr $a_deci_val + 6]]
set b_hex_val_length [string length $b_hex_val]

if {$b_hex_val_length < 8} {
    for { set i 1 } { $i <= [expr 8 - $b_hex_val_length] } { incr i } {
        set b_hex_val "0$b_hex_val"
   }
}

puts $b_hex_val