Szerző Téma: Digital island..  (Megtekintve 1653 alkalommal)

Nem elérhető Beckham

  • 1693
  • Noresz
  • Discord: Noresz#4265
    • Profil megtekintése
    • OctansV Alt:v szervere
Digital island..
« Dátum: 2012. december 10. - 18:10:28 »
0 Show voters
Sziasztok találtam egy elég jó kis scriptet mappal...
Nem én készítettem
Készítõ:Digital_Angel
Parancsok:/cmds 
/aboutdisland
/gotodisland   
/skin           
/summer       
/ucars           
/enterhouse
/exithouse     
/takegun       
/fstyle         
/lcars           
/drinks
eredeti link: http://forum.sa-mp.com/showthread.php?t=397900
pastebin: http://pastebin.com/JfvWuSPR
solidfiles: http://www.solidfiles.com/d/072050c4fe/
Code
/*       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
  angel statue with \"D A\" written on the floor with neons.
  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]
     DiGiTaL Island is a Christmas island(snow included). First time, it wanted to be a normal
  island(in september) but I forgot about it and I found it in my PC now(24.11.2012),
  so because Christmas is coming, here it is.
 
    Credits ~> DiGiTaL_AnGeL - For making the script & the map.
            ~> Kalcor - For SA:MP
            ~> Spookie - For The Pawn Compiler GUI
            ~> Alex \"Y_Less\" Cole - For Y_Command & YSI
            ~> Incognito - For his objects streamer
  Commands : /cmds         - Shows you a dialog with the whole cmds in the FS.
       /aboutdisland - Shows you informations about the script.
       /gotodisland  - Teleports you to the Digital Island.
       /skin         - Allows you to change your skin.
       /summer       - Transforms the Christmas island into a summer one.
       /ucars        - Shows you informations about unlocking the cars. P.S. I saw that the bug appears only on my GM, but I won\'t
                    remove them. Maybe I\'ll add a /lock cmd.
       /enterhouse   - Teleports you in the house.
       /exithouse    - Teleports you in the garden, if you are in the house.
       /takegun      - Shows you a dialog that allows you to select a weapon you want.(31 available weapons)
       /fstyle       - Allows you to change your fighting style.
       /lcars        - Shows you informations about locking then vehicles.
       /drinks       - Shows you informations about drinking at the bar.
  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
      the one in your GM
    2. Locking & Unlocking the cars will cause the locking/unlocking of the cars with a smaller id(For example:/usultan(id 2) - unlocks the
      Sultan & the Jester too). I\'ll try to fix this in the next version.
          3. The snow it\'s a bit laggy, but you can remove it with the cmd /summer
                                   DiGiTaL AnGeL 2012(TM)
 
_________________________________________________Planified Updates________________________________________________
Here are the new things you\'ll find on v2.0
~> More cars
~> More objects in the garden
~> Objects in the house
~> An airport
~> A dock
~> More skins at the skin shop
~> Animations & objects attached when drinking at the bar
~> If you have more ideas please contact me([email protected])
_____________________________________________Changes Log________________________________________________
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
whole modifications.
01.12.2012 - Added the future updates, and Digital Island v1.0 is officially finished.(1608 lines)
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...
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
    v 1.0 is ready, and as soon as I can, I\'ll release it. Meanwhile, I\'ll make another FS.
30.11.2012 - Added the sounds for opening/closing the gates.
30.11.2012 - Removed /gate, now the 2nd gate can be opened by pressing key horn.
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. ^_^
30.11.2012 - Finished adding the cmds to drink at the bar. Available drinks : Water, coke, beer, wine, vodka, whiskey.
30.11.2012 - Added the cmd to drink beer, the other ones coming up.
29.11.2012 - At the end of the day, the FS has 1290 lines.
29.11.2012 - Added the other cmds for locking cars
29.11.2012 - Changed the bar and added a lot of objects on it. A cmd for drink coming up maybe?
29.11.2012 - Added the /lockjester cmd(so you can lock the Jester), the other ones coming up.
28.11.2012 - At the end of the day, the FS has 1110 lines. Good night again!
28.11.2012 - Added that nice billard table, balls and cues in the garden.
28.11.2012 - Added the fighting style selection, and a boxing ring in the garden.
28.11.2012 - Added the /cmds dialog.
28.11.2012 - Added the weapons dialog, and the fighting styles dialog is coming up.(currently 1017 lines)
27.11.2012 - At the end of the day, the FS has 830 lines. Good night!
27.11.2012 - Added 25 new skins(currently 30)
27.11.2012 - Added the grass in the garden.
27.11.2012 - Added the /enterhouse & /exithouse cmds for the house. You won\'t be a homeless anymore... :))
27.11.2012 - Added the vehicleplates on the cars(DIsland [NR]) You can change them on the lines 412-415.
27.11.2012 - Added the /summer cmd, so you can transform the island into a summer one.
27.11.2012 - Added the chopper, the speed bumps, the arrows on the street and that big skull on top of the house.
27.11.2012 - Added the skin shop(only 5 skins for now) and the objects for it.
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
    comes from my GM, so dont\' worry.)
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)
25.11.2012 - Removed the /closegates cmd, cause I added a timer for closing the gate.
24.11.2012 - Started the FS.
                                                                                                      */
//_______________DEFINES_____________________________
#define FILTERSCRIPT
#define MAX_STRING 255
#define KEY_HORN 2
//_______________________COLORS______________________
#define LIME      0x6CFF21FF
#define BLUE      0x00FFFFFF
#define RED       0xFF0000FF
#define PURPLE    0x6400FFFF
#define ORANGE    0xFF8200FF
#define YELLOW    0xFFFF00FF
//______________________SHORTCUTS____________________
#define SCM SendClientMessage
#define PTP PlayerToPoint
//______________________DIALOGS______________________
#define Skins 777
#define Weapons 778
#define CMDS 779
#define FStyles 780
//_________________INCLUDES__________________________
#include <a_samp>
#include <YSI\\y_commands>
#include <sscanf2>
#include <streamer>
#include <string>
//_________________NEWS______________________________
new sendername[MAX_PLAYER_NAME];
new PlayerDrunk[MAX_PLAYERS];
new gate;
new mgate1;
new mgate2;
new xlcar[6];
new snow[10];
new xmastree[4];
new present[4];
new henter;
new hexit;
//-------------------Forwards---------------------------------------------------
forward GateClose(playerid);
forward UnLockCar(carid);
forward Death(playerid);
forward LockCar(carid);
forward ProxDetector(Float:radi, playerid, string[],col1,col2,col3,col4,col5);
forward AnimStop(playerid);
forward CloseGates(playerid);
//------------------------------------------------------------------------------
#if defined FILTERSCRIPT
public OnFilterScriptInit()
{
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
    Create3DTextLabel(\"Use /skin to\\nchange your skin!\",RED,859.1595,-2158.3091,13.2403,50,0);//at the skin shop
    Create3DTextLabel(\"Use /takegun to\\ntake a weapon!\",LIME,821.1436, -2165.6494, 13.0099,50,0);//at the gun shop
    Create3DTextLabel(\"Use /enterhouse\\nto enter!\",ORANGE,826.4744, -2164.4116, 13.5758,50,0);//at the house enter
    Create3DTextLabel(\"Use /fstyle to change\\nyour fighting style!\",BLUE, 834.6959,-2162.9753,13.9538, 50, 0);//in the middle of the ring
xlcar[1] = AddStaticVehicle(559,859.5668,-2166.3665,12.5497,0,3,3);//Jester
xlcar[2] = AddStaticVehicle(560,853.6971,-2166.3665,12.5627,0,1,0);//Sultan
xlcar[3] = AddStaticVehicle(541,861.3105,-2145.1030,12.5637,90.00,3,1);//Bullet
xlcar[4] = AddStaticVehicle(411,861.3105,-2148.6404,12.6637,90.00,1,1);//Infernus
xlcar[5] = AddStaticVehicle(487, 856.0645, -2185.7656, 13.1423, 90.2411, 151, 151); //the chopper
//_____________________________________THE GATES_____________________________________________
gate = CreateObject(971, 835.32, -2143.53, 15.52,   0.00, 0.00, 180.00);//the moving gate
mgate1 = CreateObject(985, 839.25, -2054.09, 13.85,   0.00, 0.00, 0.00);//one of the main gates
mgate2 = CreateObject(986, 831.29, -2054.09, 13.85,   0.00, 0.00, 0.00);//the other main gate
//_____________________________________________THE OBJECTS___________________________________
CreateObject(3262, 829.53, -2141.97, 12.20,   0.00, 0.12, 180.00);//that cool private proprety sign
CreateObject(3265, 829.53, -2141.98, 12.10,   0.00, 0.00, 180.00);//that other cool private proprety sign
CreateObject(3471, 842.13, -2048.26, 13.14,   0.00, 0.00, 90.00);//lion near the main gates
CreateObject(3471, 828.10, -2048.26, 13.14,   0.00, 0.00, 90.00);//lion near the main gates
CreateObject(991, 822.83, -2053.39, 15.49,   0.00, 0.00, 0.00);
CreateObject(991, 848.46, -2053.39, 15.44,   0.00, 0.00, 0.00);
CreateObject(991, 822.83, -2053.39, 13.08,   0.00, 0.00, 0.00);
CreateObject(991, 850.08, -2053.39, 15.44,   0.00, 0.00, 0.00);
CreateObject(991, 850.08, -2053.39, 13.08,   0.00, 0.00, 0.00);
CreateObject(991, 848.46, -2053.39, 13.08,   0.00, 0.00, 0.00);
CreateObject(5837, 859.34, -2157.48, 13.67,   0.00, 0.00, 90.00);
CreateObject(19130, 857.26, -2159.08, 15.04,   33.00, 0.00, 0.00);
CreateObject(19130, 857.26, -2158.49, 15.20,   0.00, 0.00, 0.00);
CreateObject(19130, 857.26, -2157.90, 15.04,   -33.00, 0.00, 0.00);
CreateObject(8843, 835.34, -2102.78, 11.97,   0.00, 0.00, 180.00);
CreateObject(8843, 835.34, -2078.32, 11.97,   0.00, 0.00, 180.00);
CreateObject(3434, 827.06, -2166.24, 25.00,   0.00, 0.00, 180.00);
CreateObject(18885, 821.15, -2166.39, 13.07,   0.00, 0.00, 180.00);
CreateObject(1550, 824.04, -2164.69, 12.34,   18.00, -25.00, 90.00);
CreateObject(1550, 824.33, -2164.98, 12.34,   0.00, 11.00, 0.00);
CreateObject(1550, 823.81, -2165.08, 12.34,   7.00, 0.00, 0.00);
CreateObject(17034, 861.07, -2175.58, -10.59,   0.00, 0.00, 93.27);
CreateObject(17034, 811.54, -2165.41, -9.71,   0.00, 0.00, 258.89);
CreateObject(17034, 825.52, -2165.57, -9.71,   0.00, 0.00, 258.89);
CreateObject(17034, 837.72, -2167.02, -9.79,   0.00, 0.00, 258.89);
CreateObject(17034, 849.79, -2171.45, -9.93,   0.00, 0.00, 258.89);
CreateObject(19425, 832.83, -2126.50, 11.95,   0.00, 0.00, 0.00);
CreateObject(19425, 832.83, -2133.68, 11.95,   0.00, 0.00, 0.00);
CreateObject(19425, 832.83, -2130.84, 11.95,   0.00, 0.00, 0.00);
CreateObject(19425, 832.83, -2129.35, 11.95,   0.00, 0.00, 0.00);
CreateObject(19425, 832.83, -2127.91, 11.95,   0.00, 0.00, 0.00);
CreateObject(19425, 832.83, -2132.28, 11.95,   0.00, 0.00, 0.00);
CreateObject(19355, 842.89, -2142.74, 13.68,   0.00, 0.00, 90.00);
CreateObject(19355, 827.72, -2142.74, 13.66,   0.00, 0.00, 90.00);
CreateObject(19302, 830.10, -2143.37, 13.22,   0.00, 0.00, 0.00);
CreateObject(19302, 840.60, -2143.37, 13.22,   0.00, 0.00, 0.00);
CreateObject(19355, 827.72, -2142.74, 16.97,   0.00, 0.00, 90.00);
CreateObject(19355, 842.89, -2142.74, 16.96,   0.00, 0.00, 90.00);
CreateObject(6119, 835.88, -2086.80, 12.04,   0.00, 0.00, 0.00);
CreateObject(12814, 850.33, -2167.80, 11.96,   0.00, 0.00, 0.00);
CreateObject(12814, 820.35, -2167.85, 11.96,   0.00, 0.00, 0.00);
CreateObject(9482, 835.23, -2142.84, 18.74,   0.00, 0.00, 90.00);
CreateObject(8652, 825.89, -2128.14, 12.82,   0.00, 0.00, 90.00);
CreateObject(8652, 805.67, -2178.00, 12.90,   0.00, 0.00, 90.00);
CreateObject(8652, 844.74, -2098.45, 13.06,   0.00, 0.00, 90.00);
CreateObject(8652, 844.74, -2068.78, 13.06,   0.00, 0.00, 90.00);
CreateObject(8652, 825.89, -2068.78, 12.82,   0.00, 0.00, 90.00);
CreateObject(8652, 825.89, -2098.46, 12.82,   0.00, 0.00, 90.00);
CreateObject(3749, 835.34, -2051.86, 17.80,   0.00, 0.00, 0.00);
CreateObject(3607, 825.53, -2178.06, 18.06,   0.00, 0.00, 180.00);
CreateObject(3604, 856.74, -2174.23, 14.50,   0.00, 0.00, 180.00);
CreateObject(8652, 844.74, -2128.14, 13.06,   0.00, 0.00, 90.00);
CreateObject(8652, 865.26, -2157.56, 12.90,   0.00, 0.00, 90.00);
CreateObject(8652, 850.05, -2192.72, 12.84,   0.00, 0.00, 0.00);
CreateObject(8652, 865.26, -2177.90, 12.90,   0.00, 0.00, 90.00);
CreateObject(8652, 805.67, -2157.67, 12.82,   0.00, 0.00, 90.00);
CreateObject(3578, 859.77, -2142.62, 12.90,   0.00, 0.00, 0.00);
CreateObject(3578, 810.95, -2142.62, 12.78,   0.00, 0.00, 0.00);
CreateObject(3578, 851.11, -2142.62, 12.84,   0.00, 0.00, 0.00);
CreateObject(3578, 819.32, -2142.62, 12.78,   0.00, 0.00, 0.00);
CreateObject(3934, 855.18, -2185.70, 12.01,   0.00, 0.00, 0.00);
CreateObject(3462, 808.87, -2161.58, 13.46,   0.00, 0.00, 215.00);
CreateObject(18647, 811.39, -2160.55, 12.00,   0.00, 0.00, 95.00);
CreateObject(18647, 810.83, -2161.95, 12.00,   0.00, 0.00, -47.00);
CreateObject(18647, 810.79, -2159.94, 12.00,   0.00, 0.00, -69.00);
CreateObject(18647, 810.24, -2161.64, 12.00,   0.00, 0.00, -10.08);
CreateObject(18647, 811.66, -2161.17, 12.00,   0.00, 0.00, -47.00);
CreateObject(18647, 810.05, -2159.14, 12.00,   0.00, 0.00, -40.00);
CreateObject(18647, 809.68, -2160.36, 12.00,   0.00, 0.00, -69.00);
CreateObject(18647, 809.40, -2159.93, 12.00,   0.00, 0.00, -40.00);
CreateObject(18647, 810.34, -2159.59, 12.01,   0.00, 0.00, 40.00);
CreateObject(14791, 834.49, -2162.54, 14.08,   0.00, 0.00, 0.00);//the boxing ring
CreateObject(3524, 863.46, -2163.95, 14.84,   0.00, 0.00, -90.00);
CreateObject(3524, 863.40, -2154.77, 14.84,   0.00, 0.00, -90.00);
CreateObject(3524, 863.56, -2150.71, 14.84,   0.00, 0.00, -90.00);
CreateObject(8483, 744.34, -2289.91, 5.00,   0.00, 0.00, 62.00);//skull stone on the vulcano
CreateObject(18752, 747.14, -2359.86, -6.25,   0.00, 0.00, 0.00);//vulcano
CreateObject(3524, 861.82, -2161.38, 14.84,   0.00, 0.00, -90.00);
CreateObject(3524, 863.46, -2158.53, 14.84,   0.00, 0.00, -90.00);
CreateObject(3524, 861.62, -2157.14, 14.84,   0.00, 0.00, -90.00);
CreateObject(3524, 861.65, -2152.86, 14.84,   0.00, 0.00, -90.00);
CreateObject(1594, 814.61, -2154.98, 12.44,   0.00, 0.00, 0.00);
CreateObject(1670, 814.61, -2154.91, 12.83,   0.00, 0.00, 11.00);
//____________________________The bar & the objects on it_______________________
    CreateObject(18090, 812.35, -2145.63, 14.55,   0.00, 0.00, 90.00);//the bar itself
CreateObject(1541, 813.23, -2144.53, 14.19,   0.00, 0.00, 0.00);
CreateObject(1541, 811.57, -2144.53, 14.19,   0.00, 0.00, 0.00);
CreateObject(1664, 812.69, -2144.36, 14.36,   0.00, 0.00, 90.00);
CreateObject(1664, 812.10, -2144.39, 14.36,   0.00, 0.00, 69.00);
CreateObject(1664, 812.41, -2144.13, 14.36,   0.00, 0.00, 0.00);
CreateObject(1512, 812.18, -2144.08, 14.39,   0.00, 0.06, -11.00);
CreateObject(1512, 812.58, -2144.19, 14.39,   0.06, 0.00, -11.00);
CreateObject(1512, 812.29, -2144.37, 14.39,   0.00, 0.00, -11.00);
CreateObject(1544, 812.54, -2147.13, 13.02,   0.00, 0.00, 0.00);
CreateObject(1544, 811.93, -2144.28, 14.19,   0.00, 0.00, 0.00);
CreateObject(1544, 812.75, -2144.15, 14.19,   0.00, 0.00, 0.00);
CreateObject(1544, 812.04, -2144.09, 14.19,   0.00, 0.00, 0.00);
CreateObject(1512, 812.58, -2144.19, 13.83,   0.12, -0.06, -11.00);
CreateObject(1544, 812.75, -2144.15, 13.65,   0.00, 0.00, 0.00);
CreateObject(1544, 811.93, -2144.28, 13.65,   0.00, 0.00, 0.00);
CreateObject(1512, 812.29, -2144.37, 13.83,   0.00, 0.00, -11.00);
CreateObject(1512, 812.18, -2144.08, 13.83,   0.00, 0.06, -11.00);
CreateObject(1664, 812.10, -2144.39, 13.83,   0.00, 0.00, 69.00);
CreateObject(1664, 812.69, -2144.36, 13.83,   0.00, 0.00, 90.00);
CreateObject(1664, 812.86, -2144.08, 13.83,   0.00, 0.00, 0.00);
CreateObject(1664, 812.41, -2144.13, 13.83,   0.00, 0.00, 0.00);
CreateObject(1546, 813.97, -2147.15, 13.12,   0.00, 0.00, 0.00);
CreateObject(1546, 812.41, -2147.30, 13.12,   0.06, 0.00, 0.00);
CreateObject(1546, 812.84, -2147.18, 13.12,   0.06, 0.00, 0.00);
CreateObject(1667, 812.18, -2147.10, 13.12,   0.24, 0.06, 0.00);
CreateObject(1667, 813.49, -2147.15, 13.46,   0.00, 0.00, 0.00);
CreateObject(1667, 813.19, -2147.22, 13.46,   0.00, 0.00, 0.00);
CreateObject(1667, 812.68, -2147.16, 13.12,   0.00, 0.00, 0.00);
CreateObject(1546, 812.01, -2147.25, 13.12,   0.06, 0.00, 0.00);
CreateObject(1544, 812.51, -2144.34, 13.65,   0.00, 0.00, 0.00);
CreateObject(2350, 813.08, -2147.81, 12.38,   0.00, 0.00, 0.00);//2350 ~> Bar chairs
CreateObject(2350, 811.70, -2147.81, 12.38,   0.00, 0.00, 0.00);
CreateObject(2350, 810.76, -2147.81, 12.38,   0.00, 0.00, 0.00);
CreateObject(2350, 813.93, -2147.81, 12.38,   0.00, 0.00, 0.00);
CreateObject(2350, 813.08, -2147.81, 12.38,   0.00, 0.00, 0.00);
//______________________________The Billiard table & Co.________________________
    CreateObject(2964, 817.42, -2164.16, 11.98,   0.00, 0.00, 0.00);
CreateObject(3004, 818.16, -2164.60, 12.90,   -3.50, 0.00, 90.00);
CreateObject(3004, 818.16, -2164.65, 12.90,   -3.50, 0.00, 90.00);
CreateObject(2995, 817.96, -2164.04, 12.92,   0.00, 0.00, 0.00);
CreateObject(2996, 817.96, -2164.25, 12.92,   0.00, 0.00, 0.00);
CreateObject(2997, 817.96, -2164.15, 12.92,   0.00, 0.00, 0.00);
CreateObject(2965, 817.78, -2164.10, 12.90,   0.00, 0.00, 0.00);
CreateObject(2999, 817.96, -2163.93, 12.92,   0.00, 0.00, 0.00);
CreateObject(3000, 817.88, -2164.19, 12.92,   0.00, 0.00, 0.00);
CreateObject(3106, 817.88, -2164.09, 12.92,   0.00, 0.00, 0.00);
CreateObject(3102, 817.88, -2163.99, 12.92,   0.00, 0.00, 0.00);
CreateObject(3103, 817.79, -2164.13, 12.92,   0.00, 0.00, 0.00);
CreateObject(3100, 817.79, -2164.05, 12.92,   0.00, 0.00, 0.00);
CreateObject(3105, 817.69, -2164.10, 12.92,   0.00, 0.00, 0.00);
CreateObject(3003, 817.02, -2164.14, 12.92,   0.00, 0.00, 0.00);
//______________________________________The Grass_______________________________
CreateObject(2898, 807.41, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 862.94, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 862.86, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 818.10, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 858.88, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 854.81, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 850.75, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 846.67, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 842.60, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 838.51, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 834.45, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 830.39, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 826.31, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 822.27, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 818.21, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 809.96, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 810.05, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 810.05, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 858.86, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 854.79, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 850.71, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 846.65, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 842.57, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 838.50, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 834.41, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 830.31, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 826.23, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 822.16, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 814.13, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 814.03, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 807.41, -2145.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 862.94, -2151.23, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 858.88, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 854.81, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 850.75, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 846.67, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 842.60, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 838.51, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 834.45, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 830.39, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 826.31, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 822.27, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 818.21, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 814.13, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 810.35, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 807.85, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 807.41, -2156.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 810.35, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 814.13, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 818.21, -2162.06, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 822.27, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 826.31, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 830.39, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 834.45, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 838.51, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 842.60, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 846.67, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 850.75, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 854.81, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 858.88, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 862.87, -2172.86, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 862.86, -2162.05, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 858.88, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 854.81, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 850.75, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 846.67, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 842.60, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 838.51, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 834.45, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 830.39, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 826.31, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 822.27, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 818.21, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 814.13, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 810.35, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 807.85, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 862.87, -2167.46, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 858.88, -2172.86, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 854.81, -2172.86, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 850.75, -2172.86, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 846.67, -2172.86, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 842.60, -2172.86, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 810.35, -2172.86, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 807.85, -2178.25, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 807.85, -2172.86, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 810.35, -2178.25, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 842.60, -2178.25, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 846.67, -2178.25, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 850.75, -2178.25, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 862.90, -2189.82, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 858.88, -2178.25, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 854.81, -2178.25, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 862.87, -2178.25, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 846.67, -2183.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 817.52, -2190.15, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 862.87, -2183.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 846.70, -2190.03, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 846.67, -2189.01, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 862.87, -2189.01, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 807.85, -2183.64, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 807.84, -2189.03, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 807.75, -2190.16, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 811.80, -2190.16, 11.98,   0.00, 0.00, 0.00);
CreateObject(2898, 815.87, -2190.16, 11.98,   0.00, 0.00, 0.00);
//_______________________________________Xmas Trees & Presents_______________________________
xmastree[1] = CreateObject(19076, 841.90, -2167.07, 23.16,   0.00, 0.00, 0.00);//xmas tree
xmastree[2] = CreateObject(19076, 811.21, -2167.07, 23.16,   0.00, 0.00, 0.00);//xmas tree
xmastree[3] = CreateObject(19076, 807.90, -2155.69, 11.94,   0.00, 0.00, 0.00);//xmas tree
present[1] = CreateObject(19058, 807.90, -2154.85, 12.59,   0.00, 0.00, 0.00);//present
present[2] = CreateObject(19054, 807.84, -2156.58, 12.59,   0.00, 0.00, 0.00);//present
present[3] = CreateObject(19056, 809.07, -2155.62, 12.61,   0.00, 0.00, 0.00);//present
//_______________________________________The Snow____________________________________________
snow[1] = CreateObject(18863, 850.79, -2133.10, 11.00,   0.00, 0.00, 0.00);//snowarc
snow[2] = CreateObject(18863, 856.90, -2143.09, 12.00,   0.00, 0.00, 1.00);//snowarc
snow[3] = CreateObject(18864, 827.36, -2172.03, 12.00,   45.00, 47.00, 40.00);//fakesnow
snow[4] = CreateObject(18863, 873.16, -2149.22, 16.00,   90.00, 0.00, 11.00);//snowarc
snow[5] = CreateObject(18863, 867.26, -2139.18, 16.00,   90.00, 0.00, 11.00);//snowarc
snow[6] = CreateObject(18863, 869.34, -2190.32, 11.00,   0.00, 0.00, 0.00);//snowarc
snow[7] = CreateObject(18863, 867.01, -2151.17, 16.00,   90.00, 0.00, 11.00);//snowarc
snow[8] = CreateObject(18863, 867.00, -2151.25, 16.00,   90.00, 0.00, 11.00);//snowarc
snow[9] = CreateObject(18863, 873.81, -2157.99, 16.00,   90.00, 0.00, 11.00);//snowarc
//_______________________________________________Pickups_____________________________________
henter = CreatePickup(1273, 2, 826.4744, -2164.4116, 13.5758, 0);//house enter
hexit = CreatePickup(1272, 2, 1278.7979, -838.8371, 1085.6328, 7);//house exit
CreatePickup(1318, 2, 859.1595, -2158.3091, 13.2403, 0);//skin shop
CreatePickup(1318, 2, 821.1436, -2165.6494, 13.0099, 0);//gun shop
CreatePickup(1318, 2, 834.6959, -2162.9753, 13.9538, 0);//fighting style selection
CreatePickup(1318, 2, 812.5156, -2147.7656, 13.0099, 0);//the bar
//___________________________________Setting up the vehicle plates____________________________
SetVehicleNumberPlate(xlcar[1], \"DIsland 1\");
SetVehicleNumberPlate(xlcar[2], \"DIsland 2\");
SetVehicleNumberPlate(xlcar[3], \"DIsland 3\");
SetVehicleNumberPlate(xlcar[4], \"DIsland 4\");
print(\" ______________________________ \");
print(\"|      Digital Island loaded!  |\");
print(\"|              by DiGiTaL_AnGeL|\");
print(\"|______________________________|\");
return 1;
}
public OnFilterScriptExit()
{
print(\" ______________________________ \");
print(\"|    Digital Island unloaded!  |\");
print(\"|              by DiGiTaL_AnGeL|\");
print(\"|______________________________|\");
return 1;
}
forward PTP(Float:radi, playerid, Float:x, Float:y, Float:z);
public PTP(Float:radi, playerid, Float:x, Float:y, Float:z)
{
    if(IsPlayerConnected(playerid))
{
new Float:oldposx, Float:oldposy, Float:oldposz;
new Float:tempposx, Float:tempposy, Float:tempposz;
GetPlayerPos(playerid, oldposx, oldposy, oldposz);
tempposx = (oldposx -x);
tempposy = (oldposy -y);
tempposz = (oldposz -z);
//printf(\"DEBUG: X:%f Y:%f Z:%f\",posx,posy,posz);
if (((tempposx < radi) && (tempposx > -radi)) && ((tempposy < radi) && (tempposy > -radi)) && ((tempposz < radi) && (tempposz > -radi)))
{
   return 1;
}
}
return 0;
}
public ProxDetector(Float:radi, playerid, string[],col1,col2,col3,col4,col5)
{
if(IsPlayerConnected(playerid))
{
new Float:posx, Float:posy, Float:posz;
new Float:oldposx, Float:oldposy, Float:oldposz;
new Float:tempposx, Float:tempposy, Float:tempposz;
GetPlayerPos(playerid, oldposx, oldposy, oldposz);
//radi = 2.0; //Trigger Radius
for(new i = 0; i <= MAX_PLAYERS; i++)
{
   if(IsPlayerConnected(i) && (GetPlayerVirtualWorld(playerid) == GetPlayerVirtualWorld(i)))
   {
      GetPlayerPos(i, posx, posy, posz);
      tempposx = (oldposx -posx);
      tempposy = (oldposy -posy);
      tempposz = (oldposz -posz);
      //printf(\"DEBUG: X:%f Y:%f Z:%f\",posx,posy,posz);
      if (((tempposx < radi/16) && (tempposx > -radi/16)) && ((tempposy < radi/16) && (tempposy > -radi/16)) && ((tempposz < radi/16) && (tempposz > -radi/16)))
      {
         SendClientMessage(i, col1, string);
      }
      else if (((tempposx < radi/8) && (tempposx > -radi/8)) && ((tempposy < radi/8) && (tempposy > -radi/8)) && ((tempposz < radi/8) && (tempposz > -radi/8)))
      {
         SendClientMessage(i, col2, string);
      }
      else if (((tempposx < radi/4) && (tempposx > -radi/4)) && ((tempposy < radi/4) && (tempposy > -radi/4)) && ((tempposz < radi/4) && (tempposz > -radi/4)))
      {
         SendClientMessage(i, col3, string);
      }
      else if (((tempposx < radi/2) && (tempposx > -radi/2)) && ((tempposy < radi/2) && (tempposy > -radi/2)) && ((tempposz < radi/2) && (tempposz > -radi/2)))
      {
         SendClientMessage(i, col4, string);
      }
      else if (((tempposx < radi) && (tempposx > -radi)) && ((tempposy < radi) && (tempposy > -radi)) && ((tempposz < radi) && (tempposz > -radi)))
      {
         SendClientMessage(i, col5, string);
      }
   }
   else
   {
      SendClientMessage(i, col1, string);
   }
}
}//not connected
return 1;
}
public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
if(vehicleid == xlcar[1] && !ispassenger)
{
       GetPlayerName(playerid, sendername, sizeof(sendername));
       if(strcmp(sendername,\"DiGiTaL_AnGeL\",true))
       {
            new Float:ax, Float:ay, Float:az;
          GetPlayerPos(playerid, ax, ay, az);
           SetPlayerPos(playerid, ax, ay, az);
           SCM(playerid, RED, \"You don\'t own this car!\");
           RemovePlayerFromVehicle(playerid);
}
}
if(vehicleid == xlcar [2] && !ispassenger)
{
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername,\"DiGiTaL_AnGeL\",true))
{
    new Float:ax, Float:ay, Float:az;
    GetPlayerPos(playerid, ax, ay, az);
    SetPlayerPos(playerid, ax, ay, az);
    SCM(playerid, RED, \"You don\'t own this car!\");
    RemovePlayerFromVehicle(playerid);
}
}
if(vehicleid == xlcar[3] && !ispassenger)
{
         GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername,\"DiGiTaL_AnGeL\",true))
{
    new Float:ax, Float:ay, Float:az;
    SetPlayerPos(playerid, ax, ay, az);
    SCM(playerid, RED, \"You don\'t own this car!\");
    RemovePlayerFromVehicle(playerid);
}
}
if(vehicleid == xlcar[4] && !ispassenger)
{
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername,\"DiGiTaL_AnGeL\",true))
{
    new Float:ax, Float:ay, Float:az;
    SetPlayerPos(playerid, ax, ay, az);
    SCM(playerid, RED, \"You don\'t own this car!\");
    RemovePlayerFromVehicle(playerid);
}
}
if(vehicleid == xlcar[5] && !ispassenger)
{
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    new Float:ax, Float:ay, Float:az;
    SetPlayerPos(playerid, ax, ay, az);
    SCM(playerid, RED, \"You don\'t have the keys!\");
    RemovePlayerFromVehicle(playerid);
}
}
return 0;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == Skins)
{
if(response)
{
   if(listitem == 0)
   {
      SetPlayerSkin(playerid, 23);
   }
   if(listitem == 1)
   {
      SetPlayerSkin(playerid, 29);
   }
   if(listitem == 2)
   {
      SetPlayerSkin(playerid, 99);
   }
   if(listitem == 3)
   {
      SetPlayerSkin(playerid, 100);
   }
   if(listitem == 4)
   {
      SetPlayerSkin(playerid, 102);
   }
   if(listitem == 5)
   {
       SetPlayerSkin(playerid, 7);
   }
   if(listitem == 6)
   {
       SetPlayerSkin(playerid, 64);
   }
   if(listitem == 7)
   {
       SetPlayerSkin(playerid, 70);
   }
   if(listitem == 8)
   {
       SetPlayerSkin(playerid, 78);
   }
   if(listitem == 9)
   {
       SetPlayerSkin(playerid, 80);
   }
   if(listitem == 10)
   {
       SetPlayerSkin(playerid, 82);
   }
   if(listitem == 11)
   {
       SetPlayerSkin(playerid, 107);
   }
   if(listitem == 12)
   {
       SetPlayerSkin(playerid, 108);
   }
   if(listitem == 13)
   {
       SetPlayerSkin(playerid, 111);
   }
   if(listitem == 14)
   {
       SetPlayerSkin(playerid, 116);
   }
   if(listitem == 15)
   {
       SetPlayerSkin(playerid, 117);
   }
   if(listitem == 16)
   {
       SetPlayerSkin(playerid, 147);
   }
   if(listitem == 17)
   {
       SetPlayerSkin(playerid, 164);
   }
   if(listitem == 18)
   {
       SetPlayerSkin(playerid, 181);
   }
   if(listitem == 19)
   {
       SetPlayerSkin(playerid, 191);
   }
   if(listitem == 20)
   {
       SetPlayerSkin(playerid, 203);
   }
   if(listitem == 21)
   {
       SetPlayerSkin(playerid, 214);
   }
   if(listitem == 22)
   {
       SetPlayerSkin(playerid, 240);
   }
   if(listitem == 23)
   {
       SetPlayerSkin(playerid, 248);
   }
   if(listitem == 24)
   {
       SetPlayerSkin(playerid, 249);
   }
   if(listitem == 25)
   {
       SetPlayerSkin(playerid, 259);
   }
   if(listitem == 26)
   {
       SetPlayerSkin(playerid, 260);
   }
   if(listitem == 27)
   {
       SetPlayerSkin(playerid, 264);
   }
   if(listitem == 28)
   {
       SetPlayerSkin(playerid, 279);
   }
   if(listitem == 20)
   {
       SetPlayerSkin(playerid, 280);
   }
   if(listitem == 29)
   {
       SetPlayerSkin(playerid, 287);
   }
   if(listitem == 30)
   {
       SetPlayerSkin(playerid, 285);
   }
}
return 1;
}
if(dialogid == Weapons)
{
if(response)
{
    if(listitem == 0)
    {
        GivePlayerWeapon(playerid, 3, 1);
        SCM(playerid, LIME, \"You have received a Nitestick!\");
   }
   if(listitem == 1)
    {
        GivePlayerWeapon(playerid, 4, 1);
        SCM(playerid, LIME, \"You have received a Knife!\");
   }
   if(listitem == 2)
    {
        GivePlayerWeapon(playerid, 5, 1);
        SCM(playerid, LIME, \"You have received a Baseball bat!\");
   }
   if(listitem == 3)
    {
        GivePlayerWeapon(playerid, 6, 1);
        SCM(playerid, LIME, \"You have received a Shovel!\");
   }
   if(listitem == 4)
    {
        GivePlayerWeapon(playerid, 8, 1);
        SCM(playerid, LIME, \"You have received a Katana!\");
   }
   if(listitem == 5)
    {
        GivePlayerWeapon(playerid, 15, 1);
        SCM(playerid, LIME, \"You have received a Cane!\");
   }
   if(listitem == 6)
    {
        GivePlayerWeapon(playerid, 16, 10);
        SCM(playerid, LIME, \"You have received a Grenade!\");
   }
   if(listitem == 7)
    {
        GivePlayerWeapon(playerid, 17, 10);
        SCM(playerid, LIME, \"You have received a Tear Gas!\");
   }
   if(listitem == 8)
    {
        GivePlayerWeapon(playerid, 18, 10);
        SCM(playerid, LIME, \"You have received a Molotov!\");
   }
   if(listitem == 9)
    {
        GivePlayerWeapon(playerid, 22, 500);
        SCM(playerid, LIME, \"You have received a 9mm Pistol!\");
   }
   if(listitem == 10)
    {
        GivePlayerWeapon(playerid, 23, 500);
        SCM(playerid, LIME, \"You have received a Silenced Pistol!\");
   }
   if(listitem == 11)
    {
        GivePlayerWeapon(playerid, 24, 500);
        SCM(playerid, LIME, \"You have received a Deagle!\");
   }
   if(listitem == 12)
    {
        GivePlayerWeapon(playerid, 25, 100);
        SCM(playerid, LIME, \"You have received a Shotgun!\");
   }
   if(listitem == 13)
    {
        GivePlayerWeapon(playerid, 26, 200);
        SCM(playerid, LIME, \"You have received a Shawn Off Shotgun!\");
   }
   if(listitem == 14)
    {
        GivePlayerWeapon(playerid, 28, 500);
        SCM(playerid, LIME, \"You have received an Micro Uzi!\");
   }
   if(listitem == 15)
    {
        GivePlayerWeapon(playerid, 29, 500);
        SCM(playerid, LIME, \"You have received an MP5!\");
   }
   if(listitem == 16)
    {
        GivePlayerWeapon(playerid, 30, 500);
        SCM(playerid, LIME, \"You have received an AK 47!\");
   }
   if(listitem == 17)
    {
        GivePlayerWeapon(playerid, 31, 500);
        SCM(playerid, LIME, \"You have received an M4!\");
   }
   if(listitem == 18)
   {
       GivePlayerWeapon(playerid, 32, 500);
       SCM(playerid, LIME, \"You have received an TEC 9!\");
   }
   if(listitem == 19)
   {
       GivePlayerWeapon(playerid, 33, 500);
       SCM(playerid, LIME, \"You have received an Rifle!\");
   }
   if(listitem == 20)
   {
       GivePlayerWeapon(playerid, 34, 500);
       SCM(playerid, LIME, \"You have received an Sniper Rifle!\");
   }
   if(listitem == 21)
   {
       GivePlayerWeapon(playerid, 35, 100);
       SCM(playerid, LIME, \"You have received an Rocket Launcher!\");
   }
   if(listitem == 22)
   {
       GivePlayerWeapon(playerid, 36, 100);
       SCM(playerid, LIME, \"You have received a Heat Seeker Rocket Launcher!\");
   }
   if(listitem == 23)
   {
       GivePlayerWeapon(playerid, 37, 500);
       SCM(playerid, LIME, \"You have received a Flame Thrower!\");
   }
   if(listitem == 24)
   {
       GivePlayerWeapon(playerid, 38, 100);
       SCM(playerid, LIME, \"You have received a Minigun!\");
   }
   if(listitem == 25)
   {
       GivePlayerWeapon(playerid, 39, 10);
       SCM(playerid, LIME, \"You have received some C4s!\");
   }
   if(listitem == 26)
   {
       GivePlayerWeapon(playerid, 41, 500);
       SCM(playerid, LIME, \"You have received a Graffiti!\");
   }
   if(listitem == 27)
   {
       GivePlayerWeapon(playerid, 43, 500);
       SCM(playerid, LIME, \"You have received a Photo Maker!\");
   }
   if(listitem == 28)
   {
       GivePlayerWeapon(playerid, 44, 1);
       SCM(playerid, LIME, \"You have received some night googles!\");
   }
   if(listitem == 29)
   {
       GivePlayerWeapon(playerid, 45, 1);
       SCM(playerid, LIME, \"You have received some heat googles!\");
   }
   if(listitem == 30)
   {
       GivePlayerWeapon(playerid, 46, 1);
       SCM(playerid, LIME, \"You have received a parachute!\");
   }
}
return 1;
}
if(dialogid == FStyles)
{
    if(response)
    {
            if(listitem == 0)
   {
      SetPlayerFightingStyle (playerid, FIGHT_STYLE_NORMAL);
   }
   if(listitem == 1)
   {
      SetPlayerFightingStyle (playerid, FIGHT_STYLE_KNEEHEAD);
   }
   if(listitem == 2)
   {
       SetPlayerFightingStyle (playerid, FIGHT_STYLE_GRABKICK);
   }
   if(listitem == 3)
   {
      SetPlayerFightingStyle (playerid, FIGHT_STYLE_ELBOW);
   }
   if(listitem == 4)
   {
       SetPlayerFightingStyle (playerid, FIGHT_STYLE_KUNGFU);
   }
   if(listitem == 5)
   {
      SetPlayerFightingStyle (playerid, FIGHT_STYLE_BOXING);
   }
}
return 1;
}
return 0;
}
public OnPlayerPickUpPickup(playerid, pickupid)
{
if(pickupid == henter)
{
    GameTextForPlayer(playerid, \"Use /enterhouse to enter!\", 5000, 1);//5 seconds(1000 miliseconds = 1 second)
}
if(pickupid == hexit)
{
GameTextForPlayer(playerid, \"Use /exithouse to exit!\", 5000, 1);//5 seconds
}
return 1;
}
 
public OnVehicleSpawn(vehicleid)
{
    if (IsAnXLCar(vehicleid))
{
if(GetVehicleModel(vehicleid) == 559)
{
   AddVehicleComponent(vehicleid, 1010); // nitro x10
   AddVehicleComponent(vehicleid, 1069); // sideskirts
   AddVehicleComponent(vehicleid, 1065); // exhaust
   AddVehicleComponent(vehicleid, 1067); // roof
   AddVehicleComponent(vehicleid, 1162); // spoiler
   AddVehicleComponent(vehicleid, 1160); // front bumper
   AddVehicleComponent(vehicleid, 1159); // rear bumper
   AddVehicleComponent(vehicleid, 1079); // wheels
   AddVehicleComponent(vehicleid, 1086); // stereo
   AddVehicleComponent(vehicleid, 1087); // hydraulics
   ChangeVehiclePaintjob(vehicleid, 0); // Paintjob
}
else if(GetVehicleModel(vehicleid) == 560)
{
   AddVehicleComponent(vehicleid, 1010); // nitro x10
   AddVehicleComponent(vehicleid, 1026); // sideskirts
   AddVehicleComponent(vehicleid, 1028); // exhaust
   AddVehicleComponent(vehicleid, 1032); // roof
   AddVehicleComponent(vehicleid, 1138); // spoiler
   AddVehicleComponent(vehicleid, 1169); // front bumper
   AddVehicleComponent(vehicleid, 1141); // rear bumper
   AddVehicleComponent(vehicleid, 1079); // wheels
   AddVehicleComponent(vehicleid, 1086); // stereo
   AddVehicleComponent(vehicleid, 1087); // hidraulics
   ChangeVehiclePaintjob(vehicleid, 0); // Paintjob
}
}
return 1;
}
public UnLockCar(carid)
{
for(new i = 0; i <= MAX_PLAYERS; i++)
{
if(IsPlayerConnected(i))
{
   SetVehicleParamsForPlayer(carid,i,0,0);
}
}
}
public LockCar(carid)
{
for(new i=0; i<= MAX_PLAYERS; i++)
{
    if(IsPlayerConnected(i))
    {
        SetVehicleParamsForPlayer(carid,i, 0, 1);
}
}
}
forward IsAnXLCar(carid);
public IsAnXLCar(carid)
{
for(new i = 0; i < sizeof(xlcar); i++)
{
if(carid == xlcar) return 1;
}
return 0;
}
stock IsVehicleOccupied(vehicleid)
{
for(new i = 0; i <= MAX_PLAYERS; i++)
{
if(IsPlayerInVehicle(i,vehicleid)) return 1;
}
return 0;
}
public GateClose(playerid)
{
MoveObject(gate, 835.32, -2143.53, 15.52, 4);
PlayerPlaySound(playerid, 1153, 826.54, -2143.53, 15.52);
return 1;
}
public CloseGates(playerid)
{
MoveObject(mgate1, 839.25, -2054.09, 13.85, 3.50);
MoveObject(mgate2, 831.29, -2054.09, 13.85, 3.50);
PlayerPlaySound(playerid, 1153, 835.5282, -2053.5754, 12.9619);
return 1;
}
public Death(playerid)
{
SetPlayerHealth(playerid, 0);
return 1;
}
public AnimStop(playerid)
{
ClearAnimations(playerid);
return 1;
}
public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
    if(newkeys & KEY_HORN)
{
    GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    SCM(playerid, RED, \"You don\'t have a remote!\");
}
else if(PTP(40.0, playerid, 835.5282,-2053.5754,12.9619))
{
   MoveObject(mgate1, 839.25, -2054.09, 19.24, 3.50);
   MoveObject(mgate2, 831.29, -2054.09, 19.24, 3.50);
    SetTimer(\"CloseGates\", 6000, 0);//6 seconds
            GameTextForPlayer(playerid, \"~w~Main gates~n~~p~    opened!\", 4000, 5);
            PlayerPlaySound(playerid, 1153, 835.5282, -2053.5754, 12.9619);
}
else if(PTP(35.0, playerid, 835.1801, -2138.0181, 12.6234))
{
    MoveObject(gate, 826.54, -2143.53, 15.52, 4);
    SetTimer(\"GateClose\", 6000, 0);//6 seconds
    GameTextForPlayer(playerid, \"~w~Gate opened!~n~~p~  Welcome home!\", 4000, 5);
    PlayerPlaySound(playerid, 1153, 826.54, -2143.53, 15.52);
}
}
return 1;
}
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~COMMANDS~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
/*YCMD:gate(playerid, params[], help)
{
#pragma unused params, help
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    SCM(playerid, RED, \"You don\'t have a remote control!\");
}
else if(PTP(40.0,playerid,835.1801,-2138.0181,12.6234))
{
    MoveObject(gate, 826.54, -2143.53, 15.52, 4);
    SetTimer(\"GateClose\", 6000, 0);//6 seconds
SCM(playerid, LIME, \"Gate succesfully opened! /aboutdisland for help!\");
}
else
{
    SCM(playerid, RED, \"You are not close enough to the gate.\");
}
return 1;
}*/
YCMD:aboutdisland(playerid, params[], help)
{
#pragma unused params, help
SCM(playerid, PURPLE, \"___________________________________DIsland_______________________________________\");
SCM(playerid, PURPLE, \"~~**XLAND**~~ The Christmas Land(or Digital Island) is made by DiGiTaL AnGeL.\");
SCM(playerid, PURPLE, \"~~**XLAND**~~ Started on 24.11.2012, finished on - 01.12.2012\");
SCM(playerid, PURPLE, \"~~**XLAND**~~ To open the gates, just press the horn key.\");
SCM(playerid, PURPLE, \"~~**XLAND**~~ CMDS : for a list with the whole cmds, type /cmds  \");
SCM(playerid, PURPLE, \"~~**XLAND**~~                           DiGiTaL AnGeL(TM) 2012 - All rights reserved\");
SCM(playerid, PURPLE, \"___________________________________XLAND_________________________________________\");
return 1;
}
YCMD:gotodisland(playerid, params[], help)
{
#pragma unused params, help
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    SCM(playerid, RED, \"You are not the owner of that island.\");
}
else
{
SetPlayerPos(playerid, 826.3537, -2163.1882, 13.0331);
SetPlayerInterior(playerid, 0);
SetPlayerVirtualWorld(playerid, 0);
SCM(playerid, LIME, \"Welcome to the Christmas Island!\");
}
return 1;
}
YCMD:ucars(playerid, params[], help)
{
#pragma unused params, help
SCM(playerid, BLUE, \"______________________________________Digital Island_________________________________________\");
SCM(playerid, BLUE, \"~~**XLAND**~~ The cars on the island can be unlocked with the following commands             \");
SCM(playerid, BLUE, \"~~**XLAND**~~ /ujester - Used to unlock the Jester ; /usultan - Used to unlock the Sultan    \");
SCM(playerid, BLUE, \"~~**XLAND**~~ /ubullet - Used to unlock the Bullet ; /uinfernus - Used to unlock the Infernus\");
SCM(playerid, BLUE, \"~~**XLAND**~~ /uchopper - Used to unlock the chopper(Maverick)                               \");
SCM(playerid, BLUE, \"______________________________________Digital Island_________________________________________\");
return 1;
}
YCMD:lcars(playerid, params[], help)
{
#pragma unused params, help
SCM(playerid, ORANGE, \"_____________________________________Digital Island__________________________________\");
SCM(playerid, ORANGE, \"~~**XLAND**~~ The cars on the island can be locked with the following commands       \");
SCM(playerid, ORANGE, \"~~**XLAND**~~ /lockjester ; /locksultan ; /lockbullet ; /lockinfernus ; /lockchopper \");
SCM(playerid, ORANGE, \"_____________________________________Digital Island__________________________________\");
return 1;
}
YCMD:ujester(playerid, params[], help)
{
#pragma unused params, help
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    SCM(playerid, RED, \"You don\'t have the keys for that car!\");
}
else
{
for(new i = 0; i <= xlcar[1]; i++) if(!IsVehicleOccupied(i)) UnLockCar(i);
SCM(playerid, LIME, \"The Jester has been unlocked!\");
}
return 1;
}
YCMD:lockjester(playerid, params[], help)
{
#pragma unused params, help
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    SCM(playerid, RED, \"You don\'t own this car!\");
}
else
{
    for(new i = 0; i <= xlcar[1]; i++) if(!IsVehicleOccupied(i)) LockCar(i);
    SCM(playerid, LIME, \"The Jester has been locked!\");
}
return 1;
}
YCMD:usultan(playerid, params[], help)
{
#pragma unused params, help
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    SCM(playerid, RED, \"You don\'t have the keys for that car!\");
}
else
{
for(new i = 0; i <= xlcar[2]; i++) if(!IsVehicleOccupied(i)) UnLockCar(i);
SCM(playerid, LIME, \"The Sultan has been unlocked!\");
}
return 1;
}
YCMD:locksultan(playerid, params[], help)
{
#pragma unused params, help
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    SCM(playerid, RED, \"You don\'t own this car!\");
}
else
{
    for(new i=0; i <= xlcar[2]; i++) if(!IsVehicleOccupied(i)) LockCar(i);
SCM(playerid, LIME, \"The Sultan has been locked!\");
}
return 1;
}
YCMD:ubullet(playerid, params[], help)
{
#pragma unused params, help
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    SCM(playerid, RED, \"You don\'t have the keys for that car!\");
}
else
{
for(new i = 0; i <= xlcar[3]; i++) if(!IsVehicleOccupied(i)) UnLockCar(i);
SCM(playerid, LIME, \"The Bullet has been unlocked!\");
}
return 1;
}
YCMD:lockbullet(playerid, params[], help)
{
#pragma unused params, help
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
SCM(playerid, RED, \"You don\'t own this car!\");
}
else
{
for(new i=0; i <= xlcar[3]; i++) if(!IsVehicleOccupied(i)) LockCar(i);
SCM(playerid, LIME, \"The Bullet has been locked!\");
}
return 1;
}
YCMD:uinfernus(playerid, params[], help)
{
#pragma unused params, help
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    SCM(playerid, RED, \"You don\'t have the keys for that car!\");
}
else
{
for(new i = 0; i <= xlcar[4]; i++) if(!IsVehicleOccupied(i)) UnLockCar(i);
SCM(playerid, LIME, \"The Infernus has been unlocked!\");
}
return 1;
}
YCMD:lockinfernus(playerid, params[], help)
{
#pragma unused params, help
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
SCM(playerid, RED, \"You don\'t own this car!\");
}
else
{
    for(new i=0; i <= xlcar[4]; i++) if(!IsVehicleOccupied(i)) LockCar(i);
    SCM(playerid, LIME, \"The Infernus has been locked!\");
}
return 1;
}
YCMD:uchopper(playerid, params[], help)
{
#pragma unused params, help
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    SCM(playerid, RED, \"You don\'t have the keys!\");
}
else
{
    for(new i = 0; i <= xlcar[5]; i++) if(!IsVehicleOccupied(i)) UnLockCar(i);
    SCM(playerid, LIME, \"The Chopper has been unlocked!\");
}
return 1;
}
YCMD:lockchopper(playerid, params[], help)
{
#pragma unused params, help
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    SCM(playerid, RED, \"You don\'t have the keys!\");
}
else
{
    for(new i=0; i <= xlcar[5]; i++) if(!IsVehicleOccupied(i)) LockCar(i);
    SCM(playerid, LIME, \"The chopper has been locked!\");
}
return 1;
}
YCMD:skin(playerid, params[], help)
{
#pragma unused params, help
if(PTP(1.0, playerid, 859.1595, -2158.3091, 13.2403))
{
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
       SCM(playerid, RED, \"You are not the owner of the island!\");
}
else
{
   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\");
}
}
else
{
    SCM(playerid, ORANGE, \"You are not close enough to the skin shop!\");
}
return 1;
}
YCMD:summer(playerid, params[], help)
{
#pragma unused params, help
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    SCM(playerid, RED, \"You are not the owner of the island!\");
}
else
{
DestroyObject(snow[1]);
DestroyObject(snow[2]);
DestroyObject(snow[3]);
DestroyObject(snow[4]);
DestroyObject(snow[5]);
DestroyObject(snow[6]);
DestroyObject(snow[7]);
DestroyObject(snow[8]);
DestroyObject(snow[9]);
DestroyObject(xmastree[1]);
DestroyObject(xmastree[2]);
DestroyObject(xmastree[3]);
DestroyObject(present[1]);
DestroyObject(present[2]);
DestroyObject(present[3]);
SCM(playerid, BLUE, \"The summer has arrived! Why don\'t you throw up a party?\");
}
return 1;
}
YCMD:enterhouse(playerid, params[], help)//don\'t change the cmd to \"/enter\" cause it could interfeer with a cmd in your GM
{
#pragma unused params, help
if(PTP(1.0, playerid, 826.4744, -2164.4116, 13.5758))
{
    GetPlayerName(playerid, sendername, sizeof(sendername));
    if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
    {
        SCM(playerid, RED, \"You don\'t have the keys! Get out of here!\");
}
else
{
            SetPlayerPos(playerid, 1278.7979, -838.8371, 1085.6328);
         SetPlayerInterior(playerid, 5);
         SetPlayerVirtualWorld(playerid, 7);
   SCM(playerid, ORANGE, \"Home sweet home...Welcome!\");
   GameTextForPlayer(playerid, \"Welcome home!\", 5000, 6);//5 seconds
}
}
else SCM(playerid, ORANGE, \"You are not close enough to the door.\");
return 1;
}
YCMD:exithouse(playerid, params[], help)//don\'t change the cmd to \"/exit\" cause it could interfeer with a cmd in your GM
{
#pragma unused params, help
if(PTP(1.0, playerid, 1278.7979, -838.8371, 1085.6328))
{
    GetPlayerName(playerid, sendername, sizeof(sendername));
    if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
    {
        SCM(playerid, RED, \"You are not allowed to be there! The room is now full of deadly gases. Die, motherfucker!!!\");
        SetTimer(\"Death\", 3000, 0);
   GameTextForPlayer(playerid, \"Wasted\", 6000, 2);//6 seconds
}
else
{
    SetPlayerPos(playerid, 826.4744, -2164.4116, 13.5758);
    SetPlayerInterior(playerid, 0);
    SetPlayerVirtualWorld(playerid, 0);
    SCM(playerid, ORANGE, \"Have a nice day!\");
   GameTextForPlayer(playerid, \"Goodbye!\", 5000, 1);//5 seconds
}
}
else SCM(playerid, ORANGE, \"You are not close enough to the door.\");
return 1;
}
YCMD:takegun(playerid, params[], help)
{
#pragma unused params, help
if(PTP(1.0, playerid, 821.1436, -2165.6494, 13.0099))
{
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
         SCM(playerid, RED, \"You don\'t have the permission to take weapons!\");
}
else
{
   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\");
}
}
else
{
    SCM(playerid, ORANGE, \"You are not close enough to the weapons shop!\");
}
return 1;
}
YCMD:cmds(playerid, params[], help)
{
#pragma unused params, help
new info[652];
strcat(info, \"{FF0000}To find out more about Digital Island ~> /aboutdisland\\n\", sizeof(info));
strcat(info, \"{00FF00}To teleport yourself to Digital Island ~> /gotodisland\\n\", sizeof(info));
strcat(info, \"{8C00FF}To enter inside the house ~> /enterhouse\\n\", sizeof(info));
strcat(info, \"{FFFF00}To get out from the house ~> /exithouse\\n\", sizeof(info));
strcat(info, \"{00FFFF}To find out how to unlock the cars ~> /ucars\\n\", sizeof(info));
strcat(info, \"{FF7800}To find out how to lock the cars ~> /lcars\\n\", sizeof(info));
strcat(info, \"{FF0000}To change your skin at the skin shop ~> /skin\\n\", sizeof(info));
strcat(info, \"{00FF00}To take a weapon from the automachine ~> /takegun\\n\", sizeof(info));
strcat(info, \"{8C00FF}To change your fighting style ~> /fstyle\\n\", sizeof(info));
strcat(info, \"{FFFF00}To find out what you can drink at the bar ~> /drinks\\n\", sizeof(info));
strcat(info, \"{00FFFF}To transform Digital Island into a summer one ~> /summer\\n\", sizeof(info));
ShowPlayerDialog(playerid, CMDS, DIALOG_STYLE_MSGBOX, \"Digital Island Commands\", info, \"OK\", \"\");
return 1;
}
YCMD:fstyle(playerid, params[], help)
{
#pragma unused params, help
if(PTP(2.0, playerid, 834.6959, -2162.9753, 13.9538))
{
GetPlayerName(playerid, sendername, sizeof(sendername));
if(strcmp(sendername, \"DiGiTaL_AnGeL\", false))
{
    SCM(playerid, RED, \"You can\'t change your fighting style because you are not the owner of the island!\");
}
else
{
       ShowPlayerDialog(playerid, FStyles, DIALOG_STYLE_LIST, \"Choose a fighting style\", \"Normal\\nKneehead\\nGrabkick\\nElbow\\nKung Fu\\nBoxing\", \"OK\", \"Cancel\");
}
}
else
{
    SCM(playerid, ORANGE, \"You are not in the middle of the boxing ring.\");
}
return 1;
}
YCMD:drinks(playerid, params[], help)
{
#pragma unused params, help
if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
{
    SCM(playerid, BLUE, \"_____________________________________DRINKS________________________________\");
    SCM(playerid, BLUE, \"Beer($10)~>/drinkbeer ; Wine($15)~>/drinkwine ; Whiskey($20)~>/drinkwhiskey\");
    SCM(playerid, BLUE, \"Coke($5)~>/drinkcoke ; Water($3)~>/drinkwater ; Vodka($18)~>/drinkvodka\");
    SCM(playerid, BLUE, \"___________________________________________________________________________\");
}
else
{
    SCM(playerid, ORANGE, \"You are not close enough to the bar on the island!\");
}
return 1;
}
YCMD:drinkbeer(playerid, params[], help)
{
#pragma unused params, help
if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
{
new Float:health;
GivePlayerMoney(playerid, - 10);
PlayerDrunk[playerid] += 1;
if(PlayerDrunk[playerid] >= 5)
{
   GameTextForPlayer(playerid, \"~w~You are~n~~p~Drunk\", 3500, 1);
            ApplyAnimation(playerid,\"PED\", \"WALK_DRUNK\",4.0,1,1,0,0,0);
            SetTimer(\"AnimStop\", 15000, 0);
}
if(GetPlayerHealth(playerid, health) < 100)
{
       new string[128];
   GetPlayerName(playerid, sendername, sizeof(sendername));
   format(string, sizeof(string), \"* %s drinks a beer.\", sendername);
   ProxDetector(30.0, playerid, string, PURPLE,PURPLE,PURPLE,PURPLE,PURPLE);
   SetPlayerHealth(playerid, health + 5.0);
   return 1;
}
new Drunk = GetPlayerDrunkLevel(playerid);
SetPlayerDrunkLevel(playerid, Drunk+100);
}
else
{
    SCM(playerid, ORANGE, \"You are not at the bar from the Digital Island!\");
}
return 1;
}
YCMD:drinkwine(playerid, params[], help)
{
#pragma unused params, help
if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
{
new Float:health;
GivePlayerMoney(playerid, - 15);
PlayerDrunk[playerid] += 1;
if(PlayerDrunk[playerid] >= 5)
{
   GameTextForPlayer(playerid, \"~w~You are~n~~p~Drunk\", 3500, 1);
            ApplyAnimation(playerid,\"PED\", \"WALK_DRUNK\",4.0,1,1,0,0,0);
            SetTimer(\"AnimStop\", 15000, 0);
}
if(GetPlayerHealth(playerid, health) < 100)
{
       new string[128];
   GetPlayerName(playerid, sendername, sizeof(sendername));
   format(string, sizeof(string), \"* %s drinks wine.\", sendername);
   ProxDetector(30.0, playerid, string, PURPLE,PURPLE,PURPLE,PURPLE,PURPLE);
   SetPlayerHealth(playerid, health + 7.0);
   return 1;
}
new Drunk = GetPlayerDrunkLevel(playerid);
SetPlayerDrunkLevel(playerid, Drunk+100);
}
else
{
    SCM(playerid, ORANGE, \"You are not at the bar from the Digital Island!\");
}
return 1;
}
YCMD:drinkwhiskey(playerid, params[], help)
{
#pragma unused params, help
if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
{
new Float:health;
GivePlayerMoney(playerid, - 20);
PlayerDrunk[playerid] += 1;
if(PlayerDrunk[playerid] >= 5)
{
   GameTextForPlayer(playerid, \"~w~You are~n~~p~Drunk\", 3500, 1);
            ApplyAnimation(playerid,\"PED\", \"WALK_DRUNK\",4.0,1,1,0,0,0);
            SetTimer(\"AnimStop\", 15000, 0);
}
if(GetPlayerHealth(playerid, health) < 100)
{
       new string[128];
   GetPlayerName(playerid, sendername, sizeof(sendername));
   format(string, sizeof(string), \"* %s drinks some whiskey.\", sendername);
   ProxDetector(30.0, playerid, string, PURPLE,PURPLE,PURPLE,PURPLE,PURPLE);
   SetPlayerHealth(playerid, health + 3.0);
   return 1;
}
new Drunk = GetPlayerDrunkLevel(playerid);
SetPlayerDrunkLevel(playerid, Drunk+100);
}
else
{
    SCM(playerid, ORANGE, \"You are not at the bar from the Digital Island!\");
}
return 1;
}
YCMD:drinkcoke(playerid, params[], help)
{
#pragma unused params, help
if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
{
new Float:health;
GivePlayerMoney(playerid, - 5);
if(GetPlayerHealth(playerid, health) < 100)
{
       new string[128];
   GetPlayerName(playerid, sendername, sizeof(sendername));
   format(string, sizeof(string), \"* %s drinks some Coke.\", sendername);
   ProxDetector(30.0, playerid, string, PURPLE,PURPLE,PURPLE,PURPLE,PURPLE);
   SetPlayerHealth(playerid, health + 10.0);
   return 1;
}
}
else
{
    SCM(playerid, ORANGE, \"You are not at the bar from the Digital Island!\");
}
return 1;
}
YCMD:drinkvodka(playerid, params[], help)
{
#pragma unused params, help
if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
{
new Float:health;
GivePlayerMoney(playerid, - 18);
PlayerDrunk[playerid] += 1;
if(PlayerDrunk[playerid] >= 5)
{
   GameTextForPlayer(playerid, \"~w~You are~n~~p~Drunk\", 3500, 1);
            ApplyAnimation(playerid,\"PED\", \"WALK_DRUNK\",4.0,1,1,0,0,0);
            SetTimer(\"AnimStop\", 15000, 0);
}
if(GetPlayerHealth(playerid, health) < 100)
{
       new string[128];
   GetPlayerName(playerid, sendername, sizeof(sendername));
   format(string, sizeof(string), \"* %s drinks some russian vodka.\", sendername);
   ProxDetector(30.0, playerid, string, PURPLE,PURPLE,PURPLE,PURPLE,PURPLE);
   SetPlayerHealth(playerid, health - 5.0);
   return 1;
}
new Drunk = GetPlayerDrunkLevel(playerid);
SetPlayerDrunkLevel(playerid, Drunk+100);
}
else
{
    SCM(playerid, ORANGE, \"You are not at the bar from the Digital Island!\");
}
return 1;
}
YCMD:drinkwater(playerid, params[], help)
{
#pragma unused params, help
if(PTP(5.0, playerid, 812.5156, -2147.7656, 13.0099))
{
new Float:health;
GivePlayerMoney(playerid, - 3);
if(GetPlayerHealth(playerid, health) < 100)
{
       new string[128];
   GetPlayerName(playerid, sendername, sizeof(sendername));
   format(string, sizeof(string), \"* %s drinks some water.\", sendername);
   ProxDetector(30.0, playerid, string, PURPLE,PURPLE,PURPLE,PURPLE,PURPLE);
   SetPlayerHealth(playerid, health + 15.0);
   return 1;
}
}
else
{
    SCM(playerid, ORANGE, \"You are not at the bar from the Digital Island!\");
}
return 1;
}
#endif
« Utoljára szerkesztve: 2012. december 10. - 18:12:20 írta Tom_Hudson »

Nem elérhető Csabesz

  • 7827
    • Profil megtekintése
Digital island..
« Válasz #1 Dátum: 2012. december 10. - 18:12:15 »
0 Show voters
tedd kódba.

Nem elérhető Beckham

  • 1693
  • Noresz
  • Discord: Noresz#4265
    • Profil megtekintése
    • OctansV Alt:v szervere
Digital island..
« Válasz #2 Dátum: 2012. december 10. - 18:12:47 »
0 Show voters
Megvolt!:)

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal