Advertisement
Guest User

Untitled

a guest
Mar 23rd, 2015
61
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 14.59 KB | None | 0 0
  1. //====INCLUDEURI====//
  2. #include <a_samp>
  3. #include <YSI\y_ini>
  4. #include <zcmd>
  5. #include <sscanf2>
  6. //=====================//
  7.  
  8. //====DIALOGURI====//
  9. #define DIALOG_REGISTER 1
  10. #define DIALOG_LOGIN 2
  11. #define DIALOG_SUCCESS_1 3
  12. #define DIALOG_SUCCESS_2 4
  13. //=====================//
  14.  
  15. //===FOLDERE====//
  16. #define PATH "/Users/%s.ini"
  17. //=====================//
  18.  
  19. //===CULORI====//
  20. #define COL_WHITE "{FFFFFF}"
  21. #define COL_BLUE2 "00FFFF"
  22. #define COL_RED "F81414"
  23. #define COL_GREEN "00FF22"
  24. #define COL_LIGHTBLUE "00CED1"
  25. #define COL_REGISTER "0xFFFFCC"
  26. #define COL_BLUE "0x9966FF"
  27. #define COL_GREY "0xAFAFAFAA"
  28. #define COLOR_LIGHTRED 0xAA3333FF
  29. #define COLOR_AQUA 0x00FFFFFF
  30. #define COL_DARK 0x6A6A6AFF
  31. #define COL_JMEK 0xD3D08FFF
  32. #define COL_STATS 0x23652FFF
  33. #define COLOR_WHITE 0xFFFFFFAA
  34. #define COLOR_LIGHTBLUE 0x33CCFFAA
  35. #define COLOR_RED 0xAA3333AA
  36. #define COLOR_YELLOW 0xFFFF00FF
  37. //=======================//
  38.  
  39. enum pInfo
  40. {
  41. pPass,
  42. pCash,
  43. pAdmin,
  44. pKills,
  45. pDeaths
  46. }
  47. new PlayerInfo[MAX_PLAYERS][pInfo];
  48.  
  49. forward LoadUser_data(playerid,name[],value[]);
  50. public LoadUser_data(playerid,name[],value[])
  51. {
  52. INI_Int("Password",PlayerInfo[playerid][pPass]);
  53. INI_Int("Cash",PlayerInfo[playerid][pCash]);
  54. INI_Int("Admin",PlayerInfo[playerid][pAdmin]);
  55. INI_Int("Kills",PlayerInfo[playerid][pKills]);
  56. INI_Int("Deaths",PlayerInfo[playerid][pDeaths]);
  57. return 1;
  58. }
  59.  
  60. stock UserPath(playerid)
  61. {
  62. new string[128],playername[MAX_PLAYER_NAME];
  63. GetPlayerName(playerid,playername,sizeof(playername));
  64. format(string,sizeof(string),PATH,playername);
  65. return string;
  66. }
  67.  
  68. /*Credits to Dracoblue*/
  69. stock udb_hash(buf[]) {
  70. new length=strlen(buf);
  71. new s1 = 1;
  72. new s2 = 0;
  73. new n;
  74. for (n=0; n<length; n++)
  75. {
  76. s1 = (s1 + buf[n]) % 65521;
  77. s2 = (s2 + s1) % 65521;
  78. }
  79. return (s2 << 16) + s1;
  80. }
  81.  
  82. main()
  83. {
  84. print("\n----------------------------------");
  85. print(" Blank Gamemode by your name here");
  86. print("----------------------------------\n");
  87. }
  88.  
  89. public OnGameModeInit()
  90. {
  91. SetGameModeText("Version 0.1");
  92. ShowPlayerMarkers(1);
  93. ShowNameTags(1);
  94. AllowAdminTeleport(1);
  95. UsePlayerPedAnims();
  96. AddPlayerClass(265,1958.3783,1343.1572,15.3746,270.1425,0,0,0,0,-1,-1);
  97. return 1;
  98. }
  99.  
  100. public OnGameModeExit()
  101. {
  102. return 1;
  103. }
  104.  
  105. public OnPlayerRequestClass(playerid, classid)
  106. {
  107.  
  108. return 1;
  109. }
  110.  
  111. public OnPlayerConnect(playerid)
  112. {
  113. if(fexist(UserPath(playerid)))
  114. {
  115. INI_ParseFile(UserPath(playerid), "LoadUser_%s", .bExtra = true, .extra = playerid);
  116. ShowPlayerDialog(playerid, DIALOG_LOGIN, DIALOG_STYLE_INPUT,""COL_WHITE"Login",""COL_WHITE"Type your password below to login.","Login","Quit");
  117. }
  118. else
  119. {
  120. ShowPlayerDialog(playerid, DIALOG_REGISTER, DIALOG_STYLE_INPUT,""COL_WHITE"Registering...",""COL_WHITE"Type your password below to register a new account.","Register","Quit");
  121. }
  122. return 1;
  123. }
  124.  
  125. public OnPlayerDisconnect(playerid, reason)
  126. {
  127. new INI:File = INI_Open(UserPath(playerid));
  128. INI_SetTag(File,"data");
  129. INI_WriteInt(File,"Cash",GetPlayerMoney(playerid));
  130. INI_WriteInt(File,"Admin",PlayerInfo[playerid][pAdmin]);
  131. INI_WriteInt(File,"Kills",PlayerInfo[playerid][pKills]);
  132. INI_WriteInt(File,"Deaths",PlayerInfo[playerid][pDeaths]);
  133. INI_Close(File);
  134. return 1;
  135. }
  136.  
  137. public OnPlayerSpawn(playerid)
  138. {
  139. return 1;
  140. }
  141.  
  142. public OnPlayerDeath(playerid, killerid, reason)
  143. {
  144. PlayerInfo[killerid][pKills]++;
  145. PlayerInfo[playerid][pDeaths]++;
  146. return 1;
  147. }
  148.  
  149. public OnVehicleSpawn(vehicleid)
  150. {
  151. return 1;
  152. }
  153.  
  154. public OnVehicleDeath(vehicleid, killerid)
  155. {
  156. return 1;
  157. }
  158.  
  159. public OnPlayerText(playerid, text[])
  160. {
  161. return 1;
  162. }
  163.  
  164. public OnPlayerCommandText(playerid, cmdtext[])
  165. {
  166. if (strcmp("/mycommand", cmdtext, true, 10) == 0)
  167. {
  168. // Do something here
  169. return 1;
  170. }
  171. return 0;
  172. }
  173.  
  174. public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
  175. {
  176. return 1;
  177. }
  178.  
  179. public OnPlayerExitVehicle(playerid, vehicleid)
  180. {
  181. return 1;
  182. }
  183.  
  184. public OnPlayerStateChange(playerid, newstate, oldstate)
  185. {
  186. return 1;
  187. }
  188.  
  189. public OnPlayerEnterCheckpoint(playerid)
  190. {
  191. return 1;
  192. }
  193.  
  194. public OnPlayerLeaveCheckpoint(playerid)
  195. {
  196. return 1;
  197. }
  198.  
  199. public OnPlayerEnterRaceCheckpoint(playerid)
  200. {
  201. return 1;
  202. }
  203.  
  204. public OnPlayerLeaveRaceCheckpoint(playerid)
  205. {
  206. return 1;
  207. }
  208.  
  209. public OnRconCommand(cmd[])
  210. {
  211. return 1;
  212. }
  213.  
  214. public OnPlayerRequestSpawn(playerid)
  215. {
  216. return 1;
  217. }
  218.  
  219. public OnObjectMoved(objectid)
  220. {
  221. return 1;
  222. }
  223.  
  224. public OnPlayerObjectMoved(playerid, objectid)
  225. {
  226. return 1;
  227. }
  228.  
  229. public OnPlayerPickUpPickup(playerid, pickupid)
  230. {
  231. return 1;
  232. }
  233.  
  234. public OnVehicleMod(playerid, vehicleid, componentid)
  235. {
  236. return 1;
  237. }
  238.  
  239. public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
  240. {
  241. return 1;
  242. }
  243.  
  244. public OnVehicleRespray(playerid, vehicleid, color1, color2)
  245. {
  246. return 1;
  247. }
  248.  
  249. public OnPlayerSelectedMenuRow(playerid, row)
  250. {
  251. return 1;
  252. }
  253.  
  254. public OnPlayerExitedMenu(playerid)
  255. {
  256. return 1;
  257. }
  258.  
  259. public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
  260. {
  261. return 1;
  262. }
  263.  
  264. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  265. {
  266. return 1;
  267. }
  268.  
  269. public OnRconLoginAttempt(ip[], password[], success)
  270. {
  271. return 1;
  272. }
  273.  
  274. public OnPlayerUpdate(playerid)
  275. {
  276. return 1;
  277. }
  278.  
  279. public OnPlayerStreamIn(playerid, forplayerid)
  280. {
  281. return 1;
  282. }
  283.  
  284. public OnPlayerStreamOut(playerid, forplayerid)
  285. {
  286. return 1;
  287. }
  288.  
  289. public OnVehicleStreamIn(vehicleid, forplayerid)
  290. {
  291. return 1;
  292. }
  293.  
  294. public OnVehicleStreamOut(vehicleid, forplayerid)
  295. {
  296. return 1;
  297. }
  298.  
  299. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  300. {
  301. switch( dialogid )
  302. {
  303. case DIALOG_REGISTER:
  304. {
  305. if (!response) return Kick(playerid);
  306. if(response)
  307. {
  308. if(!strlen(inputtext)) return ShowPlayerDialog(playerid, DIALOG_REGISTER, DIALOG_STYLE_INPUT, ""COL_WHITE"Registering...",""COL_RED"You have entered an invalid password.\n"COL_WHITE"Type your password below to register a new account.","Register","Quit");
  309. new INI:File = INI_Open(UserPath(playerid));
  310. INI_SetTag(File,"data");
  311. INI_WriteInt(File,"Password",udb_hash(inputtext));
  312. INI_WriteInt(File,"Cash",0);
  313. INI_WriteInt(File,"Admin",0);
  314. INI_WriteInt(File,"Kills",0);
  315. INI_WriteInt(File,"Deaths",0);
  316. INI_Close(File);
  317.  
  318. SetSpawnInfo(playerid, 0, 0, 1958.33, 1343.12, 15.36, 269.15, 0, 0, 0, 0, 0, 0);
  319. SpawnPlayer(playerid);
  320. ShowPlayerDialog(playerid, DIALOG_SUCCESS_1, DIALOG_STYLE_MSGBOX,""COL_WHITE"Success!",""COL_GREEN"Great! Register system works perfectly. Relog to save your stats!","Ok","");
  321. }
  322. }
  323.  
  324. case DIALOG_LOGIN:
  325. {
  326. if ( !response ) return Kick ( playerid );
  327. if( response )
  328. {
  329. if(udb_hash(inputtext) == PlayerInfo[playerid][pPass])
  330. {
  331. INI_ParseFile(UserPath(playerid), "LoadUser_%s", .bExtra = true, .extra = playerid);
  332. GivePlayerMoney(playerid, PlayerInfo[playerid][pCash]);
  333. ShowPlayerDialog(playerid, DIALOG_SUCCESS_2, DIALOG_STYLE_MSGBOX,""COL_WHITE"Success!",""COL_WHITE"You have successfully logged in!","Ok","");
  334. }
  335. else
  336. {
  337. ShowPlayerDialog(playerid, DIALOG_LOGIN, DIALOG_STYLE_INPUT,""COL_WHITE"Login",""COL_RED"You have entered an incorrect password.\n"COL_WHITE"Type your password below to login.","Login","Quit");
  338. }
  339. return 1;
  340. }
  341. }
  342. }
  343. return 1;
  344. }
  345.  
  346. public OnPlayerClickPlayer(playerid, clickedplayerid, source)
  347. {
  348. return 1;
  349. }
  350.  
  351. //SUICIDE-----------------------------------------------//
  352. CMD:suicide(playerid, params[])
  353. {
  354. SetPlayerHealth(playerid, 0.00);
  355. return 1;
  356. }
  357. //SUICIDE-----------------------------------------------//
  358.  
  359. //HEAL--------------------------------------------------//
  360. CMD:heal(playerid, params[])
  361. {
  362. new targetid; //Here we declare the target id.The one on which the command will be executed.
  363. if(sscanf(params,"u", targetid)) return SendClientMessage(playerid, 0xFF0000FF,"/heal [PlayerID]");
  364. /*We need to split the parameters, "u" is the specifier that stands for Player Name/ID,also
  365. sscanf will check if the sender uses the correct usage of the command, if they use something wrong
  366. like: " /heal " will return the message above.(Syntax error...)*/
  367. if(!IsPlayerConnected(targetid)) return SendClientMessage(playerid, 0xFF0000FF,"That player is not connected to the server!");
  368. //This actually will check if the player on which you try to execute the command is connected to the server, if not you will recieve the message above.(That player...)
  369. // Notice, before IsPlayerConnected I've put a " ! " this means " NOT ", so if(Not player connected(targetid))... return message, more control structures can be found a little bit more down.
  370. SetPlayerHealth(targetid, 100); //Here is the action, this will heal the targeted player, for example:Dave has 30 health, you execute /heal Dave and he will be healed to 100.
  371. return 1;
  372. }
  373. //HEAL--------------------------------------------------//
  374.  
  375. //OOC---------------------------------------------------//
  376. CMD:ooc(playerid, params[])
  377. {
  378. new sendername[MAX_PLAYER_NAME], string[56];
  379. GetPlayerName(playerid, sendername, sizeof(sendername));
  380. if(isnull(params)) return SendClientMessage(playerid, 0xFF0000FF,"/ooc [text]");
  381. format(string, sizeof(string), "(( %s: %s ))", sendername, params);
  382. SendClientMessageToAll(0xFF0000FF, string);
  383. return 1;
  384. }
  385. //OOC---------------------------------------------------//
  386.  
  387. //GIVEMONEY---------------------------------------------//
  388. CMD:givemoney(playerid, params[])
  389. {
  390. new targetid, ammount;
  391. if(sscanf(params,"ui", targetid, ammount)) return SendClientMessage(playerid, 0xFF0000FF,"/givemoney [PlayerID] [Ammount]");
  392. if(PlayerInfo[playerid][pAdmin] < 1) return SendClientMessage(playerid, 0xFF0000FF,"Your admin level is too low to use this command");
  393. if(!IsPlayerConnected(targetid)) return SendClientMessage(playerid, 0xFF0000FF,"That player is not connected to your server!");
  394. GivePlayerMoney(targetid, ammount);
  395. return 1;
  396. }
  397. //GIVEMONEY---------------------------------------------//
  398.  
  399. //GOBANK------------------------------------------------//
  400. CMD:gotobank(playerid, params[])
  401. {
  402. if(PlayerInfo[playerid][pAdmin] >= 1)
  403. {
  404. SetPlayerPos(playerid, 1462.2522,-1012.3832,26.8438);
  405. SendClientMessage(playerid, 0xFF0000FF, "You have been teleported to bank");
  406. }
  407. return 1;
  408. }
  409. //GOBANK------------------------------------------------//
  410.  
  411. //KICK--------------------------------------------------//
  412. CMD:kick(playerid, params[])
  413. {
  414. new id, reason[128], string[256], sendername[25], giveplayer[25];
  415. if(PlayerInfo[playerid][pAdmin] >= 1)
  416. {
  417. if(sscanf(params, "us[128]", id, reason)) return SendClientMessage(playerid,0xFF0000FF,"/kick <Name/Playerid> <reason>");
  418. {
  419. if(id != INVALID_PLAYER_ID)
  420. {
  421. GetPlayerName(id, giveplayer, sizeof(giveplayer));
  422. GetPlayerName(playerid, sendername, sizeof(sendername));
  423. format(string, sizeof(string), "AdmCmd: You kicked %s, reason: %s", giveplayer, sendername, reason);
  424. SendClientMessage(playerid, -1,string);
  425. format(string, sizeof(string), "AdmCmd: %s was kicked by %s, reason: %s", giveplayer, sendername, reason);
  426. SendClientMessageToAll(COLOR_LIGHTRED, string);
  427. Kick(id);
  428. }
  429. else return SendClientMessage(playerid, COLOR_WHITE, "That player is not connected to your server.");
  430. }
  431. }
  432. else return SendClientMessage(playerid, 0xFF0000FF,"Your admin level is too low to use this command");
  433. return 1;
  434. }
  435. //KICK--------------------------------------------------//
  436.  
  437. //GOLS--------------------------------------------------//
  438. CMD:gotols(playerid, params[])
  439. {
  440. if(PlayerInfo[playerid][pAdmin] >= 1)
  441. {
  442. SetPlayerPos(playerid, 1479.7159,-1738.1984,13.5469);
  443. SendClientMessage(playerid, 0xFF0000FF, "You have been teleported to Los Santos");
  444. }
  445. return 1;
  446. }
  447. //GOLS--------------------------------------------------//
  448.  
  449. //JETPACK----------------------------------------------//
  450. CMD:jetpack(playerid, params[])
  451. {
  452. if(PlayerInfo[playerid][pAdmin] < 1) return SendClientMessage(playerid,0xFF0000FF,"Your admin level is too low to use this command");
  453.  
  454. if(PlayerInfo[playerid][pAdmin] >= 1)
  455. {
  456. SendClientMessage(playerid, 0xFF0000FF, "You have jetpack now. Enjoy!");
  457. SetPlayerSpecialAction(playerid,SPECIAL_ACTION_USEJETPACK);
  458. }
  459. return 1;
  460. }
  461. //JETPACK----------------------------------------------//
  462.  
  463. //PM---------------------------------------------------//
  464. CMD:pm(playerid, params[])
  465. {
  466. if(PlayerInfo[playerid][pAdmin] < 1) return SendClientMessage(playerid,0xFF0000FF,"Your admin level is too low to use this command");
  467. new str[256], str2[256], id, Name1[MAX_PLAYER_NAME], Name2[MAX_PLAYER_NAME];
  468. if(sscanf(params, "us", id, str2))
  469. {
  470. SendClientMessage(playerid,0xFFFF00FF,"/pm <id> <message>");
  471. return 1;
  472. }
  473. if(!IsPlayerConnected(id)) return SendClientMessage(playerid, 0xFF0000FF, "That player is not connected to your server.");
  474. if(playerid == id) return SendClientMessage(playerid, 0xFF0000FF, "You cannot PM yourself!");
  475. {
  476. GetPlayerName(playerid, Name1, sizeof(Name1));
  477. GetPlayerName(id, Name2, sizeof(Name2));
  478. format(str, sizeof(str), "PM To %s(ID %d): %s", Name2, id, str2);
  479. SendClientMessage(playerid, -1, str);
  480. format(str, sizeof(str), "PM From %s(ID %d): %s", Name1, playerid, str2);
  481. SendClientMessage(id, -1, str);
  482. }
  483. return 1;
  484. }
  485. //PM---------------------------------------------------//
  486.  
  487. CMD:do(playerid, params[])
  488. {
  489. new
  490. string[128],
  491. action[100];
  492. if(sscanf(params, "s[100]", action))
  493. {
  494. SendClientMessage(playerid, -1, "USAGE: /do [action]");
  495. return 1;
  496. }
  497. else
  498. {
  499. format(string, sizeof(string), "* %s (( %s ))", action, GetName(playerid));
  500. ProxDetector(30, playerid, string, PURPLE);
  501. }
  502. return 1;
  503. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement