pb:
  .flags = strings.flagCHARTBL ;or strings.flagUNICODE or strings.flagREVERSE

  .charTbl: rb 512
  .charTblSrc: ub '../inc/string/emul_xxxx tables/emul_xxxx.win1251',0
  ReadFileA(pb.charTbl pb.charTblSrc 0 512)

  .this:  ub 'KIT',0
  .this.: .lthis = .this. - .this -1

  .here:  ub 'hello, kitty!',0
  .here.: .lhere = .here. - .here -1

  .start = 1
  .stop  = 0




ui32[argptr+00] = pb.this +dataseg
ui32[argptr+04] = pb.here +dataseg
ui32[argptr+08] = pos(pb.flags pb.charTbl \
                      pb.this pb.lthis    \
                      pb.here pb.lhere    \
                      pb.start pb.stop    )
printfA(buffer 1024 format argptr)
;MessageBoxA(buffer title 0)
msg buffer




align 4
argptr: rb 10*4
buffer: rb 1024
format: ub     \
  'this: %s',13,10,\
  'here: %s',13,10,\
  ''        ,13,10,\
  'pos : %u',0
title:  ub 'pos test',0
