API tools faq
paste
Advertisement
Guest User

[SZERKEZTVE]Első Játékmodom v1.0

a guest
Mar 21st, 2014
273
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 14.26 KB | None | 0 0
raw download clone embed print report
  1. #include <a_samp>
  2. #include <zcmd>
  3. #include <sscanf2>
  4. #include <dini>
  5.  
  6. main(){}
  7.  
  8. #define DIALOG_KOCSI 2000
  9. #define DIALOG_FELNI 3000
  10. #define DIALOG_FESTES 4000
  11. #define DIALOG_RADIO 5000
  12. #define RED 0xAA3333AA
  13.  
  14. #define PRESSED(%0) \
  15. (((newkeys & (%0)) == (%0)) && ((oldkeys & (%0)) != (%0)))
  16.  
  17. enum adat
  18. {
  19. Oles,
  20. Halal,
  21. Szint,
  22. Belepesek,
  23. Penz
  24. };
  25. new PlayerInfo[MAX_PLAYERS][adat];
  26.  
  27. new god[MAX_PLAYER_NAME];
  28.  
  29. public OnGameModeInit()
  30. {
  31. return 1;
  32. }
  33.  
  34. public OnGameModeExit()
  35. {
  36. return 1;
  37. }
  38.  
  39. public OnPlayerConnect(playerid)
  40. {
  41. new tag[MAX_PLAYER_NAME];
  42. new kiad[42];
  43. GetPlayerName(playerid,tag,sizeof(tag));
  44. format(kiad,sizeof(kiad),"Feljött a szerverre %s.",tag);
  45. SendClientMessageToAll(RED,kiad);
  46. PlayerInfo[playerid][Belepesek]++;
  47. format(kiad,sizeof(kiad),"%s.ini",tag);
  48. SetSpawnInfo(playerid, 0, 0, 1958.33, 1343.12, 15.36, 269.15, 0, 0, 0, 0, 0, 0 );
  49. SpawnPlayer(playerid);
  50. if(dini_Exists(kiad))
  51. {
  52. PlayerInfo[playerid][Szint] = dini_Int(kiad,"Szint");
  53. PlayerInfo[playerid][Oles] = dini_Int(kiad,"Ölés");
  54. PlayerInfo[playerid][Halal] = dini_Int(kiad,"Halál");
  55. PlayerInfo[playerid][Belepesek] = dini_Int(kiad,"Belépések");
  56. PlayerInfo[playerid][Penz] = dini_Int(kiad,"Pénz");
  57. }
  58. return 1;
  59. }
  60. public OnPlayerDisconnect(playerid)
  61. {
  62. new tag[MAX_PLAYER_NAME];
  63. new kiad[42];
  64. GetPlayerName(playerid,tag,sizeof(tag));
  65. format(kiad,sizeof(kiad),"Lelépett a szerverről s%",tag);
  66. SendClientMessageToAll(RED,kiad);
  67. format(kiad,sizeof(kiad),"%s.ini",tag);
  68. if(dini_Exists(kiad))
  69. {
  70. dini_IntSet(kiad,"Szint", PlayerInfo[playerid][Szint]);
  71. dini_IntSet(kiad,"Ölés", PlayerInfo[playerid][Oles]);
  72. dini_IntSet(kiad,"Halál", PlayerInfo[playerid][Halal]);
  73. dini_IntSet(kiad,"Belépések", PlayerInfo[playerid][Belepesek]);
  74. dini_IntSet(kiad,"Pénz", PlayerInfo[playerid][Penz]);
  75. }
  76. else
  77. {
  78. dini_Create(kiad);
  79. }
  80. return 1;
  81. }
  82.  
  83. public OnPlayerDeath(playerid, killerid, reason)
  84. {
  85. new elo[20];
  86. new halott[20];
  87. new kiad[42];
  88. GetPlayerName(killerid,halott,sizeof(halott));
  89. GetPlayerName(playerid,elo,sizeof(elo));
  90. format(kiad,sizeof(kiad),"s% megölte %s",elo,halott);
  91. SendClientMessageToAll(RED,kiad);
  92. PlayerInfo[playerid][Oles]++;
  93. PlayerInfo[killerid][Halal]++;
  94. ResetPlayerMoney(playerid);
  95. return 1;
  96. }
  97.  
  98. public OnPlayerKeyStateChange(playerid,newkeys,oldkeys)
  99. {
  100. if(PRESSED(KEY_SUBMISSION))
  101. {
  102. if(IsPlayerInAnyVehicle(playerid))
  103. {
  104. ShowPlayerDialog(playerid,DIALOG_KOCSI,DIALOG_STYLE_LIST,"Autó","Felni\nJavítás\nSzín\nHidraulika\nNitró","Választ","Mégse");
  105. return 1;
  106. }
  107. else
  108. {
  109. SendClientMessage(playerid,-1,"Nem ülsz autóban.");
  110. return 1;
  111. }
  112. }
  113. return 1;
  114. }
  115. public OnPlayerCommandPerformed(playerid, cmdtext[], success)
  116. {
  117. if(!success)
  118. {
  119. new string[42];
  120. format(string,sizeof(string),"Nem létezik ez a parancs!(%s)",cmdtext);
  121. SendClientMessage(playerid,RED,string);
  122. }
  123. return 1;
  124. }
  125. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  126. {
  127. if(dialogid == DIALOG_KOCSI)
  128. {
  129. if(response)
  130. {
  131. if(listitem == 0)
  132. {
  133. if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,-1,"Nem ülsz autóban.");
  134. ShowPlayerDialog(playerid,DIALOG_FELNI,DIALOG_STYLE_LIST,"Felnik","Offroad\nMega\nWires\nTwist\nGroove\nImport\nAtomic\nAhab\nVirtual\nAccess\nTrance\nShadow\nRimshine\nClassic\nCutter\nSwitch\nDollar","Választ","Mégse");
  135. return 1;
  136. }
  137. if(listitem == 1)
  138. {
  139. if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,-1,"Nem ülsz autóban.");
  140. RepairVehicle(GetPlayerVehicleID(playerid));
  141. return 1;
  142. }
  143. if(listitem == 2)
  144. {
  145. if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,-1,"Nem ülsz autóban.");
  146. ShowPlayerDialog(playerid,DIALOG_FESTES,DIALOG_STYLE_LIST,"Festés","Kék\nZöld\nFekete\nFehér\nBarna\nPiros\nRózsaszín\nLila","Választ","Mégse");
  147. return 1;
  148. }
  149. if(listitem == 3)
  150. {
  151. if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,-1,"Nem ülsz autóban.");
  152. new kocsi = GetPlayerVehicleID(playerid);
  153. AddVehicleComponent(kocsi,1087);
  154. SendClientMessage(playerid,-1,"Felszerelted az autódat Hidraulikával.");
  155. }
  156. if(listitem == 4)
  157. {
  158. if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,-1,"Nem ülsz autóban.");
  159. new kocsi = GetPlayerVehicleID(playerid);
  160. AddVehicleComponent(kocsi,1010);
  161. }
  162. }
  163. }
  164. if(dialogid == DIALOG_FELNI)
  165. {
  166. if(response)
  167. {
  168. if(listitem == 0)
  169. {
  170. new kocsi = GetPlayerVehicleID(playerid);
  171. AddVehicleComponent(kocsi,1025);
  172. SendClientMessage(playerid,-1,"Ráraktad az Offroad felnikat az autódra.");
  173. }
  174. if(listitem == 1)
  175. {
  176. new kocsi = GetPlayerVehicleID(playerid);
  177. AddVehicleComponent(kocsi,1074);
  178. SendClientMessage(playerid,-1,"Ráraktad a Mega felniket az autódra.");
  179. }
  180. if(listitem == 2)
  181. {
  182. new kocsi = GetPlayerVehicleID(playerid);
  183. AddVehicleComponent(kocsi,1076);
  184. SendClientMessage(playerid,-1,"Ráraktad a Wires felniket az autódra.");
  185. }
  186. if(listitem == 3)
  187. {
  188. new kocsi = GetPlayerVehicleID(playerid);
  189. AddVehicleComponent(kocsi,1078);
  190. SendClientMessage(playerid,-1,"Ráraktad az autódra a Twist kerekeket.");
  191. }
  192. if(listitem == 4)
  193. {
  194. new kocsi = GetPlayerVehicleID(playerid);
  195. AddVehicleComponent(kocsi,1081);
  196. SendClientMessage(playerid,-1,"Ráraktad az autódra a Groove kereket.");
  197. }
  198. if(listitem == 5)
  199. {
  200. new kocsi = GetPlayerVehicleID(playerid);
  201. AddVehicleComponent(kocsi,1082);
  202. SendClientMessage(playerid,-1,"Ráraktad az autódra az Import kerekeket.");
  203. }
  204. if(listitem == 7)
  205. {
  206. new kocsi = GetPlayerVehicleID(playerid);
  207. AddVehicleComponent(kocsi,1085);
  208. SendClientMessage(playerid,-1,"Ráraktad az autódra az Automatic kereket.");
  209. }
  210. if(listitem == 8)
  211. {
  212. new kocsi = GetPlayerVehicleID(playerid);
  213. AddVehicleComponent(kocsi,1085);
  214. SendClientMessage(playerid,-1,"Ráraktad az autódra az Ahab kerekeket.");
  215. }
  216. if(listitem == 9)
  217. {
  218. new kocsi = GetPlayerVehicleID(playerid);
  219. AddVehicleComponent(kocsi,1097);
  220. SendClientMessage(playerid,-1,"Ráraktad az autódra a Virtual kerekeket.");
  221. }
  222. if(listitem == 10)
  223. {
  224. new kocsi = GetPlayerVehicleID(playerid);
  225. AddVehicleComponent(kocsi,1098);
  226. SendClientMessage(playerid,-1,"Ráraktad az autódra az Access kerekeket.");
  227. }
  228. if(listitem == 11)
  229. {
  230. new kocsi = GetPlayerVehicleID(playerid);
  231. AddVehicleComponent(kocsi,1084);
  232. SendClientMessage(playerid,-1,"Ráraktad az autódra a Trance kerekeket.");
  233. }
  234. if(listitem == 12)
  235. {
  236. new kocsi = GetPlayerVehicleID(playerid);
  237. AddVehicleComponent(kocsi,1073);
  238. SendClientMessage(playerid,-1,"Ráraktad az autódra a Shadows kerekeket.");
  239. }
  240. if(listitem == 13)
  241. {
  242. new kocsi = GetPlayerVehicleID(playerid);
  243. AddVehicleComponent(kocsi,1075);
  244. SendClientMessage(playerid,-1,"Ráraktad az autódra a Rimshine kerekeket.");
  245. }
  246. if(listitem == 14)
  247. {
  248. new kocsi = GetPlayerVehicleID(playerid);
  249. AddVehicleComponent(kocsi,1077);
  250. SendClientMessage(playerid,-1,"Ráraktad az autódra a Classic kerekeket.");
  251. }
  252. if(listitem == 15)
  253. {
  254. new kocsi = GetPlayerVehicleID(playerid);
  255. AddVehicleComponent(kocsi,1079);
  256. SendClientMessage(playerid,-1,"Ráraktad az autódra a Cutter kerekeket.");
  257. }
  258. if(listitem == 16)
  259. {
  260. new kocsi = GetPlayerVehicleID(playerid);
  261. AddVehicleComponent(kocsi,1080);
  262. SendClientMessage(playerid,-1,"Ráraktad az autódra a Switch kerekeket.");
  263. }
  264. if(listitem == 17)
  265. {
  266. new kocsi = GetPlayerVehicleID(playerid);
  267. AddVehicleComponent(kocsi,1083);
  268. SendClientMessage(playerid,-1,"Ráraktad az autódra a Dollar kerekeket.");
  269. }
  270. }
  271. if(!response)
  272. {
  273. ShowPlayerDialog(playerid,DIALOG_KOCSI,DIALOG_STYLE_LIST,"Autó","Felni\nJavítás\nSzín\nHidraulika\nNitró","Választ","Mégse");
  274. return 1;
  275. }
  276. }
  277. if(dialogid == DIALOG_FESTES)
  278. {
  279. if(response)
  280. {
  281. if(listitem == 0)
  282. {
  283. new kocsi = GetPlayerVehicleID(playerid);
  284. ChangeVehicleColor(kocsi,162,162);
  285. SendClientMessage(playerid,-1,"Lefestetted az autódat Kékre.");
  286. }
  287. if(listitem == 1)
  288. {
  289. new kocsi = GetPlayerVehicleID(playerid);
  290. ChangeVehicleColor(kocsi,128,128);
  291. SendClientMessage(playerid,-1,"Lefestetted az autódat Zöldre.");
  292. }
  293. if(listitem == 2)
  294. {
  295. new kocsi = GetPlayerVehicleID(playerid);
  296. ChangeVehicleColor(kocsi,0,0);
  297. SendClientMessage(playerid,-1,"Lefestetted az autódat Feketére.");
  298. }
  299. if(listitem == 3)
  300. {
  301. new kocsi = GetPlayerVehicleID(playerid);
  302. ChangeVehicleColor(kocsi,1,1);
  303. SendClientMessage(playerid,-1,"Lefestetted az autódat Fehérre.");
  304. }
  305. if(listitem == 4)
  306. {
  307. new kocsi = GetPlayerVehicleID(playerid);
  308. ChangeVehicleColor(kocsi,174,174);
  309. SendClientMessage(playerid,-1,"Lefestetted az autódat Barnára.");
  310. }
  311. if(listitem == 5)
  312. {
  313. new kocsi = GetPlayerVehicleID(playerid);
  314. ChangeVehicleColor(kocsi,3,3);
  315. SendClientMessage(playerid,-1,"Lefestetted az autódat Pirosra.");
  316. }
  317. if(listitem == 6)
  318. {
  319. new kocsi = GetPlayerVehicleID(playerid);
  320. ChangeVehicleColor(kocsi,233,233);
  321. SendClientMessage(playerid,-1,"Lefestetted az autódat Rózsaszínre.");
  322. }
  323. if(listitem == 7)
  324. {
  325. new kocsi = GetPlayerVehicleID(playerid);
  326. ChangeVehicleColor(kocsi,147,147);
  327. SendClientMessage(playerid,-1,"Lefestetted az autódat Lilára.");
  328. }
  329. }
  330. if(!response)
  331. {
  332. ShowPlayerDialog(playerid,DIALOG_KOCSI,DIALOG_STYLE_LIST,"Autó","Felni\nJavítás\nSzín\nHidraulika\nNitró","Választ","Mégse");
  333. return 1;
  334. }
  335. }
  336. if(dialogid == DIALOG_RADIO)
  337. {
  338. if(response)
  339. {
  340. if(listitem == 0)
  341. {
  342. PlayAudioStreamForPlayer(playerid,"http://195.70.35.172:8000/radio1.mp3");
  343. SendClientMessage(playerid,-1,"A Rádió1-re kapcsoltad a rádiót.");
  344. }
  345. if(listitem == 1)
  346. {
  347. PlayAudioStreamForPlayer(playerid,"http://stream.musicfm.hu:8000/musicfm.mp3");
  348. SendClientMessage(playerid,-1,"A MusicFM-re kapcsoltad a rádiót.");
  349. }
  350. if(listitem == 2)
  351. {
  352. PlayAudioStreamForPlayer(playerid,"http://109.199.58.91/4782/live.mp3");
  353. SendClientMessage(playerid,-1,"A Juventusra kapcsoltad a rádiót.");
  354. }
  355. if(listitem == 3)
  356. {
  357. PlayAudioStreamForPlayer(playerid,"http://dl.dropboxusercontent.com/u/88496413/play.m3u");
  358. SendClientMessage(playerid,-1,"A RiseFM-re kapcsoltad a rádiót.");
  359. }
  360. }
  361. }
  362. return 1;
  363. }
  364. CMD:kill(playerid)
  365. {
  366. SetPlayerHealth(playerid,0.0);
  367. SendClientMessage(playerid,-1,"Öngyilkos lettél");
  368. return 1;
  369. }
  370. CMD:god(playerid)
  371. {
  372. if(god[playerid] == 0)
  373. {
  374. SetPlayerHealth(playerid,99999.0);
  375. god[playerid] = 1;
  376. SendClientMessage(playerid,-1,"GOD-modba léptél.");
  377. return 1;
  378. }
  379. if(god[playerid] == 1)
  380. {
  381. SetPlayerHealth(playerid,100.0);
  382. god[playerid] = 0;
  383. SendClientMessage(playerid,-1,"Kiléptél GOD-modból.");
  384. return 1;
  385. }
  386. return 1;
  387. }
  388. CMD:gotopos(playerid,params[])
  389. {
  390. new Float:X,Float:Y,Float:Z;
  391. if(sscanf(params,"fff",X,Y,Z)) return SendClientMessage(playerid,-1,"Használat: /gotopos <X Kordináta> <Y Kordináta> <Z Kordináta>");
  392. SetPlayerPos(playerid,X,Y,Z);
  393. return 1;
  394. }
  395. CMD:goto(playerid,params[])
  396. {
  397. new Float:X,Float:Y,Float:Z;
  398. new nevem;
  399. GetPlayerPos(nevem,X,Y,Z);
  400. if(sscanf(params,"u",nevem)) return SendClientMessage(playerid,RED,"Használat:/goto <playerid/Névrészlet>");
  401. if(!IsPlayerConnected(nevem)) return SendClientMessage(playerid,-1,"Nincs ilyen játékos.");
  402. SetPlayerPos(playerid,X,Y,Z);
  403. return 1;
  404. }
  405. CMD:setskin(playerid,params[])
  406. {
  407. new skin;
  408. new kiad[42];
  409. if(sscanf(params,"i",skin)) return SendClientMessage(playerid,-1,"Használat:/setskin <skinid>");
  410. if(skin > 299 || skin < 0) return SendClientMessage(playerid,RED,"Rossz Skin ID!");
  411. format(kiad,sizeof(kiad),"Átváltottad a skined erre:%d.",skin);
  412. SendClientMessage(playerid,-1,kiad);
  413. SetPlayerSkin(playerid,skin);
  414. return 1;
  415. }
  416. CMD:ido(playerid,params[])
  417. {
  418. new ora;
  419. new perc;
  420. new kiad[42];
  421. if(sscanf(params,"ii",ora,perc)) return SendClientMessage(playerid,-1,"Használat:/idő <óra> <perc>");
  422. if(ora > 24 || ora < 0) return SendClientMessage(playerid,-1,"Nincs ilyen óra.");
  423. if(perc > 60 || perc < 0) return SendClientMessage(playerid,-1,"Nincs ilyen perc.");
  424. format(kiad,sizeof(kiad),"Átváltoztattad az időd erre:%d óra és %d perc",ora,perc);
  425. SendClientMessage(playerid,-1,kiad);
  426. SetPlayerTime(playerid,ora,perc);
  427. return 1;
  428. }
  429. CMD:veh(playerid, params[])
  430. {
  431. new auto,szin1,szin2;
  432. if(sscanf(params,"iii",auto,szin1,szin2)) return SendClientMessage(playerid,RED,"Használat: /veh [Autó] [Szín 1] [Szín 2]");
  433. new Float:X,Float:Y,Float:Z,Float:D;
  434. GetPlayerPos(playerid,X,Y,Z);
  435. GetPlayerFacingAngle(playerid,D);
  436. CreateVehicle(auto,X,Y,Z,D,szin1,szin2,0);
  437. new kiad[42];
  438. format(kiad,sizeof(kiad),"Lekértél egy járművet!");
  439. SendClientMessage(playerid,-1,kiad);
  440. return 1;
  441. }
  442. CMD:radio(playerid)
  443. {
  444. ShowPlayerDialog(playerid,DIALOG_RADIO,DIALOG_STYLE_LIST,"Rádió","Rádió1\nMusicFM\nJuventus\nRiseFM","Választ","Mégse");
  445. return 1;
  446. }
  447. CMD:fegyverad(playerid,params[])
  448. {
  449. new string[42];
  450. new fegyverid;
  451. new tolteny;
  452. if(sscanf(params,"ii",fegyverid,tolteny)) return SendClientMessage(playerid,-1,"Használat:/fegyverad [FegyverID] [Töltény]");
  453. GivePlayerWeapon(playerid,fegyverid,tolteny);
  454. format(string,sizeof(string),"Lekértél egy %d id-s fegyvert,%d töltényszámmal.",fegyverid,tolteny);
  455. SendClientMessage(playerid,-1,string);
  456. return 1;
  457. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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!