Guest User

Untitled

a guest
Mar 29th, 2017
172
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.38 KB | None | 0 0
  1. //AUTOR: ADIKOO1302
  2. #include <a_samp>
  3. #include <sscanf2>
  4. #include <kolory>
  5. #include <zcmd>
  6.  
  7. #define D_WARPLIST 543
  8.  
  9. new Float:WarpPos[][] =
  10. {
  11. {-2309.1504,-1629.1630,483.7366},//WARP ID 0
  12. {984.5064,2030.0667,11.4688} //WARP ID 1 ect.
  13. };
  14.  
  15. CMD:warp(playerid, params[])
  16. {
  17. //Tutaj powinno być if czy player to admin, ale większość ma inne zmienne ;)
  18. new warpnumber, string[100];
  19. if(sscanf(params, "d", warpnumber))
  20. SendClientMessage(playerid, COLOR_RED, "UZYJ: /warp [NR WARPU]");
  21. else
  22. {
  23. if(warpnumber <= sizeof(WarpPos))
  24. {
  25. SetPlayerPos(playerid, WarpPos[warpnumber][0], WarpPos[warpnumber][1], WarpPos[warpnumber][2]);
  26. format(string, sizeof(string), "Przeniesiono na warp {e24444}>ID: %d<", warpnumber);
  27. SendClientMessage(playerid, COLOR_GREEN, string);
  28. }
  29. else
  30. {
  31. format(string, sizeof(string), "{44e2e2}Wrap o {e24444}>ID: %d<{44e2e2} nie istnieje !", warpnumber);
  32. SendClientMessage(playerid, COLOR_RED, string);
  33. }
  34. }
  35. return 1;
  36. }
  37.  
  38. CMD:warpy(playerid, params[])
  39. {
  40. new stringwarplist[][] =
  41. {
  42. "0 - Gora Chillad\n", // tu sobie sami wpiszcie nazwy poszczegolnych id warpow
  43. "1 - Domek"
  44.  
  45. };
  46. new longstring[1500];
  47. for(new i; i < sizeof stringwarplist; i++) strcat(longstring, stringwarplist[i][0]);
  48. ShowPlayerDialog(playerid, D_WARPLIST, DIALOG_STYLE_MSGBOX, "Warpy serwera !", longstring, "OK", #);
  49. return 1;
  50. }
Advertisement
Add Comment
Please, Sign In to add comment