Subversion Repositories Scribus

Rev

Rev 4594 | Blame | Compare with Previous | Last modification | View Log | RSS feed

/***************************************************************************
                          pdflib.cpp  -  description
                             -------------------
    begin                : Sat Jan 19 2002
    copyright            : (C) 2002 by Franz Schmid
    email                : Franz.Schmid@altmuehlnet.de
 ***************************************************************************/


/***************************************************************************
 *                                                                         *
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 ***************************************************************************/


#include "pdflib.h"
#include "pdflib.moc"

#ifdef _MSC_VER
 #if (_MSC_VER >= 1200)
  #include "win-config.h"
 #endif
#else
 #include "config.h"
#endif

#include <qregexp.h>
#include <qdatetime.h>
#include <qfileinfo.h>
#include <qtextstream.h>
#include <qdir.h>
#include <cstdlib>
#include <cmath>
#include <unistd.h>
#include "rc4.h"

using namespace std;

extern int callGS(const QStringList & args);
extern QString Path2Relative(QString Path);
extern bool GlyIndex(QMap<uint, PDFlib::GlNamInd> *GListInd, QString Dat);
extern QByteArray ComputeMD5Sum(QByteArray *in);
extern QImage LoadPict(QString fn, bool *gray = 0);
extern bool loadText(QString nam, QString *Buffer);
extern void Level2Layer(ScribusDoc *doc, struct Layer *ll, int Level);
extern QString CompressStr(QString *in);
extern QImage scaleImage(const QImage& src, int width, int height);
extern QString ImageToTxt(QImage *im);
extern QString ImageToCMYK(QImage *im);
extern bool isProgressive(QString fn);
extern void Convert2JPG(QString fn, QImage *image, int Quality, bool isCMYK);
extern QString MaskToTxt(QImage *im, bool PDF = true);
extern QString MaskToTxt14(QImage *im);
extern char *toHex( uchar u );
extern QString String2Hex(QString *in, bool lang = true);
extern double Cwidth(ScribusDoc *doc, QString name, QString ch, int Siz, QString ch2 = " ");
extern FPoint GetMaxClipF(FPointArray Clip);
#ifdef HAVE_CMS
extern bool CMSuse;
#endif
#ifdef HAVE_TIFF
        #include <tiffio.h>
#endif
extern ProfilesL InputProfiles;

extern "C" bool Run(ScribusApp *plug, QString fn, QString nam, int Components, std::vector<int> &pageNs, QMap<int,QPixmap> thumbs, QProgressBar *dia2);

bool Run(ScribusApp *plug, QString fn, QString nam, int Components, std::vector<int> &pageNs, QMap<int,QPixmap> thumbs, QProgressBar *dia2)
{
        QPixmap pm;
        bool ret = false;
        int progresscount=0;
        PDFlib *dia = new PDFlib();
        if (dia->PDF_Begin_Doc(fn, plug->doc, plug->view, &plug->doc->PDF_Optionen, plug->Prefs.AvailFonts,
                                 plug->doc->UsedFonts, plug->BookPal->BView))
                {
                        dia2->reset();
                        dia2->setTotalSteps(plug->view->MasterPages.count()+pageNs.size());
                        dia2->setProgress(0);
                        for (uint ap = 0; ap < plug->view->MasterPages.count(); ++ap)
                        {
                                if (plug->view->MasterPages.at(ap)->Items.count() != 0)
                                        dia->PDF_TemplatePage(plug->view->MasterPages.at(ap), plug->Prefs.ClipMargin);
                                progresscount++;
                                dia2->setProgress(progresscount);
                        }
                for (uint a = 0; a < pageNs.size(); ++a)
                {
                        if (plug->doc->PDF_Optionen.Thumbnails)
                                pm = thumbs[pageNs[a]];
                        dia->PDF_Begin_Page(plug->view->Pages.at(pageNs[a]-1), pm);
                        dia->PDF_ProcessPage(plug->view->Pages.at(pageNs[a]-1), pageNs[a]-1, plug->Prefs.ClipMargin);
                        dia->PDF_End_Page();
                        progresscount++;
                        dia2->setProgress(progresscount);
                }
                if (plug->doc->PDF_Optionen.Version == 12)
                        dia->PDF_End_Doc(plug->PrinterProfiles[plug->doc->PDF_Optionen.PrintProf], nam, Components);
                else
                        dia->PDF_End_Doc();
                ret = true;
                dia2->reset();
        }
        if (dia!=NULL)
                delete dia;
        return ret;
}

PDFlib::PDFlib()
{
        OwnerKey = QByteArray(32);
        UserKey = QByteArray(32);
        FileID = QByteArray(16);
        EncryKey = QByteArray(5);
        Encrypt = 0;
        KeyLen = 5;
        Dokument = 0;
        Catalog.Outlines = 2;
        Catalog.PageTree = 3;
        Catalog.Dest = 4;
        PageTree.Count = 0;
        PageTree.Kids.clear();
        Outlines.First = 0;
        Outlines.Last = 0;
        Outlines.Count = 0;
        XRef.clear();
        NamedDest.clear();
        NDnam = "LI";
        NDnum = 0;
        ObjCounter = 7;
        Seite.ObjNum = 0;
        Seite.Thumb = 0;
        Seite.XObjects.clear();
        Seite.ImgObjects.clear();
        Seite.FObjects.clear();
        Seite.AObjects.clear();
        Seite.FormObjects.clear();
        CalcFields.clear();
        Shadings.clear();
        Transpar.clear();
        ICCProfiles.clear();
        SharedImages.clear();
        ResNam = "RE";
        ResCount = 0;
#ifdef HAVE_LIBZ
        CompAvail = true;
#else
        CompAvail = false;
#endif
        KeyGen = QByteArray(32);
        int kg_array[] = {0x28, 0xbf, 0x4e, 0x5e, 0x4e, 0x75, 0x8a, 0x41, 0x64, 0x00, 0x4e, 0x56, 0xff, 0xfa,
                          0x01, 0x08, 0x2e, 0x2e, 0x00, 0xb6, 0xd0, 0x68, 0x3e, 0x80, 0x2f, 0x0c, 0xa9, 0xfe,
                          0x64, 0x53, 0x69, 0x7a};
        for (int a = 0; a < 32; ++a)
                KeyGen[a] = kg_array[a];
}


QString PDFlib::FToStr(double c)
{
        QString cc;
        return cc.sprintf("%.5f", c);
}

QString PDFlib::IToStr(int c)
{
        QString cc;
        return cc.setNum(c);
}

void PDFlib::PutDoc(QString in)
{
        QTextStream t(&Spool);
        t.writeRawBytes(in, in.length());
        Spool.flush();
        Dokument += in.length();
}

void PDFlib::PutPage(QString in)
{
        Inhalt += in;
}

void PDFlib::StartObj(int nr)
{
        XRef.append(Dokument);
        PutDoc(IToStr(nr)+ " 0 obj\n");
}

QString PDFlib::PDFEncode(QString in)
{
        QString tmp = "";
        QString cc;
        for (uint d = 0; d < in.length(); ++d)
        {
                cc = in.at(d);
                if ((cc == "(") || (cc == ")") || (cc == "\\"))
                        tmp += "\\";
                tmp += cc;
        }
        return tmp;
}

QString PDFlib::EncStream(QString *in, int ObjNum)
{
        if (in->length() < 1)
                return "";
        rc4_context_t   rc4;
        QString tmp = "";
        int dlen = 0;
        if (Options->Encrypt)
        {
                tmp = *in;
                QByteArray us(tmp.length());
                QByteArray ou(tmp.length());
                for (uint a = 0; a < tmp.length(); ++a)
                        us[a] = uchar(QChar(tmp.at(a)));
                QByteArray data(10);
                if (KeyLen > 5)
                        data.resize(21);
                for (int cd = 0; cd < KeyLen; ++cd)
                {
                        data[cd] = EncryKey[cd];
                        dlen++;
                }
                data[dlen++] = ObjNum;
                data[dlen++] = ObjNum >> 8;
                data[dlen++] = ObjNum >> 16;
                data[dlen++] = 0;
                data[dlen++] = 0;
                QByteArray step1(16);
                step1 = ComputeMD5Sum(&data);
                rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), QMIN(KeyLen+5, 16));
                rc4_encrypt(&rc4, reinterpret_cast<uchar*>(us.data()), reinterpret_cast<uchar*>(ou.data()), tmp.length());
                QString uk = "";
                for (uint cl = 0; cl < tmp.length(); ++cl)
                        uk += ou[cl];
                tmp = uk;
        }
        else
                tmp = *in;
        return tmp;
}

QString PDFlib::EncString(QString in, int ObjNum)
{
        if (in.length() < 3)
                return "<>";
        rc4_context_t   rc4;
        QString tmp;
        int dlen = 0;
        if (Options->Encrypt)
        {
                tmp = in.mid(1, in.length()-2);
                QByteArray us(tmp.length());
                QByteArray ou(tmp.length());
                for (uint a = 0; a < tmp.length(); ++a)
                        us[a] = static_cast<uchar>(QChar(tmp.at(a)));
                QByteArray data(10);
                if (KeyLen > 5)
                        data.resize(21);          
                for (int cd = 0; cd < KeyLen; ++cd)
                {
                        data[cd] = EncryKey[cd];
                        dlen++;
                }
                data[dlen++] = ObjNum;
                data[dlen++] = ObjNum >> 8;
                data[dlen++] = ObjNum >> 16;
                data[dlen++] = 0;
                data[dlen++] = 0;
                QByteArray step1(16);
                step1 = ComputeMD5Sum(&data);
                rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), QMIN(KeyLen+5, 16));
                rc4_encrypt(&rc4, reinterpret_cast<uchar*>(us.data()),
                                        reinterpret_cast<uchar*>(ou.data()), tmp.length());
                QString uk = "";
                for (uint cl = 0; cl < tmp.length(); ++cl)
                        uk += ou[cl];
                tmp = "<"+String2Hex(&uk, false)+">";
        }
        else
                tmp = in;
        return tmp;
}

QString PDFlib::FitKey(QString pass)
{
        QString pw = pass;
        if (pw.length() < 32)
        {
                uint l = pw.length();
                for (uint a = 0; a < 32 - l; ++a)
                        pw.append(KeyGen[a]);
        }
        else
                pw = pw.left(32);
        return pw;
}

void PDFlib::CalcOwnerKey(QString Owner, QString User)
{
        rc4_context_t   rc4;
        QString pw = User;
        QString pw2;
        pw2 = Owner;
        if (pw2 == "")
                pw2 = User;
        pw = FitKey(pw);
        pw2 = FitKey(pw2);
        QByteArray step1(16);
        step1 = ComputeMD5(pw2);
        if (KeyLen > 5)
        {
                for (int kl = 0; kl < 50; ++kl)
                        step1 = ComputeMD5Sum(&step1);
        }
        QByteArray us(32);
        QByteArray enk(16);
        if (KeyLen > 5)
        {
                for (uint a2 = 0; a2 < 32; ++a2)
                        OwnerKey[a2] = static_cast<uchar>(QChar(pw.at(a2)));
                for (int rl = 0; rl < 20; rl++)
                {
                        for (int j = 0; j < 16; j ++)
                                enk[j] = step1[j] ^ rl;
                        rc4_init(&rc4, reinterpret_cast<uchar*>(enk.data()), 16);
                        rc4_encrypt(&rc4, reinterpret_cast<uchar*>(OwnerKey.data()),
                                         reinterpret_cast<uchar*>(OwnerKey.data()), 32);
                }
        }
        else
        {
                for (uint a = 0; a < 32; ++a)
                        us[a] = static_cast<uchar>(QChar(pw.at(a)));
                rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), 5);
                rc4_encrypt(&rc4, reinterpret_cast<uchar*>(us.data()),
                                        reinterpret_cast<uchar*>(OwnerKey.data()), 32);
        }
}

void PDFlib::CalcUserKey(QString User, int Permission)
{
        rc4_context_t   rc4;
        QString pw = User;
        pw = FitKey(pw);
        QByteArray step1(16);
        QByteArray perm(4);
        uint perm_value = static_cast<uint>(Permission);
        perm[0] = perm_value;
        perm[1] = perm_value >> 8;
        perm[2] = perm_value >> 16;
        perm[3] = perm_value >> 24;
        for (uint a = 0; a < 32; ++a)
                pw += OwnerKey[a];
        for (uint a1 = 0; a1 < 4; ++a1)
                pw += perm[a1];
        for (uint a3 = 0; a3 < 16; ++a3)
                pw += FileID[a3];
        step1 = ComputeMD5(pw);
        if (KeyLen > 5)
        {
                for (int kl = 0; kl < 50; ++kl)
                        step1 = ComputeMD5Sum(&step1);
                EncryKey.resize(16);
        }
        for (int a2 = 0; a2 < KeyLen; ++a2)
                EncryKey[a2] = step1[a2];
        if (KeyLen > 5)
        {
                QString pr2 = "";
                for (int kl3 = 0; kl3 < 32; ++kl3)
                        pr2 += KeyGen[kl3];
                for (uint a4 = 0; a4 < 16; ++a4)
                        pr2 += FileID[a4];
                step1 = ComputeMD5(pr2);
                QByteArray enk(16);
                for (uint a3 = 0; a3 < 16; ++a3)
                        UserKey[a3] = step1[a3];
                for (int rl = 0; rl < 20; rl++)
                {
                        for (int j = 0; j < 16; j ++)
                                enk[j] = EncryKey[j] ^ rl;
                        rc4_init(&rc4, reinterpret_cast<uchar*>(enk.data()), 16);
                        rc4_encrypt(&rc4, reinterpret_cast<uchar*>(UserKey.data()), reinterpret_cast<uchar*>(UserKey.data()), 16);
                }
        }
        else
        {
                rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), 5);
                rc4_encrypt(&rc4, reinterpret_cast<uchar*>(KeyGen.data()), reinterpret_cast<uchar*>(UserKey.data()), 32);
        }
}

QByteArray PDFlib::ComputeMD5(QString in)
{
        QByteArray TBytes(in.length());
        for (uint a = 0; a < in.length(); ++a)
                TBytes[a] = static_cast<uchar>(QChar(in.at(a)));
        return ComputeMD5Sum(&TBytes);
}

bool PDFlib::PDF_Begin_Doc(QString fn, ScribusDoc *docu, ScribusView *vie, PDFOpt *opts, SCFonts &AllFonts, QMap<QString,QFont> DocFonts, BookMView* vi)
{
        Spool.setName(fn);
        if (!Spool.open(IO_WriteOnly))
                return false;
        QString tmp;
        QString ok = "";
        QString uk = "";
        QFileInfo fd;
        QString fext;
        int a;
        doc = docu;
        view = vie;
        Bvie = vi;
        Options = opts;
        BookMinUse = false;
        UsedFontsP.clear();
        ObjCounter = Options->Articles ? 9 : 8;
        PutDoc(Options->Version <= 13 ? "%PDF-1.3\n" : "%PDF-1.4\n");
        if (Options->Version == 12)
                ObjCounter++;
        PutDoc("%"+QString(QChar(199))+QString(QChar(236))+QString(QChar(143))+QString(QChar(162))+"\n");
        StartObj(1);
        PutDoc("<<\n/Type /Catalog\n/Outlines 3 0 R\n/Pages 4 0 R\n/Dests 5 0 R\n/AcroForm 6 0 R\n/Names 7 0 R\n");
        if (Options->Articles)
                PutDoc("/Threads 8 0 R\n");
        if (Options->Version == 12)
                PutDoc("/OutputIntents [ "+IToStr(ObjCounter-1)+" 0 R ]\n");
        PutDoc("/ViewerPreferences << /PageDirection ");
        PutDoc( Options->Binding == 0 ? "/L2R" : "/R2L");
        PutDoc(" >>\n>>\nendobj\n");
        QString IDg = Datum;
        IDg += Options->Datei;
        IDg += "Scribus "+QString(VERSION);
        IDg += "Libpdf for Scribus "+QString(VERSION);
        IDg += doc->DocTitel;
        IDg += doc->DocAutor;
        IDg += "/False";
        FileID = ComputeMD5(IDg);
        if (Options->Encrypt)
        {
                KeyLen = Options->Version == 14 ? 16 : 5;
                CalcOwnerKey(Options->PassOwner, Options->PassUser);
                CalcUserKey(Options->PassUser, Options->Permissions);
                for (uint cl2 = 0; cl2 < 32; ++cl2)
                        ok += OwnerKey[cl2];
                if (KeyLen > 5)
                {
                        for (uint cl3 = 0; cl3 < 16; ++cl3)
                                uk += UserKey[cl3];
                        for (uint cl3r = 0; cl3r < 16; ++cl3r)
                                uk += KeyGen[cl3r];
                }
                else
                {
                        for (uint cl = 0; cl < 32; ++cl)
                                uk += UserKey[cl];
                }
        }
        QDate d = QDate::currentDate();
        Datum = "D:";
        tmp.sprintf("%4d", d.year());
        tmp.replace(QRegExp(" "), "0");
        Datum += tmp;
        tmp.sprintf("%2d", d.month());
        tmp.replace(QRegExp(" "), "0");
        Datum += tmp;
        tmp.sprintf("%2d", d.day());
        tmp.replace(QRegExp(" "), "0");
        Datum += tmp;
        QTime t = QTime::currentTime();
        tmp = t.toString();
        tmp.replace(QRegExp(":"), "");
        Datum += tmp;
        StartObj(2);
        PutDoc("<<\n/Creator "+EncString("(Scribus "+QString(VERSION)+")",2)+"\n");
        PutDoc("/Producer "+EncString("(Libpdf for Scribus "+QString(VERSION)+")",2)+"\n");
        PutDoc("/Title "+EncString("("+doc->DocTitel+")",2)+"\n");
        PutDoc("/Author "+EncString("("+doc->DocAutor+")",2)+"\n");
        PutDoc("/Keywords "+EncString("("+doc->DocKeyWords+")",2)+"\n");
        PutDoc("/CreationDate "+EncString("("+Datum+")",2)+"\n");
        PutDoc("/ModDate "+EncString("("+Datum+")",2)+"\n");
        if (Options->Version == 12)
                PutDoc("/GTS_PDFXVersion (PDF/X-3:2002)\n");
        PutDoc("/Trapped /False\n>>\nendobj\n");
        for (int t = 0; t < 5; ++t)
                XRef.append(Dokument);
        if (Options->Articles)
                XRef.append(Dokument);
        if (Options->Version == 12)
                XRef.append(Dokument);
        if (Options->Encrypt)
        {
                StartObj(ObjCounter);
                Encrypt = ObjCounter;
                ObjCounter++;
                PutDoc("<<\n/Filter /Standard\n");
                PutDoc( KeyLen > 5 ? "/R 3\n/V 2\n/Length 128\n" : "/R 2\n/V 1\n");
                PutDoc("/O <"+String2Hex(&ok)+">\n");
                PutDoc("/U <"+String2Hex(&uk)+">\n");
                PutDoc("/P "+IToStr(Options->Permissions)+"\n>>\nendobj\n");
        }
        RealFonts = DocFonts;
        QMap<QString,QFont> ReallyUsed;
        ReallyUsed.clear();
        Page* pg;
        PageItem* pgit;
        for (uint c = 0; c < view->MasterPages.count(); ++c)
        {
                pg = view->MasterPages.at(c);
                for (uint d = 0; d < pg->Items.count(); ++d)
                {
                        pgit = pg->Items.at(d);
                        if ((pgit->PType == 4) || (pgit->PType == 8))
                        {
                                for (uint e = 0; e < pgit->Ptext.count(); ++e)
                                {
                                        ReallyUsed.insert(pgit->Ptext.at(e)->cfont, DocFonts[pgit->Ptext.at(e)->cfont]);
                                }
                        }
                }
        }
        for (uint c=0; c<view->Pages.count(); ++c)
        {
                pg = view->Pages.at(c);
                for (uint d = 0; d < pg->Items.count(); ++d)
                {
                        pgit = pg->Items.at(d);
                        if ((pgit->PType == 4) || (pgit->PType == 8))
                        {
                                for (uint e = 0; e < pgit->Ptext.count(); ++e)
                                {
                                        ReallyUsed.insert(pgit->Ptext.at(e)->cfont, DocFonts[pgit->Ptext.at(e)->cfont]);
                                }
                        }
                }
        }
        QMap<QString,QFont>::Iterator it;
        a = 0;
        for (it = ReallyUsed.begin(); it != ReallyUsed.end(); ++it)
        {
                fd = QFileInfo(AllFonts[it.key()]->Datei);
                fext = fd.extension(false).lower();
                if ((AllFonts[it.key()]->isOTF) || (!AllFonts[it.key()]->HasNames) || (AllFonts[it.key()]->Subset) || (Options->SubsetList.contains(it.key())))
                {
                        QString fon = "";
                        QMap<uint,FPointArray>::Iterator ig;
                        for (ig = AllFonts[it.key()]->RealGlyphs.begin(); ig != AllFonts[it.key()]->RealGlyphs.end(); ++ig)
                        {
                                FPoint np, np1, np2;
                                bool nPath = true;
                                if (ig.data().size() > 3)
                                {
                                        FPointArray gly = ig.data().copy();
                                        QWMatrix mat;
                                        mat.scale(0.1, 0.1);
                                        gly.map(mat);
                                        for (uint poi = 0; poi < gly.size()-3; poi += 4)
                                        {
                                                if (gly.point(poi).x() > 900000)
                                                {
                                                        fon += "h\n";
                                                        nPath = true;
                                                        continue;
                                                }
                                                if (nPath)
                                                {
                                                        np = gly.point(poi);
                                                        fon += FToStr(np.x())+" "+FToStr(-np.y())+" m\n";
                                                        nPath = false;
                                                }
                                                np = gly.point(poi+1);
                                                np1 = gly.point(poi+3);
                                                np2 = gly.point(poi+2);
                                                fon += FToStr(np.x()) + " " + FToStr(-np.y()) + " " +
                                                         FToStr(np1.x()) + " " + FToStr(-np1.y()) + " " +
                                                         FToStr(np2.x()) + " " + FToStr(-np2.y()) + " c\n";
                                        }
                                        fon += "h f*\n";
                                        StartObj(ObjCounter);
                                        ObjCounter++;
                                        np = doc->ActPage->GetMinClipF(gly);
                                        np1 = GetMaxClipF(gly);
                                        PutDoc("<<\n/Type /XObject\n/Subtype /Form\n/FormType 1\n");
                                        PutDoc("/BBox [ "+FToStr(np.x())+" "+FToStr(-np.y())+" "+FToStr(np1.x())+
                                                " "+FToStr(-np1.y())+" ]\n");
                                        PutDoc("/Resources << /ProcSet [/PDF /Text /ImageB /ImageC /ImageI]\n");
                                        PutDoc(">>\n");
                                        if ((Options->Compress) && (CompAvail))
                                                fon = CompressStr(&fon);
                                        PutDoc("/Length "+IToStr(fon.length()+1));
                                        if ((Options->Compress) && (CompAvail))
                                                PutDoc("\n/Filter /FlateDecode");
                                        PutDoc(" >>\nstream\n"+EncStream(&fon, 
                                                                 ObjCounter-1)+"\nendstream\nendobj\n");
                                        Seite.ImgObjects[AllFonts[it.key()]->RealName().simplifyWhiteSpace().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "" )+IToStr(ig.key())] =
                                                 ObjCounter-1;
                                        fon = "";
                                }
                        }
                        AllFonts[it.key()]->RealGlyphs.clear();
                }
                else
                {
                        UsedFontsP.insert(it.key(), "/Fo"+IToStr(a));
                        if ((fext == "pfb") && (Options->EmbedList.contains(it.key())))
                        {
                                QString fon = "";
                                StartObj(ObjCounter);
                                QFile f(AllFonts[it.key()]->Datei);
                                QByteArray bb(f.size());
                                if (f.open(IO_ReadOnly))
                                {
                                        f.readBlock(bb.data(), f.size());
                                        f.close();
                                }
                                uint posi;
                                for (posi = 6; posi < bb.size(); ++posi)
                                {
                                        if ((bb[posi] == static_cast<char>(0x80)) &&
                                                        (static_cast<int>(bb[posi+1]) == 2))
                                                break;
                                        fon += bb[posi];
                                }
                                int len1 = fon.length();
                                uint ulen;
                                ulen = bb[posi+2] & 0xff;
                                ulen |= (bb[posi+3] << 8) & 0xff00;
                                ulen |= (bb[posi+4] << 16) & 0xff0000;
                                ulen |= (bb[posi+5] << 24) & 0xff000000;
                                if (ulen > bb.size())
                                        ulen = bb.size()-7;
                                posi += 6;
                                for (uint j = 0; j < ulen; ++j)
                                        fon += bb[posi++];
                                posi += 6;
                                int len2 = fon.length()-len1;
                                for (uint j = posi; j < bb.size(); ++j)
                                {
                                        if ((bb[j] == static_cast<char>(0x80)) && (static_cast<int>(bb[j+1]) == 3))
                                                break;
                                        if (bb[j] == '\r')
                                                fon += "\n";
                                        else
                                                fon += bb[j];
                                }
                                int len3 = fon.length()-len2-len1;
                                if ((Options->Compress) && (CompAvail))
                                        fon = CompressStr(&fon);
                                PutDoc("<<\n/Length "+IToStr(fon.length()+1)+"\n");
                                PutDoc("/Length1 "+IToStr(len1)+"\n");
                                PutDoc("/Length2 "+IToStr(len2)+"\n");
                                PutDoc("/Length3 "+IToStr(len3)+"\n");
                                if ((Options->Compress) && (CompAvail))
                                        PutDoc("/Filter /FlateDecode\n");
                                PutDoc(">>\nstream\n"+EncStream(&fon,ObjCounter)+"\nendstream\nendobj\n");
                                ObjCounter++;
                        }
                        if ((fext == "pfa") && (Options->EmbedList.contains(it.key())))
                        {
                                QString fon = "";
                                QString fon2 = "";
                                QString tm = "";
                                uint value;
                                bool ok = true;
                                StartObj(ObjCounter);
                                loadText(AllFonts[it.key()]->Datei, &fon);
                                int len1 = fon.find("eexec")+5;
                                fon2 = fon.left(len1)+"\n";
                                int len2 = fon.find("0000000000000000000000000");
                                if (len2 == -1)
                                        len2 = fon.length()+1;
                                int count = 0;
                                for (int xx = len1; xx < len2-1; ++xx)
                                {
                                        tm = fon.at(xx);
                                        if ((tm == QChar(13)) || (tm == QChar(10)))
                                                continue;
                                        xx++;
                                        count++;
                                        tm += fon.at(xx);
                                        value = tm.toUInt(&ok, 16);
                                        fon2 += QChar(value);
                                }
                                fon2 += fon.mid(len2);
                                if ((Options->Compress) && (CompAvail))
                                        fon2 = CompressStr(&fon2);
                                PutDoc("<<\n/Length "+IToStr(fon2.length()+1)+"\n");
                                PutDoc("/Length1 "+IToStr(len1+1)+"\n");
                                PutDoc("/Length2 "+IToStr(count)+"\n");
                                PutDoc(static_cast<int>(fon.length()-len2) == -1 ? QString("/Length3 0\n") :
                                       "/Length3 "+IToStr(fon.length()-len2)+"\n");
                                if ((Options->Compress) && (CompAvail))
                                        PutDoc("/Filter /FlateDecode\n");
                                PutDoc(">>\nstream\n"+EncStream(&fon2, ObjCounter)+"\nendstream\nendobj\n");
                                ObjCounter++;
                        }
                        if (((fext == "ttf") || (fext == "otf")) && (Options->EmbedList.contains(it.key())))
                        {
                                QString fon = "";
                                StartObj(ObjCounter);
                                QFile f(AllFonts[it.key()]->Datei);
                                QByteArray bb(f.size());
                                if (f.open(IO_ReadOnly))
                                {
                                        f.readBlock(bb.data(), f.size());
                                        f.close();
                                }
                                for (uint posi = 0; posi < bb.size(); ++posi)
                                        fon += bb[posi];
                                int len = fon.length();
                                if ((Options->Compress) && (CompAvail))
                                        fon = CompressStr(&fon);
                                PutDoc("<<\n/Length "+IToStr(fon.length()+1)+"\n");
                                PutDoc("/Length1 "+IToStr(len)+"\n");
                                if ((Options->Compress) && (CompAvail))
                                        PutDoc("/Filter /FlateDecode\n");
                                PutDoc(">>\nstream\n"+EncStream(&fon, ObjCounter)+"\nendstream\nendobj\n");
                                ObjCounter++;
                        }
                        StartObj(ObjCounter);
                        PutDoc("<<\n/Type /FontDescriptor\n");
                        PutDoc("/FontName /"+AllFonts[it.key()]->RealName().simplifyWhiteSpace().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "" )+"\n");
                        PutDoc("/FontBBox [ "+AllFonts[it.key()]->FontBBox+" ]\n");
                        PutDoc("/Flags ");
                        QFontInfo fo = QFontInfo(it.data());
                        int pfl = 0;
                        if (AllFonts[it.key()]->IsFixedPitch)
                                pfl = pfl ^ 1;
                        if (fo.italic())
                                pfl = pfl ^ 64;
//                      pfl = pfl ^ 4;
                        pfl = pfl ^ 32;
                        PutDoc(IToStr(pfl)+"\n");
                        PutDoc("/Ascent "+AllFonts[it.key()]->Ascent+"\n");
                        PutDoc("/Descent "+AllFonts[it.key()]->Descender+"\n");
                        PutDoc("/CapHeight "+AllFonts[it.key()]->CapHeight+"\n");
                        PutDoc("/ItalicAngle "+AllFonts[it.key()]->ItalicAngle+"\n");
                        PutDoc("/StemV "+AllFonts[it.key()]->StdVW+"\n");
                        if (((fext == "ttf") || (fext == "otf")) && (Options->EmbedList.contains(it.key())))
                                PutDoc("/FontFile2 "+IToStr(ObjCounter-1)+" 0 R\n");
                        if ((fext == "pfb") && (Options->EmbedList.contains(it.key())))
                                PutDoc("/FontFile "+IToStr(ObjCounter-1)+" 0 R\n");
                        if ((fext == "pfa") && (Options->EmbedList.contains(it.key())))
                                PutDoc("/FontFile "+IToStr(ObjCounter-1)+" 0 R\n");
                        PutDoc(">>\nendobj\n");
                        ObjCounter++;
                        GListeInd gl;
                        GlyIndex(&gl, AllFonts[it.key()]->Datei);
                        GlyphsIdxOfFont.insert(it.key(), gl);
                        uint FontDes = ObjCounter - 1;
                        GListeInd::Iterator itg;
                        itg = gl.begin();
                        GListeInd::Iterator itg2;
                        itg2 = gl.begin();
                        uint Fcc = gl.count() / 224;
                        if ((gl.count() % 224) != 0)
                                Fcc += 1;
                        for (uint Fc = 0; Fc < Fcc; ++Fc)
                        {
                                StartObj(ObjCounter);
                                int chCount = 31;
                                PutDoc("[ 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ");
                                for (int ww = 31; ww < 256; ++ww)
                                {
                                        PutDoc(IToStr(static_cast<int>(AllFonts[it.key()]->CharWidth[itg.key()]*
                                                        1000))+" ");
                                        if (itg == gl.end())
                                                break;
                                        ++itg;
                                        chCount++;
                                }
                                PutDoc("]\nendobj\n");
                                ObjCounter++;
                                StartObj(ObjCounter);
                                ObjCounter++;
                                PutDoc("<< /Type /Encoding\n/Differences [ 32\n");
                                int crc = 0;
                                for (int ww2 = 32; ww2 < 256; ++ww2)
                                {
                                        PutDoc(itg2.data().Name+" ");
                                        if (itg2 == gl.end())
                                                break;
                                        ++itg2;
                                        crc++;
                                        if (crc > 8)
                                        {
                                                PutDoc("\n");
                                                crc = 0;
                                        }
                                }
                                PutDoc("]\n>>\nendobj\n");
                                StartObj(ObjCounter);
                                PutDoc("<<\n/Type /Font\n/Subtype ");
                                PutDoc(((fext == "ttf") || (fext == "otf")) ? "/TrueType\n" : "/Type1\n");
                                PutDoc("/Name /Fo"+IToStr(a)+"S"+IToStr(Fc)+"\n");
                                PutDoc("/BaseFont /"+AllFonts[it.key()]->RealName().simplifyWhiteSpace().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "" )+"\n");
                                PutDoc("/FirstChar 0\n");
                                PutDoc("/LastChar "+IToStr(chCount-1)+"\n");
                                PutDoc("/Widths "+IToStr(ObjCounter-2)+" 0 R\n");
                                PutDoc("/Encoding "+IToStr(ObjCounter-1)+" 0 R\n");
                                PutDoc("/FontDescriptor "+IToStr(FontDes)+" 0 R\n");
                                PutDoc(">>\nendobj\n");
                                Seite.FObjects["Fo"+IToStr(a)+"S"+IToStr(Fc)] = ObjCounter;
                                ObjCounter++;
                        }
                }
                a++;
        }
        if (Options->UseLPI)
        {
                StartObj(ObjCounter);
                PutDoc("<<\n/Type /Halftone\n/HalftoneType 5\n");
                QMap<QString,LPIset>::Iterator itlp;
                for (itlp = Options->LPISettings.begin(); itlp != Options->LPISettings.end(); ++itlp)
                {
                        PutDoc("/"+itlp.key()+"\n<<\n/Type /Halftone\n/HalftoneType 1\n/Frequency ");
                        PutDoc(IToStr(itlp.data().Frequency)+"\n/Angle "+IToStr(itlp.data().Angle)+"\n/SpotFunction ");
                        QString func = "";
                        switch (itlp.data().SpotFunc)
                        {
                                case 0:
                                        func = "/SimpleDot";
                                        break;
                                case 1:
                                        func = "/Line";
                                        break;
                                case 2:
                                        func = "/Round";
                                        break;
                                case 3:
                                        func = "/Ellipse";
                                        break;
                                default:
                                        func = "/SimpleDot";
                                        break;
                        }
                        PutDoc(func+"\n>>\n");
                }
                PutDoc("/Default\n<<\n/Type /Halftone\n/HalftoneType 1\n/Frequency 50\n/Angle 45\n/SpotFunction /Round\n>>\n");
                PutDoc(">>\nendobj\n");
                ObjCounter++;
                StartObj(ObjCounter);
                HTName = ResNam+IToStr(ResCount);
                Transpar[HTName] = ObjCounter;
                PutDoc("<< /Type /ExtGState\n/HT "+IToStr(ObjCounter-1)+" 0 R\n>>\nendobj\n");
                ResCount++;
                ObjCounter++;
        }
#ifdef HAVE_CMS
        if ((CMSuse) && (Options->UseProfiles))
        {
                StartObj(ObjCounter);
                ObjCounter++;
                QString dataP;
                struct ICCD dataD;
                loadText(InputProfiles[Options->SolidProf], &dataP);
                PutDoc("<<\n");
                if ((Options->Compress) && (CompAvail))
                {
                        PutDoc("/Filter /FlateDecode\n");
                        dataP = CompressStr(&dataP);
                }
                PutDoc("/Length "+IToStr(dataP.length()+1)+"\n");
                PutDoc("/N "+IToStr(Options->SComp)+"\n");
                PutDoc(">>\nstream\n"+EncStream(&dataP, ObjCounter-1)+"\nendstream\nendobj\n");
                StartObj(ObjCounter);
                dataD.ResName = ResNam+IToStr(ResCount);
                dataD.ICCArray = "[ /ICCBased "+IToStr(ObjCounter-1)+" 0 R ]";
                dataD.ResNum = ObjCounter;
                ICCProfiles[Options->SolidProf] = dataD;
                PutDoc("[ /ICCBased "+IToStr(ObjCounter-1)+" 0 R ]\n");
                PutDoc("endobj\n");
                ResCount++;
                ObjCounter++;
        }
#endif
        return true;
}

void PDFlib::PDF_TemplatePage(Page* pag, bool )
{
        QString tmp;
        ActPageP = pag;
        Inhalt = "";
        Seite.AObjects.clear();
        PageItem* ite;
        int Lnr = 0;
        struct Layer ll;
        ll.Drucken = false;
        ll.LNr = 0;
        ll.Drucken = false;
        ll.LNr = 0;
        Lnr = 0;
        for (uint la = 0; la < doc->Layers.count(); ++la)
        {
                Level2Layer(doc, &ll, Lnr);
                if (ll.Drucken)
                {
                        for (uint a = 0; a < ActPageP->Items.count(); ++a)
                        {
                                ite = ActPageP->Items.at(a);
                                if (ite->LayerNr != ll.LNr)
                                        continue;
                                Inhalt = "";
                                PutPage("q\n");
                                if (((ite->Transparency != 0) || (ite->TranspStroke != 0)) && (Options->Version == 14))
                                        PDF_Transparenz(ite);
                                if ((ite->isBookmark) && (Options->Bookmarks))
                                        PDF_Bookmark(ite->BMnr, doc->PageH - ite->Ypos);
                                if (!ite->isPrintable || ((ite->PType == 4) && (pag->PageNam != "")))
                                {
                                        PutPage("Q\n");
                                        continue;
                                }
                                if (ite->Pcolor != "None")
                                        PutPage(putColor(ite->Pcolor, ite->Shade, true));
                                if (ite->Pcolor2 != "None")
                                        PutPage(putColor(ite->Pcolor2, ite->Shade2, false));
                                Inhalt += FToStr(fabs(ite->Pwidth))+" w\n";
                                if (ite->DashValues.count() != 0)
                                {
                                        PutPage("[ ");
                                        QValueList<double>::iterator it;
                                        for ( it = ite->DashValues.begin(); it != ite->DashValues.end(); ++it )
                                        {
                                                int da = static_cast<int>(*it);
                                                if (da != 0)
                                                        PutPage(IToStr(da)+" ");
                                        }
                                        PutPage("] "+IToStr(static_cast<int>(ite->DashOffset))+" d\n");
                                }
                                else
                                {
                                        QString Dt = FToStr(QMAX(2*fabs(ite->Pwidth), 1));
                                        QString Da = FToStr(QMAX(6*fabs(ite->Pwidth), 1));
                                        switch (ite->PLineArt)
                                        {
                                                case Qt::SolidLine:
                                                        PutPage("[] 0 d\n");
                                                        break;
                                                case Qt::DashLine:
                                                        PutPage("["+Da+" "+Dt+"] 0 d\n");
                                                        break;
                                                case Qt::DotLine:
                                                        PutPage("["+Dt+"] 0 d\n");
                                                        break;
                                                case Qt::DashDotLine:
                                                        PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n");
                                                        break;
                                                case Qt::DashDotDotLine:
                                                        PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n");
                                                        break;
                                                default:
                                                        PutPage("[] 0 d\n");
                                                        break;
                                        }
                                }
                                switch (ite->PLineEnd)
                                {
                                        case Qt::FlatCap:
                                                PutPage("0 J\n");
                                                break;
                                        case Qt::SquareCap:
                                                PutPage("2 J\n");
                                                break;
                                        case Qt::RoundCap:
                                                PutPage("1 J\n");
                                                break;
                                        default:
                                                PutPage("0 J\n");
                                                break;
                                }
                                switch (ite->PLineJoin)
                                {
                                        case Qt::MiterJoin:
                                                PutPage("0 j\n");
                                                break;
                                        case Qt::BevelJoin:
                                                PutPage("2 j\n");
                                                break;
                                        case Qt::RoundJoin:
                                                PutPage("1 j\n");
                                                break;
                                        default:
                                                PutPage("0 j\n");
                                                break;
                                }
                                PutPage("1 0 0 1 "+FToStr(ite->Xpos)+" "+FToStr(doc->PageH - ite->Ypos)+" cm\n");
                                if (ite->Rot != 0)
                                {
                                        double sr = sin(-ite->Rot* 3.1415927 / 180.0);
                                        double cr = cos(-ite->Rot* 3.1415927 / 180.0);
                                        if ((cr * cr) < 0.000001)
                                                cr = 0;
                                        if ((sr * sr) < 0.000001)
                                                sr = 0;
                                        PutPage(FToStr(cr)+" "+FToStr(sr)+" "+FToStr(-sr)+" "+FToStr(cr)+" 0 0 cm\n");
                                }
                                switch (ite->PType)
                                {
                                        case 2:
                                                if ((ite->Pcolor != "None") || (ite->GrType != 0))
                                                {
                                                        if (ite->GrType != 0)
                                                                PDF_Gradient(ite);
                                                        else
                                                        {
                                                                PutPage(SetClipPath(ite));
                                                                PutPage("h\nf*\n");
                                                        }
                                                }
                                                PutPage("q\n");
                                                PutPage(SetClipPath(ite));
                                                PutPage("h\nW*\nn\n");
                                                if ((ite->flippedH % 2) != 0)
                                                        PutPage("-1 0 0 1 "+FToStr(ite->Width)+" 0 cm\n");
                                                if ((ite->flippedV % 2) != 0)
                                                        PutPage("1 0 0 -1 0 "+FToStr(-ite->Height)+" cm\n");
                                                if ((ite->PicAvail) && (ite->Pfile != ""))
                                                        PDF_Image(ite->InvPict, ite->Pfile, ite->LocalScX,
                                                                         ite->LocalScY, ite->LocalX, -ite->LocalY,
                                                                         false, ite->IProfile, ite->UseEmbedded,
                                                                          ite->IRender);
                                                PutPage("Q\n");
                                                if (((ite->Pcolor2 != "None") || (ite->NamedLStyle != "")) && (!ite->isTableItem))
                                                {
                                                        if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0))
                                                        {
                                                                PutPage(SetClipPath(ite));
                                                                PutPage("h\nS\n");
                                                        }
                                                        else
                                                        {
                                                                multiLine ml = doc->MLineStyles[ite->NamedLStyle];
                                                                for (int it = ml.size()-1; it > -1; it--)
                                                                {
                                                                        PutPage(setStrokeMulti(&ml[it]));
                                                                        PutPage(SetClipPath(ite));
                                                                        PutPage("h\nS\n");
                                                                }
                                                        }
                                                }
                                                break;
                                        case 4:
                                                break;
                                        case 5:
                                                if (ite->NamedLStyle == "")
                                                {
                                                        PutPage("0 0 m\n");
                                                        PutPage(FToStr(ite->Width)+" "+FToStr(-ite->Height)+" l\n");
                                                        PutPage("S\n");
                                                }
                                                else
                                                {
                                                        multiLine ml = doc->MLineStyles[ite->NamedLStyle];
                                                        for (int it = ml.size()-1; it > -1; it--)
                                                        {
                                                                PutPage(setStrokeMulti(&ml[it]));
                                                                PutPage("0 0 m\n");
                                                                PutPage(FToStr(ite->Width)+" "+FToStr(-ite->Height)+" l\n");
                                                                PutPage("S\n");
                                                        }
                                                }
                                                break;
                                        case 1:
                                        case 3:
                                        case 6:
                                                if (ite->GrType != 0)
                                                        PDF_Gradient(ite);
                                                else
                                                {
                                                        if (ite->Pcolor != "None")
                                                        {
                                                                PutPage(SetClipPath(ite));
                                                                PutPage("h\nf*\n");
                                                        }
                                                }
                                                if ((ite->Pcolor2 != "None") || (ite->NamedLStyle != ""))
                                                {
                                                        if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0))
                                                        {
                                                                PutPage(SetClipPath(ite));
                                                                PutPage("h\nS\n");
                                                        }
                                                        else
                                                        {
                                                                multiLine ml = doc->MLineStyles[ite->NamedLStyle];
                                                                for (int it = ml.size()-1; it > -1; it--)
                                                                {
                                                                        PutPage(setStrokeMulti(&ml[it]));
                                                                        PutPage(SetClipPath(ite));
                                                                        PutPage("h\nS\n");
                                                                }
                                                        }
                                                }
                                                break;
                                        case 7:
                                                if (((ite->PoLine.size() < 5) && ((ite->PoLine.point(0) != ite->PoLine.point(1)) || (ite->PoLine.point(2) != ite->PoLine.point(3)))) ||
                                                    (ite->PoLine.size() > 4))
                                                {
                                                        if (ite->GrType != 0)
                                                                PDF_Gradient(ite);
                                                        else
                                                        {
                                                                if (ite->Pcolor != "None")
                                                                {
                                                                        PutPage(SetClipPath(ite));
                                                                        PutPage("h\nf*\n");
                                                                }
                                                        }
                                                }
                                                if ((ite->Pcolor2 != "None") || (ite->NamedLStyle != ""))
                                                {
                                                        if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0))
                                                        {
                                                                PutPage(SetClipPath(ite, false));
                                                                PutPage("S\n");
                                                        }
                                                        else
                                                        {
                                                                multiLine ml = doc->MLineStyles[ite->NamedLStyle];
                                                                for (int it = ml.size()-1; it > -1; it--)
                                                                {
                                                                        PutPage(setStrokeMulti(&ml[it]));
                                                                        PutPage(SetClipPath(ite, false));
                                                                        PutPage("S\n");
                                                                }
                                                        }
                                                }
                                                break;
                                        case 8:
                                                if (ite->PoShow)
                                                {
                                                        if (ite->PoLine.size() > 3)
                                                        {
                                                                PutPage("q\n");
                                                                if ((ite->Pcolor2 != "None") || (ite->NamedLStyle != ""))
                                                                {
                                                                        if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0))
                                                                        {
                                                                                PutPage(SetClipPath(ite, false));
                                                                                PutPage("S\n");
                                                                        }
                                                                        else
                                                                        {
                                                                                multiLine ml = doc->MLineStyles[ite->NamedLStyle];
                                                                                for (int it = ml.size()-1;
                                                                                        it > -1; it--)
                                                                                        {
                                                                                        PutPage(setStrokeMulti(&ml[it]));
                                                                                        PutPage(SetClipPath(ite, false));
                                                                                        PutPage("S\n");
                                                                                        }
                                                                        }
                                                                }
                                                                PutPage("Q\n");
                                                        }
                                                }
                                                PutPage(setTextSt(ite, pag->PageNr));
                                                break;
                                        }
                                PutPage("Q\n");
                                StartObj(ObjCounter);
                                ObjCounter++;
                                PutDoc("<<\n/Type /XObject\n/Subtype /Form\n/FormType 1\n");
                                PutDoc("/BBox [ 0 0 "+FToStr(doc->PageB)+" "+FToStr(doc->PageH)+" ]\n");
                                PutDoc("/Resources << /ProcSet [/PDF /Text /ImageB /ImageC /ImageI]\n");
                                if (Seite.ImgObjects.count() != 0)
                                {
                                        PutDoc("/XObject <<\n");
                                        QMap<QString,int>::Iterator it;
                                        for (it = Seite.ImgObjects.begin(); it != Seite.ImgObjects.end(); ++it)
                                                PutDoc("/"+it.key()+" "+IToStr(it.data())+" 0 R\n");
                                        PutDoc(">>\n");
                                }
                                if (Seite.FObjects.count() != 0)
                                {
                                        PutDoc("/Font << \n");
                                        QMap<QString,int>::Iterator it2;
                                        for (it2 = Seite.FObjects.begin(); it2 != Seite.FObjects.end(); ++it2)
                                                PutDoc("/"+it2.key()+" "+IToStr(it2.data())+" 0 R\n");
                                        PutDoc(">>\n");
                                }
                                if (Shadings.count() != 0)
                                {
                                        PutDoc("/Shading << \n");
                                        QMap<QString,int>::Iterator it3;
                                        for (it3 = Shadings.begin(); it3 != Shadings.end(); ++it3)
                                                PutDoc("/"+it3.key()+" "+IToStr(it3.data())+" 0 R\n");
                                        PutDoc(">>\n");
                                }
                                if (Transpar.count() != 0)
                                {
                                        PutDoc("/ExtGState << \n");
                                        QMap<QString,int>::Iterator it3t;
                                        for (it3t = Transpar.begin(); it3t != Transpar.end(); ++it3t)
                                                PutDoc("/"+it3t.key()+" "+IToStr(it3t.data())+" 0 R\n");
                                        PutDoc(">>\n");
                                }
                                if (ICCProfiles.count() != 0)
                                {
                                        PutDoc("/ColorSpace << \n");
                                        QMap<QString,ICCD>::Iterator it3c;
                                        for (it3c = ICCProfiles.begin(); it3c != ICCProfiles.end(); ++it3c)
                                                PutDoc("/"+it3c.data().ResName+" "+IToStr(it3c.data().ResNum)+" 0 R\n");
                                        PutDoc(">>\n");
                                }
                                PutDoc(">>\n");
                                if ((Options->Compress) && (CompAvail))
                                        Inhalt = CompressStr(&Inhalt);
                                PutDoc("/Length "+IToStr(Inhalt.length()+1));
                                if ((Options->Compress) && (CompAvail))
                                        PutDoc("\n/Filter /FlateDecode");
                                PutDoc(" >>\nstream\n"+EncStream(&Inhalt, ObjCounter-1)+"\nendstream\nendobj\n");
                                QString name = pag->PageNam.simplifyWhiteSpace().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "" ) + IToStr(ite->ItemNr);
                                Seite.XObjects[name] = ObjCounter-1;
                                }
                        }
                Lnr++;
        }
}

void PDFlib::PDF_Begin_Page(Page* pag, QPixmap pm)
{
        QString tmp;
        ActPageP = pag;
        Inhalt = "";
        Seite.AObjects.clear();
        if (Options->Thumbnails)
        {
                QImage img = pm.convertToImage();
                QString im = ImageToTxt(&img);
                if ((Options->Compress) && (CompAvail))
                        im = CompressStr(&im);
                StartObj(ObjCounter);
                PutDoc("<<\n/Width "+IToStr(img.width())+"\n");
                PutDoc("/Height "+IToStr(img.height())+"\n");
                PutDoc("/ColorSpace /DeviceRGB\n/BitsPerComponent 8\n");
                PutDoc("/Length "+IToStr(im.length()+1)+"\n");
                if ((Options->Compress) && (CompAvail))
                        PutDoc("/Filter /FlateDecode\n");
                PutDoc(">>\nstream\n"+EncStream(&im, ObjCounter)+"\nendstream\nendobj\n");
                Seite.Thumb = ObjCounter;
                ObjCounter++;
        }
}

void PDFlib::PDF_End_Page()
{
        uint PgNr = ActPageP->PageNr;
        Seite.ObjNum = ObjCounter;
        WritePDFStream(&Inhalt);
        int Gobj;
        if ((Options->Version >= 14) && (Transpar.count() != 0))
        {
                StartObj(ObjCounter);
                Gobj = ObjCounter;
                ObjCounter++;
                PutDoc("<< /S /Transparency\n");
                if (Options->UseRGB)
                        PutDoc("/CS /DeviceRGB\n");
                else
//              {
//                      if (Options.isGrayscale)
//                              PutDoc("/CS /DeviceGray\n");
//                      else
#ifdef HAVE_CMS
                        {
                                if ((CMSuse) && (Options->UseProfiles))
                                        PutDoc("/CS "+ICCProfiles[Options->SolidProf].ICCArray+"\n");
                                else
#endif
                                        PutDoc("/CS /DeviceCMYK\n");
// #ifdef HAVE_CMS
//                      }
// #endif
                }
                PutDoc(">>\nendobj\n");
        }
        StartObj(ObjCounter);
        PutDoc("<<\n/Type /Page\n/Parent 4 0 R\n");
        PutDoc("/MediaBox [0 0 "+FToStr(doc->PageB)+" "+FToStr(doc->PageH)+"]\n");
        PutDoc("/TrimBox ["+FToStr(Options->BleedLeft)+" "+FToStr(Options->BleedBottom)+
                " "+FToStr(doc->PageB-Options->BleedRight)+" "+FToStr(doc->PageH-Options->BleedTop)+"]\n");
        PutDoc("/Rotate "+IToStr(Options->RotateDeg)+"\n");
        PutDoc("/Contents "+IToStr(Seite.ObjNum)+" 0 R\n");
        if ((Options->Version >= 14) && (Transpar.count() != 0))
                PutDoc("/Group "+QString::number(Gobj)+" 0 R\n");
        if (Options->Thumbnails)
                PutDoc("/Thumb "+IToStr(Seite.Thumb)+" 0 R\n");
        if (Seite.AObjects.count() != 0)
        {
                PutDoc("/Annots [ ");
                for (uint b = 0; b < Seite.AObjects.count(); ++b)
                        PutDoc(IToStr(Seite.AObjects[b])+" 0 R ");
                PutDoc("]\n");
        }
        if (Options->PresentMode)
        {
                PutDoc("/Dur "+IToStr(Options->PresentVals[PgNr].AnzeigeLen)+"\n");
                if (Options->PresentVals[PgNr].Effekt != 0)
                {
                        PutDoc("/Trans << /Type /Trans\n");
                        PutDoc("/D "+IToStr(Options->PresentVals[PgNr].EffektLen)+"\n");
                        switch (Options->PresentVals[PgNr].Effekt)
                        {
                                case 1:
                                        PutDoc("/S /Blinds\n");
                                        PutDoc(Options->PresentVals[PgNr].Dm == 0 ? "/Dm /H\n" : "/Dm /V\n");
                                        break;
                                case 2:
                                        PutDoc("/S /Box\n");
                                        PutDoc(Options->PresentVals[PgNr].M == 0 ? "/M /I\n" : "/M /O\n");
                                        break;
                                case 3:
                                        PutDoc("/S /Dissolve\n");
                                        break;
                                case 4:
                                        PutDoc("/S /Glitter\n");
                                        PutDoc("/Di ");
                                        switch (Options->PresentVals[PgNr].Di)
                                        {
                                                case 0:
                                                        PutDoc("0");
                                                        break;
                                                case 1:
                                                        PutDoc("270");
                                                        break;
                                                case 4:
                                                        PutDoc("315");
                                                        break;
                                                default:
                                                        PutDoc("0");
                                                        break;
                                        }
                                        PutDoc("\n");
                                        break;
                                case 5:
                                        PutDoc("/S /Split\n");
                                        PutDoc(Options->PresentVals[PgNr].Dm == 0 ? "/Dm /H\n" : "/Dm /V\n");
                                        PutDoc(Options->PresentVals[PgNr].M == 0 ? "/M /I\n" : "/M /O\n");
                                        break;
                                case 6:
                                        PutDoc("/S /Wipe\n");
                                        PutDoc("/Di ");
                                        switch (Options->PresentVals[PgNr].Di)
                                        {
                                                case 0:
                                                        PutDoc("0");
                                                        break;
                                                case 1:
                                                        PutDoc("270");
                                                        break;
                                                case 2:
                                                        PutDoc("90");
                                                        break;
                                                case 3:
                                                        PutDoc("180");
                                                        break;
                                                default:
                                                        PutDoc("0");
                                                        break;
                                        }
                                        PutDoc("\n");
                                        break;
                        }
                        PutDoc(">>\n");
                }
        }
        PutDoc(">>\nendobj\n");
        PageTree.Count++;
        PageTree.Kids.append(ObjCounter);
        ObjCounter++;
}

void PDFlib::PDF_ProcessPage(Page* pag, uint PNr, bool clip)
{
        QString tmp;
        ActPageP = pag;
        PageItem* ite;
        int Lnr = 0;
        struct Layer ll;
        ll.Drucken = false;
        ll.LNr = 0;
        if (Options->UseLPI)
                PutPage("/"+HTName+" gs\n");
        if ( (Options->MirrorH) && (pag->MPageNam != "") )
                PutPage("-1 0 0 1 "+FToStr(doc->PageB)+" 0 cm\n");
        if ( (Options->MirrorV) && (pag->MPageNam != "") )
                PutPage("1 0 0 -1 0 "+FToStr(doc->PageH)+" cm\n");
        if (clip)
        {
                PutPage(FToStr(pag->Margins.Left) + " " + FToStr(pag->Margins.Bottom) + " m\n");
                PutPage(FToStr(doc->PageB - pag->Margins.Right) + " " + FToStr(pag->Margins.Bottom) + " l\n");
                PutPage(FToStr(doc->PageB - pag->Margins.Right) + " " + FToStr(doc->PageH - pag->Margins.Top) + " l\n");
                PutPage(FToStr(pag->Margins.Left) + " " + FToStr(doc->PageH - pag->Margins.Top) + " l h W n\n");
        }
        else
                PutPage("0 0 "+FToStr(doc->PageB)+" "+FToStr(doc->PageH)+" re W n\n");
        if (pag->MPageNam != "")
        {
                Page* mPage = view->MasterPages.at(view->MasterNames[view->Pages.at(PNr)->MPageNam]);
                if (mPage->Items.count() != 0)
                {
                        if (!Options->MirrorH)
                                PutPage("1 0 0 1 0 0 cm\n");
                        for (uint lam = 0; lam < doc->Layers.count(); ++lam)
                        {
                                Level2Layer(doc, &ll, Lnr);
                                Lnr++;
                                if (ll.Drucken)
                                {
                                        for (uint am = 0; am < mPage->Items.count(); ++am)
                                        {
                                                ite = mPage->Items.at(am);
                                                if ((ite->LayerNr != ll.LNr) || (!ite->isPrintable))
                                                        continue;
                                                QString name = "/"+pag->MPageNam.simplifyWhiteSpace().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "" ) + IToStr(ite->ItemNr);
                                                if (ite->PType != 4)
                                                        PutPage(name+" Do\n");
                                                else
                                                {
                                                        QWidget* Opa;
                                                        Page* Opa2;
                                                        Opa = ite->Parent;
                                                        Opa2 = ite->OwnPage;
                                                        ite->Parent = pag;
                                                        ite->OwnPage = pag;
                                                        double savScale = doc->Scale;
                                                        doc->Scale = 1.0;
                                                        doc->RePos = true;
                                                        QPixmap pgPix(10, 10);
                                                        QRect rd = QRect(0,0,9,9);
                                                        ScPainter *painter = new ScPainter(&pgPix, pgPix.width(), pgPix.height());
                                                        if (painter!=NULL)
                                                        {
                                                                ite->DrawObj(painter, rd);
                                                                doc->RePos = false;
                                                                doc->Scale = savScale;
                                                                delete painter;
                                                        }
                                                        ite->Parent = Opa;
                                                        ite->OwnPage = Opa2;
                                                        PutPage("q\n");
                                                        if (((ite->Transparency != 0) || (ite->TranspStroke != 0)) && (Options->Version == 14))
                                                                PDF_Transparenz(ite);
                                                        if (ite->Pcolor != "None")
                                                                PutPage(putColor(ite->Pcolor, ite->Shade, true));
                                                        if (ite->Pcolor2 != "None")
                                                                PutPage(putColor(ite->Pcolor2, ite->Shade2, false));
                                                        Inhalt += FToStr(fabs(ite->Pwidth))+" w\n";
                                                        if (ite->DashValues.count() != 0)
                                                        {
                                                                PutPage("[ ");
                                                                QValueList<double>::iterator it;
                                                                for ( it = ite->DashValues.begin(); it != ite->DashValues.end(); ++it )
                                                                {
                                                                        int da = static_cast<int>(*it);
                                                                        if (da != 0)
                                                                                PutPage(IToStr(da)+" ");
                                                                }
                                                                PutPage("] "+IToStr(static_cast<int>(ite->DashOffset))+" d\n");
                                                        }
                                                        else
                                                        {
                                                                QString Dt = FToStr(QMAX(2*fabs(ite->Pwidth), 1));
                                                                QString Da = FToStr(QMAX(6*fabs(ite->Pwidth), 1));
                                                                switch (ite->PLineArt)
                                                                {
                                                                        case Qt::SolidLine:
                                                                                PutPage("[] 0 d\n");
                                                                                break;
                                                                        case Qt::DashLine:
                                                                                PutPage("["+Da+" "+Dt+"] 0 d\n");
                                                                                break;
                                                                        case Qt::DotLine:
                                                                                PutPage("["+Dt+"] 0 d\n");
                                                                                break;
                                                                        case Qt::DashDotLine:
                                                                                PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n");
                                                                                break;
                                                                        case Qt::DashDotDotLine:
                                                                                PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n");
                                                                                break;
                                                                        default:
                                                                                PutPage("[] 0 d\n");
                                                                                break;
                                                                }
                                                        }
                                                        PutPage("2 J\n");
                                                        switch (ite->PLineJoin)
                                                        {
                                                                case Qt::MiterJoin:
                                                                        PutPage("0 j\n");
                                                                        break;
                                                                case Qt::BevelJoin:
                                                                        PutPage("2 j\n");
                                                                        break;
                                                                case Qt::RoundJoin:
                                                                        PutPage("1 j\n");
                                                                        break;
                                                                default:
                                                                        PutPage("0 j\n");
                                                                        break;
                                                        }
                                                        PutPage("1 0 0 1 "+FToStr(ite->Xpos)+" "+FToStr(doc->PageH - ite->Ypos)+" cm\n");
                                                        if (ite->Rot != 0)
                                                        {
                                                                double sr = sin(-ite->Rot* 3.1415927 / 180.0);
                                                                double cr = cos(-ite->Rot* 3.1415927 / 180.0);
                                                                if ((cr * cr) < 0.000001)
                                                                        cr = 0;
                                                                if ((sr * sr) < 0.000001)
                                                                        sr = 0;
                                                                PutPage(FToStr(cr)+" "+FToStr(sr)+" "+FToStr(-sr)+" "+FToStr(cr)+" 0 0 cm\n");
                                                        }
                                                        if ((ite->Pcolor != "None") || (ite->GrType != 0))
                                                        {
                                                                if (ite->GrType != 0)
                                                                        PDF_Gradient(ite);
                                                                else
                                                                {
                                                                        PutPage(SetClipPath(ite));
                                                                        PutPage("h\nf*\n");
                                                                }
                                                        }
                                                        PutPage("q\n");
                                                        if ((ite->flippedH % 2) != 0)
                                                                PutPage("-1 0 0 1 "+FToStr(ite->Width)+" 0 cm\n");
                                                        if ((ite->flippedV % 2) != 0)
                                                                PutPage("1 0 0 -1 0 "+FToStr(-ite->Height)+" cm\n");
                                                        PutPage(setTextSt(ite, PNr));
                                                        PutPage("Q\n");
                                                        if (((ite->Pcolor2 != "None") || (ite->NamedLStyle != "")) && (!ite->isTableItem))
                                                        {
                                                                if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0))
                                                                {
                                                                        PutPage(SetClipPath(ite));
                                                                        PutPage("h\nS\n");
                                                                }
                                                                else
                                                                {
                                                                        multiLine ml = doc->MLineStyles[ite->NamedLStyle];
                                                                        for (int it = ml.size()-1; it > -1; it--)
                                                                        {
                                                                                PutPage(setStrokeMulti(&ml[it]));
                                                                                PutPage(SetClipPath(ite));
                                                                                PutPage("h\nS\n");
                                                                        }
                                                                }
                                                        }
                                                        PutPage("Q\n");
                                                }
                                        }
                                        for (uint am = 0; am < mPage->Items.count(); ++am)
                                        {
                                                ite = mPage->Items.at(am);
                                                if ((ite->LayerNr != ll.LNr) || (!ite->isPrintable))
                                                        continue;
                                                PutPage("q\n");
                                                if (((ite->Transparency != 0) || (ite->TranspStroke != 0)) && (Options->Version == 14))
                                                        PDF_Transparenz(ite);
                                                if (ite->Pcolor != "None")
                                                        PutPage(putColor(ite->Pcolor, ite->Shade, true));
                                                if (ite->Pcolor2 != "None")
                                                        PutPage(putColor(ite->Pcolor2, ite->Shade2, false));
                                                Inhalt += FToStr(fabs(ite->Pwidth))+" w\n";
                                                if (ite->DashValues.count() != 0)
                                                {
                                                        PutPage("[ ");
                                                        QValueList<double>::iterator it;
                                                        for ( it = ite->DashValues.begin(); it != ite->DashValues.end(); ++it )
                                                        {
                                                                int da = static_cast<int>(*it);
                                                                if (da != 0)
                                                                        PutPage(IToStr(da)+" ");
                                                        }
                                                        PutPage("] "+IToStr(static_cast<int>(ite->DashOffset))+" d\n");
                                                }
                                                else
                                                {
                                                        QString Dt = FToStr(QMAX(2*fabs(ite->Pwidth), 1));
                                                        QString Da = FToStr(QMAX(6*fabs(ite->Pwidth), 1));
                                                        switch (ite->PLineArt)
                                                        {
                                                                case Qt::SolidLine:
                                                                        PutPage("[] 0 d\n");
                                                                        break;
                                                                case Qt::DashLine:
                                                                        PutPage("["+Da+" "+Dt+"] 0 d\n");
                                                                        break;
                                                                case Qt::DotLine:
                                                                        PutPage("["+Dt+"] 0 d\n");
                                                                        break;
                                                                case Qt::DashDotLine:
                                                                        PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n");
                                                                        break;
                                                                case Qt::DashDotDotLine:
                                                                        PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n");
                                                                        break;
                                                                default:
                                                                        PutPage("[] 0 d\n");
                                                                        break;
                                                        }
                                                }
                                                PutPage("2 J\n");
                                                switch (ite->PLineJoin)
                                                {
                                                        case Qt::MiterJoin:
                                                                PutPage("0 j\n");
                                                                break;
                                                        case Qt::BevelJoin:
                                                                PutPage("2 j\n");
                                                                break;
                                                        case Qt::RoundJoin:
                                                                PutPage("1 j\n");
                                                                break;
                                                        default:
                                                                PutPage("0 j\n");
                                                                break;
                                                }
                                                PutPage("1 0 0 1 "+FToStr(ite->Xpos)+" "+FToStr(doc->PageH - ite->Ypos)+" cm\n");
                                                if (ite->Rot != 0)
                                                {
                                                        double sr = sin(-ite->Rot* 3.1415927 / 180.0);
                                                        double cr = cos(-ite->Rot* 3.1415927 / 180.0);
                                                        if ((cr * cr) < 0.000001)
                                                                cr = 0;
                                                        if ((sr * sr) < 0.000001)
                                                                sr = 0;
                                                        PutPage(FToStr(cr)+" "+FToStr(sr)+" "+FToStr(-sr)+" "+FToStr(cr)+ " 0 0 cm\n");
                                                }
                                                if (ite->isTableItem)
                                                {
                                                        if ((ite->TopLine) || (ite->RightLine) || (ite->BottomLine) || (ite->LeftLine))
                                                        {
                                                                if (ite->TopLine)
                                                                {
                                                                        PutPage("0 0 m\n");
                                                                        PutPage(FToStr(ite->Width)+" 0 l\n");
                                                                }
                                                                if (ite->RightLine)
                                                                {
                                                                        PutPage(FToStr(ite->Width)+" 0 m\n");
                                                                        PutPage(FToStr(ite->Width)+" "+FToStr(-ite->Height)+" l\n");
                                                                }
                                                                if (ite->BottomLine)
                                                                {
                                                                        PutPage("0 "+FToStr(-ite->Height)+" m\n");
                                                                        PutPage(FToStr(ite->Width)+" "+FToStr(-ite->Height)+" l\n");
                                                                }
                                                                if (ite->LeftLine)
                                                                {
                                                                        PutPage("0 0 m\n");
                                                                        PutPage("0 "+FToStr(-ite->Height)+" l\n");
                                                                }
                                                                PutPage("S\n");
                                                        }
                                                }
                                                PutPage("Q\n");
                                        }
                                }
                        }
                }
        }
        ll.Drucken = false;
        ll.LNr = 0;
        Lnr = 0;
        for (uint la = 0; la < doc->Layers.count(); ++la)
        {
                Level2Layer(doc, &ll, Lnr);
                if (ll.Drucken)
                {
                        for (uint a = 0; a < ActPageP->Items.count(); ++a)
                        {
                                ite = ActPageP->Items.at(a);
                                if (ite->LayerNr != ll.LNr)
                                        continue;
                                PutPage("q\n");
                                if (((ite->Transparency != 0) || (ite->TranspStroke != 0)) && (Options->Version == 14))
                                        PDF_Transparenz(ite);
                                if ((ite->isBookmark) && (Options->Bookmarks))
                                        PDF_Bookmark(ite->BMnr, doc->PageH - ite->Ypos);
                                if (!ite->isPrintable || ((ite->PType == 4) && (pag->PageNam != "")))
                                {
                                        PutPage("Q\n");
                                        continue;
                                }
                                if (ite->Pcolor != "None")
                                        PutPage(putColor(ite->Pcolor, ite->Shade, true));
                                if (ite->Pcolor2 != "None")
                                        PutPage(putColor(ite->Pcolor2, ite->Shade2, false));
                                Inhalt += FToStr(fabs(ite->Pwidth))+" w\n";
                                if (ite->DashValues.count() != 0)
                                {
                                        PutPage("[ ");
                                        QValueList<double>::iterator it;
                                        for ( it = ite->DashValues.begin(); it != ite->DashValues.end(); ++it )
                                        {
                                                int da = static_cast<int>(*it);
                                                if (da != 0)
                                                        PutPage(IToStr(da)+" ");
                                        }
                                        PutPage("] "+IToStr(static_cast<int>(ite->DashOffset))+" d\n");
                                }
                                else
                                {
                                        QString Dt = FToStr(QMAX(2*fabs(ite->Pwidth), 1));
                                        QString Da = FToStr(QMAX(6*fabs(ite->Pwidth), 1));
                                        switch (ite->PLineArt)
                                        {
                                                case Qt::SolidLine:
                                                        PutPage("[] 0 d\n");
                                                        break;
                                                case Qt::DashLine:
                                                        PutPage("["+Da+" "+Dt+"] 0 d\n");
                                                        break;
                                                case Qt::DotLine:
                                                        PutPage("["+Dt+"] 0 d\n");
                                                        break;
                                                case Qt::DashDotLine:
                                                        PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n");
                                                        break;
                                                case Qt::DashDotDotLine:
                                                        PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n");
                                                        break;
                                                default:
                                                        PutPage("[] 0 d\n");
                                                        break;
                                        }
                                }
                                switch (ite->PLineEnd)
                                {
                                        case Qt::FlatCap:
                                                PutPage("0 J\n");
                                                break;
                                        case Qt::SquareCap:
                                                PutPage("2 J\n");
                                                break;
                                        case Qt::RoundCap:
                                                PutPage("1 J\n");
                                                break;
                                        default:
                                                PutPage("0 J\n");
                                                break;
                                }
                                switch (ite->PLineJoin)
                                {
                                        case Qt::MiterJoin:
                                                PutPage("0 j\n");
                                                break;
                                        case Qt::BevelJoin:
                                                PutPage("2 j\n");
                                                break;
                                        case Qt::RoundJoin:
                                                PutPage("1 j\n");
                                                break;
                                        default:
                                                PutPage("0 j\n");
                                                break;
                                }
                                PutPage("1 0 0 1 "+FToStr(ite->Xpos)+" "+FToStr(doc->PageH - ite->Ypos)+" cm\n");
                                if (ite->Rot != 0)
                                {
                                        double sr = sin(-ite->Rot* 3.1415927 / 180.0);
                                        double cr = cos(-ite->Rot* 3.1415927 / 180.0);
                                        if ((cr * cr) < 0.000001)
                                                cr = 0;
                                        if ((sr * sr) < 0.000001)
                                                sr = 0;
                                        PutPage(FToStr(cr)+" "+FToStr(sr)+" "+FToStr(-sr)+" "+FToStr(cr)+" 0 0 cm\n");
                                }
                                switch (ite->PType)
                                {
                                        case 2:
                                                if ((ite->Pcolor != "None") || (ite->GrType != 0))
                                                {
                                                        if (ite->GrType != 0)
                                                                PDF_Gradient(ite);
                                                        else
                                                        {
                                                                PutPage(SetClipPath(ite));
                                                                PutPage("h\nf*\n");
                                                        }
                                                }
                                                PutPage("q\n");
                                                PutPage(SetClipPath(ite));
                                                PutPage("h\nW*\nn\n");
                                                if ((ite->flippedH % 2) != 0)
                                                        PutPage("-1 0 0 1 "+FToStr(ite->Width)+" 0 cm\n");
                                                if ((ite->flippedV % 2) != 0)
                                                        PutPage("1 0 0 -1 0 "+FToStr(-ite->Height)+" cm\n");
                                                if ((ite->PicAvail) && (ite->Pfile != ""))
                                                        PDF_Image(ite->InvPict, ite->Pfile, ite->LocalScX,
                                                                         ite->LocalScY, ite->LocalX, -ite->LocalY,
                                                                         false, ite->IProfile, ite->UseEmbedded,
                                                                          ite->IRender);
                                                PutPage("Q\n");
                                                if (((ite->Pcolor2 != "None") || (ite->NamedLStyle != "")) && (!ite->isTableItem))
                                                {
                                                        if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0))
                                                        {
                                                                PutPage(SetClipPath(ite));
                                                                PutPage("h\nS\n");
                                                        }
                                                        else
                                                        {
                                                                multiLine ml = doc->MLineStyles[ite->NamedLStyle];
                                                                for (int it = ml.size()-1; it > -1; it--)
                                                                {
                                                                        PutPage(setStrokeMulti(&ml[it]));
                                                                        PutPage(SetClipPath(ite));
                                                                        PutPage("h\nS\n");
                                                                }
                                                        }
                                                }
                                                break;
                                        case 4:
                                                if ((ite->isAnnotation) && (Options->Version != 12))
                                                {
                                                        PDF_Annotation(ite);
                                                        break;
                                                        }
                                                if ((ite->Pcolor != "None") || (ite->GrType != 0))
                                                {
                                                        if (ite->GrType != 0)
                                                                PDF_Gradient(ite);
                                                        else
                                                        {
                                                                PutPage(SetClipPath(ite));
                                                                PutPage("h\nf*\n");
                                                        }
                                                }
                                                PutPage("q\n");
                                                if ((ite->flippedH % 2) != 0)
                                                        PutPage("-1 0 0 1 "+FToStr(ite->Width)+" 0 cm\n");
                                                if ((ite->flippedV % 2) != 0)
                                                        PutPage("1 0 0 -1 0 "+FToStr(-ite->Height)+" cm\n");
                                                PutPage(setTextSt(ite, PNr));
                                                PutPage("Q\n");
                                                PutPage("q\n");
                                                if (((ite->Pcolor2 != "None") || (ite->NamedLStyle != "")) && (!ite->isTableItem))
                                                {
                                                        if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0))
                                                        {
                                                                PutPage(SetClipPath(ite));
                                                                PutPage("h\nS\n");
                                                        }
                                                        else
                                                        {
                                                                multiLine ml = doc->MLineStyles[ite->NamedLStyle];
                                                                for (int it = ml.size()-1; it > -1; it--)
                                                                {
                                                                        PutPage(setStrokeMulti(&ml[it]));
                                                                        PutPage(SetClipPath(ite));
                                                                        PutPage("h\nS\n");
                                                                }
                                                        }
                                                }
                                                PutPage("Q\n");
                                                break;
                                        case 5:
                                                if (ite->NamedLStyle == "")
                                                {
                                                        PutPage("0 0 m\n");
                                                        PutPage(FToStr(ite->Width)+" "+FToStr(-ite->Height)+" l\n");
                                                        PutPage("S\n");
                                                }
                                                else
                                                {
                                                        multiLine ml = doc->MLineStyles[ite->NamedLStyle];
                                                        for (int it = ml.size()-1; it > -1; it--)
                                                        {
                                                                PutPage(setStrokeMulti(&ml[it]));
                                                                PutPage("0 0 m\n");
                                                                PutPage(FToStr(ite->Width)+" "+FToStr(-ite->Height)+" l\n");
                                                                PutPage("S\n");
                                                        }
                                                }
                                                break;
                                        case 1:
                                        case 3:
                                        case 6:
                                                if (ite->GrType != 0)
                                                        PDF_Gradient(ite);
                                                else
                                                {
                                                        if (ite->Pcolor != "None")
                                                        {
                                                                PutPage(SetClipPath(ite));
                                                                PutPage("h\nf*\n");
                                                        }
                                                }
                                                if ((ite->Pcolor2 != "None") || (ite->NamedLStyle != ""))
                                                {
                                                        if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0))
                                                        {
                                                                PutPage(SetClipPath(ite));
                                                                PutPage("h\nS\n");
                                                        }
                                                        else
                                                        {
                                                                multiLine ml = doc->MLineStyles[ite->NamedLStyle];
                                                                for (int it = ml.size()-1; it > -1; it--)
                                                                {
                                                                        PutPage(setStrokeMulti(&ml[it]));
                                                                        PutPage(SetClipPath(ite));
                                                                        PutPage("h\nS\n");
                                                                }
                                                        }
                                                }
                                                break;
                                        case 7:
                                                if (((ite->PoLine.size() < 5) && ((ite->PoLine.point(0) != ite->PoLine.point(1)) || (ite->PoLine.point(2) != ite->PoLine.point(3)))) ||
                                                    (ite->PoLine.size() > 4))
                                                {
                                                        if (ite->GrType != 0)
                                                                PDF_Gradient(ite);
                                                        else
                                                        {
                                                                if (ite->Pcolor != "None")
                                                                {
                                                                        PutPage(SetClipPath(ite));
                                                                        PutPage("h\nf*\n");
                                                                }
                                                        }
                                                }
                                                if ((ite->Pcolor2 != "None") || (ite->NamedLStyle != ""))
                                                {
                                                        if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0))
                                                        {
                                                                PutPage(SetClipPath(ite, false));
                                                                PutPage("S\n");
                                                        }
                                                        else
                                                        {
                                                                multiLine ml = doc->MLineStyles[ite->NamedLStyle];
                                                                for (int it = ml.size()-1; it > -1; it--)
                                                                {
                                                                        PutPage(setStrokeMulti(&ml[it]));
                                                                        PutPage(SetClipPath(ite, false));
                                                                        PutPage("S\n");
                                                                }
                                                        }
                                                }
                                                break;
                                        case 8:
                                                if (ite->PoShow)
                                                {
                                                        if (ite->PoLine.size() > 3)
                                                        {
                                                                PutPage("q\n");
                                                                if ((ite->Pcolor2 != "None") || (ite->NamedLStyle != ""))
                                                                {
                                                                        if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0))
                                                                        {
                                                                                PutPage(SetClipPath(ite, false));
                                                                                PutPage("S\n");
                                                                        }
                                                                        else
                                                                        {
                                                                                multiLine ml = doc->MLineStyles[ite->NamedLStyle];
                                                                                for (int it = ml.size()-1;
                                                                                        it > -1; it--)
                                                                                        {
                                                                                        PutPage(setStrokeMulti(&ml[it]));
                                                                                        PutPage(SetClipPath(ite, false));
                                                                                        PutPage("S\n");
                                                                                        }
                                                                        }
                                                                }
                                                                PutPage("Q\n");
                                                        }
                                                }
                                                PutPage(setTextSt(ite, PNr));
                                                break;
                                        }
                                PutPage("Q\n");
                                }
                                for (uint a = 0; a < ActPageP->Items.count(); ++a)
                                {
                                        ite = ActPageP->Items.at(a);
                                        if (ite->LayerNr != ll.LNr)
                                                continue;
                                        if (!ite->isTableItem)
                                                continue;
                                        PutPage("q\n");
                                        if (((ite->Transparency != 0) || (ite->TranspStroke != 0)) &&
                                                (Options->Version == 14))
                                                PDF_Transparenz(ite);
                                        if (!ite->isPrintable)
                                        {
                                                PutPage("Q\n");
                                                continue;
                                        }
                                        if (ite->Pcolor != "None")
                                                PutPage(putColor(ite->Pcolor, ite->Shade, true));
                                        if (ite->Pcolor2 != "None")
                                                PutPage(putColor(ite->Pcolor2, ite->Shade2, false));
                                        Inhalt += FToStr(fabs(ite->Pwidth))+" w\n";
                                        if (ite->DashValues.count() != 0)
                                        {
                                                PutPage("[ ");
                                                QValueList<double>::iterator it;
                                                for ( it = ite->DashValues.begin(); it != ite->DashValues.end(); ++it )
                                                {
                                                        int da = static_cast<int>(*it);
                                                        if (da != 0)
                                                                PutPage(IToStr(da)+" ");
                                                }
                                                PutPage("] "+IToStr(static_cast<int>(ite->DashOffset))+" d\n");
                                        }
                                        else
                                        {
                                                QString Dt = FToStr(QMAX(2*fabs(ite->Pwidth), 1));
                                                QString Da = FToStr(QMAX(6*fabs(ite->Pwidth), 1));
                                                switch (ite->PLineArt)
                                                {
                                                        case Qt::SolidLine:
                                                                PutPage("[] 0 d\n");
                                                                break;
                                                        case Qt::DashLine:
                                                                PutPage("["+Da+" "+Dt+"] 0 d\n");
                                                                break;
                                                        case Qt::DotLine:
                                                                PutPage("["+Dt+"] 0 d\n");
                                                                break;
                                                        case Qt::DashDotLine:
                                                                PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n");
                                                                break;
                                                        case Qt::DashDotDotLine:
                                                                PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n");
                                                                break;
                                                        default:
                                                                PutPage("[] 0 d\n");
                                                                break;
                                                }
                                        }
                                        PutPage("2 J\n");
                                        switch (ite->PLineJoin)
                                        {
                                                case Qt::MiterJoin:
                                                        PutPage("0 j\n");
                                                        break;
                                                case Qt::BevelJoin:
                                                        PutPage("2 j\n");
                                                        break;
                                                case Qt::RoundJoin:
                                                        PutPage("1 j\n");
                                                        break;
                                                default:
                                                        PutPage("0 j\n");
                                                        break;
                                        }
                                        PutPage("1 0 0 1 "+FToStr(ite->Xpos)+" "+FToStr(doc->PageH - ite->Ypos)+" cm\n");
                                        if (ite->Rot != 0)
                                        {
                                                double sr = sin(-ite->Rot* 3.1415927 / 180.0);
                                                double cr = cos(-ite->Rot* 3.1415927 / 180.0);
                                                if ((cr * cr) < 0.000001)
                                                        cr = 0;
                                                if ((sr * sr) < 0.000001)
                                                        sr = 0;
                                                PutPage(FToStr(cr)+" "+FToStr(sr)+" "+FToStr(-sr)+" "+FToStr(cr)+ " 0 0 cm\n");
                                        }
                                        if (ite->isTableItem)
                                        {
                                                if ((ite->TopLine) || (ite->RightLine) || (ite->BottomLine) || (ite->LeftLine))
                                                {
                                                        if (ite->TopLine)
                                                        {
                                                                PutPage("0 0 m\n");
                                                                PutPage(FToStr(ite->Width)+" 0 l\n");
                                                        }
                                                        if (ite->RightLine)
                                                        {
                                                                PutPage(FToStr(ite->Width)+" 0 m\n");
                                                                PutPage(FToStr(ite->Width)+" "+FToStr(-ite->Height)+" l\n");
                                                        }
                                                        if (ite->BottomLine)
                                                        {
                                                                PutPage("0 "+FToStr(-ite->Height)+" m\n");
                                                                PutPage(FToStr(ite->Width)+" "+FToStr(-ite->Height)+" l\n");
                                                        }
                                                        if (ite->LeftLine)
                                                        {
                                                                PutPage("0 0 m\n");
                                                                PutPage("0 "+FToStr(-ite->Height)+" l\n");
                                                        }
                                                        PutPage("S\n");
                                                }
                                        }
                                        PutPage("Q\n");
                                }
                        }
                Lnr++;
        }
}

QString PDFlib::setStrokeMulti(struct singleLine *sl)
{
        QString tmp = "";
        tmp += putColor(sl->Color, sl->Shade, false);
        tmp += FToStr(sl->Width)+" w\n";
        QString Dt = FToStr(QMAX(2*sl->Width, 1));
        QString Da = FToStr(QMAX(6*sl->Width, 1));
        switch (static_cast<PenStyle>(sl->Dash))
        {
                case Qt::SolidLine:
                        tmp += "[] 0 d\n";
                        break;
                case Qt::DashLine:
                        tmp += "["+Da+" "+Dt+"] 0 d\n";
                        break;
                case Qt::DotLine:
                        tmp += "["+Dt+"] 0 d\n";
                        break;
                case Qt::DashDotLine:
                        tmp += "["+Da+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n";
                        break;
                case Qt::DashDotDotLine:
                        tmp += "["+Da+" "+Dt+" "+Dt+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n";
                        break;
                default:
                        tmp += "[] 0 d\n";
                        break;
                }
        switch (static_cast<PenCapStyle>(sl->LineEnd))
        {
                case Qt::FlatCap:
                        tmp += "0 J\n";
                        break;
                case Qt::SquareCap:
                        tmp += "2 J\n";
                        break;
                case Qt::RoundCap:
                        tmp += "1 J\n";
                        break;
                default:
                        tmp += "0 J\n";
                        break;
        }
        switch (static_cast<PenJoinStyle>(sl->LineJoin))
        {
                case Qt::MiterJoin:
                        tmp += "0 j\n";
                        break;
                case Qt::BevelJoin:
                        tmp += "2 j\n";
                        break;
                case Qt::RoundJoin:
                        tmp += "1 j\n";
                        break;
                default:
                        tmp += "0 j\n";
                        break;
        }
        return tmp;
}

QString PDFlib::setTextSt(PageItem *ite, uint PNr)
{
        struct Pti *hl;
        QString tmp = "";
        QString tmp2 = "";
        QString FillColor = "";
        QString StrokeColor = "";
        if (ite->PType == 4)
                tmp += "BT\n";
        for (uint d = 0; d < ite->MaxChars; ++d)
        {
                hl = ite->Ptext.at(d);
                if ((hl->ch == QChar(13)) || (hl->ch == QChar(10)) || (hl->ch == QChar(9)) || (hl->ch == QChar(28)))
                        continue;
                if (hl->cstyle & 256)
                        continue;
                if (ite->PType == 8)
                {
                        tmp += "q\n";
                        QWMatrix trafo = QWMatrix( 1, 0, 0, -1, -hl->PRot, 0 );
                        trafo *= QWMatrix( hl->PtransX, -hl->PtransY, -hl->PtransY, -hl->PtransX, hl->xp, -hl->yp );
                        tmp += FToStr(trafo.m11())+" "+FToStr(trafo.m12())+" "+FToStr(trafo.m21())+" "+FToStr(trafo.m22())+" "+FToStr(trafo.dx())+" "+FToStr(trafo.dy())+" cm\n";
                        if (ite->BaseOffs != 0)
                                tmp += "1 0 0 1 0 "+FToStr( -ite->BaseOffs)+" cm\n";
                        tmp += "BT\n";
                }
                else
                {
                        if (hl->yp == 0)
                                continue;
                }
                int tsz = hl->csize;
                QString chx = hl->ch;
                if (hl->ch == QChar(29))
                        chx = " ";
                if (hl->ch == QChar(0xA0))
                        chx = " ";
                if (hl->ch == QChar(30))
                {
                        uint zae = 0;
                        uint za2 = d;
                        do
                        {
                                if (za2 == 0)
                                        break;
                                za2--;
                        }
                        while (ite->Ptext.at(za2)->ch == QChar(30));
                        if (ite->Ptext.at(za2)->ch != QChar(30))
                                za2++;
                        while (ite->Ptext.at(za2+zae)->ch == QChar(30))
                        {
                                zae++;
                                if (za2+zae == ite->MaxChars)
                                        break;
                        }
                        QString out="%1";
                        QString out2;
                        out2 = out.arg(PNr+doc->FirstPnum, -zae);
                        chx = out2.mid(d-za2, 1);
                }
                uint cc = chx[0].unicode();
                uint idx = 0;
                if (GlyphsIdxOfFont[hl->cfont].contains(cc))
                        idx = GlyphsIdxOfFont[hl->cfont][cc].Code;
                uint idx1 = (idx >> 8) & 0xFF;
                if (hl->cstyle & 64)
                {
                        if (chx.upper() != chx)
                        {
                                tsz = hl->csize * doc->VKapit / 100;
                                chx = chx.upper();
                        }
                }
                if ((hl->cstyle & 1) || (hl->cstyle & 2))
                        tsz = hl->csize * doc->VHochSc / 100;
                if (hl->cstroke != "None")
                {
                        StrokeColor = "";
                        StrokeColor += putColor(hl->cstroke, hl->cshade2, false);
                }
                if (hl->ccolor != "None")
                {
                        FillColor = "";
                        FillColor += putColor(hl->ccolor, hl->cshade, true);
                }
                if (((*doc->AllFonts)[hl->cfont]->isOTF) || (!(*doc->AllFonts)[hl->cfont]->HasNames) || ((*doc->AllFonts)[hl->cfont]->Subset) || (Options->SubsetList.contains(hl->cfont)))
                {
                        uint chr = chx[0].unicode();
                        if (((*doc->AllFonts)[hl->cfont]->CharWidth.contains(chr)) && (chr != 32))
                        {
                                if ((hl->cstroke != "None") && (hl->cstyle & 4))
                                {
                                        tmp2 += FToStr(QMAX((*doc->AllFonts)[hl->cfont]->strokeWidth * tsz / 20.0, 10) / tsz)+" w\n[] 0 d\n0 J\n0 j\n";
                                        tmp2 += StrokeColor;
                                }
                                if (hl->ccolor != "None")
                                        tmp2 += FillColor;
                                tmp2 += "q\n";
                                if (ite->PType == 8)
                                {
                                        QWMatrix trafo = QWMatrix( 1, 0, 0, -1, -hl->PRot, 0 );
                                        trafo *= QWMatrix( hl->PtransX, -hl->PtransY, -hl->PtransY, -hl->PtransX, hl->xp, -hl->yp );
                                        tmp2 += FToStr(trafo.m11())+" "+FToStr(trafo.m12())+" "+FToStr(trafo.m21())+" "+FToStr(trafo.m22())+" "+FToStr(trafo.dx())+" "+FToStr(trafo.dy())+" cm\n";
                                }
                                if (ite->PType != 8)
                                {
                                        if (ite->Reverse)
                                        {
                                                double wid = Cwidth(doc, hl->cfont, chx, hl->csize) * (hl->cscale / 100.0);
                                                tmp2 += "1 0 0 1 "+FToStr(hl->xp)+" "+FToStr((hl->yp - (tsz / 10.0)) * -1)+" cm\n";
                                                tmp2 += "-1 0 0 1 0 0 cm\n";
                                                tmp2 += "1 0 0 1 "+FToStr(-wid)+" 0 cm\n";
                                                tmp2 += FToStr(tsz / 10.0)+" 0 0 "+FToStr(tsz / 10.0)+" 0 0 cm\n";
                                        }
                                        else
                                                tmp2 += FToStr(tsz / 10.0)+" 0 0 "+FToStr(tsz / 10.0)+" "+FToStr(hl->xp)+" "+FToStr((hl->yp - (tsz / 10.0)) * -1)+" cm\n";
                                }
                                else
                                {
                                        if (ite->BaseOffs != 0)
                                                tmp2 += "1 0 0 1 0 "+FToStr( -ite->BaseOffs)+" cm\n";
                                        tmp2 += FToStr(tsz / 10.0)+" 0 0 "+FToStr(tsz / 10.0)+" 0 "+FToStr(((tsz / 10.0)))+" cm\n";
                                }
                                tmp2 += FToStr(QMIN(QMAX(hl->cscale, 25), 400) / 100.0)+" 0 0 1 0 0 cm\n";
                                tmp2 += "/"+(*doc->AllFonts)[hl->cfont]->RealName().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "" )+IToStr(chr)+" Do\n";
                                if (hl->cstyle & 4)
                                {
                                        FPointArray gly = (*doc->AllFonts)[hl->cfont]->GlyphArray[chr].Outlines.copy();
                                        QWMatrix mat;
                                        mat.scale(0.1, 0.1);
                                        gly.map(mat);
                                        bool nPath = true;
                                        FPoint np;
                                        if (gly.size() > 3)
                                        {
                                                for (uint poi=0; poi<gly.size()-3; poi += 4)
                                                {
                                                        if (gly.point(poi).x() > 900000)
                                                        {
                                                                tmp2 += "h\n";
                                                                nPath = true;
                                                                continue;
                                                        }
                                                        if (nPath)
                                                        {
                                                                np = gly.point(poi);
                                                                tmp2 += FToStr(np.x())+" "+FToStr(-np.y())+" m\n";
                                                                nPath = false;
                                                        }
                                                        np = gly.point(poi+1);
                                                        tmp2 += FToStr(np.x())+" "+FToStr(-np.y())+" ";
                                                        np = gly.point(poi+3);
                                                        tmp2 += FToStr(np.x())+" "+FToStr(-np.y())+" ";
                                                        np = gly.point(poi+2);
                                                        tmp2 += FToStr(np.x())+" "+FToStr(-np.y())+" c\n";
                                                }
                                        }
                                        tmp2 += "s\n";
                                }
                                if (hl->cstyle & 512)
                                {
                                        int chs = hl->csize;
                                        double wtr = Cwidth(doc, hl->cfont, chx, chs) * (hl->cscale / 100.0);
                                        tmp2 += "1 0 0 1 "+FToStr(wtr / (tsz / 10.0))+" 0 cm\n";
                                        chx = "-";
                                        chr = chx[0].unicode();
                                        FPointArray gly = (*doc->AllFonts)[hl->cfont]->GlyphArray[chr].Outlines.copy();
                                        QWMatrix mat;
                                        mat.scale(0.1, 0.1);
                                        gly.map(mat);
                                        bool nPath = true;
                                        FPoint np;
                                        if (gly.size() > 3)
                                        {
                                                for (uint poi=0; poi<gly.size()-3; poi += 4)
                                                {
                                                        if (gly.point(poi).x() > 900000)
                                                        {
                                                                tmp2 += "h\n";
                                                                nPath = true;
                                                                continue;
                                                        }
                                                        if (nPath)
                                                        {
                                                                np = gly.point(poi);
                                                                tmp2 += FToStr(np.x())+" "+FToStr(-np.y())+" m\n";
                                                                nPath = false;
                                                        }
                                                        np = gly.point(poi+1);
                                                        tmp2 += FToStr(np.x())+" "+FToStr(-np.y())+" ";
                                                        np = gly.point(poi+3);
                                                        tmp2 += FToStr(np.x())+" "+FToStr(-np.y())+" ";
                                                        np = gly.point(poi+2);
                                                        tmp2 += FToStr(np.x())+" "+FToStr(-np.y())+" c\n";
                                                }
                                        }
                                        tmp2 += "f*\n";
                                }
                                tmp2 += "Q\n";
                        }
                }
                else
                {
                        cc = chx[0].unicode();
                        idx = 0;
                        if (GlyphsIdxOfFont[hl->cfont].contains(cc))
                                idx = GlyphsIdxOfFont[hl->cfont][cc].Code;
                        idx1 = (idx >> 8) & 0xFF;
                        tmp += UsedFontsP[hl->cfont]+"S"+IToStr(idx1)+" "+FToStr(tsz / 10.0)+" Tf\n";
                        if (hl->cstroke != "None")
                        {
                                tmp += StrokeColor;
                                if ((hl->cstyle & 8) || (hl->cstyle & 16))
                                        tmp2 += StrokeColor;
                        }
                        if (hl->ccolor != "None")
                        {
                                tmp += FillColor;
                                if ((hl->cstyle & 8) || (hl->cstyle & 16))
                                        tmp2 += FillColor;
                        }
                        if (hl->cstyle & 4)
                                tmp += FToStr((*doc->AllFonts)[hl->cfont]->strokeWidth * tsz / 20.0) + (hl->ccolor != "None" ? " w 2 Tr\n" : " w 1 Tr\n");
                        else
                                tmp += "0 Tr\n";
                        if (ite->PType != 8)
                        {
                                if (ite->Reverse)
                                {
                                        int chs = hl->csize;
                                        double wtr;
                                        if (d < ite->MaxChars-1)
                                        {
                                                QString ctx = ite->Ptext.at(d+1)->ch;
                                                if (ctx == QChar(29))
                                                        ctx = " ";
                                                if (ctx == QChar(0xA0))
                                                        ctx = " ";
                                                wtr = Cwidth(doc, hl->cfont, chx, chs, ctx) * (hl->cscale / 100.0);
                                        }
                                        else
                                                wtr = Cwidth(doc, hl->cfont, chx, chs) * (hl->cscale / 100.0);
                                        tmp += "-1 0 0 1 "+FToStr(hl->xp+wtr)+" "+FToStr(-hl->yp)+" Tm\n";
                                }
                                else
                                        tmp += "1 0 0 1 "+FToStr(hl->xp)+" "+FToStr(-hl->yp)+" Tm\n";
                        }
                        else
                                tmp += "1 0 0 1 0 0 Tm\n";
                        tmp += IToStr(QMIN(QMAX(hl->cscale, 25), 400)) + " Tz\n";
                        uchar idx2 = idx & 0xFF;
                        tmp += "<"+QString(toHex(idx2))+"> Tj\n";
                        if (ite->PType != 8)
                        {
                                if (hl->cstyle & 512)
                                {
                                        int chs = hl->csize;
                                        double wtr = Cwidth(doc, hl->cfont, chx, chs) * (hl->cscale / 100.0);
                                        tmp += "1 0 0 1 "+FToStr(hl->xp+wtr)+" "+FToStr(-hl->yp)+" Tm\n";
                                        chx = "-";
                                        cc = chx[0].unicode();
                                        idx = 0;
                                        if (GlyphsIdxOfFont[hl->cfont].contains(cc))
                                                idx = GlyphsIdxOfFont[hl->cfont][cc].Code;
                                        idx1 = (idx >> 8) & 0xFF;
                                        tmp += UsedFontsP[hl->cfont]+"S"+IToStr(idx1)+" "+FToStr(tsz / 10.0)+" Tf\n";
                                        idx2 = idx & 0xFF;
                                        tmp += "<"+QString(toHex(idx2))+"> Tj\n";
                                }
                        }
                }
                if (ite->PType != 8)
                {
                        if ((hl->cstyle & 8) && (chx != QChar(13)))
                        {
                                double Ulen = Cwidth(doc, hl->cfont, chx, hl->csize) * (hl->cscale / 100.0);
                                double Upos = (*doc->AllFonts)[hl->cfont]->underline_pos * (tsz / 10.0);
                                double Uwid = QMAX((*doc->AllFonts)[hl->cfont]->strokeWidth * (tsz / 10.0), 1);
                                double kern;
                                if (hl->cstyle & 1024)
                                        kern = 0;
                                else
                                        kern = hl->cextra;
                                if (hl->ccolor != "None")
                                        tmp2 += putColor(hl->ccolor, hl->cshade, false);
                                tmp2 += FToStr(Uwid)+" w\n";
                                tmp2 += FToStr(hl->xp-kern)+" "+FToStr(-hl->yp+Upos)+" m\n";
                                tmp2 += FToStr(hl->xp+Ulen)+" "+FToStr(-hl->yp+Upos)+" l\n";
                                tmp2 += "S\n";
                        }
                        if ((hl->cstyle & 16) && (chx != QChar(13)))
                        {
                                double Ulen = Cwidth(doc, hl->cfont, chx, hl->csize) * (hl->cscale / 100.0);
                                double Upos = (*doc->AllFonts)[hl->cfont]->strikeout_pos * (tsz / 10.0);
                                double Uwid = QMAX((*doc->AllFonts)[hl->cfont]->strokeWidth * (tsz / 10.0), 1);
                                double kern;
                                if (hl->cstyle & 1024)
                                        kern = 0;
                                else
                                        kern = hl->cextra;
                                if (hl->ccolor != "None")
                                        tmp2 += putColor(hl->ccolor, hl->cshade, false);
                                tmp2 += FToStr(Uwid)+" w\n";
                                tmp2 += FToStr(hl->xp-kern)+" "+FToStr(-hl->yp+Upos)+" m\n";
                                tmp2 += FToStr(hl->xp+Ulen)+" "+FToStr(-hl->yp+Upos)+" l\n";
                                tmp2 += "S\n";
                        }
                }
                if (ite->PType == 8)
                {
                        tmp += "ET\nQ\n"+tmp2;
                        tmp2 = "";
                }
        }
        if (ite->PType == 4)
                tmp += "ET\n"+tmp2;
        return tmp;
}

QString PDFlib::SetFarbeGrad(QString farbe, int Shade)
{
        QString tmp;
        CMYKColor tmpC;
        int h, s, v, k, sneu;
        tmpC = doc->PageColors[farbe];
        tmpC.getCMYK(&h, &s, &v, &k);
        QColor tmpR;
        if (Options->UseRGB)
        {
                tmpC.getRawRGBColor(&h, &s, &v);
                tmpR.setRgb(h, s, v);
                if ((h == s) && (s == v))
                {
                        tmpR.hsv(&h, &s, &v);
                        sneu = 255 - ((255 - v) * Shade / 100);
                        tmpR.setHsv(h, s, sneu);
                }
                else
                {
                        tmpR.hsv(&h, &s, &v);
                        sneu = s * Shade / 100;
                        tmpR.setHsv(h, sneu, v);
                }
                tmpR.rgb(&h, &s, &v);
                tmp = FToStr(h / 255.0)+" "+FToStr(s / 255.0)+" "+FToStr(v / 255.0);
        }
        else
        {
#ifdef HAVE_CMS
                if ((CMSuse) && (Options->UseProfiles))
                {
                        if (Options->SComp == 3)
                        {
                                tmpC.getRawRGBColor(&h, &s, &v);
                                tmpR.setRgb(h, s, v);
                                if ((h == s) && (s == v))
                                {
                                        tmpR.hsv(&h, &s, &v);
                                        sneu = 255 - ((255 - v) * Shade / 100);
                                        tmpR.setHsv(h, s, sneu);
                                }
                                else
                                {
                                        tmpR.hsv(&h, &s, &v);
                                        sneu = s * Shade / 100;
                                        tmpR.setHsv(h, sneu, v);
                                }
                                tmpR.rgb(&h, &s, &v);
                                tmp = FToStr(h / 255.0)+" "+FToStr(s / 255.0)+" "+FToStr(v / 255.0);
                        }
                        else
                        {
                                if (view->Prefs->GCRMode)
                                        tmpC.applyGCR();
                                tmpC.getCMYK(&h, &s, &v, &k);
                                h = h * Shade / 100;
                                s = s * Shade / 100;
                                v = v * Shade / 100;
                                k = k * Shade / 100;
                                tmp = FToStr(h / 255.0)+" "+FToStr(s / 255.0)+" "+FToStr(v / 255.0)+" "+FToStr(k / 255.0);
                        }
                }
                else
                {
#endif
                        if (view->Prefs->GCRMode)
                                tmpC.applyGCR();
                        tmpC.getCMYK(&h, &s, &v, &k);
                        h = h * Shade / 100;
                        s = s * Shade / 100;
                        v = v * Shade / 100;
                        k = k * Shade / 100;
                        tmp = FToStr(h / 255.0)+" "+FToStr(s / 255.0)+" "+FToStr(v / 255.0)+" "+FToStr(k / 255.0);
                }
#ifdef HAVE_CMS
        }
#endif
        return tmp;
}

QString PDFlib::SetFarbe(QString farbe, int Shade)
{
        QString tmp;
        CMYKColor tmpC;
        int h, s, v, k, sneu;
        tmpC = doc->PageColors[farbe];
        bool isGray = false;
        tmpC.getCMYK(&h, &s, &v, &k);
        if ((h == s) && (s == v))
                isGray = true;
        QColor tmpR;
        if (Options->UseRGB)
        {
                tmpC.getRawRGBColor(&h, &s, &v);
                tmpR.setRgb(h, s, v);
                if ((h == s) && (s == v))
                {
                        tmpR.hsv(&h, &s, &v);
                        sneu = 255 - ((255 - v) * Shade / 100);
                        tmpR.setHsv(h, s, sneu);
                }
                else
                {
                        tmpR.hsv(&h, &s, &v);
                        sneu = s * Shade / 100;
                        tmpR.setHsv(h, sneu, v);
                }
                tmpR.rgb(&h, &s, &v);
                tmp = FToStr(h / 255.0)+" "+FToStr(s / 255.0)+" "+FToStr(v / 255.0);
        }
        else
        {
#ifdef HAVE_CMS
                if ((CMSuse) && (Options->UseProfiles) && (!isGray))
                {
                        if (Options->SComp == 3)
                        {
                                tmpC.getRawRGBColor(&h, &s, &v);
                                tmpR.setRgb(h, s, v);
                                if ((h == s) && (s == v))
                                {
                                        tmpR.hsv(&h, &s, &v);
                                        sneu = 255 - ((255 - v) * Shade / 100);
                                        tmpR.setHsv(h, s, sneu);
                                }
                                else
                                {
                                        tmpR.hsv(&h, &s, &v);
                                        sneu = s * Shade / 100;
                                        tmpR.setHsv(h, sneu, v);
                                }
                                tmpR.rgb(&h, &s, &v);
                                tmp = FToStr(h / 255.0)+" "+FToStr(s / 255.0)+" "+FToStr(v / 255.0);
                        }
                        else
                        {
                                if (view->Prefs->GCRMode)
                                        tmpC.applyGCR();
                                tmpC.getCMYK(&h, &s, &v, &k);
                                h = h * Shade / 100;
                                s = s * Shade / 100;
                                v = v * Shade / 100;
                                k = k * Shade / 100;
                                tmp = FToStr(h / 255.0)+" "+FToStr(s / 255.0)+" "+FToStr(v / 255.0)+" "+FToStr(k / 255.0);
                        }
                }
                else
                {
#endif
                        if (view->Prefs->GCRMode)
                                tmpC.applyGCR();
                        tmpC.getCMYK(&h, &s, &v, &k);
                        h = h * Shade / 100;
                        s = s * Shade / 100;
                        v = v * Shade / 100;
                        k = k * Shade / 100;
                        tmp = FToStr(h / 255.0)+" "+FToStr(s / 255.0)+" "+FToStr(v / 255.0)+" "+FToStr(k / 255.0);
                }
#ifdef HAVE_CMS
        }
#endif
        return tmp;
}

QString PDFlib::putColor(QString farbe, int Shade, bool fill)
{
        CMYKColor tmpC;
        int h, s, v, k;
        bool isGray = false;
        tmpC = doc->PageColors[farbe];
        tmpC.getCMYK(&h, &s, &v, &k);
        if ((h == s) && (s == v))
                isGray = true;
        QString colString = SetFarbe(farbe, Shade);
        QString retSt;
        if (Options->UseRGB)
        {
                if (fill)
                        retSt = colString+" rg\n";
                else
                        retSt = colString+" RG\n";
        }
        else
        {
#ifdef HAVE_CMS
                if ((CMSuse) && (Options->UseProfiles) && (!isGray))
                {
                        QString tmp[] = {"/Perceptual", "/RelativeColorimetric", "/Saturation", "/AbsoluteColorimetric"};
                        retSt = tmp[Options->Intent]+" ri\n";
                        retSt += "/"+ICCProfiles[Options->SolidProf].ResName+" cs\n";
                        retSt += "/"+ICCProfiles[Options->SolidProf].ResName+" CS\n";
                        if (fill)
                                retSt += colString+" scn\n";
                        else
                                retSt += colString+" SCN\n";
                }
                else
                {
#endif
                        if (fill)
                                retSt = colString+" k\n";
                        else
                                retSt = colString+" K\n";
                }
#ifdef HAVE_CMS
        }
#endif
        return retSt;
}

QString PDFlib::SetClipPath(PageItem *ite, bool poly)
{
        bool nPath = true;
        QString tmp = "";
        FPoint np;
        if (ite->PoLine.size() > 3)
        {
                for (uint poi=0; poi<ite->PoLine.size()-3; poi += 4)
                {
                        if (ite->PoLine.point(poi).x() > 900000)
                        {
                                if (poly)
                                        tmp += "h\n";
                                nPath = true;
                                continue;
                        }
                        if (nPath)
                        {
                                np = ite->PoLine.point(poi);
                                tmp += FToStr(np.x())+" "+FToStr(-np.y())+" m\n";
                                nPath = false;
                        }
                        np = ite->PoLine.point(poi+1);
                        tmp += FToStr(np.x())+" "+FToStr(-np.y())+" ";
                        np = ite->PoLine.point(poi+3);
                        tmp += FToStr(np.x())+" "+FToStr(-np.y())+" ";
                        np = ite->PoLine.point(poi+2);
                        tmp += FToStr(np.x())+" "+FToStr(-np.y())+" c\n";
                }
        }
        return tmp;
}

void PDFlib::PDF_Transparenz(PageItem *b)
{
        StartObj(ObjCounter);
        QString ShName = ResNam+IToStr(ResCount);
        Transpar[ShName] = ObjCounter;
        ResCount++;
        ObjCounter++;
        PutDoc("<< /Type /ExtGState\n");
        PutDoc("/CA "+FToStr(1.0 - b->TranspStroke)+"\n");
        PutDoc("/ca "+FToStr(1.0 - b->Transparency)+"\n");
        PutDoc("/BM /Normal\n>>\nendobj\n");
        PutPage("/"+ShName+" gs\n");
}

void PDFlib::PDF_Gradient(PageItem *b)
{
        double w = b->Width;
        double h = -b->Height;
        double w2 = w / 2.0;
        double h2 = h / 2.0;
        double StartX, StartY, EndX, EndY;
        QValueList<double> StopVec;
        QValueList<double> TransVec;
        QStringList Gcolors;
        QPtrVector<VColorStop> cstops = b->fill_gradient.colorStops();
        switch (b->GrType)
        {
                case 1:
        &nb