GTA Közösség - A magyar GTA fórum

San Andreas Multiplayer (SA-MP) => SA-MP: Szerverfejlesztés => Segítségkérés => A témát indította: norbee0170 - 2011. június 18. - 19:27:45

Cím: hogy kell h pénzt vonjon le ? :D
Írta: norbee0170 - 2011. június 18. - 19:27:45

sziasztok, van egy ilyen parancsom és h tudom megcsinálni h pénzt vegyen le mikor elveszi a kulcsát ? :D
[pawn]if(strcmp(cmd, \"/kulcsel\", true) == 0)
{
    if(IsPlayerConnected(playerid))
    {
      tmp = strtok(cmdtext, idx);
      if(!strlen(tmp))
      {
         SendClientMessage(playerid, COLOR_GRAD2, \"HASZNÁLAT: /kulcsel [JátékosID/NévRészlet]\");
         return 1;
      }
      new para1;
      para1 = ReturnUser(tmp);
      tmp = strtok(cmdtext, idx);
      if(PlayerInfo[playerid][pLeader] == 2)
      {
          if(IsPlayerConnected(para1))
          {
              if(para1 != INVALID_PLAYER_ID)
              {
                  if(PlayerInfo[para1][pPcarkey] == 999)
                  {
                      SendClientMessage(playerid, COLOR_GREY, \"A játékosnak nincs kocsija!\");
                      return 1;
                  }
                  new nev[32];
               GetPlayerName(playerid, nev, sizeof(nev));
                  new kocsiid = PlayerInfo[para1][pPcarkey];
                  CarInfo[kocsiid][cOwned] = 0;
                     strmid(CarInfo[kocsiid][cOwner], \"Dealership\", 0, strlen(\"Dealership\"), 999);
                     new Float:x,Float:y,Float:z;
                     new Float:a;
                     GetVehiclePos(kocsiid, x, y, z);
                  GetVehicleZAngle(kocsiid, a);
                  CarInfo[kocsiid][cLocationx] = x;
                  CarInfo[kocsiid][cLocationy] = y;
                  CarInfo[kocsiid][cLocationz] = z;
                  CarInfo[kocsiid][cAngle] = a;
                  OnPropUpdate();
                  DestroyVehicle(kocsiid);
               CreateVehicle(CarInfo[kocsiid][cModel],CarInfo[kocsiid][cLocationx],CarInfo[kocsiid][cLocationy],CarInfo[kocsiid][cLocationz]+1.0,CarInfo[kocsiid][cAngle],CarInfo[kocsiid][cColorOne],CarInfo[kocsiid][cColorTwo],60000);
               GetPlayerName(para1, giveplayer, sizeof(giveplayer));
               GetPlayerName(playerid, sendername, sizeof(sendername));
               format(string, sizeof(string), \"%s elvette a kocsid kulcsát!\", nev);
               SendClientMessage(para1, COLOR_LIGHTRED, string);
               format(string, sizeof(string), \"Elvetted %s kocsikulcsát!\",giveplayer);
               SendClientMessage(playerid, COLOR_LIGHTRED, string);
               format(string, sizeof(string), \"[bandaüzenet]: %s elvette %s kocsijának a kulcsát. Kocsi ID: %d\",nev,giveplayer,kocsiid);
               ABroadCast(COLOR_RED,string,1);
               new h,mi,s,yy,m,d;
               getdate(yy,m,d);
               gettime(h,mi,s);
                   format(stringx,sizeof(stringx), \"[%d/%d/%d][%d:%d:%d] %s elvette %s kocsijának a kulcsát. Kocsi ID: %d\",yy,m,d,h,mi,s,nev,giveplayer,kocsiid);
               LoOoG(stringx);
               PlayerInfo[para1][pPcarkey] = 999;
            }
         }//not connected
      }
      else
      {
         SendClientMessage(playerid, COLOR_GRAD1, \"Nem vagy a csapat tagja!\");
      }
   }
   return 1;
}[/pawn]
^{nem marad el a +}

Cím: hogy kell h pénzt vonjon le ? :D
Írta: ZeRo - 2011. június 18. - 19:29:47

[pawn]PlayerInfo[para1][pPcarkey] = 999;[/pawn]
Ez után szúrd be ezt:
[pawn]GivePlayerMoney( playerid, -x );[/pawn]
Az \'x\' helyére nyilván az összeget írod.

Cím: hogy kell h pénzt vonjon le ? :D
Írta: norbee0170 - 2011. június 19. - 08:53:47

nagyon köszönöm , de most látom h nagyon elírtam az egészet :D , tegap kicsit ittas állapotban voltam mikor írtam :D

szal pénzt adjon aki elveszi a kulcsot az kéne nekem :D
_{nagyon sajnálom a férreértést}

Cím: hogy kell h pénzt vonjon le ? :D
Írta: lusta19 - 2011. június 19. - 09:00:24

GivePlayerMoney( playerid, Összeg);

 
Nem biztos ::|

Cím: hogy kell h pénzt vonjon le ? :D
Írta: Delta - 2011. június 19. - 09:37:31

[pawn]GivePlayerMoney(playerid, -200);[/pawn]
A 200 helyett írhatsz más számot is.

Cím: hogy kell h pénzt vonjon le ? :D
Írta: norbee0170 - 2011. június 19. - 13:02:15

Idézetet írta: norbee0170 date=1308466427\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"8933\" data-ipsquote-contentclass=\"forums_Topic

nagyon köszönöm , de most látom h nagyon elírtam az egészet :D , tegap kicsit ittas állapotban voltam mikor írtam :D

szal pénzt adjon aki elveszi a kulcsot az kéne nekem :D
_{nagyon sajnálom a férreértést}
 

szal h pénzt adjon annak aki elveszi xy-nak a kulcsát :D

Cím: hogy kell h pénzt vonjon le ? :D
Írta: tyson - 2011. június 19. - 14:51:46

[pawn]if(strcmp(cmd, \"/kulcsel\", true) == 0)
{
    if(IsPlayerConnected(playerid))
    {
      tmp = strtok(cmdtext, idx);
      if(!strlen(tmp))
      {
         SendClientMessage(playerid, COLOR_GRAD2, \"HASZNÁLAT: /kulcsel [JátékosID/NévRészlet]\");
         return 1;
      }
      new para1;
      para1 = ReturnUser(tmp);
      tmp = strtok(cmdtext, idx);
      if(PlayerInfo[playerid][pLeader] == 2)
      {
          if(IsPlayerConnected(para1))
          {
              if(para1 != INVALID_PLAYER_ID)
              {
                  if(PlayerInfo[para1][pPcarkey] == 999)
                  {
                      SendClientMessage(playerid, COLOR_GREY, \"A játékosnak nincs kocsija!\");
                      return 1;
                  }
                  new nev[32];
               GetPlayerName(playerid, nev, sizeof(nev));
                  new kocsiid = PlayerInfo[para1][pPcarkey];
                  CarInfo[kocsiid][cOwned] = 0;
                     strmid(CarInfo[kocsiid][cOwner], \"Dealership\", 0, strlen(\"Dealership\"), 999);
                     new Float:x,Float:y,Float:z;
                     new Float:a;
                     GetVehiclePos(kocsiid, x, y, z);
                  GetVehicleZAngle(kocsiid, a);
                  CarInfo[kocsiid][cLocationx] = x;
                  CarInfo[kocsiid][cLocationy] = y;
                  CarInfo[kocsiid][cLocationz] = z;
                  CarInfo[kocsiid][cAngle] = a;
                  OnPropUpdate();
                  DestroyVehicle(kocsiid);
               CreateVehicle(CarInfo[kocsiid][cModel],CarInfo[kocsiid][cLocationx],CarInfo[kocsiid][cLocationy],CarInfo[kocsiid][cLocationz]+1.0,CarInfo[kocsiid][cAngle],CarInfo[kocsiid][cColorOne],CarInfo[kocsiid][cColorTwo],60000);
               GetPlayerName(para1, giveplayer, sizeof(giveplayer));
               GetPlayerName(playerid, sendername, sizeof(sendername));
               format(string, sizeof(string), \"%s elvette a kocsid kulcsát!\", nev);
               SendClientMessage(para1, COLOR_LIGHTRED, string);
               format(string, sizeof(string), \"Elvetted %s kocsikulcsát!\",giveplayer); //<- itt elveszed
               SendClientMessage(playerid, COLOR_LIGHTRED, string);
                                               GivePlayerMoney(playerid, összeg);            //<- és itt elvileg adja a beírt összeget..      
format(string, sizeof(string), \"[bandaüzenet]: %s elvette %s kocsijának a kulcsát. Kocsi ID: %d\",nev,giveplayer,kocsiid);
               ABroadCast(COLOR_RED,string,1);
               new h,mi,s,yy,m,d;
               getdate(yy,m,d);
               gettime(h,mi,s);
                   format(stringx,sizeof(stringx), \"[%d/%d/%d][%d:%d:%d] %s elvette %s kocsijának a kulcsát. Kocsi ID: %d\",yy,m,d,h,mi,s,nev,giveplayer,kocsiid);
                                                                  
LoOoG(stringx);
               PlayerInfo[para1][pPcarkey] = 999;
            }
         }//not connected
      }
      else
      {
         SendClientMessage(playerid, COLOR_GRAD1, \"Nem vagy a csapat tagja!\");
      }
   }
   return 1;
}[/pawn]
Tehát ha elveszi akkor adja a beírt összeget elvileg... Ha így gondolod
Hameg azt szeretnéd h elvegye akkor összeg helyett -akármennyit írsz pl. GivePlayerMoney(playerid, -100); De lehet más is .. Ha rosszul írtam akkor sry :/