Advertisement
Guest User

Untitled

a guest
Feb 25th, 2018
313
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.73 KB | None | 0 0
  1. #include < a_samp >
  2. #include < YSI\y_commands >
  3. #include < sscanf2 >
  4.  
  5. #define DIALOG_PRIHVATIPORT 700
  6.  
  7. new PrihvataTeleport[ MAX_PLAYERS ];
  8.  
  9. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[]) {
  10.  
  11. if(dialogid == DIALOG_PRIHVATIPORT) {
  12. if(response) {
  13. new Float:X,Float:Y,Float:Z,Float:A;
  14. GetPlayerPos(playerid, X,Y,Z);
  15. GetPlayerFacingAngle(playerid, A);
  16. if(GetPlayerState(PrihvataTeleport[ playerid ]) == PLAYER_STATE_ONFOOT) { SetPlayerPos(PrihvataTeleport[ playerid ], X+1,Y+1,Z); }
  17. else if(GetPlayerState(PrihvataTeleport[ playerid ]) == PLAYER_STATE_DRIVER) { SetVehiclePos(GetPlayerVehicleID(PrihvataTeleport[ playerid ]), X+1,Y+1,Z); }
  18. PrihvataTeleport[ playerid ] = -1;
  19. }
  20. else {
  21. SendClientMessage(PrihvataTeleport[ playerid ], -1, "Zahtev za teleport je odbijen.");
  22. PrihvataTeleport[ playerid ] = -1;
  23. }
  24. }
  25. return 1;
  26. }
  27.  
  28. YCMD:goto(playerid, params[], help) {
  29.  
  30. #pragma unused help
  31. // Dodaj neku proveru igracu da li je npr promoter
  32. new id, str[ 50 ], pname[ MAX_PLAYER_NAME ];
  33. if(sscanf(params, "u", id)) return SendClientMessage(playerid, -1, "/goto [ID]");
  34. if(playerid == id) return SendClientMessage(playerid, -1, "Ne mozete se teleport do samog sebe.");
  35. if(!IsPlayerConnected(id)) return SendClientMessage(playerid, -1, "Taj igrac nije na serveru.");
  36. PrihvataTeleport[ id ] = playerid;
  37. GetPlayerName(playerid, pname, sizeof(pname));
  38. format(str, sizeof(str), "Igrac %s zeli da se teleporta do vas.", pname);
  39. ShowPlayerDialog(playerid, DIALOG_PRIHVATIPORT, DIALOG_STYLE_MSGBOX, "Teleport",str,"Prihvati","Odbij");
  40. SendClientMessage(playerid, -1, "Poslali ste igracu zahtev za teleport.");
  41. return 1;
  42. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement