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: Neoflyythe - 2012. Április 21. - 18:55:10

Cím: Alap játékmód. v2.5
Írta: Neoflyythe - 2012. Április 21. - 18:55:10
Üdvözletem!
Nemrég írtam egy alap játékmódot ami
tartalmaz Texdrawokat,teleportokat,egyéb mapokat.
Elhoztam nektek ezt a játékmódot
remélem hasznát veszitek!
A módról adatok:
Készítette: Neo[i\'m]
Készült: 2012.04.19
 
//Houds Alap Játék modja.
#include <a_samp>
new Text:Textdraw0;
new Text:Textdraw1;
#define COLOR_RED 0xAA3333AA
#define COLOR_GREY 0xAFAFAFAA
#define COLOR_GREEN 0x33AA33AA
#define COLOR_RED 0xAA3333AA
#define COLOR_YELLOW 0xFFFF00AA
#define COLOR_WHITE 0xFFFFFFAA
#define COLOR_ORANGE 0xFF9900AA
#define COLOR_SPAWN 0xFF8C55FF
#define COLOR_LIGHTBLUE 0x6DC5F3FF
#define COLOR_ADMIN 0xFF0000FF
#define COLOR_SAY 0x2986CEFF
#define COLOR_SYSGREY 0xC6BEBDFF
#define COLOR_BLACK 0x000000FF
#define COLOR_JOIN 0x74E80099
#define COLOR_WARN 0xBE615099
#define COLOR_RACE 0x00BBBB99
#define COLOR_KRED 0xFF0000FF
#if defined FILTERSCRIPT
public OnFilterScriptInit()
{
print(\"\\n--------------------------------------\");
print(\"--------ALAP STUNT DRIFT JÁTÉKMOD---------\");
print(\"--------------------------------------\\n\");
return 1;
}
public OnFilterScriptExit()
{
return 1;
}
#else
main()
{
print(\"\\n----------------------------------\");
print(\"--------ALAP STUNT DRIFT JÁTÉKMOD------\");
print(\"----------------------------------\\n\");
}
#endif
public OnGameModeInit()
{
    Textdraw0 = TextDrawCreate(413.000000, 421.000000, \"IRJ AMIT AKARSZ\");
TextDrawBackgroundColor(Textdraw0, 255);
TextDrawFont(Textdraw0, 1);
TextDrawLetterSize(Textdraw0, 0.629998, 2.699999);
    TextDrawColor(Textdraw0, 3454143);
TextDrawSetOutline(Textdraw0, 0);
TextDrawSetProportional(Textdraw0, 1);
TextDrawSetShadow(Textdraw0, 1);
Textdraw1 = TextDrawCreate(7.000000, 427.000000, \"/info /rules /teles /cmds\");
TextDrawBackgroundColor(Textdraw1, 255);
TextDrawFont(Textdraw1, 1);
TextDrawLetterSize(Textdraw1, 0.509999, 1.800000);
TextDrawColor(Textdraw1, 9454143);
TextDrawSetOutline(Textdraw1, 0);
TextDrawSetProportional(Textdraw1, 1);
TextDrawSetShadow(Textdraw1, 1);
for(new i; i < MAX_PLAYERS; i ++)
{
if(IsPlayerConnected(i))
{
   TextDrawShowForPlayer(i, Textdraw0);
   TextDrawShowForPlayer(i, Textdraw1);
}
}
SetGameModeText(\"[HUN]SAJATOD\");
AddPlayerClass(0, 1958.3783, 1343.1572, 15.3746, 269.1425, 0, 0, 0, 0, 0, 0);
return 1;
}
public OnGameModeExit()
{
    TextDrawHideForAll(Textdraw0);
TextDrawDestroy(Textdraw0);
TextDrawHideForAll(Textdraw1);
TextDrawDestroy(Textdraw1);
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)
{
    SendClientMessage(playerid, 0x74E80099, \"Üdv a saját szerveren!\");
    SendClientMessage(playerid, 0x74E80099, \"Információért=/info /teles /rules /cmds!\");
    SendClientMessage(playerid, 0x74E80099, \"Tagfelvételért:/tgf\");
    SendClientMessage(playerid, 0x74E80099, \"Jó játékot Kíván az admin team!\");
    new string[64], pName[MAX_PLAYER_NAME];
    GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
    format(string,sizeof string,\"%s Jött kockúni a szerverre! xD\",pName);
    SendClientMessageToAll(0x74E80099,string);
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
new
string[64],
name[MAX_PLAYER_NAME];
GetPlayerName(playerid,name,MAX_PLAYER_NAME);
    switch(reason)
    {
        case 0: format(string,sizeof string,\"%s lelépett a szerverõl! [sz*r a netje kifagyott]\",name);
        case 1: format(string,sizeof string,\"%s lelépett a szerverõl! [levitte a picsáját]\",name);
        case 2: format(string,sizeof string,\"%s lelépett a szerverõl! [ki**szták]\",name);
    }
    SendClientMessageToAll(0x74E80099,string);
return 1;
}
public OnPlayerSpawn(playerid)
{
      TextDrawShowForPlayer(playerid, Textdraw0);
TextDrawShowForPlayer(playerid, Textdraw1);
return 1;
}
public OnPlayerDeath(playerid, killerid, reason)
{
return 1;
}
public OnVehicleSpawn(vehicleid)
{
return 1;
}
public OnVehicleDeath(vehicleid, killerid)
{
return 1;
}
public OnPlayerText(playerid, text[])
{
return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
//Cmds-----------------------
    if (strcmp(cmdtext, \"/cmds\", true)==0)
{
ShowPlayerDialog(playerid, 10000, DIALOG_STYLE_MSGBOX, \"Parancsaink:\", \"/flip /health /parachute\\n--------------------\\n------------------------\\n-----------------------\", \"Igen\", \"Mégse\");
PlayerPlaySound(playerid, 1133, 0.0, 0.0, 10.0);
    return 1;
}
    //Info----------------------------------------
if (strcmp(cmdtext, \"/info\", true)==0)
{
ShowPlayerDialog(playerid, 10410, DIALOG_STYLE_MSGBOX, \"Informácíó:\", \"A Server Fejlesztés alatt ál.\\nBátran fordulj az Adminokhoz.\", \"Igen\", \"Vissza\");
    return 1;
}
     //teles----------------------------------------
if (strcmp(cmdtext, \"/teles\", true)==0)
{
ShowPlayerDialog(playerid, 10410, DIALOG_STYLE_MSGBOX, \"Teleport Segítség:\", \"A Dialogus Teleportért:/tele\\nA Simán Teleportáláshoz:/neve=/drift5\", \"Igen\", \"Vissza\");
    return 1;
}
    //Szabályzat------------------------------------
if (strcmp(cmdtext, \"/rules\", true)==0)
{
ShowPlayerDialog(playerid, 1, DIALOG_STYLE_MSGBOX, \"Szabályzat:\", \"Ne Hackelj\\nNe DB \\nDrift-Stunt Javító Programokat ne használj!\\nAdminokat ne sértegesd!\\nKellemes játékot kiván a ........ Clan.\", \"Elfogad\", \"Ban\");
    return 1;
}
//Készítõ----------------------------------------
if (strcmp(cmdtext, \"/credits\", true)==0)
{
ShowPlayerDialog(playerid, 10410, DIALOG_STYLE_MSGBOX, \"Készítõ:\", \"A Gamemodet Csinálta Redergy\\nMapolva nincs jelenleg.\", \"Oksa\", \"Vissza\");
    return 1;
}
//Parancsok--------------------------------------
    if(strcmp(cmdtext, \"/parachute\", true) == 0)
    {
    GivePlayerWeapon(playerid, 46, 1);
    SendClientMessage(playerid, 0x00BFFFFF, \"Tesék Megkaptad az ejtõernyõd!\");
    return 1;
}
if (strcmp(cmdtext, \"/flip\", true)==0)
{
new VehicleID, Float:X, Float:Y, Float:Z;
    GetPlayerPos(playerid, X, Y, Z);
VehicleID = GetPlayerVehicleID(playerid);
SetVehiclePos(VehicleID, X, Y, Z);
SetVehicleZAngle(VehicleID, 0);
SendClientMessage(playerid, 0x00BFFFFF, \"A Verdád felálítva!\");
    return 1;
}
    if (strcmp(cmdtext, \"/health\", true)==0)
{
SetPlayerHealth(playerid,100);
SendClientMessage(playerid, 0x00BFFFFF, \"Életed feltõltve!\");
return 1;
}
if(strcmp(\"/kill\", cmdtext, true, 10) == 0)  {
    SetPlayerHealth(playerid, 000.0);
    return 1;
}
//Auto-----------------------------------------
    if (strcmp(\"/elegy\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(562,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/bravura\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(401,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/buffalo\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(402,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/sentinel\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(405,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/trashmaster\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(408,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/infernus\", cmdtext, true, 10) == 0) if (strcmp(\"/inf\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(411,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/cheetah\", cmdtext, true, 10) == 0) if (strcmp(\"/cht\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(415,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/taxi\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(420,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/bf\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(424,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/premier\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(426,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/banshee\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(429,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/packer\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(443,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/turismo\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(451,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/pcj\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(461,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/sanchez\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(468,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/sultan\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(560,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/nrg\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(522,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
    if (strcmp(\"/fcr\", cmdtext, true, 10) == 0)
    {
    new vehicleid;
    new Float:X,Float:Y,Float:Z,Float:Angle;
    GetPlayerPos(playerid,X,Y,Z);
    GetPlayerFacingAngle(playerid,Angle);
    GetPlayerVehicleID(playerid);
    vehicleid = CreateVehicle(521,X,Y,Z,Angle,-1,-1,600);
    vehicleid = PutPlayerInVehicle(playerid, vehicleid, 0);
    return 1;
}
return SendClientMessage(playerid,0x74E80099,\"Ez a parancs nem létezik!\");
}
public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
return 1;
}
public OnPlayerExitVehicle(playerid, vehicleid)
{
return 1;
}
public OnPlayerStateChange(playerid, newstate, oldstate)
{
return 1;
}
public OnPlayerEnterCheckpoint(playerid)
{
return 1;
}
public OnPlayerLeaveCheckpoint(playerid)
{
return 1;
}
public OnPlayerEnterRaceCheckpoint(playerid)
{
return 1;
}
public OnPlayerLeaveRaceCheckpoint(playerid)
{
return 1;
}
public OnRconCommand(cmd[])
{
return 1;
}
public OnPlayerRequestSpawn(playerid)
{
return 1;
}
public OnObjectMoved(objectid)
{
return 1;
}
public OnPlayerObjectMoved(playerid, objectid)
{
return 1;
}
public OnPlayerPickUpPickup(playerid, pickupid)
{
return 1;
}
public OnVehicleMod(playerid, vehicleid, componentid)
{
return 1;
}
public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
{
return 1;
}
public OnVehicleRespray(playerid, vehicleid, color1, color2)
{
return 1;
}
public OnPlayerSelectedMenuRow(playerid, row)
{
return 1;
}
public OnPlayerExitedMenu(playerid)
{
return 1;
}
public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
{
return 1;
}
public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
return 1;
}
public OnRconLoginAttempt(ip[], password[], success)
{
return 1;
}
public OnPlayerUpdate(playerid)
{
return 1;
}
public OnPlayerStreamIn(playerid, forplayerid)
{
return 1;
}
public OnPlayerStreamOut(playerid, forplayerid)
{
return 1;
}
public OnVehicleStreamIn(vehicleid, forplayerid)
{
return 1;
}
public OnVehicleStreamOut(vehicleid, forplayerid)
{
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
return 1;
}
public OnPlayerClickPlayer(playerid, clickedplayerid, source)
{
return 1;
}[

 
Kép: \"trolol.bmp\"
\"lol.bmp\"
[Link] http://data.hu/get/5017452/Alap_Mod_v2.5.rar
Teszek fel majd még képeket csak most siettem el.
Cím: Alap játékmód. v2.5
Írta: Dead - 2012. Április 21. - 19:35:55
Kezdõknek jó grat
Cím: Alap játékmód. v2.5
Írta: Neoflyythe - 2012. Április 21. - 19:40:18
Köszönöm szépen!
Cím: Alap játékmód. v2.5
Írta: Yakuza™ - 2012. Április 21. - 20:04:57
kipróbáltam, jó lett :)
Cím: Alap játékmód. v2.5
Írta: Asdeeer - 2012. Április 21. - 20:12:14
Ezek a szöveg színek nagyon tetszenek benne :D
Cím: Alap játékmód. v2.5
Írta: Neoflyythe - 2012. Április 21. - 20:14:58
Thx to all!:D
Cím: Alap játékmód. v2.5
Írta: Benceee - 2012. Április 22. - 08:00:41
Kicsit pazarolsz a változókkal, de szép. :)
Cím: Alap játékmód. v2.5
Írta: Neoflyythe - 2012. Április 22. - 08:42:27
Az igaz. :D kösz.
Cím: Alap játékmód. v2.5
Írta: Kevin_Johnson - 2012. Április 28. - 13:18:23
Hmmm.Nagyon tetszik!Felhasználom!Megy a gót kereszt!
Cím: Alap játékmód. v2.5
Írta: norbee0170 - 2012. Április 28. - 14:01:03
//Houds Alap Játék modja.[/quote]
why?!
Cím: Alap játékmód. v2.5
Írta: Pedró - 2012. Április 28. - 14:21:23
*tartalmaz Texdrawokat,teleportokat,egyéb mapokat.*
oszt hun van itten map, drága tesvérem?
Cím: Alap játékmód. v2.5
Írta: norbee0170 - 2012. Április 28. - 14:29:01
lelépett a szerverõl! [sz*r a netje kifagyott]
         lelépett a szerverõl! [levitte a picsáját]
         lelépett a szerverõl! [ki**szták]

 
ez mi drágaságom?
ez nekem nem poénos hanem inkább szánalmas
és még csak végig se néztem mer itt megakadt a szemem (lehet h jobb is)
 
//Houds Alap Játék modja.[/quote]
 
A Gamemodet Csinálta Rederg[/quote]
most akk mivan ?