Kullanışlı Kodlar

[staple]

Anti spawn kill sistemi

OnPlayerSpawn publicine ekleyin.

[/size]

Kod Seç Expand

SetPlayerHealth(playerid, 10000);
TogglePlayerControllable(playerid, 0);
SendClientMessage(playerid, -1, "{f90000}<!> {ffffff}5 Saniye Boyunca Ölümsüzsün.");
SetTimerEx("SpawnKillBitis",5000,0,"i",playerid);

Modun boş bir kısmına ekleyin.

Kod Seç Expand

forward SpawnKillBitis(playerid);
public SpawnKillBitis(playerid)
{
TogglePlayerControllable(playerid, 1);
    SetPlayerHealth(playerid, 100);
    SendClientMessage(playerid, 0xFF0000AA, "{ff0000}Anti Spawnkill {ffffff}süreniz doldu, İyi oyunlar!");
    return 1;
}

Not: Test edilmedi. Çalışması lazım..

[Backup]

Anti spawn kill sistemi

OnPlayerSpawn publicine ekleyin.

[/size]

Kod Seç Expand

SetPlayerHealth(playerid, 10000);
SendClientMessage(playerid, -1, "{f90000}<!> {ffffff}5 Saniye Boyunca Ölümsüzsün.");
SetTimerEx("SpawnKillBitis",5000,0,"i",playerid);

Modun boş bir kısmına ekleyin.

Kod Seç Expand

forward SpawnKillBitis(playerid);
public SpawnKillBitis(playerid)
{
    SetPlayerHealth(playerid, 100);
    SendClientMessage(playerid, 0xFF0000AA, "{ff0000}Anti Spawnkill {ffffff}süreniz doldu, İyi oyunlar!");
    return 1;
}

Not: Test edilmedi. Çalışması lazım..

5 saniye boyunca ölümsüzüm ve 5 saniye içinde silah çekip adam vurabilirsin. 

[staple]

Anti spawn kill sistemi

OnPlayerSpawn publicine ekleyin.

[/size]

Kod Seç Expand

SetPlayerHealth(playerid, 10000);
SendClientMessage(playerid, -1, "{f90000}<!> {ffffff}5 Saniye Boyunca Ölümsüzsün.");
SetTimerEx("SpawnKillBitis",5000,0,"i",playerid);

Modun boş bir kısmına ekleyin.

Kod Seç Expand

forward SpawnKillBitis(playerid);
public SpawnKillBitis(playerid)
{
    SetPlayerHealth(playerid, 100);
    SendClientMessage(playerid, 0xFF0000AA, "{ff0000}Anti Spawnkill {ffffff}süreniz doldu, İyi oyunlar!");
    return 1;
}

Not: Test edilmedi. Çalışması lazım..

5 saniye boyunca ölümsüzüm ve 5 saniye içinde silah çekip adam vurabilirsin. 

Düzenledim.

[_Code]

PAWN Kodu: Seç



CMD:kill(playerid)
{
ApplyAnimation(playerid, "SWEET", "Sweet_injuredloop", 4.1, 1, 0, 0, 0, 0, 0);
SetTimerEx("geber", (2000), false, "i", playerid);

}


forward geber(playerid);
public geber(playerid) return SetPlayerHealth(playerid,0);



Herhangi birisi komutu kullandıktan 2 saniye sonra animasyonlu bir şekilde ölür.

[Christian]

Anti spawn kill sistemi

OnPlayerSpawn publicine ekleyin.

[/size]

Kod Seç Expand

SetPlayerHealth(playerid, 10000);
TogglePlayerControllable(playerid, 0);
SendClientMessage(playerid, -1, "{f90000}<!> {ffffff}5 Saniye Boyunca Ölümsüzsün.");
SetTimerEx("SpawnKillBitis",5000,0,"i",playerid);

Modun boş bir kısmına ekleyin.

Kod Seç Expand

forward SpawnKillBitis(playerid);
public SpawnKillBitis(playerid)
{
TogglePlayerControllable(playerid, 1);
    SetPlayerHealth(playerid, 100);
    SendClientMessage(playerid, 0xFF0000AA, "{ff0000}Anti Spawnkill {ffffff}süreniz doldu, İyi oyunlar!");
    return 1;
}

Not: Test edilmedi. Çalışması lazım..

Teşekkürler, Oldu bi güzel editledim mükemmel.

[starhan01]

Aynı YAzıyı ARd Arda Yazmadan Koruma Sistemi...
Modun Başına:

modun Başına:

PAWN Kodu: Seç

new atcagimsayi[MAX_PLAYERS][1024],artarda[MAX_PLAYERS];

OnPlayertext'e

PAWN Kodu: Seç

if(strcmp(atcagimsayi[playerid],text,true)){artarda[playerid] = 0; atcagimsayi[playerid] = "";}
if(artarda[playerid] >= 1){
if(!strcmp(atcagimsayi[playerid],text,true)){
SendClientMessage(playerid,-1,"Aynı mesajı art arda yazamazsın");
    return 0;
}
}
strmid(atcagimsayi[playerid],text, 0, strlen(text), 1024);
artarda[playerid] += 1;

[_DecaT]

Bir Oyuncu Buga Girdiğinde Onu Tokatlar. Bugdan Kurtarır

PAWN Kodu: Seç

CMD:Tokatla(playerid, params[], help)
{
        #pragma unused help
        if(P_Data[playerid][pAdmin] == 0) return SCM(playerid, COLOR_RED, "[SERVER]Bu Komutu Kullanmaya Yetkiniz Yok.");
        new
pplayerid,Float:health,string[128],reason[48];
        if(sscanf(params, "us[48]", pplayerid,reason)) return SCM(playerid, COLOR_RED, "» Kullanım: /TokatLa [ID] [Sebep]");
        if(pplayerid == IPI) return SCM(playerid, COLOR_RED, "Yanlış playerid!");
        GetPlayerHealth(pplayerid,health); SetPlayerHealth(pplayerid,health-10);
        format(string,sizeof(string),""COL_RED"Admin "COL_WHITE"%s "COL_RED"» Oyuncu Tokatlı. "COL_WHITE"%s. "COL_RED"Sebep: %s",GetName(playerid),GetName(pplayerid),reason);
        SCMToAll(COLOR_RED,string);
        return 1;
}

İyi Kullanıımlar...

FS Yapıp Kullanınız İlk Önce Pawnoda Açıp F5 Çekin Ondan Sonrada PWN. AMX. Leri FS Dosyasınıda Atın.

[_DecaT]

İlk Kendi Komutu Yaptım Eksik Oldu Ama Oldu.

PAWN Kodu: Seç

CMD:isimdegistir(playerid, params[])
{
new isim[MAX_PLAYER_NAME], id;
if(sscanf(params, "us[24]", id, isim)) return SendClientMessage(playerid, COLOR_ERROR, "Kullanım: /İsimDegistir [ID] [İsim]");
if(AdminLevel[playerid] < 8) return SendClientMessage(playerid ,COLOR_ADMIN, "[SERVER] Bu Komuta Yetkiniz Erişmiyor");
SetPlayerName(id, isim);
return 1;
}
İyi Kullanımlar

[starhan01]

Sistemin Çalışması lazım Kodladım Ama Bilmiyorum Çalışıyormu çalışmiyormu Denemedim Ama

PAWN Kodu: Seç

dcmd_skinal(playerid, params[])
{
   /// Kodlama SuLoNation Tarafından Yapılmıştır
new idx, iString[128];
iString = strtok(params, idx);

if (!strlen(iString)) {
    SendClientMessage(playerid, COLOR_RED, " [UYARI]: /skinal SKINID");
    return true;
}

idx = strval(iString);

if (IsInvalidSkin(idx) || idx < MIN_SKIN_ID || idx > MAX_SKIN_ID) {
    SendClientMessage(playerid, COLOR_RED, "[HATA]: Yanlış Skin ID Girdiniz Veya hatalı");
    return true;
}

SetPlayerSkin(playerid, idx);
curPlayerSkin[playerid] = idx;
format(iString, 128, "[SUCCESS]: Changed skin to SKINID %d", idx);

SendClientMessage(playerid, COLOR_GREEN, iString);

return true;
}

[Kraus]

Burası yanıtlanılabilir/tartışmaya açık bir konu değildir. Kodlar paylaşılır, isteyen kişi kullanır. Kod hakkında tartışmanızı özel mesaj yoluyla yapın. Kodlar ZCMD vb. includeler gerektirebilir. Kodların include gerektirmeyecek şekilde bütün modlara uyacak şekilde paylaşılma zorunluluğu yoktur. Modunuza uymuyorsa kendi moduna aldığınız kodu uyarlayabilirsiniz.

[Excision]

Kod Seç Expand

public OnPlayerWeaponShot(playerid, weaponid, hittype, hitid, Float:fX, Float:fY, Float:fZ)
{
if(IsPlayerInAnyVehicle(playerid) && GetPlayerState(playerid) == PLAYER_STATE_PASSENGER && !DriverCheck(GetPlayerVehicleID(playerid)))
{
GameTextForPlayer(playerid, "~r~~h~~h~Drive by yasaktir!", 3000, 3);
SetPlayerArmedWeapon(playerid, 0);
}
return 1;
}
stock DriverCheck(vehicleid)
{
for(new i = 0; i <= GetPlayerPoolSize(); i++)
{
if(IsPlayerConnected(i))
{
if(GetPlayerState(i) == PLAYER_STATE_DRIVER && GetPlayerVehicleID(i) == vehicleid) return 1;
}
}
return 0;
}
Drive by i engeller.

[_Code]

PAWN Kodu: Seç

CMD:thanos(playerid)
{

if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid,-1,"Admin olmalısın!");
if(Iter_Count(Player) < 2) return  SendClientMessage(playerid,-1,"Oyuncu sayısı yeterli değil!");
new toplamoyuncu = Iter_Count(Player)/2; //Oyuncuların yarısı
new id;
for(new i = 0; i != toplamoyuncu; i++ )
{
id = Iter_Random(Player);
if(!IsPlayerConnected(id)) continue;
if(id == playerid) continue;
SetPlayerHealth(id,0);
}
SendClientMessageToAll(-1,"Serverin yarısı zengin-fakir ayırt etmeksizin Thanos tarafından yok edildi.");

return 1;
}

Komut kullanıldığında server'de bulunan oyuncular'ın yarısını ayırt etmeksizin öldürür.

Foreach ve IZCMD includeleri gerekir

[Jawié]

Bir Oyuncu Buga Girdiğinde Onu Tokatlar. Bugdan Kurtarır

PAWN Kodu: Seç

CMD:Tokatla(playerid, params[], help)
{
        #pragma unused help
        if(P_Data[playerid][pAdmin] == 0) return SCM(playerid, COLOR_RED, "[SERVER]Bu Komutu Kullanmaya Yetkiniz Yok.");
        new
pplayerid,Float:health,string[128],reason[48];
        if(sscanf(params, "us[48]", pplayerid,reason)) return SCM(playerid, COLOR_RED, "» Kullanım: /TokatLa [ID] [Sebep]");
        if(pplayerid == IPI) return SCM(playerid, COLOR_RED, "Yanlış playerid!");
        GetPlayerHealth(pplayerid,health); SetPlayerHealth(pplayerid,health-10);
        format(string,sizeof(string),""COL_RED"Admin "COL_WHITE"%s "COL_RED"» Oyuncu Tokatlı. "COL_WHITE"%s. "COL_RED"Sebep: %s",GetName(playerid),GetName(pplayerid),reason);
        SCMToAll(COLOR_RED,string);
        return 1;
}

İyi Kullanıımlar...

FS Yapıp Kullanınız İlk Önce Pawnoda Açıp F5 Çekin Ondan Sonrada PWN. AMX. Leri FS Dosyasınıda Atın.

Sizin oralarda tokatlama severek mi oluyor? 

[Alonso]

Oyuncu Komutu Kullandığında Power'FM Radyosuna Direkt bağlanır

PAWN Kodu: Seç

CMD:rac(playerid, params[])
{
    StopAudioStreamForPlayer(playerid);
    PlayAudioStreamForPlayer(playerid, "http://195.142.3.84/power/PowerTurk_mpeg_128_home/icecast.audio?");
    SendClientMessage(playerid, 0x7491D6FF, "[BILGI] {FFFFFF}Şuanda Power Türk Fm radyosunu dinliyorsunuz.");
return 1;
}


NOT:Kod Bozkurt-HP'den Alınmıştır NexoR'a aittir.

[Codes.]

TümKomutlar ve ya Komutlar hakkında bilgi vermek içindir.

Modun başına Pawno Renk Kodlarını Ekleyelim.

Pawno Renkleri;

PAWN Kodu: Seç

#define COLOR_RED 0xAA3333AA
#define COLOR_GREY 0xAFAFAFAA
#define COLOR_GREEN 0x33AA33AA
#define COLOR_YELLOW 0xFFFF00AA
#define COLOR_WHITE 0xFFFFFFAA
#define COLOR_BLUE 0x0000BBAA
#define COLOR_LIGHTBLUE 0x33CCFFAA
#define COLOR_ORANGE 0xFF9900AA
#define COLOR_LIME 0x10F441AA
#define COLOR_MAGENTA 0xFF00FFFF
#define COLOR_NAVY 0x000080AA
#define COLOR_AQUA 0xF0F8FFAA
#define COLOR_CRIMSON 0xDC143CAA
#define COLOR_FLBLUE 0x6495EDAA
#define COLOR_BISQUE 0xFFE4C4AA
#define COLOR_BLACK 0x000000AA
#define COLOR_CHARTREUSE 0x7FFF00AA
#define COLOR_BROWN 0xA52A2AAA
#define COLOR_CORAL 0xFF7F50AA
#define COLOR_GOLD 0xB8860BAA
#define COLOR_GREENYELLOW 0xADFF2FAA
#define COLOR_INDIGO 0x4B00B0AA
#define COLOR_IVORY 0xFFFF82AA
#define COLOR_LAWNGREEN 0x7CFC00AA
#define COLOR_LIMEGREEN 0x32CD32AA
#define COLOR_MIDNIGHTBLUE 0x191970AA
#define COLOR_MAROON 0x800000AA
#define COLOR_OLIVE 0x808000AA
#define COLOR_ORANGERED 0xFF4500AA
#define COLOR_PINK 0xFFC0CBAA
#define COLOR_SPRINGGREEN 0x00FF7FAA
#define COLOR_TOMATO 0xFF6347AA
#define COLOR_YELLOWGREEN 0x9ACD32AA
#define COLOR_MEDIUMAQUA 0x83BFBFAA
#define COLOR_MEDIUMMAGENTA 0x8B008BAA
#define COLOR_BRIGHTRED 0xDC143CAA
#define COLOR_SYSTEM 0xEFEFF7AA
#define COLOR_PURPLE 0x330066AA

OnPlayerCommandText publicine bu kodu ekliyoruz.

TumKomutlar Kod;

PAWN Kodu: Seç

public OnPlayerCommandText(playerid, cmdtext[])
{
    if (strcmp("/tumkomutlar", cmdtext, true, 5) == 0)
    {
    SendClientMessage(playerid,0xFFFFFF,"Tumkomutlar komutunu kullandınız.");
        }
    return 0;
    }
}


Komutlar Kod;

PAWN Kodu: Seç

if (strcmp("/komutlar", cmdtext, true, 10) == 0)
    {
    SendClientMessage(playerid, COLOR_YELLOW, "Komutları Kullanabileceğiniz bir komut değerini kullandınız.");
    SendClientMessage(playerid, COLOR_YELLOW, "Komutlar Aktif Hale Getirildi.");
    }