GTATurk.com Reklam Hizmetleri

Haberler:

Gönderen Konu: Kullanışlı Kodlar  (Okunma sayısı 3247 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı DeJaVu´

  • Albanians
  • İleti: 39
  • [Z]Group-Xtreme
Kullanışlı Kodlar
« : 08 Ocak 2012 ; 20:04:24 »
Kullanışlı Kodlar

Ön söz
Eger kodun icinde SendClientMessage, Kick, vb fonksiyonlar varsa ve return degeri önemli degilse buraya eklenebilir.

Konu kuralları
  • Kodlarınızı paylaşırken çalıştığından emin olup paylaşın.
  • Paylaştığınız kod size ait değil ise alıntı olduğunu belirtin.
  • Konu ile ilgisiz mesajlar atmayın.
« Son Düzenleme: 09 Ocak 2012 ; 23:29:40 Gönderen: DeJaVu´ »


Reklamlar

Tüm oyun fırsatları için tıklayın !

  Reklamlar


Çevrimdışı RyDeR`

  • PAWN Coder
  • Bölüm Yetkilisi
  • ****
  • İleti: 5445
    • Ödüller
Ynt: Kullanışlı Kodlar
« Yanıtla #1 : 08 Ocak 2012 ; 20:06:18 »
Güzel konu. Ilk benden olsun:
Pawn: [Seç]
stock RemovePlayerWeapon(playerid, ...) {
    new
        iArgs = numargs()
    ;
    while(--iArgs) {
        SetPlayerAmmo(playerid, getarg(iArgs), 0);
    }
}
"The secret to creativity is knowing how to hide your sources" ─ Albert Einstein

Çevrimdışı DeJaVu´

  • Albanians
  • İleti: 39
  • [Z]Group-Xtreme
Ynt: Kullanışlı Kodlar
« Yanıtla #2 : 08 Ocak 2012 ; 20:23:31 »
GetPlayerID;

Pawn: [Seç]
GetPlayerID(const PlayerName[])
{
  new
            pName[MAX_PLAYER_NAME];
for(new i = 0, j = GetMaxPlayers(); i != j; ++i)
{
    if(IsPlayerConnected(i))
    {
GetPlayerName(i, pName, MAX_PLAYER_NAME);
if(strfind(pName, PlayerName, true) != -1)
{
return i;
}
}
}
return -1;
}
« Son Düzenleme: 01 Şubat 2012 ; 02:30:38 Gönderen: DeJaVu´ »

Çevrimdışı Swift

  • The Lost Brotherhood
  • **
  • İleti: 1667
Ynt: Kullanışlı Kodlar
« Yanıtla #3 : 08 Ocak 2012 ; 20:29:43 »
Bilgi
Serverdaki oyunculara 520 ID'li araç verir ve random spawn eder. (/aracvespawn)

Pawn: [Seç]
if(!strcmp(cmdtext, "/aracsvepawn", true))
{
new Float:RandomSpawn[][4] ={
// Positions, (X, Y, Z and Facing Angle)
{-2796.9854, 1224.8180, 20.5429, 192.0335},
{-2454.2170, 503.8759, 30.0790, 267.2932},
{-2669.7322, -6.0874, 6.1328, 89.8853}
};
new rand = random(sizeof(RandomSpawn));
for(new i=0; i < MAX_PLAYERS; ++i){
if(IsPlayerConnected(i)){
new arac;
SetPlayerPos(playerid, RandomSpawn[rand][0], RandomSpawn[rand][1],RandomSpawn[rand][2]);
arac = CreateVehicle(520,  RandomSpawn[rand][0], RandomSpawn[rand][1],RandomSpawn[rand][2], RandomSpawn[rand][3], 0, 1, -1);
LinkVehicleToInterior(arac, GetPlayerInterior(i));
PutPlayerInVehicle(playerid, arac, 0);
}
}
return 1;
}
« Son Düzenleme: 08 Ocak 2012 ; 20:30:18 Gönderen: DonatHan_Swift »

Çevrimdışı DeJaVu´

  • Albanians
  • İleti: 39
  • [Z]Group-Xtreme
Ynt: Kullanışlı Kodlar
« Yanıtla #4 : 08 Ocak 2012 ; 20:38:53 »
Kullanışlı bir macro;

Pawn: [Seç]
#define If(%1=%2) if(!strcmp(%1,%2,true))
Örnek kullanım;


Pawn: [Seç]
new str[32] = "deneme123";
If(str = "deneme123")
{

}
« Son Düzenleme: 01 Şubat 2012 ; 02:30:52 Gönderen: DeJaVu´ »

Çevrimdışı DeJaVu´

  • Albanians
  • İleti: 39
  • [Z]Group-Xtreme
Ynt: Kullanışlı Kodlar
« Yanıtla #5 : 08 Ocak 2012 ; 20:46:50 »
Bir kullanışlı macro daha ;

Pawn: [Seç]
#define forEx<%1,%2,%3> for(new %1 = %2; %1 <= %3; ++%1)
Örnek ;

Pawn: [Seç]
forEx<i, 5, 10>
{
       printf("%d", i);
}

Sonuç;

Kod: [Seç]
5
6
7
8
9
10
« Son Düzenleme: 01 Şubat 2012 ; 02:31:19 Gönderen: DeJaVu´ »

Çevrimdışı -Win7

  • The Lost Brotherhood
  • **
  • İleti: 507
  • Profesyonel User Team
Ynt: Kullanışlı Kodlar
« Yanıtla #6 : 08 Ocak 2012 ; 20:53:34 »
Bir Tanede Benden Olsun , Bu Kod İle RPG Serverlarda Oto Emote Yapılmasına Olanak Sağlar

OnPlayerText'e Yazıyoruz Bu Kodları

Pawn: [Seç]
    if (strcmp(":D", text, true, 10) == 0)
{
    format(string, sizeof(string), "* %s Kahkaha Atar.", sendername);
ProxDetector(30.0, playerid, string, COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE);
return 0;
    }
   
     if (strcmp(":)", text, true, 10) == 0)
{
    format(string, sizeof(string), "* %s Hafifçe Gülümser.", sendername);
ProxDetector(30.0, playerid, string, COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE);
return 0;
    }

Çevrimdışı Unicorn.

  • Russians
  • ****
  • İleti: 1774
  • Eski Rumuz: darkhunter1986
Ynt: Kullanışlı Kodlar
« Yanıtla #7 : 09 Ocak 2012 ; 12:58:33 »
Ladmin'e goredir kendi modunuza gore duzenlersiniz.

OnPlayerText publicine;
Pawn: [Seç]
if(IsPlayerAdmin(playerid))
{
GetPlayerName(playerid, name, 20);
    format(string, sizeof(string), "[RCON] %s(%i): %s", name, playerid, text);
    SendClientMessageToAll(playerid, string);
return 0;
}
if(IsPlayerLAdmin(playerid))
{
GetPlayerName(playerid, name, 20);
    format(string, sizeof(string), "[GM] %s(%i): %s", name,playerid, text);
    SendClientMessageToAll(playerid, string);
return 0;
}
else
{

    format(string, sizeof(string), "(%i): %s", playerid, text);
    SendPlayerMessageToAll(playerid, string);
    }
return 0;
}

Chatde yazilarin degismesini saglar.

EKLEME: Konu hayirli olsun.
« Son Düzenleme: 09 Ocak 2012 ; 13:00:29 Gönderen: darkhunter1986 »

Çevrimdışı Unicorn.

  • Russians
  • ****
  • İleti: 1774
  • Eski Rumuz: darkhunter1986
Ynt: Kullanışlı Kodlar
« Yanıtla #8 : 09 Ocak 2012 ; 13:08:22 »
Pawn: [Seç]
if(text[0] == '!' ) {
new string[64]; GetPlayerName(playerid,string,sizeof(string));
format(string,sizeof(string),"Nick: %s: %s",string,text[1]);
return 0;
}

OnPlayerText'e eklendigi zaman chatde "!" yazilirsa mesaj gider.

NOT: Gidecek yaziyi artiranlar string sinirinida artirsin aksi taktirde mesajin bir kismi gozukmez.

Çevrimdışı RyDeR`

  • PAWN Coder
  • Bölüm Yetkilisi
  • ****
  • İleti: 5445
    • Ödüller
Ynt: Kullanışlı Kodlar
« Yanıtla #9 : 09 Ocak 2012 ; 13:32:41 »
Pawn: [Seç]
if(text[0] == '!' ) {
new string[64]; GetPlayerName(playerid,string,sizeof(string));
format(string,sizeof(string),"Nick: %s: %s",string,text[1]);
return 0;
}

OnPlayerText'e eklendigi zaman chatde "!" yazilirsa mesaj gider.

NOT: Gidecek yaziyi artiranlar string sinirinida artirsin aksi taktirde mesajin bir kismi gozukmez.

SendClientMessageToAll veya baska birsey eklemeyi unutmussun herhalde cünkü mesaj kimseye ulasmaz.
"The secret to creativity is knowing how to hide your sources" ─ Albert Einstein

Çevrimdışı DeJaVu´

  • Albanians
  • İleti: 39
  • [Z]Group-Xtreme
Ynt: Kullanışlı Kodlar
« Yanıtla #10 : 09 Ocak 2012 ; 13:41:09 »
Visual Basic kullanıcıları için hoşlarına gidebilecek macrolar ;

Pawn: [Seç]
#define If if(
#define Then ){
#define Else }else{
#define EndIf }

örnek kullanım ;

Pawn: [Seç]
new deger = 5;

If deger == 5 Then
//..
      Else
//..
EndIf

Forum samp'te görmüştüm bende yazdım. Fikir bana ait değil.
« Son Düzenleme: 01 Şubat 2012 ; 02:31:37 Gönderen: DeJaVu´ »

Çevrimdışı Usain

  • North Holland Hustlers
  • *
  • İleti: 203
Ynt: Kullanışlı Kodlar
« Yanıtla #11 : 09 Ocak 2012 ; 13:54:02 »
/m1 - /m12 araç komutları ;

Pawn: [Seç]
enum Player
{
pMAraba,
pMArabaID
};


Pawn: [Seç]

if(strcmp(cmdtext, "/m1", true)==0) // Sultan
{
        new Float:X,Float:Y,Float:Z,Float:Angle,LVehicleIDt; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        LVehicleIDt = CreateVehicle(560,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,LVehicleIDt,0); AddVehicleComponent(LVehicleIDt, 1028); AddVehicleComponent(LVehicleIDt, 1030); AddVehicleComponent(LVehicleIDt, 1031); AddVehicleComponent(LVehicleIDt, 1138); AddVehicleComponent(LVehicleIDt, 1140);  AddVehicleComponent(LVehicleIDt, 1170);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=LVehicleIDt;
        PlayerInfo[playerid][pMAraba]=1;
        AddVehicleComponent(LVehicleIDt, 1028); AddVehicleComponent(LVehicleIDt, 1030); AddVehicleComponent(LVehicleIDt, 1031); AddVehicleComponent(LVehicleIDt, 1138); AddVehicleComponent(LVehicleIDt, 1140);  AddVehicleComponent(LVehicleIDt, 1170);
    AddVehicleComponent(LVehicleIDt, 1080); AddVehicleComponent(LVehicleIDt, 1086); AddVehicleComponent(LVehicleIDt, 1087); AddVehicleComponent(LVehicleIDt, 1010); PlayerPlaySound(playerid,1133,0.0,0.0,0.0); ChangeVehiclePaintjob(LVehicleIDt,1);
    SetVehicleVirtualWorld(LVehicleIDt, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(LVehicleIDt, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m2", true)==0) { //Sultan
new Float:X,Float:Y,Float:Z,Float:Angle,LVehicleIDt; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        LVehicleIDt = CreateVehicle(560,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,LVehicleIDt,0); AddVehicleComponent(LVehicleIDt, 1028); AddVehicleComponent(LVehicleIDt, 1030); AddVehicleComponent(LVehicleIDt, 1031); AddVehicleComponent(LVehicleIDt, 1138); AddVehicleComponent(LVehicleIDt, 1140);  AddVehicleComponent(LVehicleIDt, 1170);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=LVehicleIDt;
        PlayerInfo[playerid][pMAraba]=1;
AddVehicleComponent(LVehicleIDt, 1080); AddVehicleComponent(LVehicleIDt, 1086); AddVehicleComponent(LVehicleIDt, 1087); AddVehicleComponent(LVehicleIDt, 1010); PlayerPlaySound(playerid,1133,0.0,0.0,0.0); ChangeVehiclePaintjob(LVehicleIDt,2);
        SetVehicleVirtualWorld(LVehicleIDt, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(LVehicleIDt, GetPlayerInterior(playerid));
    return 1; }
if(strcmp(cmdtext, "/m3", true)==0) { // Jester
        new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(559,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
AddVehicleComponent(carid,1065);    AddVehicleComponent(carid,1067);    AddVehicleComponent(carid,1162); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1073); ChangeVehiclePaintjob(carid,1);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m4", true)==0) { // Flash
      new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(565,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
AddVehicleComponent(carid,1046); AddVehicleComponent(carid,1049); AddVehicleComponent(carid,1053); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1073); ChangeVehiclePaintjob(carid,1);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m5", true)==0) { // Uranus
    new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(558,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
        AddVehicleComponent(carid,1088); AddVehicleComponent(carid,1092); AddVehicleComponent(carid,1139); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1073); ChangeVehiclePaintjob(carid,1);
      SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
    return 1; }
    if(strcmp(cmdtext, "/m6", true)==0) { // Stratum
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(561,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
    AddVehicleComponent(carid,1055); AddVehicleComponent(carid,1058); AddVehicleComponent(carid,1064); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1073); ChangeVehiclePaintjob(carid,1);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
    return 1; }
    if(strcmp(cmdtext, "/m7", true)==0) { // Elegy
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(562,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
    AddVehicleComponent(carid,1034); AddVehicleComponent(carid,1038); AddVehicleComponent(carid,1147); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1073); ChangeVehiclePaintjob(carid,1);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m8", true)==0) { // Savanna
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(567,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
    AddVehicleComponent(carid,1102); AddVehicleComponent(carid,1129); AddVehicleComponent(carid,1133); AddVehicleComponent(carid,1186); AddVehicleComponent(carid,1188); ChangeVehiclePaintjob(carid,1); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1085); AddVehicleComponent(carid,1087); AddVehicleComponent(carid,1086);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m9", true)==0) { // Uranus
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(558,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
    AddVehicleComponent(carid,1092); AddVehicleComponent(carid,1166); AddVehicleComponent(carid,1165); AddVehicleComponent(carid,1090);
    AddVehicleComponent(carid,1094); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1087); AddVehicleComponent(carid,1163);
    AddVehicleComponent(carid,1091); ChangeVehiclePaintjob(carid,2);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m10", true)==0) { // Monster
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(557,X,Y,Z,Angle,1,1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1081);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m11", true)==0) { // Slamvan
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(535,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
ChangeVehiclePaintjob(carid,1); AddVehicleComponent(carid,1109); AddVehicleComponent(carid,1115); AddVehicleComponent(carid,1117); AddVehicleComponent(carid,1073); AddVehicleComponent(carid,1010);
    AddVehicleComponent(carid,1087); AddVehicleComponent(carid,1114); AddVehicleComponent(carid,1081); AddVehicleComponent(carid,1119); AddVehicleComponent(carid,1121);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m12", true)==0) { // Elegy
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(562,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
  AddVehicleComponent(carid,1034); AddVehicleComponent(carid,1038); AddVehicleComponent(carid,1147);
AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1073); ChangeVehiclePaintjob(carid,0);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1;
}
TR - Turkish Freeroam IP:85.153.58.253:2013

Çevrimdışı Unicorn.

  • Russians
  • ****
  • İleti: 1774
  • Eski Rumuz: darkhunter1986
Ynt: Kullanışlı Kodlar
« Yanıtla #12 : 09 Ocak 2012 ; 15:21:48 »
/m1 - /m12 araç komutları ;

Pawn: [Seç]
enum Player
{
pMAraba,
pMArabaID
};


Pawn: [Seç]

if(strcmp(cmdtext, "/m1", true)==0) // Sultan
{
        new Float:X,Float:Y,Float:Z,Float:Angle,LVehicleIDt; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        LVehicleIDt = CreateVehicle(560,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,LVehicleIDt,0); AddVehicleComponent(LVehicleIDt, 1028); AddVehicleComponent(LVehicleIDt, 1030); AddVehicleComponent(LVehicleIDt, 1031); AddVehicleComponent(LVehicleIDt, 1138); AddVehicleComponent(LVehicleIDt, 1140);  AddVehicleComponent(LVehicleIDt, 1170);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=LVehicleIDt;
        PlayerInfo[playerid][pMAraba]=1;
        AddVehicleComponent(LVehicleIDt, 1028); AddVehicleComponent(LVehicleIDt, 1030); AddVehicleComponent(LVehicleIDt, 1031); AddVehicleComponent(LVehicleIDt, 1138); AddVehicleComponent(LVehicleIDt, 1140);  AddVehicleComponent(LVehicleIDt, 1170);
    AddVehicleComponent(LVehicleIDt, 1080); AddVehicleComponent(LVehicleIDt, 1086); AddVehicleComponent(LVehicleIDt, 1087); AddVehicleComponent(LVehicleIDt, 1010); PlayerPlaySound(playerid,1133,0.0,0.0,0.0); ChangeVehiclePaintjob(LVehicleIDt,1);
    SetVehicleVirtualWorld(LVehicleIDt, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(LVehicleIDt, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m2", true)==0) { //Sultan
new Float:X,Float:Y,Float:Z,Float:Angle,LVehicleIDt; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        LVehicleIDt = CreateVehicle(560,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,LVehicleIDt,0); AddVehicleComponent(LVehicleIDt, 1028); AddVehicleComponent(LVehicleIDt, 1030); AddVehicleComponent(LVehicleIDt, 1031); AddVehicleComponent(LVehicleIDt, 1138); AddVehicleComponent(LVehicleIDt, 1140);  AddVehicleComponent(LVehicleIDt, 1170);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=LVehicleIDt;
        PlayerInfo[playerid][pMAraba]=1;
AddVehicleComponent(LVehicleIDt, 1080); AddVehicleComponent(LVehicleIDt, 1086); AddVehicleComponent(LVehicleIDt, 1087); AddVehicleComponent(LVehicleIDt, 1010); PlayerPlaySound(playerid,1133,0.0,0.0,0.0); ChangeVehiclePaintjob(LVehicleIDt,2);
        SetVehicleVirtualWorld(LVehicleIDt, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(LVehicleIDt, GetPlayerInterior(playerid));
    return 1; }
if(strcmp(cmdtext, "/m3", true)==0) { // Jester
        new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(559,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
AddVehicleComponent(carid,1065);    AddVehicleComponent(carid,1067);    AddVehicleComponent(carid,1162); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1073); ChangeVehiclePaintjob(carid,1);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m4", true)==0) { // Flash
      new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(565,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
AddVehicleComponent(carid,1046); AddVehicleComponent(carid,1049); AddVehicleComponent(carid,1053); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1073); ChangeVehiclePaintjob(carid,1);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m5", true)==0) { // Uranus
    new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(558,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
        AddVehicleComponent(carid,1088); AddVehicleComponent(carid,1092); AddVehicleComponent(carid,1139); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1073); ChangeVehiclePaintjob(carid,1);
      SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
    return 1; }
    if(strcmp(cmdtext, "/m6", true)==0) { // Stratum
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(561,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
    AddVehicleComponent(carid,1055); AddVehicleComponent(carid,1058); AddVehicleComponent(carid,1064); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1073); ChangeVehiclePaintjob(carid,1);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
    return 1; }
    if(strcmp(cmdtext, "/m7", true)==0) { // Elegy
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(562,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
    AddVehicleComponent(carid,1034); AddVehicleComponent(carid,1038); AddVehicleComponent(carid,1147); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1073); ChangeVehiclePaintjob(carid,1);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m8", true)==0) { // Savanna
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(567,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
    AddVehicleComponent(carid,1102); AddVehicleComponent(carid,1129); AddVehicleComponent(carid,1133); AddVehicleComponent(carid,1186); AddVehicleComponent(carid,1188); ChangeVehiclePaintjob(carid,1); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1085); AddVehicleComponent(carid,1087); AddVehicleComponent(carid,1086);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m9", true)==0) { // Uranus
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(558,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
    AddVehicleComponent(carid,1092); AddVehicleComponent(carid,1166); AddVehicleComponent(carid,1165); AddVehicleComponent(carid,1090);
    AddVehicleComponent(carid,1094); AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1087); AddVehicleComponent(carid,1163);
    AddVehicleComponent(carid,1091); ChangeVehiclePaintjob(carid,2);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m10", true)==0) { // Monster
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(557,X,Y,Z,Angle,1,1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1081);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m11", true)==0) { // Slamvan
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(535,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
ChangeVehiclePaintjob(carid,1); AddVehicleComponent(carid,1109); AddVehicleComponent(carid,1115); AddVehicleComponent(carid,1117); AddVehicleComponent(carid,1073); AddVehicleComponent(carid,1010);
    AddVehicleComponent(carid,1087); AddVehicleComponent(carid,1114); AddVehicleComponent(carid,1081); AddVehicleComponent(carid,1119); AddVehicleComponent(carid,1121);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1; }
if(strcmp(cmdtext, "/m12", true)==0) { // Elegy
new Float:X,Float:Y,Float:Z,Float:Angle,carid; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
        carid = CreateVehicle(562,X,Y,Z,Angle,1,-1,-1); PutPlayerInVehicle(playerid,carid,0);
        if(PlayerInfo[playerid][pMAraba]!=0) DestroyVehicle(PlayerInfo[playerid][pMArabaID]);
        PlayerInfo[playerid][pMArabaID]=carid;
        PlayerInfo[playerid][pMAraba]=1;
  AddVehicleComponent(carid,1034); AddVehicleComponent(carid,1038); AddVehicleComponent(carid,1147);
AddVehicleComponent(carid,1010); AddVehicleComponent(carid,1073); ChangeVehiclePaintjob(carid,0);
    SetVehicleVirtualWorld(carid, GetPlayerVirtualWorld(playerid)); LinkVehicleToInterior(carid, GetPlayerInterior(playerid));
return 1;
}

Paylastiginiz kodlarin alinti oldugunu belirtin.

Çevrimdışı DeJaVu´

  • Albanians
  • İleti: 39
  • [Z]Group-Xtreme
Ynt: Kullanışlı Kodlar
« Yanıtla #13 : 09 Ocak 2012 ; 15:38:53 »
Bir kullanışlı macro daha ;

Pawn: [Seç]
new ArryText[200][255];
#define formatEx<%1,%2,%3> format(ArryText[%1],255,%2,%3)
#define read<%1> ArryText[%1]

örnek kullanım ;

Pawn: [Seç]
public OnGameModeInit()
{
      new
          isim[32] = "DeJaVu´",
          sayi = 1994
      ;
      formatEx<0, "Sistem aktif edildi sayin %s", isim>;
      formatEx<1, "Telefon pin kodu : %d", sayi>;
      return 1;
}

public OnPlayerConnect(playerid)
{
      print(read<0>); // Sistem Aktif Edildi Sayin DeJaVu´
      print(read<1>); // Telefon Pin Kodu : 1994
      return 1;
}

NOT: Dize sayısında 200'ü aşmayın. İllaki aşmak istiyorsanız dize sayısını yükseltin.
« Son Düzenleme: 01 Şubat 2012 ; 02:31:54 Gönderen: DeJaVu´ »

Çevrimdışı DeJaVu´

  • Albanians
  • İleti: 39
  • [Z]Group-Xtreme
Ynt: Kullanışlı Kodlar
« Yanıtla #14 : 09 Ocak 2012 ; 23:46:17 »
Çoklu olarak kick atmak için ;

Pawn: [Seç]
stock KickEx(...) {
new
i = numargs()
;

while(i) {
    Kick(getarg(--i));
}
}

örnek ;

Pawn: [Seç]
KickEx(1, 5, 9); // 1, 5, 9 idli kişileri sunucudan atar

« Son Düzenleme: 01 Şubat 2012 ; 02:32:09 Gönderen: DeJaVu´ »