<?xml version="1.0" encoding="utf-8"?>
<HmsMediaItem>
  <MediaType>1</MediaType>
  <ClassID>47</ClassID>
  <ItemID>0846fce2-726e-419c-a5cd-f655b2935a2d</ItemID>
  <ItemPath>https://api.friezy.ru/playlists/pls/JR.php</ItemPath>
  <ParentID>F38A68A9-EF1A-4862-972C-1E254946A010</ParentID>
  <Properties>
    <Property>
      <ID>4</ID>
      <Value>Jazzradio</Value>
    </Property>
    <Property>
      <ID>200</ID>
      <Value>1</Value>
    </Property>
    <Property>
      <ID>245</ID>
      <Value>0846fce2-726e-419c-a5cd-f655b2935a2d</Value>
    </Property>
    <Property>
      <ID>93</ID>
      <Value>42442,7457619329</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;JAZZRADIO.com - (.*)&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;JAZZRADIO.com&apos;;
    Item[mpiAlbumArtist] = &apos;JAZZRADIO.com&apos;;
}

    HmsLogMessage(1, mpTitle+&apos;: создано ссылок &apos;+IntToStr(gnTotal));
    }
///////////////////////////////////////////////////////////////////////////////
//                      Г Л А В Н А Я   П Р О Ц Е Д У Р А                    //
// ----------------------------------------------------------------------------
{
  FolderItem.DeleteChildItems(); // Удаляем созданные ранее ссылки
  LoadPlaylist();                // Вызов процедуры загрузки плейлиста и создания из него ссылок
}</Value>
    </Property>
    <Property>
      <ID>501</ID>
      <Value>C++Script</Value>
    </Property>
    <Property>
      <ID>55</ID>
      <Value>https://thumbnail.mixcloud.com/w/600/h/600/q/85/upload/images/profile/6a546f8f-87b7-48ad-a991-28140d9a9fc8.jpg</Value>
    </Property>
    <Property>
      <ID>95</ID>
      <Value>5</Value>
    </Property>
  </Properties>
</HmsMediaItem>
