API tools faq
paste
Rei_Ayanami

Sistema de casa

Rei_Ayanami
Jun 7th, 2023
89
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.50 KB | None | 0 0
raw download clone embed print report diff
  1. //============ Sistema Criar Casa ======================||
  2. #define MAX_CASAS 600
  3.  
  4. enum Casas
  5. {
  6. Float:X,
  7. Float:Y,
  8. Float:Z,
  9. Float:Xp,
  10. Float:Yp,
  11. Float:Zp,
  12. Pickup,
  13. Text3D:TextLabel,
  14. pInterior
  15. };
  16. new pCasa[MAX_PLAYERS][Casas];
  17.  
  18. enum Inters
  19. {
  20. Float:XI,
  21. Float:YI,
  22. Float:ZI,
  23. Float:AI,
  24. pID
  25. };
  26. new Interiores[][Inters] =
  27. {
  28. {2196.84, -1204.36, 1049.02, 94.0010, 6},
  29. {2259.38, -1135.89, 1050.64, 275.3992, 10},
  30. {2282.99, -1140.28, 1050.89, 358.4660, 11},
  31. {2233.69, -1115.26, 1050.88, 358.4660, 5},
  32. {2218.39, -1076.21, 1050.48, 95.2635, 1},
  33. {2496.00, -1692.08, 1014.74, 177.8159, 3},
  34. {2365.25, -1135.58, 1050.88, 359.0367, 8},
  35. {2317.77, -1026.76, 1050.21, 359.0367, 9},
  36. {2324.41, -1149.54, 1050.71, 359.0367, 12},
  37. {1260.6603, -785.4005, 1091.9063, 270.9891, 5},
  38. {140.28, 1365.92, 1083.85, 9.6901, 5}
  39. };
  40.  
  41. new CasaDentro[MAX_PLAYERS];
  42.  
  43. public OnGameModeInit()
  44. {
  45. for(new i = 0; i < MAX_CASAS; i++) CarregarCasa(i);
  46. return 1;
  47. }
  48.  
  49. CMD:criarcasa(playerid, params[])
  50. {
  51. new idcasa, str[120], valor, interior, Float:Pos[3], strmsg[150];
  52. if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, Vermelho, "Voce nao tem permissao");
  53. if(sscanf(params, "ddd", idcasa, valor, interior)) return SendClientMessage(playerid, Vermelho, "/criarcasa [Numero] [Valor] [Interior]");
  54. format(str, 120, "Casas/%d.ini", idcasa);
  55. if(dini_Exists(str)) return SendClientMessage(playerid, Vermelho, "Esta casa ja existe");
  56. pCasa[idcasa][pInterior] = interior;
  57. GetPlayerPos(playerid, Pos[0], Pos[1], Pos[2]);
  58. pCasa[idcasa][X] = Pos[0];
  59. pCasa[idcasa][Y] = Pos[1];
  60. pCasa[idcasa][Z] = Pos[2];
  61. pCasa[idcasa][Xp] = Interiores[interior][XI];
  62. pCasa[idcasa][Yp] = Interiores[interior][YI];
  63. pCasa[idcasa][Zp] = Interiores[interior][ZI];
  64. dini_Create(str);
  65. dini_IntSet(str, "DonoCasa", 0);
  66. dini_IntSet(str, "CasaTrancada", 0);
  67. dini_IntSet(str, "Valor", valor);
  68. dini_IntSet(str, "Interior", Interiores[interior][pID]);
  69. dini_IntSet(str, "MundoVirtual", idcasa);
  70. dini_FloatSet(str, "CasaX", Pos[0]);
  71. dini_FloatSet(str, "CasaY", Pos[1]);
  72. dini_FloatSet(str, "CasaZ", Pos[2]);
  73. dini_FloatSet(str, "InterX", pCasa[idcasa][Xp]);
  74. dini_FloatSet(str, "InterY", pCasa[idcasa][Yp]);
  75. dini_FloatSet(str, "InterZ", pCasa[idcasa][Zp]);
  76. format(strmsg, 150, "Voce criou a casa %d pelo valor de %d com o interior %d", idcasa, valor, interior);
  77. SendClientMessage(playerid, -1, strmsg);
  78. CarregarCasa(idcasa);
  79. return 1;
  80. }
  81. CMD:apagarcasa(playerid, params[])
  82. {
  83. new string[120], idcasa;
  84. if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, Vermelho, "Voce nao tem permissao");
  85. if(sscanf(params, "d", idcasa)) return SendClientMessage(playerid, Vermelho, "Use /apagarcasa [IdCasa]");
  86. format(string, 120, "Casas/%d.ini", idcasa);
  87. if(!dini_Exists(string)) return SendClientMessage(playerid, Vermelho, "Esta casa nao existe");
  88. dini_Remove(string);
  89. DestroyPickup(pCasa[idcasa][Pickup]);
  90. Delete3DTextLabel(pCasa[idcasa][TextLabel]);
  91. format(string, 120, "Voce deletou a casa %d", idcasa);
  92. SendClientMessage(playerid, -1, string);
  93. return 1;
  94. }
  95. CMD:comprarcasa(playerid)
  96. {
  97. new string[125], string2[125];
  98. for(new c = 0; c < MAX_CASAS; c++)
  99. {
  100. format(string, 125, "Casas/%d.ini", c);
  101. if(dini_Exists(string))
  102. {
  103. new Float:Pos[3];
  104. Pos[0] = dini_Float(string, "CasaX");
  105. Pos[1] = dini_Float(string, "CasaY");
  106. Pos[2] = dini_Float(string, "CasaZ");
  107. if(IsPlayerInRangeOfPoint(playerid, 2.0, Pos[0], Pos[1], Pos[2]))
  108. {
  109. if(Player[playerid][pChave] > 0) return SendClientMessage(playerid, Vermelho, "Voce ja tem uma casa");
  110. if(dini_Int(string, "DonoCasa") == 1) return SendClientMessage(playerid, Vermelho, "Esta casa ja tem um dono");
  111. if(GetPlayerMoney(playerid) < dini_Int(string, "Valor")) return SendClientMessage(playerid, Vermelho, "Voce nao tem dinheiro suficiente");
  112. dini_IntSet(string, "DonoCasa", 1);
  113. dini_Set(string, "NomeProprietario", pName(playerid));
  114. Player[playerid][pChave] = c;
  115. GivePlayerMoney(playerid, -dini_Int(string, "Valor"));
  116. format(string2, 125, "Voce comprou a casa numero %d por R$ %d", c, dini_Int(string, "Valor"));
  117. SendClientMessage(playerid, -1, string2);
  118. DestroyPickup(pCasa[c][Pickup]);
  119. Delete3DTextLabel(pCasa[c][TextLabel]);
  120. CarregarCasa(c);
  121. }
  122. }
  123. }
  124. return 1;
  125. }
  126. CMD:vendercasa(playerid)
  127. {
  128. new string[125];
  129. for(new c = 0; c < MAX_CASAS; c++)
  130. {
  131. format(string, 125, "Casas/%d.ini", c);
  132. if(dini_Exists(string))
  133. {
  134. new Float:Pos[3];
  135. Pos[0] = dini_Float(string, "CasaX");
  136. Pos[1] = dini_Float(string, "CasaY");
  137. Pos[2] = dini_Float(string, "CasaZ");
  138. if(IsPlayerInRangeOfPoint(playerid, 2.0, Pos[0], Pos[1], Pos[2]))
  139. {
  140. if(Player[playerid][pChave] == 0) return SendClientMessage(playerid, Vermelho, "Voce nao tem uma casa");
  141. if(Player[playerid][pChave] != c) return SendClientMessage(playerid, Vermelho, "Esta casa nao e sua");
  142. new casaid = Player[playerid][pChave];
  143. dini_IntSet(string, "DonoCasa", 0);
  144. GivePlayerMoney(playerid, dini_Int(string, "Valor") / 2);
  145. DestroyPickup(pCasa[casaid][Pickup]);
  146. Delete3DTextLabel(pCasa[casaid][TextLabel]);
  147. CarregarCasa(casaid);
  148. Player[playerid][pChave] = 0;
  149. SendClientMessage(playerid, -1, "Voce vendeu sua casa, e recebeu metade do valor");
  150. }
  151. }
  152. }
  153. return 1;
  154. }
  155. CMD:entrarcasa(playerid)
  156. {
  157. new string[125];
  158. for(new c = 0; c < MAX_CASAS; c++)
  159. {
  160. format(string, 125, "Casas/%d.ini", c);
  161. if(dini_Exists(string))
  162. {
  163. new Float:Pos[3];
  164. Pos[0] = dini_Float(string, "CasaX");
  165. Pos[1] = dini_Float(string, "CasaY");
  166. Pos[2] = dini_Float(string, "CasaZ");
  167. if(IsPlayerInRangeOfPoint(playerid, 2.0, Pos[0], Pos[1], Pos[2]))
  168. {
  169. if(dini_Int(string, "CasaTrancada") == 1) return SendClientMessage(playerid, Vermelho, "Esta casa esta trancada");
  170. CasaDentro[playerid] = c;
  171. SetPlayerInterior(playerid, dini_Int(string, "Interior"));
  172. SetPlayerPos(playerid, dini_Float(string, "InterX"), dini_Float(string, "InterY"), dini_Float(string, "InterZ"));
  173. SetPlayerVirtualWorld(playerid, dini_Int(string, "MundoVirtual"));
  174. }
  175. }
  176. }
  177. return 1;
  178. }
  179. CMD:saircasa(playerid)
  180. {
  181. new string[125];
  182. format(string, 125, "Casas/%d.ini", CasaDentro[playerid]);
  183. if(dini_Exists(string))
  184. {
  185. new Float:Pos[3];
  186. Pos[0] = dini_Float(string, "InterX");
  187. Pos[1] = dini_Float(string, "InterY");
  188. Pos[2] = dini_Float(string, "InterZ");
  189. if(IsPlayerInRangeOfPoint(playerid, 2.0, Pos[0], Pos[1], Pos[2]))
  190. {
  191. CasaDentro[playerid] = -1;
  192. SetPlayerInterior(playerid,0);
  193. SetPlayerPos(playerid, dini_Float(string, "CasaX"), dini_Float(string, "CasaY"), dini_Float(string, "CasaZ"));
  194. SetPlayerVirtualWorld(playerid, 0);
  195. }
  196. }
  197. return 1;
  198. }
  199.  
  200. CMD:trancarcasa(playerid)
  201. {
  202. new string[125];
  203. for(new c = 0; c < MAX_CASAS; c++)
  204. {
  205. format(string, 125, "Casas/%d.ini", c);
  206. if(dini_Exists(string))
  207. {
  208. new Float:Pos[3];
  209. Pos[0] = dini_Float(string, "CasaX");
  210. Pos[1] = dini_Float(string, "CasaY");
  211. Pos[2] = dini_Float(string, "CasaZ");
  212. if(IsPlayerInRangeOfPoint(playerid, 2.0, Pos[0], Pos[1], Pos[2]))
  213. {
  214. if(Player[playerid][pChave] == 0) return SendClientMessage(playerid, Vermelho, "Voce nao tem uma casa");
  215. if(Player[playerid][pChave] != c) return SendClientMessage(playerid, Vermelho, "Esta casa nao e sua");
  216. if(dini_Int(string, "CasaTrancada") == 1) return SendClientMessage(playerid, Vermelho, "Esta casa ja esta trancada");
  217. SendClientMessage(playerid, -1, "Voce trancou a sua casa");
  218. dini_IntSet(string, "CasaTrancada", 1);
  219. }
  220. }
  221. }
  222. return 1;
  223. }
  224.  
  225. CMD:destrancarcasa(playerid)
  226. {
  227. new string[125];
  228. for(new c = 0; c < MAX_CASAS; c++)
  229. {
  230. format(string, 125, "Casas/%d.ini", c);
  231. if(dini_Exists(string))
  232. {
  233. new Float:Pos[3];
  234. Pos[0] = dini_Float(string, "CasaX");
  235. Pos[1] = dini_Float(string, "CasaY");
  236. Pos[2] = dini_Float(string, "CasaZ");
  237. if(IsPlayerInRangeOfPoint(playerid, 2.0, Pos[0], Pos[1], Pos[2]))
  238. {
  239. if(Player[playerid][pChave] == 0) return SendClientMessage(playerid, Vermelho, "Voce nao tem uma casa");
  240. if(Player[playerid][pChave] != c) return SendClientMessage(playerid, Vermelho, "Esta casa nao e sua");
  241. if(dini_Int(string, "CasaTrancada") == 0) return SendClientMessage(playerid, Vermelho, "Esta casa ja esta destrancada");
  242. SendClientMessage(playerid, -1, "Voce destrancou a sua casa");
  243. dini_IntSet(string, "CasaTrancada", 0);
  244. }
  245. }
  246. }
  247. return 1;
  248. }
  249.  
  250. stock CarregarCasa(casaid)
  251. {
  252. new str[250], strpasta[50];
  253. format(strpasta, 50, "Casas/%d.ini", casaid);
  254. if(dini_Exists(strpasta))
  255. {
  256. if(dini_Int(strpasta, "DonoCasa") == 0)
  257. {
  258. format(str, 250, "Numero: %d\nValor: %d\nUse /comprarcasa", casaid, dini_Int(strpasta, "Valor"));
  259. pCasa[casaid][TextLabel] = Create3DTextLabel(str, -1, dini_Float(strpasta, "CasaX"), dini_Float(strpasta, "CasaY"), dini_Float(strpasta, "CasaZ"), 20.0, 0);
  260. pCasa[casaid][Pickup] = CreatePickup(1273, 1, dini_Float(strpasta, "CasaX"), dini_Float(strpasta, "CasaY"), dini_Float(strpasta, "CasaZ"));
  261. }
  262. if(dini_Int(strpasta, "DonoCasa") == 1)
  263. {
  264. format(str, 250, "Numero: %d\nProprietario: %s\nUse /entrarcasa", casaid, dini_Get(strpasta, "NomeProprietario"));
  265. pCasa[casaid][TextLabel] = Create3DTextLabel(str, -1, dini_Float(strpasta, "CasaX"), dini_Float(strpasta, "CasaY"), dini_Float(strpasta, "CasaZ"), 20.0, 0);
  266. pCasa[casaid][Pickup] = CreatePickup(19522, 1, dini_Float(strpasta, "CasaX"), dini_Float(strpasta, "CasaY"), dini_Float(strpasta, "CasaZ"));
  267. }
  268. }
  269. return 1;
  270. }
Tags: samp casa houses system house
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!