Thema: ProgEdit 2.04 (Kanallisteneditor)

[Judgeman]

So, will ich doch mal versuchen, mein Durcheinander etwas zu ordnen:

Also:1. in ProgEdit habe ich im Channel Manager die Datei channels.dat aus meiner ProgDVB4.84.4 geöffnet.

2. Habe dann im Channel Tree Manager-Modus die ChannelList4.tree geöffnet. Die ChannelList4.tree habe ich irgendwann mal in ProgDVB8.84.x erstellt.
Das ist eine "Favoriten" channeltree.

3. Habe dann Sender aus dem linken Fenster (channels.dat) in das rechte Fenster (channelList4.tree) mittels Pfeilikon kopiert.

4. Dann Vers.Converter und die 4 bestätigt.

5. Abgespeichert unter gleichen Namen, also die channelList4.tree überschrieben.

6. Die channels.dat gespeichert (überschrieben)

7. Auch mit Overwrite Name die ChannelNameTable.txt überschrieben, was aber scheinbar nicht geklappt hat, denn sie behält die alten Eigenschaften - Datum und Größe.

Dann ProgDVB4.84.4 gestartet.

Korrekt gestartet und die Favoritenliste (channelList4) sah so aus wie in ProgEdit erstellt.
- Das war das Juchey oder so.
beim umschalten auf einen anderen Sender hat er sich verschluckt und es sah jetzt so aus:

Favoriten.jpg

Die leeren Ordnersymbole sind nur im Favoritenordner, alle anderen sind o.k.

So, hoffe nur, dass das mit dem Bildchen klappt. In der Vorschau ist jedenfalls Nichts zu sehen.




MfG  Judgeman

[camel]

So, will ich doch mal versuchen, mein Durcheinander etwas zu ordnen:

Also:1. in ProgEdit habe ich im Channel Manager die Datei channels.dat aus meiner ProgDVB4.84.4 geöffnet.

2. Habe dann im Channel Tree Manager-Modus die ChannelList4.tree geöffnet. Die ChannelList4.tree habe ich irgendwann mal in ProgDVB8.84.x erstellt.
Das ist eine "Favoriten" channeltree.

3. Habe dann Sender aus dem linken Fenster (channels.dat) in das rechte Fenster (channelList4.tree) mittels Pfeilikon kopiert.

4. Dann Vers.Converter und die 4 bestätigt.

5. Abgespeichert unter gleichen Namen, also die channelList4.tree überschrieben.

6. Die channels.dat gespeichert (überschrieben)

7. Auch mit Overwrite Name die ChannelNameTable.txt überschrieben, was aber scheinbar nicht geklappt hat, denn sie behält die alten Eigenschaften - Datum und Größe.

Dann ProgDVB4.84.4 gestartet.

Korrekt gestartet und die Favoritenliste (channelList4) sah so aus wie in ProgEdit erstellt.
- Das war das Juchey oder so.
beim umschalten auf einen anderen Sender hat er sich verschluckt und es sah jetzt so aus:

Favoriten.jpg

Die leeren Ordnersymbole sind nur im Favoritenordner, alle anderen sind o.k.

So, hoffe nur, dass das mit dem Bildchen klappt. In der Vorschau ist jedenfalls Nichts zu sehen.




MfG  Judgeman

zu punkt 7:
es gibt in der channel.dat inmmer wieder channels welche heissen : "nonames" oder so ähnlich....
mit der "overwrite names" funktion wird die "ChannelNameTable.txt" geladen und wenn sender vorhanden sind, welche in dieser datei sind, dann werden sie in der "channel.dat" überschrieben.
danach natürlich sichern ....
die datei: "ChannelNameTable.txt" wird/kann von ProgEdit nicht geändert werden.
Diese datei kommt standardmässig von ProgDVB daher bzw. liegt dem Programm bei.
 

zu deiner favoriten liste - wäre interessant wenn ich deine original (erstellt von ProgDVB) channellist4.tree bekommen könnte, dann könnte ich binär gucken warum es sich bei dir komisch verhält ...... wenn geht schick diese datei zu mir

cu camel

[Judgeman]

zu deiner favoriten liste - wäre interessant wenn ich deine original (erstellt von ProgDVB) channellist4.tree bekommen könnte, dann könnte ich binär gucken warum es sich bei dir komisch verhält ...... wenn geht schick diese datei zu mir

cu camel

Das wird erst Morgen. Die original von ProgDVB erstellte existiert ja auch nicht mehr. Aber da setze ich schnell eine neue auf.
Hatte die 4.84 auch bloß zum Experimentieren ausgesucht. Wollte sowieso mal die 5.12 aufspielen.
Und kann da mal mit ProgEdit versuchen.

Schicke Dir also morgen mal die jetzige channelList4.tree (die mit den leeren Ordnern) und eine neue in ProgDVB erstellte.

Gruß Judgeman

[bj4u]

camel, ich hab dein ProgEdit mal mit in mein Projekt einbezogen und liefer es mit aus.
Es ist kein Editor, es dient zum Anlegen von geplanten Aufnahmen mit ProgDVB und ich nutze ProgEdit um an die Channelnamen der ProgDVB-Favoriten zu kommen.
Kannst ja bei Interesse nen Blick drauf werfen:
http://progdvbtimer.sourceforge.net

Ich hätte Interesse mal einen Blick auf die ProgEdit-Sourcen zu werfen, da ich mich mal selbst versucht hab das Auslesen der Channel aus den Hex-Files zu implementieren... vergebens.
Kannst mir die bitte mailen?

Danke

[camel]

camel, ich hab dein ProgEdit mal mit in mein Projekt einbezogen und liefer es mit aus.
Es ist kein Editor, es dient zum Anlegen von geplanten Aufnahmen mit ProgDVB und ich nutze ProgEdit um an die Channelnamen der ProgDVB-Favoriten zu kommen.
Kannst ja bei Interesse nen Blick drauf werfen:
http://progdvbtimer.sourceforge.net

Ich hätte Interesse mal einen Blick auf die ProgEdit-Sourcen zu werfen, da ich mich mal selbst versucht hab das Auslesen der Channel aus den Hex-Files zu implementieren... vergebens.
Kannst mir die bitte mailen?

Danke

ich kann dir eine abgespeckte source-version machen, die nur die listen ladet und daraus dann ein text file macht. - am besten du sagst mir - was du machen willst.
denke nicht dass das viel arbeit sein kann, und dann kannst leichter weiter basteln...
cu camel

[pimpi09]

Moin, kurze frage zu Progedit: in der version 2.04 gibt es ja die funktion eine senderliste für dvbdream zu exportieren. Allerdings bekomme ich jedesmal die meldung "File >C:\chlist.chl < Not supported!" egal wo oder wie ich es speichern will es klappt nicht.
Hat es schonmal jemand hinbekommen? Wäre ja sinnlos eine funktion zu haben die nicht funktioniert )

MfG

[camel]

Moin, kurze frage zu Progedit: in der version 2.04 gibt es ja die funktion eine senderliste für dvbdream zu exportieren. Allerdings bekomme ich jedesmal die meldung "File >C:\chlist.chl < Not supported!" egal wo oder wie ich es speichern will es klappt nicht.
Hat es schonmal jemand hinbekommen? Wäre ja sinnlos eine funktion zu haben die nicht funktioniert )

MfG

*GRINZ
deswegen sagt auch das programm dir : nicht unterstützt (im moment)
tjo - für dvbdream ist es geplant und habe es vergessen raus zu nehmen im menü.
ich bin dabei das zu implementieren (soweit ich luft habe + warte momentan auf diverse infos von denen damit ich weiter arbeiten kann.
momentan habe ich nur infos um die datei rein zu laden.
was aber klarerweise für mich wichtig ist: wenn dann muss import/export im dvbdream-format (chl) inkl. favoritenverwaltung (channellistree).
cu camel

[camel]

camel, ich hab dein ProgEdit mal mit in mein Projekt einbezogen und liefer es mit aus.
Es ist kein Editor, es dient zum Anlegen von geplanten Aufnahmen mit ProgDVB und ich nutze ProgEdit um an die Channelnamen der ProgDVB-Favoriten zu kommen.
Kannst ja bei Interesse nen Blick drauf werfen:
http://progdvbtimer.sourceforge.net

Ich hätte Interesse mal einen Blick auf die ProgEdit-Sourcen zu werfen, da ich mich mal selbst versucht hab das Auslesen der Channel aus den Hex-Files zu implementieren... vergebens.
Kannst mir die bitte mailen?

Danke

ich hab mnir mal dein project bisserl angeschaut.

wenn ich dich richtig verstehe, dann wär es schön für dich wenn ein kleiner programmteil aus der channel.dat die "caption" vom klanal ausliest ...
hier der source code teil für das auslesen der channel.dat:

(vbasic) musst halt noch für dich umsetzen.....
wunder dich nicht über meinen code:)



    Function OpenChannel() As Boolean
        Dim nFS As FileStream
        Dim buffer(3) As Byte
        Dim strbuffer(127) As Byte
        Dim i As Integer
        Dim c As Integer
        Dim struct_counter As Integer

        Try
            nFS = New FileStream(t_FileName.Text, FileMode.Open)
        Catch ex As Exception
            MsgBox("File not found or no full acces to this file!")
            Return False
            Exit Function
        End Try


        'Read Header
        nFS.Read(buffer, 0, 4)
        Header.m_ID = BitConverter.ToUInt32(buffer, 0)
        If Convert.ToInt32(Header.m_ID) <> &H22DFBC3B Then
            MsgBox("File has an error - Wrong or unknown header-ID in file!", MsgBoxStyle.Critical)
            Return False
            Exit Function
        End If

        'switch for doublewchannelchecking
        nothing_has_been_changed = False
        nFS.Read(buffer, 0, 4)
        Header.m_Version = BitConverter.ToUInt32(buffer, 0)
        nFS.Read(buffer, 0, 4)
        Header.m_HeaderSize = BitConverter.ToUInt32(buffer, 0)
        nFS.Read(buffer, 0, 4)
        Header.m_FileLength = BitConverter.ToUInt32(buffer, 0)
        nFS.Read(buffer, 0, 4)
        Header.m_ItemCount = BitConverter.ToUInt32(buffer, 0)


        ReDim Channel(Convert.ToInt32(Header.m_ItemCount))

        For c = 1 To Convert.ToInt32(Header.m_ItemCount)
            If nFS.Length = nFS.Position Then Exit For

            'struct_counter checker
            struct_counter = 0
            'Read Channel
            ReDim buffer(3)
            nFS.Read(buffer, 0, 2)
            struct_counter = struct_counter + 2
            Channel(c).m_StructSize = BitConverter.ToInt16(buffer, 0)

            'Read IDStruct
            nFS.Read(buffer, 0, 2)
            struct_counter = struct_counter + 2
            Channel(c).m_ID.m_TID = BitConverter.ToUInt32(buffer, 0)
            nFS.Read(buffer, 0, 2)
            struct_counter = struct_counter + 2
            Channel(c).m_ID.m_SID = BitConverter.ToUInt32(buffer, 0)
            nFS.Read(buffer, 0, 2)
            struct_counter = struct_counter + 2
            Channel(c).m_ID.m_SatPosition = BitConverter.ToUInt16(buffer, 0)
            nFS.Read(buffer, 0, 2)
            struct_counter = struct_counter + 2
            Channel(c).m_ID.m_LNB = BitConverter.ToUInt16(buffer, 0)
            nFS.Read(buffer, 0, 2)
            struct_counter = struct_counter + 2
            Channel(c).m_ID.m_NID = BitConverter.ToUInt32(buffer, 0)
            nFS.Read(buffer, 0, 2)
            struct_counter = struct_counter + 2
            Channel(c).m_ID.m_PCR = BitConverter.ToUInt16(buffer, 0)
            nFS.Read(buffer, 0, 4)
            struct_counter = struct_counter + 4
            Channel(c).m_ID.m_Freq = BitConverter.ToInt32(buffer, 0)

            nFS.Read(strbuffer, 0, 128)
            struct_counter = struct_counter + 128
            Channel(c).m_Caption = UnicodeLib.GetString(strbuffer)
            ReDim strbuffer(127)
            nFS.Read(strbuffer, 0, 64)
            struct_counter = struct_counter + 64
            Channel(c).m_ServiceLabel = UnicodeLib.GetString(strbuffer)
            nFS.Read(strbuffer, 0, 64)
            struct_counter = struct_counter + 64
            Channel(c).m_ProviderLabel = UnicodeLib.GetString(strbuffer)
            nFS.Read(strbuffer, 0, 64)
            struct_counter = struct_counter + 64
            Channel(c).m_NetworkName = UnicodeLib.GetString(strbuffer)
            ReDim buffer(3)
            nFS.Read(buffer, 0, 2)
            struct_counter = struct_counter + 2
            Channel(c).m_VideoPid = BitConverter.ToUInt16(buffer, 0)
            nFS.Read(buffer, 0, 2)
            struct_counter = struct_counter + 2
            Channel(c).m_TeletextPid = BitConverter.ToUInt16(buffer, 0)
            nFS.Read(buffer, 0, 2)
            struct_counter = struct_counter + 2
            Channel(c).m_ID.m_PCR = BitConverter.ToUInt16(buffer, 0)
            nFS.Read(buffer, 0, 2)
            struct_counter = struct_counter + 2
            Channel(c).m_PMT_PID = BitConverter.ToUInt16(buffer, 0)
            nFS.Read(buffer, 0, 2)
            struct_counter = struct_counter + 2
            Channel(c).m_ECM_PID = BitConverter.ToUInt16(buffer, 0)
            'das ist der crypted channel - SERVICE STATUS!!!! oder doch nicht ?
            ReDim buffer(3)
            nFS.Read(buffer, 0, 1)
            struct_counter = struct_counter + 1
            'Channel(c).m_bAdultChannel = BitConverter.ToBoolean(buffer, 0)
            'sadasd(Channel(c).m_Service_Type = buffer(0))
            Channel(c).m_Crypted = buffer(0)

            'Read LngStreams
            ReDim Channel(c).m_LngStreams(40)
            For i = 0 To 39
                If nFS.Length = nFS.Position Then Exit For
                nFS.Read(buffer, 0, 1)
                struct_counter = struct_counter + 1
                Channel(c).m_LngStreams(i).m_StreamType = Convert.ToChar(buffer(0))
                nFS.Read(buffer, 0, 1)
                struct_counter = struct_counter + 1
                Channel(c).m_LngStreams(i).m_SubType = buffer(0)
                nFS.Read(strbuffer, 0, 4)
                struct_counter = struct_counter + 4
                Channel(c).m_LngStreams(i).m_Language = UnicodeLib.GetString(strbuffer)
                ReDim buffer(3)
                nFS.Read(buffer, 0, 2)
                struct_counter = struct_counter + 2
                Channel(c).m_LngStreams(i).m_compostion_page_id_PageNumber = BitConverter.ToInt16(buffer, 0)
                nFS.Read(buffer, 0, 2)
                struct_counter = struct_counter + 2
                Channel(c).m_LngStreams(i).m_ancillary_page_id_MagazineNumber = BitConverter.ToInt16(buffer, 0)
                nFS.Read(buffer, 0, 2)
                struct_counter = struct_counter + 2
                Channel(c).m_LngStreams(i).m_Pid = BitConverter.ToInt16(buffer, 0)
                'ac3 auslesen
                'If Mid(Channel(c).m_LngStreams(i).m_Language, 2, 3) = "3ta" Then
                If Mid(Channel(c).m_LngStreams(i).m_Language, 2, 1) = "3" Then
                    Channel(c).m_AC3_PID = BitConverter.ToUInt16(buffer, 0)
                End If
            Next

            ReDim buffer(3)
            nFS.Read(buffer, 0, 1)
            struct_counter = struct_counter + 1
            Channel(c).m_LngStreamCount = buffer(0)
            nFS.Read(buffer, 0, 1)
            struct_counter = struct_counter + 1
            Channel(c).m_CurrentAudio = buffer(0)
            'error von Progdvb handling
            If Channel(c).m_CurrentAudio > 39 Then
                Channel(c).m_CurrentAudio = 0
            End If
            nFS.Read(buffer, 0, 1)
            struct_counter = struct_counter + 1
            Channel(c).m_CurrentSubtitle = Convert.ToChar(buffer(0))
            nFS.Read(buffer, 0, 1)
            struct_counter = struct_counter + 1
            Channel(c).m_ChannelMask = buffer(0)
            nFS.Read(buffer, 0, 4)
            struct_counter = struct_counter + 4
            Channel(c).m_SybleRate = BitConverter.ToInt32(buffer, 0)
            nFS.Read(buffer, 0, 4)
            struct_counter = struct_counter + 4
            Channel(c).m_Qam = BitConverter.ToUInt32(buffer, 0)
            nFS.Read(buffer, 0, 4)
            struct_counter = struct_counter + 4
            Channel(c).m_Polar = BitConverter.ToInt32(buffer, 0)
            ReDim buffer(3)
            nFS.Read(buffer, 0, 1)
            struct_counter = struct_counter + 1
            Channel(c).m_Quality = buffer(0)
            nFS.Read(buffer, 0, 1)
            struct_counter = struct_counter + 1
            Channel(c).m_Level = buffer(0)
            nFS.Read(buffer, 0, 4)
            struct_counter = struct_counter + 4
            Channel(c).m_ChannelNumber = BitConverter.ToInt32(buffer, 0)
            nFS.Read(buffer, 0, 4)
            struct_counter = struct_counter + 4
            Channel(c).m_IsCanUpdate = BitConverter.ToBoolean(buffer, 0)
            nFS.Read(buffer, 0, 4)
            struct_counter = struct_counter + 4
            Channel(c).m_Ratio = BitConverter.ToUInt32(buffer, 0)

            'ier sollte sein:
            'bool          m_AdultChannel;            
            'bool          m_bIsAvcVideo; bei alten versionen einfach leer
            'bool         m_bIsDVB_S2; bei alten versionen einfach leer
            'char         m_FEC; // auto,1/2,2/3,3/4,4/5,5/6,6/7,7/8,8/9,9/10
            ReDim buffer(3)
            nFS.Read(buffer, 0, 1)
            struct_counter = struct_counter + 1
            Channel(c).m_bAdultChannel = BitConverter.ToBoolean(buffer, 0)

            nFS.Read(buffer, 0, 1)
            struct_counter = struct_counter + 1
            Channel(c).m_bIsAvcVideo = BitConverter.ToBoolean(buffer, 0)

            'support für neue version 4.83-5.xx
            If Channel(c).m_StructSize >= 884 Then
                nFS.Read(buffer, 0, 2)
                struct_counter = struct_counter + 2
                Channel(c).m_UnusedFlags1 = BitConverter.ToUInt16(buffer, 0)
            Else
                ReDim buffer(3)
                nFS.Read(buffer, 0, 1)
                struct_counter = struct_counter + 1
                Channel(c).m_bIsDVB_S2 = BitConverter.ToBoolean(buffer, 0)

                nFS.Read(buffer, 0, 1)
                struct_counter = struct_counter + 1
                Channel(c).m_FEC = buffer(0)
            End If

            'ALT
            ''Channel(c).m_bAdultChannel = BitConverter.ToBoolean(buffer, 0)
            'nFS.Read(buffer, 0, 4)
            'struct_counter = struct_counter + 4
            ''Channel(c).m_bAdultChannel = BitConverter.ToBoolean(buffer, 0)
            'Channel(c).m_Ratio = BitConverter.ToUInt32(buffer, 0)

            'neu ab version 114 (> ProgDVB 4.7.x)
            If Channel(c).m_StructSize >= struct_counter + 4 Then
                nFS.Read(buffer, 0, 4)
                struct_counter = struct_counter + 4
                Channel(c).m_DeviceID_m_SubID = BitConverter.ToUInt32(buffer, 0)
            End If
            If Channel(c).m_StructSize >= struct_counter + 1 Then
                ReDim buffer(3)
                nFS.Read(buffer, 0, 1)
                struct_counter = struct_counter + 1
                Channel(c).m_DeviceID_m_Type = BitConverter.ToUInt16(buffer, 0)
            End If
            If Channel(c).m_StructSize >= struct_counter + 8 Then
                'strbuffer = Nothing
                ReDim strbuffer(127)
                nFS.Read(strbuffer, 0, 8)
                struct_counter = struct_counter + 8
                Channel(c).m_DeviceID_m_DllID = UnicodeLib.GetString(strbuffer)
            End If


            'support für neue version 4.83-5.xx - das wird verdreht mit oberen bereich
            If Channel(c).m_StructSize >= 884 Then
                ReDim buffer(3)
                nFS.Read(buffer, 0, 1)
                struct_counter = struct_counter + 1
                Channel(c).m_bIsDVB_S2 = BitConverter.ToBoolean(buffer, 0)

                nFS.Read(buffer, 0, 1)
                struct_counter = struct_counter + 1
                Channel(c).m_FEC = buffer(0)

                '4er array für die ip-adresse
                ReDim buffer(3)
                'ReDim Channel(c).m_MulticastGroup(4)
                'For i = 0 To 3
                nFS.Read(buffer, 0, 1)
                struct_counter = struct_counter + 1
                'Channel(c).m_MulticastGroup(i) = buffer(0)
                Channel(c).m_MulticastGroup1 = buffer(0)
                nFS.Read(buffer, 0, 1)
                struct_counter = struct_counter + 1
                Channel(c).m_MulticastGroup2 = buffer(0)
                nFS.Read(buffer, 0, 1)
                struct_counter = struct_counter + 1
                Channel(c).m_MulticastGroup3 = buffer(0)
                nFS.Read(buffer, 0, 1)
                struct_counter = struct_counter + 1
                Channel(c).m_MulticastGroup4 = buffer(0)

                nFS.Read(buffer, 0, 2)
                struct_counter = struct_counter + 2
                Channel(c).m_Port = BitConverter.ToUInt16(buffer, 0)
                'Next
            End If

            'only
            If Channel(c).m_StructSize > struct_counter Then
                ReDim Channel(c).m_Prog(Channel(c).m_StructSize - struct_counter)
                nFS.Read(Channel(c).m_Prog, 0, (Channel(c).m_StructSize - struct_counter))
                'nFS.Position = nFS.Position + (Channel(c).m_StructSize - struct_counter)
            End If

            'berechnen + checken/schreiben von m_ServiceStatus
            do_check_ServiceStatus(False, True, True, c)
            'Channel(c).m_ServiceStatus = buffer(0)


            If (c Mod 100 = 0) Or (c = Convert.ToInt32(Header.m_ItemCount)) Then
                lbl_Items.Text = c
                l_fileposition.Text = "/ " & nFS.Position
                l_fileposition.Refresh()
                lbl_Items.Refresh()
            End If
            If nFS.Length = nFS.Position Then Exit For
        Next

        lbl_Items.Text = c
        l_fileposition.Text = "/ " & nFS.Position
        l_fileposition.Refresh()
        lbl_Items.Refresh()

        'camel - korr 1.115 l_structure.Text = Channel(c).m_StructSize.ToString
        l_structure.Text = Channel(c).m_StructSize.ToString
        l_structure.Refresh()

        l_ID.Text = "ID:" & Header.m_ID.ToString
        l_structure.Text = Channel(1).m_StructSize.ToString
        l_Version.Text = Header.m_Version.ToString
        l_headersize.Text = Header.m_HeaderSize.ToString
        l_ID.Refresh()
        l_structure.Refresh()
        l_Version.Refresh()
        l_headersize.Refresh()

        nFS.Close()

        Return True

    End Function

[Jürgen]

Wenn Du Code nackicht postest, mach' doch dabei die Smilies aus.
Sonst wird z.B. aus

Code: [Auswählen]

8) schnell --> 
und per copy&paste dann --> Cool

[feixen]

Wenn Du Code nackicht postest, mach' doch dabei die Smilies aus.
Sonst wird z.B. aus

Code: [Auswählen]

8) schnell --> 
und per copy&paste dann --> Cool

thx .... good help ... 

[Jürgen]

Hab's dann eben geändert, in dem Posting die Smileys ausgeschaltet

BTW, umgekehrt muss ein Smiley mit Leerzeichen abgesetzt sein, um erscheinen zu können:)

[camel]

ok - danke

[camel]

todo: (bugs)
.)BUG: ini-paramter: für command line
 wenn in der ini datei ausgeschaltet ist, will er beim starten immer die channeloverwrite suchen
reagiert da auf den paramter: leider auf paramter "Start_CommandExport=1" obwohl der "hauptparamter": "Start_CommandLineModus=0" auf null gesetzt ist.
weil dann dürfte er gar nicht versuchen da eine channeloverwrite oder sonstige dateien zu laden.

.) bei SDX import ist vertikal wert = 0 und horizontalwert=1
muss im programm geändert werden + auch auf der webseite vom SDX-generator von satcodx.
dort ist ein fehler: laut definition sollte vertical=1 sein und hor=0.

-> das ist momentan bei progedit und bei satcodx verdreht.
(momentan ist es zwar noch richtig, weil ProgEdit das auch wieder verdreht - ist aber nicht SDX konform)

cu camel