API tools faq
paste
Langky

Not Working

Langky
Mar 8th, 2017
315
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 26.03 KB | None | 0 0
raw download clone embed print report
  1. #include <a_samp>
  2. #include <dini>
  3. #include <dudb>
  4. #include <sscanf>
  5. #include <zcmd>
  6. //=====================REGISTER ENUMS===========================================
  7.  
  8. enum pInfo
  9. {
  10. pAdmin,
  11. pVip,
  12. pCash,
  13. pScore,
  14. pKills,
  15. pDeaths,
  16. }
  17. new PlayerInfo[MAX_PLAYERS][pInfo];
  18. new gPlayerLogged[MAX_PLAYERS];
  19.  
  20.  
  21. #define PATH "/Users/%s.ini"
  22.  
  23. #if defined FILTERSCRIPT
  24.  
  25. public OnFilterScriptInit()
  26. {
  27. print("\n--------------------------------------");
  28. print(" REG SYSTEM ");
  29. print("--------------------------------------\n");
  30. return 1;
  31. }
  32.  
  33. public OnFilterScriptExit()
  34. {
  35. return 1;
  36. }
  37.  
  38. //=================================VIP COMMANDS=================================
  39.  
  40. CMD:vips(playerid,params[])
  41. {
  42. new VipsOnline = 0, vstr[3048], DCaption[128];
  43. for(new i = 0; i <= MAX_PLAYERS; i++)
  44. {
  45. if(IsPlayerConnected(i) && PlayerInfo[i][pVip] > 0)
  46. {
  47. format(vstr, 3048, "{FF0000}%s {15FF00}(ID:%d){00BBF6} VIP Level: %d\n%s", PlayerName2(i), i, PlayerInfo[i][pVip], vstr);
  48. VipsOnline++;
  49. }
  50. }
  51. format(DCaption, 128, "{FF0000}» {D1D1D1}Vips (Online: %d)", VipsOnline);
  52. if(VipsOnline == 0) return
  53. SendClientMessage(playerid, red, "There are no Vips online at this moment!");
  54. else return ShowPlayerDialog(playerid, 123, DIALOG_STYLE_LIST, DCaption, vstr, "Ok", "" );
  55. }
  56.  
  57. CMD:vs(playerid, params[])
  58. {
  59. if(PlayerInfo[playerid][pVip] > 0)
  60. {
  61. SpawnPlayer(playerid);
  62. SendClientMessage(playerid, orange, "{FF0000}REG : You have been succesfully Spawned!");
  63. return 1;
  64. }
  65. else return SendClientMessage(playerid, red, "ERROR: You must be VIP to use this command!");
  66. }
  67. CMD:mytime(playerid,params[])
  68. {
  69. if(PlayerInfo[playerid][pVip] > 0)
  70. {
  71. new time, string[128];
  72. if(sscanf(params, "i", time)) return
  73. SendClientMessage(playerid, orange, "Usage: /mytime [Time(Hour)]");
  74. format(string,sizeof(string),"{FF0000}REG : |- Your time has set to: %d:00 -|", time);
  75. SendClientMessage(playerid,yellow,string);
  76. return SetPlayerTime(playerid, time, 0);
  77. }
  78. else return SendClientMessage(playerid,red,"ERROR: You must be VIP to use this command!");
  79. }
  80.  
  81. CMD:myweather(playerid,params[])
  82. {
  83. if(PlayerInfo[playerid][pVip] > 0)
  84. {
  85. new myweath, string[128];
  86. if(sscanf(params, "i", myweath)) return
  87. SendClientMessage(playerid, orange, "Usage: /myweather [WeatherID]");
  88. format(string,sizeof(string),"{FF0000}REG : |- Your weather has set to: %d -|", myweath);
  89. SendClientMessage(playerid, yellow, string);
  90. return SetPlayerWeather(playerid, myweath);
  91. }
  92. else return SendClientMessage(playerid, red, "ERROR: You must be VIP to use this command!");
  93. }
  94. CMD:myvworld(playerid, params[])
  95. {
  96. if(PlayerInfo[playerid][pVip] > 0)
  97. {
  98. new vw, string[128];
  99. if(sscanf(params, "i", vw)) return
  100. SendClientMessage(playerid, orange, "Usage: /myvworld [VirtualWorldID]");
  101. format(string,sizeof(string),"{FF0000}REG : |- Your Virtual World has set to: %d -|", vw);
  102. SendClientMessage(playerid, yellow, string);
  103. return SetPlayerVirtualWorld(playerid, vw);
  104. }
  105. else return SendClientMessage(playerid, red, "ERROR: You must be VIP to use this command!");
  106. }
  107. CMD:vgoto(playerid,params[])
  108. {
  109. if(PlayerInfo[playerid][pVip] > 0 || IsPlayerAdmin(playerid))
  110. {
  111. new player1, string[128], Float:x, Float:y, Float:z;
  112. if(sscanf(params, "u", player1)) return
  113. SendClientMessage(playerid, LIGHTBLUE2, "Usage: /vgoto [PlayerID]") &&
  114. SendClientMessage(playerid, orange, "Function: Will Go to specified player");
  115. if(GetPVarInt(player1, "PlayerInDM") == 1) return
  116. SendClientMessage(playerid, red, "ERROR: You cannot teleport to this player while he is in a DM Zone!");
  117. if((gettime() - AGGKill[playerid]) < 30) return
  118. SendClientMessage(playerid, red, "ERROR: You can use this command only once at every 30 Seconds!");
  119. else
  120. {
  121. if(IsPlayerConnected(player1) && player1 != INVALID_PLAYER_ID)
  122. {
  123. if(PlayerInfo[player1][Jailed] == 1) return
  124. SendClientMessage(playerid, red, "ERROR: You cannot teleport to this player while he's in Jail!");
  125. if(player1 == playerid) return
  126. SendClientMessage(playerid, red, "ERROR: You cannot teleport to yourself!");
  127. GetPlayerPos(player1, x,y,z);
  128. SetPlayerInterior(playerid, GetPlayerInterior(player1));
  129. SetPlayerVirtualWorld(playerid, GetPlayerVirtualWorld(player1));
  130. if(GetPlayerState(playerid) == 2)
  131. {
  132. SetVehiclePos(GetPlayerVehicleID(playerid), x+3,y,z);
  133. LinkVehicleToInterior(GetPlayerVehicleID(playerid), GetPlayerInterior(player1));
  134. SetVehicleVirtualWorld(GetPlayerVehicleID(playerid), GetPlayerVirtualWorld(player1));
  135. }
  136. else
  137. {
  138. SetPlayerPos(playerid, x+2,y,z);
  139. }
  140. format(string, 128, "{FF0000}REG : |- You have Teleported to \"%s\" -|", PlayerName2(player1));
  141. SendClientMessage(playerid, BlueMsg, string);
  142. format(string, 128, "{FF0000}REG : |- %s has teleported to you! -|", PlayerName2(playerid));
  143. SendClientMessage(player1,BlueMsg,string);
  144. AGGKill[playerid] = gettime();
  145. return 1;
  146. }
  147. else return SendClientMessage(playerid, red, "ERROR: Player not connected!");
  148. }
  149. }
  150. else return SendClientMessage(playerid, red, "ERROR: You must be to use this command!");
  151. }
  152.  
  153. CMD:carcolor(playerid,params[])
  154. {
  155. if(PlayerInfo[playerid][pVip] > 0)
  156. {
  157. new colour1, colour2, string[128];
  158. if(sscanf(params, "dd", colour1, colour2)) return
  159. SendClientMessage(playerid, orange, "Usage: /carcolor [Colour1] [Colour2]");
  160. if(IsPlayerInAnyVehicle(playerid))
  161. {
  162. format(string, sizeof(string), "REG : |- You have Changed the colour of your car to '%d,%d' -|", VehicleNames[GetVehicleModel(GetPlayerVehicleID(playerid))-400], colour1, colour2);
  163. SendClientMessage(playerid,BlueMsg,string);
  164. return ChangeVehicleColor(GetPlayerVehicleID(playerid), colour1, colour2);
  165. }
  166. else return SendClientMessage(playerid,red,"ERROR: You are not in a vehicle!");
  167. }
  168. else return SendClientMessage(playerid, red, "ERROR: You must be VIP to use this command!");
  169. }
  170.  
  171. CMD:vw(playerid,params[])
  172. {
  173. if(PlayerInfo[playerid][pVip] > 0)
  174. {
  175. GivePlayerWeapon(playerid,4,1000); GivePlayerWeapon(playerid,24,1000);
  176. GivePlayerWeapon(playerid,25,1000); GivePlayerWeapon(playerid,32,1000);
  177. GivePlayerWeapon(playerid,42,1000); GivePlayerWeapon(playerid,30,1000);
  178. return 1;
  179. }
  180. else return SendClientMessage(playerid,red, "ERROR: You must be VIP to use this command!");
  181. }
  182. CMD:godmode(playerid,params[])
  183. {
  184. if(PlayerInfo[playerid][pVip] > 0 || IsPlayerAdmin(playerid))
  185. {
  186. if(PlayerInfo[playerid][God] == 0)
  187. {
  188. PlayerInfo[playerid][God] = 1;
  189. SetPlayerHealth(playerid,100000);
  190. new o145[1024];
  191. strcat(o145,"\n{0066CC}G{FFFF00}O{FF0000}D{AFAFAF}: {11FF00}GODMODE {00BBF6}ON !", 1900);
  192. ShowPlayerDialog(playerid, 11068, DIALOG_STYLE_MSGBOX, "{0066CC}G{FFFF00}O{FF0000}D{AFAFAF} - MODE",o145, "OK", "");
  193. }
  194. else
  195. {
  196. PlayerInfo[playerid][God] = 0;
  197. new o147[1024];
  198. strcat(o147,"\n{0066CC}G{FFFF00}O{FF0000}D{AFAFAF}: {11FF00}GODMODE {00BBF6}OFF !", 1900);
  199. ShowPlayerDialog(playerid, 110687, DIALOG_STYLE_MSGBOX, "{0066CC}G{FFFF00}O{FF0000}D{AFAFAF} - MODE",o147, "OK", "");
  200. SetPlayerHealth(playerid, 100);
  201. }
  202. return 1;
  203. }
  204. else return SendClientMessage(playerid,red,"ERROR: You must be VIP to use this command!");
  205. }
  206. CMD:vgodcar(playerid,params[])
  207. {
  208. if(PlayerInfo[playerid][pVip] > 0 || IsPlayerAdmin(playerid))
  209. {
  210. if(IsPlayerInAnyVehicle(playerid))
  211. {
  212. if(PlayerInfo[playerid][GodCar] == 0)
  213. {
  214. PlayerInfo[playerid][GodCar] = 1;
  215. return SendClientMessage(playerid,green,"|- Vehicle GodMod ON -|");
  216. }
  217. else
  218. {
  219. PlayerInfo[playerid][GodCar] = 0;
  220. return SendClientMessage(playerid,red,"|- Vehicle GodMod OFF -|");
  221. }
  222. }
  223. else return SendClientMessage(playerid,red,"ERROR: You must be in a Vehicle before using this command!");
  224. }
  225. else return SendClientMessage(playerid, red, "ERROR: You must be VIP to use this command!");
  226. }
  227. CMD:v(playerid,params[])
  228. {
  229. if(PlayerInfo[playerid][pVip] > 0 || IsPlayerAdmin(playerid))
  230. {
  231. new vsy[60], string[128];
  232. if(sscanf(params, "s[60]", vsy)) return
  233. SendClientMessage(playerid, orange, "REG : Usage: /v [Text]");
  234. else
  235. {
  236. format(string, 128, "*** {ff0000}(VIP) *** | {FFFF00}%s: {00BBF6} %s {11FF00}| ***", PlayerName2(playerid), vsy);
  237. return SendClientMessageToAll(red, string);
  238. }
  239. }
  240. else return SendClientMessage(playerid, red, "ERROR: You must bee VIP to use this command!");
  241. }
  242. CMD:vc(playerid,params[])
  243. {
  244. if(PlayerInfo[playerid][pVip] > 0 || IsPlayerAdmin(playerid))
  245. {
  246. ShowPlayerDialog(playerid, 5, DIALOG_STYLE_MSGBOX, "-->{FF0000}Admin {0066CC}Commands", "{FF0000}Here you can show all H_Admin System commands !\n/CC\n/God\n/Spme\n/W\n/Ac\n/Kill\n/VEject", "Ok", "Close");
  247. }
  248. return 1;
  249. }
  250. CMD:kill(playerid,params[])
  251. {
  252. if(PlayerInfo[playerid][pVip] > 0
  253. {
  254. SetPlayerHealth(playerid, 0.0);
  255. SendClientMessage(playerid, -1, "REG : {0066CC}You have been killed!");
  256. return 1;
  257. }
  258. CMD:veject(playerid,params[])
  259. {
  260. if(PlayerInfo[playerid][pVip] > 4)
  261. {
  262. new player1, string[128], Float:x, Float:y, Float:z, GPVI = GetPlayerVehicleID(playerid);
  263. if(sscanf(params, "u", player1)) return
  264. if(PlayerInfo[player1][Level] == ServerInfo[MaxAdminLevel] && PlayerInfo[playerid][Level] != ServerInfo[MaxAdminLevel]) return
  265. SendClientMessage(playerid,red,"ERROR: You cannot use this command on Level 10 Admins!");
  266. if(IsPlayerConnected(player1) && player1 != INVALID_PLAYER_ID)
  267. {
  268. if(IsPlayerInVehicle(player1, GPVI) && GetPlayerState(playerid) == 2)
  269. {
  270. if(player1 != playerid)
  271. {
  272. format(string,sizeof(string),"|- \"%s\" has Ejected you from your Vehicle -|", pName(playerid));
  273. SendClientMessage(player1,blue,string);
  274. }
  275. format(string,sizeof(string)," |- You have ejected \"%s\" from their Vehicle -|", pName(player1));
  276. SendClientMessage(playerid,BlueMsg,string);
  277. GetPlayerPos(player1,x,y,z);
  278. return SetPlayerPos(player1,x,y,z+3);
  279. }
  280. else return SendClientMessage(playerid, red, "ERROR: You cannot eject players that are not in your vehicle that you are driving!");
  281. }
  282. else return ErrorMessages(playerid, 2);
  283. }
  284. else return SendClientMessage(playerid,red,"ERROR: You must be VIP Level 5 to use this command!");
  285. }
  286.  
  287. //=====================SOME ADMINS COMMAND======================================
  288.  
  289. CMD:kick(playerid,params[])
  290. {
  291. if(PlayerInfo[playerid][LoggedIn] == 1)
  292. {
  293. if(PlayerInfo[playerid][Level] >= 0)
  294. {
  295. new tmp2[128];
  296. if(sscanf(params, "uS()[128]", givepid, tmp2)) return
  297. SendClientMessage(playerid, LIGHTBLUE2, "Usage: /kick [PlayerID] [Reason]") &&
  298. SendClientMessage(playerid, orange, "Function: Will Kick the specified player");
  299. new player1, string[128], playername[MAX_PLAYER_NAME], adminname [MAX_PLAYER_NAME];
  300. player1 = givepid;
  301. if(IsPlayerConnected(player1) && player1 != INVALID_PLAYER_ID && (PlayerInfo[player1][Level] != ServerInfo[MaxAdminLevel]))
  302. {
  303. GetPlayerName(player1, playername, sizeof(playername));
  304. GetPlayerName(playerid, adminname, sizeof(adminname));
  305. if(!strlen(tmp2))
  306. {
  307. format(string,sizeof(string),"*** {11FF00}%s{AFAFAF} has been kicked by Administrator {11FF00}%s{AFAFAF} (Reason: Not Specified) ***",playername,adminname);
  308. SendClientMessageToAll(grey,string);
  309. SaveIn("KickLog",string);
  310. print(string);
  311. return Kick(player1);
  312. }
  313. else
  314. {
  315. format(string,sizeof(string),"*** {11FF00}%s{AFAFAF} has been kicked by Administrator {11FF00}%s{AFAFAF} (Reason: %s) ***",playername,adminname,tmp2);
  316. SendClientMessageToAll(grey,string);
  317. SaveIn("KickLog",string); print(string);
  318. return Kick(player1);
  319. }
  320. }
  321. else return ErrorMessages(playerid, 3);
  322. }
  323. else return ErrorMessages(playerid, 1);
  324. }
  325. else return SendClientMessage(playerid,red,"ERROR: You must be logged in to use this commands");
  326. }
  327.  
  328. CMD:warn(playerid,params[])
  329. {
  330. if(PlayerInfo[playerid][Level] > 0)
  331. {
  332. if((gettime() - warntime) < 5) return
  333. SendClientMessage(playerid, red, "Please wait 5 Seconds to give someone a warning!");
  334. else
  335. {
  336. new warned, tmp2[50], str[400];
  337. if(sscanf(params, "us[50]", warned, tmp2)) return
  338. SendClientMessage(playerid, LIGHTBLUE2, "Usage: /warn [PlayerID] [Reason]") &&
  339. SendClientMessage(playerid, orange, "Function: Will give a Warning in specified player");
  340. if(PlayerInfo[warned][Level] == ServerInfo[MaxAdminLevel] && PlayerInfo[playerid][Level] != ServerInfo[MaxAdminLevel]) return
  341. SendClientMessage(playerid,red,"ERROR: You cannot use this command on this admin");
  342. if(IsPlayerConnected(warned) && warned != INVALID_PLAYER_ID)
  343. {
  344. if(warned != playerid)
  345. {
  346. SendCommandToAdmins(playerid,"Warn");
  347. //----------------------------------------------------------
  348. ASts[playerid][Warnings] += 1;
  349. //----------------------------------------------------------
  350. PlayerInfo[warned][Warnings]++;
  351. warntime = gettime();
  352. //----------------------------------------------------------
  353. if(PlayerInfo[warned][Warnings] == MAX_WARNINGS)
  354. {
  355. format(str, 400, "*** Administrator {11FF00}%s{FFFF00} has kicked {11FF00}%s (Reason: %s)(Warnings: %d/%d) ***", pName(playerid), pName(warned), tmp2, PlayerInfo[warned][Warnings], MAX_WARNINGS);
  356. SendClientMessageToAll(yellow, str);
  357. SaveIn("KickLog",str);
  358. PlayerInfo[warned][Warnings] = 0;
  359. Kick(warned);
  360. }
  361. else
  362. {
  363. GameTextForPlayer(warned, "~r~Warned", 3, 3000);
  364. format(str, 400, "*** Administrator {00BBF6}%s{FFFF00} has given {00BBF6}%s{FFFF00} a Warning! {00BBF6}(Reason: %s)(Warnings: %d/%d) ***", pName(playerid), pName(warned), tmp2, PlayerInfo[warned][Warnings], MAX_WARNINGS);
  365. SendClientMessageToAll(yellow, str);
  366. }
  367. return 1;
  368. }
  369. else return SendClientMessage(playerid, red, "ERROR: You cannot warn yourself");
  370. }
  371. else return ErrorMessages(playerid, 2);
  372. }
  373. }
  374. else return ErrorMessages(playerid, 1);
  375. }
  376.  
  377. CMD:slap(playerid,params[])
  378. {
  379. if(PlayerInfo[playerid][LoggedIn] == 1)
  380. {
  381. if(PlayerInfo[playerid][Level] >= 2)
  382. {
  383. new tmp2[50], player1, string[128], Float:Health, Float:x, Float:y, Float:z;
  384. if(sscanf(params, "us[50]", player1, tmp2)) return
  385. SendClientMessage(playerid, LIGHTBLUE2, "Usage: /slap [PlayerID] [Reason]") &&
  386. SendClientMessage(playerid, orange, "Function: Will Slap the specified player");
  387. if(IsPlayerConnected(player1) && player1 != INVALID_PLAYER_ID && (PlayerInfo[player1][Level] != ServerInfo[MaxAdminLevel]))
  388. {
  389. GetPlayerHealth(player1,Health); SetPlayerHealth(player1,Health-25);
  390. GetPlayerPos(player1,x,y,z); SetPlayerPos(player1,x,y,z+5);
  391. PlayerPlaySound(playerid,1190,0.0,0.0,0.0); PlayerPlaySound(player1,1190,0.0,0.0,0.0);
  392. if(strlen(tmp2))
  393. {
  394. format(string, 128, "|- You have been Slapped by Administrator %s | Reason: %s -|",PlayerName2(playerid),tmp2);
  395. SendClientMessage(player1,red,string);
  396. format(string, 128, "|- You have slapped %s | Reason: %s -|", PlayerName2(player1), tmp2);
  397. SendClientMessage(playerid,BlueMsg,string);
  398. }
  399. else
  400. {
  401. format(string, 128, "|- You have been slapped by Administrator %s | Reason: Not Specified -|", PlayerName2(playerid));
  402. SendClientMessage(player1,red,string);
  403. format(string, 128, "|- You have slapped %s -|", PlayerName2(player1));
  404. SendClientMessage(playerid,BlueMsg,string);
  405. }
  406. return 1;
  407. }
  408. else return SendClientMessage(playerid, red, "ERROR: Player is not connected or is the highest level admin");
  409. }
  410. else return ErrorMessages(playerid, 1);
  411. }
  412. else return SendClientMessage(playerid,red,"ERROR: You must be logged in to use this commands");
  413. }
  414. CMD:explode(playerid,params[])
  415. {
  416. if(PlayerInfo[playerid][LoggedIn] == 1)
  417. {
  418. if(PlayerInfo[playerid][Level] >= 3)
  419. {
  420. new tmp2[128];
  421. if(sscanf(params, "uS()[128]", givepid, tmp2)) return
  422. SendClientMessage(playerid, LIGHTBLUE2, "Usage: /explode [PlayerID] [Reason]") &&
  423. SendClientMessage(playerid, orange, "Function: Will Explode the specified player");
  424. new player1, string[128], playername[MAX_PLAYER_NAME], adminname [MAX_PLAYER_NAME];
  425. player1 = givepid;
  426. if(IsPlayerConnected(player1) && player1 != INVALID_PLAYER_ID && (PlayerInfo[player1][Level] != ServerInfo[MaxAdminLevel]))
  427. {
  428. GetPlayerName(player1, playername, sizeof(playername));
  429. GetPlayerName(playerid, adminname, sizeof(adminname));
  430. SendCommandToAdmins(playerid,"Explode");
  431. ASts[playerid][Explodes] += 1;
  432. new Float:burnx, Float:burny, Float:burnz;
  433. GetPlayerPos(player1,burnx, burny, burnz);
  434. CreateExplosion(burnx, burny , burnz, 7,10.0);
  435. if(strlen(tmp2))
  436. {
  437. format(string,sizeof(string),"|- You have been exploded by Administrator %s | Reason: %s -|",adminname,params[2]);
  438. SendClientMessage(player1,blue,string);
  439. format(string,sizeof(string),"|- You have exploded %s | Reason: %s -|", playername,params[2]);
  440. return SendClientMessage(playerid,BlueMsg,string);
  441. }
  442. else
  443. {
  444. format(string,sizeof(string),"|- You have been exploded by Administrator %s | Reason: Not Specified! -|",adminname);
  445. SendClientMessage(player1,blue,string);
  446. format(string,sizeof(string),"|- You have Exploded %s -|", playername);
  447. return SendClientMessage(playerid,BlueMsg,string);
  448. }
  449. }
  450. else return SendClientMessage(playerid, red, "ERROR: Player is not connected or is the highest level admin");
  451. }
  452. else return ErrorMessages(playerid, 1);
  453. }
  454. else return SendClientMessage(playerid,red,"ERROR: You must be logged in to use this commands");
  455. }
  456. CMD:eject(playerid,params[])
  457. {
  458. if(PlayerInfo[playerid][Level] >= 3)
  459. {
  460. new player1, string[128], Float:x, Float:y, Float:z;
  461. if(sscanf(params, "u", player1)) return
  462. SendClientMessage(playerid, LIGHTBLUE2, "Usage: /eject [PlayerID]") &&
  463. SendClientMessage(playerid, orange, "Function: Will Ejected from vehicle a specified player");
  464. if(PlayerInfo[player1][Level] == ServerInfo[MaxAdminLevel] && PlayerInfo[playerid][Level] != ServerInfo[MaxAdminLevel]) return
  465. SendClientMessage(playerid,red,"ERROR: You cannot use this command on this admin");
  466. if(IsPlayerConnected(player1) && player1 != INVALID_PLAYER_ID)
  467. {
  468. if(IsPlayerInAnyVehicle(player1))
  469. {
  470. SendCommandToAdmins(playerid,"Eject");
  471. if(player1 != playerid)
  472. {
  473. format(string,sizeof(string),"|- Administrator \"%s\" has Ejected you from your Vehicle -|", pName(playerid));
  474. SendClientMessage(player1,blue,string);
  475. }
  476. format(string,sizeof(string)," |- You have ejected \"%s\" from their Vehicle -|", pName(player1));
  477. SendClientMessage(playerid,BlueMsg,string);
  478. GetPlayerPos(player1,x,y,z);
  479. return SetPlayerPos(player1,x,y,z+3);
  480. }
  481. else return SendClientMessage(playerid,red,"ERROR: Player is not in a vehicle");
  482. }
  483. else return ErrorMessages(playerid, 2);
  484. }
  485. else return ErrorMessages(playerid, 1);
  486. }
  487. #else
  488. #endif
  489.  
  490. public OnGameModeInit()
  491. {
  492. SetGameModeText("H_System");
  493. AddPlayerClass(0, 1958.3783, 1343.1572, 15.3746, 269.1425, 0, 0, 0, 0, 0, 0);
  494. return 1;
  495. }
  496.  
  497. public OnGameModeExit()
  498. {
  499. return 1;
  500. }
  501.  
  502. public OnPlayerRequestClass(playerid, classid)
  503. {
  504. SetPlayerPos(playerid, 1958.3783, 1343.1572, 15.3746);
  505. SetPlayerCameraPos(playerid, 1958.3783, 1343.1572, 15.3746);
  506. SetPlayerCameraLookAt(playerid, 1958.3783, 1343.1572, 15.3746);
  507. return 1;
  508. }
  509.  
  510. public OnPlayerConnect(playerid)
  511. {
  512. gPlayerLogged[playerid] = 0;
  513. new name[MAX_PLAYER_NAME], file[256];
  514. GetPlayerName(playerid, name, sizeof(name));
  515. format(file, sizeof(file), PATH, name);
  516. if (!dini_Exists(file))
  517. {
  518. ShowPlayerDialog(playerid, 1, DIALOG_STYLE_PASSWORD, "-->{FF0000}Register {0066CC}Account", "{FF0000}Welcome, you are not registered!\n{0066CC}Enter your password below to can save your {FFFF00}Cash,Score {0066CC}Admin/Vip!", "Register", "Exit");
  519. }
  520. if(fexist(file))
  521. {
  522. ShowPlayerDialog(playerid, 2, DIALOG_STYLE_INPUT, "-->{FF0000}Login {0066CC}Account", "{FF0000}Welcome back !\n{0066CC}Thank you because you are playing again on our server !\n{FFFF00}To can play, please input your{FF0000} password {FF0000}below!", "Login", "Exit");
  523. }
  524. return 1;
  525. }
  526.  
  527. public OnPlayerDisconnect(playerid, reason)
  528. {
  529. new name[MAX_PLAYER_NAME], file[256];
  530. GetPlayerName(playerid, name, sizeof(name));
  531. format(file, sizeof(file), PATH, name);
  532. if(gPlayerLogged[playerid] == 1)
  533. {
  534. dini_IntSet(file, "Score", PlayerInfo[playerid][pScore]);
  535. dini_IntSet(file, "Money", PlayerInfo[playerid][pCash]);
  536. dini_IntSet(file, "Admin",PlayerInfo[playerid][pAdmin]);
  537. dini_IntSet(file, "pVip",PlayerInfo[playerid][pVip]);
  538. dini_IntSet(file, "Kills",PlayerInfo[playerid][pKills]);
  539. dini_IntSet(file, "Deaths",PlayerInfo[playerid][pDeaths]);
  540. }
  541. gPlayerLogged[playerid] = 0;
  542. return 1;
  543. }
  544.  
  545. public OnPlayerText(playerid, text[])
  546. {
  547. return 1;
  548. }
  549.  
  550.  
  551. //==========================ADMIN COMMANDS======================================
  552. public OnPlayerCommandText(playerid, cmdtext[])
  553. {
  554. if (strcmp("/cc", cmdtext, true, 10) == 0)
  555. {
  556. if(PlayerInfo[playerid][pAdmin] >= 0)
  557. {
  558. SendClientMessageToAll(-1, "");
  559. SendClientMessageToAll(-1, "");
  560. SendClientMessageToAll(-1, "");
  561. SendClientMessageToAll(-1, "");
  562. SendClientMessageToAll(-1, "");
  563. SendClientMessageToAll(-1, "");
  564. SendClientMessageToAll(-1, "");
  565. SendClientMessageToAll(-1, "");
  566. SendClientMessageToAll(-1, "");
  567. SendClientMessageToAll(-1, "");
  568. SendClientMessageToAll(-1, "");
  569. SendClientMessageToAll(-1, "");
  570. }
  571. return 1;
  572. }
  573. if (strcmp("/spme", cmdtext, true, 10) == 0)
  574. {
  575. if(PlayerInfo[playerid][pAdmin] >= 0)
  576. {
  577. SpawnPlayer(playerid);
  578. SendClientMessage(playerid, -1, "{FF0000}REG : {0066CC}You have been succesfully spawned!");
  579. }
  580. return 1;
  581. }
  582. if (strcmp("/w", cmdtext, true, 10) == 0)
  583. {
  584. if(PlayerInfo[playerid][pAdmin] >= 0)
  585. {
  586. GivePlayerWeapon(playerid, 28, 9999);
  587. GivePlayerWeapon(playerid, 24, 9999);
  588. GivePlayerWeapon(playerid, 32, 9999);
  589. GivePlayerWeapon(playerid, 34, 9999);
  590. GivePlayerWeapon(playerid, 20, 9999);
  591. GivePlayerWeapon(playerid, 38, 9999);
  592. SendClientMessage(playerid, -1, "{FF0000}REG : {0066CC}Weapons pack, spawned !");
  593. }
  594. return 1;
  595. }
  596. if (strcmp("/god", cmdtext, true, 10) == 0)
  597. {
  598. if(PlayerInfo[playerid][pAdmin] >= 0)
  599. {
  600. SetPlayerHealth(playerid, 1000000);
  601. SendClientMessage(playerid, -1, "{FF0000}REG : {0066CC}GodMode {15FF00}On !");
  602. }
  603. return 1;
  604. }
  605. if (strcmp("/ac", cmdtext, true, 10) == 0)
  606. {
  607. if(PlayerInfo[playerid][pAdmin] > 0)
  608. {
  609. ShowPlayerDialog(playerid, 5, DIALOG_STYLE_MSGBOX, "-->{FF0000}Admin {0066CC}Commands", "{FF0000}Here you can show all H_Admin System commands !\n/CC\n/God\n/Spme\n/W\n/Ac\n/Kick\nWarn\n/Slap\n/Explode\n/Eject", "Ok", "Close");
  610. }
  611. return 1;
  612. }
  613. return 0;
  614. }
  615. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  616. {
  617. if (dialogid == 1)
  618. {
  619. new name[MAX_PLAYER_NAME], file[256], string[128];
  620. GetPlayerName(playerid, name, sizeof(name));
  621. format(file, sizeof(file), PATH, name);
  622. if(!response) return Kick(playerid);
  623. if (!strlen(inputtext)) return
  624. ShowPlayerDialog(playerid, 1, DIALOG_STYLE_PASSWORD, "-->{FF0000}Register {0066CC}Account", "{FF0000}Welcome, you are not registered!\n{0066CC}Enter your password below to can save your {FFFF00}Cash,Score {0066CC}Admin/Vip!", "Register", "Exit");
  625. dini_Create(file);
  626. dini_IntSet(file, "Password", udb_hash(inputtext));
  627. dini_IntSet(file, "AdminLevel",PlayerInfo[playerid][pAdmin] = 0);
  628. dini_IntSet(file, "Money",PlayerInfo[playerid][pCash] = 500);
  629. dini_IntSet(file, "Score",PlayerInfo[playerid][pScore] = 0);
  630. dini_IntSet(file, "Kills",PlayerInfo[playerid][pKills] = 0);
  631. dini_IntSet(file, "Deaths",PlayerInfo[playerid][pDeaths] = 0);
  632. format(string, 128, "{FF0000}[--> Succesfully <--]: {FFFF00}%s {0066CC} you have been succesfully registered!", name, inputtext);
  633. SendClientMessage(playerid, -1, string);
  634. ShowPlayerDialog(playerid, 3, DIALOG_STYLE_MSGBOX, "{FF0000}IMPORTANT!", "{FF0000}*NOTE:{0066CC}Thanks because you have registered on our server !\n{FFFF00}We hope you will enjoy him and our Staff wish you {0066CC}welcome ! :)","Exit", "");
  635. gPlayerLogged[playerid] = 1;
  636. }
  637. if (dialogid == 2)
  638. {
  639. new name[MAX_PLAYER_NAME], file[256], string[128];
  640. GetPlayerName(playerid, name, sizeof(name));
  641. format(file, sizeof(file), PATH, name);
  642. if(!response) return Kick(playerid);
  643. if (!strlen(inputtext)) return ShowPlayerDialog(playerid, 2, DIALOG_STYLE_INPUT, "Hi your registered", "Fucken awesome mate, your registered :D. Inpute your pw below", "Login", "Leave");
  644. new tmp;
  645. tmp = dini_Int(file, "Password");
  646. if(udb_hash(inputtext) != tmp) {
  647. SendClientMessage(playerid, -1, "{FF0000}Wrong password! {0066CC}Try another one !");
  648. ShowPlayerDialog(playerid, 2, DIALOG_STYLE_INPUT, "-->{FF0000}Login {0066CC}Account", "{FF0000}Welcome back !\n{0066CC}Thank you because you are playing again on our server !\n{FFFF00}To can player, please input your{FF0000}password {FF0000}below!", "Login", "Exit");
  649. }
  650. else
  651. {
  652. gPlayerLogged[playerid] = 1;
  653. PlayerInfo[playerid][pAdmin] = dini_Int(file, "AdminLevel");
  654. SetPlayerScore(playerid, PlayerInfo[playerid][pScore]);
  655. GivePlayerMoney(playerid, dini_Int(file, "Money")-GetPlayerMoney(playerid));
  656. SendClientMessage(playerid, -1, "{FF0000}[--> Succesfully <--]: {0066CC}You have been {FFFF00}successfully {0066CC}logged in!");
  657. }
  658. }
  659. return 1;
  660. }
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!