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: bendor - 2011. November 20. - 09:26:07

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: bendor - 2011. November 20. - 09:26:07

Sziasztok!
Belekezdtem egy nagyobb kaliberû munkába, ez egy admin rendszer.
Egyenlõre még csak RCON adminok tudják használni, de a következõ verzióban ez is változni fog!
Amiket tud:
/kick1 (ez is)
/stuntbon (aktiválja a Stuntolási Bónuszokat, tehát ha csinálsz egy 360° flip-et kapsz érte pénzt ^^)
/minigun (minigun lekérõ :D)
/freeze (fagyasztás)
/unfreeze (\"olvasztás\" :D)
/adminvagyok (Admin bónuszok/gift-ek[Kapsz 100000 Pontot  ;D])
/get (egyértelmû)
/goto (egyértelmû)
Egyenlõre ennyi lenne :)
A forráskód:
[pawn]
#pragma tabsize 0
#include <a_samp>
#include <core>
#include <float>
#include <sscanf>
#include \"../include/gl_common.inc\"
#define COLOR_GREY 0xAFAFAFAA
#define COLOR_GREEN 0x33AA33AA
#define COLOR_RED 0xAA3333AA
#define COLOR_YELLOW 0xFFFF00AA
#define COLOR_WHITE 0xFFFFFFFF
//------------------------------------------------------------------------------------------------------
#define ADMIN_SPEC_TYPE_NONE 0
#define ADMIN_SPEC_TYPE_PLAYER 1
#define ADMIN_SPEC_TYPE_VEHICLE 2
new toplayerid;
//------------------------------------------------------------------------------------------------------
public OnFilterScriptInit()
{
}
//------------------------------------------------------------------------------------------------------
public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
{
}
//------------------------------------------------------------------------------------------------------
public OnPlayerCommandText(playerid, cmdtext[])
{
if(strcmp(cmdtext, \"/minigun\", true) == 0)
{
GivePlayerWeapon(playerid,38,999);
return 1;
}
if(strcmp(cmdtext, \"/adminvagyok\", true) == 0)
{
SetPlayerScore(playerid,10000);
SetPlayerColor(playerid, 0xAA3333AA);
return 1;
}
if(strcmp(cmdtext, \"/reszeg\", true) == 0)
{
ApplyAnimation(playerid,\"PED\",\"WALK_DRUNK\",4.1,1,1,1,1,1,1);
return 1;
}
if(strcmp(cmdtext, \"/stuntbon\", true) == 0)
{
EnableStuntBonusForAll(0);
return 1;
}
if(strcmp(cmdtext, \"/ahelp\", true) == 0)
{
SendClientMessage(playerid,0xFFFFFFFF,\"Üdv Admin! /minigun , /stuntbon , /adminvagyok , /spec , /asay , /kick1 ,/get , /goto ,/freeze , /unfreeze\");
return 1;
}
if(strcmp(cmdtext, \"/freeze\", true) == 0)
{
   new tmp[256];
   tmp = strtok(cmdtext, idx);
   if(!strlen(tmp)) {
      SendClientMessage(playerid, COLOR_WHITE, \"Használat: /freeze [playerid]\");
      return 1;
   }
   playerid = strval(tmp);
   if(!IsPlayerConnected(specplayerid)) {
       SendClientMessage(playerid, COLOR_RED, \"Játékos nem aktív!\");
      return 1;
   }
   SendClientMessage(playerid,0xFFFF00AA ,\"Le lettél fagyasztva!\");
   TogglePlayerControllable(playerid, 0);
   return 1;
   }
if(strcmp(cmdtext, \"/unfreeze\", true) == 0)
{
   new tmp[256];
   tmp = strtok(cmdtext, idx);
   if(!strlen(tmp)) {
      SendClientMessage(playerid, COLOR_WHITE, \"Használat: /unfreeze [playerid]\");
      return 1;
   }
   playerid = strval(tmp);
   if(!IsPlayerConnected(specplayerid)) {
       SendClientMessage(playerid, COLOR_RED, \"Játékos nem aktív!\");
      return 1;
   }
   SendClientMessage(playerid,0xFFFF00AA ,\"Egy admin levette rólad a fagyasztást!\");
   TogglePlayerControllable(playerid, 1);
   return 1;
   }
if(strcmp(cmdtext, \"/get\", true) == 0)
{
new Float:x, Float:y, Float:z;
GetPlayerPos(playerid,x,y,z);
new tmp[256];
tmp = strtok(cmdtext, idx);
if(!strlen(tmp)) {
SendClientMessage(playerid, COLOR_WHITE, \"Használat: /get [playerid]\");
return 1;
}
playerid = strval(tmp);
if(!IsPlayerConnected(specplayerid)) {
SendClientMessage(playerid, COLOR_RED, \"Játékos nem aktív!\");
return 1;
}
SendClientMessage(playerid,0xFFFF00AA ,\"Egy admin magához hívott!\");
SetPlayerPos(playerid,x+2,y+2,z+2);
return 1;
}
if(strcmp(cmdtext, \"/goto\", true) == 0)
{
    new Float:X,Float:Y,Float:Z,Float:A;
    GetPlayerPos(toplayerid,X,Y,Z);
    GetPlayerFacingAngle(toplayerid,A);
    SetPlayerPos(playerid,X+5,Y+5,Z+2);
    SetPlayerFacingAngle(playerid,A);
    new name[MAX_PLAYER_NAME], string[44];
    GetPlayerName(playerid, name, sizeof(name));
    format(string, sizeof(string), \"Elteleportáltál %s-hoz!\",name);
    SendClientMessage(playerid,0xFFFF00AA, string);
    return 1;
}
if(strcmp(cmdtext, \"/kick1\", true) == 0)
{
new tmp[256];
tmp = strtok(cmdtext, idx);
new n[MAX_PLAYER_NAME];
GetPlayerName(playerid,n,sizeof(n));
new id;
new indok[128];
if(!strlen(tmp)) {
SendClientMessage(playerid, COLOR_WHITE, \"Használat: /kick [playerid] [indok]\");
return 1;
}
playerid = strval(tmp);
if(!IsPlayerConnected() {
SendClientMessage(playerid, COLOR_RED, \"Játékos nem aktív!\");
return 1;
}
new string[128];
new idname[MAX_PLAYER_NAME];
GetPlayerName(id,idname,sizeof(idname));
format(string, sizeof(string),\"%s ki lett rúgva(kick) %s által. Oka: %s\",idname, n, indok);
SendClientMessageToAll(COLOR_RED,string);
Kick(id);
return 1;
}
[/pawn]
Látom szúrta a szemeteket,hogy egy kódot máshonnan szedtem, ezért kivettem belõle!

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: |‾xɐʇuA - 2011. November 20. - 11:04:29

nem rossz még bõvítsd de jó lenne a ZCMD Meg SSCanf

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: bendor - 2011. November 20. - 11:06:50

Köszi, mint mondtam: a következõ jobb lesz :D:D

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: |‾xɐʇuA - 2011. November 20. - 12:39:59

de találok benne angol sorokat :
 

// WE ONLY DEAL WITH COMMANDS FROM ADMINS IN THIS FILTERSCRIPT

 

// STOP SPECTATING

 
STB

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: instant - 2011. November 20. - 12:41:44

ez szerintemalap script csak át irta

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: Benceee - 2011. November 20. - 12:56:21

Hát.:D Furcsa. Szerintem másolt valahonnan.

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: JackBronson - 2011. November 20. - 14:12:27

XD a /asay az én admin rednszerembõl van :D
Én attam a változomnak azt a nevet,h \'kakak\' :D
Meg az egész /asay rendszer az enyémbõl van.

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: palesz_88 - 2011. November 20. - 14:30:37

Diggity\" post=\"195015\" timestamp=\"1321789199\"]
de találok benne angol sorokat :
 

// WE ONLY DEAL WITH COMMANDS FROM ADMINS IN THIS FILTERSCRIPT

 

// STOP SPECTATING

 
STB
 
[/quote]
adminspec.pwn .

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: |‾xɐʇuA - 2011. November 20. - 15:05:14

jah lehet nem szoktam nézni az alap scripteket hát ez egy összerakott admin rendszer lett innen egy kis ilyen onnan egy kis olyan xd

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: DrAkE - 2011. November 20. - 15:24:14

Idézetet írta: bendor date=1321777567\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"13562\" data-ipsquote-contentclass=\"forums_Topic

Belekezdtem egy nagyobb kaliberû munkába, ez egy admin rendszer.
 

Õszintén, ebbe mi a \"nagyobb kaliberû\". Egyszerûen kivetted a dolgokat más scriptbõl és beleraktad ebbe. Ezt a scriptet is csak a hit tartja egybe. Ha már belekezdesz egy scriptbe az 80%-ban legyen saját.
Minek van betöltve az sscanf, core include mikor nem is használod?
Az asay elvileg nem is nagyon fog mûködni, magyarul üres szöveget fog kiírni.
Még sorolhatnám a hibákat.

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: |‾xɐʇuA - 2011. November 20. - 15:30:12

10% függvények 10% leírások ++

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: bendor - 2011. November 20. - 16:56:01

Az asay tényleg onnan van,a spec is máshonnan van, de a többi full saját ^^

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: |‾xɐʇuA - 2011. November 20. - 17:37:52

/admin vagyok. xdd annyiszor írod be ahányszor akarod xddd

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: bendor - 2011. November 20. - 19:07:19

Tõlem beírhatod akárhányszor,nem fogja mindig növelni... :mistrust:

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: DrAkE - 2011. November 21. - 19:50:35

Idézetet írta: bendor date=1321804561\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"13562\" data-ipsquote-contentclass=\"forums_Topic

Az asay tényleg onnan van,a spec is máshonnan van, de a többi full saját ^^
 

Ebbe mi a saját könyörgöm? :\'D :\'D Mindegyik valamelyik scriptbõl van X\'D

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: bendor - 2011. November 21. - 20:01:12

/minigun
/freeze
/unfreeze
/adminvagyok
/get
/goto
/kick1
/stuntbon
 
[/quote]
 :mistrust:

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: |‾xɐʇuA - 2011. November 21. - 20:16:24

hát ez nem sok még kódnak se megy el xd akk csináld meg Dialogba talán..

Cím: dAdmin (DogoN\'s Admin System) Beta 1.0
Írta: bendor - 2011. November 21. - 21:07:18

Majd a következõ jobb lesz... ;D