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

San Andreas Multiplayer (SA-MP) => SA-MP: Szerverfejlesztés => A témát indította: Dav.eEe - 2014. Április 26. - 13:16:12

Cím: Alap fegyvervásárlás
Írta: Dav.eEe - 2014. Április 26. - 13:16:12

Üdvözlök mindenkit, Dav.eEe vagyok, kezdõ fórumozó, és scripter.Tényleg nagyon kezdõ vagyok, egy órát tanultam, és egy 10perc alatt kihoztam egy alap fegyver vásárló FS-t. Szerintem fel lehet használni, de nem nagy szám.
Adatok:
82 soros FS

Vásárolható 6fegyver egyenlõre, de frissítgetem majd.
Szóval, azt kérném, mivel tényleg nagyon kezdõ vagyok, véleményt nyílvánítsatok, hogy mennyire rossz, és mennyire jó. Építõ jellegû hozzászólásokat szívesen fogadok.
 

/*
A filterscriptet bárki használhatja, de saját nevén nem adhatja ki.
A filterscriptet készítette: Dav.eEe!
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Ez az elsõ publikus filterscriptem.
Filterscript neve: Fegyvert pénzért!
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
*/
#include <a_samp>
#include <zcmd>
#include <dutils>
#pragma unused ret_memcpy
public OnFilterScriptInit()
{
print (\"Fegyvervásárlás FS betöltve.BY: Dav.eEe\");
return 1;
}
CMD:fegyver(playerid, params[])
{
SendClientMessage(playerid, 0, \"Vásárolható fegyverek:\");
SendClientMessage(playerid, 1, \"/ak47 /m4 /deagle /knife\");
SendClientMessage(playerid, 1, \"/shotgun /sawnoff. Árakért /fegyverar\");
SendClientMessage(playerid, 1, \"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\");
SendClientMessage(playerid, 1, \"Fegyver script készítõ:Dav.eEe\");
SendClientMessage(playerid, 1, \"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\");
return 1;
}
CMD:fegyverar(playerid, params[])
{
SendClientMessage(playerid, 0, \"Fegyverárak, és töltény számok:\");
SendClientMessage(playerid, 1, \"AK47: 200töltény+fegyver = 30.000$\");
SendClientMessage(playerid, 1, \"M4: 200töltény+fegyver = 30.000$\");
SendClientMessage(playerid, 1, \"Deagle: 50töltény+fegyver = 10.000$\");
SendClientMessage(playerid, 1, \"Knife: 1 kés = 1.000$\");
SendClientMessage(playerid, 1, \"Shotgun: 50töltény+fegyver = 45.000$\");
SendClientMessage(playerid, 1, \"Sawnoff: 100töltény+fegyver = 65.000$\");
SendClientMessage(playerid, 1, \"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\");
SendClientMessage(playerid, 1, \"Fegyver script készítõ:Dav.eEe\");
SendClientMessage(playerid, 1, \"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\");
return 1;
}
CMD:m4(playerid, params[])
{
GivePlayerWeapon(playerid, 31, 200);
SetPlayerMoney(playerid, -30000);
return 1;
}
CMD:ak47(playerid, params[])
{
GivePlayerWeapon(playerid, 30, 200);
SetPlayerMoney(playerid, -30000);
return 1;
}
CMD:deagle(playerid, params[])
{
GivePlayerWeapon(playerid, 24, 50);
SetPlayerMoney(playerid, -10000);
return 1;
}
CMD:knife(playerid, params[])
{
GivePlayerWeapon(playerid, 4, 1);
SetPlayerMoney(playerid, -1000);
return 1;
}
CMD:shotgun(playerid, params[])
{
GivePlayerWeapon(playerid, 25, 50);
SetPlayerMoney(playerid, -45000);
return 1;
}
CMD:sawnoff(playerid, params[])
{
GivePlayerWeapon(playerid, 26, 100);
SetPlayerMoney(playerid, -65000);
return 1;
}
//Ennyi lenne, frissítések várhatóak!

Cím: Alap fegyvervásárlás
Írta: Blowy - 2014. Április 26. - 16:17:06

Jó csak SetPlayerMoney helyett lehetne GivePlayerMoney és le lehetne ellenõrizni, hogy van e egyátalán pénze a fegyverre azis egyszerû:
( GetPlayerMoney - el kell )  :)

Cím: Alap fegyvervásárlás
Írta: KovaNovik - 2014. Április 26. - 16:44:01

Jó lett, ahhoz képest, hogy én egy óra után még el sem tudtam indítani a szervert :D.
Építõ jellegû kritika: a parancsoknál a params[] felesleges, ha nsm használod a paramétereket (itt bnem használod).

Cím: Alap fegyvervásárlás
Írta: Dav.eEe - 2014. Április 26. - 13:16:12

Üdvözlök mindenkit, Dav.eEe vagyok, kezdõ fórumozó, és scripter.Tényleg nagyon kezdõ vagyok, egy órát tanultam, és egy 10perc alatt kihoztam egy alap fegyver vásárló FS-t. Szerintem fel lehet használni, de nem nagy szám.
Adatok:
82 soros FS

Vásárolható 6fegyver egyenlõre, de frissítgetem majd.
Szóval, azt kérném, mivel tényleg nagyon kezdõ vagyok, véleményt nyílvánítsatok, hogy mennyire rossz, és mennyire jó. Építõ jellegû hozzászólásokat szívesen fogadok.
 

/*
A filterscriptet bárki használhatja, de saját nevén nem adhatja ki.
A filterscriptet készítette: Dav.eEe!
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Ez az elsõ publikus filterscriptem.
Filterscript neve: Fegyvert pénzért!
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
*/
#include <a_samp>
#include <zcmd>
#include <dutils>
#pragma unused ret_memcpy
public OnFilterScriptInit()
{
print (\"Fegyvervásárlás FS betöltve.BY: Dav.eEe\");
return 1;
}
CMD:fegyver(playerid, params[])
{
SendClientMessage(playerid, 0, \"Vásárolható fegyverek:\");
SendClientMessage(playerid, 1, \"/ak47 /m4 /deagle /knife\");
SendClientMessage(playerid, 1, \"/shotgun /sawnoff. Árakért /fegyverar\");
SendClientMessage(playerid, 1, \"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\");
SendClientMessage(playerid, 1, \"Fegyver script készítõ:Dav.eEe\");
SendClientMessage(playerid, 1, \"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\");
return 1;
}
CMD:fegyverar(playerid, params[])
{
SendClientMessage(playerid, 0, \"Fegyverárak, és töltény számok:\");
SendClientMessage(playerid, 1, \"AK47: 200töltény+fegyver = 30.000$\");
SendClientMessage(playerid, 1, \"M4: 200töltény+fegyver = 30.000$\");
SendClientMessage(playerid, 1, \"Deagle: 50töltény+fegyver = 10.000$\");
SendClientMessage(playerid, 1, \"Knife: 1 kés = 1.000$\");
SendClientMessage(playerid, 1, \"Shotgun: 50töltény+fegyver = 45.000$\");
SendClientMessage(playerid, 1, \"Sawnoff: 100töltény+fegyver = 65.000$\");
SendClientMessage(playerid, 1, \"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\");
SendClientMessage(playerid, 1, \"Fegyver script készítõ:Dav.eEe\");
SendClientMessage(playerid, 1, \"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\");
return 1;
}
CMD:m4(playerid, params[])
{
GivePlayerWeapon(playerid, 31, 200);
SetPlayerMoney(playerid, -30000);
return 1;
}
CMD:ak47(playerid, params[])
{
GivePlayerWeapon(playerid, 30, 200);
SetPlayerMoney(playerid, -30000);
return 1;
}
CMD:deagle(playerid, params[])
{
GivePlayerWeapon(playerid, 24, 50);
SetPlayerMoney(playerid, -10000);
return 1;
}
CMD:knife(playerid, params[])
{
GivePlayerWeapon(playerid, 4, 1);
SetPlayerMoney(playerid, -1000);
return 1;
}
CMD:shotgun(playerid, params[])
{
GivePlayerWeapon(playerid, 25, 50);
SetPlayerMoney(playerid, -45000);
return 1;
}
CMD:sawnoff(playerid, params[])
{
GivePlayerWeapon(playerid, 26, 100);
SetPlayerMoney(playerid, -65000);
return 1;
}
//Ennyi lenne, frissítések várhatóak!

Cím: Alap fegyvervásárlás
Írta: Blowy - 2014. Április 26. - 16:17:06

Jó csak SetPlayerMoney helyett lehetne GivePlayerMoney és le lehetne ellenõrizni, hogy van e egyátalán pénze a fegyverre azis egyszerû:
( GetPlayerMoney - el kell )  :)

Cím: Alap fegyvervásárlás
Írta: KovaNovik - 2014. Április 26. - 16:44:01

Jó lett, ahhoz képest, hogy én egy óra után még el sem tudtam indítani a szervert :D.
Építõ jellegû kritika: a parancsoknál a params[] felesleges, ha nsm használod a paramétereket (itt bnem használod).

Cím: Alap fegyvervásárlás
Írta: Dani99 - 2014. December 31. - 21:15:25

Ezt nem hiszem el? Ez mi?