>>434
が〜ん

やってしもうた
sub makeCoordsX {
my $rawCoords = shift;
return unpack("C", substr($rawCoords, 0, 1)) * 4 + (unpack("C", substr($rawCoords, 1, 1)) & 0xC0) / 64;
}
sub makeCoordsY {
my $rawCoords = shift;
return (unpack("C",substr($rawCoords, 1, 1)) & 0x3F) * 16 + (unpack("C",substr($rawCoords, 2, 1)) & 0xF0) / 16;
}

なむ〜

MySQL構築中…＜＝SQLをちっとね…