GTA Közösség - A magyar GTA fórum

San Andreas Multiplayer (SA-MP) => SA-MP: Szerverfejlesztés => A témát indította: Gabor.. - 2012. augusztus 05. - 14:16:12

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. augusztus 05. - 14:16:12

Sziasztok!
Már elég rég publikáltam valamit, hát itt az ideje. :D Amit írtam, nem más, mint egy bank rendszer, ami adatbázisba tárolja az adatokat.
• Bankszámla nyitás
• Bankszámla zárolás & törlés
• Bankszámlára pénz betétel
• Bankszámláról pénz kivétel
• Pénz átutalása más játékosnak
• Bankszámla egyenleg megtekintése
Készítõ: Gabor..( Én )
Készítési Idõ: 15 - 20 perc
BlueG MySQL R7 Pluginja, és Includeja kell hozzá!
Kód:
 

/*
                  MYSQL BANK RENDSZER
                  Készítette: Szabó Gábor( Gabor.. )
                  Dátum: 2012.08.05 , 13:15
                  
  Utolsó frissítés: 2012.08.22 , 19:25
*/
 
#include    <      a_samp      >
#include    <      a_mysql     >
#include    <      zcmd        >
#include    <      sscanf2     >
 
// Kapcsolódási Adatok, ide írd az adatbázisod adatait.
#define MYSQL_HOST              \"\"
#define MYSQL_PASS              \"\"
#define MYSQL_USER              \"\"
#define MYSQL_DB                \"\"
 
new
         g_szQuery[ 512 + 1 ],
         g_szFormat[ 144 + 1 ];
public OnFilterScriptInit( )
{
        mysql_connect( MYSQL_HOST, MYSQL_USER, MYSQL_DB, MYSQL_PASS );
        print( \"Gabor\'s MYSQL_BANK: Kapcsolodas a(z) \"MYSQL_HOST\" nevu hostra, \"MYSQL_USER\" nevu felhasznaloval.\" );
        if( mysql_ping( ) != 1 )
        {
           print( \"Gabor\'s MYSQL_BANK: Kapcsolat sikertelen \"MYSQL_USER\" felhasznaloval.\" );
           return 1;
        }
        print( \"Gabor\'s MYSQL_BANK: Kapcsolat sikeres \"MYSQL_USER\" nevu felhasznaloval.\" );
        return 1;
}
 
public OnPlayerSpawn( playerid )
{
        format( g_szQuery, sizeof( g_szQuery ), \"SELECT `Amount` FROM `bank` WHERE `Name` = \'%s\'\", szName( playerid ) );
        mysql_function_query( 1, g_szQuery, true, \"BankCashLoad\", \"d\", playerid );
        return 1;
}
 
CMD:createacc( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 0 )
        {
                format( g_szQuery, sizeof( g_szQuery ), \"INSERT INTO `bank`(Name, Amount) VALUES(\'%s\', \'0\')\", szName( playerid ) );
                mysql_function_query( 1, g_szQuery, false, \"OnQueryFinsh\", \"\" );
                SendClientMessage( playerid, 0xFF0000AA, \"-> Bankszámlád létrehozva.\" );
                SetPVarInt( playerid, \"Bankszamla\", 1 );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Van már számlád!\" );
        return 1;
}
CMD:deposit( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                  new
                           iAmount;
                  if( sscanf( params, \"i\", iAmount ) ) return SendClientMessage( playerid, 0xFF0000AA, \"Használat: /deposit < Összeg >\" );
                  if( iAmount > GetPlayerMoney( playerid ) ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs ennyi pénzed kézben!\" );
                  SetPVarInt( playerid, \"Bank\", GetPVarInt( playerid, \"Bank\" ) + iAmount );
                  GivePlayerMoney( playerid, - iAmount );
                  format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%d\' WHERE `Name` = \'%s\'\", GetPVarInt( playerid, \"Bank\" ), szName( playerid ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  format( g_szFormat, sizeof( g_szFormat ), \"Betettél a bankszámládra $%d-t. Új egyenleged: $%d\", iAmount, GetPVarInt( playerid, \"Bank\" ) );
                  SendClientMessage( playerid, 0xbad920AA, g_szFormat );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
CMD:withdraw( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                  new
                           iAmount;
                  if( sscanf( params, \"i\", iAmount ) ) return SendClientMessage( playerid, 0xFF0000AA, \"Használat: /deposit < Összeg >\" );
                  if( iAmount > GetPVarInt( playerid, \"Bank\" ) ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs ennyi pénzed kéznél!\" );
                  SetPVarInt( playerid, \"Bank\", GetPVarInt( playerid, \"Bank\" ) - iAmount );
                  GivePlayerMoney( playerid, iAmount );
                  format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%d\' WHERE `Name` = \'%s\'\", GetPVarInt( playerid, \"Bank\" ), szName( playerid ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  format( g_szFormat, sizeof( g_szFormat ), \"Kivettél a számládról $%d-t. Új egyenleged: $%d\", iAmount, GetPVarInt( playerid, \"Bank\" ) );
                  SendClientMessage( playerid, 0xbad920AA, g_szFormat );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
CMD:transfer( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                  new
                        iPlayer,
                        iAmount;
                  if( sscanf( params, \"ui\", iPlayer, iAmount ) ) return SendClientMessage( playerid, 0xFF0000AA, \"Használat: /transfer < Játékos ID/Név > < Összeg >\" );
                  if( iPlayer == INVALID_PLAYER_ID ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Érvénytelen azonosító.\" );
                  if( iPlayer == playerid ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Magadnak nem utalhatsz.\" );
                  if( GetPVarInt( iPlayer, \"Bankszamla\" ) == 0 ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Ennek a játékosnak nincsen bankszámlája!\" );
                  if( GetPVarInt( playerid, \"Bank\" ) < iAmount ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs a számládon ennyi pénz!\" );
                  SetPVarInt( playerid, \"Bank\", GetPVarInt( playerid, \"Bank\" ) - iAmount );
                  SetPVarInt( iPlayer, \"Bank\", GetPVarInt( iPlayer, \"Bank\" ) + iAmount );
                  format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%s\' WHERE `Name` = \'%s\'\", GetPVarInt( playerid, \"Bank\" ), szName( playerid ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%s\' WHERE `Name` = \'%s\'\", GetPVarInt( iPlayer, \"Bank\" ), szName( iPlayer ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  
                  format( g_szFormat, sizeof( g_szFormat ), \"%s(%d) Küldött neked $%d-t, a bankszámládra.\", szName( playerid ), playerid, iAmount );
                  SendClientMessage( iPlayer, 0xbad920AA, g_szFormat );
                  
                  format( g_szFormat, sizeof( g_szFormat ), \"Küldtél %s(%d) nevû játékosnak  $%d-t a bankszámlájára.\", szName( iPlayer ), iPlayer, iAmount );
                  SendClientMessage( iPlayer, 0xbad920AA, g_szFormat );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
CMD:deleteacc( playerid, params[] )
{
if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
{
                  format( g_szQuery, sizeof( g_szQuery ), \"DELETE FROM `bank` WHERE `Name` = \'%s\'\", szName( playerid ) );
  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  SetPVarInt( playerid, \"Bankszamla\", 0 );
                  SendClientMessage( playerid, 0xbad920AA, \"Bankszámlád törölve.\" );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
return 1;
}
CMD:balance( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                format( g_szFormat, sizeof( g_szFormat ), \"Banki egyenleged: $%d\", GetPVarInt( playerid, \"Bank\" ) );
                SendClientMessage( playerid, 0xbad920AA, g_szFormat );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
forward BankCashLoad( playerid );
public BankCashLoad( playerid )
{
        new
                 szFetch[ 11 ],
                 iRows,
                 iFields;
        cache_get_data( iRows, iFields );
        if( iRows != 0 )
        {
                   cache_get_row( 0, 0, szFetch );
                   SetPVarInt( playerid, \"Bank\", strval( szFetch ) );
                   SetPVarInt( playerid, \"Bankszamla\", 1 );
        }
        else
        {
                   SetPVarInt( playerid, \"Bankszamla\", 0 );
        }
        return 1;
}
forward OnQueryFinish( );
public OnQueryFinish( )
{
         return 1;
}
stock szName( playerid )
{
        static
                   s_szName[ MAX_PLAYER_NAME ];
        GetPlayerName( playerid, s_szName, MAX_PLAYER_NAME );
        return s_szName;
}

 
Tábla Struktúra:
 

CREATE TABLE IF NOT EXISTS `bank` (
`Name` varchar(24) CHARACTER SET utf8 COLLATE utf8_bin NOT NULL ,
`Amount` int(11) NOT NULL DEFAULT \'0\'
) ENGINE = MYISAM ;

Cím: MySQL Bank Rendszer
Írta: Striker - 2012. augusztus 05. - 14:36:41

faxa :D jó lett igaz még nem teszteltem mert nem vagyok othol :D

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. augusztus 05. - 14:41:38

Idézetet írta: Striker date=1344170201\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"25557\" data-ipsquote-contentclass=\"forums_Topic

faxa :D jó lett igaz még nem teszteltem mert nem vagyok othol :D
 

Köszönöm. :)

Cím: MySQL Bank Rendszer
Írta: Dzsorden - 2012. augusztus 05. - 14:45:02

Jó lett! Grat :)

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. augusztus 05. - 14:54:41

Idézetet írta: Dzsorden date=1344170702\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"25557\" data-ipsquote-contentclass=\"forums_Topic

Jó lett! Grat :)
 

Köszi. :)

Cím: MySQL Bank Rendszer
Írta: DJтoυcн - 2012. augusztus 05. - 15:02:28

Szép munka grat! :thumbsup:

Cím: MySQL Bank Rendszer
Írta: instant - 2012. augusztus 05. - 17:34:31

Szép lett testvér !!
Nem fogom tesztelni mivel ismerem használtam is már :D

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. augusztus 05. - 17:37:56

Idézetet írta: Touch date=1344171748\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"25557\" data-ipsquote-contentclass=\"forums_Topic

Szép munka grat! :thumbsup:
 

Köszönöm.

Szép lett testvér !!
Nem fogom tesztelni mivel ismerem használtam is már :D
 
[/quote]
Köszi.  Nem ez van a módomban.  Mert az a módhoz írtam, és ahhoz igazodik. Ez egy teljesen új. :D
Amúgy tesztelve van, minden mûködik tökéletesen. ;)

Cím: MySQL Bank Rendszer
Írta: instant - 2012. augusztus 05. - 17:53:42

jah okés  :)

Cím: MySQL Bank Rendszer
Írta: Cappsy - 2012. augusztus 05. - 20:08:28

Ránézésre jó bár nem teszteltem :)
Grat

Cím: MySQL Bank Rendszer
Írta: zeteni - 2012. augusztus 05. - 20:29:05

Nagyon jó! Kár, hogy én nem értek az SQL-hez :(

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. augusztus 05. - 23:20:28

Idézetet írta: cappsy date=1344190108\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"25557\" data-ipsquote-contentclass=\"forums_Topic

Ránézésre jó bár nem teszteltem :)
Grat
 

Köszi. :)

Nagyon jó! Kár, hogy én nem értek az SQL-hez :(
 
[/quote]Köszi. :D

Cím: MySQL Bank Rendszer
Írta: Flash - 2012. augusztus 05. - 23:25:16

not bad, not bad.. de még fejleszd. :)

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. augusztus 06. - 08:33:21

Idézetet írta: Flash date=1344201916\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"25557\" data-ipsquote-contentclass=\"forums_Topic

not bad, not bad.. de még fejleszd. :)
 

Köszi. Még mivel lehetne? :D

Cím: MySQL Bank Rendszer
Írta: Rupert - 2012. augusztus 06. - 09:14:38

Bõvíthetnéd mondjuk egy átutalással. :)

Cím: MySQL Bank Rendszer
Írta: TengeriMalac - 2012. augusztus 06. - 09:17:48

Áttanulmányozom, hátha megértek valamit mysql-bõl..
Szép :)

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. augusztus 06. - 09:34:15

Idézetet írta: Rupert date=1344237278\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"25557\" data-ipsquote-contentclass=\"forums_Topic

Bõvíthetnéd mondjuk egy átutalással. :)
 

Kösz, megcsináltam. :)
 

Áttanulmányozom, hátha megértek valamit mysql-bõl..
Szép :)
 
[/quote]Sok Sikert! ;) Köszi.
Frissítés!
• Átutalás más játékosnak

Cím: MySQL Bank Rendszer
Írta: Bryan - 2012. augusztus 06. - 10:40:38

Teszteltem, marha jó  :thumbsup:

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. augusztus 06. - 10:44:24

Idézetet írta: Bryan date=1344242438\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"25557\" data-ipsquote-contentclass=\"forums_Topic

Teszteltem, marha jó  :thumbsup:
 

Köszöntem. :)

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. augusztus 22. - 19:34:36

Frissítés!
• Bankszámla törlése.
• Egyéb apróság átírása.

Cím: MySQL Bank Rendszer
Írta: Gumimaci - 2012. augusztus 30. - 22:56:16

d:\\SZERVER\\filterscripts\\bank.pwn(144) : error 001: expected token: \"-string end-\", but found \"-identifier-\"
d:\\SZERVER\\filterscripts\\bank.pwn(144) : error 017: undefined symbol \"j\"
d:\\SZERVER\\filterscripts\\bank.pwn(144) : error 029: invalid expression, assumed zero
d:\\SZERVER\\filterscripts\\bank.pwn(144) : fatal error 107: too many error messages on one line
Compilation aborted.Pawn compiler 3.2.3664           Copyright (c) 1997-2006, ITB CompuPhase
 
4 Errors.

 
Valaki?
Gondolom ez is kell :

    /*
                      MYSQL BANK RENDSZER
                      Készítette: Szabó Gábor( Gabor.. )
                      Dátum: 2012.08.05 , 13:15
                      Utolsó frissítés: 2012.08.22 , 19:25
    */
 
    #include    <      a_samp      >
    #include    <      a_mysql     >
    #include    <      zcmd        >
    #include    <      sscanf2     >
 
    // Kapcsolódási Adatok, ide írd az adatbázisod adatait.
    #define MYSQL_HOST              \"\"
    #define MYSQL_PASS              \"\"
    #define MYSQL_USER              \"\"
    #define MYSQL_DB                \"\"
 
    new
             g_szQuery[ 512 + 1 ],
             g_szFormat[ 200 + 1 ];
    public OnFilterScriptInit( )
    {
            mysql_connect( MYSQL_HOST, MYSQL_USER, MYSQL_DB, MYSQL_PASS );
            print( \"Gabor\'s MYSQL_BANK: Kapcsolodas a(z) \"MYSQL_HOST\" nevu hostra, \"MYSQL_USER\" nevu felhasznaloval.\" );
            if( mysql_ping( ) != 1 )
            {
               print( \"Gabor\'s MYSQL_BANK: Kapcsolat sikertelen \"MYSQL_USER\" felhasznaloval.\" );
               return 1;
            }
            print( \"Gabor\'s MYSQL_BANK: Kapcsolat sikeres \"MYSQL_USER\" nevu felhasznaloval.\" );
            return 1;
    }
 
    public OnPlayerSpawn( playerid )
    {
            format( g_szQuery, sizeof( g_szQuery ), \"SELECT `Amount` FROM `bank` WHERE `Name` = \'%s\'\", szName( playerid ) );
            mysql_function_query( 1, g_szQuery, true, \"BankCashLoad\", \"d\", playerid );
            return 1;
    }
 
    CMD:createacc( playerid, params[] )
    {
            if( GetPVarInt( playerid, \"Bankszamla\" ) == 0 )
            {
                    format( g_szQuery, sizeof( g_szQuery ), \"INSERT INTO `bank`(Name, Amount) VALUES(\'%s\', \'0\')\", szName( playerid ) );
                    mysql_function_query( 1, g_szQuery, false, \"OnQueryFinsh\", \"\" );
                    SendClientMessage( playerid, 0xFF0000AA, \"-> Bankszámlád létrehozva.\" );
                    SetPVarInt( playerid, \"Bankszamla\", 1 );
            }
            else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Van már számlád!\" );
            return 1;
    }
    CMD:deposit( playerid, params[] )
    {
            if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
            {
                      new
                               iAmount;
                      if( sscanf( params, \"i\", iAmount ) ) return SendClientMessage( playerid, 0xFF0000AA, \"Használat: /deposit < Összeg >\" );
                      if( iAmount > GetPlayerMoney( playerid ) ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs ennyi pénzed kézben!\" );
                      SetPVarInt( playerid, \"Bank\", GetPVarInt( playerid, \"Bank\" ) + iAmount );
                      GivePlayerMoney( playerid, - iAmount );
                      format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%d\' WHERE `Name` = \'%s\'\", GetPVarInt( playerid, \"Bank\" ), szName( playerid ) );
                      mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                      format( g_szFormat, sizeof( g_szFormat ), \"Betettél a bankszámládra $%d-t. Új egyenleged: $%d\", iAmount, GetPVarInt( playerid, \"Bank\" ) );
                      SendClientMessage( playerid, 0xbad920AA, g_szFormat );
            }
            else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
            return 1;
    }
    CMD:withdraw( playerid, params[] )
    {
            if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
            {
                      new
                               iAmount;
                      if( sscanf( params, \"i\", iAmount ) ) return SendClientMessage( playerid, 0xFF0000AA, \"Használat: /deposit < Összeg >\" );
                      if( iAmount > GetPVarInt( playerid, \"Bank\" ) ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs ennyi pénzed kéznél!\" );
                      SetPVarInt( playerid, \"Bank\", GetPVarInt( playerid, \"Bank\" ) - iAmount );
                      GivePlayerMoney( playerid, iAmount );
                      format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%d\' WHERE `Name` = \'%s\'\", GetPVarInt( playerid, \"Bank\" ), szName( playerid ) );
                      mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                      format( g_szFormat, sizeof( g_szFormat ), \"Kivettél a számládról $%d-t. Új egyenleged: $%d\", iAmount, GetPVarInt( playerid, \"Bank\" ) );
                      SendClientMessage( playerid, 0xbad920AA, g_szFormat );
            }
            else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
            return 1;
    }
    CMD:transfer( playerid, params[] )
    {
            if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
            {
                      new
                            iPlayer,
                            iAmount;
                      if( sscanf( params, \"ui\", iPlayer, iAmount ) ) return SendClientMessage( playerid, 0xFF0000AA, \"Használat: /transfer < Játékos ID/Név > < Összeg >\" );
                      if( iPlayer == INVALID_PLAYER_ID ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Érvénytelen azonosító.\" );
                      if( iPlayer == playerid ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Magadnak nem utalhatsz.\" );
                      if( GetPVarInt( iPlayer, \"Bankszamla\" ) == 0 ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Ennek a játékosnak nincsen bankszámlája!\" );
                      if( GetPVarInt( playerid, \"Bank\" ) < iAmount ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs a számládon ennyi pénz!\" );
                      SetPVarInt( playerid, \"Bank\", GetPVarInt( playerid, \"Bank\" ) - iAmount );
                      SetPVarInt( iPlayer, \"Bank\", GetPVarInt( iPlayer, \"Bank\" ) + iAmount );
                      format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%s\' WHERE `Name` = \'%s\'\", GetPVarInt( playerid, \"Bank\" ), szName( playerid ) );
                      mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                      format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%s\' WHERE `Name` = \'%s\'\", GetPVarInt( iPlayer, \"Bank\" ), szName( iPlayer ) );
                      mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                      format( g_szFormat, sizeof( g_szFormat ), \"%s(%d) Küldött neked $%d-t, a bankszámládra.\", szName( playerid ), playerid, iAmount );
                      SendClientMessage( iPlayer, 0xbad920AA, g_szFormat );
                      format( g_szFormat, sizeof( g_szFormat ), \"Küldtél %s(%d) nevu\" játékosnak  $%d-t a bankszámlájára.\", szName( iPlayer ), iPlayer, iAmount );
                      SendClientMessage( iPlayer, 0xbad920AA, g_szFormat );
            }
            else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
            return 1;
    }
    CMD:deleteacc( playerid, params[] )
    {
            if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
            {
                      format( g_szQuery, sizeof( g_szQuery ), \"DELETE FROM `bank` WHERE `Name` = \'%s\'\", szName( playerid ) );
                      mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                      SetPVarInt( playerid, \"Bankszamla\", 0 );
                      SendClientMessage( playerid, 0xbad920AA, \"Bankszámlád törölve.\" );
            }
            else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
            return 1;
    }
    CMD:balance( playerid, params[] )
    {
            if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
            {
                    format( g_szFormat, sizeof( g_szFormat ), \"Banki egyenleged: $%d\", GetPVarInt( playerid, \"Bank\" ) );
                    SendClientMessage( playerid, 0xbad920AA, g_szFormat );
            }
            else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
            return 1;
    }
    forward BankCashLoad( playerid );
    public BankCashLoad( playerid )
    {
            new
                     szFetch[ 12 ],
                     iRows,
                     iFields;
            cache_get_data( iRows, iFields );
            if( iRows != 0 )
            {
                       cache_get_row( 0, 0, szFetch );
                       SetPVarInt( playerid, \"Bank\", strval( szFetch ) );
                       SetPVarInt( playerid, \"Bankszamla\", 1 );
            }
            else
            {
                       SetPVarInt( playerid, \"Bankszamla\", 0 );
            }
            return 1;
    }
    forward OnQueryFinish( );
    public OnQueryFinish( )
    {
             return 1;
    }
    stock szName( playerid )
    {
            static
                       s_szName[ MAX_PLAYER_NAME ];
            GetPlayerName( playerid, s_szName, MAX_PLAYER_NAME );
            return s_szName;
    }

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. augusztus 31. - 08:59:24

Látom, módosítottál rajta, mert fõpostban hibátlanul van. :D
 

/*
                  MYSQL BANK RENDSZER
                  Készítette: Szabó Gábor( Gabor.. )
                  Dátum: 2012.08.05 , 13:15
                  
                  Utolsó frissítés: 2012.08.22 , 19:25
*/
 
#include    <      a_samp      >
#include    <      a_mysql     >
#include    <      zcmd        >
#include    <      sscanf2     >
 
// Kapcsolódási Adatok, ide írd az adatbázisod adatait.
#define MYSQL_HOST              \"\"
#define MYSQL_PASS              \"\"
#define MYSQL_USER              \"\"
#define MYSQL_DB                \"\"
 
new
         g_szQuery[ 512 + 1 ],
         g_szFormat[ 200 + 1 ];
public OnFilterScriptInit( )
{
        mysql_connect( MYSQL_HOST, MYSQL_USER, MYSQL_DB, MYSQL_PASS );
        print( \"Gabor\'s MYSQL_BANK: Kapcsolodas a(z) \"MYSQL_HOST\" nevu hostra, \"MYSQL_USER\" nevu felhasznaloval.\" );
        if( mysql_ping( ) != 1 )
        {
           print( \"Gabor\'s MYSQL_BANK: Kapcsolat sikertelen \"MYSQL_USER\" felhasznaloval.\" );
           return 1;
        }
        print( \"Gabor\'s MYSQL_BANK: Kapcsolat sikeres \"MYSQL_USER\" nevu felhasznaloval.\" );
        return 1;
}
 
public OnPlayerSpawn( playerid )
{
        format( g_szQuery, sizeof( g_szQuery ), \"SELECT `Amount` FROM `bank` WHERE `Name` = \'%s\'\", szName( playerid ) );
        mysql_function_query( 1, g_szQuery, true, \"BankCashLoad\", \"d\", playerid );
        return 1;
}
 
CMD:createacc( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 0 )
        {
                format( g_szQuery, sizeof( g_szQuery ), \"INSERT INTO `bank`(Name, Amount) VALUES(\'%s\', \'0\')\", szName( playerid ) );
                mysql_function_query( 1, g_szQuery, false, \"OnQueryFinsh\", \"\" );
                SendClientMessage( playerid, 0xFF0000AA, \"-> Bankszámlád létrehozva.\" );
                SetPVarInt( playerid, \"Bankszamla\", 1 );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Van már számlád!\" );
        return 1;
}
CMD:deposit( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                  new
                           iAmount;
                  if( sscanf( params, \"i\", iAmount ) ) return SendClientMessage( playerid, 0xFF0000AA, \"Használat: /deposit < Összeg >\" );
                  if( iAmount > GetPlayerMoney( playerid ) ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs ennyi pénzed kézben!\" );
                  SetPVarInt( playerid, \"Bank\", GetPVarInt( playerid, \"Bank\" ) + iAmount );
                  GivePlayerMoney( playerid, - iAmount );
                  format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%d\' WHERE `Name` = \'%s\'\", GetPVarInt( playerid, \"Bank\" ), szName( playerid ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  format( g_szFormat, sizeof( g_szFormat ), \"Betettél a bankszámládra $%d-t. Új egyenleged: $%d\", iAmount, GetPVarInt( playerid, \"Bank\" ) );
                  SendClientMessage( playerid, 0xbad920AA, g_szFormat );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
CMD:withdraw( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                  new
                           iAmount;
                  if( sscanf( params, \"i\", iAmount ) ) return SendClientMessage( playerid, 0xFF0000AA, \"Használat: /deposit < Összeg >\" );
                  if( iAmount > GetPVarInt( playerid, \"Bank\" ) ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs ennyi pénzed kéznél!\" );
                  SetPVarInt( playerid, \"Bank\", GetPVarInt( playerid, \"Bank\" ) - iAmount );
                  GivePlayerMoney( playerid, iAmount );
                  format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%d\' WHERE `Name` = \'%s\'\", GetPVarInt( playerid, \"Bank\" ), szName( playerid ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  format( g_szFormat, sizeof( g_szFormat ), \"Kivettél a számládról $%d-t. Új egyenleged: $%d\", iAmount, GetPVarInt( playerid, \"Bank\" ) );
                  SendClientMessage( playerid, 0xbad920AA, g_szFormat );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
CMD:transfer( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                  new
                        iPlayer,
                        iAmount;
                  if( sscanf( params, \"ui\", iPlayer, iAmount ) ) return SendClientMessage( playerid, 0xFF0000AA, \"Használat: /transfer < Játékos ID/Név > < Összeg >\" );
                  if( iPlayer == INVALID_PLAYER_ID ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Érvénytelen azonosító.\" );
                  if( iPlayer == playerid ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Magadnak nem utalhatsz.\" );
                  if( GetPVarInt( iPlayer, \"Bankszamla\" ) == 0 ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Ennek a játékosnak nincsen bankszámlája!\" );
                  if( GetPVarInt( playerid, \"Bank\" ) < iAmount ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs a számládon ennyi pénz!\" );
                  SetPVarInt( playerid, \"Bank\", GetPVarInt( playerid, \"Bank\" ) - iAmount );
                  SetPVarInt( iPlayer, \"Bank\", GetPVarInt( iPlayer, \"Bank\" ) + iAmount );
                  format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%s\' WHERE `Name` = \'%s\'\", GetPVarInt( playerid, \"Bank\" ), szName( playerid ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%s\' WHERE `Name` = \'%s\'\", GetPVarInt( iPlayer, \"Bank\" ), szName( iPlayer ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  
                  format( g_szFormat, sizeof( g_szFormat ), \"%s(%d) Küldött neked $%d-t, a bankszámládra.\", szName( playerid ), playerid, iAmount );
                  SendClientMessage( iPlayer, 0xbad920AA, g_szFormat );
                  
                  format( g_szFormat, sizeof( g_szFormat ), \"Küldtél %s(%d) nevû játékosnak  $%d-t a bankszámlájára.\", szName( iPlayer ), iPlayer, iAmount );
                  SendClientMessage( iPlayer, 0xbad920AA, g_szFormat );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
CMD:deleteacc( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                  format( g_szQuery, sizeof( g_szQuery ), \"DELETE FROM `bank` WHERE `Name` = \'%s\'\", szName( playerid ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  SetPVarInt( playerid, \"Bankszamla\", 0 );
                  SendClientMessage( playerid, 0xbad920AA, \"Bankszámlád törölve.\" );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
CMD:balance( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                format( g_szFormat, sizeof( g_szFormat ), \"Banki egyenleged: $%d\", GetPVarInt( playerid, \"Bank\" ) );
                SendClientMessage( playerid, 0xbad920AA, g_szFormat );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
forward BankCashLoad( playerid );
public BankCashLoad( playerid )
{
        new
                 szFetch[ 12 ],
                 iRows,
                 iFields;
        cache_get_data( iRows, iFields );
        if( iRows != 0 )
        {
                   cache_get_row( 0, 0, szFetch );
                   SetPVarInt( playerid, \"Bank\", strval( szFetch ) );
                   SetPVarInt( playerid, \"Bankszamla\", 1 );
        }
        else
        {
                   SetPVarInt( playerid, \"Bankszamla\", 0 );
        }
        return 1;
}
forward OnQueryFinish( );
public OnQueryFinish( )
{
         return 1;
}
stock szName( playerid )
{
        static
                   s_szName[ MAX_PLAYER_NAME ];
        GetPlayerName( playerid, s_szName, MAX_PLAYER_NAME );
        return s_szName;
}

Cím: MySQL Bank Rendszer
Írta: Gumimaci - 2012. augusztus 31. - 09:46:09

feltennéd valahová hogy töltsem le, mert ez így most sem jó ha bemásolom pawno-ba akkor megint azokat a hibákat adja elõ ...

Cím: MySQL Bank Rendszer
Írta: N@rbirock - 2012. augusztus 31. - 10:23:09

De ezt ilyen scriptnél nem lehet mert kellennek a MySQL adataid.

Cím: MySQL Bank Rendszer
Írta: halaloszto100 - 2012. szeptember 03. - 23:26:17

Szép munka, de fejleszthetnéd még a kamattal.Hogy például $100-t ha beteszel a bankba, akkor arra a kamat óránként például $5.Vagy ha annyira rpsíteni akarnád, akkor játékbeli 31 naponként adná rá a kamatot.De ez egy tipp, úgy csinálod ahogy akarod. :D

Cím: MySQL Bank Rendszer
Írta: JackBronson - 2012. szeptember 04. - 14:45:31

Szép és jó :)
De ugy jobb lenne ha a parancsok magyarok lennének.pl/utal ,/berak,/kivesz stb...
Szerintem.

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. szeptember 04. - 18:30:53

Idézetet írta: halaloszto100 date=1346707577\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"25557\" data-ipsquote-contentclass=\"forums_Topic

Szép munka, de fejleszthetnéd még a kamattal.Hogy például $100-t ha beteszel a bankba, akkor arra a kamat óránként például $5.Vagy ha annyira rpsíteni akarnád, akkor játékbeli 31 naponként adná rá a kamatot.De ez egy tipp, úgy csinálod ahogy akarod. :D
 

Köszi. Hát most elég sok dolgom van az iskola miatt, ha jut szabad idõm megcsinálom. :D

Szép és jó :)
De ugy jobb lenne ha a parancsok magyarok lennének.pl/utal ,/berak,/kivesz stb...
Szerintem.
 
[/quote]
Köszi. Én jobb szeretem, ha angol nyelven vannak a parancsok, a módomban is angolul vannak, de természetesen átlehet írni. :D

Cím: MySQL Bank Rendszer
Írta: pisti525 - 2012. szeptember 05. - 18:20:24

Ezt hova kell rakni a pawnoban??

Cím: MySQL Bank Rendszer
Írta: N@rbirock - 2012. szeptember 05. - 18:56:11

:facepalm: Bemásolod és megnyomod az f5öt.

Cím: MySQL Bank Rendszer
Írta: Yakuza™ - 2012. szeptember 07. - 21:56:13

Ha lenne tárhelyem akkor használnám :)
De így is jó majd talán átírom dinire.

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. szeptember 07. - 22:38:16

Idézetet írta: Yakuza™ date=1347047773\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"25557\" data-ipsquote-contentclass=\"forums_Topic

Ha lenne tárhelyem akkor használnám :)
De így is jó majd talán átírom dinire.
 

Nem kell hozzá tárhely, csupán csak egy adatbázis, de ha úgy vesszük, akkor az is tárhely. Csinálhatsz házi adatbázist wamp szerver segítségével, vagy ha hoston akarod, akkor kérsz egy adatbázist a személyzettõl. :)

Cím: MySQL Bank Rendszer
Írta: cserko93 - 2012. szeptember 09. - 20:38:52

C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(59) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(66) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(74) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(82) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(85) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(88) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(97) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(103) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(105) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(108) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(111) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(120) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(129) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(130) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(132) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(133) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(135) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(138) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(153) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(158) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(168) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(170) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(191) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(192) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(196) : error 017: undefined symbol \"SetPVarInt\"
Pawn compiler 3.2.3664           Copyright (c) 1997-2006, ITB CompuPhase
 
25 Errors.

 
Nekem ez jön be:S

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. szeptember 09. - 21:57:22

Idézetet írta: cserko93 date=1347215932\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"25557\" data-ipsquote-contentclass=\"forums_Topic

C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(59) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(66) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(74) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(82) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(85) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(88) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(97) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(103) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(105) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(108) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(111) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(120) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(129) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(130) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(132) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(133) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(135) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(138) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(153) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(158) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(168) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(170) : error 017: undefined symbol \"GetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(191) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(192) : error 017: undefined symbol \"SetPVarInt\"
C:\\Users\\ptR\\Documents\\GTA San Andreas Server Files\\filterscripts\\bank.pwn(196) : error 017: undefined symbol \"SetPVarInt\"
Pawn compiler 3.2.3664           Copyright (c) 1997-2006, ITB CompuPhase
 
25 Errors.

 
Nekem ez jön be:S
 

Szerintem zárási hiba lesz. Módosítottál rajta valamit? Másold be a Te verziód!

Cím: MySQL Bank Rendszer
Írta: cserko93 - 2012. szeptember 10. - 14:55:17

semmit nem módosítottam csak annyit, hogy beírtam a mysql- cuccokat.-
 

/*
                  MYSQL BANK RENDSZER
                  Készítette: Szabó Gábor( Gabor.. )
                  Dátum: 2012.08.05 , 13:15
                  Utolsó frissítés: 2012.08.22 , 19:25
*/
 
#include    <      a_samp      >
#include    <      a_mysql     >
#include    <      zcmd        >
#include    <      sscanf2     >
 
// Kapcsolódási Adatok, ide írd az adatbázisod adatait.
#define MYSQL_HOST              \"localhost\"
#define MYSQL_PASS              \"\"
#define MYSQL_USER              \"root\"
#define MYSQL_DB                \"Sa-mp\"
 
new
         g_szQuery[ 512 + 1 ],
         g_szFormat[ 144 + 1 ];
public OnFilterScriptInit( )
{
        mysql_connect( MYSQL_HOST, MYSQL_USER, MYSQL_DB, MYSQL_PASS );
        print( \"Gabor\'s MYSQL_BANK: Kapcsolodas a(z) \"MYSQL_HOST\" nevu hostra, \"MYSQL_USER\" nevu felhasznaloval.\" );
        if( mysql_ping( ) != 1 )
        {
           print( \"Gabor\'s MYSQL_BANK: Kapcsolat sikertelen \"MYSQL_USER\" felhasznaloval.\" );
           return 1;
        }
        print( \"Gabor\'s MYSQL_BANK: Kapcsolat sikeres \"MYSQL_USER\" nevu felhasznaloval.\" );
        return 1;
}
 
public OnPlayerSpawn( playerid )
{
        format( g_szQuery, sizeof( g_szQuery ), \"SELECT `Amount` FROM `bank` WHERE `Name` = \'%s\'\", szName( playerid ) );
        mysql_function_query( 1, g_szQuery, true, \"BankCashLoad\", \"d\", playerid );
        return 1;
}
 
CMD:createacc( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 0 )
        {
                format( g_szQuery, sizeof( g_szQuery ), \"INSERT INTO `bank`(Name, Amount) VALUES(\'%s\', \'0\')\", szName( playerid ) );
                mysql_function_query( 1, g_szQuery, false, \"OnQueryFinsh\", \"\" );
                SendClientMessage( playerid, 0xFF0000AA, \"-> Bankszámlád létrehozva.\" );
                SetPVarInt( playerid, \"Bankszamla\", 1 );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Van már számlád!\" );
        return 1;
}
CMD:deposit( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                  new
                           iAmount;
                  if( sscanf( params, \"i\", iAmount ) ) return SendClientMessage( playerid, 0xFF0000AA, \"Használat: /deposit < Összeg >\" );
                  if( iAmount > GetPlayerMoney( playerid ) ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs ennyi pénzed kézben!\" );
                  SetPVarInt( playerid, \"Bank\", GetPVarInt( playerid, \"Bank\" ) + iAmount );
                  GivePlayerMoney( playerid, - iAmount );
                  format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%d\' WHERE `Name` = \'%s\'\", GetPVarInt( playerid, \"Bank\" ), szName( playerid ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  format( g_szFormat, sizeof( g_szFormat ), \"Betettél a bankszámládra $%d-t. Új egyenleged: $%d\", iAmount, GetPVarInt( playerid, \"Bank\" ) );
                  SendClientMessage( playerid, 0xbad920AA, g_szFormat );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
CMD:withdraw( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                  new
                           iAmount;
                  if( sscanf( params, \"i\", iAmount ) ) return SendClientMessage( playerid, 0xFF0000AA, \"Használat: /deposit < Összeg >\" );
                  if( iAmount > GetPVarInt( playerid, \"Bank\" ) ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs ennyi pénzed kéznél!\" );
                  SetPVarInt( playerid, \"Bank\", GetPVarInt( playerid, \"Bank\" ) - iAmount );
                  GivePlayerMoney( playerid, iAmount );
                  format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%d\' WHERE `Name` = \'%s\'\", GetPVarInt( playerid, \"Bank\" ), szName( playerid ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  format( g_szFormat, sizeof( g_szFormat ), \"Kivettél a számládról $%d-t. Új egyenleged: $%d\", iAmount, GetPVarInt( playerid, \"Bank\" ) );
                  SendClientMessage( playerid, 0xbad920AA, g_szFormat );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
CMD:transfer( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                  new
                        iPlayer,
                        iAmount;
                  if( sscanf( params, \"ui\", iPlayer, iAmount ) ) return SendClientMessage( playerid, 0xFF0000AA, \"Használat: /transfer < Játékos ID/Név > < Összeg >\" );
                  if( iPlayer == INVALID_PLAYER_ID ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Érvénytelen azonosító.\" );
                  if( iPlayer == playerid ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Magadnak nem utalhatsz.\" );
                  if( GetPVarInt( iPlayer, \"Bankszamla\" ) == 0 ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Ennek a játékosnak nincsen bankszámlája!\" );
                  if( GetPVarInt( playerid, \"Bank\" ) < iAmount ) return SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs a számládon ennyi pénz!\" );
                  SetPVarInt( playerid, \"Bank\", GetPVarInt( playerid, \"Bank\" ) - iAmount );
                  SetPVarInt( iPlayer, \"Bank\", GetPVarInt( iPlayer, \"Bank\" ) + iAmount );
                  format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%s\' WHERE `Name` = \'%s\'\", GetPVarInt( playerid, \"Bank\" ), szName( playerid ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  format( g_szQuery, sizeof( g_szQuery ), \"UPDATE `bank` SET `Amount` = \'%s\' WHERE `Name` = \'%s\'\", GetPVarInt( iPlayer, \"Bank\" ), szName( iPlayer ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  format( g_szFormat, sizeof( g_szFormat ), \"%s(%d) Küldött neked $%d-t, a bankszámládra.\", szName( playerid ), playerid, iAmount );
                  SendClientMessage( iPlayer, 0xbad920AA, g_szFormat );
                  format( g_szFormat, sizeof( g_szFormat ), \"Küldtél %s(%d) nevû játékosnak  $%d-t a bankszámlájára.\", szName( iPlayer ), iPlayer, iAmount );
                  SendClientMessage( iPlayer, 0xbad920AA, g_szFormat );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
CMD:deleteacc( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                  format( g_szQuery, sizeof( g_szQuery ), \"DELETE FROM `bank` WHERE `Name` = \'%s\'\", szName( playerid ) );
                  mysql_function_query( 1, g_szQuery, false, \"OnQueryFinish\", \"\" );
                  SetPVarInt( playerid, \"Bankszamla\", 0 );
                  SendClientMessage( playerid, 0xbad920AA, \"Bankszámlád törölve.\" );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
CMD:balance( playerid, params[] )
{
        if( GetPVarInt( playerid, \"Bankszamla\" ) == 1 )
        {
                format( g_szFormat, sizeof( g_szFormat ), \"Banki egyenleged: $%d\", GetPVarInt( playerid, \"Bank\" ) );
                SendClientMessage( playerid, 0xbad920AA, g_szFormat );
        }
        else SendClientMessage( playerid, 0xFF0000AA, \"HIBA: Nincs számlád!\" );
        return 1;
}
forward BankCashLoad( playerid );
public BankCashLoad( playerid )
{
        new
                 szFetch[ 11 ],
                 iRows,
                 iFields;
        cache_get_data( iRows, iFields );
        if( iRows != 0 )
        {
                   cache_get_row( 0, 0, szFetch );
                   SetPVarInt( playerid, \"Bank\", strval( szFetch ) );
                   SetPVarInt( playerid, \"Bankszamla\", 1 );
        }
        else
        {
                   SetPVarInt( playerid, \"Bankszamla\", 0 );
        }
        return 1;
}
forward OnQueryFinish( );
public OnQueryFinish( )
{
         return 1;
}
stock szName( playerid )
{
        static
                   s_szName[ MAX_PLAYER_NAME ];
        GetPlayerName( playerid, s_szName, MAX_PLAYER_NAME );
        return s_szName;
}

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. szeptember 10. - 15:05:35

Nálam hibátlan, töltsd le a legfrissebb a_samp includeot.

Cím: MySQL Bank Rendszer
Írta: cserko93 - 2012. szeptember 13. - 16:48:36

Honnan?

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. szeptember 13. - 17:04:31

Idézetet írta: cserko93 date=1347547716\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"25557\" data-ipsquote-contentclass=\"forums_Topic

Honnan?
 

Töltsd le a www.sa-mp.com -ról a 0.3e szerver csomagot, és ott benne lesz a pawno -> include mappában. Cseréld ki a Te mappádban lévõvel, aztán ezt amit letöltöttél töröld le.

Cím: MySQL Bank Rendszer
Írta: cserko93 - 2012. szeptember 13. - 17:31:31

Letöltöttem, ugyan az!

Cím: MySQL Bank Rendszer
Írta: Gabor.. - 2012. szeptember 13. - 22:18:06

Akkor  nem tudom. Ami a fõposztban van, az hibátlan. :( De szerintem több pawno van a gépeden, és bezavar.