RenasD

/pagydyti V_P suma

Apr 26th, 2013
99
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 0.82 KB | None | 0 0
  1. CMD:pagydyti(playerid,params[])
  2. {
  3. new id;
  4. new money;
  5. if(sscanf(params,"ru",id,money)) return SendClientMessage(playerid,1,"Naudojimas - /pagydyti V_P kaina ");
  6. if(IsPlayerConnected(id)) return SendClientMessage(playerid,1,"Tokio žaidėjo nėra !");
  7. new zinute[150];
  8. ShowPlayerDialog(id,1,DIALOG_STYLE_MSGBOX,"Jus nori pagydyti daktaras !",zinute,"Uzdaryti","");
  9.  
  10.  
  11. return 1;
  12.  
  13. }
  14.  
  15. // OnDialogResponse
  16.  
  17. if(dialogid==1)
  18. {
  19. if(response)
  20. {
  21. GetPlayerMoney(id,-money);
  22. GetPlayerMoney(playerid,money);
  23. SetPlayerHealth(id,100);
  24. SendClientMessage(playerid,1,"Zaidejas buvo sekmingai pagydytas!");
  25. SendClientMessage(id,1,"Jumis pagydė medikas");
  26. }
  27. if(!response)
  28. {
  29. SendClientMessage(playerid,1,"Žaidėjas atšaukė pasiūlyma.");
  30. SendClientMessage(id,1,"Atšaukėte pasiūlyma!");
  31. }
  32. // } - if you need.
  33. return 1;
  34. }
Advertisement
Add Comment
Please, Sign In to add comment