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

Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 3465 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

Internetas pilnas to :D
Kazkas tokio?

CMD:dice(playerid, params[]){
	new bet;
	if (sscanf(params, "i",bet))
	{
		SendClientMessage(playerid,MSGCMDS_COLOR, "Usage: \"/Dice <amount to bet>\"");
	}
	else
	{
		if (bet<1)
		{
			SendClientMessage(playerid,MSGFAIL_COLOR, "Are you kidding me? Bet a positive amount.");
		}
		else if (bet>1000000)
		{
			SendClientMessage(playerid,MSGFAIL_COLOR, "Erm.. To protect a player from losing all his Money, theres a Limit of $1,000,000");
		}
		else
		{
			new Cash=GetPlayerMoney(playerid);
			if (Cash<bet)
			{
				new string[128];
				format(string,sizeof(string),"No Money - No Bet. Your Cash: $%i",Cash);
				SendClientMessage(playerid,MSGFAIL_COLOR,string);
			}
			else
			{
				new NumberDrawn11,NumberDrawn12,NumberDouble1,NumberDrawn21,NumberDrawn22,NumberDouble2,Winner;
				NumberDrawn11=random(6)+1;
				NumberDrawn12=random(6)+1;
				if (NumberDrawn11==NumberDrawn12) NumberDouble1=NumberDrawn11;
				NumberDrawn21=random(6)+1;
				NumberDrawn22=random(6)+1;
				if (NumberDrawn21==NumberDrawn22) NumberDouble2=NumberDrawn21;
				if (NumberDrawn11+NumberDrawn12>NumberDrawn21+NumberDrawn22)
				{
					Winner=1;
				}
				else if (NumberDrawn11+NumberDrawn12<NumberDrawn21+NumberDrawn22)
				{
					Winner=2;
				}
				else
				{
					if (NumberDouble1>NumberDouble2) Winner=1;
					else if (NumberDouble1<NumberDouble2) Winner=2;
				}
				new string[64];
				format(string,sizeof(string),"Numbers Diced 1: %d %d",NumberDrawn11,NumberDrawn12);
				SendClientMessage(playerid,MSGINFO_COLOR,string);
				format(string,sizeof(string),"Numbers Diced 2: %d %d",NumberDrawn21,NumberDrawn22);
				SendClientMessage(playerid,MSGINFO_COLOR,string);
				if (Winner==1)
				{
					if (NumberDouble1>0)
					{
						format(string,sizeof(string),"You won $%d, a double!",bet*2);
						SendClientMessage(playerid,MSGSUCC_COLOR,string);
						SetPVarInt(playerid,"Money",GetPVarInt(playerid,"Money")+bet*2);
						GivePlayerMoney(playerid,bet*2);
					}
					else
					{
						format(string,sizeof(string),"You won $%d",bet);
						SendClientMessage(playerid,MSGSUCC_COLOR,string);
						SetPVarInt(playerid,"Money",GetPVarInt(playerid,"Money")+bet);
						GivePlayerMoney(playerid,bet);
					}
				}
				else if (Winner==2)
				{
					format(string,sizeof(string),"You lost $%d",bet);
					SendClientMessage(playerid,MSGFAIL_COLOR,string);
					SetPVarInt(playerid,"Money",GetPVarInt(playerid,"Money")-bet);
					GivePlayerMoney(playerid,-bet);
				}
				else if (Winner==0)
				{
					format(string,sizeof(string),"Draw",bet);
					SendClientMessage(playerid,MSGFAIL_COLOR,string);
				}
			}
		}
	}
	return 1;
}

Aciu, ieskojau nieko panasaus nebuvau rades, visur budavo arba nesamoniu prirasita arba mazai parasyta. +rep


 

Internetas pilnas to :D
Kazkas tokio?

CMD:dice(playerid, params[]){
	new bet;
	if (sscanf(params, "i",bet))
	{
		SendClientMessage(playerid,MSGCMDS_COLOR, "Usage: \"/Dice <amount to bet>\"");
	}
	else
	{
		if (bet<1)
		{
			SendClientMessage(playerid,MSGFAIL_COLOR, "Are you kidding me? Bet a positive amount.");
		}
		else if (bet>1000000)
		{
			SendClientMessage(playerid,MSGFAIL_COLOR, "Erm.. To protect a player from losing all his Money, theres a Limit of $1,000,000");
		}
		else
		{
			new Cash=GetPlayerMoney(playerid);
			if (Cash<bet)
			{
				new string[128];
				format(string,sizeof(string),"No Money - No Bet. Your Cash: $%i",Cash);
				SendClientMessage(playerid,MSGFAIL_COLOR,string);
			}
			else
			{
				new NumberDrawn11,NumberDrawn12,NumberDouble1,NumberDrawn21,NumberDrawn22,NumberDouble2,Winner;
				NumberDrawn11=random(6)+1;
				NumberDrawn12=random(6)+1;
				if (NumberDrawn11==NumberDrawn12) NumberDouble1=NumberDrawn11;
				NumberDrawn21=random(6)+1;
				NumberDrawn22=random(6)+1;
				if (NumberDrawn21==NumberDrawn22) NumberDouble2=NumberDrawn21;
				if (NumberDrawn11+NumberDrawn12>NumberDrawn21+NumberDrawn22)
				{
					Winner=1;
				}
				else if (NumberDrawn11+NumberDrawn12<NumberDrawn21+NumberDrawn22)
				{
					Winner=2;
				}
				else
				{
					if (NumberDouble1>NumberDouble2) Winner=1;
					else if (NumberDouble1<NumberDouble2) Winner=2;
				}
				new string[64];
				format(string,sizeof(string),"Numbers Diced 1: %d %d",NumberDrawn11,NumberDrawn12);
				SendClientMessage(playerid,MSGINFO_COLOR,string);
				format(string,sizeof(string),"Numbers Diced 2: %d %d",NumberDrawn21,NumberDrawn22);
				SendClientMessage(playerid,MSGINFO_COLOR,string);
				if (Winner==1)
				{
					if (NumberDouble1>0)
					{
						format(string,sizeof(string),"You won $%d, a double!",bet*2);
						SendClientMessage(playerid,MSGSUCC_COLOR,string);
						SetPVarInt(playerid,"Money",GetPVarInt(playerid,"Money")+bet*2);
						GivePlayerMoney(playerid,bet*2);
					}
					else
					{
						format(string,sizeof(string),"You won $%d",bet);
						SendClientMessage(playerid,MSGSUCC_COLOR,string);
						SetPVarInt(playerid,"Money",GetPVarInt(playerid,"Money")+bet);
						GivePlayerMoney(playerid,bet);
					}
				}
				else if (Winner==2)
				{
					format(string,sizeof(string),"You lost $%d",bet);
					SendClientMessage(playerid,MSGFAIL_COLOR,string);
					SetPVarInt(playerid,"Money",GetPVarInt(playerid,"Money")-bet);
					GivePlayerMoney(playerid,-bet);
				}
				else if (Winner==0)
				{
					format(string,sizeof(string),"Draw",bet);
					SendClientMessage(playerid,MSGFAIL_COLOR,string);
				}
			}
		}
	}
	return 1;
}

Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 3465 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ą...