function magia($txt='', $border=0, $ln=0, $align='C', $fill=false, $link='', $scale=false, $force=true){
    $str_width = $this->GetStringWidth($txt);
    $len = strlen($txt);

    for ($y = 0; $y < $len; $y++){
        $this->Cell(6,6,$txt[$y],0,0,'C');
    }
}