my $ezio = {
                cmd=>      "\xFE",
                init=>     "\x28",
                stopsend=> "\x37",
                cls=>      "\x01",
                home=>     "\x02",
                blank=>    "\x08",
                hide=>     "\x0C",
};