API tools faq
paste
Guest User

Digital Island

a guest
Dec 5th, 2012
609
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 62.51 KB | None | 0 0
raw download clone embed print report
  1. /*      The FS and the map are fully made by DiGiTaL AnGeL. Please do not remove the credits. You can recognize a map made by me if there's an
  2.       angel statue with "D A" written on the floor with neons.
  3.       WARNING : DON'T MODIFY THIS FS IF YOU ARE A BEGGINNER IN PAWNO! CONTACT ME FOR ANY MODIFIES AND/OR HELP! My Y!M : [email protected]
  4.         DiGiTaL Island is a Christmas island(snow included). First time, it wanted to be a normal
  5.       island(in september) but I forgot about it and I found it in my PC now(24.11.2012),
  6.       so because Christmas is coming, here it is.
  7.      
  8.         Credits ~> DiGiTaL_AnGeL - For making the script & the map.
  9.                 ~> Kalcor - For SA:MP
  10.                 ~> Spookie - For The Pawn Compiler GUI
  11.                 ~> Alex "Y_Less" Cole - For Y_Command & YSI
  12.                 ~> Incognito - For his objects streamer
  13.  
  14.       Commands : /cmds         - Shows you a dialog with the whole cmds in the FS.
  15.                  /aboutdisland - Shows you informations about the script.
  16.                  /gotodisland  - Teleports you to the Digital Island.
  17.                  /skin         - Allows you to change your skin.
  18.                  /summer       - Transforms the Christmas island into a summer one.
  19.                  /ucars        - Shows you informations about unlocking the cars. P.S. I saw that the bug appears only on my GM, but I won't
  20.                                 remove them. Maybe I'll add a /lock cmd.
  21.                  /enterhouse   - Teleports you in the house.
  22.                  /exithouse    - Teleports you in the garden, if you are in the house.
  23.                  /takegun      - Shows you a dialog that allows you to select a weapon you want.(31 available weapons)
  24.                  /fstyle       - Allows you to change your fighting style.
  25.                  /lcars        - Shows you informations about locking then vehicles.
  26.                  /drinks       - Shows you informations about drinking at the bar.
  27.                  
  28.       BUGS : 1. The mods on Jester & Sultan disappear on player enter vehicle. To fix that bug you must include the OnPlayerSpawn lines from this FS to
  29.                the one in your GM
  30.              2. Locking & Unlocking the cars will cause the locking/unlocking of the cars with a smaller id(For example:/usultan(id 2) - unlocks the
  31.                Sultan & the Jester too). I'll try to fix this in the next version.
  32.              3. The snow it's a bit laggy, but you can remove it with the cmd /summer
  33.                                                 DiGiTaL AnGeL 2012(TM)
  34.  
  35.  
  36. _________________________________________________Planified Updates________________________________________________
  37.     Here are the new things you'll find on v2.0
  38. ~> More cars
  39. ~> More objects in the garden
  40. ~> Objects in the house
  41. ~> An airport
  42. ~> A dock
  43. ~> More skins at the skin shop
  44. ~> Animations & objects attached when drinking at the bar
  45. ~> If you have more ideas please contact me([email protected])
  46.  
  47. _____________________________________________Changes Log________________________________________________
  48.     I have started to write the chages log today(27.11.2012), so I don't remember what I modified in the last 4 days(that's why I did't put the
  49.     whole modifications.
  50.    
  51. 01.12.2012 - Added the future updates, and Digital Island v1.0 is officially finished.(1608 lines)
  52. 01.12.2012 - Changed the name of the FS from XLand to Digital Island. Why? Cause who sees "XLand" thinks that "X" comes from Xtremer, not Xmas...
  53. 30.11.2012 - At the end of the day, the FS has 1595 lines. I don't have acces to the internet(since last week), that why I started the FS too, but I think
  54.              v 1.0 is ready, and as soon as I can, I'll release it. Meanwhile, I'll make another FS.
  55. 30.11.2012 - Added the sounds for opening/closing the gates.
  56. 30.11.2012 - Removed /gate, now the 2nd gate can be opened by pressing key horn.
  57. 30.11.2012 - Added the main gates, which can be opened by pressing the horn key. I will make the gate from the house to open like that too. ^_^
  58. 30.11.2012 - Finished adding the cmds to drink at the bar. Available drinks : Water, coke, beer, wine, vodka, whiskey.
  59. 30.11.2012 - Added the cmd to drink beer, the other ones coming up.
  60. 29.11.2012 - At the end of the day, the FS has 1290 lines.
  61. 29.11.2012 - Added the other cmds for locking cars
  62. 29.11.2012 - Changed the bar and added a lot of objects on it. A cmd for drink coming up maybe?
  63. 29.11.2012 - Added the /lockjester cmd(so you can lock the Jester), the other ones coming up.
  64. 28.11.2012 - At the end of the day, the FS has 1110 lines. Good night again!
  65. 28.11.2012 - Added that nice billard table, balls and cues in the garden.
  66. 28.11.2012 - Added the fighting style selection, and a boxing ring in the garden.
  67. 28.11.2012 - Added the /cmds dialog.
  68. 28.11.2012 - Added the weapons dialog, and the fighting styles dialog is coming up.(currently 1017 lines)
  69. 27.11.2012 - At the end of the day, the FS has 830 lines. Good night!
  70. 27.11.2012 - Added 25 new skins(currently 30)
  71. 27.11.2012 - Added the grass in the garden.
  72. 27.11.2012 - Added the /enterhouse & /exithouse cmds for the house. You won't be a homeless anymore... :))
  73. 27.11.2012 - Added the vehicleplates on the cars(DIsland [NR]) You can change them on the lines 412-415.
  74. 27.11.2012 - Added the /summer cmd, so you can transform the island into a summer one.
  75. 27.11.2012 - Added the chopper, the speed bumps, the arrows on the street and that big skull on top of the house.
  76. 27.11.2012 - Added the skin shop(only 5 skins for now) and the objects for it.
  77. 26.11.2012 - Added the /ucars cmd, so you can unlock the cars(because of a bug - the cars are locked at the spawn)(recently, I discover that the bug
  78.              comes from my GM, so dont' worry.)
  79. 26.11.2012 - Added the mods for the Jester & Sultan, but they dissapear after you enter in the car(I hope I'll fix that bug)
  80. 25.11.2012 - Removed the /closegates cmd, cause I added a timer for closing the gate.
  81. 24.11.2012 - Started the FS.
  82.                                                                                                                                                 */
  83. //_______________DEFINES_____________________________
  84. #define FILTERSCRIPT
  85. #define MAX_STRING 255
  86. #define KEY_HORN 2
  87. //_______________________COLORS______________________
  88. #define LIME    0x6CFF21FF
  89. #define BLUE    0x00FFFFFF
  90. #define RED     0xFF0000FF
  91. #define PURPLE  0x6400FFFF
  92. #define ORANGE  0xFF8200FF
  93. #define YELLOW  0xFFFF00FF
  94. //______________________SHORTCUTS____________________
  95. #define SCM SendClientMessage
  96. #define PTP PlayerToPoint
  97. //______________________DIALOGS______________________
  98. #define Skins 777
  99. #define Weapons 778
  100. #define CMDS 779
  101. #define FStyles 780
  102. //_________________INCLUDES__________________________
  103. #include <a_samp>
  104. #include <YSI\y_commands>
  105. #include <sscanf2>
  106. #include <streamer>
  107. #include <string>
  108. //_________________NEWS______________________________
  109. new sendername[MAX_PLAYER_NAME];
  110. new PlayerDrunk[MAX_PLAYERS];
  111. new gate;
  112. new mgate1;
  113. new mgate2;
  114. new xlcar[6];
  115. new snow[10];
  116. new xmastree[4];
  117. new present[4];
  118. new henter;
  119. new hexit;
  120. //-------------------Forwards---------------------------------------------------
  121. forward GateClose(playerid);
  122. forward UnLockCar(carid);
  123. forward Death(playerid);
  124. forward LockCar(carid);
  125. forward ProxDetector(Float:radi, playerid, string[],col1,col2,col3,col4,col5);
  126. forward AnimStop(playerid);
  127. forward CloseGates(playerid);
  128. //------------------------------------------------------------------------------
  129. #if defined FILTERSCRIPT
  130.  
  131. public OnFilterScriptInit()
  132. {
  133.     Create3DTextLabel("Use /drinks to see\nthe available drinks!"/*the text*/, PURPLE/*the color*/, 812.5156, -2147.7656, 13.0099/*the coords*/, 50/*the distance to be seen*/, 0);//at the bar
  134.     Create3DTextLabel("Use /skin to\nchange your skin!",RED,859.1595,-2158.3091,13.2403,50,0);//at the skin shop
  135.     Create3DTextLabel("Use /takegun to\ntake a weapon!",LIME,821.1436, -2165.6494, 13.0099,50,0);//at the gun shop
  136.     Create3DTextLabel("Use /enterhouse\nto enter!",ORANGE,826.4744, -2164.4116, 13.5758,50,0);//at the house enter
  137.     Create3DTextLabel("Use /fstyle to change\nyour fighting style!",BLUE, 834.6959,-2162.9753,13.9538, 50, 0);//in the middle of the ring
  138.     xlcar[1] = AddStaticVehicle(559,859.5668,-2166.3665,12.5497,0,3,3);//Jester
  139.     xlcar[2] = AddStaticVehicle(560,853.6971,-2166.3665,12.5627,0,1,0);//Sultan
  140.     xlcar[3] = AddStaticVehicle(541,861.3105,-2145.1030,12.5637,90.00,3,1);//Bullet
  141.     xlcar[4] = AddStaticVehicle(411,861.3105,-2148.6404,12.6637,90.00,1,1);//Infernus
  142.     xlcar[5] = AddStaticVehicle(487, 856.0645, -2185.7656, 13.1423, 90.2411, 151, 151); //the chopper
  143. //_____________________________________THE GATES_____________________________________________
  144.     gate = CreateObject(971, 835.32, -2143.53, 15.52,   0.00, 0.00, 180.00);//the moving gate
  145.     mgate1 = CreateObject(985, 839.25, -2054.09, 13.85,   0.00, 0.00, 0.00);//one of the main gates
  146.     mgate2 = CreateObject(986, 831.29, -2054.09, 13.85,   0.00, 0.00, 0.00);//the other main gate
  147. //_____________________________________________THE OBJECTS___________________________________
  148.     CreateObject(3262, 829.53, -2141.97, 12.20,   0.00, 0.12, 180.00);//that cool private proprety sign
  149.     CreateObject(3265, 829.53, -2141.98, 12.10,   0.00, 0.00, 180.00);//that other cool private proprety sign
  150.     CreateObject(3471, 842.13, -2048.26, 13.14,   0.00, 0.00, 90.00);//lion near the main gates
  151.     CreateObject(3471, 828.10, -2048.26, 13.14,   0.00, 0.00, 90.00);//lion near the main gates
  152.     CreateObject(991, 822.83, -2053.39, 15.49,   0.00, 0.00, 0.00);
  153.     CreateObject(991, 848.46, -2053.39, 15.44,   0.00, 0.00, 0.00);
  154.     CreateObject(991, 822.83, -2053.39, 13.08,   0.00, 0.00, 0.00);
  155.     CreateObject(991, 850.08, -2053.39, 15.44,   0.00, 0.00, 0.00);
  156.     CreateObject(991, 850.08, -2053.39, 13.08,   0.00, 0.00, 0.00);
  157.     CreateObject(991, 848.46, -2053.39, 13.08,   0.00, 0.00, 0.00);
  158.     CreateObject(5837, 859.34, -2157.48, 13.67,   0.00, 0.00, 90.00);
  159.     CreateObject(19130, 857.26, -2159.08, 15.04,   33.00, 0.00, 0.00);
  160.     CreateObject(19130, 857.26, -2158.49, 15.20,   0.00, 0.00, 0.00);
  161.     CreateObject(19130, 857.26, -2157.90, 15.04,   -33.00, 0.00, 0.00);
  162.     CreateObject(8843, 835.34, -2102.78, 11.97,   0.00, 0.00, 180.00);
  163.     CreateObject(8843, 835.34, -2078.32, 11.97,   0.00, 0.00, 180.00);
  164.     CreateObject(3434, 827.06, -2166.24, 25.00,   0.00, 0.00, 180.00);
  165.     CreateObject(18885, 821.15, -2166.39, 13.07,   0.00, 0.00, 180.00);
  166.     CreateObject(1550, 824.04, -2164.69, 12.34,   18.00, -25.00, 90.00);
  167.     CreateObject(1550, 824.33, -2164.98, 12.34,   0.00, 11.00, 0.00);
  168.     CreateObject(1550, 823.81, -2165.08, 12.34,   7.00, 0.00, 0.00);
  169.     CreateObject(17034, 861.07, -2175.58, -10.59,   0.00, 0.00, 93.27);
  170.     CreateObject(17034, 811.54, -2165.41, -9.71,   0.00, 0.00, 258.89);
  171.     CreateObject(17034, 825.52, -2165.57, -9.71,   0.00, 0.00, 258.89);
  172.     CreateObject(17034, 837.72, -2167.02, -9.79,   0.00, 0.00, 258.89);
  173.     CreateObject(17034, 849.79, -2171.45, -9.93,   0.00, 0.00, 258.89);
  174.     CreateObject(19425, 832.83, -2126.50, 11.95,   0.00, 0.00, 0.00);
  175.     CreateObject(19425, 832.83, -2133.68, 11.95,   0.00, 0.00, 0.00);
  176.     CreateObject(19425, 832.83, -2130.84, 11.95,   0.00, 0.00, 0.00);
  177.     CreateObject(19425, 832.83, -2129.35, 11.95,   0.00, 0.00, 0.00);
  178.     CreateObject(19425, 832.83, -2127.91, 11.95,   0.00, 0.00, 0.00);
  179.     CreateObject(19425, 832.83, -2132.28, 11.95,   0.00, 0.00, 0.00);
  180.     CreateObject(19355, 842.89, -2142.74, 13.68,   0.00, 0.00, 90.00);
  181.     CreateObject(19355, 827.72, -2142.74, 13.66,   0.00, 0.00, 90.00);
  182.     CreateObject(19302, 830.10, -2143.37, 13.22,   0.00, 0.00, 0.00);
  183.     CreateObject(19302, 840.60, -2143.37, 13.22,   0.00, 0.00, 0.00);
  184.     CreateObject(19355, 827.72, -2142.74, 16.97,   0.00, 0.00, 90.00);
  185.     CreateObject(19355, 842.89, -2142.74, 16.96,   0.00, 0.00, 90.00);
  186.     CreateObject(6119, 835.88, -2086.80, 12.04,   0.00, 0.00, 0.00);
  187.     CreateObject(12814, 850.33, -2167.80, 11.96,   0.00, 0.00, 0.00);
  188.     CreateObject(12814, 820.35, -2167.85, 11.96,   0.00, 0.00, 0.00);
  189.     CreateObject(9482, 835.23, -2142.84, 18.74,   0.00, 0.00, 90.00);
  190.     CreateObject(8652, 825.89, -2128.14, 12.82,   0.00, 0.00, 90.00);
  191.     CreateObject(8652, 805.67, -2178.00, 12.90,   0.00, 0.00, 90.00);
  192.     CreateObject(8652, 844.74, -2098.45, 13.06,   0.00, 0.00, 90.00);
  193.     CreateObject(8652, 844.74, -2068.78, 13.06,   0.00, 0.00, 90.00);
  194.     CreateObject(8652, 825.89, -2068.78, 12.82,   0.00, 0.00, 90.00);
  195.     CreateObject(8652, 825.89, -2098.46, 12.82,   0.00, 0.00, 90.00);
  196.     CreateObject(3749, 835.34, -2051.86, 17.80,   0.00, 0.00, 0.00);
  197.     CreateObject(3607, 825.53, -2178.06, 18.06,   0.00, 0.00, 180.00);
  198.     CreateObject(3604, 856.74, -2174.23, 14.50,   0.00, 0.00, 180.00);
  199.     CreateObject(8652, 844.74, -2128.14, 13.06,   0.00, 0.00, 90.00);
  200.     CreateObject(8652, 865.26, -2157.56, 12.90,   0.00, 0.00, 90.00);
  201.     CreateObject(8652, 850.05, -2192.72, 12.84,   0.00, 0.00, 0.00);
  202.     CreateObject(8652, 865.26, -2177.90, 12.90,   0.00, 0.00, 90.00);
  203.     CreateObject(8652, 805.67, -2157.67, 12.82,   0.00, 0.00, 90.00);
  204.     CreateObject(3578, 859.77, -2142.62, 12.90,   0.00, 0.00, 0.00);
  205.     CreateObject(3578, 810.95, -2142.62, 12.78,   0.00, 0.00, 0.00);
  206.     CreateObject(3578, 851.11, -2142.62, 12.84,   0.00, 0.00, 0.00);
  207.     CreateObject(3578, 819.32, -2142.62, 12.78,   0.00, 0.00, 0.00);
  208.     CreateObject(3934, 855.18, -2185.70, 12.01,   0.00, 0.00, 0.00);
  209.     CreateObject(3462, 808.87, -2161.58, 13.46,   0.00, 0.00, 215.00);
  210.     CreateObject(18647, 811.39, -2160.55, 12.00,   0.00, 0.00, 95.00);
  211.     CreateObject(18647, 810.83, -2161.95, 12.00,   0.00, 0.00, -47.00);
  212.     CreateObject(18647, 810.79, -2159.94, 12.00,   0.00, 0.00, -69.00);
  213.     CreateObject(18647, 810.24, -2161.64, 12.00,   0.00, 0.00, -10.08);
  214.     CreateObject(18647, 811.66, -2161.17, 12.00,   0.00, 0.00, -47.00);
  215.     CreateObject(18647, 810.05, -2159.14, 12.00,   0.00, 0.00, -40.00);
  216.     CreateObject(18647, 809.68, -2160.36, 12.00,   0.00, 0.00, -69.00);
  217.     CreateObject(18647, 809.40, -2159.93, 12.00,   0.00, 0.00, -40.00);
  218.     CreateObject(18647, 810.34, -2159.59, 12.01,   0.00, 0.00, 40.00);
  219.     CreateObject(14791, 834.49, -2162.54, 14.08,   0.00, 0.00, 0.00);//the boxing ring
  220.     CreateObject(3524, 863.46, -2163.95, 14.84,   0.00, 0.00, -90.00);
  221.     CreateObject(3524, 863.40, -2154.77, 14.84,   0.00, 0.00, -90.00);
  222.     CreateObject(3524, 863.56, -2150.71, 14.84,   0.00, 0.00, -90.00);
  223.     CreateObject(8483, 744.34, -2289.91, 5.00,   0.00, 0.00, 62.00);//skull stone on the vulcano
  224.     CreateObject(18752, 747.14, -2359.86, -6.25,   0.00, 0.00, 0.00);//vulcano
  225.     CreateObject(3524, 861.82, -2161.38, 14.84,   0.00, 0.00, -90.00);
  226.     CreateObject(3524, 863.46, -2158.53, 14.84,   0.00, 0.00, -90.00);
  227.     CreateObject(3524, 861.62, -2157.14, 14.84,   0.00, 0.00, -90.00);
  228.     CreateObject(3524, 861.65, -2152.86, 14.84,   0.00, 0.00, -90.00);
  229.     CreateObject(1594, 814.61, -2154.98, 12.44,   0.00, 0.00, 0.00);
  230.     CreateObject(1670, 814.61, -2154.91, 12.83,   0.00, 0.00, 11.00);
  231. //____________________________The bar & the objects on it_______________________
  232.     CreateObject(18090, 812.35, -2145.63, 14.55,   0.00, 0.00, 90.00);//the bar itself
  233.     CreateObject(1541, 813.23, -2144.53, 14.19,   0.00, 0.00, 0.00);
  234.     CreateObject(1541, 811.57, -2144.53, 14.19,   0.00, 0.00, 0.00);
  235.     CreateObject(1664, 812.69, -2144.36, 14.36,   0.00, 0.00, 90.00);
  236.     CreateObject(1664, 812.10, -2144.39, 14.36,   0.00, 0.00, 69.00);
  237.     CreateObject(1664, 812.41, -2144.13, 14.36,   0.00, 0.00, 0.00);
  238.     CreateObject(1512, 812.18, -2144.08, 14.39,   0.00, 0.06, -11.00);
  239.     CreateObject(1512, 812.58, -2144.19, 14.39,   0.06, 0.00, -11.00);
  240.     CreateObject(1512, 812.29, -2144.37, 14.39,   0.00, 0.00, -11.00);
  241.     CreateObject(1544, 812.54, -2147.13, 13.02,   0.00, 0.00, 0.00);
  242.     CreateObject(1544, 811.93, -2144.28, 14.19,   0.00, 0.00, 0.00);
  243.     CreateObject(1544, 812.75, -2144.15, 14.19,   0.00, 0.00, 0.00);
  244.     CreateObject(1544, 812.04, -2144.09, 14.19,   0.00, 0.00, 0.00);
  245.     CreateObject(1512, 812.58, -2144.19, 13.83,   0.12, -0.06, -11.00);
  246.     CreateObject(1544, 812.75, -2144.15, 13.65,   0.00, 0.00, 0.00);
  247.     CreateObject(1544, 811.93, -2144.28, 13.65,   0.00, 0.00, 0.00);
  248.     CreateObject(1512, 812.29, -2144.37, 13.83,   0.00, 0.00, -11.00);
  249.     CreateObject(1512, 812.18, -2144.08, 13.83,   0.00, 0.06, -11.00);
  250.     CreateObject(1664, 812.10, -2144.39, 13.83,   0.00, 0.00, 69.00);
  251.     CreateObject(1664, 812.69, -2144.36, 13.83,   0.00, 0.00, 90.00);
  252.     CreateObject(1664, 812.86, -2144.08, 13.83,   0.00, 0.00, 0.00);
  253.     CreateObject(1664, 812.41, -2144.13, 13.83,   0.00, 0.00, 0.00);
  254.     CreateObject(1546, 813.97, -2147.15, 13.12,   0.00, 0.00, 0.00);
  255.     CreateObject(1546, 812.41, -2147.30, 13.12,   0.06, 0.00, 0.00);
  256.     CreateObject(1546, 812.84, -2147.18, 13.12,   0.06, 0.00, 0.00);
  257.     CreateObject(1667, 812.18, -2147.10, 13.12,   0.24, 0.06, 0.00);
  258.     CreateObject(1667, 813.49, -2147.15, 13.46,   0.00, 0.00, 0.00);
  259.     CreateObject(1667, 813.19, -2147.22, 13.46,   0.00, 0.00, 0.00);
  260.     CreateObject(1667, 812.68, -2147.16, 13.12,   0.00, 0.00, 0.00);
  261.     CreateObject(1546, 812.01, -2147.25, 13.12,   0.06, 0.00, 0.00);
  262.     CreateObject(1544, 812.51, -2144.34, 13.65,   0.00, 0.00, 0.00);
  263.     CreateObject(2350, 813.08, -2147.81, 12.38,   0.00, 0.00, 0.00);//2350 ~> Bar chairs
  264.     CreateObject(2350, 811.70, -2147.81, 12.38,   0.00, 0.00, 0.00);
  265.     CreateObject(2350, 810.76, -2147.81, 12.38,   0.00, 0.00, 0.00);
  266.     CreateObject(2350, 813.93, -2147.81, 12.38,   0.00, 0.00, 0.00);
  267.     CreateObject(2350, 813.08, -2147.81, 12.38,   0.00, 0.00, 0.00);
  268. //______________________________The Billiard table & Co.________________________
  269.     CreateObject(2964, 817.42, -2164.16, 11.98,   0.00, 0.00, 0.00);
  270.     CreateObject(3004, 818.16, -2164.60, 12.90,   -3.50, 0.00, 90.00);
  271.     CreateObject(3004, 818.16, -2164.65, 12.90,   -3.50, 0.00, 90.00);
  272.     CreateObject(2995, 817.96, -2164.04, 12.92,   0.00, 0.00, 0.00);
  273.     CreateObject(2996, 817.96, -2164.25, 12.92,   0.00, 0.00, 0.00);
  274.     CreateObject(2997, 817.96, -2164.15, 12.92,   0.00, 0.00, 0.00);
  275.     CreateObject(2965, 817.78, -2164.10, 12.90,   0.00, 0.00, 0.00);
  276.     CreateObject(2999, 817.96, -2163.93, 12.92,   0.00, 0.00, 0.00);
  277.     CreateObject(3000, 817.88, -2164.19, 12.92,   0.00, 0.00, 0.00);
  278.     CreateObject(3106, 817.88, -2164.09, 12.92,   0.00, 0.00, 0.00);
  279.     CreateObject(3102, 817.88, -2163.99, 12.92,   0.00, 0.00, 0.00);
  280.     CreateObject(3103, 817.79, -2164.13, 12.92,   0.00, 0.00, 0.00);
  281.     CreateObject(3100, 817.79, -2164.05, 12.92,   0.00, 0.00, 0.00);
  282.     CreateObject(3105, 817.69, -2164.10, 12.92,   0.00, 0.00, 0.00);
  283.     CreateObject(3003, 817.02, -2164.14, 12.92,   0.00, 0.00, 0.00);
  284. //______________________________________The Grass_______________________________
  285.     CreateObject(2898, 807.41, -2151.23, 11.98,   0.00, 0.00, 0.00);
  286.     CreateObject(2898, 862.94, -2145.82, 11.98,   0.00, 0.00, 0.00);
  287.     CreateObject(2898, 862.86, -2156.64, 11.98,   0.00, 0.00, 0.00);
  288.     CreateObject(2898, 818.10, -2145.82, 11.98,   0.00, 0.00, 0.00);
  289.     CreateObject(2898, 858.88, -2151.23, 11.98,   0.00, 0.00, 0.00);
  290.     CreateObject(2898, 854.81, -2151.23, 11.98,   0.00, 0.00, 0.00);
  291.     CreateObject(2898, 850.75, -2151.23, 11.98,   0.00, 0.00, 0.00);
  292.     CreateObject(2898, 846.67, -2151.23, 11.98,   0.00, 0.00, 0.00);
  293.     CreateObject(2898, 842.60, -2151.23, 11.98,   0.00, 0.00, 0.00);
  294.     CreateObject(2898, 838.51, -2151.23, 11.98,   0.00, 0.00, 0.00);
  295.     CreateObject(2898, 834.45, -2151.23, 11.98,   0.00, 0.00, 0.00);
  296.     CreateObject(2898, 830.39, -2151.23, 11.98,   0.00, 0.00, 0.00);
  297.     CreateObject(2898, 826.31, -2151.23, 11.98,   0.00, 0.00, 0.00);
  298.     CreateObject(2898, 822.27, -2151.23, 11.98,   0.00, 0.00, 0.00);
  299.     CreateObject(2898, 818.21, -2151.23, 11.98,   0.00, 0.00, 0.00);
  300.     CreateObject(2898, 809.96, -2145.82, 11.98,   0.00, 0.00, 0.00);
  301.     CreateObject(2898, 810.05, -2151.23, 11.98,   0.00, 0.00, 0.00);
  302.     CreateObject(2898, 810.05, -2151.23, 11.98,   0.00, 0.00, 0.00);
  303.     CreateObject(2898, 858.86, -2145.82, 11.98,   0.00, 0.00, 0.00);
  304.     CreateObject(2898, 854.79, -2145.82, 11.98,   0.00, 0.00, 0.00);
  305.     CreateObject(2898, 850.71, -2145.82, 11.98,   0.00, 0.00, 0.00);
  306.     CreateObject(2898, 846.65, -2145.82, 11.98,   0.00, 0.00, 0.00);
  307.     CreateObject(2898, 842.57, -2145.82, 11.98,   0.00, 0.00, 0.00);
  308.     CreateObject(2898, 838.50, -2145.82, 11.98,   0.00, 0.00, 0.00);
  309.     CreateObject(2898, 834.41, -2145.82, 11.98,   0.00, 0.00, 0.00);
  310.     CreateObject(2898, 830.31, -2145.82, 11.98,   0.00, 0.00, 0.00);
  311.     CreateObject(2898, 826.23, -2145.82, 11.98,   0.00, 0.00, 0.00);
  312.     CreateObject(2898, 822.16, -2145.82, 11.98,   0.00, 0.00, 0.00);
  313.     CreateObject(2898, 814.13, -2151.23, 11.98,   0.00, 0.00, 0.00);
  314.     CreateObject(2898, 814.03, -2145.82, 11.98,   0.00, 0.00, 0.00);
  315.     CreateObject(2898, 807.41, -2145.82, 11.98,   0.00, 0.00, 0.00);
  316.     CreateObject(2898, 862.94, -2151.23, 11.98,   0.00, 0.00, 0.00);
  317.     CreateObject(2898, 858.88, -2156.64, 11.98,   0.00, 0.00, 0.00);
  318.     CreateObject(2898, 854.81, -2156.64, 11.98,   0.00, 0.00, 0.00);
  319.     CreateObject(2898, 850.75, -2156.64, 11.98,   0.00, 0.00, 0.00);
  320.     CreateObject(2898, 846.67, -2156.64, 11.98,   0.00, 0.00, 0.00);
  321.     CreateObject(2898, 842.60, -2156.64, 11.98,   0.00, 0.00, 0.00);
  322.     CreateObject(2898, 838.51, -2156.64, 11.98,   0.00, 0.00, 0.00);
  323.     CreateObject(2898, 834.45, -2156.64, 11.98,   0.00, 0.00, 0.00);
  324.     CreateObject(2898, 830.39, -2156.64, 11.98,   0.00, 0.00, 0.00);
  325.     CreateObject(2898, 826.31, -2156.64, 11.98,   0.00, 0.00, 0.00);
  326.     CreateObject(2898, 822.27, -2156.64, 11.98,   0.00, 0.00, 0.00);
  327.     CreateObject(2898, 818.21, -2156.64, 11.98,   0.00, 0.00, 0.00);
  328.     CreateObject(2898, 814.13, -2156.64, 11.98,   0.00, 0.00, 0.00);
  329.     CreateObject(2898, 810.35, -2156.64, 11.98,   0.00, 0.00, 0.00);
  330.     CreateObject(2898, 807.85, -2162.05, 11.98,   0.00, 0.00, 0.00);
  331.     CreateObject(2898, 807.41, -2156.64, 11.98,   0.00, 0.00, 0.00);
  332.     CreateObject(2898, 810.35, -2162.05, 11.98,   0.00, 0.00, 0.00);
  333.     CreateObject(2898, 814.13, -2162.05, 11.98,   0.00, 0.00, 0.00);
  334.     CreateObject(2898, 818.21, -2162.06, 11.98,   0.00, 0.00, 0.00);
  335.     CreateObject(2898, 822.27, -2162.05, 11.98,   0.00, 0.00, 0.00);
  336.     CreateObject(2898, 826.31, -2162.05, 11.98,   0.00, 0.00, 0.00);
  337.     CreateObject(2898, 830.39, -2162.05, 11.98,   0.00, 0.00, 0.00);
  338.     CreateObject(2898, 834.45, -2162.05, 11.98,   0.00, 0.00, 0.00);
  339.     CreateObject(2898, 838.51, -2162.05, 11.98,   0.00, 0.00, 0.00);
  340.     CreateObject(2898, 842.60, -2162.05, 11.98,   0.00, 0.00, 0.00);
  341.     CreateObject(2898, 846.67, -2162.05, 11.98,   0.00, 0.00, 0.00);
  342.     CreateObject(2898, 850.75, -2162.05, 11.98,   0.00, 0.00, 0.00);
  343.     CreateObject(2898, 854.81, -2162.05, 11.98,   0.00, 0.00, 0.00);
  344.     CreateObject(2898, 858.88, -2162.05, 11.98,   0.00, 0.00, 0.00);
  345.     CreateObject(2898, 862.87, -2172.86, 11.98,   0.00, 0.00, 0.00);
  346.     CreateObject(2898, 862.86, -2162.05, 11.98,   0.00, 0.00, 0.00);
  347.     CreateObject(2898, 858.88, -2167.46, 11.98,   0.00, 0.00, 0.00);
  348.     CreateObject(2898, 854.81, -2167.46, 11.98,   0.00, 0.00, 0.00);
  349.     CreateObject(2898, 850.75, -2167.46, 11.98,   0.00, 0.00, 0.00);
  350.     CreateObject(2898, 846.67, -2167.46, 11.98,   0.00, 0.00, 0.00);
  351.     CreateObject(2898, 842.60, -2167.46, 11.98,   0.00, 0.00, 0.00);
  352.     CreateObject(2898, 838.51, -2167.46, 11.98,   0.00, 0.00, 0.00);
  353.     CreateObject(2898, 834.45, -2167.46, 11.98,   0.00, 0.00, 0.00);
  354.     CreateObject(2898, 830.39, -2167.46, 11.98,   0.00, 0.00, 0.00);
  355.     CreateObject(2898, 826.31, -2167.46, 11.98,   0.00, 0.00, 0.00);
  356.     CreateObject(2898, 822.27, -2167.46, 11.98,   0.00, 0.00, 0.00);
  357.     CreateObject(2898, 818.21, -2167.46, 11.98,   0.00, 0.00, 0.00);
  358.     CreateObject(2898, 814.13, -2167.46, 11.98,   0.00, 0.00, 0.00);
  359.     CreateObject(2898, 810.35, -2167.46, 11.98,   0.00, 0.00, 0.00);
  360.     CreateObject(2898, 807.85, -2167.46, 11.98,   0.00, 0.00, 0.00);
  361.     CreateObject(2898, 862.87, -2167.46, 11.98,   0.00, 0.00, 0.00);
  362.     CreateObject(2898, 858.88, -2172.86, 11.98,   0.00, 0.00, 0.00);
  363.     CreateObject(2898, 854.81, -2172.86, 11.98,   0.00, 0.00, 0.00);
  364.     CreateObject(2898, 850.75, -2172.86, 11.98,   0.00, 0.00, 0.00);
  365.     CreateObject(2898, 846.67, -2172.86, 11.98,   0.00, 0.00, 0.00);
  366.     CreateObject(2898, 842.60, -2172.86, 11.98,   0.00, 0.00, 0.00);
  367.     CreateObject(2898, 810.35, -2172.86, 11.98,   0.00, 0.00, 0.00);
  368.     CreateObject(2898, 807.85, -2178.25, 11.98,   0.00, 0.00, 0.00);
  369.     CreateObject(2898, 807.85, -2172.86, 11.98,   0.00, 0.00, 0.00);
  370.     CreateObject(2898, 810.35, -2178.25, 11.98,   0.00, 0.00, 0.00);
  371.     CreateObject(2898, 842.60, -2178.25, 11.98,   0.00, 0.00, 0.00);
  372.     CreateObject(2898, 846.67, -2178.25, 11.98,   0.00, 0.00, 0.00);
  373.     CreateObject(2898, 850.75, -2178.25, 11.98,   0.00, 0.00, 0.00);
  374.     CreateObject(2898, 862.90, -2189.82, 11.98,   0.00, 0.00, 0.00);
  375.     CreateObject(2898, 858.88, -2178.25, 11.98,   0.00, 0.00, 0.00);
  376.     CreateObject(2898, 854.81, -2178.25, 11.98,   0.00, 0.00, 0.00);
  377.     CreateObject(2898, 862.87, -2178.25, 11.98,   0.00, 0.00, 0.00);
  378.     CreateObject(2898, 846.67, -2183.64, 11.98,   0.00, 0.00, 0.00);
  379.     CreateObject(2898, 817.52, -2190.15, 11.98,   0.00, 0.00, 0.00);
  380.     CreateObject(2898, 862.87, -2183.64, 11.98,   0.00, 0.00, 0.00);
  381.     CreateObject(2898, 846.70, -2190.03, 11.98,   0.00, 0.00, 0.00);
  382.     CreateObject(2898, 846.67, -2189.01, 11.98,   0.00, 0.00, 0.00);
  383.     CreateObject(2898, 862.87, -2189.01, 11.98,   0.00, 0.00, 0.00);
  384.     CreateObject(2898, 807.85, -2183.64, 11.98,   0.00, 0.00, 0.00);
  385.     CreateObject(2898, 807.84, -2189.03, 11.98,   0.00, 0.00, 0.00);
  386.     CreateObject(2898, 807.75, -2190.16, 11.98,   0.00, 0.00, 0.00);
  387.     CreateObject(2898, 811.80, -2190.16, 11.98,   0.00, 0.00, 0.00);
  388.     CreateObject(2898, 815.87, -2190.16, 11.98,   0.00, 0.00, 0.00);
  389. //_______________________________________Xmas Trees & Presents_______________________________
  390.     xmastree[1] = CreateObject(19076, 841.90, -2167.07, 23.16,   0.00, 0.00, 0.00);//xmas tree
  391.     xmastree[2] = CreateObject(19076, 811.21, -2167.07, 23.16,   0.00, 0.00, 0.00);//xmas tree
  392.     xmastree[3] = CreateObject(19076, 807.90, -2155.69, 11.94,   0.00, 0.00, 0.00);//xmas tree
  393.     present[1] = CreateObject(19058, 807.90, -2154.85, 12.59,   0.00, 0.00, 0.00);//present
  394.     present[2] = CreateObject(19054, 807.84, -2156.58, 12.59,   0.00, 0.00, 0.00);//present
  395.     present[3] = CreateObject(19056, 809.07, -2155.62, 12.61,   0.00, 0.00, 0.00);//present
  396. //_______________________________________The Snow____________________________________________
  397.     snow[1] = CreateObject(18863, 850.79, -2133.10, 11.00,   0.00, 0.00, 0.00);//snowarc
  398.     snow[2] = CreateObject(18863, 856.90, -2143.09, 12.00,   0.00, 0.00, 1.00);//snowarc
  399.     snow[3] = CreateObject(18864, 827.36, -2172.03, 12.00,   45.00, 47.00, 40.00);//fakesnow
  400.     snow[4] = CreateObject(18863, 873.16, -2149.22, 16.00,   90.00, 0.00, 11.00);//snowarc
  401.     snow[5] = CreateObject(18863, 867.26, -2139.18, 16.00,   90.00, 0.00, 11.00);//snowarc
  402.     snow[6] = CreateObject(18863, 869.34, -2190.32, 11.00,   0.00, 0.00, 0.00);//snowarc
  403.     snow[7] = CreateObject(18863, 867.01, -2151.17, 16.00,   90.00, 0.00, 11.00);//snowarc
  404.     snow[8] = CreateObject(18863, 867.00, -2151.25, 16.00,   90.00, 0.00, 11.00);//snowarc
  405.     snow[9] = CreateObject(18863, 873.81, -2157.99, 16.00,   90.00, 0.00, 11.00);//snowarc
  406. //_______________________________________________Pickups_____________________________________
  407.     henter = CreatePickup(1273, 2, 826.4744, -2164.4116, 13.5758, 0);//house enter
  408.     hexit = CreatePickup(1272, 2, 1278.7979, -838.8371, 1085.6328, 7);//house exit
  409.     CreatePickup(1318, 2, 859.1595, -2158.3091, 13.2403, 0);//skin shop
  410.     CreatePickup(1318, 2, 821.1436, -2165.6494, 13.0099, 0);//gun shop
  411.     CreatePickup(1318, 2, 834.6959, -2162.9753, 13.9538, 0);//fighting style selection
  412.     CreatePickup(1318, 2, 812.5156, -2147.7656, 13.0099, 0);//the bar
  413. //___________________________________Setting up the vehicle plates____________________________
  414.     SetVehicleNumberPlate(xlcar[1], "DIsland 1");
  415.     SetVehicleNumberPlate(xlcar[2], "DIsland 2");
  416.     SetVehicleNumberPlate(xlcar[3], "DIsland 3");
  417.     SetVehicleNumberPlate(xlcar[4], "DIsland 4");
  418.     print(" ______________________________ ");
  419.     print("|      Digital Island loaded!  |");
  420.     print("|              by DiGiTaL_AnGeL|");
  421.     print("|______________________________|");
  422.     return 1;
  423. }
  424.  
  425. public OnFilterScriptExit()
  426. {
  427.     print(" ______________________________ ");
  428.     print("|    Digital Island unloaded!  |");
  429.     print("|              by DiGiTaL_AnGeL|");
  430.     print("|______________________________|");
  431.     return 1;
  432. }
  433. forward PTP(Float:radi, playerid, Float:x, Float:y, Float:z);
  434. public PTP(Float:radi, playerid, Float:x, Float:y, Float:z)
  435. {
  436.     if(IsPlayerConnected(playerid))
  437.     {
  438.         new Float:oldposx, Float:oldposy, Float:oldposz;
  439.         new Float:tempposx, Float:tempposy, Float:tempposz;
  440.         GetPlayerPos(playerid, oldposx, oldposy, oldposz);
  441.         tempposx = (oldposx -x);
  442.         tempposy = (oldposy -y);
  443.         tempposz = (oldposz -z);
  444.         //printf("DEBUG: X:%f Y:%f Z:%f",posx,posy,posz);
  445.         if (((tempposx < radi) && (tempposx > -radi)) && ((tempposy < radi) && (tempposy > -radi)) && ((tempposz < radi) && (tempposz > -radi)))
  446.         {
  447.             return 1;
  448.         }
  449.     }
  450.     return 0;
  451. }
  452.  
  453. public ProxDetector(Float:radi, playerid, string[],col1,col2,col3,col4,col5)
  454. {
  455.     if(IsPlayerConnected(playerid))
  456.     {
  457.         new Float:posx, Float:posy, Float:posz;
  458.         new Float:oldposx, Float:oldposy, Float:oldposz;
  459.         new Float:tempposx, Float:tempposy, Float:tempposz;
  460.         GetPlayerPos(playerid, oldposx, oldposy, oldposz);
  461.         //radi = 2.0; //Trigger Radius
  462.         for(new i = 0; i <= MAX_PLAYERS; i++)
  463.         {
  464.             if(IsPlayerConnected(i) && (GetPlayerVirtualWorld(playerid) == GetPlayerVirtualWorld(i)))
  465.             {
  466.                 GetPlayerPos(i, posx, posy, posz);
  467.                 tempposx = (oldposx -posx);
  468.                 tempposy = (oldposy -posy);
  469.                 tempposz = (oldposz -posz);
  470.                 //printf("DEBUG: X:%f Y:%f Z:%f",posx,posy,posz);
  471.                 if (((tempposx < radi/16) && (tempposx > -radi/16)) && ((tempposy < radi/16) && (tempposy > -radi/16)) && ((tempposz < radi/16) && (tempposz > -radi/16)))
  472.                 {
  473.                     SendClientMessage(i, col1, string);
  474.                 }
  475.                 else if (((tempposx < radi/8) && (tempposx > -radi/8)) && ((tempposy < radi/8) && (tempposy > -radi/8)) && ((tempposz < radi/8) && (tempposz > -radi/8)))
  476.                 {
  477.                     SendClientMessage(i, col2, string);
  478.                 }
  479.                 else if (((tempposx < radi/4) && (tempposx > -radi/4)) && ((tempposy < radi/4) && (tempposy > -radi/4)) && ((tempposz < radi/4) && (tempposz > -radi/4)))
  480.                 {
  481.                     SendClientMessage(i, col3, string);
  482.                 }
  483.                 else if (((tempposx < radi/2) && (tempposx > -radi/2)) && ((tempposy < radi/2) && (tempposy > -radi/2)) && ((tempposz < radi/2) && (tempposz > -radi/2)))
  484.                 {
  485.                     SendClientMessage(i, col4, string);
  486.                 }
  487.                 else if (((tempposx < radi) && (tempposx > -radi)) && ((tempposy < radi) && (tempposy > -radi)) && ((tempposz < radi) && (tempposz > -radi)))
  488.                 {
  489.                     SendClientMessage(i, col5, string);
  490.                 }
  491.             }
  492.             else
  493.             {
  494.                 SendClientMessage(i, col1, string);
  495.             }
  496.         }
  497.     }//not connected
  498.     return 1;
  499. }
  500.  
  501. public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
  502. {
  503.     if(vehicleid == xlcar[1] && !ispassenger)
  504.     {
  505.         GetPlayerName(playerid, sendername, sizeof(sendername));
  506.         if(strcmp(sendername,"DiGiTaL_AnGeL",true))
  507.         {
  508.             new Float:ax, Float:ay, Float:az;
  509.             GetPlayerPos(playerid, ax, ay, az);
  510.             SetPlayerPos(playerid, ax, ay, az);
  511.             SCM(playerid, RED, "You don't own this car!");
  512.             RemovePlayerFromVehicle(playerid);
  513.         }
  514.     }
  515.     if(vehicleid == xlcar [2] && !ispassenger)
  516.     {
  517.         GetPlayerName(playerid, sendername, sizeof(sendername));
  518.         if(strcmp(sendername,"DiGiTaL_AnGeL",true))
  519.         {
  520.             new Float:ax, Float:ay, Float:az;
  521.             GetPlayerPos(playerid, ax, ay, az);
  522.             SetPlayerPos(playerid, ax, ay, az);
  523.             SCM(playerid, RED, "You don't own this car!");
  524.             RemovePlayerFromVehicle(playerid);
  525.         }
  526.     }
  527.     if(vehicleid == xlcar[3] && !ispassenger)
  528.     {
  529.         GetPlayerName(playerid, sendername, sizeof(sendername));
  530.         if(strcmp(sendername,"DiGiTaL_AnGeL",true))
  531.         {
  532.             new Float:ax, Float:ay, Float:az;
  533.             SetPlayerPos(playerid, ax, ay, az);
  534.             SCM(playerid, RED, "You don't own this car!");
  535.             RemovePlayerFromVehicle(playerid);
  536.         }
  537.     }
  538.     if(vehicleid == xlcar[4] && !ispassenger)
  539.     {
  540.         GetPlayerName(playerid, sendername, sizeof(sendername));
  541.         if(strcmp(sendername,"DiGiTaL_AnGeL",true))
  542.         {
  543.             new Float:ax, Float:ay, Float:az;
  544.             SetPlayerPos(playerid, ax, ay, az);
  545.             SCM(playerid, RED, "You don't own this car!");
  546.             RemovePlayerFromVehicle(playerid);
  547.         }
  548.     }
  549.     if(vehicleid == xlcar[5] && !ispassenger)
  550.     {
  551.         GetPlayerName(playerid, sendername, sizeof(sendername));
  552.         if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  553.         {
  554.             new Float:ax, Float:ay, Float:az;
  555.             SetPlayerPos(playerid, ax, ay, az);
  556.             SCM(playerid, RED, "You don't have the keys!");
  557.             RemovePlayerFromVehicle(playerid);
  558.         }
  559.     }
  560.     return 0;
  561. }
  562.  
  563. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  564. {
  565.     if(dialogid == Skins)
  566.     {
  567.         if(response)
  568.         {
  569.             if(listitem == 0)
  570.             {
  571.                 SetPlayerSkin(playerid, 23);
  572.             }
  573.             if(listitem == 1)
  574.             {
  575.                 SetPlayerSkin(playerid, 29);
  576.             }
  577.             if(listitem == 2)
  578.             {
  579.                 SetPlayerSkin(playerid, 99);
  580.             }
  581.             if(listitem == 3)
  582.             {
  583.                 SetPlayerSkin(playerid, 100);
  584.             }
  585.             if(listitem == 4)
  586.             {
  587.                 SetPlayerSkin(playerid, 102);
  588.             }
  589.             if(listitem == 5)
  590.             {
  591.                 SetPlayerSkin(playerid, 7);
  592.             }
  593.             if(listitem == 6)
  594.             {
  595.                 SetPlayerSkin(playerid, 64);
  596.             }
  597.             if(listitem == 7)
  598.             {
  599.                 SetPlayerSkin(playerid, 70);
  600.             }
  601.             if(listitem == 8)
  602.             {
  603.                 SetPlayerSkin(playerid, 78);
  604.             }
  605.             if(listitem == 9)
  606.             {
  607.                 SetPlayerSkin(playerid, 80);
  608.             }
  609.             if(listitem == 10)
  610.             {
  611.                 SetPlayerSkin(playerid, 82);
  612.             }
  613.             if(listitem == 11)
  614.             {
  615.                 SetPlayerSkin(playerid, 107);
  616.             }
  617.             if(listitem == 12)
  618.             {
  619.                 SetPlayerSkin(playerid, 108);
  620.             }
  621.             if(listitem == 13)
  622.             {
  623.                 SetPlayerSkin(playerid, 111);
  624.             }
  625.             if(listitem == 14)
  626.             {
  627.                 SetPlayerSkin(playerid, 116);
  628.             }
  629.             if(listitem == 15)
  630.             {
  631.                 SetPlayerSkin(playerid, 117);
  632.             }
  633.             if(listitem == 16)
  634.             {
  635.                 SetPlayerSkin(playerid, 147);
  636.             }
  637.             if(listitem == 17)
  638.             {
  639.                 SetPlayerSkin(playerid, 164);
  640.             }
  641.             if(listitem == 18)
  642.             {
  643.                 SetPlayerSkin(playerid, 181);
  644.             }
  645.             if(listitem == 19)
  646.             {
  647.                 SetPlayerSkin(playerid, 191);
  648.             }
  649.             if(listitem == 20)
  650.             {
  651.                 SetPlayerSkin(playerid, 203);
  652.             }
  653.             if(listitem == 21)
  654.             {
  655.                 SetPlayerSkin(playerid, 214);
  656.             }
  657.             if(listitem == 22)
  658.             {
  659.                 SetPlayerSkin(playerid, 240);
  660.             }
  661.             if(listitem == 23)
  662.             {
  663.                 SetPlayerSkin(playerid, 248);
  664.             }
  665.             if(listitem == 24)
  666.             {
  667.                 SetPlayerSkin(playerid, 249);
  668.             }
  669.             if(listitem == 25)
  670.             {
  671.                 SetPlayerSkin(playerid, 259);
  672.             }
  673.             if(listitem == 26)
  674.             {
  675.                 SetPlayerSkin(playerid, 260);
  676.             }
  677.             if(listitem == 27)
  678.             {
  679.                 SetPlayerSkin(playerid, 264);
  680.             }
  681.             if(listitem == 28)
  682.             {
  683.                 SetPlayerSkin(playerid, 279);
  684.             }
  685.             if(listitem == 20)
  686.             {
  687.                 SetPlayerSkin(playerid, 280);
  688.             }
  689.             if(listitem == 29)
  690.             {
  691.                 SetPlayerSkin(playerid, 287);
  692.             }
  693.             if(listitem == 30)
  694.             {
  695.                 SetPlayerSkin(playerid, 285);
  696.             }
  697.         }
  698.         return 1;
  699.     }
  700.     if(dialogid == Weapons)
  701.     {
  702.         if(response)
  703.         {
  704.             if(listitem == 0)
  705.             {
  706.                 GivePlayerWeapon(playerid, 3, 1);
  707.                 SCM(playerid, LIME, "You have received a Nitestick!");
  708.             }
  709.             if(listitem == 1)
  710.             {
  711.                 GivePlayerWeapon(playerid, 4, 1);
  712.                 SCM(playerid, LIME, "You have received a Knife!");
  713.             }
  714.             if(listitem == 2)
  715.             {
  716.                 GivePlayerWeapon(playerid, 5, 1);
  717.                 SCM(playerid, LIME, "You have received a Baseball bat!");
  718.             }
  719.             if(listitem == 3)
  720.             {
  721.                 GivePlayerWeapon(playerid, 6, 1);
  722.                 SCM(playerid, LIME, "You have received a Shovel!");
  723.             }
  724.             if(listitem == 4)
  725.             {
  726.                 GivePlayerWeapon(playerid, 8, 1);
  727.                 SCM(playerid, LIME, "You have received a Katana!");
  728.             }
  729.             if(listitem == 5)
  730.             {
  731.                 GivePlayerWeapon(playerid, 15, 1);
  732.                 SCM(playerid, LIME, "You have received a Cane!");
  733.             }
  734.             if(listitem == 6)
  735.             {
  736.                 GivePlayerWeapon(playerid, 16, 10);
  737.                 SCM(playerid, LIME, "You have received a Grenade!");
  738.             }
  739.             if(listitem == 7)
  740.             {
  741.                 GivePlayerWeapon(playerid, 17, 10);
  742.                 SCM(playerid, LIME, "You have received a Tear Gas!");
  743.             }
  744.             if(listitem == 8)
  745.             {
  746.                 GivePlayerWeapon(playerid, 18, 10);
  747.                 SCM(playerid, LIME, "You have received a Molotov!");
  748.             }
  749.             if(listitem == 9)
  750.             {
  751.                 GivePlayerWeapon(playerid, 22, 500);
  752.                 SCM(playerid, LIME, "You have received a 9mm Pistol!");
  753.             }
  754.             if(listitem == 10)
  755.             {
  756.                 GivePlayerWeapon(playerid, 23, 500);
  757.                 SCM(playerid, LIME, "You have received a Silenced Pistol!");
  758.             }
  759.             if(listitem == 11)
  760.             {
  761.                 GivePlayerWeapon(playerid, 24, 500);
  762.                 SCM(playerid, LIME, "You have received a Deagle!");
  763.             }
  764.             if(listitem == 12)
  765.             {
  766.                 GivePlayerWeapon(playerid, 25, 100);
  767.                 SCM(playerid, LIME, "You have received a Shotgun!");
  768.             }
  769.             if(listitem == 13)
  770.             {
  771.                 GivePlayerWeapon(playerid, 26, 200);
  772.                 SCM(playerid, LIME, "You have received a Shawn Off Shotgun!");
  773.             }
  774.             if(listitem == 14)
  775.             {
  776.                 GivePlayerWeapon(playerid, 28, 500);
  777.                 SCM(playerid, LIME, "You have received an Micro Uzi!");
  778.             }
  779.             if(listitem == 15)
  780.             {
  781.                 GivePlayerWeapon(playerid, 29, 500);
  782.                 SCM(playerid, LIME, "You have received an MP5!");
  783.             }
  784.             if(listitem == 16)
  785.             {
  786.                 GivePlayerWeapon(playerid, 30, 500);
  787.                 SCM(playerid, LIME, "You have received an AK 47!");
  788.             }
  789.             if(listitem == 17)
  790.             {
  791.                 GivePlayerWeapon(playerid, 31, 500);
  792.                 SCM(playerid, LIME, "You have received an M4!");
  793.             }
  794.             if(listitem == 18)
  795.             {
  796.                 GivePlayerWeapon(playerid, 32, 500);
  797.                 SCM(playerid, LIME, "You have received an TEC 9!");
  798.             }
  799.             if(listitem == 19)
  800.             {
  801.                 GivePlayerWeapon(playerid, 33, 500);
  802.                 SCM(playerid, LIME, "You have received an Rifle!");
  803.             }
  804.             if(listitem == 20)
  805.             {
  806.                 GivePlayerWeapon(playerid, 34, 500);
  807.                 SCM(playerid, LIME, "You have received an Sniper Rifle!");
  808.             }
  809.             if(listitem == 21)
  810.             {
  811.                 GivePlayerWeapon(playerid, 35, 100);
  812.                 SCM(playerid, LIME, "You have received an Rocket Launcher!");
  813.             }
  814.             if(listitem == 22)
  815.             {
  816.                 GivePlayerWeapon(playerid, 36, 100);
  817.                 SCM(playerid, LIME, "You have received a Heat Seeker Rocket Launcher!");
  818.             }
  819.             if(listitem == 23)
  820.             {
  821.                 GivePlayerWeapon(playerid, 37, 500);
  822.                 SCM(playerid, LIME, "You have received a Flame Thrower!");
  823.             }
  824.             if(listitem == 24)
  825.             {
  826.                 GivePlayerWeapon(playerid, 38, 100);
  827.                 SCM(playerid, LIME, "You have received a Minigun!");
  828.             }
  829.             if(listitem == 25)
  830.             {
  831.                 GivePlayerWeapon(playerid, 39, 10);
  832.                 SCM(playerid, LIME, "You have received some C4s!");
  833.             }
  834.             if(listitem == 26)
  835.             {
  836.                 GivePlayerWeapon(playerid, 41, 500);
  837.                 SCM(playerid, LIME, "You have received a Graffiti!");
  838.             }
  839.             if(listitem == 27)
  840.             {
  841.                 GivePlayerWeapon(playerid, 43, 500);
  842.                 SCM(playerid, LIME, "You have received a Photo Maker!");
  843.             }
  844.             if(listitem == 28)
  845.             {
  846.                 GivePlayerWeapon(playerid, 44, 1);
  847.                 SCM(playerid, LIME, "You have received some night googles!");
  848.             }
  849.             if(listitem == 29)
  850.             {
  851.                 GivePlayerWeapon(playerid, 45, 1);
  852.                 SCM(playerid, LIME, "You have received some heat googles!");
  853.             }
  854.             if(listitem == 30)
  855.             {
  856.                 GivePlayerWeapon(playerid, 46, 1);
  857.                 SCM(playerid, LIME, "You have received a parachute!");
  858.             }
  859.         }
  860.         return 1;
  861.     }
  862.     if(dialogid == FStyles)
  863.     {
  864.         if(response)
  865.         {
  866.             if(listitem == 0)
  867.             {
  868.                 SetPlayerFightingStyle (playerid, FIGHT_STYLE_NORMAL);
  869.             }
  870.             if(listitem == 1)
  871.             {
  872.                 SetPlayerFightingStyle (playerid, FIGHT_STYLE_KNEEHEAD);
  873.             }
  874.             if(listitem == 2)
  875.             {
  876.                 SetPlayerFightingStyle (playerid, FIGHT_STYLE_GRABKICK);
  877.             }
  878.             if(listitem == 3)
  879.             {
  880.                 SetPlayerFightingStyle (playerid, FIGHT_STYLE_ELBOW);
  881.             }
  882.             if(listitem == 4)
  883.             {
  884.                 SetPlayerFightingStyle (playerid, FIGHT_STYLE_KUNGFU);
  885.             }
  886.             if(listitem == 5)
  887.             {
  888.                 SetPlayerFightingStyle (playerid, FIGHT_STYLE_BOXING);
  889.             }
  890.         }
  891.         return 1;
  892.     }
  893.     return 0;
  894. }
  895.  
  896. public OnPlayerPickUpPickup(playerid, pickupid)
  897. {
  898.     if(pickupid == henter)
  899.     {
  900.         GameTextForPlayer(playerid, "Use /enterhouse to enter!", 5000, 1);//5 seconds(1000 miliseconds = 1 second)
  901.     }
  902.     if(pickupid == hexit)
  903.     {
  904.         GameTextForPlayer(playerid, "Use /exithouse to exit!", 5000, 1);//5 seconds
  905.     }
  906.     return 1;
  907. }
  908.  
  909.  
  910. public OnVehicleSpawn(vehicleid)
  911. {
  912.     if (IsAnXLCar(vehicleid))
  913.     {
  914.         if(GetVehicleModel(vehicleid) == 559)
  915.         {
  916.             AddVehicleComponent(vehicleid, 1010); // nitro x10
  917.             AddVehicleComponent(vehicleid, 1069); // sideskirts
  918.             AddVehicleComponent(vehicleid, 1065); // exhaust
  919.             AddVehicleComponent(vehicleid, 1067); // roof
  920.             AddVehicleComponent(vehicleid, 1162); // spoiler
  921.             AddVehicleComponent(vehicleid, 1160); // front bumper
  922.             AddVehicleComponent(vehicleid, 1159); // rear bumper
  923.             AddVehicleComponent(vehicleid, 1079); // wheels
  924.             AddVehicleComponent(vehicleid, 1086); // stereo
  925.             AddVehicleComponent(vehicleid, 1087); // hydraulics
  926.             ChangeVehiclePaintjob(vehicleid, 0); // Paintjob
  927.         }
  928.         else if(GetVehicleModel(vehicleid) == 560)
  929.         {
  930.             AddVehicleComponent(vehicleid, 1010); // nitro x10
  931.             AddVehicleComponent(vehicleid, 1026); // sideskirts
  932.             AddVehicleComponent(vehicleid, 1028); // exhaust
  933.             AddVehicleComponent(vehicleid, 1032); // roof
  934.             AddVehicleComponent(vehicleid, 1138); // spoiler
  935.             AddVehicleComponent(vehicleid, 1169); // front bumper
  936.             AddVehicleComponent(vehicleid, 1141); // rear bumper
  937.             AddVehicleComponent(vehicleid, 1079); // wheels
  938.             AddVehicleComponent(vehicleid, 1086); // stereo
  939.             AddVehicleComponent(vehicleid, 1087); // hidraulics
  940.             ChangeVehiclePaintjob(vehicleid, 0); // Paintjob
  941.         }
  942.     }
  943.     return 1;
  944. }
  945.  
  946. public UnLockCar(carid)
  947. {
  948.     for(new i = 0; i <= MAX_PLAYERS; i++)
  949.     {
  950.         if(IsPlayerConnected(i))
  951.         {
  952.             SetVehicleParamsForPlayer(carid,i,0,0);
  953.         }
  954.     }
  955. }
  956.  
  957. public LockCar(carid)
  958. {
  959.     for(new i=0; i<= MAX_PLAYERS; i++)
  960.     {
  961.         if(IsPlayerConnected(i))
  962.         {
  963.             SetVehicleParamsForPlayer(carid,i, 0, 1);
  964.         }
  965.     }
  966. }
  967.  
  968. forward IsAnXLCar(carid);
  969. public IsAnXLCar(carid)
  970. {
  971.     for(new i = 0; i < sizeof(xlcar); i++)
  972.     {
  973.         if(carid == xlcar[i]) return 1;
  974.     }
  975.     return 0;
  976. }
  977.  
  978. stock IsVehicleOccupied(vehicleid)
  979. {
  980.     for(new i = 0; i <= MAX_PLAYERS; i++)
  981.     {
  982.         if(IsPlayerInVehicle(i,vehicleid)) return 1;
  983.     }
  984.     return 0;
  985. }
  986.  
  987. public GateClose(playerid)
  988. {
  989.     MoveObject(gate, 835.32, -2143.53, 15.52, 4);
  990.     PlayerPlaySound(playerid, 1153, 826.54, -2143.53, 15.52);
  991.     return 1;
  992. }
  993.  
  994. public CloseGates(playerid)
  995. {
  996.     MoveObject(mgate1, 839.25, -2054.09, 13.85, 3.50);
  997.     MoveObject(mgate2, 831.29, -2054.09, 13.85, 3.50);
  998.     PlayerPlaySound(playerid, 1153, 835.5282, -2053.5754, 12.9619);
  999.     return 1;
  1000. }
  1001.  
  1002. public Death(playerid)
  1003. {
  1004.     SetPlayerHealth(playerid, 0);
  1005.     return 1;
  1006. }
  1007.  
  1008. public AnimStop(playerid)
  1009. {
  1010.     ClearAnimations(playerid);
  1011.     return 1;
  1012. }
  1013.  
  1014. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  1015. {
  1016.     if(newkeys & KEY_HORN)
  1017.     {
  1018.         GetPlayerName(playerid, sendername, sizeof(sendername));
  1019.         if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1020.         {
  1021.             SCM(playerid, RED, "You don't have a remote!");
  1022.         }
  1023.         else if(PTP(40.0, playerid, 835.5282,-2053.5754,12.9619))
  1024.         {
  1025.             MoveObject(mgate1, 839.25, -2054.09, 19.24, 3.50);
  1026.             MoveObject(mgate2, 831.29, -2054.09, 19.24, 3.50);
  1027.             SetTimer("CloseGates", 6000, 0);//6 seconds
  1028.             GameTextForPlayer(playerid, "~w~Main gates~n~~p~    opened!", 4000, 5);
  1029.             PlayerPlaySound(playerid, 1153, 835.5282, -2053.5754, 12.9619);
  1030.         }
  1031.         else if(PTP(35.0, playerid, 835.1801, -2138.0181, 12.6234))
  1032.         {
  1033.             MoveObject(gate, 826.54, -2143.53, 15.52, 4);
  1034.             SetTimer("GateClose", 6000, 0);//6 seconds
  1035.             GameTextForPlayer(playerid, "~w~Gate opened!~n~~p~  Welcome home!", 4000, 5);
  1036.             PlayerPlaySound(playerid, 1153, 826.54, -2143.53, 15.52);
  1037.         }
  1038.     }
  1039.     return 1;
  1040. }
  1041.  
  1042. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~COMMANDS~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1043. /*YCMD:gate(playerid, params[], help)
  1044. {
  1045.     #pragma unused params, help
  1046.     GetPlayerName(playerid, sendername, sizeof(sendername));
  1047.     if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1048.     {
  1049.         SCM(playerid, RED, "You don't have a remote control!");
  1050.     }
  1051.     else if(PTP(40.0,playerid,835.1801,-2138.0181,12.6234))
  1052.     {
  1053.         MoveObject(gate, 826.54, -2143.53, 15.52, 4);
  1054.         SetTimer("GateClose", 6000, 0);//6 seconds
  1055.         SCM(playerid, LIME, "Gate succesfully opened! /aboutdisland for help!");
  1056.     }
  1057.     else
  1058.     {
  1059.         SCM(playerid, RED, "You are not close enough to the gate.");
  1060.     }
  1061.     return 1;
  1062. }*/
  1063. YCMD:aboutdisland(playerid, params[], help)
  1064. {
  1065.     #pragma unused params, help
  1066.     SCM(playerid, PURPLE, "___________________________________DIsland_______________________________________");
  1067.     SCM(playerid, PURPLE, "~~**XLAND**~~ The Christmas Land(or Digital Island) is made by DiGiTaL AnGeL.");
  1068.     SCM(playerid, PURPLE, "~~**XLAND**~~ Started on 24.11.2012, finished on - 01.12.2012");
  1069.     SCM(playerid, PURPLE, "~~**XLAND**~~ To open the gates, just press the horn key.");
  1070.     SCM(playerid, PURPLE, "~~**XLAND**~~ CMDS : for a list with the whole cmds, type /cmds  ");
  1071.     SCM(playerid, PURPLE, "~~**XLAND**~~                           DiGiTaL AnGeL(TM) 2012 - All rights reserved");
  1072.     SCM(playerid, PURPLE, "___________________________________XLAND_________________________________________");
  1073.     return 1;
  1074. }
  1075. YCMD:gotodisland(playerid, params[], help)
  1076. {
  1077.     #pragma unused params, help
  1078.     GetPlayerName(playerid, sendername, sizeof(sendername));
  1079.     if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1080.     {
  1081.         SCM(playerid, RED, "You are not the owner of that island.");
  1082.     }
  1083.     else
  1084.     {
  1085.         SetPlayerPos(playerid, 826.3537, -2163.1882, 13.0331);
  1086.         SetPlayerInterior(playerid, 0);
  1087.         SetPlayerVirtualWorld(playerid, 0);
  1088.         SCM(playerid, LIME, "Welcome to the Christmas Island!");
  1089.     }
  1090.     return 1;
  1091. }
  1092. YCMD:ucars(playerid, params[], help)
  1093. {
  1094.     #pragma unused params, help
  1095.     SCM(playerid, BLUE, "______________________________________Digital Island_________________________________________");
  1096.     SCM(playerid, BLUE, "~~**XLAND**~~ The cars on the island can be unlocked with the following commands             ");
  1097.     SCM(playerid, BLUE, "~~**XLAND**~~ /ujester - Used to unlock the Jester ; /usultan - Used to unlock the Sultan    ");
  1098.     SCM(playerid, BLUE, "~~**XLAND**~~ /ubullet - Used to unlock the Bullet ; /uinfernus - Used to unlock the Infernus");
  1099.     SCM(playerid, BLUE, "~~**XLAND**~~ /uchopper - Used to unlock the chopper(Maverick)                               ");
  1100.     SCM(playerid, BLUE, "______________________________________Digital Island_________________________________________");
  1101.     return 1;
  1102. }
  1103. YCMD:lcars(playerid, params[], help)
  1104. {
  1105.     #pragma unused params, help
  1106.     SCM(playerid, ORANGE, "_____________________________________Digital Island__________________________________");
  1107.     SCM(playerid, ORANGE, "~~**XLAND**~~ The cars on the island can be locked with the following commands       ");
  1108.     SCM(playerid, ORANGE, "~~**XLAND**~~ /lockjester ; /locksultan ; /lockbullet ; /lockinfernus ; /lockchopper ");
  1109.     SCM(playerid, ORANGE, "_____________________________________Digital Island__________________________________");
  1110.     return 1;
  1111. }
  1112. YCMD:ujester(playerid, params[], help)
  1113. {
  1114.     #pragma unused params, help
  1115.     GetPlayerName(playerid, sendername, sizeof(sendername));
  1116.     if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1117.     {
  1118.         SCM(playerid, RED, "You don't have the keys for that car!");
  1119.     }
  1120.     else
  1121.     {
  1122.         for(new i = 0; i <= xlcar[1]; i++) if(!IsVehicleOccupied(i)) UnLockCar(i);
  1123.         SCM(playerid, LIME, "The Jester has been unlocked!");
  1124.     }
  1125.     return 1;
  1126. }
  1127. YCMD:lockjester(playerid, params[], help)
  1128. {
  1129.     #pragma unused params, help
  1130.     GetPlayerName(playerid, sendername, sizeof(sendername));
  1131.     if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1132.     {
  1133.         SCM(playerid, RED, "You don't own this car!");
  1134.     }
  1135.     else
  1136.     {
  1137.         for(new i = 0; i <= xlcar[1]; i++) if(!IsVehicleOccupied(i)) LockCar(i);
  1138.         SCM(playerid, LIME, "The Jester has been locked!");
  1139.     }
  1140.     return 1;
  1141. }
  1142. YCMD:usultan(playerid, params[], help)
  1143. {
  1144.     #pragma unused params, help
  1145.     GetPlayerName(playerid, sendername, sizeof(sendername));
  1146.     if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1147.     {
  1148.         SCM(playerid, RED, "You don't have the keys for that car!");
  1149.     }
  1150.     else
  1151.     {
  1152.         for(new i = 0; i <= xlcar[2]; i++) if(!IsVehicleOccupied(i)) UnLockCar(i);
  1153.         SCM(playerid, LIME, "The Sultan has been unlocked!");
  1154.     }
  1155.     return 1;
  1156. }
  1157. YCMD:locksultan(playerid, params[], help)
  1158. {
  1159.     #pragma unused params, help
  1160.     GetPlayerName(playerid, sendername, sizeof(sendername));
  1161.     if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1162.     {
  1163.         SCM(playerid, RED, "You don't own this car!");
  1164.     }
  1165.     else
  1166.     {
  1167.         for(new i=0; i <= xlcar[2]; i++) if(!IsVehicleOccupied(i)) LockCar(i);
  1168.         SCM(playerid, LIME, "The Sultan has been locked!");
  1169.     }
  1170.     return 1;
  1171. }
  1172. YCMD:ubullet(playerid, params[], help)
  1173. {
  1174.     #pragma unused params, help
  1175.     GetPlayerName(playerid, sendername, sizeof(sendername));
  1176.     if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1177.     {
  1178.         SCM(playerid, RED, "You don't have the keys for that car!");
  1179.     }
  1180.     else
  1181.     {
  1182.         for(new i = 0; i <= xlcar[3]; i++) if(!IsVehicleOccupied(i)) UnLockCar(i);
  1183.         SCM(playerid, LIME, "The Bullet has been unlocked!");
  1184.     }
  1185.     return 1;
  1186. }
  1187. YCMD:lockbullet(playerid, params[], help)
  1188. {
  1189.     #pragma unused params, help
  1190.     GetPlayerName(playerid, sendername, sizeof(sendername));
  1191.     if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1192.     {
  1193.         SCM(playerid, RED, "You don't own this car!");
  1194.     }
  1195.     else
  1196.     {
  1197.         for(new i=0; i <= xlcar[3]; i++) if(!IsVehicleOccupied(i)) LockCar(i);
  1198.         SCM(playerid, LIME, "The Bullet has been locked!");
  1199.     }
  1200.     return 1;
  1201. }
  1202. YCMD:uinfernus(playerid, params[], help)
  1203. {
  1204.     #pragma unused params, help
  1205.     GetPlayerName(playerid, sendername, sizeof(sendername));
  1206.     if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1207.     {
  1208.         SCM(playerid, RED, "You don't have the keys for that car!");
  1209.     }
  1210.     else
  1211.     {
  1212.         for(new i = 0; i <= xlcar[4]; i++) if(!IsVehicleOccupied(i)) UnLockCar(i);
  1213.         SCM(playerid, LIME, "The Infernus has been unlocked!");
  1214.     }
  1215.     return 1;
  1216. }
  1217. YCMD:lockinfernus(playerid, params[], help)
  1218. {
  1219.     #pragma unused params, help
  1220.     GetPlayerName(playerid, sendername, sizeof(sendername));
  1221.     if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1222.     {
  1223.         SCM(playerid, RED, "You don't own this car!");
  1224.     }
  1225.     else
  1226.     {
  1227.         for(new i=0; i <= xlcar[4]; i++) if(!IsVehicleOccupied(i)) LockCar(i);
  1228.         SCM(playerid, LIME, "The Infernus has been locked!");
  1229.     }
  1230.     return 1;
  1231. }
  1232. YCMD:uchopper(playerid, params[], help)
  1233. {
  1234.     #pragma unused params, help
  1235.     GetPlayerName(playerid, sendername, sizeof(sendername));
  1236.     if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1237.     {
  1238.         SCM(playerid, RED, "You don't have the keys!");
  1239.     }
  1240.     else
  1241.     {
  1242.         for(new i = 0; i <= xlcar[5]; i++) if(!IsVehicleOccupied(i)) UnLockCar(i);
  1243.         SCM(playerid, LIME, "The Chopper has been unlocked!");
  1244.     }
  1245.     return 1;
  1246. }
  1247. YCMD:lockchopper(playerid, params[], help)
  1248. {
  1249.     #pragma unused params, help
  1250.     GetPlayerName(playerid, sendername, sizeof(sendername));
  1251.     if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1252.     {
  1253.         SCM(playerid, RED, "You don't have the keys!");
  1254.     }
  1255.     else
  1256.     {
  1257.         for(new i=0; i <= xlcar[5]; i++) if(!IsVehicleOccupied(i)) LockCar(i);
  1258.         SCM(playerid, LIME, "The chopper has been locked!");
  1259.     }
  1260.     return 1;
  1261. }
  1262. YCMD:skin(playerid, params[], help)
  1263. {
  1264.     #pragma unused params, help
  1265.     if(PTP(1.0, playerid, 859.1595, -2158.3091, 13.2403))
  1266.     {
  1267.         GetPlayerName(playerid, sendername, sizeof(sendername));
  1268.         if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1269.         {
  1270.             SCM(playerid, RED, "You are not the owner of the island!");
  1271.         }
  1272.         else
  1273.         {
  1274.             ShowPlayerDialog(playerid, Skins, DIALOG_STYLE_LIST, "Choose a skin!", "BMX Guy\nDrug dealer\nRoller \nBiker\nBallas member\nNormal guy\nProstitute\nDoctor\nHomeless guy\nBoxer\nElvis wannabe\nGrove member\nLSV member\nMafia member\nVLA member\nTriads member\nBusiness man\nFBI agent\nPunker\nGun girl\nKarate guy\nBeautiful girl\nThe DA\nAnother biker\nPIMP\nFat man\nWorker\nClown\nFireman\nCop\nArmy guy\nSWAT guy\n", "OK", "Exit");
  1275.         }
  1276.     }
  1277.     else
  1278.     {
  1279.         SCM(playerid, ORANGE, "You are not close enough to the skin shop!");
  1280.     }
  1281.     return 1;
  1282. }
  1283. YCMD:summer(playerid, params[], help)
  1284. {
  1285.     #pragma unused params, help
  1286.     GetPlayerName(playerid, sendername, sizeof(sendername));
  1287.     if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1288.     {
  1289.         SCM(playerid, RED, "You are not the owner of the island!");
  1290.     }
  1291.     else
  1292.     {
  1293.         DestroyObject(snow[1]);
  1294.         DestroyObject(snow[2]);
  1295.         DestroyObject(snow[3]);
  1296.         DestroyObject(snow[4]);
  1297.         DestroyObject(snow[5]);
  1298.         DestroyObject(snow[6]);
  1299.         DestroyObject(snow[7]);
  1300.         DestroyObject(snow[8]);
  1301.         DestroyObject(snow[9]);
  1302.         DestroyObject(xmastree[1]);
  1303.         DestroyObject(xmastree[2]);
  1304.         DestroyObject(xmastree[3]);
  1305.         DestroyObject(present[1]);
  1306.         DestroyObject(present[2]);
  1307.         DestroyObject(present[3]);
  1308.         SCM(playerid, BLUE, "The summer has arrived! Why don't you throw up a party?");
  1309.     }
  1310.     return 1;
  1311. }
  1312. YCMD:enterhouse(playerid, params[], help)//don't change the cmd to "/enter" cause it could interfeer with a cmd in your GM
  1313. {
  1314.     #pragma unused params, help
  1315.     if(PTP(1.0, playerid, 826.4744, -2164.4116, 13.5758))
  1316.     {
  1317.         GetPlayerName(playerid, sendername, sizeof(sendername));
  1318.         if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1319.         {
  1320.             SCM(playerid, RED, "You don't have the keys! Get out of here!");
  1321.         }
  1322.         else
  1323.         {
  1324.             SetPlayerPos(playerid, 1278.7979, -838.8371, 1085.6328);
  1325.             SetPlayerInterior(playerid, 5);
  1326.             SetPlayerVirtualWorld(playerid, 7);
  1327.             SCM(playerid, ORANGE, "Home sweet home...Welcome!");
  1328.             GameTextForPlayer(playerid, "Welcome home!", 5000, 6);//5 seconds
  1329.         }
  1330.     }
  1331.     else SCM(playerid, ORANGE, "You are not close enough to the door.");
  1332.     return 1;
  1333. }
  1334. YCMD:exithouse(playerid, params[], help)//don't change the cmd to "/exit" cause it could interfeer with a cmd in your GM
  1335. {
  1336.     #pragma unused params, help
  1337.     if(PTP(1.0, playerid, 1278.7979, -838.8371, 1085.6328))
  1338.     {
  1339.         GetPlayerName(playerid, sendername, sizeof(sendername));
  1340.         if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1341.         {
  1342.             SCM(playerid, RED, "You are not allowed to be there! The room is now full of deadly gases. Die, motherfucker!!!");
  1343.             SetTimer("Death", 3000, 0);
  1344.             GameTextForPlayer(playerid, "Wasted", 6000, 2);//6 seconds
  1345.         }
  1346.         else
  1347.         {
  1348.             SetPlayerPos(playerid, 826.4744, -2164.4116, 13.5758);
  1349.             SetPlayerInterior(playerid, 0);
  1350.             SetPlayerVirtualWorld(playerid, 0);
  1351.             SCM(playerid, ORANGE, "Have a nice day!");
  1352.             GameTextForPlayer(playerid, "Goodbye!", 5000, 1);//5 seconds
  1353.         }
  1354.     }
  1355.     else SCM(playerid, ORANGE, "You are not close enough to the door.");
  1356.     return 1;
  1357. }
  1358. YCMD:takegun(playerid, params[], help)
  1359. {
  1360.     #pragma unused params, help
  1361.     if(PTP(1.0, playerid, 821.1436, -2165.6494, 13.0099))
  1362.     {
  1363.         GetPlayerName(playerid, sendername, sizeof(sendername));
  1364.         if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1365.         {
  1366.             SCM(playerid, RED, "You don't have the permission to take weapons!");
  1367.         }
  1368.         else
  1369.         {
  1370.             ShowPlayerDialog(playerid, Weapons, DIALOG_STYLE_LIST, "Choose a weapon!", "NiteStick\nKnife\nBaseball bat\nShovel\nKatana\nCane\nGrenade\nTear gase\nMolotov\n9mm\nSD Pistol\nDealge\nShotgun\nShawn off shotgun\nMicro Uzi\nMP5\nAK 47\nM4\nTec9\nRifle\nSniper rifle\nRocket Launcher\nHeat Seeker Launcher\nFlame thrower\nMinigun\nC4\nGraffiti\nPhoto\nNight glasses\nHeat Glasses\nParachute\n", "OK", "Exit");
  1371.         }
  1372.     }
  1373.     else
  1374.     {
  1375.         SCM(playerid, ORANGE, "You are not close enough to the weapons shop!");
  1376.     }
  1377.     return 1;
  1378. }
  1379. YCMD:cmds(playerid, params[], help)
  1380. {
  1381.     #pragma unused params, help
  1382.     new info[652];
  1383.     strcat(info, "{FF0000}To find out more about Digital Island ~> /aboutdisland\n", sizeof(info));
  1384.     strcat(info, "{00FF00}To teleport yourself to Digital Island ~> /gotodisland\n", sizeof(info));
  1385.     strcat(info, "{8C00FF}To enter inside the house ~> /enterhouse\n", sizeof(info));
  1386.     strcat(info, "{FFFF00}To get out from the house ~> /exithouse\n", sizeof(info));
  1387.     strcat(info, "{00FFFF}To find out how to unlock the cars ~> /ucars\n", sizeof(info));
  1388.     strcat(info, "{FF7800}To find out how to lock the cars ~> /lcars\n", sizeof(info));
  1389.     strcat(info, "{FF0000}To change your skin at the skin shop ~> /skin\n", sizeof(info));
  1390.     strcat(info, "{00FF00}To take a weapon from the automachine ~> /takegun\n", sizeof(info));
  1391.     strcat(info, "{8C00FF}To change your fighting style ~> /fstyle\n", sizeof(info));
  1392.     strcat(info, "{FFFF00}To find out what you can drink at the bar ~> /drinks\n", sizeof(info));
  1393.     strcat(info, "{00FFFF}To transform Digital Island into a summer one ~> /summer\n", sizeof(info));
  1394.     ShowPlayerDialog(playerid, CMDS, DIALOG_STYLE_MSGBOX, "Digital Island Commands", info, "OK", "");
  1395.     return 1;
  1396. }
  1397. YCMD:fstyle(playerid, params[], help)
  1398. {
  1399.     #pragma unused params, help
  1400.     if(PTP(2.0, playerid, 834.6959, -2162.9753, 13.9538))
  1401.     {
  1402.         GetPlayerName(playerid, sendername, sizeof(sendername));
  1403.         if(strcmp(sendername, "DiGiTaL_AnGeL", false))
  1404.         {
  1405.             SCM(playerid, RED, "You can't change your fighting style because you are not the owner of the island!");
  1406.         }
  1407.         else
  1408.         {
  1409.             ShowPlayerDialog(playerid, FStyles, DIALOG_STYLE_LIST, "Choose a fighting style", "Normal\nKneehead\nGrabkick\nElbow\nKung Fu\nBoxing", "OK", "Cancel");
  1410.         }
  1411.     }
  1412.     else
  1413.     {
  1414.         SCM(playerid, ORANGE, "You are not in the middle of the boxing ring.");
  1415.     }
  1416.     return 1;
  1417. }
  1418. YCMD:drinks(playerid, params[], help)
  1419. {
  1420.     #pragma unused params, help
  1421.     if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
  1422.     {
  1423.         SCM(playerid, BLUE, "_____________________________________DRINKS________________________________");
  1424.         SCM(playerid, BLUE, "Beer($10)~>/drinkbeer ; Wine($15)~>/drinkwine ; Whiskey($20)~>/drinkwhiskey");
  1425.         SCM(playerid, BLUE, "Coke($5)~>/drinkcoke ; Water($3)~>/drinkwater ; Vodka($18)~>/drinkvodka");
  1426.         SCM(playerid, BLUE, "___________________________________________________________________________");
  1427.     }
  1428.     else
  1429.     {
  1430.         SCM(playerid, ORANGE, "You are not close enough to the bar on the island!");
  1431.     }
  1432.     return 1;
  1433. }
  1434. YCMD:drinkbeer(playerid, params[], help)
  1435. {
  1436.     #pragma unused params, help
  1437.     if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
  1438.     {
  1439.         new Float:health;
  1440.         GivePlayerMoney(playerid, - 10);
  1441.         PlayerDrunk[playerid] += 1;
  1442.         if(PlayerDrunk[playerid] >= 5)
  1443.         {
  1444.             GameTextForPlayer(playerid, "~w~You are~n~~p~Drunk", 3500, 1);
  1445.             ApplyAnimation(playerid,"PED", "WALK_DRUNK",4.0,1,1,0,0,0);
  1446.             SetTimer("AnimStop", 15000, 0);
  1447.         }
  1448.         if(GetPlayerHealth(playerid, health) < 100)
  1449.         {
  1450.             new string[128];
  1451.             GetPlayerName(playerid, sendername, sizeof(sendername));
  1452.             format(string, sizeof(string), "* %s drinks a beer.", sendername);
  1453.             ProxDetector(30.0, playerid, string, PURPLE,PURPLE,PURPLE,PURPLE,PURPLE);
  1454.             SetPlayerHealth(playerid, health + 5.0);
  1455.             return 1;
  1456.         }
  1457.         new Drunk = GetPlayerDrunkLevel(playerid);
  1458.         SetPlayerDrunkLevel(playerid, Drunk+100);
  1459.     }
  1460.     else
  1461.     {
  1462.         SCM(playerid, ORANGE, "You are not at the bar from the Digital Island!");
  1463.     }
  1464.     return 1;
  1465. }
  1466. YCMD:drinkwine(playerid, params[], help)
  1467. {
  1468.     #pragma unused params, help
  1469.     if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
  1470.     {
  1471.         new Float:health;
  1472.         GivePlayerMoney(playerid, - 15);
  1473.         PlayerDrunk[playerid] += 1;
  1474.         if(PlayerDrunk[playerid] >= 5)
  1475.         {
  1476.             GameTextForPlayer(playerid, "~w~You are~n~~p~Drunk", 3500, 1);
  1477.             ApplyAnimation(playerid,"PED", "WALK_DRUNK",4.0,1,1,0,0,0);
  1478.             SetTimer("AnimStop", 15000, 0);
  1479.         }
  1480.         if(GetPlayerHealth(playerid, health) < 100)
  1481.         {
  1482.             new string[128];
  1483.             GetPlayerName(playerid, sendername, sizeof(sendername));
  1484.             format(string, sizeof(string), "* %s drinks wine.", sendername);
  1485.             ProxDetector(30.0, playerid, string, PURPLE,PURPLE,PURPLE,PURPLE,PURPLE);
  1486.             SetPlayerHealth(playerid, health + 7.0);
  1487.             return 1;
  1488.         }
  1489.         new Drunk = GetPlayerDrunkLevel(playerid);
  1490.         SetPlayerDrunkLevel(playerid, Drunk+100);
  1491.     }
  1492.     else
  1493.     {
  1494.         SCM(playerid, ORANGE, "You are not at the bar from the Digital Island!");
  1495.     }
  1496.     return 1;
  1497. }
  1498. YCMD:drinkwhiskey(playerid, params[], help)
  1499. {
  1500.     #pragma unused params, help
  1501.     if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
  1502.     {
  1503.         new Float:health;
  1504.         GivePlayerMoney(playerid, - 20);
  1505.         PlayerDrunk[playerid] += 1;
  1506.         if(PlayerDrunk[playerid] >= 5)
  1507.         {
  1508.             GameTextForPlayer(playerid, "~w~You are~n~~p~Drunk", 3500, 1);
  1509.             ApplyAnimation(playerid,"PED", "WALK_DRUNK",4.0,1,1,0,0,0);
  1510.             SetTimer("AnimStop", 15000, 0);
  1511.         }
  1512.         if(GetPlayerHealth(playerid, health) < 100)
  1513.         {
  1514.             new string[128];
  1515.             GetPlayerName(playerid, sendername, sizeof(sendername));
  1516.             format(string, sizeof(string), "* %s drinks some whiskey.", sendername);
  1517.             ProxDetector(30.0, playerid, string, PURPLE,PURPLE,PURPLE,PURPLE,PURPLE);
  1518.             SetPlayerHealth(playerid, health + 3.0);
  1519.             return 1;
  1520.         }
  1521.         new Drunk = GetPlayerDrunkLevel(playerid);
  1522.         SetPlayerDrunkLevel(playerid, Drunk+100);
  1523.     }
  1524.     else
  1525.     {
  1526.         SCM(playerid, ORANGE, "You are not at the bar from the Digital Island!");
  1527.     }
  1528.     return 1;
  1529. }
  1530. YCMD:drinkcoke(playerid, params[], help)
  1531. {
  1532.     #pragma unused params, help
  1533.     if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
  1534.     {
  1535.         new Float:health;
  1536.         GivePlayerMoney(playerid, - 5);
  1537.         if(GetPlayerHealth(playerid, health) < 100)
  1538.         {
  1539.             new string[128];
  1540.             GetPlayerName(playerid, sendername, sizeof(sendername));
  1541.             format(string, sizeof(string), "* %s drinks some Coke.", sendername);
  1542.             ProxDetector(30.0, playerid, string, PURPLE,PURPLE,PURPLE,PURPLE,PURPLE);
  1543.             SetPlayerHealth(playerid, health + 10.0);
  1544.             return 1;
  1545.         }
  1546.     }
  1547.     else
  1548.     {
  1549.         SCM(playerid, ORANGE, "You are not at the bar from the Digital Island!");
  1550.     }
  1551.     return 1;
  1552. }
  1553. YCMD:drinkvodka(playerid, params[], help)
  1554. {
  1555.     #pragma unused params, help
  1556.     if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
  1557.     {
  1558.         new Float:health;
  1559.         GivePlayerMoney(playerid, - 18);
  1560.         PlayerDrunk[playerid] += 1;
  1561.         if(PlayerDrunk[playerid] >= 5)
  1562.         {
  1563.             GameTextForPlayer(playerid, "~w~You are~n~~p~Drunk", 3500, 1);
  1564.             ApplyAnimation(playerid,"PED", "WALK_DRUNK",4.0,1,1,0,0,0);
  1565.             SetTimer("AnimStop", 15000, 0);
  1566.         }
  1567.         if(GetPlayerHealth(playerid, health) < 100)
  1568.         {
  1569.             new string[128];
  1570.             GetPlayerName(playerid, sendername, sizeof(sendername));
  1571.             format(string, sizeof(string), "* %s drinks some russian vodka.", sendername);
  1572.             ProxDetector(30.0, playerid, string, PURPLE,PURPLE,PURPLE,PURPLE,PURPLE);
  1573.             SetPlayerHealth(playerid, health - 5.0);
  1574.             return 1;
  1575.         }
  1576.         new Drunk = GetPlayerDrunkLevel(playerid);
  1577.         SetPlayerDrunkLevel(playerid, Drunk+100);
  1578.     }
  1579.     else
  1580.     {
  1581.         SCM(playerid, ORANGE, "You are not at the bar from the Digital Island!");
  1582.     }
  1583.     return 1;
  1584. }
  1585. YCMD:drinkwater(playerid, params[], help)
  1586. {
  1587.     #pragma unused params, help
  1588.     if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
  1589.     {
  1590.         new Float:health;
  1591.         GivePlayerMoney(playerid, - 3);
  1592.         if(GetPlayerHealth(playerid, health) < 100)
  1593.         {
  1594.             new string[128];
  1595.             GetPlayerName(playerid, sendername, sizeof(sendername));
  1596.             format(string, sizeof(string), "* %s drinks some water.", sendername);
  1597.             ProxDetector(30.0, playerid, string, PURPLE,PURPLE,PURPLE,PURPLE,PURPLE);
  1598.             SetPlayerHealth(playerid, health + 15.0);
  1599.             return 1;
  1600.         }
  1601.     }
  1602.     else
  1603.     {
  1604.         SCM(playerid, ORANGE, "You are not at the bar from the Digital Island!");
  1605.     }
  1606.     return 1;
  1607. }
  1608. #endif
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!