Guest User

saugojimas krovimas

a guest
Dec 17th, 2014
228
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.08 KB | None | 0 0
  1. // This is a comment
  2. // uncomment the line below if you want to write a filterscript
  3. //#define FILTERSCRIPT
  4.  
  5. #include <a_samp>
  6.  
  7. #include <dini>
  8. #include <dudb>
  9. #include <dutils>
  10. #pragma unused ret_memcpy
  11.  
  12. forward LData(playerid);
  13. forward SData(playerid);
  14. LData(playerid);
  15. SData(playerid);
  16.  
  17. new bool:Logged[MAX_PLAYERS];
  18.  
  19. main()
  20. {
  21. print("\n----------------------------------");
  22. print(" v0.01 BETA by GOLF69");
  23. print("----------------------------------\n");
  24. }
  25.  
  26. public OnGameModeInit()
  27. {
  28. // Don't use these lines if it's a filterscript
  29. SetGameModeText("GRP v 0.0.1");
  30. AddPlayerClass(0, 1958.3783, 1343.1572, 15.3746, 269.1425, 0, 0, 0, 0, 0, 0);
  31. return 1;
  32. }
  33.  
  34. enum PlayerInfo
  35. {
  36. adminlevel,
  37. pAdminLevel,
  38. }
  39.  
  40. new PInfo[MAX_PLAYERS][PlayerInfo];
  41.  
  42. public OnGameModeExit()
  43. {
  44. return 1;
  45. }
  46.  
  47. public OnPlayerRequestClass(playerid, classid)
  48. {
  49. SetPlayerPos(playerid, 1958.3783, 1343.1572, 15.3746);
  50. SetPlayerCameraPos(playerid, 1958.3783, 1343.1572, 15.3746);
  51. SetPlayerCameraLookAt(playerid, 1958.3783, 1343.1572, 15.3746);
  52. return 1;
  53. }
  54.  
  55. public OnPlayerConnect(playerid)
  56. {
  57. Logged[playerid]=false;
  58. new file[128], vardas[128];
  59. GetPlayerName(playerid, vardas, 128);
  60. format(file,128,"vartotojai/%s.ini",vardas);
  61. dini_Exists(file);
  62. if(!dini_Exists(file))
  63. {
  64. ShowPlayerDialog(playerid,1,DIALOG_STYLE_INPUT,"Paskyros Registracija","Jei norite žaisti serveryje, turite susikurti paskyrą, kuri leis jum žaisti.\nĮveskite slaptažodį, kurį naudosite prisijungimui:","Registruotis","Išeiti");
  65. }
  66. else
  67. {
  68. ShowPlayerDialog(playerid,2,DIALOG_STYLE_INPUT,"Prisijungimas","Jei norite žaisti su savo paskyra serveryje, turite prisijungti\nĮveskite savo slaptažodį:","Prisijungti","Išeiti");
  69. }
  70. return 1;
  71. }
  72.  
  73. public OnPlayerDisconnect(playerid, reason)
  74. {
  75. return 1;
  76. }
  77.  
  78. public OnPlayerSpawn(playerid)
  79. {
  80. return 1;
  81. }
  82.  
  83. public OnPlayerDeath(playerid, killerid, reason)
  84. {
  85. return 1;
  86. }
  87.  
  88. public OnVehicleSpawn(vehicleid)
  89. {
  90. return 1;
  91. }
  92.  
  93. public OnVehicleDeath(vehicleid, killerid)
  94. {
  95. return 1;
  96. }
  97.  
  98. public OnPlayerText(playerid, text[])
  99. {
  100. return 1;
  101. }
  102.  
  103. public OnPlayerCommandText(playerid, cmdtext[])
  104. {
  105. if (strcmp("/mycommand", cmdtext, true, 10) == 0)
  106. {
  107. // Do something here
  108. return 1;
  109. }
  110. return 0;
  111. }
  112.  
  113. public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
  114. {
  115. return 1;
  116. }
  117.  
  118. public OnPlayerExitVehicle(playerid, vehicleid)
  119. {
  120. return 1;
  121. }
  122.  
  123. public OnPlayerStateChange(playerid, newstate, oldstate)
  124. {
  125. return 1;
  126. }
  127.  
  128. public OnPlayerEnterCheckpoint(playerid)
  129. {
  130. return 1;
  131. }
  132.  
  133. public OnPlayerLeaveCheckpoint(playerid)
  134. {
  135. return 1;
  136. }
  137.  
  138. public OnPlayerEnterRaceCheckpoint(playerid)
  139. {
  140. return 1;
  141. }
  142.  
  143. public OnPlayerLeaveRaceCheckpoint(playerid)
  144. {
  145. return 1;
  146. }
  147.  
  148. public OnRconCommand(cmd[])
  149. {
  150. return 1;
  151. }
  152.  
  153. public OnPlayerRequestSpawn(playerid)
  154. {
  155. return 1;
  156. }
  157.  
  158. public OnObjectMoved(objectid)
  159. {
  160. return 1;
  161. }
  162.  
  163. public OnPlayerObjectMoved(playerid, objectid)
  164. {
  165. return 1;
  166. }
  167.  
  168. public OnPlayerPickUpPickup(playerid, pickupid)
  169. {
  170. return 1;
  171. }
  172.  
  173. public OnVehicleMod(playerid, vehicleid, componentid)
  174. {
  175. return 1;
  176. }
  177.  
  178. public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
  179. {
  180. return 1;
  181. }
  182.  
  183. public OnVehicleRespray(playerid, vehicleid, color1, color2)
  184. {
  185. return 1;
  186. }
  187.  
  188. public OnPlayerSelectedMenuRow(playerid, row)
  189. {
  190. return 1;
  191. }
  192.  
  193. public OnPlayerExitedMenu(playerid)
  194. {
  195. return 1;
  196. }
  197.  
  198. public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
  199. {
  200. return 1;
  201. }
  202.  
  203. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  204. {
  205. return 1;
  206. }
  207.  
  208. public OnRconLoginAttempt(ip[], password[], success)
  209. {
  210. return 1;
  211. }
  212.  
  213. public OnPlayerUpdate(playerid)
  214. {
  215. return 1;
  216. }
  217.  
  218. public OnPlayerStreamIn(playerid, forplayerid)
  219. {
  220. return 1;
  221. }
  222.  
  223. public OnPlayerStreamOut(playerid, forplayerid)
  224. {
  225. return 1;
  226. }
  227.  
  228. public OnVehicleStreamIn(vehicleid, forplayerid)
  229. {
  230. return 1;
  231. }
  232.  
  233. public OnVehicleStreamOut(vehicleid, forplayerid)
  234. {
  235. return 1;
  236. }
  237.  
  238. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  239. {
  240. if(dialogid == 1)
  241. {
  242. if(response)
  243. {
  244. new file[128], vardas[128];
  245. GetPlayerName(playerid,vardas,128);
  246. format(file,128,"vartotojai/%s.ini",vardas);
  247. dini_Create(file);
  248. dini_IntSet(file,"Slaptazodis",udb_hash(inputtext));
  249. dini_IntSet(file,"AdminLevel",PInfo[playerid][adminlevel] = 0);
  250. dini_IntSet(file,"Patirtis",SetPlayerScore(playerid, 200));
  251. dini_IntSet(file,"Eurai",GivePlayerMoney(playerid, 8000));
  252. Logged[playerid] = true;
  253. SendClientMessage(playerid,0xFFFFFFFF,"Paskyra sukurta sėkmingai, prie serverio jūs prijungtas automatiškai, o dabar spauskite SPAWN arba SHIFT klavišą.");
  254. }
  255. else if(!response)
  256. {
  257. Kick(playerid);
  258. }
  259. return 1;
  260. }
  261. if(dialogid == 2)
  262. {
  263. if(response) // jai paspaude prisijungti.
  264. {
  265. new file[128], vardas[128], pass[256];
  266. GetPlayerName(playerid, vardas, 128);
  267. format(file,128,"vartotojai/%s.ini",vardas);
  268. pass = dini_Get(file,"Slaptazodis");
  269. if(udb_hash(inputtext) != strval(pass))
  270. {
  271. ShowPlayerDialog(playerid,2,DIALOG_STYLE_INPUT,"Prisijungimas","Jūsų įvestas slaptažodis neteisingas.\nĮveskite savo slaptažodį:","Prisijungti","Išeiti");
  272. }
  273. else
  274. {
  275. Logged[playerid] = true;
  276. SendClientMessage(playerid,0xFFFFFFFF,"Jus sekmingai prisijungete");
  277. }
  278. }
  279. else if(!response)
  280. {
  281. Kick(playerid);
  282. }
  283. return 1;
  284. }
  285. return 1;
  286. }
  287.  
  288. public OnPlayerClickPlayer(playerid, clickedplayerid, source)
  289. {
  290. return 1;
  291. }
  292.  
  293. public LData(playerid)
  294. {
  295. new name[MAX_PLAYER_NAME], file[256];
  296. GetPlayerName(playerid, name, sizeof(name));
  297. format(file, sizeof(file), "vartotojai/%s.ini", name);
  298. GivePlayerMoney(playerid, dini_Int(file,"Eurai"));
  299. SetPlayerScore(playerid, dini_Int(file,"Patirtis"));
  300. PInfo[playerid][adminlevel] = dini_Int(file,"AdminLevel");
  301. return 1;
  302. }
  303.  
  304. public SData(playerid)
  305. {
  306. new name[MAX_PLAYER_NAME], file[256];
  307. GetPlayerName(playerid, name, sizeof(name));
  308. format(file, sizeof(file), "vartotojai/%s.ini", name);
  309. dini_IntSet(file,"Eurai",GetPlayerMoney(playerid));
  310. dini_IntSet(file,"Patirtis",GetPlayerScore(playerid));
  311. dini_IntSet(file,"AdminLevel",PInfo[playerid][pAdminLevel]);
  312. return 1;
  313. }
Advertisement
Add Comment
Please, Sign In to add comment