Szerző Téma: Pénz Küldõ Script edited by Acer11/LogiTech  (Megtekintve 1695 alkalommal)

Pénz Küldõ Script edited by Acer11/LogiTech
« Dátum: 2013. Augusztus 20. - 23:33:03 »
+2 Show voters
Sziasztok az imént nézegettem az angol fórumon a GiveCash Script-eket! Találtam egyet és gondoltam hogy magyarositom és egy kicsit editelek  rajta!

Edit idõ: 2perc


Eredeti készitõ: HAYTXA

Edittelõ: Acer11[LogiTech]

Eredeti link: http://forum.sa-mp.com/showthread.php?t=138104
 
//--Ezt a scriptet editteltem ahogy a többi player--//
#include <a_samp>
#include <core>
#include <float>
#define COLOR_GREY 0xAFAFAFAA
#define COLOR_GREEN 0x33AA33AA
#define COLOR_RED 0xAA3333AA
#define COLOR_YELLOW 0xFFFF00AA
#define COLOR_WHITE 0xFFFFFFAA
#define PocketMoney 50000
#define INACTIVE_PLAYER_ID 255
#define GIVECASH_DELAY 5000
#if defined FILTERSCRIPT
#define NUMVALUES 4
forward Givecashdelaytimer(playerid);
forward SetupPlayerForClassSelection(playerid);
forward SendPlayerFormattedText(playerid, const str[], define);
forward public SendAllFormattedText(playerid, const str[], define);
public OnFilterScriptInir()
{
print(\"\\n--------------------------------------\");
print(\" Pénz küldõ rendszer by Acer11/LogiTech\");
print(\"BETÖLTÉS...\");
print(\"--------------------------------------\\n\");
print(\"BETÖLTVE\");
return 1;
}
public OnFilterScriptExit()
{
return 1;
}
#else
main()
{
}
#endif
public OnGameModeInit()
{
return 1;
}
public OnGameModeExit()
{
return 1;
}
public OnPlayerRequestClass(playerid, classid)
{
SetPlayerPos(playerid, 1958.3783, 1343.1572, 15.3746);
SetPlayerCameraPos(playerid, 1958.3783, 1343.1572, 15.3746);
SetPlayerCameraLookAt(playerid, 1958.3783, 1343.1572, 15.3746);
return 1;
}
public OnPlayerConnect(playerid)
{
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
new string[256];
new playermoney;
new sendername[MAX_PLAYER_NAME];
new giveplayer[MAX_PLAYER_NAME];
new cmd[256];
new giveplayerid, moneys, idx;
cmd = strtok(cmdtext, idx);
if(strcmp(cmd, \"/penztad\", true) == 0) {
    new tmp[256];
tmp = strtok(cmdtext, idx);
if(!strlen(tmp)) {
   SendClientMessage(playerid, COLOR_WHITE, \"HASZNÁLAT: /penztad [iD] [ÖSSZEG]\");
   return 1;
}
giveplayerid = strval(tmp);
tmp = strtok(cmdtext, idx);
if(!strlen(tmp)) {
   SendClientMessage(playerid, COLOR_WHITE, \"HASZNÁLAT: /penztad [iD] [ÖSSZEG]\");
   return 1;
}
   moneys = strval(tmp);
 

if (IsPlayerConnected(giveplayerid)) {
   GetPlayerName(giveplayerid, giveplayer, sizeof(giveplayer));
   GetPlayerName(playerid, sendername, sizeof(sendername));
   playermoney = GetPlayerMoney(playerid);
   if (moneys > 0 && playermoney >= moneys) {
      GivePlayerMoney(playerid, (0 - moneys));
      GivePlayerMoney(giveplayerid, moneys);
      format(string, sizeof(string), \"Pénz átküldve: %s(player: %d), $%d.\", giveplayer,giveplayerid, moneys);
      SendClientMessage(playerid, COLOR_YELLOW, string);
      format(string, sizeof(string), \"Pénzt át adtad $%d neki %s(Játékos: %d).\", moneys, sendername, playerid);
      SendClientMessage(giveplayerid, COLOR_YELLOW, string);
      printf(\"%s(playerid:%d) Sikeresen átküldve %d neki %s(Játékos: %d)\",sendername, playerid, moneys, giveplayer, giveplayerid);
   }
   else {
      SendClientMessage(playerid, COLOR_YELLOW, \"Sikertelen átküldés!\");
   }
}
else {
      format(string, sizeof(string), \"%d nincs online\", giveplayerid);
      SendClientMessage(playerid, COLOR_YELLOW, string);
   }
return 1;
}
 
return 0;
}
strtok(const string[], &index)
{
new length = strlen(string);
while ((index < length) && (string[index] <= \' \'))
{
index++;
}
new offset = index;
new result[20];
while ((index < length) && (string[index] > \' \') && ((index - offset) < (sizeof(result) - 1)))
{
result[index - offset] = string[index];
index++;
}
result[index - offset] = EOS;
return result;
 
}

 
LETÖLTÉS: http://www.solidfiles.com/d/8c239949ef/
« Utoljára szerkesztve: 2013. Augusztus 21. - 10:50:26 írta [DS]Acer11 »

Nem elérhető ZyZu.

  • Globális moderátor
  • 8939
  • my turbo diesel forum
  • Discord: ZyZu.
    • Profil megtekintése
Pénz Küldõ Script edited by Acer11/LogiTech
« Válasz #1 Dátum: 2013. Augusztus 20. - 23:45:38 »
0 Show voters

Nem elérhető Csabesz

  • 7827
    • Profil megtekintése
Pénz Küldõ Script edited by Acer11/LogiTech
« Válasz #2 Dátum: 2013. Augusztus 21. - 00:03:44 »
0 Show voters
Mi a rendszer (system) benne?

Nem elérhető TwisT3R

  • 576
  • Küklopsz
  • Discord: TwisT3R#7833
    • Profil megtekintése
    • Firing Squad Clan
Pénz Küldõ Script edited by Acer11/LogiTech
« Válasz #3 Dátum: 2013. Augusztus 21. - 00:28:36 »
0 Show voters
LVDM módban alap parancs csak magyarra fordítva...

Pénz Küldõ Script edited by Acer11/LogiTech
« Válasz #4 Dátum: 2013. Augusztus 21. - 07:23:56 »
0 Show voters
Valamit kihagytál belõle :S


Készítõt :)

Pénz Küldõ Script edited by Acer11/LogiTech
« Válasz #5 Dátum: 2013. Augusztus 21. - 10:43:51 »
0 Show voters
Idézetet írta: Arkham date=1377062636\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"41629\" data-ipsquote-contentclass=\"forums_Topic
Valamit kihagytál belõle :S


Készítõt :)
 
Jah persze frissitem!

Nem elérhető Suspect

  • 64
  • ♥•M4•♥
    • Profil megtekintése
Pénz Küldõ Script edited by Acer11/LogiTech
« Válasz #6 Dátum: 2013. Augusztus 21. - 11:14:20 »
0 Show voters
Hát nem tudom de szerintem a /penztad parancs nagyon sz*r. :D

Szerintem így kellet volna:



SendClientMessage(playerid,0x00ff00AA,\" Használat: /Pay [Játékos ID/Név] \'Összeg\' \");

 

De azért ment a +
« Utoljára szerkesztve: 2013. Augusztus 21. - 11:16:42 írta Suspect »

Pénz Küldõ Script edited by Acer11/LogiTech
« Válasz #7 Dátum: 2013. Augusztus 21. - 11:26:51 »
0 Show voters
Idézetet írta: Suspect date=1377076460\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"41629\" data-ipsquote-contentclass=\"forums_Topic
Hát nem tudom de szerintem a /penztad parancs nagyon sz*r. :D

Szerintem így kellet volna:



SendClientMessage(playerid,0x00ff00AA,\" Használat: /Pay [Játékos ID/Név] \'Összeg\' \");

 

De azért ment a +




Hát más nem jutott eszembe!... :D

Köszi :)

Pénz Küldõ Script edited by Acer11/LogiTech
« Válasz #8 Dátum: 2013. Augusztus 21. - 11:39:09 »
0 Show voters
Hát a hibáktól elnézve nekem tetszik :)

Pénz Küldõ Script edited by Acer11/LogiTech
« Válasz #9 Dátum: 2013. Augusztus 21. - 12:20:47 »
0 Show voters
Idézetet írta: Peter date=1377077949\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"41629\" data-ipsquote-contentclass=\"forums_Topic
Hát a hibáktól elnézve nekem tetszik :)
 
Köszi  :thumbsup:

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal