bin2hex

george999 · November 20, 2007, 08:15:53 PM

aa db "aa",0
bb db ?,0
......
invoke bin2hex,addr aa,2,addr bb
invoke SetDlgItemText,hWin,1002,addr bb

In editbox 61 61.

How I can put there like 6161 without spaces?

MichaelW · November 20, 2007, 10:47:27 PM

The bin2hex procedure formats the hex as it would be formatted for a hex dump, for example:

4D 5A 90 00 03 00 00 00 - 04 00 00 00 FF FF 00 00

Also, your buffer is too small even for the two hex digits and one space from the conversion of a single byte. AFAIK there is no MASM32 procedure or macro that can do exactly what you want, so instead of trying to adapt one of the available procedures or macros I just coded a specialized procedure.

Code Select


; Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«
Â  Â  include \masm32\include\masm32rt.inc
; Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«
Â  Â  .data
Â  Â  Â  abcÂ  Â db "abc",0
Â  Â  Â  buffÂ  db 10 dup(0)
Â  Â  .code
; Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«

EXTERNDEF hex_table :DWORD

sztohex proc psrc:DWORD,pdest:DWORD

Â  Â  push esi
Â  Â  mov esi, psrc
Â  Â  mov edx, pdest
Â  @@:
Â  Â  movzx ecx, BYTE PTR [esi]Â  Â  Â  Â  Â  Â  Â ; get byte value from source
Â  Â  mov al, BYTE PTR [hex_table+ecx*2]Â  Â  ; get first hex digit from table
Â  Â  mov [edx], alÂ  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â ; copy to destination
Â  Â  mov al, BYTE PTR [hex_table+ecx*2+1]Â  ; get second hex digit from table
Â  Â  mov [edx+1], alÂ  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â ; copy to destination
Â  Â  add edx, 2Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  ; adjust pointers
Â  Â  inc esi
Â  Â  cmp BYTE PTR [esi], 0Â  Â  Â  Â  Â  Â  Â  Â  Â ; test for end of source
Â  Â  jnz @B
Â  Â  mov BYTE PTR [edx], 0Â  Â  Â  Â  Â  Â  Â  Â  Â ; append null to destination

Â  Â  pop esi
Â  Â  ret

sztohex endp

; Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«
start:
; Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«
Â  Â  invoke sztohex, ADDR abc, ADDR buff
Â  Â  print ADDR buff,13,10
Â  Â  inkey "Press any key to exit..."
Â  Â  exit
; Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«Â«
end start

In case itâ€™s not clear, hex_table contains two characters for each byte value. For example, here are the first and last lines of the table:

Code Select


db "000102030405060708090A0B0C0D0E0F"
â€¦
db "F0F1F2F3F4F5F6F7F8F9FAFBFCFDFEFF"

This is why the byte value from the source string (in ECX) must be scaled by two when it is used to index the table.

george999 · November 21, 2007, 01:11:37 AM

Thank you verry much.Exactly what i nedd.

News:

bin2hex

george999

MichaelW

george999