Peršokti į turinį
  • ŽAIDIMAI
  • , ŽAIDIMAI
  • ŽAIDIMAI

Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 3029 dienas (-ų). Patariame sukurti naują temą, o ne rašyti naują pranešimą.

Už neaktyvių temų prikėlimą galite sulaukti įspėjimo ir pranešimo pašalinimo!

Recommended Posts

Turiu NKG.LT gamemode.

Serveryje yra vienas verlsas, parašyta, kad į valandą gauni 1€ ar kažkas tokio, bet bugas tame, kad kas minutę į verslo fondą eina tiek pinigų kiek tu turi algoje. Tarkim aš turiu 10k algoj ir man kas 1min į verslo pelną dasidės 10k. Verslas veikia ini failais, o visa kita yra ant mysql, nežinau ar tai kuo nors padėjo.

To verslo scriptas:

stock CreateBusinesses() // verslai
{
	for(new b = 0; b < MAX_BUSINESSES; b++) format(bInfo[b][bOwner], 2, "-");

	AddBusiness(2017.4293,1024.2268,996.8740, 600000, 1, "Casino");
	return 1;
}

stock AddBusiness(Float:Biz_X, Float:Biz_Y, Float:Biz_Z, Biz_Kaina, Biz_Navaras, Biz_Pav[]) // by Johurt
{
	CreatedBusinesses ++;
    if(CreatedBusinesses > MAX_BUSINESSES - 1)
    {
        print("Klaida. Serveris sukure daugiau verslu nei nustatyta MAX_BUSINESSES.");
        SendRconCommand("exit");
        return 1;
    }
    new file[128], str[340], b = CreatedBusinesses;
    format(file, sizeof(file), "saves/businesses/%d.txt", b);
	if(!dini_Exists(file))
	{
	    bInfo[b][bBuyed] = false;
	    format(bInfo[b][bOwner], 2, "-");
	    format(bInfo[b][bName], 128, "%s", Biz_Pav);
	    bInfo[b][bMoney] = 0;
	    bInfo[b][bProfit] = Biz_Navaras;
		bInfo[b][bCost] = Biz_Kaina;
		bInfo[b][bPos_X] = Biz_X;
		bInfo[b][bPos_Y] = Biz_Y;
		bInfo[b][bPos_Z] = Biz_Z;
		bInfo[b][bLabel] =  Create3DTextLabel("-", 0xF3FF02FF, bInfo[b][bPos_X], bInfo[b][bPos_Y], bInfo[b][bPos_Z], 7.0, 0, 0);
		format(str, sizeof(str), "Verslo pavadinimas: {DAB41A}%s.\n{ffffff}Verslas {DAB41A}parduodamas.\n{ffffff}Verslo kaina: {DAB41A}%d$.\n{ffffff}Verslas atnesa {DAB41A}%d/1h\n{ffffff}Noredami nusipirkti spauskite {DAB41A}ENTER.", bInfo[b][bName], bInfo[b][bCost], bInfo[b][bProfit]);
        Update3DTextLabelText(bInfo[b][bLabel], 0xFFFFFFFF, str);
        SaveBusiness(b);
	}
	else
	{
	    if(dini_Int(file, "Buyed") <= 0) { bInfo[b][bBuyed] = false; } else { bInfo[b][bBuyed] = true; }
		format(bInfo[b][bOwner], 21, "%s", dini_Get(file, "Owner"));
		format(bInfo[b][bName], 128, "%s", Biz_Pav);
	    bInfo[b][bMoney] = dini_Int(file, "Money");
	    bInfo[b][bProfit] = Biz_Navaras;
		bInfo[b][bCost] = Biz_Kaina;
		bInfo[b][bPos_X] = Biz_X;
		bInfo[b][bPos_Y] = Biz_Y;
		bInfo[b][bPos_Z] = Biz_Z;
		bInfo[b][bLabel] =  Create3DTextLabel("-", 0xF3FF02FF, bInfo[b][bPos_X], bInfo[b][bPos_Y], bInfo[b][bPos_Z], 7.0, 0, 0);
		if(!bInfo[b][bBuyed])
		{
			format(str, sizeof(str), "Verslo pavadinimas: {DAB41A}%s.\n{ffffff}Verslas {DAB41A}parduodamas.\n{ffffff}Verslo kaina: {DAB41A}%d$.\n{ffffff}Verslas atnesa {DAB41A}%d/1h\n{ffffff}Noredami nusipirkti spauskite {DAB41A}ENTER.", bInfo[b][bName], bInfo[b][bCost], bInfo[b][bProfit]);
		}
		else
		{
		    format(str, sizeof(str), "Verslo pavadinimas: {DAB41A}%s.\n{ffffff}Verslas {DAB41A}neparduodamas.\n{ffffff}Verslo savininkas: {DAB41A}%s.", bInfo[b][bName], bInfo[b][bOwner]);
		}
		Update3DTextLabelText(bInfo[b][bLabel], 0xFFFFFFFF, str);
	}
	bInfo[b][bPickup] = CreatePickup(1318, 1, bInfo[b][bPos_X], bInfo[b][bPos_Y], bInfo[b][bPos_Z], 0);
	return 1;
}

stock SaveBusiness(businessid) // by Johurt
{
    new file[128], b = businessid;
    format(file, sizeof(file), "saves/businesses/%d.txt", b);
    if(!dini_Exists(file)) dini_Create(file);
    dini_BoolSet(file,  "Buyed",		bInfo[b][bBuyed]);
    dini_Set(file,		"Owner",		bInfo[b][bOwner]);
	dini_IntSet(file,	"Money",		bInfo[b][bMoney]);
	return 1;
}

stock UpdateBusiness(businessid) // by Johurt
{
	new b = businessid, str[340];
	if(!bInfo[b][bBuyed])
	{
		format(str, sizeof(str), "Verslo pavadinimas: {DAB41A}%s.\n{ffffff}Verslas {DAB41A}parduodamas.\n{ffffff}Verslo kaina: {DAB41A}%d$.\n{ffffff}Verslas atnesa {DAB41A}%d/1h\n{ffffff}Noredami nusipirkti spauskite {DAB41A}ENTER.", bInfo[b][bName], bInfo[b][bCost], bInfo[b][bProfit]);
	}
	else
	{
		format(str, sizeof(str), "Verslo pavadinimas: {DAB41A}%s.\n{ffffff}Verslas {DAB41A}neparduodamas.\n{ffffff}Verslo savininkas: {DAB41A}%s.", bInfo[b][bName], bInfo[b][bOwner]);
	}
	Update3DTextLabelText(bInfo[b][bLabel], 0xFFFFFFFF, str);
	return 1;
}

Yra daugiau kodo ir jis yra visas atskirai, jeigu tiek neužtenka, pakvieskit į skype denas11012 parodysiu visą kodą arba atsiūsiu gm. Kas padės +rep

Ačiū iš anksto :)

Šitas kodas neturi visiškai nieko bendro su problema, kurią parašei, pats pagalvok prie ko čia kažkokie verslo sukūrimai, saugojimai, krovimai, jeigu tau kas minutę eina tiek kiek turėtų :D Šiaip turi rast timerį, kuriame prideda pelną, tik nerašyk man į PM :D Jei norėsi pats susirasi :D

4 minutes prieš, Denas_Rokas parašė:

tu čia man *Myliu SuperGames.lt* nrml paaiškint negalėjai? :D aš vpš nesuprantu kas tas taimeris ir kuo jis čia dėtas :D

Kaip tau dar galima paaiškint, kad suprastum jei paprasčiau pasakyt nebeina? Jei pats matai, kad tau neaišku tai ką tu darai, tai gal per anksti lysti į tokius sudėtingus reikalus?

prieš 15 valandas(-ų), perestukinas maskatuoklis parašė:

koks skirtumas motyvuotas ar ne, paprasiau padaryt o uz tai repais atsiskaitysiu, kas gales tas pades. Neieskau motyvatoriu.

(redaguota)
5 minutes prieš, MartynasK parašė:

Kaip tau dar galima paaiškint, kad suprastum jei paprasčiau pasakyt nebeina? Jei pats matai, kad tau neaišku tai ką tu darai, tai gal per anksti lysti į tokius sudėtingus reikalus?

aš bandau mokytis.. ir mokytis su kitų pagalba yra daug papraščiau nei pačiam kažką bandyt ir po to viską sugadinti... ir db jei gerai suprantu taimerio reikšmią tai prčm čia jis kaltas, kad aš gaunu į verslą ne 1e ar kažkiek i val o *Myliu SuperGames.lt* tūkstančius... db vėl paaiškinsiu.. pas mane algoj buvo 3625~ atėjus po 2min versle buvo 7250~ ...

Redaguota , nario Denas_Rokas
prieš 1 valandą, Denas_Rokas parašė:

Turiu NKG.LT gamemode.

Serveryje yra vienas verlsas, parašyta, kad į valandą gauni 1€ ar kažkas tokio, bet bugas tame, kad kas minutę į verslo fondą eina tiek pinigų kiek tu turi algoje. Tarkim aš turiu 10k algoj ir man kas 1min į verslo pelną dasidės 10k. Verslas veikia ini failais, o visa kita yra ant mysql, nežinau ar tai kuo nors padėjo.

To verslo scriptas:


stock CreateBusinesses() // verslai
{
	for(new b = 0; b < MAX_BUSINESSES; b++) format(bInfo[b][bOwner], 2, "-");

	AddBusiness(2017.4293,1024.2268,996.8740, 600000, 1, "Casino");
	return 1;
}

stock AddBusiness(Float:Biz_X, Float:Biz_Y, Float:Biz_Z, Biz_Kaina, Biz_Navaras, Biz_Pav[]) // by Johurt
{
	CreatedBusinesses ++;
    if(CreatedBusinesses > MAX_BUSINESSES - 1)
    {
        print("Klaida. Serveris sukure daugiau verslu nei nustatyta MAX_BUSINESSES.");
        SendRconCommand("exit");
        return 1;
    }
    new file[128], str[340], b = CreatedBusinesses;
    format(file, sizeof(file), "saves/businesses/%d.txt", b);
	if(!dini_Exists(file))
	{
	    bInfo[b][bBuyed] = false;
	    format(bInfo[b][bOwner], 2, "-");
	    format(bInfo[b][bName], 128, "%s", Biz_Pav);
	    bInfo[b][bMoney] = 0;
	    bInfo[b][bProfit] = Biz_Navaras;
		bInfo[b][bCost] = Biz_Kaina;
		bInfo[b][bPos_X] = Biz_X;
		bInfo[b][bPos_Y] = Biz_Y;
		bInfo[b][bPos_Z] = Biz_Z;
		bInfo[b][bLabel] =  Create3DTextLabel("-", 0xF3FF02FF, bInfo[b][bPos_X], bInfo[b][bPos_Y], bInfo[b][bPos_Z], 7.0, 0, 0);
		format(str, sizeof(str), "Verslo pavadinimas: {DAB41A}%s.\n{ffffff}Verslas {DAB41A}parduodamas.\n{ffffff}Verslo kaina: {DAB41A}%d$.\n{ffffff}Verslas atnesa {DAB41A}%d/1h\n{ffffff}Noredami nusipirkti spauskite {DAB41A}ENTER.", bInfo[b][bName], bInfo[b][bCost], bInfo[b][bProfit]);
        Update3DTextLabelText(bInfo[b][bLabel], 0xFFFFFFFF, str);
        SaveBusiness(b);
	}
	else
	{
	    if(dini_Int(file, "Buyed") <= 0) { bInfo[b][bBuyed] = false; } else { bInfo[b][bBuyed] = true; }
		format(bInfo[b][bOwner], 21, "%s", dini_Get(file, "Owner"));
		format(bInfo[b][bName], 128, "%s", Biz_Pav);
	    bInfo[b][bMoney] = dini_Int(file, "Money");
	    bInfo[b][bProfit] = Biz_Navaras;
		bInfo[b][bCost] = Biz_Kaina;
		bInfo[b][bPos_X] = Biz_X;
		bInfo[b][bPos_Y] = Biz_Y;
		bInfo[b][bPos_Z] = Biz_Z;
		bInfo[b][bLabel] =  Create3DTextLabel("-", 0xF3FF02FF, bInfo[b][bPos_X], bInfo[b][bPos_Y], bInfo[b][bPos_Z], 7.0, 0, 0);
		if(!bInfo[b][bBuyed])
		{
			format(str, sizeof(str), "Verslo pavadinimas: {DAB41A}%s.\n{ffffff}Verslas {DAB41A}parduodamas.\n{ffffff}Verslo kaina: {DAB41A}%d$.\n{ffffff}Verslas atnesa {DAB41A}%d/1h\n{ffffff}Noredami nusipirkti spauskite {DAB41A}ENTER.", bInfo[b][bName], bInfo[b][bCost], bInfo[b][bProfit]);
		}
		else
		{
		    format(str, sizeof(str), "Verslo pavadinimas: {DAB41A}%s.\n{ffffff}Verslas {DAB41A}neparduodamas.\n{ffffff}Verslo savininkas: {DAB41A}%s.", bInfo[b][bName], bInfo[b][bOwner]);
		}
		Update3DTextLabelText(bInfo[b][bLabel], 0xFFFFFFFF, str);
	}
	bInfo[b][bPickup] = CreatePickup(1318, 1, bInfo[b][bPos_X], bInfo[b][bPos_Y], bInfo[b][bPos_Z], 0);
	return 1;
}

stock SaveBusiness(businessid) // by Johurt
{
    new file[128], b = businessid;
    format(file, sizeof(file), "saves/businesses/%d.txt", b);
    if(!dini_Exists(file)) dini_Create(file);
    dini_BoolSet(file,  "Buyed",		bInfo[b][bBuyed]);
    dini_Set(file,		"Owner",		bInfo[b][bOwner]);
	dini_IntSet(file,	"Money",		bInfo[b][bMoney]);
	return 1;
}

stock UpdateBusiness(businessid) // by Johurt
{
	new b = businessid, str[340];
	if(!bInfo[b][bBuyed])
	{
		format(str, sizeof(str), "Verslo pavadinimas: {DAB41A}%s.\n{ffffff}Verslas {DAB41A}parduodamas.\n{ffffff}Verslo kaina: {DAB41A}%d$.\n{ffffff}Verslas atnesa {DAB41A}%d/1h\n{ffffff}Noredami nusipirkti spauskite {DAB41A}ENTER.", bInfo[b][bName], bInfo[b][bCost], bInfo[b][bProfit]);
	}
	else
	{
		format(str, sizeof(str), "Verslo pavadinimas: {DAB41A}%s.\n{ffffff}Verslas {DAB41A}neparduodamas.\n{ffffff}Verslo savininkas: {DAB41A}%s.", bInfo[b][bName], bInfo[b][bOwner]);
	}
	Update3DTextLabelText(bInfo[b][bLabel], 0xFFFFFFFF, str);
	return 1;
}

Yra daugiau kodo ir jis yra visas atskirai, jeigu tiek neužtenka, pakvieskit į skype denas11012 parodysiu visą kodą arba atsiūsiu gm. Kas padės +rep

Ačiū iš anksto :)

Tame prikolas yra kad kažkur turi būtį man atrodo kad iš algos gauni ten prie to visos sistemos ir turi ištrint ir paskui laukt ar gausi tiek ar ne buvau susitvarkęs

 

25 minutes prieš, Denas_Rokas parašė:

aš bandau mokytis.. ir mokytis su kitų pagalba yra daug papraščiau nei pačiam kažką bandyt ir po to viską sugadinti... ir db jei gerai suprantu taimerio reikšmią tai prčm čia jis kaltas, kad aš gaunu į verslą ne 1e ar kažkiek i val o *Myliu SuperGames.lt* tūkstančius... db vėl paaiškinsiu.. pas mane algoj buvo 3625~ atėjus po 2min versle buvo 7250~ ...

jei supratai reiksme turi suprast ir paskirti. juk butent taimeris kas minute suveikia ir kazka tai padaro, o siuo atveju atlieka pinigu pridejimo prie verslo pelno funkcija, ir yra tiksliai nurodyta kiek tho ^^ 

26 minutes prieš, Denas_Rokas parašė:

aš bandau mokytis.. ir mokytis su kitų pagalba yra daug papraščiau nei pačiam kažką bandyt ir po to viską sugadinti... ir db jei gerai suprantu taimerio reikšmią tai prčm čia jis kaltas, kad aš gaunu į verslą ne 1e ar kažkiek i val o *Myliu SuperGames.lt* tūkstančius... db vėl paaiškinsiu.. pas mane algoj buvo 3625~ atėjus po 2min versle buvo 7250~ ...

Ir labai gerai, kad mokaisi, tiesiog manau tau per anksti redaguoti rimtas sistemas kai net nežinai kas yra timeris. Pradėk nuo lengvesnių dalykų. O šiaip internere labai daug informacijos yra, jei tik moki ieškotm tikiuosi, kad jau žinai http://wiki.sa-mp.com?

Tai tame timerio ir esmė kad kas kažkokį laiko intervalą jis atlieka kažkokį veiksmą: kas minutę jis padidina verslo pelną. Jame ir turi ieškoti problemos.

prieš 15 valandas(-ų), perestukinas maskatuoklis parašė:

koks skirtumas motyvuotas ar ne, paprasiau padaryt o uz tai repais atsiskaitysiu, kas gales tas pades. Neieskau motyvatoriu.

Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 3029 dienas (-ų). Patariame sukurti naują temą, o ne rašyti naują pranešimą.

Už neaktyvių temų prikėlimą galite sulaukti įspėjimo ir pranešimo pašalinimo!

Prisijungti prie diskusijos

Palikti atsakymą galite iš karto, o užsiregistruoti vėliau. Jeigu jau turite paskyrą mūsų forume, Prisijunkite.

Svečias
Atsakyti šioje temoje...

×   Įklijuotas tekstas turi teksto formatavimą.   Pašalinti teksto formatavimą

  Galimi tik 75 veidukai.

×   Nuoroda buvo automatiškai įterpta.   Įterpti nuorodą paprastai

×   Jūsų ankstesnis pranešimas buvo atkurtas.   Išvalyti redaktorių

×   Jūs negalite įkelti nuotraukas tiesiogiai.Įkelkite arba įdėkite nuotraukas iš URL.

  • Šiame puslapyje naršo:   0 nariai

    • Nėra registruotų narių peržiūrinčių šį forumą.

Skelbimai


×
×
  • Sukurti naują...