Szerző Téma: Fizetés bug  (Megtekintve 617 alkalommal)

Nem elérhető sz18k

Fizetés bug
« Dátum: 2011. Augusztus 21. - 09:46:28 »
0 Show voters
Van egy fizetés rendszerem, de nem mûködik, más játékmódokban hasonlóan van megcsinálva, és ott tökéletesen mûködik minden, kérlek segítsetek!
Ez a fizetésrendszer:
[pawn]public PayDay()
{
new string[128];
new account,interest;
new rent = 0;
for(new i = 0; i < MAX_PLAYERS; i++)
{
   if(IsPlayerConnected(i) && !IsPlayerNPC(i))
   {
       if(PlayerInfo[pLevel] > 0)

       {


          if(MoneyMessage
==1)

         {


             new bank = PlayerInfo
[pAccount];

             SendClientMessage(i, COLOR_LIGHTRED, \"Nem tudtad kifizetni a tartozásod, ezért börtönbe kerültél.\");


             GameTextForPlayer(i, \"~r~Letartóztattak!\", 2000, 1);


             SafeSetPlayerInterior(i, 6);


               SafeSetPlayerPos(i, 264.6288,77.5742,1001.0391);


               PlayerInfo
[pJailed] = 1;

               SafeResetPlayerWeapons(i);


               SafeResetPlayerMoney(i);


            SafeGivePlayerMoney(i, 1);


            WantedPoints
= 0;

            PlayerInfo
[pAccount] = (bank + DebtMoney);

            DebtMoney
= 0;

            PlayerInfo
[pJailTime] = 240;

            TextDrawShowForPlayer(i, Textdraw1
);

            format(string, sizeof(string), \"Börtönbe zártak %d másodpercre.   Óvadék: Nincs\", PlayerInfo
[pJailTime]);

            SendClientMessage(i, COLOR_WHITE, string);


         }


         new playername2[MAX_PLAYER_NAME];


         GetPlayerName(i, playername2, sizeof(playername2));


         account = PlayerInfo
[pAccount];

         new key = PlayerInfo
[pPhousekey];

         if(key != 9999)


         {


            rent = HouseInfo[key][hRent];


            if(strcmp(playername2, HouseInfo[key][hOwner], true) == 0)


            {


               rent = 0;


            }


            else if(rent > GetPlayerMoney(i))


            {


               PlayerInfo
[pPhousekey] = 9999;

               SendClientMessage(i, COLOR_WHITE, \"Kilakoltattak.\");


               rent = 0;


            }


            HouseInfo[key][hTakings] = HouseInfo[key][hTakings]+rent;


         }


         new tmpintrate;


         if (key != 999 && strcmp(playername2, HouseInfo[key][hOwner], true) == 0)


         {


             if(PlayerInfo
[pRegularRank] > 0) { tmpintrate = intrate+4; }

            else { tmpintrate = intrate+2; }//HouseInfo[key][hLevel]


         }


         else


         {


             if(PlayerInfo
[pRegularRank] > 0) { tmpintrate = 3; }

            else { tmpintrate = 1; }


         }


         if(PlayerInfo
[pPayDay] >= 5)

         {


             Tax += TaxValue;//Should work for every player online


             PlayerInfo
[pAccount] -= TaxValue;

            new checks = PlayerInfo
[pPayCheck] / 5;

            if(PlayerInfo
[pRegularRank] > 0)

            {


                new bonus = PlayerInfo
[pPayCheck] / 10;

                checks += bonus;


            }


             new ebill = (PlayerInfo
[pAccount]/10000)*(PlayerInfo[pLevel]);

             account += checks;


             if(PlayerInfo
[pAccount] > 0)

             {


                PlayerInfo
[pAccount] -= ebill;

                SBizzInfo[4][sbTill] += ebill;


            }


            else


            {


                ebill = 0;


            }


            interest = (PlayerInfo
[pAccount]/1000)*(tmpintrate);

            PlayerInfo
[pExp]++;

            PlayerPlayMusic(i);


            PlayerInfo
[pAccount] = account+interest;

            SendClientMessage(i, COLOR_GREEN, \"|___BANKI NYILATKOZAT___|\");


            format(string, sizeof(string), \"  Fizetés: $%d  Adó: -$%d\", checks, TaxValue);


            SendClientMessage(i, COLOR_WHITE, string);


            if(PlayerInfo
[pPhousekey] != 9999 || PlayerInfo[pPbiskey] != 9999)

            {


                format(string, sizeof(string), \"  Villanyszámla: -$%d\", ebill);


               SendClientMessage(i, COLOR_GRAD1, string);


            }


            format(string, sizeof(string), \"  Egyenleg: $%d\", account - checks);


            SendClientMessage(i, COLOR_WHITE, string);


            format(string, sizeof(string), \"  Kamatláb: 0.%d százalék\",tmpintrate);


            SendClientMessage(i, COLOR_GRAD2, string);


            format(string, sizeof(string), \"  Kamatozott összeg: $%d\", interest);


            SendClientMessage(i, COLOR_GRAD3, string);


            SendClientMessage(i, COLOR_GREEN, \"|--------------------------------------|\");


            format(string, sizeof(string), \"  Új egyenleg: $%d\", PlayerInfo
[pAccount]);

            SendClientMessage(i, COLOR_GRAD5, string);


            format(string, sizeof(string), \"  Bérlés: -$%d\", rent);


            SendClientMessage(i, COLOR_GRAD5, string);


            format(string, sizeof(string), \"~y~Fizetés~n~~w~Csekkek fizetve a számládra\");


            GameTextForPlayer(i, string, 5000, 1);


            rent = 0;


            PlayerInfo
[pPayDay] = 0;

            PlayerInfo
[pPayCheck] = 0;

            PlayerInfo
[pConnectSeconds] += 1;

            if(FarmerVar
== 0)

            {


               FarmerPickup
  • = 0;


            }


            if(DrugFarmerVar
== 0)

            {


               DrugFarmerPickup
  • = 0;


            }


            if(SmugglerWork
== 0)

            {


               PayDaySecure
= 0;

            }


            if(PlayerInfo
[pRegularRank] > 0)

            {


                PlayerInfo
[pPayDayHad] += 1;

                if(PlayerInfo
[pPayDayHad] >= 5)

                {


                    PlayerInfo
[pExp]++;

                    PlayerInfo
[pPayDayHad] = 0;

                }


            }


         }


         else


         {


             SendClientMessage(i, COLOR_WHITE, \"* Nem játszottál eleget, hogy fizetést kapj.\");


         }


      }


   }


}


SaveAccounts();


new rand = random(2500); rand += 1245;


      Jackpot += rand;


    SaveStuff();


    SaveAnticheat();


    format(string, sizeof(string), \"Lottó hírek: Az nyereményösszeg $%d-ra emelkedett.\", Jackpot);


OOCOff(COLOR_WHITE, string);


return 1;


}[/pawn]


Plusz még ami hozzá kapcsolódik:


[pawn]public SyncTime()


{


new string[128];


new tmphour;


new tmpminute;


new tmpsecond;


gettime(tmphour, tmpminute, tmpsecond);


FixHour(tmphour);


tmphour = shifthour;


if ((tmphour > ghour) || (tmphour == 0 && ghour == 23))


{


//      format(string, sizeof(string), \"Szerver: Az idõ most %d:00 óra\",tmphour);


//      BroadCast(COLOR_WHITE,string);


   ghour = tmphour;


   PayDay();


   if (realtime)


   {


      SetWorldTime(tmphour);


   }


   format(string, sizeof(string), \"~y~Lottó!! ~n~~w~Válassz számot ~n~~p~/lotto 1-80 ~g~($100) ~n~~r~Nyeremény: ~g~$%d\", Jackpot);


        if(TD3D == 1)


   {


             KillTimer(HideTD4Timer);


      TextDrawHideForAll(TD3);


       TextDrawSetString(TD3, string);


      TextDrawShowForAll(TD3);


      HideTD4Timer = SetTimer(\"HideTD4\", 8500, false);


   }


   else


   {


      TextDrawSetString(TD3, string);


         TextDrawShowForAll(TD3);


         TD3D = 1;


         HideTD4Timer = SetTimer(\"HideTD4\", 8500, false);


   }


   SetTimer(\"StartLotto\",20000,false);


}


}


[/pawn]


[pawn]public Production()


{


new string[128];


for(new i = 0; i < MAX_PLAYERS; i++)


{


   if(IsPlayerConnected(i))


   {

<

Fizetés bug
« Válasz #1 Dátum: 2011. Augusztus 22. - 08:56:01 »
0 Show voters
Elsõ Pawn:(PayDay)
[pawn]
D:\\GTA SERVER\\PAYDAY.pwn(1) : warning 235: public function lacks forward declaration (symbol \"PayDay\")
D:\\GTA SERVER\\PAYDAY.pwn(6) : error 017: undefined symbol \"MAX_PLAYERS\"
D:\\GTA SERVER\\PAYDAY.pwn(8) : error 017: undefined symbol \"IsPlayerConnected\"
D:\\GTA SERVER\\PAYDAY.pwn(10) : error 017: undefined symbol \"PlayerInfo\"
D:\\GTA SERVER\\PAYDAY.pwn(10) : warning 215: expression has no effect
D:\\GTA SERVER\\PAYDAY.pwn(10) : error 001: expected token: \";\", but found \"]\"
D:\\GTA SERVER\\PAYDAY.pwn(10) : error 029: invalid expression, assumed zero
D:\\GTA SERVER\\PAYDAY.pwn(10) : fatal error 107: too many error messages on one line
Compilation aborted.Pawn compiler 3.2.3664           Copyright © 1997-2006, ITB CompuPhase
6 Errors.[/pawn]
Itt valami nem jó ...  :-\\

Nem elérhető sz18k

Fizetés bug
« Válasz #2 Dátum: 2011. Augusztus 22. - 11:52:20 »
0 Show voters
Ha külön SF-be próbálod meg persze, hogy nem jó, mivel ez a Raven\'s-ben van...

Dupla hozzászólás automatikusan összefûzve. ( 2011. Augusztus 24. - 09:05:18 )

Megjavítva, zárok!!
« Utoljára szerkesztve: 2011. Augusztus 24. - 09:05:18 írta konorbi »

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal