14 Августа 2018 17:12 
Навигация
 +  - 
Скачать игры
Сейчас на сайте
13.08.2018
Warhangel
17:16:26
offline
13.08.2018
littledie
1 день
offline
10.08.2018
krit131
4 дней
offline
09.08.2018
inomn
5 дней
offline
09.08.2018
qwertyq...
5 дней
offline
Последние фото
Game of Blocks : WesterosCraft and Game of Thrones
Game of Blocks : Wes...
Альбом: Скриншоты

Вынос трёх пати куполом
Вынос трёх пати куполом
Альбом: Скриншоты



Альбом: Флора

Последние видео
Видео ТРИ СУДЬБЫ - Короткометражный фэнтези-боевик : Короткометражный CGI-фильм, посвященный игре The Elder Scrolls Online.

Игрофильмы:  ТРИ СУДЬБЫ - Короткометражный фэнтези-боевик

Видео Rhine Falls : Rhine Falls Live Camera streeeam

Онлайн камеры:  Rhine Falls

Видео Live Cam, Central Memorial Park, Calgary, Alberta : Central Memorial Park is a park located in central Calgary\

Онлайн камеры:  Live Cam, Central Memorial Park, Calgary, Alberta

Наша кнопочка
FAQ7.ru
Код:
RSS каналы
Новости
Комменты
Форум
Статьи
Фото
Файлы
Ссылки
Объявления
Реклама
Регистрация сайта в каталогах, раскрутка и оптимизация сайта, контекстная реклама
Автор темы: Warhangel
ID темы: 668
Информация о теме:
Имеются 1 сообщений по данной теме, которая была просмотрена 6484 раз.
Реклама
livecoin Обменник
Просмотр темы
Логин:
Пароль:  
Форум » Тематические » Программирование » Java
Просмотр темы
Текущий рейтинг: (Всего: 0 голосов)  
Ответить
Иконка 
Исходник приложения онлайн радио вконтакте
Наверх Распечатать сообщение #1
Опубликовано 17-04-2011 19:11
Аватар пользователя

Супер Администратор



Сообщений: 2121
Вас поблагодарили: 18
раз(а) в 18 сообщениях

Зарегистрирован: 24.03.10
Со дня регистрации: 3065
Откуда: Россия
Пол: Мужской

Скрыть награды


Пожаловаться на это сообщение 

Main.as

 /*
        http://flapps.ru/forum/ – форум о создании приложений
        */
        package {
        import flash.display.*;
        import flash.media.*;
        import flash.events.*;
        import flash.geom.*;
        import flash.net.*;
        import flash.ui.*;
        import flash.utils.*;
        import flash.text.*;
        public class Main extends Sprite {
        private var api_id:Number=1676336;// id вашего приложения
        private var url:String=”http://flapps.ru/live”;// ссылка на ваше радио
        private var sound:Sound;
        private var music:SoundChannel;
        private var bounds:Rectangle;
        private var maxMove:Number;
        private var minuteTimer:Timer=new Timer(1000);
        public function Main():void {
        if (LoaderInfo(root.loaderInfo).parameters.api_id!=api_id) {
        is_copy_mc.is_copy_tf.text=’Приложение находится здесь\nhttp://vkontakte.ru/app’+api_id;
        is_copy_mc.x=0;
        is_copy_mc.y=0;
        } else {
        var cm = new ContextMenu();
        cm.hideBuiltInItems();
        var p1:ContextMenuItem=new ContextMenuItem(‘«Радио»’);
        var p2:ContextMenuItem=new ContextMenuItem(‘flapps.ru’);
        p2.addEventListener(MouseEvent.CLICK, function(){;
        navigateToURL(new URLRequest(‘http://flapps.ru’));
        });
        p2.separatorBefore=true;
        cm.customItems.push(p1,p2);
        this.contextMenu=cm;
        time_tf.autoSize=TextFieldAutoSize.LEFT;
        play_btn.addEventListener(MouseEvent.CLICK,playSound);
        pause_btn.addEventListener(MouseEvent.CLICK,pauseSound);
        addEventListener(Event.ENTER_FRAME, enterHandler);
        volumeSlider.addEventListener(MouseEvent.MOUSE_DOWN, startScroll);
        stage.addEventListener(MouseEvent.MOUSE_UP, stopScroll);
        maxMove=35;
        bounds=new Rectangle(volumeSlider.x,volumeSlider.y,- maxMove,0);
        var scrolling:Boolean=false;
        function startScroll(e:Event):void {
        scrolling=true;
        volumeSlider.startDrag(false,bounds);
        }
        function stopScroll(e:Event):void {
        scrolling=false;
        volumeSlider.stopDrag();
        }
        function enterHandler(e:Event):void {
        if (scrolling==true) {
        setVolume(1-((bounds.x-volumeSlider.x)/maxMove));
        }
        }
        function setVolume(vol:Number) {
        if (music!=null) {
        var mod:SoundTransform = new SoundTransform();
        mod.volume=vol;
        music.soundTransform=mod;
        }
        }
        }
        }
        private function playSound(e:MouseEvent):void {
        play_btn.visible=false;
        var request:URLRequest=new URLRequest(url+’?'+Math.random());
        sound = new Sound();
        sound.addEventListener(HTTPStatusEvent.HTTP_STATUS,onError);
        sound.load(request);
        music=sound.play();
        var mod:SoundTransform = new SoundTransform();
        mod.volume=1-((bounds.x-volumeSlider.x)/maxMove);
        music.soundTransform=mod;
        minuteTimer.addEventListener(TimerEvent.TIMER, onTick);
        minuteTimer.start();
        }
        private function onError(event:Event):void {
        status_tf.text = ‘Ошибка’;
        }
        private function pauseSound(e:MouseEvent):void {
        play_btn.visible=true;
        music.stop();
        minuteTimer.stop();
        minuteTimer.reset();
        time_tf.text=”0:00:00″;
        }
        function onTick(event:TimerEvent):void {
        var sec=event.target.currentCount;
        var min=Math.floor(sec/60);
        var hour=Math.floor(min/60);
        sec%=60;
        if (sec<10) {
        sec=’0&#8242;+sec;
        }
        min%=60;
        if (min<10) {
        min=’0&#8242;+min;
        }
        hour%=24;
        time_tf.text=hour+”:”+min+”:”+sec;
        }
        }
        }


Исходник [ ссылка скрыта ] ( регистрация | вход )
Инструкция
В файле Main.as заменить:
- api_id – на ID своего приложения
- url – на ссылку на mp3 поток
 Offline
 
Посетить сайт автора
Цитировать
Ответить
Здесь присутствуют: 1 (пользователей: 0, гостей: 1)

« Предыдущая тема | Следующая тема »
 RSS Перейти на форум:
Розыгрыши 728х90

Последние объявления
ФотоЗаголовокГородРазмещено
ООО «Ставролен» продает неликвиды
• Хозяйство - Оборудование Цена: 1 1
Ставрополь11.08.2018
(на 1 месяц)
Группа «Илим» реализует неликвиды своих предприятий
• Хозяйство - Оборудование Цена: 1 1
Санкт-Петербург23.07.2018
(на 1 месяц)
Купим автоматическую систему газового пожаротушения
• Хозяйство - Оборудование Цена: 1 1
Красноярск24.04.2018
(на 6 месяцев)
Интернет-магазин velobum.com.ua
• Транспорт - Велотранспорт Цена: 1 1
Белгород22.03.2018
(на 6 месяцев)
Универсальный гипермаркет Gecsa
• Развлечения - Туризм Цена: 1 1
Казань06.11.2017
(на 24 месяца)
Облако тегов тем форума
Бот для starsage.ru, "Железный человек 3" выйдет в 2013 году, Новый закон о защите детей и мультфильмы., own3D.tv возвращается к работе 1 августа, Megominer. Помощь с выбором и настройкой оборудования для майнинга, Пайлака, Чтобы запомнить, нужно принять позу, Что такое рифт, Обход тега HIDE на форумах Vbulletin, МАФ КЛУБ "MAFIA INFO" В КАФЕ-КЛУБЕ FRESH!, Открыт платный перенос персонажей, улучшен дизайн сайта, Чит-коды (cheats) Fallout 3, Где скачать музыку, В Unsung Heroes открывается Зал Славы, Квест на профессию Elemental Master для Elemental Summoner
Главная Статьи Файлы Форум Ссылки Новости Фотогалерея Объявления Видео Файлобменник Гороскоп Поиск по торрентам Радио Видеочат
Яндекс.Метрика
Powered by PHP-Fusion copyright © 2002 - 2018 by Nick Jones. Released as free software without warranties under GNU Affero GPL v3.