dPlaYer_

dBankS. credits: dPlayer / synchr0

Jul 7th, 2012
613
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 11.22 KB | None | 0 0
  1. //Criado por dPlaYer_ ajuda de Syncrh0
  2. // Não esqueça de criar pasta : " Banco " nas scriptfiles do seu servidor.
  3. #include        <a_samp>
  4. #include        <DOF2>
  5. #include                <zcmd>
  6.  
  7. #define DIALOGID        900
  8. #define DIALOGID1       901
  9. #define DIALOGV         902
  10. #define DIALOGID2       903
  11. #define DIALOGID3       904
  12. #define DIALOGID4       905
  13. #define DIALOGID5       906
  14. #define DIALOGID6       907
  15.  
  16. #define DIRETORIOB  "Banco/%s.ini"
  17.  
  18. #define VERMELHO    0xFF0000AA
  19.  
  20. new bool:LogadoB[MAX_PLAYERS], bool:SenhaB[MAX_PLAYERS];
  21.  
  22. public OnFilterScriptInit()
  23. {
  24.     return 1;
  25. }
  26.  
  27. public OnFilterScriptExit()
  28. {
  29.     DOF2_Exit();
  30.     return 1;
  31. }
  32.  
  33. public OnPlayerConnect(playerid)
  34. {
  35.     LogadoB[playerid] = false;
  36.     return 1;
  37. }
  38.  
  39. public OnPlayerDisconnect(playerid)
  40. {
  41.     LogadoB[playerid] = false;
  42.     return 1;
  43. }
  44.  
  45. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  46. {
  47.     new banco[190], extrato[200], ano, mes, dia, hora, minuto, segundo;
  48.     format(banco, sizeof(banco), DIRETORIOB, nome(playerid));
  49.     if(dialogid == DIALOGID2)
  50.     {
  51.         if(response)
  52.         {
  53.             new dinheiro = strval(inputtext);
  54.             if(!DOF2_FileExists(banco)) return SendClientMessage(playerid, VERMELHO, "[ dBank ] Você ainda não tem uma conta bancária.");
  55.             if(!LogadoB[playerid]) return SendClientMessage(playerid, VERMELHO, "[ dBank ] Você precisa logar em sua conta bancária.");
  56.             if(GetPlayerMoney(playerid) < dinheiro || dinheiro <= 0) return SendClientMessage(playerid, VERMELHO, "[ dBank ] Quantia Inválida.");
  57.             if(dinheiro > 10000000) return SendClientMessage(playerid, VERMELHO, "[ dBank ] Você só pode depositar no máximo até 10 milhões!");
  58.             GivePlayerMoney(playerid, -dinheiro);
  59.             new quantidade = DOF2_GetInt(banco, "Saldo");
  60.             DOF2_SetInt(banco, "Saldo", quantidade + dinheiro);
  61.             getdate(ano, mes, dia);
  62.             gettime(hora, minuto, segundo);
  63.             new saldo = DOF2_GetInt(banco, "Saldo");
  64.             format(extrato, sizeof(extrato), "dBank System - Contas Bancárias\n -- Extrato Bancário --\nNome do Usuário: %s\nSaldo Atual: %dR$\nHora: %d:%d:%d\nData: %d/%d/%d", nome(playerid), saldo, hora, minuto, segundo, dia, mes, ano);
  65.             ShowPlayerDialog(playerid, 200, DIALOG_STYLE_MSGBOX, "dBank System - 24/7", extrato, "Fechar", "");
  66.         }
  67.     }
  68.     else if(dialogid == DIALOGID3)
  69.     {
  70.         if(response)
  71.         {
  72.             new dinheiro = strval(inputtext);
  73.             if(!DOF2_FileExists(banco)) return SendClientMessage(playerid, VERMELHO, "[ dBank ] Você ainda não tem uma conta bancária.");
  74.             if(!LogadoB[playerid]) return SendClientMessage(playerid, VERMELHO, "[ dBank ] Você precisa logar em sua conta bancária.");
  75.             if(strfind(inputtext, "-", true) != -1) return SendClientMessage(playerid, VERMELHO ,"[ dBank ] Valor invalido.");
  76.             new saldo = DOF2_GetInt(banco, "Saldo");
  77.             if(saldo < dinheiro || dinheiro <= 0) return SendClientMessage(playerid, VERMELHO, "[ dBank ] Quantia Inválida.");
  78.             GivePlayerMoney(playerid, dinheiro);
  79.             new quantidade = DOF2_GetInt(banco, "Saldo");
  80.             DOF2_SetInt(banco, "Saldo", quantidade - dinheiro);
  81.             getdate(ano, mes, dia);
  82.             gettime(hora, minuto, segundo);
  83.             format(extrato, sizeof(extrato), "dBank System - Contas Bancárias\n -- Extrato Bancário --\nNome do Usuário: %s\nSaldo Atual: %dR$\nHora: %d:%d:%d\nData: %d/%d/%d", nome(playerid), quantidade, hora, minuto, segundo, dia, mes, ano);
  84.             DOF2_SaveFile();
  85.             ShowPlayerDialog(playerid, 200, DIALOG_STYLE_MSGBOX, "dBank System - 24/7", extrato, "Fechar", "");
  86.         }
  87.     }
  88.     else if(dialogid == DIALOGID5)
  89.     {
  90.         if(response)
  91.         {
  92.             getdate(ano, mes, dia);
  93.             gettime(hora, minuto, segundo);
  94.             new saldo = DOF2_GetInt(banco, "Saldo");
  95.             format(extrato, sizeof(extrato), "dBank System - Contas Bancárias\n -- Extrato Bancário --\nNome do Usuário: %s\nSaldo Atual: %dR$\nHora: %d:%d:%d\nData: %d/%d/%d", nome(playerid), saldo, hora, minuto, segundo, dia, mes, ano);
  96.             ShowPlayerDialog(playerid, 200, DIALOG_STYLE_MSGBOX, "dBank System - 24/7", extrato, "Fechar", "");
  97.         }
  98.         else
  99.         {
  100.             format(banco, sizeof(banco), "dBank System - Contas Bancárias\n -- Transação Bancária --\n\nSeu Usuário: %s\n\nQual transação você deseja realizar:", nome(playerid));
  101.             ShowPlayerDialog(playerid, DIALOGID6, DIALOG_STYLE_MSGBOX, "dBank System - 24/7", banco, "Depositar", "Sacar");
  102.         }
  103.     }
  104.     else if(dialogid == DIALOGID6)
  105.     {
  106.         if(response)
  107.         {
  108.             format(banco, sizeof(banco), "dBank System - Contas Bancárias\n -- Deposito Bancário --\n\nSeu Usuário: %s\n\nInsira a quantia que deseja depositar:", nome(playerid));
  109.             ShowPlayerDialog(playerid, DIALOGID2, DIALOG_STYLE_INPUT, "dBank System - 24/7", banco, "Depositar", "Cancelar");
  110.         }
  111.         else
  112.         {
  113.             format(banco, sizeof(banco), "dBank System - Contas Bancárias\n -- Saque Bancário --\n\nSeu Usuário: %s\n\nInsira a quantia que deseja sacar:", nome(playerid));
  114.             ShowPlayerDialog(playerid, DIALOGID3, DIALOG_STYLE_INPUT, "dBank System - 24/7", banco, "Sacar", "Cancelar");
  115.         }
  116.     }
  117.     else if(dialogid == DIALOGID4)
  118.     {
  119.         if(response)
  120.         {
  121.             if(strlen(inputtext))
  122.             {
  123.                 DOF2_CreateFile(banco);
  124.                 DOF2_SetString(banco, "Senha", inputtext);
  125.                 DOF2_SetInt(banco, "Saldo", 0);
  126.                 format(banco, sizeof(banco), "[ dBank ] Sua conta bancária foi criada com sucesso! - Senha : %s", inputtext);
  127.                 SendClientMessage(playerid, -1, banco);
  128.                 PlayerPlaySound(playerid, 1057, 0.0, 0.0, 10.0);
  129.                 LogadoB[playerid] = true;
  130.                 DOF2_SaveFile();
  131.             }
  132.             else
  133.             {
  134.                 format(banco, sizeof(banco), "Não deixe o campo Em Branco!\n\nSeu Usuário: %s\n\nInsira uma senha para prosseguir:", nome(playerid));
  135.                 ShowPlayerDialog(playerid, DIALOGV, DIALOG_STYLE_INPUT, "dBank System - 24/7", banco, "Criar", "Cancelar");
  136.             }
  137.         }
  138.     }
  139.     else if(dialogid == DIALOGID)
  140.     {
  141.         if(response)
  142.         {
  143.             if(strlen(inputtext))
  144.             {
  145.                 new acesso[150];
  146.                 acesso = DOF2_GetString(banco, "Senha");
  147.                 if(strcmp(inputtext, acesso, true) == 0)
  148.                 {
  149.                     SendClientMessage(playerid, -1, "[ dBank ] Sua conta bancária foi carregada com sucesso!");
  150.                     PlayerPlaySound(playerid, 1057, 0.0, 0.0, 10.0);
  151.                     LogadoB[playerid] = true;
  152.                     if(SenhaB[playerid] == true)
  153.                     {
  154.                         format(banco, sizeof(banco), "Seu Usuário: %s\n\nInsira sua nova senha bancária:", nome(playerid));
  155.                         ShowPlayerDialog(playerid, DIALOGID1, DIALOG_STYLE_INPUT, "Conta", banco, "Confirmar", "Cancelar");
  156.                         SenhaB[playerid] = false;
  157.                     }
  158.                 }
  159.                 else
  160.                 {
  161.                     format(banco, sizeof(banco), "Senha Incorreta!\n\nSeu Usuário: %s\n\nInsira sua senha bancária:", nome(playerid));
  162.                     ShowPlayerDialog(playerid, DIALOGID, DIALOG_STYLE_INPUT, "dBank System - 24/7", banco, "Entrar", "Cancelar");
  163.                     SendClientMessage(playerid, VERMELHO, "[ dBank ] Senha Incorreta.");
  164.                 }
  165.             }
  166.             else
  167.             {
  168.                 format(banco, sizeof(banco), "Não deixe o campo em branco!\n\nSeu Usuário: %s\n\nInsira sua senha para prosseguir:", nome(playerid));
  169.                 ShowPlayerDialog(playerid, DIALOGV, DIALOG_STYLE_INPUT, "dBank System - 24/7", banco, "Entrar", "Cancelar");
  170.             }
  171.         }
  172.     }
  173.     else if(dialogid == DIALOGID1)
  174.     {
  175.         if(response)
  176.         {
  177.             format(banco, sizeof(banco), "* %s Sua senha bancária foi alterada para : '%s' Guarde-a.", nome(playerid), inputtext);
  178.             SendClientMessage(playerid, VERMELHO, banco);
  179.         }
  180.     }
  181.     return 1;
  182. }
  183.  
  184. CMD:criarconta(playerid)
  185. {
  186.     new string[140+24];
  187.     format(string, sizeof(string), DIRETORIOB , nome(playerid));
  188.     if(DOF2_FileExists(string)) return SendClientMessage(playerid, VERMELHO, "[ dBank ] Você não pode criar duas contas no banco, para acessar a sua normalmente use: /entrarconta");
  189.     format(string, sizeof(string), "dBank System - Contas Bancárias\n\nSeu Usuário: %s\nInsira uma Senha Bancária para Continuar:", nome(playerid));
  190.     ShowPlayerDialog(playerid, DIALOGID4, DIALOG_STYLE_INPUT, "dBank System - 24/7", string, "Criar", "Cancelar");
  191.     return 1;
  192. }
  193.  
  194. CMD:entrarconta(playerid)
  195. {
  196.     new string[140+24];
  197.     if(LogadoB[playerid] == true) return SendClientMessage(playerid, VERMELHO, "[ dBank ] Você já está logado em sua conta bancária.");
  198.     format(string, sizeof(string), DIRETORIOB , nome(playerid));
  199.     if(!DOF2_FileExists(string)) return SendClientMessage(playerid, VERMELHO, "[ dBank ] Você não tem uma conta no banco, Para criar uma: /criarconta");
  200.     format(string, sizeof(string), "dBank System - Contas Bancárias\n\nSeu Usuário: %s\n\nInsira sua senha bancária:", nome(playerid));
  201.     ShowPlayerDialog(playerid, DIALOGID, DIALOG_STYLE_INPUT, "dBank System - 24/7", string, "Entrar", "Cancelar");
  202.     return 1;
  203. }
  204.  
  205. CMD:banco(playerid)
  206. {
  207.     new string[140+24];
  208.     if(!LogadoB[playerid]) return SendClientMessage(playerid, VERMELHO, "[ dBank ] Você precisa logar em sua conta bancária.");
  209.     format(string, sizeof(string), DIRETORIOB , nome(playerid));
  210.     if(!DOF2_FileExists(string)) return SendClientMessage(playerid, VERMELHO, "[ dBank ] Você não tem conta bancária, para criar: /criarconta");
  211.     format(string, sizeof(string), "dBank System - Contas Bancárias\nSeu Usuário: %s\n\nQual operação deseja fazer?", nome(playerid));
  212.     ShowPlayerDialog(playerid, DIALOGID5, DIALOG_STYLE_MSGBOX, "Banco", string, "Saldo", "Transação");
  213.     return 1;
  214. }
  215.  
  216. CMD:senhabanco(playerid)
  217. {
  218.     new string[140+24];
  219.     if(!LogadoB[playerid]) return SendClientMessage(playerid, VERMELHO, "[ dBank ] Você precisa logar em sua conta bancária.");
  220.     format(string, sizeof(string), "dBank System - Contas Bancárias\nSeu Usuário: %s\nInsira sua senha antiga para continuar:", nome(playerid));
  221.     ShowPlayerDialog(playerid, DIALOGID, DIALOG_STYLE_INPUT, "dBank System - 24/7", string, "Confirmar", "Cancelar");
  222.     SenhaB[playerid] = true;
  223.     return 1;
  224. }
  225.  
  226. CMD:money(playerid)
  227. {
  228.     GivePlayerMoney(playerid, 5000);
  229.     return 1;
  230. }
  231.  
  232. stock PlayerToPoint(Float:radius, playerid, Float:X, Float:Y, Float:Z)
  233. {
  234.     new Float:oldpos[3], Float:temppos[3];
  235.     GetPlayerPos(playerid, oldpos[0], oldpos[1], oldpos[2]);
  236.     temppos[0] = (oldpos[0] -X);
  237.     temppos[1] = (oldpos[1] -Y);
  238.     temppos[2] = (oldpos[2] -Z);
  239.     if(((temppos[0] < radius) && (temppos[0] > -radius)) && ((temppos[1] < radius) && (temppos[1] > -radius)) && ((temppos[2] < radius) && (temppos[2] > -radius))){return 1;}
  240.     return 0;
  241. }
  242.  
  243. stock nome(playerid)
  244. {
  245.     new nj[MAX_PLAYER_NAME];
  246.     GetPlayerName(playerid, nj, sizeof(nj));
  247.     return nj;
  248. }
Add Comment
Please, Sign In to add comment