Bicas

Car system pradžia :)

Jun 20th, 2014
845
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 2.59 KB | None | 0 0
  1. /*
  2.  
  3.                     Mašinų sistemos pradžia
  4.                            MySQL R5/6
  5.                          Y_CMD
  6.                     (c) Bičas - 2014-06-20
  7.  
  8. */
  9.  
  10. #include <a_samp>
  11. #include <a_mysql>
  12. #include <YSI\y_commands>
  13.  
  14. enum pINFO
  15. {
  16.     Car
  17. }
  18.  
  19. enum cINFO
  20. {
  21.     Savininkas[MAX_PLAYER_NAME],
  22.     Modelis,
  23.     Spalva1,
  24.     Spalva2,
  25.     Float:PosX,
  26.     Float:PosY,
  27.     Float:PosZ,
  28.     Float:PosA
  29. }
  30.  
  31. new
  32.     pInfo[MAX_PLAYERS][pINFO],
  33.     cInfo[MAX_PLAYERS][cINFO]
  34. ;
  35.  
  36. public OnPlayerConnect(playerid)
  37. {
  38.     LoadVehicle(playerid);
  39.     return true;
  40. }
  41.  
  42. public OnPlayerDisconnect(playerid)
  43. {
  44.     SaveVehicle(playerid);
  45.     return true;
  46. }
  47.  
  48. stock GetPlayerNameA(playerid) // By bičas
  49. {
  50.     new
  51.         Name[MAX_PLAYER_NAME]
  52.     ;
  53.     GetPlayerName(playerid, Name);
  54.     return Name;
  55. }
  56.  
  57. stock SaveVehicle(playerid)
  58. {
  59.     new
  60.         Query[128],
  61.         pos[4]
  62.     ;
  63.     GetVehiclePos(pInfo[playerid][Car], pos[0], pos[1], pos[2]);
  64.     GetVehicleZAngle(pInfo[playerid][Car], pos[3]);
  65.     format(Query, sizeof(Query), "UPDATE `masinos` SET Modelis = '%d', Spalva1 = '%d', Spalva2 = '%d', X = '%f', Y = '%f', Z = '%f', A = '%f' WHERE Savininkas = '%s'",
  66.     cInfo[playerid][Modelis], cInfo[playerid][Spalva1], cInfo[playerid][spalva2], pos[0], pos[1], pos[2], pos[3], GetPlayerNameA(playerid));
  67.     mysql_query(Query);
  68. }
  69.  
  70. stock LoadVehicle(playerid)
  71. {
  72.     new
  73.         Query[128],
  74.         Fetch[64]
  75.     ;
  76.     format(Query, sizeof(Query), "SELECT * FROM `masinos` WHERE Savininkas = '%s' LIMIT 1", GetPlayerNameA(playerid));
  77.     mysql_query(Query);
  78.     mysql_store_result();
  79.     mysql_retrieve_row();
  80.     mysql_fetch_field_row(cInfo[playerid][Savininkas], "Savininkas");
  81.     mysql_fetch_field_row(fetch, "Modelis"); cInfo[playerid][Modelis] = strval(fetch);
  82.     mysql_fetch_field_row(fetch, "Spalva1"); cInfo[playerid][Spalva1] = strval(fetch);
  83.     mysql_fetch_field_row(fetch, "Spalva2"); cInfo[playerid][Spalva2] = strval(fetch);
  84.     mysql_fetch_field_row(fetch, "X"); cInfo[playerid][PosX] = strval(fetch);
  85.     mysql_fetch_field_row(fetch, "Y"); cInfo[playerid][PosY] = strval(fetch);
  86.     mysql_fetch_field_row(fetch, "Z"); cInfo[playerid][PosZ] = strval(fetch);
  87.     mysql_fetch_field_row(fetch, "A"); cInfo[playerid][PosA] = strval(fetch);
  88.     pInfo[playerid][Car] = CreateVehicle(cInfo[playerid][Modelis], cInfo[playerid][PosX], cInfo[playerid][PosY], cInfo[playerid][PosZ], cInfo[playerid][PosA], cInfo[playerid][Spalva1], cInfo[playerid][Spalva2], -1);
  89.     mysql_free_result();
  90. }
  91.  
  92. CMD:buycar(playerid, params[])
  93. {
  94.     #pragma unused params
  95.     new
  96.         Query[128]
  97.     ;
  98.     format(Query, sizeof(Query), "INSERT INTO `masinos` (Savininkas, Modelis, Spalva1, Spalva2) VALUES ('%s', '%d', '%d', '%d')", GetPlayerNameA(playerid), 411, 0, 0);
  99.     LoadVehicle(playerid);
  100.     return true;
  101. }
Advertisement
Add Comment
Please, Sign In to add comment