Gelişmiş Işınlanma Sistemi[C++&PYTHON]

blackdragonx61' Alıntı:

------------------------------------------------------------------
​

Cmd.cpp açılır-aratılır:

Kod:Panoya kopyala

ACMD(do_pcbang_check);

Altına eklenir;

Kod:Panoya kopyala

ACMD(do_isinla_beni_beybi);
ACMD(do_isinla_sure);
ACMD(do_black_kalan);

Tekrar aratılır:

Kod:Panoya kopyala

{ "slow",        do_slow,        0,            POS_DEAD,    GM_LOW_WIZARD    },

Altına eklenir;

Kod:Panoya kopyala

{ "isinla_beni_beybi",            do_isinla_beni_beybi,            0,            POS_DEAD,    GM_PLAYER    },
    { "isinla_sure",            do_isinla_sure,            0,            POS_DEAD,    GM_PLAYER    },
    { "black_kalan",            do_black_kalan,            0,            POS_DEAD,    GM_PLAYER    },
         { "hak_ver",            do_hak_ver,             0,             POS_DEAD,     GM_LOW_WIZARD },
    ///new system by Blackdragonx61

cmd_general.cpp açılır-aratılır:

Kod:Panoya kopyala

ACMD(do_view_equip)

Altına Eklenir;

Linkleri görebilmek için Turkmmo Forumuna ÜYE olmanız gerekmektedir.

Kod:Panoya kopyala

ACMD(do_black_kalan)
{
    int kalan = ch->GetQuestFlag("isinlama.black");
    ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("%d hakkiniz kaldi"), kalan);
}


ACMD(do_isinla_sure)
{
    char arg1[256];
    one_argument(argument, arg1, sizeof(arg1));
    if (*arg1)
    {
        switch (LOWER(*arg1))
        {
            case '1':    // 5 tane    5m
            if (ch->GetGold() < 5000000)
            {
                ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("paprarar yohh"));
                return;
            }
            else
            {
                ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("?slem tamamlandi"));
                ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("?sinlanma limiti 5 yapildi"));
                ch->PointChange(POINT_GOLD, -5000000, true);
                ch->SetQuestFlag("isinlama.black", 5);
            }
            break;
           
            case '2':       
            if (ch->GetGold() < 10000000)
            {
                ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("paprarar yohh"));
                return;
            }
            else
            {
                ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("?slem tamamlandi"));
                ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("?sinlanma limiti 10 yapildi"));
                ch->PointChange(POINT_GOLD, -10000000, true);//10M
                ch->SetQuestFlag("isinlama.black", 10);
            }
            //ch->SetQuestFlag("isinlayamam.sure", 0);
            break;
           
            case '3':       
            if (ch->GetGold() < 30000000)
            {
                ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("paprarar yohh"));
                return;
            }
            else
            {
                ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("?slem tamamlandi"));
                ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("?sinlanma limiti 50 yapildi"));
                ch->PointChange(POINT_GOLD, -30000000, true);//30M
                ch->SetQuestFlag("isinlama.black", 50);
            }
            //ch->SetQuestFlag("isinlayamam.sure", 0);
            break;
        }
    }
}


ACMD(do_isinla_beni_beybi)
{
    char arg1[256];
    one_argument(argument, arg1, sizeof(arg1));
    //int son_sure = ch->GetQuestFlag("isinlayamam.sure");
    int kalan = ch->GetQuestFlag("isinlama.black");
   
    if (ch->IsDead() || ch->GetHP() <= 0 || !ch->IsPC())
    {
        ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("Oluyken bu islem gerceklestirilemez!"));
        return;
    }
   
    if (ch->GetQuestFlag("isinlama.black") == 0)
    {
        //ch->SetQuestFlag("isinlayamam.sure", get_global_time());
        ch->ChatPacket(CHAT_TYPE_COMMAND, "isinlayamam");
        //ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("1 saat beklemelisin"));
        return;
    }
   
    if (*arg1)
    {
        switch (LOWER(*arg1))
        {
            case 'a'://Orumcek Zindanı 1.kat basi
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(59800, 497300);
                ch->Stop();
            break;
       
            case 'b'://Mavi 1.
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(959800,268400);
                ch->Stop();
                break;
           
            case 'c'://Kırmızı 1.
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(474300,954800);
                ch->Stop();
                break;
               
            case 'd'://Sari 1.
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(63800,166400);
                ch->Stop();
                break;
            case 'e'://Devler Diyarı
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(829900,763300);
                ch->Stop();
                break;
            case 'f':// MAVi 2.
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(873100,242600);
                ch->Stop();
                break;
            case 'g'://Kırmızı 2.
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(360800,877600);
                ch->Stop();
                break;
            case 'h'://Sari 2.
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(138500,234900);
                ch->Stop();
                break;
            case 'i'://Hayalet ormani
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(288700,5700);
                ch->Stop();
                break;
            case 'j':// Orumcek zindanı 2.Kat Basi
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                //ch->WarpSet(x, y);
                ch->Stop();
                break;
            case 'k'://Seytan kulesi Black ya I love you askimmm
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(590500,110500);
                ch->Stop();
                break;
            case 'l'://Yongbi colu
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(296800,547400);
                ch->Stop();
                break;
            case 'm'://Surgun girisi
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(284400,810700);
                ch->Stop();
                break;
            case 'n'://Kizil Orman
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(1119900,70800);
                ch->Stop();
                break;
            case 'o'://Sohan dagi
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(436400,215600);
                ch->Stop();
                break;
            case 'p'://Ox haritasi
                if (!ch->IsGM())
                {
                    ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("yalnizca gmler kullanir"));
                }
                else
                {
                    ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                    //ch->WarpSet(x, y);
                    ch->Stop();
                }
                break;
            case 'r'://Nemere'nin gozetleme kulesi 90 sinir
                if (ch->GetLevel() < 90)
                {
                    ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("level yeterli degil"));
                }
                else
                {
                    ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                    ch->WarpSet(432792,165998);
                    ch->Stop();
                }
                break;
            case 's'://Kırmızı Ejdeha Kalesi sinir 90
                if (ch->GetLevel() < 90)
                {
                    ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("level yeterli degil"));
                }
                else
                {
                    ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                    ch->WarpSet(613800,707000);
                    ch->Stop();
                }
                break;
            case 't'://Vadi
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                ch->WarpSet(336000,755600);
                ch->Stop();
                break;
            case 'u'://CapeDragon
                if (ch->GetLevel() < 90)
                {
                    ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("level yeterli degil"));
                }
                else
                {
                    ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                    //ch->WarpSet(x, y);
                    ch->Stop();
                }
                break;
            case 'v'://Maymunlar Zindani
                ch->SetQuestFlag("isinlama.black", ch->GetQuestFlag("isinlama.black")-1);
                //ch->WarpSet(x, y);
                ch->Stop();
                break;
        }
    }
}

---------------------------
cmd_gm.cpp açılır-aratılır:

Kod:Panoya kopyala

ACMD(do_group_random)

Altına Eklenir;

Linkleri görebilmek için Turkmmo Forumuna ÜYE olmanız gerekmektedir.

Kod:Panoya kopyala

ACMD (do_hak_ver)
{
    char arg1[256], arg2[256];
    long hak;
    const char*  Name;
    two_arguments(argument, arg1, sizeof(arg1), arg2, sizeof(arg2));
    if (!*arg1 || !*arg2)
    {
        ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("/hak_ver oyuncu hak miktari"));
        return;
    }
    Name = arg1;
    hak = atoi(arg2);
    LPCHARACTER tch = CHARACTER_MANAGER::instance().FindPC(Name);
    if(!tch)
    {
        ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("Oyuncu %s bulunamadi."), Name);
        return;
    }
    tch->SetQuestFlag("isinlama.black", tch->GetQuestFlag("isinlama.black") + hak);
    tch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("Administrator %s hesabiniza %ld hak verdi."), ch->GetName(), hak);
    ch->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("%ld hak verdin, bu hesaba; %s."),hak,tch->GetName());
}

-------------------
PYTHON
root.py açılır
İmport'lara eklenir;

Kod:Panoya kopyala

import isinlama

Sona eklenir:

Linkleri görebilmek için Turkmmo Forumuna ÜYE olmanız gerekmektedir.

Tekrar aratılır:

Kod:Panoya kopyala

onPressKeyDict[app.DIK_F4]    = lambda : self.__PressQuickSlot(7)

Altına Eklenir;

Kod:Panoya kopyala

onPressKeyDict[app.DIK_F5]  = lambda : self.Black_ac()

Tekrar aratılır:

Kod:Panoya kopyala

"PlayMusic"                : self.__PlayMusic,

Altına eklenir;

Kod:Panoya kopyala

"isinlayamam"            : self.Blackcim,

root'a atılır:

Linkleri görebilmek için Turkmmo Forumuna ÜYE olmanız gerekmektedir.

Hata alırsanız mutlaka sorun benim py çok karışıktı karışıklık olabilir kodlarda ayrıca beimki başka butondaydı f5'e ekledim sıkıntı çıkmaz inşallah.
KANIT:
​

Genişletmek için tıkla

HainKurt' Alıntı:

Madem bu kadar mutlu gunun biz alt yapi icin hangi filesi kullanalim (herkez maxmi olmaz diyiyor yabanci turk fln bi sey oner)
Bizde dua edelim...
Allah yar ve yardimciniz olsun...

Genişletmek için tıkla

blackdragonx61' Alıntı:

mamxi kullanıyorum wolf'dan bir önceki versiyon herkes demiş ch düşme problemleri var ama ona geçtikten sonra bir kere düşmedi önemli olan src kardeşim yorumun için de teşekkürler.

Genişletmek için tıkla