Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Программы » Закладки » Indigo Rose AutoPlay Media Studio (часть 4)

Модерирует : gyra, Maz

articlebot (05-08-2012 06:20): Лимит страниц, переезжаем сюда  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211

   

Widok



Moderator-Следопыт
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
AutoPlay Media Studio






  AutoPlay Media Studio - мощная программа для создания меню автозагрузки CD/DVD. Эта программа создаст все необходимые файлы для автозапуска и его графическую оболочку, и даже сама встроит в нее использованные в проекте нестандартные шрифты. Пользователю останется лишь записать готовый проект на свой CD/DVD.
  AutoPlay Media Studio не требует от пользователя никаких особых знаний и очень прост в освоении, имеет дружественный и интуитивно понятный интерфейс. Приложение, которое будет создано AutoPlay Media Studio в конце работы, представлено в виде объектной модели. Эта модель состоит из группы отдельных страниц. На этих страницах можно размещать объекты, которые могут представлять собой графику, музыку, текст, видео, Flash, HTML и пр. Любому элементу можно назначить определенное действие. Например, при наведении на рисунок курсора мыши, может возникать текст с комментариями, при нажатии на кнопку "Play" начнет проигрываться фильм и т.д. Программа предоставляет сотни различных действий, которые можно связать с объектами. В AutoPlay Media Studio присутствует большое количество уже готовых шаблонов.
  AutoPlay Media Studio имеет широкие возможности и богатый набор инструментов для разработки мультимедийных проектов. Использовать программу можно не только для создания файлов автозапуска, но и, например, для разработки интерактивного обучающего софта или мультимедийной презентации.

Язык интерфейса: английский
Страница загрузки: AutoPlay Media Studio Commerical Trial  8.1.0.0


Скриптовый язык LUA:
на Lua.Org (Official) - на Lua.Ru

Ресурсы, посвященные AMS (содержат коллекции примеров, дополнений, уроков):
  • amsplugins.com
  • serkan.ws
  • amsuser.com
  • azman.info
  • icynorth.com
  • imagine-programming.com
  • mindquake.com.br

    Ответы на наиболее часто задаваемые вопросы


    Онлайн версия раскраски AMS-кода для публикации на форуме от UModeL

  • Всего записей: 24190 | Зарегистр. 07-04-2002 | Отправлено: 12:17 17-05-2010 | Исправлено: Maz, 12:30 25-09-2017
    Zloy_Gelud



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    sjdb45 -- пробуй.

    Код:
    local tChecked = ListBox.GetChecked("ListBox1", BST_CHECKED);
    if tChecked then  
        for i = 1, #tChecked do
            INIFile.SetValue(_WindowsFolder.."\\ххх.ini", "My Section", i, ListBox.GetItemText("ListBox1", tChecked[i]));
        end
    end


    Всего записей: 3265 | Зарегистр. 30-05-2007 | Отправлено: 09:16 21-11-2011 | Исправлено: Zloy_Gelud, 09:17 21-11-2011
    sjdb45



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Zloy_Gelud
    Спасибо!!!
    Да, заполняет ини файл прекрасно, а как быть если листбоксов 3 штуки,  
    для каждого листбокса я дублировал этот код однако заполненый список из ListBox1 удаляется следующим списком listbox2 а этот третьим и т.д.

    Всего записей: 136 | Зарегистр. 17-07-2011 | Отправлено: 11:37 21-11-2011
    Zloy_Gelud



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    sjdb45

    Цитата:
    однако заполненый список из ListBox1 удаляется следующим списком listbox2 а этот третьим и т.д.

    Ничего не понял.

    Всего записей: 3265 | Зарегистр. 30-05-2007 | Отправлено: 11:45 21-11-2011
    sjdb45



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Объясню:
    кодом который ты написал заполняется xxx.ini но заполняется с listbox1, а у меня 3 листбокса.
    И как сделать что-бы если выбираешь с трех листбоксов то все выбранное с трех листбоксов заполнило xxx.ini
    С одним листбоксом нет проблем, заполняются те приложения которые ты отметил.. а вот как быть если 3 листбокса?
    Я дублировал код который ты мне дал, вот так:

    Код:
     
    --1
    local tChecked = ListBox.GetChecked("ListBox1", BST_CHECKED);
    if tChecked then  
        for i = 1, #tChecked do
            INIFile.SetValue(_WindowsFolder.."\\їїї.ini", "My Section", i, ListBox.GetItemText("ListBox1", tChecked[i]));
        end
    end
    --2
    local tChecked = ListBox.GetChecked("ListBox2", BST_CHECKED);
    if tChecked then  
        for i = 1, #tChecked do
            INIFile.SetValue(_WindowsFolder.."\\їїї.ini", "My Section", i, ListBox.GetItemText("ListBox2", tChecked[i]));
        end
    end
    --3
    local tChecked = ListBox.GetChecked("ListBox3", BST_CHECKED);
    if tChecked then  
        for i = 1, #tChecked do
            INIFile.SetValue(_WindowsFolder.."\\їїї.ini", "My Section", i, ListBox.GetItemText("ListBox3", tChecked[i]));
        end
    end
     

    и в этом случае xxx.ini бывает заполненым только с последнего листбокса т.к. с первых двук листбоксов он стирает инфо в ини файле...

    Всего записей: 136 | Зарегистр. 17-07-2011 | Отправлено: 12:10 21-11-2011
    dallas page



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Zloy_Gelud

    Цитата:
    local __search = function (s)
        local tFinded = {};
        local nItem = ListBox.FindItem("ListBox1", -1, LB_BYTEXT, "*"..s.."*");
        while nItem ~= -1 do
            tFinded[tostring(ListBox.GetItemText("ListBox1", nItem))] = true;
            nItem = ListBox.FindItem("ListBox1", nItem, LB_BYTEXT, "*"..s.."*");
        end
        return tFinded;
    end
     
    local __checked = function ()
        local tRet = {};
        local tChecked = ListBox.GetChecked("ListBox1", BST_CHECKED);
        if tChecked then
            for i = 1, #tChecked do
                tRet[tostring(ListBox.GetItemText("ListBox1", tChecked[i]))] = true;
            end
        end
        return tRet;
    end
         
     
    local sSearch = Input.GetText("Input1");
    if String.TrimLeft(sSearch, nil) ~= "" then
        local tChecked = __checked();
        local tFinded  = __search(sSearch);
        ListBox.DeleteItem("ListBox1", -1);
        if Table.Count(tFinded) > 0 then
            for t, v in pairs(tFinded) do
                local nInd = ListBox.AddItem("ListBox1", t, "");
                if Table.Count(tChecked) > 0 then
                    if tChecked[t] then
                        ListBox.SetItemCheck("ListBox1", nInd, BST_CHECKED);
                    end
                end
            end
        end
    end

     
    Как всегда просто супер. Но, есть проблема. Если я сделаю поиск, а потом изменю условия поиска, то поиск будет не в полном списке позиций, а в списке прошлого результата поиска. А если код переделать. Сделать поиск не по Item, а по файлам. В принципе он у меня уже был реализован. В Preload страницы есть код, который выводит все файлы *.apk в listbox. Надо чтобы отмеченные позиции были так же отмечены в результатах поиска. Помоги пожалуйста доработать код.  
     

    Код:
    text = Input.GetText("Input1");
    ListBox.DeleteItem("ListBox1", LB_ALLITEMS);
    t_Files = File.Find("AutoPlay\\Docs", "*"..text.."*.apk", true, false, nil, nil);
        if t_Files then
            for n_Item, s_File in pairs(t_Files) do
                s_Filename = String.SplitPath(s_File).Filename;
                ListBox.AddItem("ListBox1", s_Filename, s_File);
            end
        end

     
     

    Всего записей: 200 | Зарегистр. 28-03-2010 | Отправлено: 12:48 21-11-2011 | Исправлено: dallas page, 12:50 21-11-2011
    Zloy_Gelud



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    sjdb45 Исправлено

    Код:
    local nLBCount = 3; -- количество ЛистБоксов
    local nInd     = 0;
    for k = 1, nLBCount do
        local tChecked = ListBox.GetChecked("ListBox"..k, BST_CHECKED);
        if tChecked then  
            for i = 1, #tChecked do
                nInd = nInd + 1;
                INIFile.SetValue(_WindowsFolder.."\\ххх.ini", "My Section", nInd, ListBox.GetItemText("ListBox"..k, tChecked[i]));
            end
        end
    end

    Всего записей: 3265 | Зарегистр. 30-05-2007 | Отправлено: 13:45 21-11-2011 | Исправлено: Zloy_Gelud, 14:31 21-11-2011
    sjdb45



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Zloy_Gelud
    Впервые такой код вижу если чесно
    Я вбил его но...
    Вижу в ини файле только
    [IMy Section]
    1=
    2=
    3=
    и т.д.
    То есть без наименований
    Не прописываются имена
    ____________________________________________________
    Пардон, я когда скопировал твой код то он был такой, может ты его чуть после подправил..

    Код:
     
    local nLBCount = 3; -- êîëè÷åñòâî ËèñòÁîêñîâ
    local nInd     = 0;
    for k = 1, nLBCount do
        local tChecked = ListBox.GetChecked("ListBox"..k, BST_CHECKED);
        if tChecked then  
            for i = 1, #tChecked do
                nInd = nInd + 1;
                INIFile.SetValue(_WindowsFolder.."\\õõõ.ini", "INSTALL", nInd, ListBox.GetItemText("ListBox1", tChecked[i]));
            end
        end
    end
     

    А так код прекрасно работает! только что проверил! Спасибо!
     
    Вот только не пойму одно, -> local nLBCount = 3; -- количество ЛистБоксов
    Значит вместо 3 можно поставить и другую цифру если скажем листбоксов ne 3 a 5 штук,  
    значит ставим local nLBCount = 5; -- я прав?

    Всего записей: 136 | Зарегистр. 17-07-2011 | Отправлено: 14:25 21-11-2011 | Исправлено: sjdb45, 14:46 21-11-2011
    Zloy_Gelud



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    dallas page

    Цитата:
    Сделать поиск не по Item, а по файлам.

    Имхо, плохо каждый раз напрямую обращаться к файлам. Скорость обработки теряется. Лучше уж с памятью работать.
     
  • On Preload страницы:

    Код:
    ListBox.DeleteItem("ListBox1", LB_ALLITEMS);
    --t_Files = File.Find("AutoPlay\\Docs", "*"..text.."*.apk", true, false, nil, nil);
    t_Files = File.Find("AutoPlay\\Docs", "*.apk", true, false, nil, nil);
    if t_Files then
        g_FileNames = {};
        for n_Item, s_File in pairs(t_Files) do
            s_Filename = String.SplitPath(s_File).Filename;
            g_FileNames[tostring(s_Filename)] = true;
            ListBox.AddItem("ListBox1", s_Filename, s_File);
        end
    end

     
  • On Click кнопки:

    Код:
    local __search = function (s)
        local tFinded = {};
        if g_FileNames then
            for i, v in pairs(g_FileNames) do
                if String.Find(i, s, 1, false) ~= -1 then
                    tFinded[i] = true;
                end
            end
        end
        return tFinded;
    end
     
    local __checked = function ()
        local tRet = {};
        local tChecked = ListBox.GetChecked("ListBox1", BST_CHECKED);
        if tChecked then
            for i = 1, #tChecked do
                tRet[tostring(ListBox.GetItemText("ListBox1", tChecked[i]))] = true;
            end
        end
        return tRet;
    end
         
    local sSearch = Input.GetText("Input1");
    if String.TrimLeft(sSearch, nil) ~= "" then
        local tChecked = __checked();
        local tFinded  = __search(sSearch);
        ListBox.DeleteItem("ListBox1", -1);
        if Table.Count(tFinded) > 0 then
            for t, v in pairs(tFinded) do
                local nInd = ListBox.AddItem("ListBox1", t, "");
                if Table.Count(tChecked) > 0 then
                    if tChecked[t] then
                        ListBox.SetItemCheck("ListBox1", nInd, BST_CHECKED);
                    end
                end
            end
        end
    else
        ListBox.DeleteItem("ListBox1", -1);
        if g_FileNames then
            for i, v in pairs(g_FileNames) do
                ListBox.AddItem("ListBox1", i, "");
            end
        end
    end

     
    Добавлено:
    sjdb45

    Цитата:
    То есть без наименований
    Не прописываются имена

    Сорри, пофиксил одну ошибку. Пост выше исправил. Попробуй еще раз.

  • Всего записей: 3265 | Зарегистр. 30-05-2007 | Отправлено: 14:27 21-11-2011 | Исправлено: Zloy_Gelud, 14:32 21-11-2011
    sjdb45



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Да мы писали одновременно и так получилось
    Вот ответь,
    Вот только не пойму одно, -> local nLBCount = 3; -- количество ЛистБоксов
    Значит вместо 3 можно поставить и другую цифру если скажем листбоксов ne 3 a 5 штук,  
    значит ставим local nLBCount = 5; -- я прав?

    Всего записей: 136 | Зарегистр. 17-07-2011 | Отправлено: 14:48 21-11-2011
    Zloy_Gelud



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    sjdb45

    Цитата:
    я прав?

    Абсолютно. Только названия ЛистБоксов должны выглядеть как "ListBox1",  "ListBox2",  "ListBox3",  "ListBox4",  "ListBox5".

    Всего записей: 3265 | Зарегистр. 30-05-2007 | Отправлено: 14:59 21-11-2011
    sjdb45



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Zloy_Gelud
    ОГРОМНОЕ СПАСИБО!
    Вот уже около месяца я собираю свою идею установщика и уже есть свет в конце тoнеля!
    Должно что-то получится.
    Если кратко то:
    все листбоксы на страничке запрятаны с размером 1х1 по краю странички
    1.заранее создаю в директории ини файл со списком всей этой херни
    2.При помощи ComboBox вывожу на страничку выбраный в нём листбокс (офис, Графика и т.п.)
    3.При обзоре в листбоксах при нажатии на ту или иную прогу выходит скриншот и в параграфе описание.
    4.после выбора приложений из листбоксов создается один ини файл со списком (мы только что его сделали).
    5.этот список появляется на страничке в одном листбоксе (всё что выбирали)
    6.после нажатия кнопки "Старт" начинается процесс установки того что выбрано.
    Осталось всё подогнать по мелочам
    Так что, без твоей помощи я бы и 10% всей работы не смог бы сделать!
    От всей души желаю тебе 200 лет счастливой жизни!

    Всего записей: 136 | Зарегистр. 17-07-2011 | Отправлено: 15:21 21-11-2011
    Stalkersof

    Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    sjdb45
    Ну чтож посмотрим что получится. И все таки те проблемы которые были озвучены так и остались.
    Будем ждать может кто что придумает.
    У меня лично даже ini файл не создается. Система Виста SP2. Запуск только от имени администратора.  
    Что не есть хорошо.
     
    Вот эта строчка.

    Цитата:
    INIFile.SetValue(_WindowsFolder.."\\ххх.ini", "My Section", nInd, ListBox.GetItemText("ListBox"..k, tChecked[i]))

    Имено этот Ini требует права админа. На висте.  

    Всего записей: 263 | Зарегистр. 20-03-2011 | Отправлено: 15:29 21-11-2011 | Исправлено: Stalkersof, 16:00 21-11-2011
    Zloy_Gelud



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    /OFF
    sjdb45 -- Спасибо.

    Всего записей: 3265 | Зарегистр. 30-05-2007 | Отправлено: 15:42 21-11-2011
    dallas page



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Zloy_Gelud Отлично. Работает. А можно не много подправить, чтобы после поиска, я мог удалить надпись в input, чтобы он снова выдал весь список и отмеченные ранее пункты остались с галочкой?!! А то я удаляю надпись и он выдает снова весь список, но отмеченные ранее пункты без галочек

    Всего записей: 200 | Зарегистр. 28-03-2010 | Отправлено: 15:53 21-11-2011
    Zloy_Gelud



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    dallas page -- можно.
     

    Код:
    local sSearch = Input.GetText("Input1");
    local tChecked = __checked();
    if String.TrimLeft(sSearch, nil) ~= "" then
        local tFinded  = __search(sSearch);
        ListBox.DeleteItem("ListBox1", -1);
        if Table.Count(tFinded) > 0 then
            for t, v in pairs(tFinded) do
                local nInd = ListBox.AddItem("ListBox1", t, "");
                if Table.Count(tChecked) > 0 then
                    if tChecked[t] then
                        ListBox.SetItemCheck("ListBox1", nInd, BST_CHECKED);
                    end
                end
            end
        end
    else
        ListBox.DeleteItem("ListBox1", -1);
        if g_FileNames then
            for i, v in pairs(g_FileNames) do
                local nInd = ListBox.AddItem("ListBox1", i, "");
                if Table.Count(tChecked) > 0 then
                    if tChecked[i] then
                        ListBox.SetItemCheck("ListBox1", nInd, BST_CHECKED);
                    end
                end
            end
        end
    end


    Всего записей: 3265 | Зарегистр. 30-05-2007 | Отправлено: 16:09 21-11-2011
    davidgray



    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Добрый день!  
     
    Помогите пожалуйста.
     
    Имеется страница, на ней картинки. Как сделать, что бы при клике на картинку, она устанавливалась как фон рабочего стола.  
     
    Очень сильно нужно....плиз.

    Всего записей: 7 | Зарегистр. 18-11-2011 | Отправлено: 16:10 21-11-2011 | Исправлено: davidgray, 16:11 21-11-2011
    Zloy_Gelud



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    davidgray
     
  • On Click объекта Image1:

    Код:
    local tProp = Image.GetProperties("Image1");
    local sImagePath = tProp.ImageFile;
     
    Registry.SetValue(HKEY_CURRENT_USER, "Control Panel\\Desktop", "Wallpaper", sImagePath, REG_SZ);
     
    -- Расположение: "По центру"
    --Registry.SetValue(HKEY_CURRENT_USER, "Control Panel\\Desktop", "TileWallpaper", "0", REG_SZ);
    --Registry.SetValue(HKEY_CURRENT_USER, "Control Panel\\Desktop", "WallpaperStyle", "0", REG_SZ);

    -- Расположение: "Растянуть"
    Registry.SetValue(HKEY_CURRENT_USER, "Control Panel\\Desktop", "TileWallpaper", "0", REG_SZ);
    Registry.SetValue(HKEY_CURRENT_USER, "Control Panel\\Desktop", "WallpaperStyle", "2", REG_SZ);
     
    -- Расположение: "Замостить"
    --Registry.SetValue(HKEY_CURRENT_USER, "Control Panel\\Desktop", "TileWallpaper", "1", REG_SZ);
    --Registry.SetValue(HKEY_CURRENT_USER, "Control Panel\\Desktop", "WallpaperStyle", "0", REG_SZ);

  • Всего записей: 3265 | Зарегистр. 30-05-2007 | Отправлено: 16:51 21-11-2011 | Исправлено: Zloy_Gelud, 16:52 21-11-2011
    dallas page



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Zloy_Gelud спасибо. Осталась только последняя проблема. Отмеченные позиции, не удовлетворяющие условиям поиска, после поиска и после того как стираешь надпись в input становятся не отмеченными. А после поиска в отмеченных позициях стирается значение Item Data. Можно что нибудь придумать?

    Всего записей: 200 | Зарегистр. 28-03-2010 | Отправлено: 17:16 21-11-2011 | Исправлено: dallas page, 17:35 21-11-2011
    Zloy_Gelud



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    dallas page
     
    Ептыть , ты что вообще хочешь получить? Если я правильно понял, то после каждого поиска, если ты ставишь птичку для пункта, то это должно запоминаться? И после очистки поиска, когда выводятся все пункты, те пункты, которые были отмечены во время поиска (поисков может быть несколько (?)), должны также остаться отмечены в общем списке?

    Цитата:
    А после поиска в отмеченных позициях стирается значение Item Data. Можно что нибудь придумать?  

    Можно.

    Всего записей: 3265 | Зарегистр. 30-05-2007 | Отправлено: 19:11 21-11-2011
    dallas page



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Zloy_Gelud ок, не буду ничего лишнего придумывать. Я просто хотел, чтобы было как в программе iTunes. Помоги плиз по поводу ItemData

    Всего записей: 200 | Зарегистр. 28-03-2010 | Отправлено: 19:39 21-11-2011
       

    Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211

    Компьютерный форум Ru.Board » Компьютеры » Программы » Закладки » Indigo Rose AutoPlay Media Studio (часть 4)
    articlebot (05-08-2012 06:20): Лимит страниц, переезжаем сюда


    Реклама на форуме Ru.Board.

    Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
    Modified by Ru.B0ard
    © Ru.B0ard 2000-2024

    BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

    Рейтинг.ru