Advertisement
Guest User

Untitled

a guest
Jul 5th, 2011
191
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 5.82 KB | None | 0 0
  1. #include a_samp
  2. #include dini
  3.  
  4. #define PLANO 5
  5.  
  6. new bool:pplano[MAX_PLAYERS];
  7. new Plano[MAX_PLAYERS];
  8. new assinantes[MAX_PLAYERS];
  9. new nome[MAX_PLAYER_NAME];
  10. new str[128];
  11. new jatem;
  12. new p;
  13.  
  14. public OnFilterScriptInit()
  15. {
  16.     print("---------------------------------------");
  17.     print("Sistema de Plano de saude desenvolvido por c0ca");
  18.     print("---------------------------------------");
  19.     if(!fexist("Planos.txt")) { dini_Create("Planos.txt"); }
  20.     p = CreatePickup(1240, 1, 1176.3975,-1322.3372,14.0193, -1);
  21.     Create3DTextLabel("digite ja /plano , para adquirir seu plano de saúde! ", -1, 1176.3975,-1322.3372,14.0193, 20.0,0);
  22. }
  23.  
  24.  
  25. public OnPlayerCommandText(playerid,cmdtext[])
  26. {
  27.     if(strcmp(cmdtext,"/plano",true)==0) {
  28.         if(jatem ==  1)  return SendClientMessage(playerid,-1,"Você ja tem 1 plano, gaste-o para adquirir outro , ou /abandonar para abandonar o plano");
  29.         if(!IsPlayerInRangeOfPoint(playerid, 2.0, 1176.3975,-1322.3372,14.0193)) return SendClientMessage(playerid,-1,"Você não está no hospital,(/irplano para ir)");
  30.         ShowPlayerDialog(playerid,PLANO,DIALOG_STYLE_LIST,"Plano de saude By COCA","Plano Ouro(15 Internações Grátis - $2000)\nPlano Prata(10 Internações Grátis - $1500)\nPlano Bronze(5 Internações Grátis - $500)","Obter","Sair");
  31.         return true;
  32.     }
  33.     if(strcmp(cmdtext,"/abandonar",true)==0) {
  34.         if(Plano[playerid]< 0)return SendClientMessage(playerid,-1,"Voce não tem 1 plano para abandonar");
  35.         SendClientMessage(playerid,-1,"Voce abandonou seu plano! ");
  36.         Plano[playerid] = 0;
  37.         jatem = 0;
  38.         return true;
  39.     }
  40.     if(strcmp(cmdtext,"/irplano",true)==0) {
  41.         SetPlayerPos(playerid,1185.5848,-1322.4513,13.5714);
  42.         return true;
  43.     }
  44.     if(strcmp(cmdtext,"/internacoes",true)==0) {
  45.         new string[128];
  46.         format(string,sizeof(string),"Você possui : %d internações",Plano[playerid]);
  47.         SendClientMessage(playerid,-1,string);
  48.         return true;
  49.     }
  50.     if(strcmp(cmdtext,"/assinantes",true)==0) {
  51.         if(Plano[playerid]==0) return SendClientMessage(playerid,-1,"Você não tem um plano , não pode utilizar esse comando");
  52.         new string[128];
  53.         GetPlayerName(playerid,nome,sizeof(nome));
  54.         SendClientMessage(playerid, -1, ".Assinantes ONLINES.");
  55.         for(new i = 0; i < MAX_PLAYERS; i++) {
  56.             if(Plano[i] >0) {
  57.                 if(Plano[i]==0) continue;
  58.                 format(string, sizeof(string), "Nome : %s - Internações disponiveis %d",nome,Plano[i]);
  59.                 SendClientMessage(playerid, -1, string);
  60.             }
  61.         }
  62.         return true;
  63.     }
  64.     return false;
  65. }
  66.  
  67. //====//
  68. public OnPlayerConnect(playerid)
  69. {
  70.     GetPlayerName(playerid, nome, sizeof nome);
  71.     format(str, sizeof str, "%s", nome);
  72.     if(dini_Isset("Planos.txt", str)) { Plano[playerid] = dini_Int("Planos.txt",str); }
  73.     else { Plano[playerid] = 0; }
  74.     pplano[playerid] = false;
  75. }
  76.  
  77. public OnPlayerSpawn(playerid)
  78. {
  79.     if(Plano[playerid] > 0) {
  80.         ResetPlayerMoney(playerid);
  81.         jatem = 1;
  82.         if(pplano[playerid] == true) GivePlayerMoney(playerid, GetPVarInt(playerid, "PagoPeloPlano"));
  83.         pplano[playerid] = false;
  84.     }
  85.     return 1;
  86. }
  87.  
  88.  
  89. public OnPlayerDisconnect(playerid,reason)
  90. {
  91.  
  92.     GetPlayerName(playerid, nome, sizeof nome);
  93.     format(str, sizeof str, "%s", nome);
  94.     dini_IntSet("Planos.txt", str, Plano[playerid]);
  95.     return true;
  96. }
  97.  
  98.  
  99. public OnPlayerDeath(playerid,killerid,reason)
  100. {
  101.     new _Str[128];
  102.     if(Plano[playerid]==0) {
  103.         assinantes[playerid]--;
  104.         jatem = 0;
  105.     }
  106.     if(Plano[playerid]>0) {
  107.         Plano[playerid]--;
  108.         format(_Str,sizeof(_Str),"[HOSPITAL] Você morreu e suas depesas foram pagas pelo seu plano de saude , agora você possui %d internações restantes.",Plano[playerid]);
  109.         SendClientMessage(playerid,-1,_Str);
  110.         pplano[playerid] = true;
  111.         SetPVarInt(playerid, "PagoPeloPlano", GetPlayerMoney(playerid));
  112.     }
  113.     return true;
  114. }
  115.  
  116.  
  117. //====//
  118. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  119. {
  120.     new _Str[128];
  121.     if(dialogid == 5) {
  122.         if(response) {
  123.             if(listitem == 0) {
  124.                 if(GetPlayerMoney(playerid)<1500)return SendClientMessage(playerid,-1,"[ERRO]:Você não possui $1.500");
  125.                 Plano[playerid]+=15;
  126.                 format(_Str,sizeof(_Str),"[HOSPITAL] Você obteve o Plano de saúde Ouro. Você agora possui %d internações gratis.",Plano[playerid]);
  127.                 SendClientMessage(playerid,-1,_Str);
  128.                 GivePlayerMoney(playerid,-2000);
  129.                 assinantes[playerid]++;
  130.                 jatem = 1;
  131.                 return 1;
  132.             }
  133.             else if(listitem == 1) {
  134.                 if(GetPlayerMoney(playerid)<1000)return SendClientMessage(playerid,-1,"[ERRO]:Você não possui $1.000");
  135.                 Plano[playerid]+=10;
  136.                 format(_Str,sizeof(_Str),"[HOSPITAL] Você obteve o Plano de saúde Prata. Você agora possui %d internações gratis.",Plano[playerid]);
  137.                 SendClientMessage(playerid,-1,_Str);
  138.                 GivePlayerMoney(playerid,-1500);
  139.                 assinantes[playerid]++;
  140.                 jatem = 1;
  141.                 return 1;
  142.             }
  143.             else if(listitem == 2) {
  144.                 if(GetPlayerMoney(playerid)<500)return SendClientMessage(playerid,-1,"[ERRO]:Você não possui $500");
  145.                 Plano[playerid]+=5;
  146.                 format(_Str,sizeof(_Str),"[HOSPITAL] Você obteve o Plano de saúde Bronze. Você agora possui %d internações gratis.",Plano[playerid]);
  147.                 SendClientMessage(playerid,-1,_Str);
  148.                 GivePlayerMoney(playerid,-500);
  149.                 assinantes[playerid]++;
  150.                 jatem = 1;
  151.             }
  152.         }
  153.     }
  154.     return true;
  155. }
  156.  
  157.  
  158. #pragma unused p
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement