<?xml version="1.0" encoding="utf-8"?>
<HmsMediaItem>
  <MediaType>1</MediaType>
  <ClassID>47</ClassID>
  <ItemID>85f0968e-3d11-4a41-bdcc-7b12b8c0d5c9</ItemID>
  <ItemPath>https://api.friezy.ru/playlists/pls/RT.php</ItemPath>
  <ParentID>F38A68A9-EF1A-4862-972C-1E254946A010</ParentID>
  <Properties>
    <Property>
      <ID>4</ID>
      <Value>Radiotunes</Value>
    </Property>
    <Property>
      <ID>245</ID>
      <Value>85f0968e-3d11-4a41-bdcc-7b12b8c0d5c9</Value>
    </Property>
    <Property>
      <ID>93</ID>
      <Value>42442,7439001273</Value>
    </Property>
    <Property>
      <ID>500</ID>
      <Value>int gnTotal=0,i;
string tmp;
// ----------------------------------------------------------------------------
void LoadPlaylist() {
  string sData, sLink, sName, sImg, sLength; THmsScriptMediaItem Item;

  // Если ссылка плейлиста начинается на http, то скачиваем, если нет - загружаем как локальный файл
  if (LeftCopy(mpFilePath, 4)==&apos;http&apos;) sData = HmsDownloadUrl(mpFilePath, &apos;&apos;, true);  // Загрузка плейлиста из интернета
  else                                 sData = HmsStringFromFile(mpFilePath);         // Загрузка плейлиста с локального диска
  
  sData = HmsUtf8Decode(sData);   // Декодируем из UTF-8 кодировки
  HmsRegExMatch(&apos;NumberOfEntries=(.*?)[\\r\\n]&apos;,sData,tmp); // Получаем кол-во элементов из плейлиста
  gnTotal = StrToInt(tmp);

  //Проходим по плейлисту в цикле от 1 до gnTotal
  for (i=1; i&lt;=gnTotal; i++) {
    HmsRegExMatch3(&apos;File&apos;+IntToStr(i)+&apos;=(.*?)[\\r\\n]+Title&apos;+IntToStr(i)+&apos;=(.*?)[\\r\\n]+Length&apos;+IntToStr(i)+&apos;=(.*?)[\\r\\n]&apos;,sData,sLink,sName,sLength); // Получаем название, ссылку с premium ключом и длительность
    HmsRegExMatch(&apos;RadioTunes - (.*)&apos;, sName, sName); // Укорачиваем название до имени канала

    // Пытаемся получить ссылку на картинку
    sImg = &apos;http://wonky.lostcut.net/TVimg/&apos;+HmsPercentEncode(sName, &apos;"A-Z", "a-z", "0-9", "-", ".", "_", "~", "\&apos;"&apos;)+&apos;.png&apos;;

    // Создаём ссылку
    Item = HmsCreateMediaItem(sLink, FolderItem.ItemID);
    Item[mpiTitle    ] = sName; // Наименование
    Item[mpiThumbnail] = sImg;  // Картинка
    Item[mpiTimeLength] = sLength; // Длительность
    Item[mpiAlbum] = sName;
    Item[mpiAuthor     ] = &apos;RadioTunes&apos;;
    Item[mpiAlbumArtist] = &apos;RadioTunes&apos;;
}

    HmsLogMessage(1, mpTitle+&apos;: создано ссылок &apos;+IntToStr(gnTotal));
    }
///////////////////////////////////////////////////////////////////////////////
//                      Г Л А В Н А Я   П Р О Ц Е Д У Р А                    //
// ----------------------------------------------------------------------------
{
  FolderItem.DeleteChildItems(); // Удаляем созданные ранее ссылки
  LoadPlaylist();                // Вызов процедуры загрузки плейлиста и создания из него ссылок
}</Value>
    </Property>
    <Property>
      <ID>501</ID>
      <Value>C++Script</Value>
    </Property>
    <Property>
      <ID>200</ID>
      <Value>1</Value>
    </Property>
    <Property>
      <ID>55</ID>
      <Value>http://images.radiodeck.com/radio/53d977bc30049816980a8c73/logo/640x640.jpg</Value>
    </Property>
    <Property>
      <ID>95</ID>
      <Value>5</Value>
    </Property>
  </Properties>
</HmsMediaItem>
