GTA Közösség - A magyar GTA fórum
San Andreas Multiplayer (SA-MP) => SA-MP: Szerverfejlesztés => Segítségkérés => A témát indította: [ZzZ]Álmos - 2012. február 13. - 14:37:54
-
Sziasztok. Van egy gondom.
Találtam egy bankrendszer-t.
[pawn] #include a_samp
#include dini
#include zcmd
#include sscanf
enum info
{
szamla,
kartya
}
new micsoda[100];
new pInfo[MAX_PLAYERS][info];
public OnFilterScriptInit()
{
micsoda = \"pont\";
new fle[MAX_PLAYER_NAME];
for(new i=0; i < MAX_PLAYERS; i++)
{
GetPlayerName(i, fle, sizeof(fle));
if(dini_Exists(fle))
{
if(dini_Int(fle, \"Kartya\") == 1)
{
pInfo[kartya] = dini_Int(fle, \"Kartya\");
pInfo[szamla] = dini_Int(fle, \"Bank\");
}
}
}
return 1;
}
public OnFilterScriptExit()
{
for(new i=0; i < MAX_PLAYERS; i++)
{
pInfo[kartya] = 0;
pInfo[szamla] = 0;
}
return 1;
}
CMD:betesz(playerid,params[])
{
new
osszeg;
if(sscanf(params,\"i\",osszeg)) return SendClientMessage(playerid,0x00FF00,\"Használat: /betesz [Összeg]\");
{
if(pInfo[playerid][kartya] == 1)
{
if(osszeg >= GetPlayerScore(playerid))
{
SetPlayerScore(playerid, GetPlayerScore(playerid) - osszeg);
pInfo[playerid][szamla] += osszeg;
new str[180];
format(str, sizeof(str),\"A számládon jelenleg ennyi %s található: %d\", micsoda, pInfo[playerid][szamla]);
SendClientMessage(playerid, -1, str);
}
else SendClientMessage(playerid, -1, \"Nincs ennyi pontod.\");
}
else SendClientMessage(playerid, -1, \"Nincs bankkártyád.\");
}
return 1;
}
CMD:kivesz(playerid,params[])
{
new
osszeg;
if(sscanf(params,\"i\",osszeg)) return SendClientMessage(playerid,0x00FF00,\"Használat: /kivesz [Összeg]\");
{
if(pInfo[playerid][kartya] == 1)
{
if(osszeg <= pInfo[playerid][szamla])
{
SetPlayerScore(playerid, GetPlayerScore(playerid) + osszeg);
pInfo[playerid][szamla] -= osszeg;
new str[180];
format(str, sizeof(str),\"A számládon jelenleg ennyi %s található: %d\", micsoda, pInfo[playerid][szamla]);
SendClientMessage(playerid, -1, str);
}
else SendClientMessage(playerid, -1, \"Nincs ennyi pontod.\");
}
else SendClientMessage(playerid, -1, \"Nincs bankkártyád.\");
}
return 1;
}
CMD:atutal(playerid,params[])
{
new
ID,
osszeg,
str[128],
strr[128],
File[MAX_PLAYER_NAME],
Filee[MAX_PLAYER_NAME];
if(sscanf(params,\"ii\",ID,osszeg)) return SendClientMessage(playerid,0x00FF00,\"Használat: /atutal [iD] [Összeg]\");
{
if(IsPlayerConnected(ID))
{
if(pInfo[playerid][kartya] == 1)
{
if(pInfo[playerid][szamla] >= osszeg)
{
pInfo[iD][szamla] += osszeg;
GetPlayerName(ID, File, sizeof(File));
dini_IntSet(File,\"Bank\",pInfo[iD][szamla]);
pInfo[playerid][szamla] -= osszeg;
GetPlayerName(playerid, Filee, sizeof(Filee));
dini_IntSet(Filee, \"Bank\",pInfo[playerid][szamla]);
format(strr, sizeof(strr), \"%s átutalt a számládra %d$-t.\",Filee,osszeg);
format(str, sizeof(str), \"%d$-t utaltál %s számlájára.\",File, osszeg);
SendClientMessage(playerid, -1, str);
SendClientMessage(ID, -1, strr);
}
else SendClientMessage(playerid, -1, \"Nincs ennyi pénz a számládon.\");
}
else SendClientMessage(playerid, -1, \"Nincs bankkártyád.\");
}
else SendClientMessage(playerid, -1, \"A játékos nincs a szerveren.\");
}
return 1;
}
CMD:egyenleg(playerid,params[])
{
new egyenleg[180];
format(egyenleg, sizeof(egyenleg),\"A számládon jelenleg ennyi %s található: %d.\", micsoda, pInfo[playerid][szamla]);
SendClientMessage(playerid, -1, egyenleg);
return 1;
}
CMD:kartyavesz(playerid,params[])
{
if(pInfo[playerid][kartya] == 0)
{
if(GetPlayerScore(playerid) >= 1000)
{
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
pInfo[playerid][kartya] = 1;
dini_IntSet(name, \"Kartya\",pInfo[playerid][kartya]);
SendClientMessage(playerid, -1, \"Megvetted a bankkártyát 1000 pontért.\");
}
else SendClientMessage(playerid, -1, \"Nincs ennyi pontod.(1000)\");
}
else SendClientMessage(playerid, -1, \"Már van bankkártyád.\");
return 1;
}
[/pawn]
Nos ennek az elején ott van az include [pawn]#include a_samp
#include dini
#include zcmd
#include sscanf[/pawn]
Most be kell másolni a mod ba újra az includekat? Vagy mivan? Mert ebben teljesen eltévedek include-k terén. Légyszíves megköszönném a segítséget.
-
figyelj álmos :D
itt a pawnom és a plugins mappám ezt mind ird felül...
a pawnomban majdnem minden include van kivéve ami nincs :D
a pluginsok is meg vannak müködõképesek kompatibilisek 0.3d hez azokat is ird felül :D
link : http://hotfile.com/dl/146408923/e6bc2b5/Desktop.rar.html
-
figyelj álmos :D
itt a pawnom és a plugins mappám ezt mind ird felül...
a pawnomban majdnem minden include van kivéve ami nincs :D
a pluginsok is meg vannak müködõképesek kompatibilisek 0.3d hez azokat is ird felül :D
link : http://hotfile.com/dl/146408923/e6bc2b5/Desktop.rar.html
Hát köszönöm :) Megnézem!
Dupla hozzászólás automatikusan összefûzve. ( 2012. február 13. - 14:52:43 )
Szentem rosszul értelmezted a kérdést. Ha tegyük fel a bare mod-ba be van rakva az elejére az [pawn]#include <zcmd>[/pawn] tegyük fel! Itt a bankrendszer script annak is az elején.. azokat be kell újra másolni? Ha nem a többit hova kell? Mert beraktam õket de 6 error-t ír.
-
tegyük fel! Itt a bankrendszer script annak is az elején.. azokat be kell újra másolni?[/quote]
nem kell ezekkel az include kkal semmit csinálni igen... valamiért error ozik az FS nekem sok errort irt ki de ez nem az include hibája
Dupla hozzászólás automatikusan összefûzve. ( 2012. február 13. - 15:04:23 )
a Script nekem igy nem error ozik probáld meg igy müködni fog
[pawn]
#include <a_samp>
#include <dini>
#include <zcmd>
#include <sscanf>
enum info
{
szamla,
kartya
}
new micsoda[100];
new pInfo[MAX_PLAYERS][info];
public OnFilterScriptInit()
{
micsoda = \"pont\";
new fle[MAX_PLAYER_NAME];
for(new i=0; i < MAX_PLAYERS; i++)
{
GetPlayerName(i, fle, sizeof(fle));
if(dini_Exists(fle))
{
if(dini_Int(fle, \"Kartya\") == 1)
{
pInfo[kartya] = dini_Int(fle, \"Kartya\");
pInfo[szamla] = dini_Int(fle, \"Bank\");
}
}
}
return 1;
}
public OnFilterScriptExit()
{
for(new i=0; i < MAX_PLAYERS; i++)
{
pInfo[kartya] = 0;
pInfo[szamla] = 0;
}
return 1;
}
CMD:betesz(playerid,params[])
{
new
osszeg;
if(sscanf(params,\"i\",osszeg)) return SendClientMessage(playerid,0x00FF00,\"Használat: /betesz [Összeg]\");
{
if(pInfo[playerid][kartya] == 1)
{
if(osszeg >= GetPlayerScore(playerid))
{
SetPlayerScore(playerid, GetPlayerScore(playerid) - osszeg);
pInfo[playerid][szamla] += osszeg;
new str[180];
format(str, sizeof(str),\"A számládon jelenleg ennyi %s található: %d\", micsoda, pInfo[playerid][szamla]);
SendClientMessage(playerid, -1, str);
}
else SendClientMessage(playerid, -1, \"Nincs ennyi pontod.\");
}
else SendClientMessage(playerid, -1, \"Nincs bankkártyád.\");
}
return 1;
}
CMD:kivesz(playerid,params[])
{
new
osszeg;
if(sscanf(params,\"i\",osszeg)) return SendClientMessage(playerid,0x00FF00,\"Használat: /kivesz [Összeg]\");
{
if(pInfo[playerid][kartya] == 1)
{
if(osszeg <= pInfo[playerid][szamla])
{
SetPlayerScore(playerid, GetPlayerScore(playerid) + osszeg);
pInfo[playerid][szamla] -= osszeg;
new str[180];
format(str, sizeof(str),\"A számládon jelenleg ennyi %s található: %d\", micsoda, pInfo[playerid][szamla]);
SendClientMessage(playerid, -1, str);
}
else SendClientMessage(playerid, -1, \"Nincs ennyi pontod.\");
}
else SendClientMessage(playerid, -1, \"Nincs bankkártyád.\");
}
return 1;
}
CMD:atutal(playerid,params[])
{
new
ID,
osszeg,
str[128],
strr[128],
File[MAX_PLAYER_NAME],
Filee[MAX_PLAYER_NAME];
if(sscanf(params,\"ii\",ID,osszeg)) return SendClientMessage(playerid,0x00FF00,\"Használat: /atutal [iD] [Összeg]\");
{
if(IsPlayerConnected(ID))
{
if(pInfo[playerid][kartya] == 1)
{
if(pInfo[playerid][szamla] >= osszeg)
{
pInfo[iD][szamla] += osszeg;
GetPlayerName(ID, File, sizeof(File));
dini_IntSet(File,\"Bank\",pInfo[iD][szamla]);
pInfo[playerid][szamla] -= osszeg;
GetPlayerName(playerid, Filee, sizeof(Filee));
dini_IntSet(Filee, \"Bank\",pInfo[playerid][szamla]);
format(strr, sizeof(strr), \"%s átutalt a számládra %d$-t.\",Filee,osszeg);
format(str, sizeof(str), \"%d$-t utaltál %s számlájára.\",File, osszeg);
SendClientMessage(playerid, -1, str);
SendClientMessage(ID, -1, strr);
}
else SendClientMessage(playerid, -1, \"Nincs ennyi pénz a számládon.\");
}
else SendClientMessage(playerid, -1, \"Nincs bankkártyád.\");
}
else SendClientMessage(playerid, -1, \"A játékos nincs a szerveren.\");
}
return 1;
}
CMD:egyenleg(playerid,params[])
{
new egyenleg[180];
format(egyenleg, sizeof(egyenleg),\"A számládon jelenleg ennyi %s található: %d.\", micsoda, pInfo[playerid][szamla]);
SendClientMessage(playerid, -1, egyenleg);
return 1;
}
CMD:kartyavesz(playerid,params[])
{
if(pInfo[playerid][kartya] == 0)
{
if(GetPlayerScore(playerid) >= 1000)
{
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
pInfo[playerid][kartya] = 1;
dini_IntSet(name, \"Kartya\",pInfo[playerid][kartya]);
SendClientMessage(playerid, -1, \"Megvetted a bankkártyát 1000 pontért.\");
}
else SendClientMessage(playerid, -1, \"Nincs ennyi pontod.(1000)\");
}
else SendClientMessage(playerid, -1, \"Már van bankkártyád.\");
return 1;
}[/pawn]
[pawn]Pawn compiler 3.2.3664 Copyright © 1997-2006, ITB CompuPhase[/pawn]
-
Ha valamilyen include be van rakva mondjuk a módba vagy fs-ben
pl:
#include <zcmd>
A pawno ---> include mappába be kell rakni az .inc fájlt különben Errort fog írni az adott sorra
-
javitott verzió ezzel nem lessz gond
http://hotfile.com/dl/146410386/e79b97d/Untitled.pwn.html
-
tegyük fel! Itt a bankrendszer script annak is az elején.. azokat be kell újra másolni?
nem kell ezekkel az include kkal semmit csinálni igen... valamiért error ozik az FS nekem sok errort irt ki de ez nem az include hibája
Dupla hozzászólás automatikusan összefûzve. ( 2012. február 13. - 15:04:23 )
a Script nekem igy nem error ozik probáld meg igy müködni fog
[pawn]
#include <a_samp>
#include <dini>
#include <zcmd>
#include <sscanf>
enum info
{
szamla,
kartya
}
new micsoda[100];
new pInfo[MAX_PLAYERS][info];
public OnFilterScriptInit()
{
micsoda = \"pont\";
new fle[MAX_PLAYER_NAME];
for(new i=0; i < MAX_PLAYERS; i++)
{
GetPlayerName(i, fle, sizeof(fle));
if(dini_Exists(fle))
{
if(dini_Int(fle, \"Kartya\") == 1)
{
pInfo[kartya] = dini_Int(fle, \"Kartya\");
pInfo[szamla] = dini_Int(fle, \"Bank\");
}
}
}
return 1;
}
public OnFilterScriptExit()
{
for(new i=0; i < MAX_PLAYERS; i++)
{
pInfo[kartya] = 0;
pInfo[szamla] = 0;
}
return 1;
}
CMD:betesz(playerid,params[])
{
new
osszeg;
if(sscanf(params,\"i\",osszeg)) return SendClientMessage(playerid,0x00FF00,\"Használat: /betesz [Összeg]\");
{
if(pInfo[playerid][kartya] == 1)
{
if(osszeg >= GetPlayerScore(playerid))
{
SetPlayerScore(playerid, GetPlayerScore(playerid) - osszeg);
pInfo[playerid][szamla] += osszeg;
new str[180];
format(str, sizeof(str),\"A számládon jelenleg ennyi %s található: %d\", micsoda, pInfo[playerid][szamla]);
SendClientMessage(playerid, -1, str);
}
else SendClientMessage(playerid, -1, \"Nincs ennyi pontod.\");
}
else SendClientMessage(playerid, -1, \"Nincs bankkártyád.\");
}
return 1;
}
CMD:kivesz(playerid,params[])
{
new
osszeg;
if(sscanf(params,\"i\",osszeg)) return SendClientMessage(playerid,0x00FF00,\"Használat: /kivesz [Összeg]\");
{
if(pInfo[playerid][kartya] == 1)
{
if(osszeg <= pInfo[playerid][szamla])
{
SetPlayerScore(playerid, GetPlayerScore(playerid) + osszeg);
pInfo[playerid][szamla] -= osszeg;
new str[180];
format(str, sizeof(str),\"A számládon jelenleg ennyi %s található: %d\", micsoda, pInfo[playerid][szamla]);
SendClientMessage(playerid, -1, str);
}
else SendClientMessage(playerid, -1, \"Nincs ennyi pontod.\");
}
else SendClientMessage(playerid, -1, \"Nincs bankkártyád.\");
}
return 1;
}
CMD:atutal(playerid,params[])
{
new
ID,
osszeg,
str[128],
strr[128],
File[MAX_PLAYER_NAME],
Filee[MAX_PLAYER_NAME];
if(sscanf(params,\"ii\",ID,osszeg)) return SendClientMessage(playerid,0x00FF00,\"Használat: /atutal [iD] [Összeg]\");
{
if(IsPlayerConnected(ID))
{
if(pInfo[playerid][kartya] == 1)
{
if(pInfo[playerid][szamla] >= osszeg)
{
pInfo[iD][szamla] += osszeg;
GetPlayerName(ID, File, sizeof(File));
dini_IntSet(File,\"Bank\",pInfo[iD][szamla]);
pInfo[playerid][szamla] -= osszeg;
GetPlayerName(playerid, Filee, sizeof(Filee));
dini_IntSet(Filee, \"Bank\",pInfo[playerid][szamla]);
format(strr, sizeof(strr), \"%s átutalt a számládra %d$-t.\",Filee,osszeg);
format(str, sizeof(str), \"%d$-t utaltál %s számlájára.\",File, osszeg);
SendClientMessage(playerid, -1, str);
SendClientMessage(ID, -1, strr);
}
else SendClientMessage(playerid, -1, \"Nincs ennyi pénz a számládon.\");
}
else SendClientMessage(playerid, -1, \"Nincs bankkártyád.\");
}
else SendClientMessage(playerid, -1, \"A játékos nincs a szerveren.\");
}
return 1;
}
CMD:egyenleg(playerid,params[])
{
new egyenleg[180];
format(egyenleg, sizeof(egyenleg),\"A számládon jelenleg ennyi %s található: %d.\", micsoda, pInfo[playerid][szamla]);
SendClientMessage(playerid, -1, egyenleg);
return 1;
}
CMD:kartyavesz(playerid,params[])
{
if(pInfo[playerid][kartya] == 0)
{
if(GetPlayerScore(playerid) >= 1000)
{
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
pInfo[playerid][kartya] = 1;
dini_IntSet(name, \"Kartya\",pInfo[playerid][kartya]);
SendClientMessage(playerid, -1, \"Megvetted a bankkártyát 1000 pontért.\");
}
else SendClientMessage(playerid, -1, \"Nincs ennyi pontod.(1000)\");
}
else SendClientMessage(playerid, -1, \"Már van bankkártyád.\");
return 1;
}[/pawn]
[pawn]Pawn compiler 3.2.3664 Copyright © 1997-2006, ITB CompuPhase[/pawn]
[/quote]
Köszi megnyugodtam :D
-
A téma megoldódott!
Máskor zárj!
[mod]Zárok[/mod]