SHARE
TWEET

Comando /cia

BR_Gustavo May 11th, 2020 1,563 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. DDCMD:cia(DCC_Channel:channel,DCC_User:userid,params[])
  2. {
  3.     if(GetDiscordUserLevel(userid,channel,"Honored Staff"))
  4.     {
  5.         new MsgFormat[120],AtualizarDb[120],AtualizarSql[120];
  6.         mysql_query(MysqlDb,"SELECT * FROM dmcontas A INNER JOIN contas B ON (A.Nome=B.Nome) AND (B.Level='0' AND B.Vip='0')",true);
  7.         if(cache_num_rows() >=1)
  8.         {
  9.             new Conta[30],Dia,Mes,Ano,IDCasa,IDBiz,IDCarro[8];
  10.             for(new i=0; i<cache_num_rows(); i++)
  11.             {
  12.                 cache_get_value_int(i,"CtDia",Dia);
  13.                 cache_get_value_int(i,"CtMes",Mes);
  14.                 cache_get_value_int(i,"CtAno",Ano);
  15.                 cache_get_value(i,"Nome",Conta,30);
  16.                 cache_get_value_int(i,"Casa",IDCasa);
  17.                 cache_get_value_int(i,"Biz",IDBiz);
  18.  
  19.                 if(VerificarInativo(Dia,Mes,Ano) == 0)
  20.                 {
  21.                     if(IDCasa != 0)
  22.                     {
  23.                         DestroyDynamicPickup(CasaInfo[IDCasa][Casa_Pickup]);
  24.                         DestroyDynamicMapIcon(CasaInfo[IDCasa][Casa_Icone]);
  25.                         format(CasaInfo[IDCasa][Casa_Dono],100,"Not Owned");
  26.  
  27.                         CasaInfo[IDCasa][Casa_Pickup] = CreateDynamicPickup(1273,1,CasaInfo[IDCasa][Casa_X],CasaInfo[IDCasa][Casa_Y],CasaInfo[IDCasa][Casa_Z],\
  28.                         0,CasaInfo[IDCasa][Casa_Interior]);
  29.                         CasaInfo[IDCasa][Casa_Icone] = CreateDynamicMapIcon(CasaInfo[IDCasa][Casa_X],CasaInfo[IDCasa][Casa_Y],CasaInfo[IDCasa][Casa_Z],31,0xFFFF00AA,\
  30.                         0,CasaInfo[IDCasa][Casa_Interior]);
  31.                         UpdateDynamic3DTextLabelText(CasaInfo[IDCasa][Casa_Label],0x00FF00FF,"Not Owned");
  32.                     }
  33.                     if(IDBiz != 0)
  34.                     {
  35.                         EmpresaInfo[IDBiz][Empresa_Lucro] = 0;
  36.  
  37.                         format(EmpresaInfo[IDBiz][Empresa_Dono],100,"Not Owned");
  38.                         DestroyDynamicPickup(EmpresaInfo[IDBiz][Empresa_Pickup]);
  39.                         DestroyDynamicMapIcon(EmpresaInfo[IDBiz][Empresa_Icone]);
  40.  
  41.                         UpdateDynamic3DTextLabelText(EmpresaInfo[IDBiz][Empresa_Label],Verde,EmpresaInfo[IDBiz][Empresa_Dono]);
  42.                         EmpresaInfo[IDBiz][Empresa_Pickup] = CreateDynamicPickup(1274,24,EmpresaInfo[IDBiz][Empresa_X],EmpresaInfo[IDBiz][Empresa_Y],EmpresaInfo[IDBiz][Empresa_Z],\
  43.                         0,EmpresaInfo[IDBiz][Empresa_Interior]);
  44.                         EmpresaInfo[IDBiz][Empresa_Icone] = CreateDynamicMapIcon(EmpresaInfo[IDBiz][Empresa_X],EmpresaInfo[IDBiz][Empresa_Y],EmpresaInfo[IDBiz][Empresa_Z],52,0xFFFF00AA,\
  45.                         0,EmpresaInfo[IDBiz][Empresa_Interior]);
  46.  
  47.                     }
  48.                     cache_get_value_int(i,"C1",IDCarro[0]); ServidorVenderCarro(IDCarro[0]);
  49.                     cache_get_value_int(i,"C2",IDCarro[1]); ServidorVenderCarro(IDCarro[1]);
  50.                     cache_get_value_int(i,"C3",IDCarro[2]); ServidorVenderCarro(IDCarro[2]);
  51.                     cache_get_value_int(i,"C4",IDCarro[3]); ServidorVenderCarro(IDCarro[3]);
  52.                     cache_get_value_int(i,"C5",IDCarro[4]); ServidorVenderCarro(IDCarro[4]);
  53.                     cache_get_value_int(i,"C6",IDCarro[5]); ServidorVenderCarro(IDCarro[5]);
  54.                     cache_get_value_int(i,"C7",IDCarro[6]); ServidorVenderCarro(IDCarro[6]);
  55.                     cache_get_value_int(i,"C8",IDCarro[7]); ServidorVenderCarro(IDCarro[7]);
  56.  
  57.                     format(AtualizarDb,120,"DELETE FROM `contas` WHERE `Nome`='%s';",Conta);
  58.                     mysql_query(MysqlDb,AtualizarDb,false);
  59.  
  60.                     format(AtualizarSql,120,"DELETE FROM `dmcontas` WHERE `Nome`='%s';",Conta);
  61.                     mysql_query(MysqlDb,AtualizarSql,false);
  62.  
  63.                     format(AtualizarDb,120,"DELETE FROM `zscontas` WHERE `Nome`='%s';",Conta);
  64.                     mysql_query(MysqlDb,AtualizarDb,false);
  65.  
  66.                     format(AtualizarSql,120,"DELETE FROM `membros` WHERE `Nome`='%s';",Conta);
  67.                     mysql_query(MysqlDb,AtualizarSql,false);
  68.  
  69.                     format(AtualizarDb,120,"UPDATE `casas` SET `Dono` = 'Not Owned',`Trancada` = '0' WHERE `ID` = '%d';",IDCasa);
  70.                     mysql_query(MysqlDb,AtualizarDb,false);
  71.  
  72.                     format(AtualizarSql,120,"UPDATE `empresas` SET `Dono` = 'Not Owned' WHERE `ID` = '%d';",IDBiz);
  73.                     mysql_query(MysqlDb,AtualizarSql,false);
  74.  
  75.                     format(AtualizarDb,120,"UPDATE `carros` SET `Dono` = 'Not Owned',`Trancado` = '0',`Slot` = '0' WHERE `Nome` = '%s';",Conta);
  76.                     mysql_query(MysqlDb,AtualizarDb,false);
  77.  
  78.                     format(MsgFormat,120,"Account inactive %s removed successfully",Conta);
  79.                     DCC_SendChannelMensagem(channel,MsgFormat);
  80.                 }
  81.             }
  82.         }else DCC_SendChannelMensagem(channel,"ERROR: There are no inactive accounts");
  83.     }else DCC_SendChannelMensagem(channel,"ERROR: You do not have enough level of admin to execute this command.");
  84.     return 1;
  85. }
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Top