Advertisement
Guest User

Untitled

a guest
Jun 15th, 2014
133
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #include <a_samp>
  2. #define COLOR_RED 0xFF0000FF
  3. public OnPlayerCommandText(playerid, cmdtext[])
  4. {
  5. if (strcmp("/doplnky", cmdtext, true, 40) == 0)
  6. {
  7. ShowPlayerDialog(playerid, 100, DIALOG_STYLE_LIST, "{ff0000}Doplnky By {47FF00}Petr2000","{47FF00}HP{ff0000}(1000$)\n{47FF00}Armour{ff0000}(1000$)\n{47FF00}Kit1{ff0000}(10000$)\n{47FF00}Kit2{ff0000}(100000$)\n{47FF00}Odebrat Zbraně{ff0000}(ZDARMA)","Zvolit","Zavřít");
  8. return 1;
  9. }
  10. if (strcmp("/credits", cmdtext, true, 10) == 0)
  11. {
  12. ShowPlayerDialog(playerid, 101, DIALOG_STYLE_MSGBOX, "{ff0000}Něco o {47FF00}Módu","{FF0000}Script {FFFFFF}vytvořil {00FF07}Petr2000\n{FF0000}Verze Módu:{00FF07} 1.0\nRozhodně se bude tento Script vyvíjet{FF0000} Dál","Zvolit","Zavřít");
  13. return 1;
  14. }
  15. if (strcmp("/dhelp", cmdtext, true, 10) == 0)
  16. {
  17. ShowPlayerDialog(playerid, 101, DIALOG_STYLE_MSGBOX, "{ff0000}Doplnky By {47FF00}Petr2000","{FF0000}/credits{FFFFFF} = {00FF07}Něco o Módu\n{FF0000}/doplnky{FFFFFF} = {00FF07}Tabulka s doplňkama","Zvolit","Zavřít");
  18. return 1;
  19. }
  20. return 0;
  21. }
  22. public OnPlayerConnect(playerid)
  23. {
  24. SendClientMessage(playerid, COLOR_RED, "[ ! ]{FFFFFF}Na serveru se nacházejí Doplnky By {00FF07}Petr2000!{FFFFFF} Příkaz {ff0000}/dhelp");
  25. return 1;
  26. }
  27. public OnDialogResponse (playerid, dialogid, response, listitem, inputtext [])
  28. {
  29. switch (dialogid)
  30. {
  31. case 100:
  32. {
  33. if (response)
  34. {
  35. switch (listitem)
  36. {
  37. case 0: SetPlayerHealth(playerid, 100), SendClientMessage(playerid, COLOR_RED, "[ ! ]{FFFFFF}Doplnil sis HP!{47FF00}(-1000$)"), GivePlayerMoney(playerid, -1000);
  38. case 1: SetPlayerArmour(playerid, 100), SendClientMessage(playerid, COLOR_RED, "[ ! ]{FFFFFF}Doplnil sis Armour!{47FF00}(-1000$)"), GivePlayerMoney(playerid, -1000);
  39. case 2: GivePlayerWeapon(playerid, 26, 9999), GivePlayerWeapon(playerid, 31, 9999), GivePlayerWeapon(playerid, 35, 5), SendClientMessage(playerid, COLOR_RED, "[ ! ]{FFFFFF}Koupil sis Kit1!{47FF00}(-10000$)"), GivePlayerMoney(playerid, -10000);
  40. case 3: GivePlayerWeapon(playerid, 35, 9999), SendClientMessage(playerid, COLOR_RED, "[ ! ]{FFFFFF}Koupil sis Kit2!{47FF00}(-100000$)"), GivePlayerMoney(playerid, -100000), GivePlayerWeapon(playerid, 30, 9999), GivePlayerWeapon(playerid, 31, 9999), GivePlayerWeapon(playerid, 26, 9999);
  41. case 4: ResetPlayerWeapons(playerid), SendClientMessage(playerid, COLOR_RED, "[ ! ]{FFFFFF}Odebral sis Zbraně!{47FF00}(ZDARMA)");
  42. }
  43. }
  44. }
  45. }
  46. return true;
  47. }
  48. public OnFilterScriptInit()
  49. {
  50. print("\n-------------------------------");
  51. print(" Doplnky By Petr2000 Je nacteny!!");
  52. print("-------------------------------\n");
  53. return 1;
  54. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement