Advertisement
Guest User

Radio System by DuReX

a guest
Nov 13th, 2012
3,789
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 7.84 KB | None | 0 0
  1. #if defined CREDITS
  2.                             ___________________________________
  3.                             |                                  |
  4.                             | Radio System                     |
  5.                             | - made by [RNG]DuReX             |
  6.                             | - timp de lucru: 30 de minute    |
  7.                             | - versiune: 1.0                  |
  8.                             | - data: 13 februarie 2012        |
  9.                             | - linii: 181                     |
  10.                             | Alte credite:                    |
  11.                             | - Zeex (ZCMD Command Processor)  |
  12.                             | - creatorii radio-urilor         |
  13.                             |__________________________________|
  14.  
  15.  
  16. #endif
  17. //=====================================//
  18. #include                    <a_samp>
  19. #include                    <zcmd>
  20. //=====================================//
  21. #define     DIALOG_RADIO    2012
  22. //=====================================//
  23. new string[256], pName[MAX_PLAYER_NAME];
  24.  
  25. public OnFilterScriptInit()
  26. {
  27.     print("\n--------------------------------------");
  28.     print("DuReX's Radio Filterscript v1.0 loaded!");
  29.     print("--------------------------------------\n");
  30.     return 1;
  31. }
  32. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  33. {
  34.     if(dialogid == DIALOG_RADIO)
  35.     {
  36.         if(response)
  37.         {
  38.             switch(listitem)
  39.             {
  40.                 case 0: return cmd_radiowish(playerid);
  41.                 case 1:return cmd_radiohit(playerid);
  42.                 case 2: return cmd_contactfm(playerid);
  43.                 case 3: return cmd_romanianhiphop(playerid);
  44.                 case 4: return cmd_romanianmanele(playerid);
  45.                 case 5: return cmd_romanianpopular(playerid);
  46.                 case 6: return cmd_profm(playerid);
  47.                 case 7: return cmd_gmusic(playerid);
  48.                 case 8: return cmd_radiotube(playerid);
  49.                 case 9: return cmd_radiomafia(playerid);
  50.                 case 10: return cmd_greudedifuzat(playerid);
  51.                 case 11: return cmd_stopradio(playerid);
  52.             }
  53.         }
  54.         return 1;
  55.     }
  56.     return 0;
  57. }
  58. CMD:radio(playerid, params[])
  59. {
  60.     new sradio[1900];
  61.     strcat(sradio, "{FFFFFF}RadioWISH {FF0000}\t\t\t /radiowish\n", 1900 );
  62.     strcat(sradio, "{FFFFFF}Radio HiT FM {FF0000}\t\t\t /radiohit\n", 1900 );
  63.     strcat(sradio, "{FFFFFF}Contact FM {FF0000}\t\t\t /contactfm\n", 1900 );
  64.     strcat(sradio, "{FFFFFF}Radio Romanian Hip-Hop {FF0000}\t /romanianhiphop\n", 1900 );
  65.     strcat(sradio, "{FFFFFF}Radio Romanian Manele {FF0000}\t /romanianmanele\n", 1900 );
  66.     strcat(sradio, "{FFFFFF}Radio Romanian Popular {FF0000}\t /romanianpopular\n", 1900 );
  67.     strcat(sradio, "{FFFFFF}Pro FM {FF0000}\t\t\t\t /profm\n", 1900 );
  68.     strcat(sradio, "{FFFFFF}Radio GMusic Rock {FF0000}\t\t /gmusic\n", 1900 );
  69.     strcat(sradio, "{FFFFFF}radio-tube.pl Dubstep {FF0000}\t\t /radiotube\n", 1900 );
  70.     strcat(sradio, "{FFFFFF}Radio Mafia {FF0000}\t\t\t /radiomafia\n", 1900 );
  71.     strcat(sradio, "{FFFFFF}Radio Greu de Difuzat {FF0000}\t\t /greudedifuzat\n", 1900 );
  72.     strcat(sradio, "{FF0000}Opreste radioul \t\t /stopradio", 1900 );
  73.     ShowPlayerDialog(playerid, DIALOG_RADIO, DIALOG_STYLE_LIST, "{FFFFFF}Meniu {FF0000}Radio", sradio, "Selecteaza","Inchide");
  74.     return 1;
  75. }
  76. CMD:radiohit(playerid)
  77. {
  78.     GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
  79.     format(string,sizeof string,"{FF0000}%s {FFFFFF}asculta {FF0000}Radio HiT FM (/radiohit)",pName);
  80.     SendClientMessageToAll(0xFFFFFFAA,string);
  81.     PlayAudioStreamForPlayer(playerid, "http://www.radio-hit.ro/asculta.m3u");
  82.     GameTextForPlayer(playerid, "~n~~n~~n~~n~~n~~n~~n~~n~~w~buffering ~r~radio hit~w~...", 1500, 3);
  83.     return 1;
  84. }
  85. CMD:radiowish(playerid)
  86. {
  87.     GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
  88.     format(string,sizeof string,"{FF0000}%s {FFFFFF}asculta {FF0000}RadioWISH (/radiowish)",pName);
  89.     SendClientMessageToAll(0xFFFFFFAA,string);
  90.     PlayAudioStreamForPlayer(playerid, "http://www.radiowish.ro/live.m3u");
  91.     GameTextForPlayer(playerid, "~n~~n~~n~~n~~n~~n~~n~~n~~w~buffering ~r~radio wish~w~...", 1500, 3);
  92.     return 1;
  93.     }
  94. CMD:contactfm(playerid)
  95. {
  96.     GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
  97.     format(string,sizeof string,"{FF0000}%s {FFFFFF}asculta {FF0000}Contact FM (/contactfm)",pName);
  98.     SendClientMessageToAll(0xFFFFFFAA,string);
  99.     PlayAudioStreamForPlayer(playerid, "http://www.contactfm.ro/listen.pls");
  100.     GameTextForPlayer(playerid, "~n~~n~~n~~n~~n~~n~~n~~n~~w~buffering ~r~contact fm~w~...", 1500, 3);
  101.     return 1;
  102. }
  103. CMD:romanianhiphop(playerid)
  104. {
  105.     GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
  106.     format(string,sizeof string,"{FF0000}%s {FFFFFF}asculta {FF0000}Radio Romanian Hip-Hop (/romanianhiphop)",pName);
  107.     SendClientMessageToAll(0xFFFFFFAA,string);
  108.     PlayAudioStreamForPlayer(playerid, "http://radioromanian.net/hiphop.pls");
  109.     GameTextForPlayer(playerid, "~n~~n~~n~~n~~n~~n~~n~~n~~w~buffering ~r~radio romanian hip-hop~w~...", 1500, 3);
  110.     return 1;
  111. }
  112. CMD:romanianpopular(playerid)
  113. {
  114.     GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
  115.     format(string,sizeof string,"{FF0000}%s {FFFFFF}asculta {FF0000}Radio Romanian Popular (/romanianpopular)",pName);
  116.     SendClientMessageToAll(0xFFFFFFAA,string);
  117.     PlayAudioStreamForPlayer(playerid, "http://radioromanian.net/popular.pls");
  118.     GameTextForPlayer(playerid, "~n~~n~~n~~n~~n~~n~~n~~n~~w~buffering ~r~radio romanian popular~w~...", 1500, 3);
  119.     return 1;
  120. }
  121. CMD:romanianmanele(playerid)
  122. {
  123.     GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
  124.     format(string,sizeof string,"{FF0000}%s {FFFFFF}asculta {FF0000}Radio Romanian Manele (/romanianmanele)",pName);
  125.     SendClientMessageToAll(0xFFFFFFAA,string);
  126.     PlayAudioStreamForPlayer(playerid, "http://radioromanian.net/manele.pls");
  127.     GameTextForPlayer(playerid, "~n~~n~~n~~n~~n~~n~~n~~n~~w~buffering ~r~radio romanian manele~w~...", 1500, 3);
  128.     return 1;
  129. }
  130. CMD:profm(playerid)
  131. {
  132.     GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
  133.     format(string,sizeof string,"{FF0000}%s {FFFFFF}asculta {FF0000}Pro FM (/profm)",pName);
  134.     SendClientMessageToAll(0xFFFFFFAA,string);
  135.     PlayAudioStreamForPlayer(playerid, "http://stream.profm.ro:8012/profm.mp3");
  136.     GameTextForPlayer(playerid, "~n~~n~~n~~n~~n~~n~~n~~n~~w~buffering ~r~pro fm~w~...", 1500, 3);
  137.     return 1;
  138. }
  139. CMD:gmusic(playerid)
  140. {
  141.     GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
  142.     format(string,sizeof string,"{FF0000}%s {FFFFFF}asculta {FF0000}Radio GMusic Rock (/gmusic)",pName);
  143.     SendClientMessageToAll(0xFFFFFFAA,string);
  144.     PlayAudioStreamForPlayer(playerid, "http://www.radiogmusic.com/rock.m3u");
  145.     GameTextForPlayer(playerid, "~n~~n~~n~~n~~n~~n~~n~~n~~w~buffering ~r~radio gmusci rock~w~...", 1500, 3);
  146.     return 1;
  147. }
  148. CMD:radiotube(playerid)
  149. {
  150.     GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
  151.     format(string,sizeof string,"{FF0000}%s {FFFFFF}asculta {FF0000}radio-tube.pl Dubstep (/radiotube)",pName);
  152.     SendClientMessageToAll(0xFFFFFFAA,string);
  153.     PlayAudioStreamForPlayer(playerid, "http://s4.radiohost.pl:8154/listen.pls");
  154.     GameTextForPlayer(playerid, "~n~~n~~n~~n~~n~~n~~n~~n~~w~buffering ~r~radio-tube.pl dubstep~w~...", 1500, 3);
  155.     return 1;
  156. }
  157. CMD:radiomafia(playerid)
  158. {
  159.     GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
  160.     format(string,sizeof string,"{FF0000}%s {FFFFFF}asculta {FF0000}Radio Mafia (/radiomafia)",pName);
  161.     SendClientMessageToAll(0xFFFFFFAA,string);
  162.     PlayAudioStreamForPlayer(playerid, "http://www.radiomafia.ro/listen.m3u");
  163.     GameTextForPlayer(playerid, "~n~~n~~n~~n~~n~~n~~n~~n~~w~buffering ~r~radio mafia~w~...", 1500, 3);
  164.     return 1;
  165. }
  166. CMD:greudedifuzat(playerid)
  167. {
  168.     GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
  169.     format(string,sizeof string,"{FF0000}%s {FFFFFF}asculta {FF0000}Radio Greu de Difuzat (/greudedifuzat)",pName);
  170.     SendClientMessageToAll(0xFFFFFFAA,string);
  171.     PlayAudioStreamForPlayer(playerid, "http://www.greudedifuzat.eu/greudedifuzat.m3u");
  172.     GameTextForPlayer(playerid, "~n~~n~~n~~n~~n~~n~~n~~n~~w~buffering ~r~radio greu de difuzat~w~...", 1500, 3);
  173.     return 1;
  174. }
  175. CMD:stopradio(playerid)
  176. {
  177.     PlayAudioStreamForPlayer(playerid, "Radio oprit.");
  178.     StopAudioStreamForPlayer(playerid);
  179.     return 1;
  180. }
  181. //End of the script. © 2012 [RNG]DuReX.=======================================//
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement