Sziasztok!
Nemrég elkezdtem scriptelgetni(3napja) és amióta elkezdtem scriptelgetni közben írogattam egy módot.
A mód tartalmaz:-Pár skinet
-Spawn,kocsik
-Kezdõ fegyverek
-Kocsi lehívó (ID-vel mûködik mivel nemjöttem még rá,hogy-hogy kell névvel)
-Parancsok(heal,armor,szintad(adminként),penzad stb.)
-És még sok mindent.
//A módot írta Th0mas
#include <a_samp>
#include <zcmd>
#include <sscanf>
#include <dini>
#define REGISZTRACIO 0
#define BELEPES 1
#define HIBA 0xFF0000FF
new nev[MAX_PLAYER_NAME];
forward info();
forward ValtozoNev();
forward ValtozoNev2();
forward segely();
main()
{
print(\"\\n----------------------------------\");
print(\" A módot Th0mas készítette\");
print(\"----------------------------------\\n\");
}
public OnGameModeInit()
{
SetTimer(\"info\",100000,1);
SetTimer(\"ValtozoNev\", 500, 1);
SetTimer(\"ValtozoNev2\", 0, 1);
SetTimer(\"segely\",10000,1);
SetGameModeText(\"[HUN] Szervered neve \");
AddPlayerClass(0, 2193.6838,1676.5697,12.3672,89.9899, 0, 0, 0, 0, 0, 0);
AddPlayerClass(21, 2193.6838,1676.5697,12.3672,89.9899, 0, 0, 0, 0, 0, 0);
AddPlayerClass(162, 2193.6838,1676.5697,12.3672,89.9899, 0, 0, 0, 0, 0, 0);
AddPlayerClass(48, 2193.6838,1676.5697,12.3672,89.9899, 0, 0, 0, 0, 0, 0);
AddPlayerClass(175, 2193.6838,1676.5697,12.3672,89.9899, 0, 0, 0, 0, 0, 0);
AddPlayerClass(244, 2193.6838,1676.5697,12.3672,89.9899, 0, 0, 0, 0, 0, 0);
AddStaticVehicle(461,2122.9985,-1159.3380,23.7724,357.8494,21,2);
AddStaticVehicle(461,2120.3103,-1158.7693,23.8103,0.2688,21,2);
AddStaticVehicle(461,2118.0615,-1158.9513,23.9190,0.1786,21,2);
AddStaticVehicle(461,2116.0186,-1159.1700,24.0632,359.2559,21,2);
AddStaticVehicle(415,2134.9373,-1143.7744,24.6967,91.6153,102,108);
AddStaticVehicle(415,2136.0359,-1139.6321,25.1607,90.9039,102,108);
AddStaticVehicle(415,2134.5200,-1127.4604,25.3335,88.5329,102,108);
AddStaticVehicle(411,2117.8528,-1144.2814,24.4611,276.0048,37,69);
AddStaticVehicle(562,2119.3113,-1131.7443,24.9599,260.1165,95,85);
AddStaticVehicle(562,2119.4978,-1125.2527,25.0260,268.0200,95,85);
AddStaticVehicle(562,2127.5027,-1151.1494,23.7589,351.8336,95,85);
AddStaticVehicle(402,2126.7297,-1136.5112,25.2800,356.2599,59,121);
AddStaticVehicle(411,2161.6572,1676.6981,10.4772,348.1795,80,1); //
AddStaticVehicle(411,2161.8809,1682.8630,10.4816,2.2048,12,1); //
AddStaticVehicle(411,2160.2480,1669.9199,10.5474,335.0034,123,1); //
AddStaticVehicle(412,2156.4084,1663.7457,10.6577,324.8808,11,1); //
AddStaticVehicle(415,2160.7646,1689.3125,10.5225,17.2837,40,1); //
AddStaticVehicle(421,2151.4021,1658.8813,10.6309,310.9909,30,1); //
AddStaticVehicle(429,2157.6270,1696.0941,10.4317,31.6605,14,14); //
AddStaticVehicle(451,2153.5842,1701.4224,10.4571,40.7497,16,16); //
AddStaticVehicle(467,2151.6885,1676.8387,10.4914,349.1439,60,1); //
return 1;
}
public OnGameModeExit()
{
return 1;
}
public OnPlayerRequestClass(playerid, classid)
{
SetPlayerPos(playerid,1095.3811,-2036.9301,82.7055);
SetPlayerFacingAngle(playerid,271.5483);
SetPlayerCameraPos(playerid, 1106.181518, -2036.951049, 82.758186);
SetPlayerCameraLookAt(playerid, 1101.183349, -2037.086181, 82.758186);
return 1;
}
public OnPlayerConnect(playerid)
{
PlayAudioStreamForPlayer(playerid,\"http://soundowl.com/track/3gq5\");
ShowPlayerDialog(playerid, 2525, DIALOG_STYLE_MSGBOX, \"{ff0091}Szerver szabályzat!{ff0091}\", \"{ff0000}Nincs Hack!Sobeit,Cleok...!\\nNincs DB-SK-!\\nTagfelvetelert:/admintgf\\nThe Szervered neve Server By:Th0mas{ff0000}\", \"Elfogad!\", \"Elfogad!\");
new udvozlouzenet[128];
GetPlayerName(playerid,nev, sizeof(nev));
format(udvozlouzenet,128,\"%s csatlakozott a szerverre!\",nev);
SendClientMessageToAll(-1,udvozlouzenet);
GivePlayerMoney(playerid,1000000);
SendClientMessage(playerid,0xFFFF00AA,\"Kaptál kezdésnek 1 milliót!\");
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
new elkoszonouzenet[128];
GetPlayerName(playerid,nev, sizeof(nev));
format(elkoszonouzenet,128,\"%s lecsatlakozott a szerverrõl!\",nev);
SendClientMessageToAll(-1,elkoszonouzenet);
return 1;
}
public OnPlayerSpawn(playerid)
{
GivePlayerWeapon(playerid,WEAPON_M4,15000);
GivePlayerWeapon(playerid,WEAPON_MP5,15000);
GivePlayerWeapon(playerid,WEAPON_SNIPER,15000);
GivePlayerWeapon(playerid,WEAPON_DEAGLE,15000);
return 1;
}
public OnPlayerDeath(playerid, killerid, reason)
{
new halaluzenet[128];
GetPlayerName(playerid,nev, sizeof(nev));
format(halaluzenet,128,\"%s meghalt!\",nev);
printf(\"Valaki meghalt.\");
SendClientMessageToAll(-1,halaluzenet);
SendClientMessage(playerid,-1,\"Meghaltál!\");
return 1;
}
public OnVehicleSpawn(vehicleid)
{
return 1;
}
public OnVehicleDeath(vehicleid, killerid)
{
return 1;
}
public OnPlayerText(playerid, text[])
{
return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
return 1;
}
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;
}
public info ()
{
SendClientMessageToAll(HIBA,\" Szervered neve :Ha segítségre van szükséged /help! Ha infókra vágysz /informacio!\");
SendClientMessageToAll(HIBA,\" Szervered neve :A szervert scripteli és futtatja:Th0mas!\");
SendClientMessageToAll(HIBA,\" Szervered neve :Ha valamit nemtudsz kérdezz meg egy admint!\");
return 1;
}
//--------------------Informacio parancs--------------------//
CMD:informacio(playerid)
{
SendClientMessage(playerid,-1,\"Szerver tulajdonos:Th0mas.\");
SendClientMessage(playerid,-1,\"A szervert futtatja:FPS-System!\");
return 1;
}
//--------------------Informacio parancs--------------------//
CMD:penzad(playerid,params[])
{
new id,penzertek;
if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,-1,\"Nem Vagy Adminisztrátor!\");
if(id==INVALID_PLAYER_ID)return SendClientMessage(playerid,-1,\"Helytelen PlayerID\");
if(sscanf(params,\"ui\",id,penzertek))return SendClientMessage(playerid,-1,\"Használat:/penzad [iD][Pénz]\");
GivePlayerMoney(id,penzertek);
SendClientMessage(id,-1,\"Pénzed átállítva egy admin által!\");
return 1;
}
CMD:szintad(playerid,params[])
{
new id,szintad;
if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,-1,\"Nem vagy adminisztrátor!\");
if(id==INVALID_PLAYER_ID)return SendClientMessage(playerid,-1,\"Nincs ilyen játékos!\");
if(sscanf(params,\"ui\",id,szintad))return SendClientMessage(playerid,-1,\"Használat:/szintad [iD][szint]\");
SetPlayerScore(id,szintad);
SendClientMessage(id,-1,\"Szinted átállítva egy admin által!\");
return 1;
}
CMD:asetskin(playerid,params[])
{
new id,skin;
if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,-1,\"Nem Vagy Adminisztrátor!\");
if(id==INVALID_PLAYER_ID)return SendClientMessage(playerid,-1,\"Helytelen PlayerID\");
if(sscanf(params,\"ui\",id,skin))return SendClientMessage(playerid,-1,\"Használat:/setskin [iD][skinID]\");
SetPlayerSkin(id,skin);
return 1;
}
CMD:fegyver(playerid,params[])
{
new fegyver,golyo;
if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,-1,\"Nem vagy adminisztrátor!\");
if(playerid==INVALID_PLAYER_ID)return SendClientMessage(playerid,-1,\"Helytelen PlayerID\");
if(sscanf(params,\"uii\",playerid,fegyver,golyo))return SendClientMessage(playerid,-1,\"Használat:/fegyver [iD][FEGYVER][LÕSZER]\");
GivePlayerWeapon(playerid,fegyver,golyo);
SendClientMessage(playerid,-1,\"Kaptál egy fegyvert!\");
return 1;
}
CMD:v(playerid,params[])
{
new carid;
if(sscanf(params,\"i\",carid))return SendClientMessage(playerid,-1,\"Használat:/v [KocsiID](Fontos hogy ID legyen!)\");
if(carid<400)return SendClientMessage(playerid,-1,\"A kocsi id csak 400 tól 611-ig lehet!\");
if(carid>611)return SendClientMessage(playerid,-1,\"A kocsi id csak 400 tól 611-ig lehet!\");
new Float:X1,Float:Y2,Float:Z3;
GetPlayerPos(playerid,X1,Y2,Z3);
CreateVehicle(carid,X1,Y2,Z3,0,0,0,0);
return 1;
}
CMD:acmds(playerid, params[])
{
if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,-1,\"Te minek akarod megnézni a parancsokat amikor nemvagy admin?\");
SendClientMessage(playerid,-1,\"Admin parancsok: /goto /gethere /freeze /unfreeze /penzad /szintad /fegyver /asetskin\");
SendClientMessage(playerid,-1,\"Admin parancsok: \");
return 1;
}
CMD:goto(playerid,params[])
{
new id;
new Float:x,Float:y,Float:z;
if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,-1,\"Nem Vagy Adminisztrátor!\");
if(id == INVALID_PLAYER_ID)return SendClientMessage(playerid,-1,\"Helytelen PlayerID!\");
if(sscanf(params,\"u\",id))return SendClientMessage(playerid,-1,\"Használat: /goto [iD]\");
GetPlayerPos(id,x,y,z);
SetPlayerPos(playerid,x,y,z);
SendClientMessage(id,-1,\"Valamelyik admin hozzád teleportált\");
return 1;
}
CMD:gethere(playerid,params[])
{
new id,Float:x,Float:y,Float:z;
if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,-1,\"Nem Vagy Adminisztrátor!\");
if(id==INVALID_PLAYER_ID)return SendClientMessage(playerid,-1,\"Helytelen PlayerID!\");
if(sscanf(params,\"u\",id))return SendClientMessage(playerid,-1,\"Használat:/gethere [iD]\");
GetPlayerPos(playerid,x,y,z);
SetPlayerPos(id,x,y,z);
SendClientMessage(playerid,-1,\"Valamelyik admin magához teleportált!\");
return 1;
}
CMD:setskin(playerid,params[])
{
if(IsPlayerConnected(playerid))
{
new skinid;
if(sscanf(params,\"i\",skinid)) return SendClientMessage(playerid,-1,\"Használat:/skinvaltas [skinID]\");
{
if(skinid <= 299 && skinid >= 0)
{
SetPlayerSkin(playerid,skinid);
GetPlayerName(playerid,nev,sizeof(nev));
SendClientMessage(playerid,-1,\"Sikeresen megváltoztattad a skinedet!\");
}
else SendClientMessage (playerid,-1,\"A skin ID-nek 0 és 299 között kell lennine!\");
}
}
else SendClientMessage (playerid,-1,\"Nem vagy bejelentkeze!\");
return 1;
}
CMD:pm(playerid,params[])
{
new kinek;
new uzenet;
new string[128];
if(sscanf(params,\"ui\",kinek,uzenet))return SendClientMessage(playerid,-1,\"Használata: /pm <ID> <Üzenet>\");
format(string, sizeof(string),\"Üzenetet kaptál! Üzenete:%d\",playerid,uzenet);
SendClientMessage(kinek,-1,string);
return 1;
}
CMD:flip(playerid) {
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, 0x76c2ffff,\"Autód visszaállítva!\");
RepairVehicle ( GetPlayerVehicleID ( playerid ) );
SetVehicleHealth(VehicleID, 1000.0);
return 1;
}
public ValtozoNev()
{
new rand = random(6);
switch(rand)
{
case 0: SendRconCommand(\"hostname [HUN]The Szervered neve Server \");
case 2: SendRconCommand(\"hostname [HUN]The Szervered neve Server\");
case 5: SendRconCommand(\"mapname The Szervered neve\");
}
return 1;
}
public ValtozoNev2()
{
new rand = random(6);
switch(rand)
{
case 0: SendRconCommand(\"mapname The Szervered neve\");
}
return 1;
}
CMD:szabalyok(playerid, params[])
{
SendClientMessage(playerid,0x33AA33AA,\"Tilosokak a következõk:\");
SendClientMessage(playerid,0x33AA33AA,\"DriveBy -- DB -- Kocsival való megölés!\");
SendClientMessage(playerid,0x33AA33AA,\"SpawnKill -- SK -- Épületbõl kijövõ ember megölése!\");
SendClientMessage(playerid,0x33AA33AA,\"WriteKill -- WK -- Kihasználód a játékos tétlenségét miközben ír , azaz megölöd!\");
SendClientMessage(playerid,0x33AA33AA,\"Káromkodni a chat-en!\");
SendClientMessage(playerid,0x33AA33AA,\"Csalni vagy elõnyt nyújtó cleo módot használni!\");
SendClientMessage(playerid,0x33AA33AA,\"Szídni az AdminTeam-ot!\");
return 1;
}
CMD:vj(playerid,params[])
{
new vehicleid = GetPlayerVehicleID(playerid);
RepairVehicle ( GetPlayerVehicleID ( playerid ) );
SetVehicleHealth(vehicleid, 1000.0);
SendClientMessage(playerid, 0xFFFF00AA, \">>||{FF0000}Jarmû{FF0000} {FFFFFF}megjavítása{FFFFFF} {00FF00}sikeres!{00FF00}||<<\");
new pName[30];
new string[256];
GetPlayerName(playerid, pName, 30);
format(string, 280, \">>||{0000FF}%s{0000FF} {FF80FF}Ezt a parancsot használta{FF80FF}:/vj||<<\", pName);
SendClientMessageToAll(0xFFFF00AA, string);
}
CMD:kill(playerid,params[])
{
SetPlayerHealth(playerid,0);
SendClientMessage(playerid,0xFFFF00AA,\"Megölted magad!\");
}
CMD:admintgf(playerid,params[])
{
ShowPlayerDialog(playerid, 2525, DIALOG_STYLE_MSGBOX, \"{ff0091}AdminTGF!{ff0091}\", \"{ff0000}Nem számít az életkor!\\nLegyél értelmes és tudj pár admin parancsot!\\nNapi aktivítás 1-2óra ha ez megvan szólj a tulajnak!{ff0000}\", \"OK\", \"OK\");
}
CMD:heal(playerid,params[])
{
SetPlayerHealth(playerid,100);
SendClientMessage(playerid,HIBA,\"Kaptál életet!\");
}
CMD:armor(playerid,params[])
{
SetPlayerArmour(playerid,100);
SendClientMessage(playerid,HIBA,\"Kaptál armort!\");
}
CMD:god(playerid,params[])
{
if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,HIBA,\"Nem vagy adminisztrátor!\");
if(playerid==INVALID_PLAYER_ID)return SendClientMessage(playerid,HIBA,\"Nincs ilyen játékos!\");
if(sscanf(params,\"u\",playerid))return SendClientMessage(playerid,HIBA,\"Használat:/god [iD]\");
SetPlayerHealth(playerid,99999);
SetPlayerArmour(playerid,99999);
SendClientMessage(playerid,HIBA,\"Megkapta(d)!\");
return 1;
}
CMD:kick(playerid,params[])
{
if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,HIBA,\"Nem vagy adminisztrátor!\");
if(playerid==INVALID_PLAYER_ID)return SendClientMessage(playerid,HIBA,\"Nincs ilyen játékos!\");
if(sscanf(params,\"u\",playerid))return SendClientMessage(playerid,HIBA,\"Használat:/kick [iD] [Oka]\");
Kick(playerid);
SendClientMessageToAll(HIBA,\"Valakit kickelt egy admin\");
return 1;
}
CMD:ban(playerid,params[])
{
if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,HIBA,\"Nem vagy adminisztrátor!\");
if(playerid==INVALID_PLAYER_ID)return SendClientMessage(playerid,HIBA,\"Nincs ilyen játékos!\");
if(sscanf(params,\"u\",playerid))return SendClientMessage(playerid,HIBA,\"Használat /ban [iD] [Oka]\");
SendClientMessage(playerid,HIBA,\"Bannolva lettél!\");
Ban(playerid);
return 1;
}
CMD:segely(playerid,params[])
{
GivePlayerMoney(playerid,1000000);
SendClientMessage(playerid,HIBA,\"Megkaptad a segélyed!\");
SendClientMessageToAll(HIBA,\"Valaki használta a /segély parancsot\");
}
CMD:parancsok(playerid,params[])
{
ShowPlayerDialog(playerid, 2525, DIALOG_STYLE_MSGBOX, \"{ff0091}Parancsok!{ff0091}\", \"{ff0000}/heal\\n/armor\\n/v [KocsiID]\\n/flip\\n/szabalyok\\n/kill\\n/admintgf\\n/pm\\n/setskin{ff0000}\", \"OK\", \"OK\");
return 1;
}
http://www.solidfiles.com/d/f8524cf06a/Th0mas_módja.rar
Legelsõ módom,remélem tetszik nektek.
[gmod]Javítottam a tageket![/gmod]