Guest User

English version (best i could do)

a guest
Mar 21st, 2013
156
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / Greedy's House System / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  2. # Include <a_samp>
  3. # Include <sscanf2>
  4. # Include <foreach>
  5. # Include <YSI\y_commands>
  6. # Include <YSI\y_ini>
  7. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  8. / / To have worked fs required worse, these include
  9. / / To have fs work you do in scriptfiles
  10. / / Players folder and Houses
  11. / / FS is in beta so bugs are possible
  12. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  13. # Define WHITE "{FFFFFF}"
  14. # Define GREEN "0ed400 {}"
  15. # Define RED "{F81414}"
  16. # Define YELLOW "F3FF02 {}"
  17. # Define Raft "00C0FF {}"
  18. # Define GREY "{C0C0C0}"
  19. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  20. # Define SCM SendClientMessage
  21. # Define SPD ShowPlayerDialog
  22. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  23. # Define KUCE_FILE "Houses /% d.ini"
  24. # Define IGRAC_FILE "player /% s.ini"
  25. # Define DIALOG_KUCA 321
  26. # Define DIALOG_OKNOVAC 323
  27. # Define DIALOG_UKNOVAC 325
  28. # Define DIALOG_IKUCA 327
  29. # Define DIALOG_KRENT 330
  30. # Define MAX_KUCA 1500
  31. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  32. enum Houses
  33. {
  34. kProveraVlasnika,
  35. kVlasnik [45],
  36. kVrsta [35],
  37. Kime, [60]
  38. Float: kUlazX,
  39. Float: kUlazY,
  40. Float: kUlazZ,
  41. Float: kIzlazX,
  42. Float: kIzlazY,
  43. Float: kIzlazZ,
  44. kLevel,
  45. kCena,
  46.     kNovac,
  47. Kintu,
  48. kZatvoreno,
  49. kVW,
  50. kOruzije,
  51. kMunicija,
  52. kRent,
  53. kCenaRenta,
  54. kZvono
  55. };
  56. New KucaInfo [MAX_KUCA] [home];
  57. New KucaPickup [sizeof (KucaInfo)];
  58. New Text3D: KucaLabel [sizeof (KucaInfo)];
  59. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  60. enum pinfo
  61. {
  62. pPosedovanjeKuce,
  63. pProveraSpawna,
  64. pRent
  65. }
  66. new PlayerInfo [MAX_PLAYERS] [pinfo];
  67. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  68. public OnFilterScriptInit ()
  69. {
  70.     for (new idkuce = 0; idkuce <sizeof (KucaInfo) idkuce + +)
  71.     {
  72.         New kfile [50], string [400];
  73.         format (kfile, sizeof (kfile) KUCE_FILE, idkuce);
  74.         if (fexist (kfile))
  75.         {
  76.             INI_ParseFile (kfile, "UcitajKuce". Bextra = true. Extra = idkuce);
  77.             if (KucaInfo [idkuce] [kProveraVlasnika] == 0)
  78. {
  79.         format (string, sizeof (string), "" GREEN "house of the sale! \ nVrsta:" WHITE "% s \ n" GREEN "Price:" WHITE "% d \ n" GREEN "Level:" WHITE "% d \ n "GREEN" ID Houses: "WHITE"% d \ n "GREEN" For me to buy / kupikukja "KucaInfo [idkuce] [kVrsta] KucaInfo [idkuce] [kCena] KucaInfo [idkuce] [kLevel] idkuce );
  80.         KucaLabel [idkuce] = Create3DTextLabel (string, 0x33CCFFAA, KucaInfo [idkuce] [kUlazX] KucaInfo [idkuce] [kUlazY] KucaInfo [idkuce] [kUlazZ] 25,0,1);
  81.         KucaPickup [idkuce] = CreatePickup (1273, 1, KucaInfo [idkuce] [kUlazX] KucaInfo [idkuce] [kUlazY] KucaInfo [idkuce] [kUlazZ]);
  82.         }
  83.         else if (KucaInfo [idkuce] [kProveraVlasnika] == 1)
  84.         {
  85.         format (string, sizeof (string), "" GREEN "[" WHITE "% s" Green "] \ n" GREEN "Boss:" WHITE "% s \ n" GREEN "Type:" WHITE "% s \ n" GREEN "Level:" WHITE "% d \ n" GREEN "Price:" WHITE "% d \ n" GREEN "Rent," WHITE "% d \ n" GREEN "ID Kukje:" WHITE "% d \ n" GREEN "'F' for entry into the
  86.         KucaLabel [idkuce] = Create3DTextLabel (string, 0x33CCFFAA, KucaInfo [idkuce] [kUlazX] KucaInfo [idkuce] [kUlazY] KucaInfo [idkuce] [kUlazZ] 25,0,1);
  87.         KucaPickup [idkuce] = CreatePickup (1239, 1, KucaInfo [idkuce] [kUlazX] KucaInfo [idkuce] [kUlazY] KucaInfo [idkuce] [kUlazZ]);
  88.         }
  89. }
  90. }
  91. DisableInteriorEnterExits (), print ("House System by gReeDy.aMx");
  92. return 1;
  93. }
  94. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  95. public OnFilterScriptExit ()
  96. {
  97.     for (new k = 0, k <= MAX_KUCA, k + +) {SacuvajKucu (k)}
  98. return 1;
  99. }
  100. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  101. public OnPlayerConnect (playerid)
  102. {
  103. PlayerInfo [playerid] [pProveraSpawna] = 0; PlayerInfo [playerid] [pPosedovanjeKuce] = -1; PlayerInfo [playerid] [pRent] = -1;
  104.     new players [50], aspect (players, sizeof (player), IGRAC_FILE, ImeIgraca (playerid));
  105.     if (! fexist (players))
  106. {
  107. MiniRegis (playerid);
  108. }
  109. Else
  110. {
  111. INI_ParseFile (players, "UcitavanjeIgraca". Bextra = true. Extra = playerid);
  112. SCM (playerid, -1, "Loading ...");
  113. }
  114. return 1;
  115. }
  116. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  117. public OnPlayerDisconnect (playerid, reason)
  118. {
  119.     SacuvajIgraca (playerid);
  120. return 1;
  121. }
  122. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  123. public OnPlayerKeyStateChange (playerid, newkeys, oldkeys)
  124. {
  125.     if (newkeys == KEY_SECONDARY_ATTACK)
  126. {
  127. for (new i; i <MAX_KUCA, i + +)
  128. {
  129. if (IsPlayerInRangeOfPoint (playerid, 3.0, KucaInfo [i] [kUlazX] KucaInfo [i] [kUlazY] KucaInfo [i] [kUlazZ]))
  130. {
  131. if (KucaInfo [i] [kZatvoreno] == 1) return SCM (playerid, -1, "" The Raft "[THE HOUSE]" GREY "was concluded");
  132.             SetPlayerVirtualWorld (playerid, KucaInfo [i] [kVW]);
  133.                 SetPlayerInterior (playerid, KucaInfo [i] [kint]);
  134.              SetPlayerPos (playerid, KucaInfo [i] [kIzlazX] KucaInfo [i] [kIzlazY] KucaInfo [i] [kIzlazZ]);
  135.              return 1;
  136. }
  137.              if (IsPlayerInRangeOfPoint (playerid, 3.0, KucaInfo [i] [kIzlazX] KucaInfo [i] [kIzlazY] KucaInfo [i] [kIzlazZ]) && GetPlayerVirtualWorld (playerid) == KucaInfo [i] [kVW])
  138. {
  139.              SetPlayerInterior (playerid, 0);
  140.              SetPlayerVirtualWorld (playerid, 0);
  141.              SetPlayerPos (playerid, KucaInfo [i] [kUlazX] KucaInfo [i] [kUlazY] KucaInfo [i] [kUlazZ]);
  142.              return 1;
  143.              }
  144. }
  145. }
  146. return 1;
  147. }
  148. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  149. public OnDialogResponse (playerid, dialogid, response, listitem, inputtext [])
  150. {
  151. if (dialogid == DIALOG_KUCA)
  152. {
  153. if (! response) return 1;
  154. if (PlayerInfo [playerid] [pPosedovanjeKuce] == -1) return SCM (playerid, -1, "" RED "HS |" GREY "Need a House,");
  155. new i = PlayerInfo [playerid] [pPosedovanjeKuce];
  156. switch (listitem)
  157. {
  158. case 0:
  159. {
  160. new string [256];
  161.  
  162. format (string, sizeof (string), "" GREY "Kukje Name:% s | Boss:% s | Level:% d", KucaInfo [i] [whom], KucaInfo [i] [kVlasnik] KucaInfo [i] [kLevel]);
  163. SCM (playerid, -1, string);
  164. format (string, sizeof (string), "" GREY "Price:% d | ID:% d | Value:% d | Weapons:% d | Kuršumli:% d", KucaInfo [i] [kCena], and KucaInfo [i] [kNovac] KucaInfo [i] [kOruzije] KucaInfo [i] [kMunicija]);
  165. SCM (playerid, -1, string);
  166.     
  167. }
  168. case 1:
  169. {
  170. if (KucaInfo [i] [kZatvoreno] == 0) return SCM (playerid, -1, "HS |" RED "is already otklucena!");
  171. KucaInfo [i] [kZatvoreno] = 0; SacuvajKucu (i);
  172. SCM (playerid, -1, "" GREEN "[HS]" White "House Unlocked!");
  173. }
  174. case 2:
  175. {
  176. if (KucaInfo [i] [kZatvoreno] == 1) return SCM (playerid, -1, "HS |" RED "has already been concluded");
  177. KucaInfo [i] [kZatvoreno] = 1; SacuvajKucu (i);
  178. SCM (playerid, -1, "" GREEN "[HS]" white "inside the house, it was concluded");
  179. }
  180. case 3:
  181. {
  182. SPD (playerid, DIALOG_OKNOVAC, DIALOG_STYLE_INPUT, "" GREEN "Ostavaete pairs", "" WHITE "Enter quantity to how many pairs of maimed to Vance," "Leave," "hatches");
  183. }
  184. Case 4:
  185. {
  186. SPD (playerid, DIALOG_UKNOVAC, DIALOG_STYLE_INPUT, "" GREEN "raising of steam", "" WHITE "Enter quantity to how many pairs zemete to maim," "Zemi", "hatches");
  187. }
  188. case 5:
  189. {
  190.         if (KucaInfo [i] [kOruzije]! = -1) return SCM (playerid, -1, "" Yellow, "We already have a gun in the house alone!");
  191. if (GetPlayerWeapon (playerid) <= 0) return SCM (playerid, -1, "HS |" yellow "You have no arms in Rakata");
  192. KucaInfo [i] [kOruzije] = GetPlayerWeapon (playerid); KucaInfo [i] [kMunicija] = GetPlayerAmmo (playerid);
  193. SCM (playerid, -1, "" Yellow, "You have left the weapon in the house!"); SacuvajKucu (i); SetPlayerAmmo (playerid, GetPlayerWeapon (playerid), 0);
  194. }
  195. Case 6:
  196. {
  197.     if (KucaInfo [i] [kOruzije] == -1) return SCM (playerid, -1, "" Yellow, "You have no weapons in the house alone!");
  198. GivePlayerWeapon (playerid, KucaInfo [i] [kOruzije] KucaInfo [i] [kMunicija]); KucaInfo [i] [kOruzije] = -1; KucaInfo [i] [kMunicija] = -1;
  199. SacuvajKucu (i), SCM (playerid, -1, "" yellow "Zedovte arms from your statesmanship House,");
  200. }
  201. case 7:
  202. {
  203. new string [60]; GivePlayerMoney (playerid, KucaInfo [i] [kCena]);
  204. KucaInfo [i] [kProveraVlasnika] = 0; KucaInfo [i] [kNovac] = 0; KucaInfo [i] [kOruzije] = -1; KucaInfo [i] [kMunicija] = 0;
  205. KucaInfo [i] [kZatvoreno] = 1; strmid (KucaInfo [i] [whom], "Default", 0, strlen ("Default"), 255);
  206. strmid (KucaInfo [i] [kVlasnik], "None", 0, strlen ("Niko"), 255); PlayerInfo [playerid] [pPosedovanjeKuce] = -1;
  207. SacuvajKucu (i); KuceLP (i); SacuvajIgraca (playerid);
  208. format (string, sizeof (string), "" yellow, "I prodadovte your statesmanship House, in% d", KucaInfo [i] [kCena]);
  209. SCM (playerid, -1, string);
  210. }
  211. Case 8:
  212. {
  213. SPD (playerid, DIALOG_IKUCA, DIALOG_STYLE_INPUT, "" GREEN "Kukje Name", "" white, "Vance is the name of the house, go", "Change", "hatches");
  214. }
  215. Case 9:
  216. {
  217. PlayerInfo [playerid] [pProveraSpawna] = 1;
  218. SCM (playerid, -1, "" yellow "Odbravte House to spawn on your statesmanship, odsega respawnuvate will be here!");
  219. }
  220. case 10:
  221. {
  222. if (KucaInfo [i] [kRent] == ​​0)
  223. {
  224. KucaInfo [i] [kRent] = 1;
  225. SCM (playerid, -1, "" yellow "Odbravte rent the house alone!");
  226. }
  227. else if (KucaInfo [i] [kRent] == ​​1)
  228. {
  229. KucaInfo [i] [kRent] = 0;
  230. SCM (playerid, -1, "" yellow "Zabranivte House to rent in your statesmanship");
  231. }
  232. }
  233. case 11:
  234. {
  235. if (KucaInfo [i] [kRent] == ​​0) return SCM (playerid, -1, "" Yellow, "The House, your statesmanship is forbidden rentot, could that raises the price of the car!");
  236. SPD (playerid, DIALOG_KRENT, DIALOG_STYLE_INPUT, "" Green "Car Price", "" WHITE "I vNes new price of the car", "Change", "hatches");
  237. }
  238. case 12:
  239. {
  240. if (KucaInfo [i] [kZvono] == 1) return SCM (playerid, -1, "" Yellow, "We already have a bell on your statesmanship House,");
  241. if (GetPlayerMoney (playerid) <5000) return SCM (playerid, -1, "" yellow "You have enough pairs!");
  242. KucaInfo [i] [kZvono] = 1; GivePlayerMoney (playerid, -5000); SCM (playerid, -1, "" yellow "Postavivte bell on your statesmanship House,");
  243. }
  244. }
  245. }
  246. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  247. if (dialogid == DIALOG_KRENT)
  248. {
  249.     if (response)
  250. {
  251. new i = PlayerInfo [playerid] [pPosedovanjeKuce], price;
  252. if (sscanf (inputtext, "and" price)) return SPD (playerid, DIALOG_KRENT, DIALOG_STYLE_INPUT, "" GREEN "Price Rent", "" white, "Vance price to rent", "Change", "hatches");
  253. if (price <1 | | price> 1000) return SCM (playerid, -1, "" Yellow, "Not having bidet price of less than 1 or greater than 1000");
  254. KucaInfo [i] [kCenaRenta] = price; SacuvajKucu (i); KuceLP (i), SCM (playerid, -1, "" Yellow, "I promenivte price of rentot!");
  255. }
  256. }
  257. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  258. if (dialogid == DIALOG_OKNOVAC)
  259. {
  260.     if (PlayerInfo [playerid] [pPosedovanjeKuce] == -1) return SCM (playerid, -1, "" RED "HS |" GREY "Need a House,");
  261. new i = PlayerInfo [playerid] [pPosedovanjeKuce];
  262. if (response)
  263. {
  264. new amount, string [256];
  265. if (sscanf (inputtext, "and" amount)) return SPD (playerid, DIALOG_OKNOVAC, DIALOG_STYLE_INPUT, "" GREEN "Ostavanje pairs", "" WHITE "Enter quantity how much money u want to leave", "Leave", "hatches" );
  266. if (amount> GetPlayerMoney (playerid)) return SCM (playerid, -1, "You have just as many pairs!");
  267. if (amount <1 | | amount> 50000) return SCM (playerid, -1, "The amount Not having bidet are lower than 1 or greater than 50000");
  268. KucaInfo [i] [kNovac] + = amount; GivePlayerMoney (playerid-amount) SacuvajKucu (i);
  269. format (string, sizeof (string), "HS |" GREEN "Ostavivte in your statesmanship House, $% d", amount);
  270. SCM (playerid, -1, string);
  271. }
  272. }
  273. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  274. if (dialogid == DIALOG_UKNOVAC)
  275. {
  276.     if (PlayerInfo [playerid] [pPosedovanjeKuce] == -1) return SCM (playerid, -1, "" RED "HS |" GREY "Need a House,");
  277. new i = PlayerInfo [playerid] [pPosedovanjeKuce];
  278. if (response)
  279. {
  280. new amount, string [256];
  281. if (sscanf (inputtext, "and" amount)) return SPD (playerid, DIALOG_UKNOVAC, DIALOG_STYLE_INPUT, "" GREEN "raising of steam", "" WHITE "Enter quantity how much money u want to zemete", "Zemi", "hatches" );
  282. if (amount> KucaInfo [i] [kNovac]) return SCM (playerid, -1, "You have just as many pairs in the house alone!");
  283. if (amount <1 | | amount> 50000) return SCM (playerid, -1, "Not having The sum be less than 1 or greater than 50000");
  284. KucaInfo [i] [kNovac] - = amount; GivePlayerMoney (playerid, amount); SacuvajKucu (i);
  285. format (string, sizeof (string), "HS |" GREEN "Podignavte of your statesmanship House, $% d", amount);
  286. SCM (playerid, -1, string);
  287. }
  288. }
  289. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  290. if (dialogid == DIALOG_IKUCA)
  291. {
  292. if (response)
  293. {
  294.     if (PlayerInfo [playerid] [pPosedovanjeKuce] == -1) return SCM (playerid, -1, "HS |" yellow "Need a House,");
  295. new name [40], string [80], i = PlayerInfo [playerid] [pPosedovanjeKuce];
  296. if (sscanf (inputtext, "s [40]", name)) return SPD (playerid, DIALOG_IKUCA, DIALOG_STYLE_INPUT, "" GREEN "Kukje Name", "" white, "Vance is a new name to go inside the house," "Change," " way out ");
  297. if (strlen (name)> 40) return SCM (playerid, -1, "" RED "The name of the house alone Not having itself contains more than 40 characters");
  298. strmid (KucaInfo [i] [anyone], name, 0, strlen (name), 255); SacuvajKucu (i); KuceLP (i);
  299.     format (string, sizeof (string), "" Yellow, "Vasto name of the house, will be appointed to% s", name);
  300.     SCM (playerid, -1, string);
  301. }
  302. }
  303. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  304. return 1;
  305. }
  306. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  307. public OnPlayerSpawn (playerid)
  308. {
  309. if (PlayerInfo [playerid] [pProveraSpawna] == 1 && PlayerInfo [playerid] [pPosedovanjeKuce]! = -1)
  310. {
  311.         new i = PlayerInfo [playerid] [pPosedovanjeKuce];
  312. SetPlayerInterior (playerid, 0); SetPlayerVirtualWorld (playerid, 0);
  313. SetPlayerPos (playerid, KucaInfo [i] [kUlazX] KucaInfo [i] [kUlazY] KucaInfo [i] [kUlazZ]);
  314. }
  315. if (PlayerInfo [playerid] [pProveraSpawna] == 2)
  316. {
  317. new i = PlayerInfo [playerid] [pRent];
  318. SetPlayerInterior (playerid, 0); SetPlayerVirtualWorld (playerid, 0);
  319. SetPlayerPos (playerid, KucaInfo [i] [kUlazX] KucaInfo [i] [kUlazY] KucaInfo [i] [kUlazZ]);
  320. }
  321. return 1;
  322. }
  323. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  324. forward UcitajKuce (idkuce, name [], value []);
  325. public UcitajKuce (idkuce, name [], value [])
  326. {
  327. INI_Int ("ProveraVlasnika" KucaInfo [idkuce] [kProveraVlasnika]);
  328. INI_String ("Owner" KucaInfo [idkuce] [kVlasnik], 45);
  329.     INI_String ("type", KucaInfo [idkuce] [kVrsta], 35);
  330.     INI_String ("Name" KucaInfo [idkuce] [anyone], 60);
  331.     INI_Float ("UlazX" KucaInfo [idkuce] [kUlazX]);
  332.     INI_Float ("UlazY" KucaInfo [idkuce] [kUlazY]);
  333.     INI_Float ("invested" KucaInfo [idkuce] [kUlazZ]);
  334.     INI_Float ("IzlazX" KucaInfo [idkuce] [kIzlazX]);
  335.     INI_Float ("IzlazY" KucaInfo [idkuce] [kIzlazY]);
  336.     INI_Float ("IzlazZ" KucaInfo [idkuce] [kIzlazZ]);
  337.     INI_Int ("Level", KucaInfo [idkuce] [kLevel]);
  338.     INI_Int ("Price" KucaInfo [idkuce] [kCena]);
  339.     INI_Int ("Money," KucaInfo [idkuce] [kNovac]);
  340.     INI_Int ("Interior" KucaInfo [idkuce] [Kint]);
  341.     INI_Int ("Closed" KucaInfo [idkuce] [kZatvoreno]);
  342.     INI_Int ("VW" KucaInfo [idkuce] [kVW]);
  343.     INI_Int ("weapon" KucaInfo [idkuce] [kOruzije]);
  344.     INI_Int ("ammunition" KucaInfo [idkuce] [kMunicija]);
  345.     INI_Int ("Rent" KucaInfo [idkuce] [kRent]);
  346.     INI_Int ("CenaRenta" KucaInfo [idkuce] [kCenaRenta]);
  347.     INI_Int ("Bell" KucaInfo [idkuce] [kZvono]);
  348. return 1;
  349. }
  350. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  351. stock SacuvajKucu (idkuce)
  352. {
  353. New kfile [128];
  354.     format (kfile, sizeof (kfile) KUCE_FILE, idkuce);
  355. new INI: File = INI_Open (kfile);
  356. INI_WriteInt (File, "ProveraVlasnika" KucaInfo [idkuce] [kProveraVlasnika]);
  357. INI_WriteString (File, "Owner", KucaInfo [idkuce] [kVlasnik]);
  358. INI_WriteString (File, "type", KucaInfo [idkuce] [kVrsta]);
  359. INI_WriteString (File, "name", KucaInfo [idkuce] [whom]);
  360. INI_WriteFloat (File, "UlazX" KucaInfo [idkuce] [kUlazX]);
  361. INI_WriteFloat (File, "UlazY" KucaInfo [idkuce] [kUlazY]);
  362. INI_WriteFloat (File, "investing" KucaInfo [idkuce] [kUlazZ]);
  363. INI_WriteFloat (File, "IzlazX" KucaInfo [idkuce] [kIzlazX]);
  364. INI_WriteFloat (File, "IzlazY" KucaInfo [idkuce] [kIzlazY]);
  365. INI_WriteFloat (File, "IzlazZ" KucaInfo [idkuce] [kIzlazZ]);
  366. INI_WriteInt (File, "Level", KucaInfo [idkuce] [kLevel]);
  367.     INI_WriteInt (File, "Price", KucaInfo [idkuce] [kCena]);
  368.     INI_WriteInt (File, "Money", KucaInfo [idkuce] [kNovac]);
  369.     INI_WriteInt (File, "Interior", KucaInfo [idkuce] [kint]);
  370.     INI_WriteInt (File, 'closed', KucaInfo [idkuce] [kZatvoreno]);
  371.     INI_WriteInt (File, "VW" KucaInfo [idkuce] [kVW]);
  372.     INI_WriteInt (File, "weapon", KucaInfo [idkuce] [kOruzije]);
  373.     INI_WriteInt (File, "Ammunition" KucaInfo [idkuce] [kMunicija]);
  374.     INI_WriteInt (File, "Rent", KucaInfo [idkuce] [kRent]);
  375.     INI_WriteInt (File, "CenaRenta" KucaInfo [idkuce] [kCenaRenta]);
  376.     INI_WriteInt (File, "bell", KucaInfo [idkuce] [kZvono]);
  377. INI_Close (File);
  378. return 1;
  379. }
  380. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  381. stock MiniRegis (playerid)
  382. {
  383.     new players [50], aspect (players, sizeof (player), IGRAC_FILE, ImeIgraca (playerid));
  384. new INI: File = INI_Open (players);
  385.     INI_WriteInt (File, "PosedovanjeKuce", -1);
  386.     INI_WriteInt (File, "ProveraSpawna", 0);
  387.     INI_WriteInt (File, "Rent", -1);
  388.     INI_Close (File);
  389.     SCM (playerid, -1, "Registration successful");
  390.     return 1;
  391. }
  392. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  393. forward UcitavanjeIgraca (playerid, name [], value []);
  394. public UcitavanjeIgraca (playerid, name [], value [])
  395. {
  396.     INI_Int ("PosedovanjeKuce" PlayerInfo [playerid] [pPosedovanjeKuce]);
  397.     INI_Int ("ProveraSpawna" PlayerInfo [playerid] [pProveraSpawna]);
  398.     INI_Int ("Rent" PlayerInfo [playerid] [pRent]);
  399.     return 1;
  400. }
  401. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  402. stock SacuvajIgraca (playerid)
  403. {
  404.     new players [50], aspect (players, sizeof (player), IGRAC_FILE, ImeIgraca (playerid));
  405.     new INI: File = INI_Open (players);
  406.     INI_WriteInt (File, "PosedovanjeKuce", PlayerInfo [playerid] [pPosedovanjeKuce]);
  407.     INI_WriteInt (File, "ProveraSpawna", PlayerInfo [playerid] [pProveraSpawna]);
  408.     INI_WriteInt (File, "Rent", PlayerInfo [playerid] [pRent]);
  409.     INI_Close (File);
  410.     return 1;
  411. }
  412. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  413. stock KuceLP (idkuce)
  414. {
  415. new string [400];
  416. if (KucaInfo [idkuce] [kProveraVlasnika] == 0)
  417. {
  418. Delete3DTextLabel (KucaLabel [idkuce]);
  419. DestroyPickup (KucaPickup [idkuce]);
  420.         format (string, sizeof (string), "" GREEN "house of the sale! \ nVrsta:" WHITE "% s \ n" GREEN "Price:" WHITE "% d \ n" GREEN "Level:" WHITE "% d \ n "GREEN" ID Houses: "WHITE"% d \ n "GREEN" for me to buy / kupikukja "KucaInfo [idkuce] [kVrsta] KucaInfo [idkuce] [kCena] KucaInfo [idkuce] [kLevel] idkuce );
  421.         KucaLabel [idkuce] = Create3DTextLabel (string, 0x33CCFFAA, KucaInfo [idkuce] [kUlazX] KucaInfo [idkuce] [kUlazY] KucaInfo [idkuce] [kUlazZ] 25,0,1);
  422.         KucaPickup [idkuce] = CreatePickup (1273, 1, KucaInfo [idkuce] [kUlazX] KucaInfo [idkuce] [kUlazY] KucaInfo [idkuce] [kUlazZ]);
  423. }
  424. else if (KucaInfo [idkuce] [kProveraVlasnika] == 1)
  425. {
  426. Delete3DTextLabel (KucaLabel [idkuce]);
  427. DestroyPickup (KucaPickup [idkuce]);
  428.         format (string, sizeof (string), "" GREEN "[" WHITE "% s" Green "] \ n" GREEN "Boss:" WHITE "% s \ n" GREEN "Type:" WHITE "% s \ n" GREEN "Level:" WHITE "% d \ n" GREEN "Price:" WHITE "% d \ n" GREEN "Rent," WHITE "% d \ n" GREEN "ID Kukje:" WHITE "% d \ n" GREEN "'F' for entry into the
  429.         KucaLabel [idkuce] = Create3DTextLabel (string, 0x33CCFFAA, KucaInfo [idkuce] [kUlazX] KucaInfo [idkuce] [kUlazY] KucaInfo [idkuce] [kUlazZ] 25,0,1);
  430.         KucaPickup [idkuce] = CreatePickup (1239, 1, KucaInfo [idkuce] [kUlazX] KucaInfo [idkuce] [kUlazY] KucaInfo [idkuce] [kUlazZ]);
  431. }
  432. return 1;
  433. }
  434. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  435. stock ImeIgraca (playerid)
  436. {
  437.     new name [MAX_PLAYER_NAME];
  438.     GetPlayerName (playerid, name, sizeof (name));
  439.     return name;
  440. }
  441. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  442. YCMD: pkukja (playerid, params [], help)
  443. {
  444. # Pragma unused help
  445. if (! IsPlayerAdmin (playerid)) return SCM (playerid, -1, "[HS]" RED "I have authorized me to use this command!");
  446. new idkuce, type, level, price, Float: X, Float: Y, Float: Z fkuce [80], string [400]; GetPlayerPos (playerid, X, Y, Z);
  447. if (sscanf (params, "iiii" idkuce, type, level, price)) return SCM (playerid, -1, "" RED "HS |" GREY "/ kreirajkucu [id] [type] [Level] [Price] ");
  448.     if (idkuce> = MAX_KUCA) return SCM (playerid, -1, "" RED "HS |" GREY "Maximum the houses have been made, you can not you're using the ID");
  449. format (fkuce, sizeof (fkuce) KUCE_FILE, idkuce);
  450. if (fexist (fkuce)) return SCM (playerid, -1, "HS |" Raft "ID House, from that already exists!");
  451. if (type == 3) / / Small Kukje
  452. {
  453.         KucaInfo [idkuce] [kIzlazX] = 223.043991;
  454.     KucaInfo [idkuce] [kIzlazY] = 1289.259888;
  455.     KucaInfo [idkuce] [kIzlazZ] = 1082.199951;
  456.     KucaInfo [idkuce] [Kint] = 1;
  457.     strmid (KucaInfo [idkuce] [kVrsta], "Small house", 0, strlen ("little house"), 255);
  458. }
  459. else if (type == 1) / / Sredna Kukje
  460. {
  461.         KucaInfo [idkuce] [kIzlazX] = 225.756989;
  462.     KucaInfo [idkuce] [kIzlazY] = 1240.000000;
  463.     KucaInfo [idkuce] [kIzlazZ] = 1082.149902;
  464.     KucaInfo [idkuce] [kint] = 2;
  465.     strmid (KucaInfo [idkuce] [kVrsta], an "in house", 0, strlen (an "in house"), 255);
  466. }
  467. else if (type == 2) / / Massive Kukje
  468. {
  469.         KucaInfo [idkuce] [kIzlazX] = 235.508994;
  470.     KucaInfo [idkuce] [kIzlazY] = 1189.169897;
  471.     KucaInfo [idkuce] [kIzlazZ] = 1080.339966;
  472.     KucaInfo [idkuce] [kint] = 3;
  473.     strmid (KucaInfo [idkuce] [kVrsta], "Huge home", 0, strlen ("Vast house"), 255);
  474. }
  475. KucaInfo [idkuce] [kCena] = price; KucaInfo [idkuce] [kLevel] = level; KucaInfo [idkuce] [kUlazX] = X;
  476.     KucaInfo [idkuce] [kUlazY] = Y; KucaInfo [idkuce] [kUlazZ] = Z; KucaInfo [idkuce] [kProveraVlasnika] = 0;
  477.     KucaInfo [idkuce] [kNovac] = 0; KucaInfo [idkuce] [kZatvoreno] = 1; KucaInfo [idkuce] [kVW] = idkuce; KucaInfo [idkuce] [kZvono] = 0;
  478.     KucaInfo [idkuce] [kOruzije] = -1; KucaInfo [idkuce] [kMunicija] = 0; KucaInfo [idkuce] [kRent] = 0; KucaInfo [idkuce] [kCenaRenta] = 50;
  479.     strmid (KucaInfo [idkuce] [kVlasnik], "None", 0, strlen ("Niko"), 255); strmid (KucaInfo [idkuce] [whom], "Default", 0, strlen ("Default"), 255 );
  480.     format (string, sizeof (string), "" GREEN "house of the sale! \ nVrsta:" WHITE "% s \ n" GREEN "Price:" WHITE "% d \ n" GREEN "Level:" WHITE "% d \ n "GREEN" ID Kukje: "WHITE"% d \ n "GREEN" for me to buy / kupikukja "KucaInfo [idkuce] [kVrsta] KucaInfo [idkuce] [kCena] KucaInfo [idkuce] [kLevel] idkuce );
  481.     KucaLabel [idkuce] = Create3DTextLabel (string, 0x33CCFFAA, X, Y, Z, 25,0,1);
  482.     KucaPickup [idkuce] = CreatePickup (1273, 1, KucaInfo [idkuce] [kUlazX] KucaInfo [idkuce] [kUlazY] KucaInfo [idkuce] [kUlazZ]);
  483. SCM (playerid, -1, "" GREY "house is an successfully created!"); SacuvajKucu (idkuce);
  484. return 1;
  485. }
  486. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  487. YCMD: kupikukja (playerid, params [], help)
  488. {
  489.     # Pragma unused help
  490.     # Pragma unused params
  491.     for (new i; i <sizeof (KucaInfo) i + +)
  492. {
  493.     if (IsPlayerInRangeOfPoint (playerid, 3.0, KucaInfo [i] [kUlazX] KucaInfo [i] [kUlazY] KucaInfo [i] [kUlazZ]))
  494.     {
  495.     if (! strcmp (KucaInfo [i] [kVlasnik], "None", true) && KucaInfo [i] [kProveraVlasnika] == 0)
  496.     {
  497.         if (PlayerInfo [playerid] [pPosedovanjeKuce]! = -1) return SCM (playerid, -1, "" RED "HS |" GREY "We already have a House,");
  498.         if (GetPlayerScore (playerid) <KucaInfo [i] [kLevel]) return SCM (playerid, -1, "HS |" RED "You have a tremendous level enough for me to buy the house alone!");
  499.         if (GetPlayerMoney (playerid) <KucaInfo [i] [kCena]) return SCM (playerid, -1, "HS |" RED "You have enough money to buy me that house alone!");
  500. if (PlayerInfo [playerid] [pRent]! = -1) return SCM (playerid, -1, "HS |" RED "Rent House, first unrentajte for me to buy this House, I am!");
  501. strmid (KucaInfo [i] [kVlasnik] ImeIgraca (playerid), 0, strlen (ImeIgraca (playerid)), 255);
  502.         KucaInfo [i] [kProveraVlasnika] = 1; SetPlayerInterior (playerid, KucaInfo [i] [kint]) PlayerInfo [playerid] [pPosedovanjeKuce] = i;
  503.         SetPlayerVirtualWorld (playerid, KucaInfo [i] [kVW]); SetPlayerPos (playerid, KucaInfo [i] [kIzlazX] KucaInfo [i] [kIzlazY] KucaInfo [i] [kIzlazZ]);
  504.         KucaInfo [i] [kZatvoreno] = 0; GivePlayerMoney (playerid-KucaInfo [i] [kCena]); KuceLP (i); SacuvajKucu (i);
  505.         SCM (playerid, -1, "" The Raft "MWRPG |" GREY "Congratulations!, You bought the House,");
  506.         SCM (playerid, -1, "" The Raft "MWRPG |" GREY "For Commands / house!");
  507.         SCM (playerid, -1, "" The Raft "MWRPG |" GREY "For entry uses a beech (F) or Enter");
  508.         return 1;
  509. }
  510. else return SCM (playerid, -1, "" RED "HS |" GREY "Tao House, not to be sold!");
  511. }
  512. }
  513.     return 1;
  514. }
  515. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  516. YCMD: House, (playerid, params [], help)
  517. {
  518.     # Pragma unused help
  519.     # Pragma unused params
  520. if (PlayerInfo [playerid] [pPosedovanjeKuce] == -1) return SCM (playerid, -1, "" RED "HS |" GREY "Need a House,");
  521. if (strcmp (KucaInfo [PlayerInfo [playerid] [pPosedovanjeKuce]] [kVlasnik] ImeIgraca (playerid), true)) return SCM (playerid, -1, "" RED "HS |" GREY "You do not own that house!") ;
  522. new string [256];
  523.     format (string, sizeof (string), "" WHITE "Informacii \ nOtkluci \ nZakluci \ nOstavi pairs \ nZemi pairs \ nOstavi gun \ nZemi gun \ nProdaj House, \ nPromeni Name \ nKukja Spawn \ nDozvoli / Deny Car \ Car nCena \ nZvonce ( $ 5000) ");
  524.     SPD (playerid, DIALOG_KUCA, DIALOG_STYLE_LIST, "" Green "House, in general", string, "Select", "hatches");
  525. return 1;
  526. }
  527. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  528. YCMD: rentajkukja (playerid, params [], help)
  529. {
  530.     # Pragma unused help
  531.     # Pragma unused params
  532.    for (new i = 0; i <MAX_KUCA, i + +)
  533. {
  534. if (IsPlayerInRangeOfPoint (playerid, 3.0, KucaInfo [i] [kUlazX] KucaInfo [i] [kUlazY] KucaInfo [i] [kUlazZ]))
  535. {
  536.         if (PlayerInfo [playerid] [pPosedovanjeKuce]! = -1) return SCM (playerid, -1, "" RED "HS |" GREY "We already have a House, Not having another Rent");
  537. if (KucaInfo [i] [kRent] == ​​0) return SCM (playerid, -1, "HS |" Yellow "In this House, rentot was forbidden!");
  538. if (GetPlayerMoney (playerid) <KucaInfo [i] [kCenaRenta]) return SCM (playerid, -1, "HS |" yellow "You have enough money to rent!");
  539.         GivePlayerMoney (playerid, KucaInfo [i] [kCenaRenta]); KucaInfo [i] [kNovac] + = KucaInfo [i] [kCenaRenta];
  540. PlayerInfo [playerid] [pRent] = i; SetPlayerInterior (playerid, KucaInfo [i] [kint]); SetPlayerVirtualWorld (playerid, KucaInfo [i] [kVW]);
  541. SetPlayerPos (playerid, KucaInfo [i] [kIzlazX] KucaInfo [i] [kIzlazY] KucaInfo [i] [kIzlazZ]) PlayerInfo [playerid] [pProveraSpawna] = 2;
  542. SCM (playerid, -1, "" Yellow, "I have successfully Rent house alone!"); SacuvajKucu (i); SacuvajIgraca (playerid);
  543. return 1;
  544. }
  545. }
  546.     return 1;
  547. }
  548. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  549. YCMD: rings (playerid, params [], help)
  550. {
  551. # Pragma unused params
  552. # Pragma unused help
  553. for (new i = 0; i <sizeof (KucaInfo) i + +)
  554. {
  555. if (IsPlayerInRangeOfPoint (playerid, 3.0, KucaInfo [i] [kUlazX] KucaInfo [i] [kUlazY] KucaInfo [i] [kUlazZ]))
  556. {
  557.         if (KucaInfo [i] [kZvono] == 0) return SCM (playerid, -1, "" GREY "Tao House, no bell!");
  558. SCM (playerid, -1, "" Yellow, "the door bell!");
  559. foreach (Player, k)
  560. {
  561. if (IsPlayerInRangeOfPoint (k, 3.0, KucaInfo [i] [kIzlazX] KucaInfo [i] [kIzlazY] KucaInfo [i] [kIzlazZ]))
  562. {
  563.             SCM (k, -1, "" yellow "Some ringing on your statesmanship door.");
  564. }
  565. }
  566. }
  567. }
  568. return 1;
  569. }
  570. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  571. YCMD: unrentaj (playerid, params [], help)
  572. {
  573. # Pragma unused params
  574. # Pragma unused help
  575. if (PlayerInfo [playerid] [pPosedovanjeKuce]! = -1) return SCM (playerid, -1, "" RED "HS |" GREY "House, we can not have this!");
  576. if (PlayerInfo [playerid] [pRent] == ​​-1) return SCM (playerid, -1, "" yellow "Do not Rent House,");
  577. PlayerInfo [playerid] [pRent] = -1; SetPlayerHealth (playerid, 0); SCM (playerid, -1, "" Yellow, "I unrentovavte house alone!");
  578. return 1;
  579. }
  580. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  581. YCMD: izbrisikukja (playerid, params [], help)
  582. {
  583. # Pragma unused help
  584. # Pragma unused params
  585. if (! IsPlayerAdmin (playerid)) return SCM (playerid, -1, "HS |" RED "Do not you have authorized that I am using this command!");
  586. New kfile [50], id;
  587. if (sscanf (params, "i", id)) return SCM (playerid, -1, "HS |" Yellow "/ izbrisikucu [ID]");
  588. format (kfile, sizeof (kfile) KUCE_FILE, id);
  589. if (fexist (kfile)) {frem (kfile) Delete3DTextLabel (KucaLabel [id]); DestroyPickup (KucaPickup [id]);}
  590. else {SCM (playerid, -1, "He ID from inside the house does not exist!");}
  591. return 1;
  592. }
  593. / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
  594. YCMD: portkukja (playerid, params [], help)
  595. {
  596. # Pragma unused help
  597. # Pragma unused params
  598. if (! IsPlayerAdmin (playerid)) return SCM (playerid, -1, "HS |" RED "I have authorized me to use this command!");
  599. new id, kfile [50];
  600. if (sscanf (params, "i", id)) return SCM (playerid, -1, "HS |" Yellow "/ portkuca [ID]");
  601. format (kfile, sizeof (kfile) KUCE_FILE, id);
  602.     SetPlayerPos (playerid KucaInfo [d] [kUlazX] KucaInfo [d] [kUlazY] KucaInfo [d] [kUlazZ]);
  603.     SetPlayerInterior (playerid, 0); SetPlayerVirtualWorld (playerid, 0);
  604. return 1;
  605. }
Advertisement
Add Comment
Please, Sign In to add comment