In the meantime:
Code:
alias ac.style1 {
  var %string = $1-,%a = $len(%string),%b = 1
  while (%b <= %a) {
    var %x = $iif(%x,0,1),%c = %c $+ $+(,$iif(%x,11,12),$right($left(%string,%b),1),$chr(32), ))
    inc %b
  }
  return 00,01 $+ %c
}