Advertisement
Guest User

By:Don_Speed

a guest
Feb 23rd, 2012
235
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.61 KB | None | 0 0
  1. /*
  2. ____ _____ __
  3. / __ \____ ____ / ___/____ ___ ___ ____/ /
  4. / / / / __ \/ __ \ \__ \/ __ \/ _ \/ _ \/ __ /
  5. / /_/ / /_/ / / / / ___/ / /_/ / __/ __/ /_/ /
  6. _____/\____/_/ /_/____/____/ .___/\___/\___/\__,_/
  7. /_____/ /_/
  8. Systen Hospital v0.1a
  9. Nao Retire os Creditos
  10.  
  11. */
  12. #include <a_samp>
  13. #include <zcmd>
  14.  
  15. #define COLORA 0x00D90066
  16.  
  17. new Hospital[MAX_PLAYERS];
  18.  
  19. public OnFilterScriptInit()
  20. {
  21. print("\n Systen Hospital v0.1a");
  22. print(" Criado por Don_Speed\n");
  23. return 1;
  24. }
  25.  
  26. public OnFilterScriptExit()
  27. {
  28. return 1;
  29. }
  30. main()
  31. {
  32. print("\n Sistema Hospital (Planos)");
  33. print(" Criado por Don_Speed\n");
  34. }
  35. public OnPlayerConnect(playerid)
  36. {
  37. Hospital[playerid] = 0;
  38. SendClientMessage(playerid, 0x00D90066, "Este Servidor Tem o Systen Hospital v0.1a");
  39. return 1;
  40. }
  41. public OnPlayerDeath(playerid, killerid, reason)
  42. {
  43. Hospital[playerid] = 1;
  44. for(new i = 0; i < MAX_PLAYERS; i++)
  45. {
  46. if(Hospital[i] > 0 && Hospital[i] < 1)
  47. {
  48. SendClientMessage(i, 0x00D90066, "[Systen Hospital v0.1a] Voce Tem Plano e Nao Pagara R$ 500,00");
  49. Hospital[i] = 1;
  50. Hospital[i] --;
  51. }
  52. else if(Hospital[i] == 0 && Hospital[i] < 1)
  53. {
  54. SendClientMessage(i, 0x00D90066, "[Systen Hospital v0.1a] Voce Nao Tem Plano e Tera Que Pagar R$ 500,00");
  55. Hospital[i] = 1;
  56. TogglePlayerControllable(i, false);
  57. SetTimerEx("Descongelar", 3000, false, "i", i);
  58. GivePlayerMoney(i, -500);
  59. }
  60. }
  61. return 1;
  62. }
  63. public OnPlayerSpawn(playerid)
  64. {
  65. if(Hospital[playerid] == 1)
  66. {
  67. SetPlayerPos(playerid, 1087.406616,1570.500000,7.658649);//Provisorio TRoque Para a Cordenada
  68. //Se Quizer Pode Colocar Para Congelar o Player e Depois Descongelar
  69. SetTimerEx("Curando", 5000, false, "i", playerid);
  70. GameTextForPlayer(playerid, "~r~Curando...", 5000, 5);
  71. SendClientMessage(playerid, 0xFF3030FF,"[Systen Hospital v0.1a] Você está sendo curado.");
  72. }
  73. return 1;
  74. }
  75. forward Curando(playerid);
  76. public Curando(playerid)
  77. {
  78. Hospital[playerid] = 0;
  79. SetPlayerPos(playerid, 1087.406616,1570.500000,7.658649);//Provisorio Troque Para a Coordenada Que Quizer
  80. GivePlayerMoney(playerid, -200);
  81. SendClientMessage(playerid, 0xFF3030FF,"[Systen Hospital v0.1a] Medico Te Curou , preço: 200");
  82. SpawnPlayer(playerid);
  83. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement