Zaloguj się by uzyskać pełen dostęp. Nie masz jeszcze konta? Założ je już teraz w kilka sekund.

Wysłany: 2014-02-02, 01:36


czacha666.66






Wiek: 43
Na forum: 5532 dni
Posty: 10
Nick w MP: Czesław


Respekt: 50
Witam.

Wie kto? jak zrobi? zapis kont bankowych w tym skrypcie ? :

Kod:


/******************************************************************************/
//=========================== Script Bankomaty, karta by Sp3nNc3r ==============//
// Dla GTAO.pl
/******************************************************************************/


#include <a_samp>
#include <dini>
#include <dudb>
#include <zcmd>


//Kolory
#define COLOR_LIGHTRED 0xFF0000FF
#define COLOR_GREEN 0x33AA33AA
#define COLOR_RED 0xAA3333AA
#define COLOR_YELLOW 0xFFFF00AA



new kartabank[MAX_PLAYERS];
new monej[MAX_PLAYERS];
new przelewid;


public OnFilterScriptInit()
{
Create3DTextLabel("Aby skorzysta? z Bankomatu wpisz ---->/bankomat || Nie masz karty? wpisz ---->/karta",COLOR_RED,1716.4000200,1585.5000000,10.1000000,30.0,0, 1);//1
Create3DTextLabel( "Aby skorzysta? z banku wpisz : /bankomat ", COLOR_GREEN, 1308.7034, -1326.0483, 19.6773, 50.0, 0, 1); // 01
Create3DTextLabel( "Aby wyrobi? kart? bankow? wpisz : /karta ", COLOR_RED, 1308.7034, -1326.0483, 17.6773, 50.0, 0, 1); // 01
return 1;
}


public OnPlayerConnect(playerid)
{
kartabank[playerid]=0;

//================= od banku
if (strval(dini_Get(udb_encode(PlayerName(playerid)), "KBank")) == 1) {
kartabank[playerid] = 1;
}
//=================
return 1;
}

//-------Bank-------------------------------------------------------------------
CMD:bankomat(playerid, params[])
{
if(IsPlayerInRangeOfPoint(playerid,2,1308.7034, -1326.0483, 18.6773) ||
IsPlayerInRangeOfPoint(playerid,2,1308.7034, -1326.0483, 18.6773) ||
IsPlayerInRangeOfPoint(playerid,2,1308.7034, -1326.0483, 18.6773) ||
IsPlayerInRangeOfPoint(playerid,2,1308.7034, -1326.0483, 18.6773) ||
IsPlayerInRangeOfPoint(playerid,2,1716.4000200, 1585.5000000, 10.1000000) ||//Up
IsPlayerInRangeOfPoint(playerid,2,1727.4000200, 1396.5000000, 10.3000000) ||
IsPlayerInRangeOfPoint(playerid,2,1656.1999500, 1166.0999800, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,1576.1999500, 970.5000000, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,1576.9000200, 687.4000200, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,2129.8000500, 963.7000100, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,2032.3000500, 1226.8000500, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,1735.5999800, 1263.6999500, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,2108.5000000, 2094.3000500, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,2259.3000500, 2421.6001000, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,2513.0000000, 2423.0000000, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,2837.6999500, 2062.1999500, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,751.2000100, -1043.5000000, 23.3000000) ||
IsPlayerInRangeOfPoint(playerid,2,362.8999900, -1357.0999800, 14.2000000) ||
IsPlayerInRangeOfPoint(playerid,2,1973.6999500, -2176.1001000, 13.2000000) ||
IsPlayerInRangeOfPoint(playerid,2,1973.6992200, -2176.0996100, 13.2000000) ||
IsPlayerInRangeOfPoint(playerid,2,1952.4000200, -2069.5000000, 13.2000000) ||
IsPlayerInRangeOfPoint(playerid,2,1952.5000000, -1770.8000500, 13.2000000) ||
IsPlayerInRangeOfPoint(playerid,2,1490.5999800, -1727.6999500, 13.0000000) ||
IsPlayerInRangeOfPoint(playerid,2,1306.6999500, -1368.3000500, 13.2000000) ||
IsPlayerInRangeOfPoint(playerid,2,-1577.0000000, 499.5000000, 6.8000000) ||
IsPlayerInRangeOfPoint(playerid,2,1019.5000000, 1382.5000000, 10.5000000) ||//Down
IsPlayerInRangeOfPoint(playerid,2,1308.7034, -1326.0483, 18.6773)) {
if(!kartabank[playerid]) { return SendClientMessage(playerid, COLOR_GREEN, "Nie masz wyrobionej karty w banku."); }
ShowPlayerDialog(playerid, 14934, DIALOG_STYLE_LIST, "{8CED15}PKO {FFFF00}S.A", "{0099FF}Stan konta\n{FFFFFF}Wp?aty\n{0099FF}Wyp?aty\n{FFFFFF}Przelewy\n{ff0000}»»Oddaj 15$ na g?oduj?ce dzieci w Afryce<<", "OK", "Anuluj");
}else{
SendClientMessage(playerid, COLOR_GREEN, "Aby skorzysta? z banku wpisz /bank w odpowiednim miejscu.");
}
return 1;
}
CMD:karta(playerid, params[])
{
if(IsPlayerInRangeOfPoint(playerid,2,1308.7034, -1326.0483, 18.6773) ||
IsPlayerInRangeOfPoint(playerid,2,1308.7034, -1326.0483, 18.6773) ||
IsPlayerInRangeOfPoint(playerid,2,1308.7034, -1326.0483, 18.6773) ||
IsPlayerInRangeOfPoint(playerid,2,1308.7034, -1326.0483, 18.6773) ||
IsPlayerInRangeOfPoint(playerid,2,1716.4000200, 1585.5000000, 10.1000000) ||//Up
IsPlayerInRangeOfPoint(playerid,2,1727.4000200, 1396.5000000, 10.3000000) ||
IsPlayerInRangeOfPoint(playerid,2,1656.1999500, 1166.0999800, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,1576.1999500, 970.5000000, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,1576.9000200, 687.4000200, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,2129.8000500, 963.7000100, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,2032.3000500, 1226.8000500, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,1735.5999800, 1263.6999500, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,2108.5000000, 2094.3000500, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,2259.3000500, 2421.6001000, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,2513.0000000, 2423.0000000, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,2837.6999500, 2062.1999500, 10.5000000) ||
IsPlayerInRangeOfPoint(playerid,2,751.2000100, -1043.5000000, 23.3000000) ||
IsPlayerInRangeOfPoint(playerid,2,362.8999900, -1357.0999800, 14.2000000) ||
IsPlayerInRangeOfPoint(playerid,2,1973.6999500, -2176.1001000, 13.2000000) ||
IsPlayerInRangeOfPoint(playerid,2,1973.6992200, -2176.0996100, 13.2000000) ||
IsPlayerInRangeOfPoint(playerid,2,1952.4000200, -2069.5000000, 13.2000000) ||
IsPlayerInRangeOfPoint(playerid,2,1952.5000000, -1770.8000500, 13.2000000) ||
IsPlayerInRangeOfPoint(playerid,2,1490.5999800, -1727.6999500, 13.0000000) ||
IsPlayerInRangeOfPoint(playerid,2,1306.6999500, -1368.3000500, 13.2000000) ||
IsPlayerInRangeOfPoint(playerid,2,-1577.0000000, 499.5000000, 6.8000000) ||
IsPlayerInRangeOfPoint(playerid,2,1019.5000000, 1382.5000000, 10.5000000) ||//Down
IsPlayerInRangeOfPoint(playerid,2,1308.7034, -1326.0483, 18.6773)) {
if(kartabank[playerid]) { return SendClientMessage(playerid, COLOR_GREEN, "Masz ju? kart?!"); }
monej[playerid]=monej[playerid]-15;
GivePlayerMoney(playerid,-15);
kartabank[playerid]=1;
dini_IntSet(udb_encode(PlayerName(playerid)), "KBank", 1);
SendClientMessage(playerid, COLOR_YELLOW, "Gratulacje! Wyrobi?e? sobie kart?!");
SendClientMessage(playerid, COLOR_RED, "Aby skorzysta? z banku wpisz /bankomat w odpowiednim miejscu.");
}else{
SendClientMessage(playerid, COLOR_YELLOW, "Aby wyrobi? sobie kart? wpisz /karta w odpowiednim miejscu.");
}
return 1;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
new pName[30];
GetPlayerName(playerid, pName, 30);
if(dialogid == 14934 && response)//Bank ===========================================================================================================
{
switch(listitem)
{
case 0:
{
new string[256];
new banks[256];
banks = dini_Get(udb_encode(PlayerName(playerid)), "BankForsa");
format(string, sizeof(string),"{ffff00}-----PKO S.A-----\n{1B1BE0}=======================\n \n{8CED15}Stan twojego konta wynosi:\nKwota: %d $\n \n{1B1BE0}=======================\n{ffff00}-----PKO S.A-----",strval(banks));
ShowPlayerDialog(playerid,14935,DIALOG_STYLE_MSGBOX,"{FFFF00}Stan Konta",string,"OK","");
}
case 1:
{
ShowPlayerDialog(playerid, 14936, DIALOG_STYLE_INPUT, "{FFFF00}Wp?ata", "{ffff00}-----PKO S.A-----\n \n{1B1BE0}=======================\n{8CED15}Wpisz kwot? jak? chcesz wp?aci? na konto.\n \n{1B1BE0}=======================\n{ffff00}-----PKO S.A-----", "Wp?a?", "Anuluj");
}
case 2:
{
ShowPlayerDialog(playerid, 14937, DIALOG_STYLE_INPUT, "{FFFF00}Wyp?ata", "{ffff00}-----PKO S.A-----\n \n{1B1BE0}=======================\n{8CED15}Wpisz kwot? jak? chcesz wyp?aci? z konta.\n \n{1B1BE0}=======================\n{ffff00}-----PKO S.A-----", "Wyp?a?", "Anuluj");
}
case 3:
{
ShowPlayerDialog(playerid, 14938, DIALOG_STYLE_INPUT, "{FFFF00}Przelew", "{ffff00}-----PKO S.A-----\n \n{1B1BE0}=======================\n{8CED15}Wpisz ID gracza , kt?remu chcesz przes?a? kwot?.\n \n{1B1BE0}=======================\n{ffff00}-----PKO S.A-----", "Dalej", "Anuluj");
}
case 4:
{
if(GetPlayerMoney(playerid) < 15){ return SendClientMessage(playerid,COLOR_YELLOW,"Nie masz przy sobie 15$!"); }
monej[playerid]=monej[playerid]-15;
GivePlayerMoney(playerid,-15);
SendClientMessage(playerid,COLOR_LIGHTRED,"Odda?e? 15 $ na dzieci z Afryki.");
}
}
return 1;
}
if(dialogid == 14936 && response)
{
new string[256];
if(monej[playerid] >= strval(inputtext)){
if(strval(inputtext) >= 500000 || strval(inputtext) < 0 ){ return SendClientMessage(playerid,COLOR_LIGHTRED,"Nie mo?esz wp?aci? tej kwoty."); }
monej[playerid]=monej[playerid]-strval(inputtext);
GivePlayerMoney(playerid,-strval(inputtext));
dini_IntSet(udb_encode(PlayerName(playerid)), "BankForsa",strval(dini_Get(udb_encode(PlayerName(playerid)), "BankForsa")) + strval(inputtext));

format(string, 256, "Wp?aci?e? %d $ na konto bankowe!", strval(inputtext));
SendClientMessage(playerid,COLOR_GREEN, string);

}else{SendClientMessage(playerid,COLOR_LIGHTRED,"Nie mo?esz wp?aci? tej kwoty.");}
return 1;
}
if(dialogid == 14937 && response)
{
new string[256];
new banks[256];
banks = dini_Get(udb_encode(PlayerName(playerid)), "BankForsa");
if(strval(banks) >= strval(inputtext)){
if(strval(inputtext) < 0){return SendClientMessage(playerid,COLOR_LIGHTRED,"Nie mo?esz wyp?aci? tej kwoty."); }
monej[playerid]=monej[playerid]+strval(inputtext);
GivePlayerMoney(playerid,strval(inputtext));
dini_IntSet(udb_encode(PlayerName(playerid)), "BankForsa",strval(banks) - strval(inputtext));
format(string, 256, "Wyp?aci?e? %d $ z konta bankowego!", strval(inputtext));
SendClientMessage(playerid,COLOR_GREEN, string);
}else{SendClientMessage(playerid,COLOR_LIGHTRED,"Nie mo?esz wyp?aci? tej kwoty.");}
return 1;
}
if(dialogid == 14938 && response)
{
if(IsPlayerConnected(strval(inputtext))){
if(playerid == strval(inputtext)){ return SendClientMessage(playerid,COLOR_LIGHTRED,"B??dne ID gracza.");}
przelewid = strval(inputtext);
ShowPlayerDialog(playerid, 14939, DIALOG_STYLE_INPUT, "{FFFF00}Przelew", "{ffff00}-----PKO S.A-----\n \n{1B1BE0}=======================\n{8CED15}Wpisz kwot? , kt?r? chcesz przes?a? graczowi.\n \n{1B1BE0}=======================\n{ffff00}-----PKO S.A-----", "Przelej", "Anuluj");
}else{SendClientMessage(playerid,COLOR_LIGHTRED,"B??dne ID gracza.");}
return 1;
}
if(dialogid == 14939 && response)
{
new string[256];
new banks[256];
banks = dini_Get(udb_encode(PlayerName(playerid)), "BankForsa");
if(strval(banks) <= strval(inputtext)){
dini_IntSet(udb_encode(PlayerName(playerid)), "BankForsa",strval(banks) - strval(inputtext));
dini_IntSet(udb_encode(PlayerName(przelewid)), "BankForsa",strval(dini_Get(udb_encode(PlayerName(przelewid)), "BankForsa")) + strval(inputtext));
format(string, 256, "Przela?e? %d $ na konto gracza %s (ID:%d)!", strval(inputtext),PlayerName(przelewid),przelewid);
SendClientMessage(playerid,COLOR_GREEN, string);
}else{SendClientMessage(playerid,COLOR_LIGHTRED,"Nie mo?esz przela? tej kwoty.");}
return 1;
}
return 1;
}

stock PlayerName(playerid)
{
new pname[MAX_PLAYER_NAME];
GetPlayerName(playerid, pname, MAX_PLAYER_NAME);
return pname;
}



/******************************************************************************/
//=========================== Script Bankomaty, karta by Sp3nNc3r ==============//
// Dla GTAO.pl
/******************************************************************************/


Pozdrawiam :)

Postaw piwo autorowi tego posta
 

 
Wysłany: 2014-02-02, 12:35


B!4CK
Never give UP!






Wiek: 32
Na forum: 5809 dni
Posty: 1047
Nick w MP: John
Piwa: 1891

Respekt: 124,2
Respekt: 124,2
czacha666.66, ale zapisuje, jest zapis dini
if (strval(dini_Get(udb_encode(PlayerName(playerid)), "KBank")) == 1) {
kartabank[playerid] = 1;



Kolejnym razem daj na pastebin.com bo tam ?atwiej poszuka? bo tu rozje?d?a tekst.
Podpis
Cześć
! :)


Projekt, który poruszy scenę platformy SA:MP!
Postaw piwo autorowi tego posta
 

 
Tagi: bankomaty :: nie :: dziala :: zapis
Anonymous





Na forum: 245 dni
Posty: 1
Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » PAWN » [INNE] Bankomaty - nie dziala zapis Ten temat jest zablokowany bez możliwości zmiany postów lub pisania odpowiedzi

Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
 Dodaj temat do Ulubionych
Wersja do druku