API tools faq
paste
byted

[GM] Meu Primeiro

byted
Mar 29th, 2014
281
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 9.96 KB | None | 0 0
raw download clone embed print report
  1. /*
  2. GM COM INCLUDES ATUALIZADES E BEM OTIMIZADO
  3. ESSE GM ERA UM QUE EU TINHA FEITO E RESOLVI POSTA NO FORUM
  4. ESPERO QUE GOSTEM, SE VOCÊ FOR USAR ALGO, FAVOR COLOQUE CREDITOS
  5. Obs: Cordenadas[Ramdom,Teles] não salvas por mim.
  6. Random: BrunoBSF
  7. Teles: Não sei, por que esse GM é velho meu.
  8. Linhas: 280 (Bem otimizado)
  9. */
  10. #include a_samp
  11. #include zcmd
  12. #include sscanf
  13. //
  14. main(){
  15.     printf("~~~~~~~~~~~ GM CARREGADO ~~~~~~~~~~~");}
  16. //
  17. #define roxo 0xA70EE3FF
  18. #define amarelo 0xE3CA0EFF
  19. #define azul 0x092ABAFF
  20. #define azulc 0x6380FFFF
  21. #define verde 0x35ED07FF
  22. #define verdec 0x97FF7DFF
  23. #define rosa 0xE327CAFF
  24. #define vermelho 0xE30B0BFF
  25. #define vermelhoc 0xF7575FF
  26. #define branco 0xFFFFFFFF
  27. #define Msg(%0,%1,%2) SendClientMessage(%0,%1,%2)
  28. #define MsgToAll(%0,%1) SendClientMessageToAll(%0,%1)
  29. #define Loop(%0,%1) for(new %0; %0 < %1; %0++)
  30. //
  31. new Text:text[10];
  32. new gName[MAX_PLAYER_NAME];
  33. new msg[128];
  34. new Float:RandomSpawns[23][3] = { // By: BrunoBSF[forum-samp]
  35.     {1958.3783,1343.1572,15.3746},
  36.     {2199.6531,1393.3678,10.8203},
  37.     {2483.5977,1222.0825,10.8203},
  38.     {2637.2712,1129.2743,11.1797},
  39.     {2000.0106,1521.1111,17.0625},
  40.     {2024.8190,1917.9425,12.3386},
  41.     {2261.9048,2035.9547,10.8203},
  42.     {2262.0986,2398.6572,10.8203},
  43.     {2244.2566,2523.7280,10.8203},
  44.     {2335.3228,2786.4478,10.8203},
  45.     {2150.0186,2734.2297,11.1763},
  46.     {2158.0811,2797.5488,10.8203},
  47.     {1969.8301,2722.8564,10.8203},
  48.     {1652.0555,2709.4072,10.8265},
  49.     {1564.0052,2756.9463,10.8203},
  50.     {1271.5452,2554.0227,10.8203},
  51.     {1441.5894,2567.9099,10.8203},
  52.     {1480.6473,2213.5718,11.0234},
  53.     {1400.5906,2225.6960,11.0234},
  54.     {1598.8419,2221.5676,11.0625},
  55.     {1318.7759,1251.3580,10.8203},
  56.     {1558.0731,1007.8292,10.8125},
  57.     {1705.2347,1025.6808,10.8203}
  58. };
  59. //
  60. public OnGameModeInit()
  61. {
  62.     SetGameModeText("Byted GM");
  63.     UsePlayerPedAnims();
  64.     text[1] = TextDrawCreate(1.000000, -1.000000, "loadsc5:loadsc5");
  65.     TextDrawBackgroundColor(text[1], 255);
  66.     TextDrawFont(text[1], 4);
  67.     TextDrawLetterSize(text[1], 0.500000, 1.000000);
  68.     TextDrawColor(text[1], -1);
  69.     TextDrawSetOutline(text[1], 0);
  70.     TextDrawSetProportional(text[1], 1);
  71.     TextDrawSetShadow(text[1], 1);
  72.     TextDrawUseBox(text[1], 1);
  73.     TextDrawBoxColor(text[1], 255);
  74.     TextDrawTextSize(text[1], 645.000000, 450.000000);
  75.     //
  76.     text[2] = TextDrawCreate(240.000000, 410.000000, "Carregando..");
  77.     TextDrawBackgroundColor(text[2],255);
  78.     TextDrawFont(text[2],3);
  79.     TextDrawLetterSize(text[2],1.200000,4.000000);
  80.     TextDrawColor(text[2],verde);
  81.     TextDrawSetOutline(text[2],0);
  82.     TextDrawSetProportional(text[2], 1);
  83.     TextDrawSetShadow(text[2], 1);
  84.     //
  85.     text[3] = TextDrawCreate(521.000000, 423.000000, "Byted DM");
  86.     TextDrawBackgroundColor(text[3], 255);
  87.     TextDrawFont(text[3], 3);
  88.     TextDrawLetterSize(text[3], 0.529999, 1.599999);
  89.     TextDrawColor(text[3], vermelho);
  90.     TextDrawSetOutline(text[3], 0);
  91.     TextDrawSetProportional(text[3], 1);
  92.     TextDrawSetShadow(text[3], 1);
  93.     //
  94.     Loop(skins,299) AddPlayerClass(skins,0,0,0,0,32,1000,26,1000,24,1000);
  95.     return 1;
  96. }
  97. //
  98. public OnPlayerConnect(playerid)
  99. {
  100.     Msg(playerid,verdec,"~~~~~~~~~~~~~~~~~~~~~~~ Byted DM/TDM ~~~~~~~~~~~~~~~~~~~~~~~~ ");
  101.     Msg(playerid,branco,"Seja bem vindo ao nosso servidor, tenha um ótimo jogo!");
  102.     Msg(playerid,branco,"/comandos - para ver os comandos do servidor");
  103.     Msg(playerid,branco,"/creditos - para ver os creditos do servidor");
  104.     Msg(playerid,verdec,"~~~~~~~~~~~~~~~~~~~~~~~ Byted DM/TDM ~~~~~~~~~~~~~~~~~~~~~~~~ ");
  105.     TextDrawShowForPlayer(playerid, text[1]);//
  106.     TextDrawShowForPlayer(playerid, text[2]);//
  107.     GetPlayerName(playerid,gName,sizeof(gName));//
  108.     format(msg, sizeof(msg), "%s entrou no servidor.",gName);
  109.     MsgToAll(azul,msg);
  110.     return 1;
  111. }
  112. //
  113. public OnPlayerDisconnect(playerid, reason)
  114. {
  115.     GetPlayerName(playerid,gName,sizeof(gName));
  116.     switch(reason)
  117.     {
  118.         case 0: format(msg, sizeof(msg), "%s saiu do servidor. (Crash)", gName);
  119.         case 1: format(msg, sizeof(msg), "%s saiu do servidor. (Conta propria)", gName);
  120.         case 2: format(msg, sizeof(msg), "%s saiu do servidor. (Kick/Ban)", gName);
  121.     }
  122.     MsgToAll(roxo,msg);
  123.     return 1;
  124. }
  125. //
  126. public OnPlayerRequestClass(playerid, classid)
  127. {
  128.     TextDrawHideForPlayer(playerid, text[1]);//
  129.     TextDrawHideForPlayer(playerid, text[2]);//
  130.     SetPlayerPos(playerid,1678.9169,1447.8788,47.7780);
  131.     SetPlayerFacingAngle(playerid,271.9625);
  132.     SetPlayerCameraPos(playerid,1682.4458,1448.0004,49.6016);
  133.     SetPlayerCameraLookAt(playerid,1678.9169,1447.8788,47.7780);
  134.     ApplyAnimation(playerid, "PARK", "Tai_Chi_Loop", 4.0, 1, 0, 0, 0, 0);
  135.     return 1;
  136. }
  137. //
  138. public OnPlayerDeath(playerid, killerid, reason)
  139. {
  140.     SetPlayerScore(playerid,GetPlayerScore(playerid) -1);
  141.     SetPlayerScore(killerid,GetPlayerScore(playerid) +1);
  142.     GivePlayerMoney(playerid,-500);
  143.     GivePlayerMoney(killerid,500);
  144.     return 1;
  145. }
  146. //
  147. public OnPlayerSpawn(playerid)
  148. {
  149.     TextDrawShowForPlayer(playerid, text[3]);//
  150.     new Random = random(sizeof(RandomSpawns));//
  151.     SetPlayerPos(playerid, RandomSpawns[Random][0], RandomSpawns[Random][1], RandomSpawns[Random][2]);//
  152.     return 1;
  153. }
  154. //
  155. CMD:health(playerid)
  156. {
  157.     if(GetPlayerMoney(playerid) < 500) return Msg(playerid,vermelho,"ERRO: dinheiro insuficiente[R$500].");
  158.     GivePlayerMoney(playerid,-500);
  159.     SetPlayerHealth(playerid,100);
  160.     Msg(playerid,azulc,"Vida comprada com sucesso.");
  161.     return 1;
  162. }
  163. CMD:armour(playerid)
  164. {
  165.     if(GetPlayerMoney(playerid) < 1000) return Msg(playerid,vermelho,"ERRO: dinheiro insuficiente[R$1000].");
  166.     GivePlayerMoney(playerid,-1000);
  167.     SetPlayerArmour(playerid,100);
  168.     Msg(playerid,azulc,"Colete comprado com sucesso.");
  169.     return 1;
  170. }
  171. CMD:kit1(playerid)
  172. {
  173.     if(GetPlayerMoney(playerid) < 2000) return Msg(playerid,vermelho,"ERRO: dinheiro insuficiente.[R$2000]");
  174.     GivePlayerMoney(playerid,-2000);
  175.     GivePlayerWeapon(playerid,23,400);
  176.     GivePlayerWeapon(playerid,26,400);
  177.     GivePlayerWeapon(playerid,29,400);
  178.     GivePlayerWeapon(playerid,30,400);
  179.     Msg(playerid,azulc,"KIT1 comprado com sucesso.");
  180.     return 1;
  181. }
  182. CMD:kit2(playerid)
  183. {
  184.     if(GetPlayerMoney(playerid) < 2500) return Msg(playerid,vermelho,"ERRO: dinheiro insuficiente.[R$2500]");
  185.     GivePlayerMoney(playerid,-2500);
  186.     GivePlayerWeapon(playerid,28,400);
  187.     GivePlayerWeapon(playerid,27,400);
  188.     GivePlayerWeapon(playerid,34,400);
  189.     GivePlayerWeapon(playerid,31,400);
  190.     Msg(playerid,azulc,"KIT2 comprado com sucesso.");
  191.     return 1;
  192. }
  193. CMD:kit3(playerid)
  194. {
  195.     if(GetPlayerMoney(playerid) < 3000) return Msg(playerid,vermelho,"ERRO: dinheiro insuficiente.[R$3000]");
  196.     GivePlayerMoney(playerid,-3000);
  197.     GivePlayerWeapon(playerid,23,500);
  198.     GivePlayerWeapon(playerid,31,500);
  199.     GivePlayerWeapon(playerid,32,500);
  200.     GivePlayerWeapon(playerid,34,500);
  201.     Msg(playerid,azulc,"KIT3 comprado com sucesso.");
  202.     return 1;
  203. }
  204. CMD:ls(playerid)
  205. {
  206.     if(IsPlayerInAnyVehicle(playerid))
  207.     {
  208.         new vid;
  209.         vid = GetPlayerVehicleID(playerid);
  210.         SetVehiclePos(vid,1130.2557,-1456.8792,15.7969);
  211.         GetPlayerName(playerid,gName,sizeof(gName));
  212.         format(msg, sizeof(msg), "O jogador %s foi para LS (/ls)", gName);
  213.         MsgToAll(verde,msg);
  214.     }
  215.     else
  216.     {
  217.         GetPlayerName(playerid,gName,sizeof(gName));//
  218.         SetPlayerPos(playerid,1130.2557,-1456.8792,15.7969);
  219.         format(msg, sizeof(msg), "O jogador %s foi para LS (/ls)", gName);//
  220.         MsgToAll(amarelo, msg);
  221.     }
  222.     return 1;
  223. }
  224. CMD:sf(playerid)
  225. {
  226.     if(IsPlayerInAnyVehicle(playerid))
  227.     {
  228.         new vid;
  229.         vid = GetPlayerVehicleID(playerid);
  230.         SetVehiclePos(vid,-1991.3342,107.3855,27.5391);
  231.         GetPlayerName(playerid,gName,sizeof(gName));
  232.         format(msg, sizeof(msg), "O jogador %s foi para SF (/sf)", gName);//
  233.         MsgToAll(verde,msg);
  234.     }
  235.     else
  236.     {
  237.         GetPlayerName(playerid,gName,sizeof(gName));//
  238.         SetPlayerPos(playerid,-1991.3342,107.3855,27.5391);
  239.         format(msg, sizeof(msg), "O jogador %s foi para SF (/sf)", gName);//
  240.         MsgToAll(amarelo, msg);
  241.     }
  242.     return 1;
  243. }
  244. CMD:lv(playerid)
  245. {
  246.     if(IsPlayerInAnyVehicle(playerid))
  247.     {
  248.         new vid;
  249.         vid = GetPlayerVehicleID(playerid);
  250.         SetVehiclePos(vid,2043.5553,1007.8821,10.6719);
  251.         GetPlayerName(playerid,gName,sizeof(gName));
  252.         format(msg, sizeof(msg), "O jogador %s foi para LV (/lv)", gName);//
  253.         MsgToAll(verde,msg);
  254.     }
  255.     else
  256.     {
  257.         GetPlayerName(playerid,gName,sizeof(gName));//
  258.         SetPlayerPos(playerid,2043.5553,1007.8821,10.6719);
  259.         format(msg, sizeof(msg), "O jogador %s foi para LV (/lv)", gName);//
  260.         MsgToAll(amarelo, msg);
  261.     }
  262.     return 1;
  263. }
  264. CMD:kill(playerid)
  265. {
  266.     SetPlayerHealth(playerid,0);
  267.     Msg(playerid,vermelho,"Você acaba de se matar");
  268.     return 1;
  269. }
  270. CMD:v(playerid,params[])
  271. {
  272.     new vid;
  273.     if(sscanf(params, "d",vid)) return Msg(playerid,vermelho,"USE: /v [id]");//
  274.     if(vid > 612 || vid < 400) return Msg(playerid,vermelho,"Carros de 400 á 611.");//
  275.     new Float:pos[3],carro[MAX_PLAYERS];
  276.     GetPlayerPos(playerid, pos[0], pos[1], pos[2]);//
  277.     carro[playerid] = CreateVehicle(vid, pos[0],pos[1],pos[2],0.0,134,121,60000);
  278.     PutPlayerInVehicle(playerid, carro[playerid], 0);//
  279.     Msg(playerid,verde,"Carro criado com sucesso.");
  280.     return 1;
  281. }
  282. CMD:comandos(playerid)
  283. {
  284.     Msg(playerid,amarelo,"~~~~~~~~~~~~~~~~~~~~~~~~ Comandos ~~~~~~~~~~~~~~~~~~~~~~~~ ");
  285.     Msg(playerid,branco,"/v [id], /kill, /lv, /sf, /ls, /kit1, /kit2, /kit3, /armour, /health");
  286.     Msg(playerid,amarelo,"~~~~~~~~~~~~~~~~~~~~~~~~ Comandos ~~~~~~~~~~~~~~~~~~~~~~~~ ");
  287.     return 1;
  288. }
  289. CMD:creditos(playerid)
  290. {
  291.     Msg(playerid,verde,"~~~~~~~~~~~~~~~~~~~~~~~~ Creditos ~~~~~~~~~~~~~~~~~~~~~~~~ ");
  292.     Msg(playerid,branco,"GM feito por Byted.");
  293.     Msg(playerid,branco,"Cordenadas: BrunoBSF, não sei mais quem.");
  294.     Msg(playerid,branco,"Agradecimentos: Forum SA-MP.");
  295.     Msg(playerid,verde,"~~~~~~~~~~~~~~~~~~~~~~~~ Creditos ~~~~~~~~~~~~~~~~~~~~~~~~ ");
  296.     return 1;
  297. }
  298. //FIM - FORUM.SA-MP.COM
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!