[Урок] Онлайн радио в машине (by Saimon)

Дата: Четверг, 23.02.2012, 19:42 | Сообщение # 1

Уверенный в себе

Группа: Продвинутые

Сообщений: 286

Награды: 3

Город: Киев

Репутация: -74

Замечания: 80%

Статус:

Врубается автоматически!
Работает на основе стримера PlayAudioStreamerForPlayer

1. ко всем new

Code

new Radiostation[MAX_VEHICLES];//радио в машине

2. в public OnGameModInit

Code

for(new v; v < MAX_VEHICLES; v++)Radiostation[v] = random(14);//Радиостанции

3. в public OnPlayerStateChange

Code

if(newstate == PLAYER_STATE_DRIVER || newstate == PLAYER_STATE_PASSENGER)
     {
        new veh = GetPlayerVehicleID(playerid);
        switch(Radiostation[veh])
        {
           case 0: return 1;
           case 1: {GameTextForPlayer(playerid,"Europa plus",3000,5);PlayAudioStreamForPlayer(playerid,"http://webcast.emg.fm:55655/europaplus128.mp3");}
           case 2: {GameTextForPlayer(playerid,"Maks FM",3000,5);PlayAudioStreamForPlayer(playerid,"http://radio.maks-fm.ru:8000/maksfm128.m3u");}
           case 3: {GameTextForPlayer(playerid,"ICE FM",3000,5);PlayAudioStreamForPlayer(playerid,"http://icefm.ru/etc/live.m3u");}
           case 4: {GameTextForPlayer(playerid,"Vesti FM",3000,5);PlayAudioStreamForPlayer(playerid,"http://audio.rambler.ru/play.html?id=2537099");}
           case 5: {GameTextForPlayer(playerid,"Russian Radio",3000,5);PlayAudioStreamForPlayer(playerid,"http://radio01-cn03.akadostream.ru:8000/russianradio128.mp3");}
           case 6: {GameTextForPlayer(playerid,"Mayak Radio",3000,5);PlayAudioStreamForPlayer(playerid,"http://radio01-cn03.akadostream.ru:8000/mayak128.mp3");}
           case 7: {GameTextForPlayer(playerid,"Nashe Radio",3000,5);PlayAudioStreamForPlayer(playerid,"http://188.127.243.169:80/nashe-192");}
           case 8: {GameTextForPlayer(playerid,"Retro FM",3000,5);PlayAudioStreamForPlayer(playerid,"http://radio01-cn03.akadostream.ru:8000/radioretro128.mp3");}
           case 9: {GameTextForPlayer(playerid,"Radio Shanson",3000,5);PlayAudioStreamForPlayer(playerid,"http://radio02-cn03.akadostream.ru:8108/shanson128.mp3");}
           case 10: {GameTextForPlayer(playerid,"Nashi Pesni",3000,5);PlayAudioStreamForPlayer(playerid,"http://online.nashipesni.ru:8000/nashipesni");}
           case 11: {GameTextForPlayer(playerid,"D-fm",3000,5);PlayAudioStreamForPlayer(playerid,"http://santa-rossa.ru/Vse_dly_samp/dfm.m3u");}
           case 12: {GameTextForPlayer(playerid,"Ultra",3000,5);PlayAudioStreamForPlayer(playerid,"http://santa-rossa.ru/Vse_dly_samp/radio_ultra_192.m3u");}
           case 13: {GameTextForPlayer(playerid,"Nashe Radio",3000,5);PlayAudioStreamForPlayer(playerid,"http://santa-rossa.ru/Vse_dly_samp/nashe-192.m3u");}
           case 14: {GameTextForPlayer(playerid,"Full-On",3000,5);PlayAudioStreamForPlayer(playerid,"http://santa-rossa.ru/Vse_dly_samp/full-on.m3u");}
        }
     }
else if(oldstate == PLAYER_STATE_DRIVER || oldstate == PLAYER_STATE_PASSENGER)StopAudioStreamForPlayer(playerid);

4. в public OnPlayerCommandText

Code

    if (strcmp("/nextradio", cmdtext, true, 10) == 0)
     {
        if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)
        {
           new veh = GetPlayerVehicleID(playerid);
           if(Radiostation[veh] != 10)Radiostation[veh] ++;
           else Radiostation[veh] = 0;
           for(new i; i < GetMaxPlayers(); i++)
           {
              if(GetPlayerVehicleID(i) == veh)
              {
                  switch(Radiostation[veh])
                  {
                      case 0: {GameTextForPlayer(i,"Radio Off",3000,5);StopAudioStreamForPlayer(i);}
                      case 1: {GameTextForPlayer(i,"Europa plus",3000,5);PlayAudioStreamForPlayer(i,"http://webcast.emg.fm:55655/europaplus128.mp3");}
                      case 2: {GameTextForPlayer(i,"Maks FM",3000,5);PlayAudioStreamForPlayer(i,"http://radio.maks-fm.ru:8000/maksfm128.m3u");}
                      case 3: {GameTextForPlayer(i,"ICE FM",3000,5);PlayAudioStreamForPlayer(i,"http://icefm.ru/etc/live.m3u");}
                      case 4: {GameTextForPlayer(i,"Vesti FM",3000,5);PlayAudioStreamForPlayer(i,"http://audio.rambler.ru/play.html?id=2537099");}
                      case 5: {GameTextForPlayer(i,"Russian Radio",3000,5);PlayAudioStreamForPlayer(i,"http://radio01-cn03.akadostream.ru:8000/russianradio128.mp3");}
                      case 6: {GameTextForPlayer(i,"Mayak Radio",3000,5);PlayAudioStreamForPlayer(i,"http://radio01-cn03.akadostream.ru:8000/mayak128.mp3");}
                      case 7: {GameTextForPlayer(i,"Nashe Radio",3000,5);PlayAudioStreamForPlayer(i,"http://188.127.243.169:80/nashe-192");}
                      case 8: {GameTextForPlayer(i,"Retro FM",3000,5);PlayAudioStreamForPlayer(i,"http://radio01-cn03.akadostream.ru:8000/radioretro128.mp3");}
                      case 9: {GameTextForPlayer(i,"Radio Shanson",3000,5);PlayAudioStreamForPlayer(i,"http://radio02-cn03.akadostream.ru:8108/shanson128.mp3");}
                      case 10: {GameTextForPlayer(i,"Nashi Pesni",3000,5);PlayAudioStreamForPlayer(i,"http://online.nashipesni.ru:8000/nashipesni");}
                      case 11: {GameTextForPlayer(i,"D-fm",3000,5);PlayAudioStreamForPlayer(i,"http://santa-rossa.ru/Vse_dly_samp/dfm.m3u");}
                      case 12: {GameTextForPlayer(i,"Ultra",3000,5);PlayAudioStreamForPlayer(i,"http://santa-rossa.ru/Vse_dly_samp/radio_ultra_192.m3u");}
                      case 13: {GameTextForPlayer(i,"Nashe Radio",3000,5);PlayAudioStreamForPlayer(i,"http://santa-rossa.ru/Vse_dly_samp/nashe-192.m3u");}
                      case 14: {GameTextForPlayer(i,"Full-On",3000,5);PlayAudioStreamForPlayer(i,"http://santa-rossa.ru/Vse_dly_samp/full-on.m3u");}
                  }
              }
           }
        }
        return 1;
     }
if (strcmp("/back", cmdtext, true, 10) == 0)
     {
        if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)
        {
           new veh = GetPlayerVehicleID(playerid);
           if(Radiostation[veh] != 0)Radiostation[veh] --;
           else Radiostation[veh] = 10;
           for(new i; i < GetMaxPlayers(); i++)
           {
              if(GetPlayerVehicleID(i) == veh)
              {
                  switch(Radiostation[veh])
                  {
                      case 0: {GameTextForPlayer(i,"Radio Off",3000,5);StopAudioStreamForPlayer(i);}
                      case 1: {GameTextForPlayer(i,"Europa plus",3000,5);PlayAudioStreamForPlayer(i,"http://webcast.emg.fm:55655/europaplus128.mp3");}
                      case 2: {GameTextForPlayer(i,"Maks FM",3000,5);PlayAudioStreamForPlayer(i,"http://radio.maks-fm.ru:8000/maksfm128.m3u");}
                      case 3: {GameTextForPlayer(i,"ICE FM",3000,5);PlayAudioStreamForPlayer(i,"http://icefm.ru/etc/live.m3u");}
                      case 4: {GameTextForPlayer(i,"Vesti FM",3000,5);PlayAudioStreamForPlayer(i,"http://audio.rambler.ru/play.html?id=2537099");}
                      case 5: {GameTextForPlayer(i,"Russian Radio",3000,5);PlayAudioStreamForPlayer(i,"http://radio01-cn03.akadostream.ru:8000/russianradio128.mp3");}
                      case 6: {GameTextForPlayer(i,"Mayak Radio",3000,5);PlayAudioStreamForPlayer(i,"http://radio01-cn03.akadostream.ru:8000/mayak128.mp3");}
                      case 7: {GameTextForPlayer(i,"Nashe Radio",3000,5);PlayAudioStreamForPlayer(i,"http://188.127.243.169:80/nashe-192");}
                      case 8: {GameTextForPlayer(i,"Retro FM",3000,5);PlayAudioStreamForPlayer(i,"http://radio01-cn03.akadostream.ru:8000/radioretro128.mp3");}
                      case 9: {GameTextForPlayer(i,"Radio Shanson",3000,5);PlayAudioStreamForPlayer(i,"http://radio02-cn03.akadostream.ru:8108/shanson128.mp3");}
                      case 10: {GameTextForPlayer(i,"Nashi Pesni",3000,5);PlayAudioStreamForPlayer(i,"http://online.nashipesni.ru:8000/nashipesni");}
                      case 11: {GameTextForPlayer(i,"D-fm",3000,5);PlayAudioStreamForPlayer(i,"http://santa-rossa.ru/Vse_dly_samp/dfm.m3u");}
                      case 12: {GameTextForPlayer(i,"Ultra",3000,5);PlayAudioStreamForPlayer(i,"http://santa-rossa.ru/Vse_dly_samp/radio_ultra_192.m3u");}
                      case 13: {GameTextForPlayer(i,"Nashe Radio",3000,5);PlayAudioStreamForPlayer(i,"http://santa-rossa.ru/Vse_dly_samp/nashe-192.m3u");}
                      case 14: {GameTextForPlayer(i,"Full-On",3000,5);PlayAudioStreamForPlayer(i,"http://santa-rossa.ru/Vse_dly_samp/full-on.m3u");}
                  }
              }
           }
        }
        return 1;
     }

5. в public OnPlayerKeyStateChange

Code

if(newkeys == 8192)OnPlayerCommandText(playerid,"/back");// Num 4
if(newkeys == 16384)OnPlayerCommandText(playerid,"/nextradio");// Num 6

Latron

Дата: Четверг, 23.02.2012, 21:36 | Сообщение # 2

Группа: I'm V.I.P.

Сообщений: 2115

Награды: 22

Город: Орел

Репутация: 1604

Замечания: 0%

Статус:

Бред ненужный.

Моё портфолио

Мои работы:
[ Lesson ] Операторы в PAWN.
[ Lesson ] Переменная.
[ GM ] RegSys. ( Last update: 21.04.2012 )

Lom4ik13

Дата: Четверг, 23.02.2012, 21:53 | Сообщение # 3

Уверенный в себе

Группа: Продвинутые

Сообщений: 286

Награды: 3

Город: Киев

Репутация: -74

Замечания: 80%

Статус:

Latron, может комуто и нужный!

aptyp

Дата: Воскресенье, 26.02.2012, 19:56 | Сообщение # 4

Продаюсь дешего

Группа: Продвинутые

Сообщений: 141

Награды: 2

Город: Green-X

Репутация: 405

Замечания: 20%

Статус:

Quote (Latron)

Бред ненужный.

Почему же не нужный? Ты про функцию PlayAudioStreamForPlayer или про сам код?

Borog

Дата: Воскресенье, 26.02.2012, 20:23 | Сообщение # 5

Долгожитель

Группа: I'm V.I.P.

Сообщений: 1362

Награды: 43

Город: Москва

Репутация: 1249

Замечания: 20%

Статус:

Это мануал, а не урок. В уроке обучают, а здесь тупой(просто) код.
Мало того, он еще и не оптимизирован. Все можно сделать в разы проще.

Silver Break
http://s-break.ru/
http://vk.com/sbreak

Desert

Дата: Воскресенье, 26.02.2012, 21:02 | Сообщение # 6

Местный

Группа: I'm V.I.P.

Сообщений: 669

Награды: 57

Город: Москва

Репутация: 1082

Замечания: 0%

Статус:

Quote (Borog)

Мало того, он еще и не оптимизирован. Все можно сделать в разы проще.

+1
Поддерживаю
Если сам написал, то молодец, а если вырезал, то хотя бы сделал оптимизацию

Хасан

Дата: Воскресенье, 26.02.2012, 21:32 | Сообщение # 7

Группа: Модераторы

Сообщений: 2816

Награды: 388

Город: X-Files

Репутация: 2965

Замечания: 0%

Статус:

Вырезал я уверен

малі діти недають нам спати - великі діти недають нам жити © Iван Миколайчук

— Вот ты говорил, город — сила, а здесь слабые все.
— Город — это злая сила. Сильный приезжает — становится слабым. Город забирает силу. Вот и ты пропал…© Брат

— ...лягушки падают с неба
— Видимо у них не раскрылись парашюты. © X-Files

— Разве вы не хотели бы жить вечно?
— Если в моде останутся штаны со стрелками то нет.© X-Files

Ибо таковые лжеапостолы, лукавые делатели, принимают вид Апостолов Христовых. И неудивительно: потому что сам сатана принимает вид Ангела света, а потому не великое дело, если и служители его принимают вид служителей правды; но конец их будет по делам их.
(2Кор 11:13-15).

Artem_T

Дата: Воскресенье, 26.02.2012, 21:58 | Сообщение # 8

Освоившийся

Группа: I'm V.I.P.

Сообщений: 132

Награды: 26

Город: Полтава

Репутация: 59

Замечания: 40%

Статус:

Вообще урок ниочем, но за старание могли бы похвалить)

Bacardi

Дата: Среда, 29.02.2012, 03:46 | Сообщение # 9

Новенький

Группа: Пользователи

Сообщений: 27

Награды: 0

Город: Коктейлей

Репутация: 0

Замечания: 0%

Статус:

Да с уроком переборщил , но да за старание спасибо.

Так вобще не нужный скрипт.

Alcoholik

Дата: Среда, 29.02.2012, 07:39 | Сообщение # 10

Мастер джэдай

Группа: Администратор

Сообщений: 8299

Награды: 111

Город: Санкт-Петербург

Репутация: 6085

Статус:

Quote (Latron)

Бред ненужный.

if(isset($beer)&&isset($girl)) { drink($beer);fuck($girl); }else die();
Мониторинг sa:mp серверов

Приватно никого не консультирую, моды также не пишу, ни так, ни за деньги.
Моя ICQ 675715, пишу только с неё. Все остальные Роачи фейки, ничего я не продаю и продавать не буду, вас разводят.

Krow_lik

Дата: Среда, 29.02.2012, 09:24 | Сообщение # 11

Илитка SRC

Группа: Media-ProGroup

Сообщений: 2246

Награды: 197

Город: НиНо

Репутация: 3625

Замечания: 0%

Статус:

Quote (Lom4ik13)

Врубается автоматически!

К чёрту.
У меня например скорости интернета не хватает,чтобы грузить все эти радио и я просто вылетаю с серверов на которых есть радио.

Mckenzy

Дата: Среда, 29.02.2012, 15:33 | Сообщение # 12

Советчик

Группа: I'm V.I.P.

Сообщений: 1212

Награды: 130

Город: Ярославль

Репутация: 2125

Замечания: 80%

Статус:

Quote (Borog)

Все можно сделать в разы проще.

Плюсану

Quote (Августин)

Вырезал я уверен

Уверен больше чем на 99.99%