Recent Posts
Anonymous
None | 9 sec ago
Anonymous
PHP | 20 sec ago
Anonymous
C++ | 20 sec ago
Anonymous
None | 21 sec ago
Anonymous
None | 34 sec ago
Anonymous
None | 48 sec ago
Anonymous
None | 1 min ago
Anonymous
C++ | 2 min ago
Anonymous
None | 2 min ago
Delalyra
None | 2 min ago
Sitereport
Find cool info about any domain on the internet?
visit sitereport
Free Subdomains
Want a pastebin.com sub-domain for your community?
learn more...
What is pastebin?
Pastebin is a website that hosts all your text & code on dedicated servers for easy sharing.
learn more...
Learn a little bit about the new Pastebin.com on our help page. hide message
By Achraf on the 4th of Jul 2009 06:39:55 PM Download | Raw | Embed | Report
  1. #include <a_samp>
  2.  
  3. #pragma tabsize 0
  4.  
  5. #define dcmd(%1,%2,%3) if ((strcmp((%3)[1], #%1, true, (%2)) == 0) && ((((%3)[(%2) + 1] == 0) && (dcmd_%1(playerid, "")))||(((%3)[(%2) + 1] == 32) && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1
  6.  
  7. #define FILTERSCRIPT
  8.  
  9. new molo[MAX_PLAYERS];
  10. new vchod[MAX_PLAYERS];
  11. new hangy[MAX_PLAYERS];
  12.  
  13. new zbrane;
  14. new Menu:zbranemenu;
  15.  
  16. new zivot;
  17. new brnenie;
  18.  
  19. new auto1;
  20. new auto2;
  21. new auto3;
  22. new auto4;
  23. new auto5;
  24. new auto6;
  25. new auto7;
  26. //objekty
  27. new object1,object2,object3,object4,object5,object6,object7,object8,object9,object10;
  28. new object11,object12,object13,object14,object15,object16,object17,object18,object19,object20;
  29. new object21,object22,object23,object24,object25,object26,object27,object28,object29,object30;
  30. new object31,object32,object33,object34,object35,object36,object37,object38,object39,object40;
  31. new object41,object42,object43,object44,object45,object46,object47,object48,object49,object50;
  32. new object51,object52,object53,object54,object55,object56,object57,object58,object59,object60;
  33.  
  34. #if defined FILTERSCRIPT
  35.  
  36. public OnFilterScriptInit()
  37. {
  38.         print("----------------------------------------");
  39.         print("|             Admin ostrov             |");
  40.         print("----------------------------------------");
  41.         print("|     Copyright 2009 cRaShEr_SvK       |");
  42.         print("----------------------------------------");
  43. //pickup & menu
  44. zbrane = CreatePickup(1239,1,-1362.1328,550.0904,8.6839);
  45. zbranemenu = CreateMenu("Zbrane", 1, 100.0, 150.0, 200.0, 200.0);
  46. AddMenuItem(zbranemenu, 0, "UZI");
  47. AddMenuItem(zbranemenu, 0, "Sawn Off");
  48. AddMenuItem(zbranemenu, 0, "AK-47");
  49. AddMenuItem(zbranemenu, 0, "MP5");
  50. AddMenuItem(zbranemenu, 0, "TEC9");
  51. AddMenuItem(zbranemenu, 0, "Konec");
  52.  
  53. zivot = CreatePickup(1242,1,-1368.4961,544.4632,8.6839);
  54. brnenie = CreatePickup(1240,1,-1361.5902,545.5490,8.6839);
  55.  
  56. //auta
  57. auto1 = CreateVehicle(411,-1375.6559,567.2547,6.8990,358.4017,112,1,5000);
  58. auto2 = CreateVehicle(541,-1371.8855,567.5483,6.7764,358.4677,2,1,5000);
  59. auto3 = CreateVehicle(587,-1368.2941,567.5773,6.7426,359.8567,40,1,5000);
  60. auto4 = CreateVehicle(451,-1364.4413,567.6624,7.0289,358.9113,125,125,5000);
  61. auto5 = CreateVehicle(522,-1360.2711,567.4883,6.7374,0.7402,39,106,5000);
  62. auto6 = CreateVehicle(522,-1357.1667,567.4961,6.7415,354.1583,51,118,5000);
  63. auto7 = CreateVehicle(487,-1405.7196,585.0404,7.3403,270.1962,54,29,5000);
  64. //objekty
  65. object1 = CreateObject(18450,-1487.374,566.004,5.823,0.0,0.0,0.0);
  66. object2 = CreateObject(12814,-1422.443,580.996,6.161,0.0,0.0,-90.000);
  67. object3 = CreateObject(12814,-1422.385,551.010,6.164,0.0,0.0,-90.000);
  68. object4 = CreateObject(12814,-1372.510,581.001,6.164,0.0,0.0,-270.000);
  69. object5 = CreateObject(12814,-1372.504,551.017,6.166,0.0,0.0,-270.000);
  70. object6 = CreateObject(3749,-1445.599,566.071,12.027,0.0,0.0,-90.000);
  71. object7 = CreateObject(17026,-1377.867,600.143,-0.807,0.0,0.0,56.250);
  72. object8 = CreateObject(17026,-1343.362,591.024,-1.542,0.0,0.0,-33.750);
  73. object9 = CreateObject(17026,-1341.852,568.564,-1.312,0.0,0.0,-33.750);
  74. object10 = CreateObject(17026,-1349.323,532.163,-1.551,0.0,0.0,-123.750);
  75. object11 = CreateObject(17026,-1394.246,530.132,1.371,0.0,0.0,-123.750);
  76. object12 = CreateObject(17026,-1427.022,529.916,-2.389,0.0,0.0,-123.750);
  77. object13 = CreateObject(17026,-1417.242,602.264,-1.394,0.0,0.0,-303.750);
  78. object14 = CreateObject(17026,-1473.303,581.542,-1.391,0.0,0.0,-303.750);
  79. object15 = CreateObject(17026,-1506.945,581.756,-2.296,0.0,0.0,-303.750);
  80. object16 = CreateObject(17026,-1483.171,551.707,-2.368,0.0,0.0,-123.750);
  81. object17 = CreateObject(3749,-1502.736,566.082,12.025,0.0,0.0,-90.000);
  82. object18 = CreateObject(17071,-1452.397,547.129,8.515,0.0,0.0,45.000);
  83. object19 = CreateObject(980,-1503.231,566.143,8.940,0.0,0.0,90.000);
  84. object20 = CreateObject(980,-1444.786,565.946,8.945,0.0,0.0,90.000);
  85. object21 = CreateObject(8251,-1365.493,575.880,10.099,0.0,0.0,-180.000);
  86. object22 = CreateObject(980,-1378.286,570.342,8.945,0.0,0.0,90.000);
  87. object23 = CreateObject(980,-1378.234,581.855,8.945,0.0,0.0,90.000);
  88. object24 = CreateObject(18259,-1365.442,547.145,7.598,0.0,0.0,-90.000);
  89. object25 = CreateObject(3526,-1443.995,560.788,6.240,0.0,0.0,-90.000);
  90. object26 = CreateObject(3526,-1444.003,571.292,6.237,0.0,0.0,90.000);
  91. object27 = CreateObject(8131,-1353.022,546.249,16.867,0.0,0.0,-90.000);
  92. object28 = CreateObject(3279,-1436.837,543.835,6.247,0.0,0.0,0.0);
  93. object29 = CreateObject(3279,-1435.549,580.801,6.245,0.0,0.0,0.0);
  94. object30 = CreateObject(17026,-1465.741,534.654,-1.306,0.0,0.0,-135.000);
  95. object31 = CreateObject(17026,-1450.284,597.654,-2.801,0.0,0.0,-281.250);
  96. object32 = CreateObject(2780,-1502.211,560.669,6.167,0.0,0.0,0.0);
  97. object33 = CreateObject(2780,-1502.628,571.770,6.167,0.0,0.0,0.0);
  98. object34 = CreateObject(3461,-1364.245,558.988,7.749,0.0,0.0,0.0);
  99. object35 = CreateObject(3461,-1364.320,562.458,7.749,0.0,0.0,0.0);
  100. object36 = CreateObject(3472,-1353.652,557.310,6.543,0.0,0.0,0.0);
  101. object37 = CreateObject(3472,-1432.782,590.558,6.538,0.0,0.0,0.0);
  102. object38 = CreateObject(3472,-1378.294,590.358,6.541,0.0,0.0,0.0);
  103. object39 = CreateObject(11490,-1409.047,555.759,6.167,0.0,0.0,-360.000);
  104. object40 = CreateObject(11491,-1409.012,544.725,7.695,0.0,0.0,0.0);
  105. object41 = CreateObject(1491,-1407.922,560.217,7.687,0.0,0.0,-180.000);
  106. object42 = CreateObject(1491,-1410.165,560.194,7.663,0.0,0.0,-360.000);
  107. object43 = CreateObject(941,-1412.526,559.328,8.150,0.0,0.0,0.0);
  108. object44 = CreateObject(937,-1407.027,559.386,8.150,0.0,0.0,0.0);
  109. object45 = CreateObject(936,-1405.090,558.741,8.150,0.0,0.0,-90.000);
  110. object46 = CreateObject(1481,-1409.616,546.724,8.403,0.0,0.0,0.0);
  111. object47 = CreateObject(1481,-1408.435,546.692,8.403,0.0,0.0,0.0);
  112. object48 = CreateObject(1736,-1409.069,548.802,11.122,0.0,0.0,-180.000);
  113. object49 = CreateObject(1745,-1408.030,553.380,7.674,0.0,0.0,-90.000);
  114. object50 = CreateObject(1778,-1410.744,559.453,7.673,0.0,0.0,-168.750);
  115. object51 = CreateObject(1795,-1417.624,544.435,6.169,0.0,0.0,0.0);
  116. object52 = CreateObject(1808,-1404.775,554.218,7.670,0.0,0.0,-90.000);
  117. object53 = CreateObject(1828,-1408.128,552.667,7.648,0.0,0.0,-90.000);
  118. object54 = CreateObject(1829,-1404.033,559.300,11.335,0.0,0.0,-90.000);
  119. object55 = CreateObject(2097,-1413.003,554.070,7.975,0.0,0.0,-90.000);
  120. object56 = CreateObject(2099,-1404.525,550.626,7.673,0.0,0.0,-90.000);
  121. object57 = CreateObject(2131,-1413.029,551.104,7.674,0.0,0.0,90.000);
  122. object58 = CreateObject(643,-1413.665,544.590,8.170,0.0,0.0,-22.500);
  123. object59 = CreateObject(1280,-1425.282,552.595,6.573,0.0,0.0,90.000);
  124. object60 = CreateObject(1280,-1422.220,552.636,6.573,0.0,0.0,90.000);
  125.  
  126.         return 1;
  127. }
  128.  
  129. public OnFilterScriptExit()
  130. {
  131. //pickup & menu
  132. DestroyPickup(zbrane);
  133. DestroyMenu(zbranemenu);
  134. DestroyPickup(zivot);
  135. DestroyPickup(brnenie);
  136. //auta
  137. DestroyVehicle(auto1);
  138. DestroyVehicle(auto2);
  139. DestroyVehicle(auto3);
  140. DestroyVehicle(auto4);
  141. DestroyVehicle(auto5);
  142. DestroyVehicle(auto6);
  143. DestroyVehicle(auto7);
  144. //objekty
  145. DestroyObject(object1);
  146. DestroyObject(object2);
  147. DestroyObject(object3);
  148. DestroyObject(object4);
  149. DestroyObject(object5);
  150. DestroyObject(object6);
  151. DestroyObject(object7);
  152. DestroyObject(object8);
  153. DestroyObject(object9);
  154. DestroyObject(object10);
  155. DestroyObject(object11);
  156. DestroyObject(object12);
  157. DestroyObject(object13);
  158. DestroyObject(object14);
  159. DestroyObject(object15);
  160. DestroyObject(object16);
  161. DestroyObject(object17);
  162. DestroyObject(object18);
  163. DestroyObject(object19);
  164. DestroyObject(object20);
  165. DestroyObject(object21);
  166. DestroyObject(object22);
  167. DestroyObject(object23);
  168. DestroyObject(object24);
  169. DestroyObject(object25);
  170. DestroyObject(object26);
  171. DestroyObject(object27);
  172. DestroyObject(object28);
  173. DestroyObject(object29);
  174. DestroyObject(object30);
  175. DestroyObject(object31);
  176. DestroyObject(object32);
  177. DestroyObject(object33);
  178. DestroyObject(object34);
  179. DestroyObject(object35);
  180. DestroyObject(object36);
  181. DestroyObject(object37);
  182. DestroyObject(object38);
  183. DestroyObject(object39);
  184. DestroyObject(object40);
  185. DestroyObject(object41);
  186. DestroyObject(object42);
  187. DestroyObject(object43);
  188. DestroyObject(object44);
  189. DestroyObject(object45);
  190. DestroyObject(object46);
  191. DestroyObject(object47);
  192. DestroyObject(object48);
  193. DestroyObject(object49);
  194. DestroyObject(object50);
  195. DestroyObject(object51);
  196. DestroyObject(object52);
  197. DestroyObject(object53);
  198. DestroyObject(object54);
  199. DestroyObject(object55);
  200. DestroyObject(object56);
  201. DestroyObject(object57);
  202. DestroyObject(object58);
  203. DestroyObject(object59);
  204. DestroyObject(object60);
  205.         return 1;
  206. }
  207.  
  208. #else
  209.  
  210. #endif
  211.  
  212. public OnPlayerConnect(playerid)
  213. {
  214.  
  215. molo[playerid] = 0;
  216. hangy[playerid] = 0;
  217. vchod[playerid] = 0;
  218. SendClientMessage(playerid,0x00ff00FF,"[SFIC]Admin Island by cRaShEr_SvK/bugsy94.");
  219. SendClientMessage(playerid,0x00ff00FF,"[SFIC]For commands write /SFICinfo.");
  220. SendClientMessage(playerid,0x00ff00FF,"[SFIC]Only for RCON Admins.");
  221.         return 1;
  222. }
  223.  
  224. public OnPlayerDisconnect(playerid, reason)
  225. {
  226.         return 1;
  227. }
  228.  
  229. public OnPlayerCommandText(playerid, cmdtext[])
  230. {
  231. dcmd(brana,5,cmdtext);
  232. dcmd(vchod,5,cmdtext);
  233. dcmd(hangar,6,cmdtext);
  234. dcmd(SFICinfo,7,cmdtext);
  235.         return 0;
  236. }
  237.  
  238. public OnPlayerPickUpPickup(playerid,pickupid)
  239. {
  240.  
  241. if(pickupid == zbrane) ShowMenuForPlayer(zbranemenu,playerid);
  242. else if(pickupid == brnenie)SetPlayerHealth(playerid,100);
  243. else if(pickupid == zivot) SetPlayerArmour(playerid,100);
  244.  
  245.         return 1;
  246. }
  247.  
  248. public OnPlayerSelectedMenuRow(playerid, row)
  249. {
  250.  
  251.         new Menu:Current = GetPlayerMenu(playerid);
  252.  
  253.         if (Current == zbranemenu ){
  254.         if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,0x00ff00FF,"[SFIC]You must be RCON Admin.");
  255.         switch(row){
  256.         case 0:{
  257.     GivePlayerWeapon(playerid,28,1000);
  258. }
  259. }
  260. }
  261.  
  262.         if (Current == zbranemenu ) {
  263.         if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,0x00ff00FF,"[SFIC]You must be RCON Admin.");
  264.         switch(row) {
  265.         case 1:{
  266.     GivePlayerWeapon(playerid,26,1000);
  267. }
  268. }
  269. }
  270.  
  271.         if (Current == zbranemenu ) {
  272.         if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,0x00ff00FF,"[SFIC]You must be RCON Admin.");
  273.         switch(row) {
  274.         case 2:{
  275.     GivePlayerWeapon(playerid,30,1000);
  276. }
  277. }
  278. }
  279.  
  280.         if (Current == zbranemenu ) {
  281.         if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,0x00ff00FF,"[SFIC]You must be RCON Admin.");
  282.         switch(row) {
  283.         case 3:{
  284.     GivePlayerWeapon(playerid,29,1000);
  285. }
  286. }
  287. }
  288.  
  289.         if (Current == zbranemenu ) {
  290.         if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,0x00ff00FF,"[SFIC]You must be RCON Admin.");
  291.         switch(row) {
  292.         case 4:{
  293.     GivePlayerWeapon(playerid,32,1000);
  294. }
  295. }
  296. }
  297.  
  298.  
  299.         return 1;
  300. }
  301.  
  302. dcmd_brana(playerid, params[])
  303. {
  304. #pragma unused params
  305. if(IsPlayerAdmin(playerid))
  306. {
  307. if(molo[playerid] == 0)
  308. {
  309. MoveObject(object19,-1503.231,566.143,0.940,3);
  310. SendClientMessage(playerid,0x00ff00FF,"[SFIC]Gate opened");
  311. molo[playerid] = 1;
  312. }else if(molo[playerid] == 1){
  313. MoveObject(object19,-1503.231,566.143,8.940,3);
  314. SendClientMessage(playerid,0x00ff00FF,"[SFIC]Gate closed.");
  315. molo[playerid] = 0;
  316. }
  317. }else{
  318. SendClientMessage(playerid,0x00ff00FF,"[SFIC]You must be RCON Admin.");
  319. }
  320. return 1;
  321. }
  322.  
  323. dcmd_vchod(playerid, params[])
  324. {
  325. #pragma unused params
  326. if(IsPlayerAdmin(playerid))
  327. {
  328. if(vchod[playerid] == 0)
  329. {
  330. MoveObject(object20,-1444.786,565.946,0.945,3);
  331. SendClientMessage(playerid,0x00ff00FF,"[SFIC]Entrance opened.");
  332. vchod[playerid] = 1;
  333. }else if(vchod[playerid] == 1){
  334. MoveObject(object20,-1444.786,565.946,8.945,3);
  335. SendClientMessage(playerid,0x00ff00FF,"[SFIC]Entrance closed.");
  336. vchod[playerid] = 0;
  337. }
  338. }else{
  339. SendClientMessage(playerid,0x00ff00FF,"[SFIC]You must be RCON Admin.");
  340. }
  341. return 1;
  342. }
  343.  
  344. dcmd_hangar(playerid, params[])
  345. {
  346. #pragma unused params
  347. if(IsPlayerAdmin(playerid))
  348. {
  349. if(hangy[playerid] == 0)
  350. {
  351. MoveObject(object22,-1378.286,570.342,0.945,3);
  352. MoveObject(object23,-1378.234,581.855,0.945,3);
  353. SendClientMessage(playerid,0x00ff00FF,"[SFIC]Garage opened.");
  354. hangy[playerid] = 1;
  355. }else if(hangy[playerid] == 1){
  356. MoveObject(object22,-1378.286,570.342,8.945,3);
  357. MoveObject(object23,-1378.234,581.855,8.945,3);
  358. SendClientMessage(playerid,0x00ff00FF,"[SFIC]Garage closed.");
  359. hangy[playerid] = 0;
  360. }
  361. }else{
  362. SendClientMessage(playerid,0x00ff00FF,"[SFIC]You must be RCON Admin.");
  363. }
  364. return 1;
  365. }
  366.  
  367. dcmd_SFICinfo(playerid, params[])
  368. {
  369. #pragma unused params
  370. if(IsPlayerAdmin(playerid))
  371. {
  372. SendClientMessage(playerid,0xff0000FF,"++++++++++++++++++++++++++++++++++");
  373. SendClientMessage(playerid,0x00ff00FF,"+       Admin island by cRaShEr__SvK        +");
  374. SendClientMessage(playerid,0xff0000FF,"++++++++++++++++++++++++++++++++++");
  375. SendClientMessage(playerid,0x00ff00FF,"+   /brana-open/close gate     +");
  376. SendClientMessage(playerid,0x00ff00FF,"+  /vchod-open/close entrance    +");
  377. SendClientMessage(playerid,0x00ff00FF,"+      /hangar-open/close garage           +");
  378. SendClientMessage(playerid,0xff0000FF,"++++++++++++++++++++++++++++++++++");
  379. }else{
  380. SendClientMessage(playerid,0x00ff00FF,"[SFIC]You must be RCON Admin.");
  381. }
  382. return 1;
  383. }
Submit a correction or amendment below. Make A New Post
To highlight particular lines, prefix each line with @h@
Syntax highlighting:
Post expiration:
Post exposure:
Name / Title:
Email: