Szerző Téma: HDD vásárlása szkript  (Megtekintve 606 alkalommal)

Nem elérhető id100

  • 903
    • Profil megtekintése
HDD vásárlása szkript
« Dátum: 2012. Augusztus 28. - 15:32:09 »
0 Show voters
Hogyan lehet scripten belül pl ZCMD segítségével, ha beírja, hogy /buyhdd
akkor:
kiírjon egy inputos dialogot aminél a szöveg az legyen h Írd be a típust(1,2 vagy 3)
és ha beírja az inputba h 1 akkor -500$, ha 2. akkor -2000 ha 3-as, akkor -ötszázezer$
 scriptfiles\\hdd.txt fájlba bejegyezze h mi a neve, vesszõ, milyen a típus
Ha pedig beírja h /hdd akkor pedig megnézze h milyen hddje van(pl Neked 1-es típusú hdd-d van!)
köszi

Nem elérhető RolePlay

  • 2100
    • Profil megtekintése
HDD vásárlása szkript
« Válasz #1 Dátum: 2012. Augusztus 28. - 16:06:30 »
0 Show voters
megcsinálom. ha nem elõz meg valaki.

HDD vásárlása szkript
« Válasz #2 Dátum: 2012. Augusztus 28. - 16:19:35 »
0 Show voters
#include <a_samp>
#include <zcmd>
#include <dini>
#include <sscanf>
new pHDD[MAX_PLAYERS];
public OnPlayerConnect(playerid) {
if(!fexist(\"hdd.txt\")) dini_Create(\"hdd.txt\");
if(dini_Isset(\"hdd.txt\", PlayerName(playerid))) pHDD[playerid] = dini_Int(\"hdd.txt\", PlayerName(playerid));
else pHDD[playerid] = 0;
return 1;
}
public OnPlayerDisconnect(playerid, reason) {
dini_IntSet(\"hdd.txt\", PlayerName(playerid), pHDD[playerid]);
return 1;
}
CMD:buyhdd(playerid, params[]) {
new hddid,
    hddcash[] = { 0, 500, 2000, 500000 },
    string[128];
if(sscanf(params, \"d\", hddid)) return SendClientMessage(playerid, -1, \"/buyhdd [hddid]\");
if(hddid < 1 || hddid < 3) return SendClientMessage(playerid, -1, \"1-3\");
dini_IntSet(\"hdd.txt\", PlayerName(playerid), hddid);
GivePlayerMoney(playerid, - hddcash[hddid]);
pHDD[playerid] = hddid;
format(string, sizeof(string), \"Vettél egy %d tipusú HDD-t!\", hddid);
return SendClientMessage(playerid, -1, string);
}
stock PlayerName(playerid) {
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
return name;
}

 
nem teszteltem


Idézetet írta: RolePlay date=1346162790\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"27028\" data-ipsquote-contentclass=\"forums_Topic
megcsinálom. ha nem elõz meg valaki.
 
:rolleyes:
« Utoljára szerkesztve: 2012. Augusztus 28. - 16:45:48 írta TengeriMalac »

Nem elérhető RolePlay

  • 2100
    • Profil megtekintése
HDD vásárlása szkript
« Válasz #3 Dátum: 2012. Augusztus 28. - 16:23:11 »
0 Show voters
Kabbe, akkor nem fejezem be :D

HDD vásárlása szkript
« Válasz #4 Dátum: 2012. Augusztus 28. - 16:26:39 »
0 Show voters
Idézetet írta: RolePlay date=1346163791\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"27028\" data-ipsquote-contentclass=\"forums_Topic
Kabbe, akkor nem fejezem be :D
 
<3
befejezheted. kiváncsi vagyok rá. :crazy:

Nem elérhető RolePlay

  • 2100
    • Profil megtekintése
HDD vásárlása szkript
« Válasz #5 Dátum: 2012. Augusztus 28. - 16:29:39 »
0 Show voters
Idézetet írta: TengeriMalac date=1346163999\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"27028\" data-ipsquote-contentclass=\"forums_Topic


Kabbe, akkor nem fejezem be :D
 
<3
befejezheted. kiváncsi vagyok rá. :crazy:
 
[/quote]
Delete. De én dialoggal csináltam :D

HDD vásárlása szkript
« Válasz #6 Dátum: 2012. Augusztus 28. - 16:37:05 »
0 Show voters
Idézetet írta: RolePlay date=1346164179\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"27028\" data-ipsquote-contentclass=\"forums_Topic


 

Kabbe, akkor nem fejezem be :D
 
<3
befejezheted. kiváncsi vagyok rá. :crazy:
 
[/quote]
Delete. De én dialoggal csináltam :D
 
[/quote]
dafaq.. nem olvastam végig.. mind1. :D


Dialogos
 
#include <a_samp>
#include <zcmd>
#include <dini>
new pHDD[MAX_PLAYERS];
public OnPlayerConnect(playerid) {
if(!fexist(\"hdd.txt\")) dini_Create(\"hdd.txt\");
if(dini_Isset(\"hdd.txt\", PlayerName(playerid))) pHDD[playerid] = dini_Int(\"hdd.txt\", PlayerName(playerid));
else pHDD[playerid] = 0;
return 1;
}
public OnPlayerDisconnect(playerid, reason) {
dini_IntSet(\"hdd.txt\", PlayerName(playerid), pHDD[playerid]);
return 1;
}
CMD:buyhdd(playerid, params[]) return ShowPlayerDialog(playerid, 1234, DIALOG_STYLE_INPUT, \"HDD Vendor\", \"Írd be milyet szeretnél\\n1\\t 500$\\n2\\t2000$\\n3\\t500000$\", \"Buy\", \"Close\");
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[]) {
if(dialogid == 1234) {
    new hddcash[] = { 0, 500, 2000, 500000 },
    string[128];
    if(!response) return 1;
    if(!strval(inputtext) || strval(inputtext) < 1 || strval(inputtext) > 3) return ShowPlayerDialog(playerid, 1234, DIALOG_STYLE_INPUT, \"HDD Vendor\", \"Elírtad.\\nÍrd be milyet szeretnél\\n1\\t 500$\\n2\\t2000$\\n3\\t500000$\", \"Buy\", \"Close\");
dini_IntSet(\"hdd.txt\", PlayerName(playerid), strval(inputtext));
GivePlayerMoney(playerid, - hddcash[strval(inputtext)]);
pHDD[playerid] = strval(inputtext);
format(string, sizeof(string), \"Vettél egy %d tipusú HDD-t!\", strval(inputtext));
return SendClientMessage(playerid, -1, string);
}
return 0;
}
stock PlayerName(playerid) {
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
return name;
}
« Utoljára szerkesztve: 2012. Augusztus 28. - 16:45:27 írta TengeriMalac »

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal