Single Post - [wlx/wdx] TCMediaInfo

Hidden text

Code:

<sources>

<source name="Duration" field="Duration"/>
<source name="OverallBitRate" field="OverallBitRate"/>
<source name="GeneralFormat" field="Format"/>
<source name="EncDate" field="Encoded_Date"/>
<source name="RecDate" field="Recorded_Date"/>
<source name="GeneralStreamCount" field="StreamCount"/>

<source name="Title" field="Title"/>
<source name="Album" field="Album"/>
<source name="Performer" field="Performer"/>
<source name="Copyright" field="Copyright"/>
<source name="Comment" field="Comment" />
<source name="Composer" field="Composer"/>
<source name="Genre" field="Genre"/>
<source name="TrackNumber" field="Track/Position"/>
<source name="Medium" field="OriginalSourceMedium"/>
<source name="Source" field="OriginalSourceForm"/>
<source name="EncodedWith" field="Encoded_Application"/>

<source name="VideoStreamCount" field="StreamCount" context="Video"/>
<source name="VideoFormat" field="Format" context="Video"/>
<source name="VideoBr" field="BitRate" context="Video"/>
<source name="VideoCodecID" field="CodecID" context="Video"/>
<source name="VideoFrameWidth" field="Width" context="Video"/>
<source name="VideoFrameHeight" field="Height" context="Video"/>
<source name="DisplayAspectRatio" field="DisplayAspectRatio/String" context="Video"/>
<source name="VideoFPS" field="FrameRate" context="Video"/>
<source name="VideoFrameCount" field="FrameCount" context="Video"/>

<source name="AudioStreamCount" field="StreamCount" context="Audio"/>
<source name="AudioLang" field="Language" context="Audio" stream="*"/>
<source name="AudioLanguage" field="Language/String" context="Audio" stream="*"/>
<source name="AudioFormat" field="Format" context="Audio"/>
<source name="AudioBr" field="BitRate" context="Audio"/>
<source name="AudioCodecID" field="CodecID" context="Audio"/>
<source name="AudioBrMode" field="BitRate_Mode" context="Audio"/>
<source name="AudioSamplingRate" field="SamplingRate/String" context="Audio"/>
<source name="AudioChannels" field="Channel(s)" context="Audio"/>
<source name="AudioResolution" field="BitDepth" context="Audio"/>
<source name="AudioFormatSettingsMode" field="Format_Settings_Mode" context="Audio"/>

<source name="TextStreamCount" field="StreamCount" context="Text"/>
<source name="TextLang" field="Language" context="Text" stream="*"/>
<source name="TextLanguage" field="Language/String" context="Text" stream="*"/>
<source name="TextFormat" field="Format" context="Text"/>

</sources>
<columns>

<column name="Duration">
<unit name="hh:mm:ss" type="script">Output:=TimingFormat('%hh:%mm:%ss', Duration);</unit>
<unit name="hh:mm:ss.fff" type="script">Output:=TimingFormat('%hh:%mm:%ss.%fff', Duration);</unit>
<unit name="s" type="script">Output:=Trunc(Duration/1000);</unit>
<unit name="z">Duration</unit>
<unit name="Custom" type="script">
<![CDATA[
Output:='';
if Duration = '' then Exit;
Hour:=Trunc(Duration/3600000);
Min:=Trunc((Duration-Hour*3600000)/60000);
Sec:=Trunc((Duration-Hour*3600000-Min*60000)/1000);
if (Hour <> 0) then Output:=IntToStr(Hour)+' ч. ';
if (Min <> 0) then Output:=Output+IntToStr(Min) +' м. ';
if (Sec = -1) then Output:=Output+IntToStr(Sec) +' с. ';
]]>
</unit>
</column>
<column name="Format">GeneralFormat</column>
<column name="Bitrate">
<unit name="Bps">OverallBitRate</unit>
<unit name="KBps" type="script">Output:=Format('%f', OverallBitRate/1000);</unit>
<unit name="MBps" type="script">Output:=Format('%f', OverallBitRate/1000000);</unit>
</column>
<column name="Recorded Date" coltype="ft_datetime">RecDate</column>
<column name="Encoded Date" coltype="ft_datetime">EncDate</column>
<column name="Stream Count" coltype="ft_numeric_32">
<unit name="General">GeneralStreamCount</unit>
<unit name="Video only">VideoStreamCount</unit>
<unit name="Audio only">AudioStreamCount</unit>
<unit name="Subtitles only">TextStreamCount</unit>
</column>
<separator/>

<column name="Title">Title</column>
<column name="Album">Album</column>
<column name="Performer">Performer</column>
<column name="Copyright">Copyright</column>
<column name="Comment">Comment</column>
<column name="Composer">Composer</column>
<column name="Genre">Genre</column>
<column name="Track Number">TrackNumber</column>
<column name="Recorded Date">RecDate</column>
<column name="Medium">Medium</column>
<column name="Source">Source</column>
<column name="Encoded With">EncodedWith</column>
<column name="Tag Info" type="script">
<![CDATA[
Output:=''
if (Title <> '') then Output:=Title;
]]>
</column>

<separator/>

<column name="Video Streams">VideoStreamCount</column>
<column name="Video Format">VideoFormat</column>
<column name="Video Codec">VideoCodecID</column> 
<column name="Video Bitrate">
<unit name="Bps">VideoBr</unit>
<unit name="KBps" type="script">Output:=Format('%f', VideoBr/1000);</unit>
<unit name="MBps" type="script">Output:=Format('%f', VideoBr/1000000);</unit>
</column>
<column name="Frame Size" type="script">
<![CDATA[
if (VideoFrameWidth = '') and (VideoFrameHeight = '') then
Output:=''
else
Output:=VideoFrameWidth+' x '+VideoFrameHeight;
]]>
</column>
<column name="Frame Rate">VideoFPS</column>
<column name="Frame Count">VideoFrameCount</column>
<column name="All video as string" type="script">
<![CDATA[
      if (VideoFrameWidth = '') and (VideoFrameHeight = '') then
Output:=''
else
Output:=VideoFrameWidth+'x'+VideoFrameHeight;
if (DisplayAspectRatio <> '') then Output:=Output+' ('+DisplayAspectRatio+')';
if (VideoFPS <> '') then Output:=Output+', '+VideoFPS+' fps';
if (VideoFormat <> '') then Output:=Output+', '+VideoFormat;
if (VideoBr <> '') then Output:=Output+', '+Format('%f', VideoBr/1000000)+' MBps';
if (VideoStreamCount <> '1') and (Output <> '') then Output:=Output+', Дорожек: '+VideoStreamCount;
]]>
</column>
<separator/>

<column name="Audio Streams">AudioStreamCount</column>
<column name="Audio Lang" type="script">Output:=StrReplace(AudioLang, '|', ' ', 1, 0)</column>
<column name="Audio Language" type="script">Output:=StrReplace(AudioLanguage, '|', ' ', 1, 0)</column>
<column name="Audio Format">AudioFormat</column>
   <column name="Audio Bitrate">
<unit name="Bps">AudioBr</unit>
<unit name="KBps" type="script"><![CDATA[if (AudioBr <> '') then Output:=Format('%f', AudioBr/1000);]]></unit>
   </column>
<column name="Bitrate Mode">AudioBrMode</column>
<column name="Sampling Rate">AudioSamplingRate</column>
<column name="Channels">AudioChannels</column>
<column name="Resolution">AudioResolution</column>
<column name="All audio as string" type="script">
<![CDATA[
Output:=AudioFormat;

if (AudioSamplingRate <> '') then Output:=Output+', '+AudioSamplingRate;
if (AudioChannels <> '') then Output:=Output+', '+AudioChannels+' Ch';
if (AudioResolution <> '') then Output:=Output+', '+AudioResolution+' Bits';
if (AudioBr <> '') then Output:=Output+', '+Format('%d Kbps', Trunc(AudioBr/1000));
Output:=Output+', Дорожек: '+AudioStreamCount;
]]>
</column>
<column name="All audio streams1" type="script">
<![CDATA[
   Output:=Get(Language, Audio, 1);

]]>
</column>

<separator/>

<column name="Text Streams">TextStreamCount</column>
<column name="Subs" type="script">Output:=StrReplace(TextLang, '|', ' ', 1, 0)</column>
<column name="Subtitles" type="script">Output:=StrReplace(TextLanguage, '|', ' ', 1, 0)</column>
<column name="Subtitles Format">TextFormat</column>
<separator/>

<column name="Video codec custom" type="list" list="VideoCodecs">VideoCodecID</column>
<column name="Audio codec custom" type="script">Output:=GetListValue('AudioCodecs', Format('%4.4d', AudioCodecID), AudioCodecID);</column>
</columns>