1. SA-MP Forums Archive
  2. Non-English
  3. Languages
  4. Português/Portuguese
  5. Lançamentos/Releases

Threaded Mode
[FilterScript] Sistema de banco ( DOF2 - bIni - SII)
Paramount.
Big Clucker
***
Posts: 174
Threads: 13
Joined: Jun 2010
Reputation: 0
#1

04.10.2011, 19:57
Sistema de banco


Descriзгo: :
Vocк tem de estar no banco para poder sacar e depositar e ver seu saldo. , existem 5 terminais para o uso do banco, para ir ao banco digite /banco, espero que gostem !
enjoy

DOF2 - SII - BINI

SII
pawn Код:
#include a_samp
#include SII
#include zcmd

#if defined MAX_PLAYERS
    #undef MAX_PLAYERS
#endif

#define MAX_PLAYERS 50
#define account     "%s.ini"
#define quantidade  "insira a quantidade desejada"
//------------------------------------------------
#define c1          2316.4658,-15.6762,26.7422
#define c2          2316.6191,-12.7899,26.7422
#define c3          2316.6187,-9.9513,26.7422
#define c4          2316.6208,-7.2376,26.7422
#define s1          2309.1951,-8.3039,26.7422
#define falso       "nгo estб no banco"
//------------------------------------------------

new
    nome[MAX_PLAYER_NAME],
    arquivo[28],
    str[50]
;

public OnFilterScriptInit()
{
    Create3DTextLabel("terminal 1\nUse /depositar /sacar ou /saldo",0x5EAF03FF,c1,50.0,0);
    Create3DTextLabel("terminal 2\nUse /depositar /sacar ou /saldo",0x5EAF03FF,c2,50.0,0);
    Create3DTextLabel("terminal 3\nUse /depositar /sacar ou /saldo",0x5EAF03FF,c3,50.0,0);
    Create3DTextLabel("terminal 4\nUse /depositar /sacar ou /saldo",0x5EAF03FF,c4,50.0,0);
    Create3DTextLabel("terminal para abrir contas bancбrias\nUse /abrirconta",0xFF0000FF,s1,50.0,0);
    return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    if(dialogid == 666)
    {
        if(response)
        {
            if(GetPlayerMoney(playerid) < strval(inputtext)) return SendClientMessage(playerid,-1,"nгo tem tudo isso а depositar.");
            GetPlayerName(playerid,nome,24);
            format(arquivo,30,account,nome);
            INI_Open(arquivo);
            INI_WriteInt("grana",INI_ReadInt("grana")+strval(inputtext));
            INI_Save();
            INI_Close();
            format(str,50,"vocк depositou R$%d",strval(inputtext));
            SendClientMessage(playerid,-1,str);
            return GivePlayerMoney(playerid,-strval(inputtext));
        }
    }
    if(dialogid == 665)
    {
        if(response)
        {
            GetPlayerName(playerid,nome,24);
            format(arquivo,28,account,nome);
            SendClientMessage(playerid,-1,str);
            INI_Open(arquivo);
            new MyMoney = INI_ReadInt("grana");
            if(GetPlayerMoney(playerid) < MyMoney) return SendClientMessage(playerid,-1,"nгo tem grana para isso.");
            if(strval(inputtext) <= MyMoney)
            {
                INI_WriteInt("grana",MyMoney-strval(inputtext));
                GivePlayerMoney(playerid, strval(inputtext));
                INI_Save();
            }
            else return SendClientMessage(playerid,-1,"nгo possui tudo isso.");
            if(!strlen(inputtext)) return ShowPlayerDialog(playerid,665,DIALOG_STYLE_INPUT,"banco",quantidade,"ok","fechar");
        }
    }
    return 1;
}
CMD:banco(playerid,params[]) return SetPlayerPos(playerid,2305.6309,-16.1295,26.7496);
    //--------------------------------------------------------------------------
CMD:depositar(playerid,params[])
    {
        if(IsPlayerInRangeOfPoint(playerid,5.0,c1) || IsPlayerInRangeOfPoint(playerid,5.0,c2) || IsPlayerInRangeOfPoint(playerid,5.0,c3) || IsPlayerInRangeOfPoint(playerid,5.0,c4))
        {
            ShowPlayerDialog(playerid,666,DIALOG_STYLE_INPUT,"banco",quantidade,"ok","fechar");
        }
        else return SendClientMessage(playerid,-1,falso);
        return 1;
    }
    //--------------------------------------------------------------------------
CMD:sacar(playerid,params[])
    {
        if(IsPlayerInRangeOfPoint(playerid,5.0,c1) || IsPlayerInRangeOfPoint(playerid,5.0,c2) || IsPlayerInRangeOfPoint(playerid,5.0,c3) || IsPlayerInRangeOfPoint(playerid,5.0,c4))
        {
            ShowPlayerDialog(playerid,665,DIALOG_STYLE_INPUT,"banco",quantidade,"ok","fechar");
        }
        else return SendClientMessage(playerid,-1,falso);
        return 1;
    }
    //--------------------------------------------------------------------------
CMD:saldo(playerid,params[])
    {
        if(IsPlayerInRangeOfPoint(playerid,5.0,c1) || IsPlayerInRangeOfPoint(playerid,5.0,c2) || IsPlayerInRangeOfPoint(playerid,5.0,c3) || IsPlayerInRangeOfPoint(playerid,5.0,c4))
        {
            GetPlayerName(playerid,nome,24);
            format(arquivo,28,account,nome);
            INI_Open(arquivo);
            format(str,50,"vocк ainda tem depositado R$%d",INI_ReadInt("grana"));
            ShowPlayerDialog(playerid,664,DIALOG_STYLE_MSGBOX,"banco",str,"ok","");
            return INI_Close();
        }
        else return SendClientMessage(playerid,-1,falso);
    }
bIni
pawn Код:
#include a_samp
#include bIni
#include zcmd

#if defined MAX_PLAYERS
    #undef MAX_PLAYERS
#endif

#define MAX_PLAYERS 50
#define account     "%s.ini"
#define quantidade  "insira a quantidade desejada"
//------------------------------------------------
#define c1          2316.4658,-15.6762,26.7422
#define c2          2316.6191,-12.7899,26.7422
#define c3          2316.6187,-9.9513,26.7422
#define c4          2316.6208,-7.2376,26.7422
#define s1          2309.1951,-8.3039,26.7422
#define falso       "nгo estб no banco"
//------------------------------------------------

new
    nome[MAX_PLAYER_NAME],
    arquivo[28],
    str[50]
;

public OnFilterScriptInit()
{
    Create3DTextLabel("terminal 1\nUse /depositar /sacar ou /saldo",0x5EAF03FF,c1,50.0,0);
    Create3DTextLabel("terminal 2\nUse /depositar /sacar ou /saldo",0x5EAF03FF,c2,50.0,0);
    Create3DTextLabel("terminal 3\nUse /depositar /sacar ou /saldo",0x5EAF03FF,c3,50.0,0);
    Create3DTextLabel("terminal 4\nUse /depositar /sacar ou /saldo",0x5EAF03FF,c4,50.0,0);
    Create3DTextLabel("terminal para abrir contas bancбrias\nUse /abrirconta",0xFF0000FF,s1,50.0,0);
    return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    if(dialogid == 666)
    {
        if(response)
        {
            if(GetPlayerMoney(playerid) < strval(inputtext)) return SendClientMessage(playerid,-1,"nгo tem tudo isso а depositar.");
            GetPlayerName(playerid,nome,24);
            format(arquivo,30,account,nome);
            INI_Open(arquivo);
            INI_WriteInt("grana",INI_ReadInt("grana")+strval(inputtext));
            INI_Save();
            INI_Close();
            format(str,50,"vocк depositou R$%d",strval(inputtext));
            SendClientMessage(playerid,-1,str);
            return GivePlayerMoney(playerid,-strval(inputtext));
        }
    }
    if(dialogid == 665)
    {
        if(response)
        {
            GetPlayerName(playerid,nome,24);
            format(arquivo,28,account,nome);
            SendClientMessage(playerid,-1,str);
            INI_Open(arquivo);
            new MyMoney = INI_ReadInt("grana");
            if(GetPlayerMoney(playerid) < MyMoney) return SendClientMessage(playerid,-1,"nгo tem grana para isso.");
            if(strval(inputtext) <= MyMoney)
            {
                INI_WriteInt("grana",MyMoney-strval(inputtext));
                GivePlayerMoney(playerid, strval(inputtext));
                INI_Save();
            }
            else return SendClientMessage(playerid,-1,"nгo possui tudo isso.");
            if(!strlen(inputtext)) return ShowPlayerDialog(playerid,665,DIALOG_STYLE_INPUT,"banco",quantidade,"ok","fechar");
        }
    }
    return 1;
}
CMD:banco(playerid,params[]) return SetPlayerPos(playerid,2305.6309,-16.1295,26.7496);
    //--------------------------------------------------------------------------
CMD:depositar(playerid,params[])
    {
        if(IsPlayerInRangeOfPoint(playerid,5.0,c1) || IsPlayerInRangeOfPoint(playerid,5.0,c2) || IsPlayerInRangeOfPoint(playerid,5.0,c3) || IsPlayerInRangeOfPoint(playerid,5.0,c4))
        {
            ShowPlayerDialog(playerid,666,DIALOG_STYLE_INPUT,"banco",quantidade,"ok","fechar");
        }
        else return SendClientMessage(playerid,-1,falso);
        return 1;
    }
    //--------------------------------------------------------------------------
CMD:sacar(playerid,params[])
    {
        if(IsPlayerInRangeOfPoint(playerid,5.0,c1) || IsPlayerInRangeOfPoint(playerid,5.0,c2) || IsPlayerInRangeOfPoint(playerid,5.0,c3) || IsPlayerInRangeOfPoint(playerid,5.0,c4))
        {
            ShowPlayerDialog(playerid,665,DIALOG_STYLE_INPUT,"banco",quantidade,"ok","fechar");
        }
        else return SendClientMessage(playerid,-1,falso);
        return 1;
    }
    //--------------------------------------------------------------------------
CMD:saldo(playerid,params[])
    {
        if(IsPlayerInRangeOfPoint(playerid,5.0,c1) || IsPlayerInRangeOfPoint(playerid,5.0,c2) || IsPlayerInRangeOfPoint(playerid,5.0,c3) || IsPlayerInRangeOfPoint(playerid,5.0,c4))
        {
            GetPlayerName(playerid,nome,24);
            format(arquivo,28,account,nome);
            INI_Open(arquivo);
            format(str,50,"vocк ainda tem depositado R$%d",INI_ReadInt("grana"));
            ShowPlayerDialog(playerid,664,DIALOG_STYLE_MSGBOX,"banco",str,"ok","");
            return INI_Close();
        }
        else return SendClientMessage(playerid,-1,falso);
    }

DOF2

pawn Код:
#include a_samp
#include DOF2
#include zcmd

#if defined MAX_PLAYERS
    #undef MAX_PLAYERS
#endif

#define MAX_PLAYERS 50
#define account     "%s.ini"
#define quantidade  "insira a quantidade desejada"
//------------------------------------------------
#define c1          2316.4658,-15.6762,26.7422
#define c2          2316.6191,-12.7899,26.7422
#define c3          2316.6187,-9.9513,26.7422
#define c4          2316.6208,-7.2376,26.7422
#define s1          2309.1951,-8.3039,26.7422
#define falso       "nгo estб no banco"
//------------------------------------------------

new
    nome[MAX_PLAYER_NAME],
    arquivo[28],
    paramount[50]
;

public OnFilterScriptInit()
{
    Create3DTextLabel("terminal 1\nUse /depositar /sacar ou /saldo",0x5EAF03FF,c1,50.0,0);
    Create3DTextLabel("terminal 2\nUse /depositar /sacar ou /saldo",0x5EAF03FF,c2,50.0,0);
    Create3DTextLabel("terminal 3\nUse /depositar /sacar ou /saldo",0x5EAF03FF,c3,50.0,0);
    Create3DTextLabel("terminal 4\nUse /depositar /sacar ou /saldo",0x5EAF03FF,c4,50.0,0);
    Create3DTextLabel("terminal para abrir contas bancбrias\nUse /abrirconta",0xFF0000FF,s1,50.0,0);
    return 1;
}

public OnFilterScriptExit()
{
    DOF2_Exit();
    return 1;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    if(dialogid == 666)
    {
        if(response)
        {
            if(GetPlayerMoney(playerid) < strval(inputtext)) return SendClientMessage(playerid,-1,"nгo tem tudo isso а depositar.");
            GetPlayerName(playerid,nome,24);
            format(arquivo,30,account,nome);
            DOF2_SetInt(arquivo, "grana", DOF2_GetInt(arquivo, "grana")+strval(inputtext));
            format(paramount,50,"vocк depositou R$%d",strval(inputtext));
            SendClientMessage(playerid,-1,paramount);
            GivePlayerMoney(playerid,-strval(inputtext));
            return 1;
        }
    }
    if(dialogid == 665)
    {
        if(response)
        {
            GetPlayerName(playerid,nome,24);
            format(arquivo,28,account,nome);
            SendClientMessage(playerid,-1,paramount);
            new MyMoney = DOF2_GetInt(arquivo, "grana");
            //if(GetPlayerMoney(playerid) < MyMoney) return SendClientMessage(playerid,-1,"nгo tem grana para isso.");
            if(strval(inputtext) <= MyMoney)
            {
                DOF2_SetInt(arquivo, "grana", DOF2_GetInt(arquivo, "grana")-strval(inputtext));
                GivePlayerMoney(playerid, strval(inputtext));
            }
            else return SendClientMessage(playerid,-1,"nгo possui tudo isso.");
            if(!strlen(inputtext)) return ShowPlayerDialog(playerid,665,DIALOG_STYLE_INPUT,"banco",quantidade,"ok","fechar");
        }
    }
    return 1;
}
CMD:banco(playerid,params[]) return SetPlayerPos(playerid,2305.6309,-16.1295,26.7496);
    //--------------------------------------------------------------------------
CMD:depositar(playerid,params[])
    {
        if(IsPlayerInRangeOfPoint(playerid,5.0,c1) || IsPlayerInRangeOfPoint(playerid,5.0,c2) || IsPlayerInRangeOfPoint(playerid,5.0,c3) || IsPlayerInRangeOfPoint(playerid,5.0,c4))
        {
            ShowPlayerDialog(playerid,666,DIALOG_STYLE_INPUT,"banco",quantidade,"ok","fechar");
        }
        else return SendClientMessage(playerid,-1,falso);
        return 1;
    }
    //--------------------------------------------------------------------------
CMD:sacar(playerid,params[])
    {
        if(IsPlayerInRangeOfPoint(playerid,5.0,c1) || IsPlayerInRangeOfPoint(playerid,5.0,c2) || IsPlayerInRangeOfPoint(playerid,5.0,c3) || IsPlayerInRangeOfPoint(playerid,5.0,c4))
        {
            ShowPlayerDialog(playerid,665,DIALOG_STYLE_INPUT,"banco",quantidade,"ok","fechar");
        }
        else return SendClientMessage(playerid,-1,falso);
        return 1;
    }
    //--------------------------------------------------------------------------
CMD:saldo(playerid,params[])
    {
        if(IsPlayerInRangeOfPoint(playerid,5.0,c1) || IsPlayerInRangeOfPoint(playerid,5.0,c2) || IsPlayerInRangeOfPoint(playerid,5.0,c3) || IsPlayerInRangeOfPoint(playerid,5.0,c4))
        {
            GetPlayerName(playerid,nome,24);
            format(arquivo,28,account,nome);
            format(paramount,50,"vocк ainda tem depositado R$%d",DOF2_GetInt(arquivo, "grana"));
            ShowPlayerDialog(playerid,664,DIALOG_STYLE_MSGBOX,"banco",paramount,"ok","");
            return 1;
        }
        else return SendClientMessage(playerid,-1,falso);
    }
Crйditos

Slick - SII
Bruno_Silva - bIni
Double-O-Seven - DOF2
zeex - ZCMD
Larceny - tirou minhas duvidas e me ajudou
Find
Reply
[S]trong
Unregistered
 
#2

04.10.2011, 20:29
parece bom.
Reply
Vai_Besta
Gangsta
****
Posts: 562
Threads: 3
Joined: Dec 2009
Reputation: 0
#3

04.10.2011, 20:43
parecer ser bom , poste umas ss
mas poderia ter transferencia para players off
Find
Reply
[O.z]Caroline
High-roller
*****
Posts: 1,453
Threads: 10
Joined: Sep 2011
Reputation: 0
#4

04.10.2011, 20:54
legal, parece muito bom.
Find
Reply
[S]trong
Unregistered
 
#5

04.10.2011, 21:46
Fez em Bini, estб perfeito.
Com DOF2 deu bugs aqui.
Reply
Paramount.
Big Clucker
***
Posts: 174
Threads: 13
Joined: Jun 2010
Reputation: 0
#6

04.10.2011, 22:13
Quote:
Originally Posted by [S]trong
Посмотреть сообщение
Fez em Bini, estб perfeito.
Com DOF2 deu bugs aqui.

Nгo, aqui funcionou com DOF2 , na verdade com todos.
Find
Reply
BrunoBSF
Gangsta
****
Posts: 699
Threads: 20
Joined: Jun 2011
Reputation: 0
#7

05.10.2011, 00:41
Parece ser muito bom
Find
Reply
SlashPT
High-roller
*****
Posts: 1,973
Threads: 54
Joined: Sep 2009
Reputation: 0
#8

05.10.2011, 00:42
Ta fixe o sistema sim senhor
Find
Reply
Paramount.
Big Clucker
***
Posts: 174
Threads: 13
Joined: Jun 2010
Reputation: 0
#9

05.10.2011, 02:06
Quote:
Originally Posted by BrunoBSF
Посмотреть сообщение
Parece ser muito bom
obrigado meu botzinho (:

Quote:
Originally Posted by SlashPT
Посмотреть сообщение
Ta fixe o sistema sim senhor
Opa, obrigado slash
Find
Reply
« Next Oldest | Next Newest »


Forum Jump:


Users browsing this thread: 2 Guest(s)
  1. SA-MP Forums Archive
  2. Non-English
  3. Languages
  4. Português/Portuguese
  5. Lançamentos/Releases