View difference between Paste ID: <a href="/zW8dag88">zW8dag88</a> and <a href="/iq5vBHdf">iq5vBHdf</a>

/*
1		/*
2		rUE - Romel's Useful Environment Scripting
3		Easy to use, Short line
4		Copyright, (C), 2012
5
6		Note: Need a 3% knowledge in scripting or higher in able
7		to use this Useful Environment include.
8
9		Credits: Romel for the whole function
10		DracoBlue for his dcmd
11
12		*/
13
14		#if defined _rUE_included
15		#endinput
16		#endif
17		#define _rUE_included
18
19		forward SpawnItPlayer(playerid);
20		forward OnPlayerSkinStateChange(playerid, oldskin, newskin);
21
22		new DebugFile = 1;
23
24		public SpawnItPlayer(playerid)
25		{
26		return SpawnPlayer(playerid);
27		}
28
29		/*
30		native Env_Debug(enable = 1);
31		native SpawnPlayerEx(playerid);
32		native gVersion(playerid);
33		native SetPlayerSkinEx(playerid, skin);
34		native GivepHealth(playerid, Float:H);
35		native IsPlayerInWater(playerid);
36		native TakepHealth(playerid, Float:H);
37		native gName(playerid);
38		native SaveFile(filename[], text[]);
39		native dcmd(cmd[], length, params[]);
40		native gIp(playerid);
41		native IsPlayerName(playerid, const name[]);
42		*/
43
44		#define dcmd(%1,%2,%3) if (!strcmp((%3)[1], #%1, true, (%2)) && ((((%3)[(%2) + 1] == '\0') && (dcmd_%1(playerid, ""))) \|\| (((%3)[(%2) + 1] == ' ') && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1
45
46		stock Env_Debug(enable = 1)
47		{
48	-	if(DebugFile == 0) DebugFile = 1;
48	+	if(enable == 0) DebugFile = 1;
49	-	else if(DebugFile == 1) DebugFile = 0;
49	+	else if(enable == 1) DebugFile = 0;
50		return 1;
51		}
52
53		stock SpawnPlayerEx(playerid)
54		{
55		if(DebugFile == 1) SaveFile("ENV_Debug.txt", "SpawnPlayerEx successfully loaded with out any problems!");
56		if(IsPlayerInAnyVehicle(playerid))
57		{
58		RemovePlayerFromVehicle(playerid);
59		SetTimerEx("SpawnItPlayer", 3500, false, "i", playerid);
60		}
61		else return SpawnPlayer(playerid);
62		return 1;
63		}
64
65		stock SaveFile(filename[], text[])
66		{
67		new File:file;
68		new string[356];
69		file = fopen(filename, io_append);
70		format(string, sizeof(string), "%s\r\n", text);
71		fwrite(file, string);
72		fclose(file);
73		return 1;
74		}
75
76		stock SetPlayerSkinEx(playerid, skin)
77		{
78		if(DebugFile == 1) SaveFile("ENV_Debug.txt", "SetPlayerSpawnEx/OnPlayerSkinStateChange successfully loaded with out any problems!");
79		CallRemoteFunction("OnPlayerSkinStateChange", "iii", playerid, GetPlayerSkin(playerid), skin);
80		SetPlayerSkin(playerid, skin);
81		return 1;
82		}
83
84		stock IsPlayerInWater(playerid)
85		{
86		new animlib[32],tmp[32];
87		if(DebugFile == 1) SaveFile("ENV_Debug.txt", "IsPlayerInWater successfully loaded with out any problems!");
88		GetAnimationName(GetPlayerAnimationIndex(playerid),animlib,32,tmp,32);
89		if(!strcmp(animlib, "SWIM") && !IsPlayerInAnyVehicle(playerid)) return true;
90		return 0;
91		}
92
93		stock GivepHealth(playerid, Float:H)
94		{
95		new Float:hp;
96		GetPlayerHealth(playerid, hp);
97		if(DebugFile == 1) SaveFile("ENV_Debug.txt", "GivepHealth successfully loaded with out any problems!");
98		return SetPlayerHealth(playerid, hp + H);
99		}
100
101		stock TakepHealth(playerid, Float:H)
102		{
103		new Float:hp;
104		GetPlayerHealth(playerid, hp);
105		if(DebugFile == 1) SaveFile("ENV_Debug.txt", "TakepHealth successfully loaded with out any problems!");
106		return SetPlayerHealth(playerid, hp - H);
107		}
108
109		stock gVersion(playerid)
110		{
111		new ver[110];
112		GetPlayerVersion(playerid, ver, sizeof(ver));
113		if(DebugFile == 1) SaveFile("ENV_Debug.txt", "gVersion successfully loaded with out any problems!");
114		return ver;
115		}
116
117		stock IsPlayerName(playerid, const name[MAX_PLAYER_NAME])
118		{
119		if(strcmp(gName(playerid), name, true) == 0) return 1;
120		if(DebugFile == 1) SaveFile("ENV_Debug.txt", "IsPlayerName successfully loaded with out any problems!");
121		return 0;
122		}
123
124		stock gName(playerid)
125		{
126		new pName[MAX_PLAYER_NAME];
127		GetPlayerName(playerid, pName, sizeof(pName));
128		if(DebugFile == 1) SaveFile("ENV_Debug.txt", "gName successfully loaded with out any problems!");
129		return pName;
130		}
131
132		stock gIp(playerid)
133		{
134		new ip[16];
135		GetPlayerIp(playerid, ip, sizeof(ip));
136		if(DebugFile == 1) SaveFile("ENV_Debug.txt", "gIp successfully loaded with out any problems!");
137		return ip;
138		}
139
140		stock Kill(playerid)
141		{
142		if(DebugFile == 1) SaveFile("ENV_Debug.txt", "Kill successfully loaded with out any problems!");
143		return SetPlayerHealth(playerid, 0.0);
144		}