public PayDay()
{
	new string[128];
	new account,interest;
	new rent = 0;
	for(new i = 0; i < MAX_PLAYERS; i++)
	{
		if(IsPlayerConnected(i))
		{
		  if(PlayerInfo[i][pLevel] > 0)
		  {
			  if(MoneyMessage[i]==1)
				{
				  GameTextForPlayer(i, "~r~Ikliuvai!", 2000, 1);
				  SetPlayerInterior(i, 6);
				  PlayerInfo[i][pInt] = 6;
			  		SetPlayerPos(i, 264.6288,77.5742,1001.0391);
		      PlayerInfo[i][pJailed] = 1;
		      ResetPlayerWeapons(i);
		      ResetPlayerMoney(i);
					WantedPoints[i] = 0;
					PlayerInfo[i][pJailTime] = 240;
					format(string, sizeof(string), "Tu buvai įkalintas %d sekundėms.", PlayerInfo[i][pJailTime]);
					SendClientMessage(i, COLOR_WHITE, string);
				}
				new playername2[MAX_PLAYER_NAME];
				GetPlayerName(i, playername2, sizeof(playername2));
				account = PlayerInfo[i][pAccount];
				new key = PlayerInfo[i][pPhousekey];
				if(key != 255)
				{
					rent = HouseInfo[key][hRent];
					if(strcmp(playername2, HouseInfo[key][hOwner], true) == 0)
					{
						rent = 0;
					}
					else if(rent > GetPlayerMoney(i))
					{
						PlayerInfo[i][pPhousekey] = 255;
						SendClientMessage(i, COLOR_WHITE, "Tu buvai iљkrausytas, nes nesumokėjai nuomos.");
						rent = 0;
					}
					HouseInfo[key][hTakings] = HouseInfo[key][hTakings]+rent;
				}
				new tmpintrate;
				if (key != 255 && strcmp(playername2, HouseInfo[key][hOwner], true) == 0)
				{
					tmpintrate = intrate+2;
				}
				else
				{
					tmpintrate = 1;
				}
				if(PlayerInfo[i][pPayDay] >= 5)
				{
					new checks;
					switch(PlayerInfo[i][pLeader])
					{
					  /*
					    Patobulintos LEADERIŲ algos.
						*/
					  case 1:
					  { // Љerifas
					    checks = 3000;
						}
						case 4:
						{ // Medikas
						  checks = 2500;
						}
						case 7:
						{ // Meras
						  checks = 3000;
						}
						case 9:
						{ // Ћurnalistas
						  checks = 1800;
						}
						case 10:
						{ // Taksistas
						  checks = 1850;
						}
						case 14:
						{ // Inkasatorius
						  checks = 1300;
						}
					}
					switch(PlayerInfo[i][pMember])
					{
					  /*
					    Algos pagal ranką.
					  */
						case 1:
						{ // Policininkas
							switch(PlayerInfo[i][pRank])
							{
				  			case 1: checks = 800;
				  			case 2: checks = 1200;
				  			case 3: checks = 1400;
				  			case 4: checks = 1600;
				  			case 5: checks = 1800;
				  			case 6: checks = 2000;
				  			case 7: checks = 2500;
				  			case 8: checks = 3000;
				  			}
						}
						case 4:
						{ // Medikas
							switch(PlayerInfo[i][pRank])
							{
				  			case 1: checks = 700;
				  			case 2: checks = 1100;
				  			case 3: checks = 1450;
				  			case 4: checks = 1800;
				  			case 5: checks = 2150;
				  			case 6: checks = 2500;
				  			}
						}
						case 7:
						{ // Meras
							switch(PlayerInfo[i][pRank])
							{
				  			case 1: checks = 700;
				  			case 2: checks = 1100;
				  			case 3: checks = 1450;
				  			case 4: checks = 200;
				  			case 5: checks = 2500;
				  			case 6: checks = 3000;
				  			}
						}
						case 9:
						{ // TV 8
							switch(PlayerInfo[i][pRank])
							{
				  			case 1: checks = 500;
				  			case 2: checks = 600;
				  			case 3: checks = 700;
				  			case 4: checks = 800;
				  			case 5: checks = 1500;
				  			case 6: checks = 1800;
				  			}
						}
						case 10:
						{ // Taksistas
							switch(PlayerInfo[i][pRank])
							{
				  			case 1: checks = 550;
				  			case 2: checks = 650;
				  			case 3: checks = 750;
				  			case 4: checks = 850;
				  			case 5: checks = 1550;
				  			case 6: checks = 1850;
				  			}
						}
						case 14:
						{ // Inkasatorius
							switch(PlayerInfo[i][pRank])
							{
				  			case 1: checks = 800;
				  			case 2: checks = 900;
				  			case 3: checks = 1000;
				  			case 4: checks = 1100;
				  			case 5: checks = 1200;
				  			case 6: checks = 1300;
				  			}
						}
					}

					if(PlayerInfo[i][pLevel] > 0)
					{
					  new bonus = PlayerInfo[i][pPayCheck] / 5;
					  checks += bonus;
					}
					PlayerInfo[ i ][ pAccount ] = PlayerInfo[ i ][ pAccount ]-Tax;
				  new ebill = (PlayerInfo[i][pAccount]/10000)*(PlayerInfo[i][pLevel]);
				  account += checks;
				  if(PlayerInfo[i][pAccount] > 0)
				  {
				  	PlayerInfo[i][pAccount] -= ebill;
				  	SBizzInfo[4][sbTill] += ebill;
					}
					else
					{
					  ebill = 0;
					}
					interest = (PlayerInfo[i][pAccount]/1000)*(tmpintrate);
					PlayerInfo[i][pExp]++;
					PlayerPlayMusic(i);
					PlayerInfo[i][pAccount] = account+interest;
					SendClientMessage(i, COLOR_GREEN, "**** BANKO INFORMACIJA ****");
					format(string, sizeof(string), " Gauta algos: $%d  Mokesčiai: -$%d", checks, TaxValue);
					SendClientMessage(i, COLOR_WHITE, string);
					if(PlayerInfo[i][pPhousekey] != 255 || PlayerInfo[i][pPbiskey] != 255)
					{
					  format(string, sizeof(string), " Mokesčiai uћ elektrą: -$%d", ebill);
						SendClientMessage(i, COLOR_GRAD1, string);
					}
					format(string, sizeof(string), " Senasis balancas: $%d", account - checks);
					SendClientMessage(i, COLOR_WHITE, string);
					format(string, sizeof(string), " Palūkanų procentas: 0.%d",tmpintrate);
					SendClientMessage(i, COLOR_GRAD2, string);
					format(string, sizeof(string), " Gauta palūkanų: $%d", interest);
					SendClientMessage(i, COLOR_GRAD3, string);
					format(string, sizeof(string), " Naujasis balancas: $%d", PlayerInfo[i][pAccount]);
					SendClientMessage(i, COLOR_GRAD5, string);
					format(string, sizeof(string), " Mokesčiai uћ nuomą: -$%d", rent);
					SendClientMessage(i, COLOR_GRAD5, string);
          SendClientMessage(i, COLOR_GREEN, "***************************");
					format(string, sizeof(string), "~y~Alga");
					GameTextForPlayer(i, string, 5000, 1);
					rent = 0;
					PlayerInfo[i][pPayDay] = 0;
					PlayerInfo[i][pPayCheck] = 0;
					PlayerInfo[i][pConnectTime] += 1;

				}
				else
				{
				  SendClientMessage(i, COLOR_WHITE, "* Jūs neћaidėte pakankamai, kad gautumėte algą.");
				}
			}
		}
	}
	SaveAccounts();
	Checkprop();
	return 1;
}