Hello Forumozok !!
Segitségeteket kérném
Ebben a Bank Scriptben szeretném kérni hogy beleirnátok nekem hogy amikor kilép a Játékos akkor elmentse azt az összeget amit a bankban hagyott és ha vissza jön a Játékos akkor Betöltse neki ha beirja azt hogy /szamla akkor annyi is maradjon amit legutobb betett
Köszii
Itt a Script !!
[pawn]#include <a_samp>
#include <zcmd>
#include <sscanf2>
#include <sii>
#define COLOR_BLUE 0x0000BBAA
#define COLOR_RED 0xFF0606FF
#define Sx(%1,%2) floatround((float(%1)/100.0)*%2)
new bankmoney[MAX_PLAYERS];
new banktimer;
forward Bank(playerid);
public OnFilterScriptInit()
{
    print(\"Bank Rendszer betöltve!\");
    return 1;
}
public OnFilterScriptExit()
{
    print(\"Bank Rendszer kikapcsolva!\");
    return 1;
}
public OnPlayerConnect(playerid)
{
    new file[128];
    GetPlayerName(playerid, file, MAX_PLAYER_NAME);
    format(file, 128, \"/Bank/%s.ini\", file);
    INI_Open(file);
    bankmoney[playerid] = INI_ReadInt(\"BankMoney\");
    INI_Close();
    banktimer = SetTimerEx(\"Bank\", 5*60000, true, \"i\", playerid);
    return 1;
}
CMD:berak(playerid, params[])
{
    new money;
    new msg[128];
    new playermoney;
    playermoney = GetPlayerMoney(playerid);
    if(sscanf(params, \"i\", money))return SendClientMessage(playerid, COLOR_BLUE,\"Használat: /berak [pénz összeg]\");
    if(playermoney < money) return SendClientMessage(playerid,COLOR_RED,\"Nincs ennyi pénzed!\");
    GivePlayerMoney(playerid,-money);
    bankmoney[playerid] += money;
    format(msg,sizeof(msg),\"Sikeresen beraktál a bankba %d dollárt!\",money);
    SendClientMessage(playerid,COLOR_BLUE,msg);
    return 1;
}
CMD:atutal(playerid, params[])
{
    new money;
    new id;
    new msg[128];
    new name[24];
    new msg2[128];
    new name2[24];
    if(sscanf(params, \"ui\", id, money))return SendClientMessage(playerid, COLOR_BLUE,\"Használat: /atutal [id] [pénz összeg]\");
    if(money > bankmoney[playerid]) return SendClientMessage(playerid,COLOR_RED,\"Nincs ennyi pénz a bankszámládon!\");
    bankmoney[playerid] -= money;
    bankmoney[id] += money;
    GetPlayerName(playerid,name,sizeof(name));
    GetPlayerName(id,name2,sizeof(name2));
    format(msg,sizeof(msg),\"Sikeresen átutaltál %s számlájára %d dollárt!\",name2,money);
    SendClientMessage(playerid,COLOR_BLUE,msg);
    format(msg2,sizeof(msg2),\"%s átutalt %d dollárt a bakszámládra! Kivenni /kivesz parancssal tudod!\",name,money);
    SendClientMessage(id,COLOR_BLUE,msg2);
    return 1;
}
CMD:kivesz(playerid, params[])
{
    new money;
    new msg[128];
    if(sscanf(params, \"i\", money)) return SendClientMessage(playerid, COLOR_BLUE,\"Használat: /kivesz [pénz összeg]\");
    if(money > bankmoney[playerid]) return SendClientMessage(playerid,COLOR_RED,\"Nincs ennyi pénz a bankszámládon!\");
    bankmoney[playerid] -= money;
    GivePlayerMoney(playerid,money);
    format(msg,sizeof(msg),\"Sikeresen kivettél %d dollárt a bankból!\",money);
    SendClientMessage(playerid,COLOR_BLUE,msg);
    return 1;
}
CMD:bankinfo(playerid, params[])
{
    new msg[128];
    format(msg,sizeof(msg),\"A bankszámládon jelenleg %d dollár van.Betenni /berak parancsal tudod,kivenni /kivesz parancssal tudod.\",bankmoney[playerid]);
    SendClientMessage(playerid,COLOR_BLUE,msg);
    return 1;
}
public OnPlayerDisconnect(playerid)
{
    new file[128];
    new name[MAX_PLAYERS];
    GetPlayerName(playerid, name, sizeof(name));
    format(file,sizeof(file),\"/Bank/%s.ini\",name);
    INI_Open(file);
    INI_WriteInt(\"Bank\",bankmoney[playerid]);
    INI_Save();
    INI_Close();
    KillTimer(banktimer);
    return 1;
}
public Bank(playerid)
{
if(bankmoney[playerid] > 1)
{
    new money1 = Sx(bankmoney[playerid],5);
    bankmoney[playerid] += money1;
    }
}[/pawn]

---

Dupla hozzászólás automatikusan összefûzve. ( 2011. június 17. - 18:18:06 )

---

MEGÓLDÓDOTT !!!