API tools faq
paste
Guest User

Pedagio System v0.1

a guest
Aug 9th, 2011
597
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 9.95 KB | None | 0 0
raw download clone embed print report
  1. #include <a_samp>
  2. #include <zcmd>
  3. #pragma tabsize 0
  4.  
  5. #define DialogCreditos 1
  6.  
  7. new PEDAGIO;
  8. new PEDAGIOB;
  9. new PEDAGIO2a;
  10. new PEDAGIO2b;
  11. new PEDAGIO3a;
  12. new PEDAGIO4a;
  13.  
  14.  
  15. forward PEDAGIOAA();
  16. public PEDAGIOAA()
  17. {
  18.     MoveObject(PEDAGIO,50.262802124023, -1538.0922851563, 4.5334191322327,1.0);
  19.     return 1;
  20. }
  21. forward PEDAGIOBB();
  22. public PEDAGIOBB()
  23. {
  24.     MoveObject(PEDAGIOB,38.308525085449, -1522.3610839844, 4.6134810447693,1.0);
  25.     return 1;
  26. }
  27. forward PEDAGIO2AA();
  28. public PEDAGIO2AA()
  29. {
  30.     MoveObject(PEDAGIO2a,2771.5119628906, -394.2326965332, 22.973459243774,1.0);
  31.     return 1;
  32. }
  33. forward PEDAGIO2BB();
  34. public PEDAGIO2BB()
  35. {
  36.     MoveObject(PEDAGIO2b,2759.0329589844, -408.44223022461, 22.989906311035,1.0);
  37.     return 1;
  38. }
  39. forward PEDAGIO3AA();
  40. public PEDAGIO3AA()
  41. {
  42.     MoveObject(PEDAGIO3a,96.531066894531, -1282.3725585938, 13.440967559814,1.0);
  43.     return 1;
  44. }
  45. forward PEDAGIO4AA();
  46. public PEDAGIO4AA()
  47. {
  48.     MoveObject(PEDAGIO4a,76.202934265137, -1263.2830810547, 13.720924377441,1.0);
  49.     return 1;
  50. }
  51. public OnFilterScriptInit()
  52. {
  53.     print("\n--------------------------------------");
  54.     print(" Pedagio System v0.1 by Leo_Perez");
  55.     print("--------------------------------------\n");
  56.     Create3DTextLabel("Aperte '2'\nEncima do 'W'",0xFFFF00FF,41.5136,-1537.2761,4.9358,50.0,0);//pedagio1
  57.     Create3DTextLabel("Aperte '2'\nEncima do 'W'",0xFFFF00FF,48.9068,-1524.8191,4.8192,50.0,0);//pedagio1
  58.     Create3DTextLabel("Aperte '2'\nEncima do 'W'",0xFFFF00FF,2755.6704,-405.6986,23.3840,50.0,0);//pedagio2
  59.     Create3DTextLabel("Aperte '2'\nEncima do 'W'",0xFFFF00FF,2774.1343,-397.0491,23.0892,50.0,0);//pedagio2
  60.     Create3DTextLabel("Aperte '2'\nEncima do 'W'",0xFFFF00FF,92.7667,-1285.5231,13.5556,50.0,0);//pedagio3 =D
  61.     Create3DTextLabel("Aperte '2'\nEncima do 'W'",0xFFFF00FF,79.8072,-1260.9324,14.0553,50.0,0);//ultimo pedagio(4)
  62.     CreateObject(3881, 48.729965209961, -1531.1173095703, 6.1691818237305, 0, 0, 82);
  63.     CreateObject(3881, 40.214614868164, -1529.4411621094, 6.2482013702393, 0, 0, 261.99645996094);
  64.     CreateObject(1237, 49.640350341797, -1543.5988769531, 4.1759648323059, 0, 0, 0);
  65.     CreateObject(1237, 50.283355712891, -1543.0452880859, 4.2053833007813, 0, 0, 0);
  66.     CreateObject(1237, 48.474166870117, -1542.681640625, 4.1819453239441, 0, 0, 0);
  67.     CreateObject(1232, 47.25853729248, -1542.8602294922, 6.8248224258423, 0, 0, 0);
  68.     CreateObject(1232, 36.769317626953, -1526.9178466797, 7.0652527809143, 0, 0, 0);
  69.     CreateObject(1232, 36.462753295898, -1531.44140625, 7.0680975914001, 0, 0, 0);
  70.     PEDAGIO = CreateObject(971, 50.262802124023, -1538.0922851563, 4.5334191322327, 0, 0, 262);
  71.     PEDAGIOB = CreateObject(971, 38.308525085449, -1522.3610839844, 4.6134810447693, 0, 0, 261.99645996094);
  72.     //pedágio2 aqui
  73.     CreateObject(3881, 2768.7529296875, -401.01916503906, 24.348476409912, 0, 0, 224.25);
  74.     CreateObject(3881, 2761.7565917969, -401.53967285156, 24.551654815674, 0, 0, 43.995239257813);
  75.     CreateObject(983, 2776.8337402344, -388.90768432617, 23.358406066895, 0, 0, 314);
  76.     CreateObject(718, 2779.4018554688, -391.31762695313, 22.542633056641, 0, 0, 316);
  77.     CreateObject(718, 2774.2185058594, -385.97061157227, 22.864345550537, 0, 0, 315.99975585938);
  78.     CreateObject(983, 2753.8146972656, -414.08065795898, 23.314632415771, 0, 0, 313.99475097656);
  79.     CreateObject(718, 2756.580078125, -417.80154418945, 22.462741851807, 0, 0, 315.99975585938);
  80.     CreateObject(718, 2750.6804199219, -411.43853759766, 22.8141746521, 0, 0, 315.99975585938);
  81.     CreateObject(1238, 2762.8305664063, -406.29547119141, 22.837093353271, 0, 0, 0);
  82.     CreateObject(1238, 2756.8947753906, -412.25207519531, 22.838285446167, 0, 0, 0);
  83.     CreateObject(1238, 2774.7795410156, -391.21966552734, 22.899139404297, 0, 0, 0);
  84.     CreateObject(1238, 2768.6606445313, -397.53500366211, 22.931829452515, 0, 0, 0);
  85.     CreateObject(1257, 2782.6943359375, -394.70965576172, 23.617706298828, 0, 0, 44);
  86.     CreateObject(1257, 2762.6779785156, -422.87127685547, 23.379640579224, 0, 0, 225.99475097656);
  87.     PEDAGIO2a = CreateObject(971, 2771.5119628906, -394.2326965332, 22.973459243774, 0, 0, 46);
  88.     PEDAGIO2b = CreateObject(971, 2759.0329589844, -408.44223022461, 22.989906311035, 0, 0, 45.999755859375);
  89.     ///pedagio 3
  90.     CreateObject(3881, 89.861061096191, -1278.9357910156, 14.896292686462, 0, 0, 126);
  91.     CreateObject(983, 101.77376556396, -1287.8745117188, 13.96461391449, 0, 0, 48);
  92.     CreateObject(1238, 99.237655639648, -1285.9040527344, 13.548146247864, 0, 0, 0);
  93.     CreateObject(1238, 93.541305541992, -1279.20703125, 13.327219009399, 0, 0, 0);
  94.     CreateObject(1257, 94.957939147949, -1291.9598388672, 14.198384284973, 0, 0, 310);
  95.     CreateObject(1346, 100.89759063721, -1289.0979003906, 14.571811676025, 0, 0, 310);
  96.     CreateObject(1238, 99.935554504395, -1286.6441650391, 13.55650806427, 0, 0, 0);
  97.     CreateObject(1238, 100.69205474854, -1287.4132080078, 13.566374778748, 0, 0, 0);
  98.     CreateObject(1238, 101.38417053223, -1287.9592285156, 13.581062316895, 0, 0, 0);
  99.     CreateObject(1238, 100.29541015625, -1288.7280273438, 13.611711502075, 0, 0, 0);
  100.     PEDAGIO3a = CreateObject(971, 96.531066894531, -1282.3725585938, 13.440967559814, 0, 0, 310);
  101.     //pedagio 4
  102.     CreateObject(1346, 73.782348632813, -1255.4715576172, 14.763814926147, 0, 0, 34);
  103.     CreateObject(3881, 82.657600402832, -1267.0057373047, 15.026962280273, 0, 0, 304);
  104.     CreateObject(983, 71.699829101563, -1257.2736816406, 14.108439445496, 0, 0, 37);
  105.     CreateObject(1257, 78.695175170898, -1252.4455566406, 14.800667762756, 0, 0, 126);
  106.     CreateObject(1238, 74.386459350586, -1259.3386230469, 13.591255187988, 0, 0, 0);
  107.     CreateObject(1238, 79.150917053223, -1266.4158935547, 13.616607666016, 0, 0, 0);
  108.     CreateObject(1238, 74.442947387695, -1258.3664550781, 13.760890007019, 0, 0, 0);
  109.     CreateObject(1238, 73.659233093262, -1257.6898193359, 13.756331443787, 0, 0, 0);
  110.     CreateObject(1238, 73.190910339355, -1256.8547363281, 13.754238128662, 0, 0, 0);
  111.     CreateObject(1238, 75.873199462891, -1255.4300537109, 13.775321006775, 0, 0, 0);
  112.     PEDAGIO4a = CreateObject(971, 76.202934265137, -1263.2830810547, 13.720924377441, 0, 0, 308);
  113.     return 1;
  114. }
  115.  
  116. public OnFilterScriptExit()
  117. {
  118.     return 1;
  119. }
  120.  
  121. main()
  122. {
  123.     print("\n----------------------------------");
  124.     print(" Pedagio System v0.1 by Leo_Perez");
  125.     print("----------------------------------\n");
  126. }
  127.  
  128.  
  129.  
  130.  
  131.  
  132.  
  133. public OnPlayerConnect(playerid)
  134. {
  135.     return 1;
  136. }
  137.  
  138. public OnPlayerDisconnect(playerid, reason)
  139. {
  140.     return 1;
  141. }
  142.  
  143. public OnVehicleDeath(vehicleid, killerid)
  144. {
  145.     return 1;
  146. }
  147.  
  148. public OnPlayerText(playerid, text[])
  149. {
  150.     return 1;
  151. }
  152.  
  153.  
  154. public OnPlayerStateChange(playerid, newstate, oldstate)
  155. {
  156.     return 1;
  157. }
  158. public OnPlayerKeyStateChange(playerid,newkeys,oldkeys)
  159. {
  160.     if(newkeys == KEY_SUBMISSION)
  161.     {
  162.     cmd_pedagio1( playerid,"" );
  163.     cmd_pedagio2( playerid,"" );
  164.     cmd_pedagio3( playerid,"" );
  165.     cmd_pedagio4( playerid,"" );
  166.     cmd_pedagio5( playerid,"" );
  167.     cmd_pedagio6( playerid,"" );
  168.     }
  169.  return 1;
  170. }
  171. CMD:pedagio1(playerid,params[])
  172. {
  173.     if(IsPlayerInRangeOfPoint(playerid,10.0,41.5136,-1537.2761,4.9358))
  174.     {
  175.     MoveObject(PEDAGIO,50.236389160156, -1538.0604248047, -2.6460840702057,1.0);
  176.     SetTimer("PEDAGIOAA",6000,false);
  177.     GivePlayerMoney(playerid,-250);
  178.     SendClientMessage(playerid,0xFFFF00FF,"Obrigado, tenha um bom dia");
  179.     SendClientMessage(playerid,0xFFFF00FF,"Seja RP e espere o portão abrir inteiro!");
  180.     }
  181.     else
  182.     {
  183.     //SendClientMessage(playerid,0xFFFFFFFF,"você não está no pedágio.");
  184.     }
  185.     return true;
  186. }
  187. CMD:pedagio2(playerid,params[])
  188. {
  189.     if(IsPlayerInRangeOfPoint(playerid,10.0,42.8127,-1522.5035,4.8887))
  190.     {
  191.     MoveObject(PEDAGIOB,38.299118041992, -1522.3580322266, -2.580091714859,1.0);
  192.     SetTimer("PEDAGIOBB",6000,false);
  193.     GivePlayerMoney(playerid,-250);
  194.     SendClientMessage(playerid,0xFFFF00FF,"Obrigado, tenha um bom dia");
  195.     SendClientMessage(playerid,0xFFFF00FF,"Seja RP e espere o portão abrir inteiro!");
  196.     }
  197.     else
  198.     {
  199.     //SendClientMessage(playerid,0xFFFFFFFF,"você não está no pedágio.");
  200.     }
  201.     return true;
  202. }
  203. CMD:pedagio3(playerid,params[])
  204. {
  205.     if(IsPlayerInRangeOfPoint(playerid,10.0,2774.1343,-397.0491,23.0892))
  206.     {
  207.     MoveObject(PEDAGIO2a,2771.5224609375, -394.25610351563, 14.170133590698,1.0);
  208.     SetTimer("PEDAGIO2AA",6000,false);
  209.     GivePlayerMoney(playerid,-250);
  210.     SendClientMessage(playerid,0xFFFF00FF,"Obrigado, tenha um bom dia");
  211.     SendClientMessage(playerid,0xFFFF00FF,"Seja RP e espere o portão abrir inteiro!");
  212.     }
  213.     else
  214.     {
  215.     }
  216.     return true;
  217. }
  218. CMD:pedagio4(playerid,params[])
  219. {
  220.     if(IsPlayerInRangeOfPoint(playerid,10.0,2755.6704,-405.6986,23.3840))
  221.     {
  222.     MoveObject(PEDAGIO2b,2758.9116210938, -408.33795166016, 12.966156005859,1.0);
  223.     SetTimer("PEDAGIO2BB",6000,false);
  224.     GivePlayerMoney(playerid,-250);
  225.     SendClientMessage(playerid,0xFFFF00FF,"Obrigado, tenha um bom dia");
  226.     SendClientMessage(playerid,0xFFFF00FF,"Seja RP e espere o portão abrir inteiro!");
  227.     }
  228.     else
  229.     {
  230.     }
  231.     return true;
  232. }
  233. CMD:pedagio5(playerid,params[])
  234. {
  235.     if(IsPlayerInRangeOfPoint(playerid,10.0,92.7667,-1285.5231,13.55))
  236.     {
  237.     MoveObject(PEDAGIO3a,96.525283813477, -1282.3951416016, 6.3279194831848,1.0);
  238.     SetTimer("PEDAGIO3AA",6000,false);
  239.     GivePlayerMoney(playerid,-250);
  240.     SendClientMessage(playerid,0xFFFF00FF,"Obrigado, tenha um bom dia");
  241.     SendClientMessage(playerid,0xFFFF00FF,"Seja RP e espere o portão abrir inteiro!");
  242.     }
  243.     else
  244.     {
  245.     }
  246.     return true;
  247. }
  248. CMD:pedagio6(playerid,params[])
  249. {
  250.     if(IsPlayerInRangeOfPoint(playerid,10.0,79.8072,-1260.9324,14.0553))
  251.     {
  252.     MoveObject(PEDAGIO4a,76.178726196289, -1263.2579345703, 7.3500204086304,1.0);
  253.     SetTimer("PEDAGIO4AA",6000,false);
  254.     GivePlayerMoney(playerid,-250);
  255.     SendClientMessage(playerid,0xFFFF00FF,"Obrigado, tenha um bom dia");
  256.     SendClientMessage(playerid,0xFFFF00FF,"Seja RP e espere o portão abrir inteiro!");
  257.     }
  258.     else
  259.     {
  260.     }
  261.     return true;
  262. }
  263. CMD:creditos(playerid,params[])
  264. {
  265.     #pragma unused params
  266.     ShowPlayerDialog(playerid,1,DIALOG_STYLE_MSGBOX,"Créditos","Obrigado por baixar e usar o Sistema de pedágio v0.1\nfeito por Leo_Perez\nPor favor NÃO retire os CRÉDITOS\nEnjoy (:","Ok","");
  267.     return true;
  268. }
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!