#!/usr/bin/perl

print("unsigned char xtimetbl[] = {\n");

for ($i=0; $i<256; $i++) {
  $xtime = ($i << 1) & 0xff;
  if ($i & 0x80) {
    $xtime ^= 0x1b;
  }
  printf("0x%02x, ", $xtime);
}

print("}\n");

