[PAYLAŞIM] Kill The GM Event'e hızlıca char hazırlamak (Gelişmiş)

    Paylaş

    LiveYourLife
    Forum Kurucusu
    Forum Kurucusu

    Mesaj Sayısı Mesaj Sayısı : 525
    Leader Point: Leader Point: : 12513
    Kayıt tarihi Kayıt tarihi : 19/01/10
    Nerden Nerden : Derinliklerden :)

    ikon10 [PAYLAŞIM] Kill The GM Event'e hızlıca char hazırlamak (Gelişmiş)

    Mesaj tarafından LiveYourLife Bir Perş. Şub. 11, 2010 3:03 pm

    Merhaba, prosedürü can sıkıntısından yaptım aslında böyle bir fikir kafamda vardı neden sizle paylaşmayayım dedim

    Özellikleri:

    - 14 adet seçilebilir char tipi vardır.
    - Charın var olup olmadığını kontrol eder, yoksa işlem yapmaz.
    - Düzenleme yapacağınız charın ırkı önemli değildir, önce ırk transferi yapar, ardından düzenler.
    - 21 GB Coin, 600 NP, 255 stat point, 260 Skill point, 80 level, 1m EXP
    yapar, Authority'i 1'e değiştirir ve USERDATA'daki UpdateDate kısmını
    günceller.
    - Item'ları GM_ITEMS adlı tablodan okur.

    Not: Prosedürü çalıştırmadan önce, AKUMA'nın Nation Transfer
    prosedürünü uygulayınız ve o prosedürü veritabanınıza NATION_TRANSFER
    adıyla ekleyiniz. Başka prosedür de kullanabilirsiniz ancak prosedürü
    değiştirmeniz gerekir, boşa uğraş verirsiniz.

    Kod 1:


    Kod:
    Kod:
    if exists (select * from sysobjects where id = object_id(N'[dbo].[GM_ITEMS]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[GM_ITEMS] CREATE TABLE [dbo].[GM_ITEMS] (strGMtype int, strItem varchar(400))
    Kod 2:

    Kod:
    Kod:
    -- Created by Thales - Script Date: 20/08/2009 02:13 -- Edits characters for Kill The GM Event. CREATE PROC [dbo].[GM_EVENT] (@strUserID varchar(30), @strGMtype int) AS BEGIN TRAN DECLARE @strAccountID varchar(21), @CharacterStatus tinyint SELECT @CharacterStatus = COUNT(strUserID) FROM USERDATA WHERE strUserId = @strUserID IF @CharacterStatus = 0 BEGIN PRINT RTRIM(LTRIM(@strUserID)) + ' does not exist.' END ELSE BEGIN SELECT @strAccountID = strAccountID FROM ACCOUNT_CHAR WHERE strCharID1 = @strUserID OR strCharID2 = @strUserID OR strCharID3 = @strUserID IF @strGMtype = 1 -- Barbarian Blade Master BEGIN EXEC NATION_TRANSFER @strAccountID, '2' UPDATE USERDATA SET Class = 206, Race = 11, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 1) WHERE strUserId = @strUserID END IF @strGMtype = 2 -- Male El Morad Blade Master BEGIN EXEC NATION_TRANSFER @strAccountID, '2' UPDATE USERDATA SET Class = 206, Race = 12, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 1) WHERE strUserId = @strUserID END IF @strGMtype = 3 -- Female El Morad Blade Master BEGIN EXEC NATION_TRANSFER @strAccountID, '2' UPDATE USERDATA SET Class = 206, Race = 13, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 1) WHERE strUserId = @strUserID END IF @strGMtype = 4 -- Male El Morad Kasar Hood BEGIN EXEC NATION_TRANSFER @strAccountID, '2' UPDATE USERDATA SET Class = 208, Race = 12, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 2) WHERE strUserId = @strUserID END IF @strGMtype = 5 -- Female El Morad Kasar Hood BEGIN EXEC NATION_TRANSFER @strAccountID, '2' UPDATE USERDATA SET Class = 208, Race = 13, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 2) WHERE strUserId = @strUserID END IF @strGMtype = 6 -- Male El Morad Paladin BEGIN EXEC NATION_TRANSFER @strAccountID, '2' UPDATE USERDATA SET Class = 212, Race = 12, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 3) WHERE strUserId = @strUserID END IF @strGMtype = 7 -- Feale El Morad Paladin BEGIN EXEC NATION_TRANSFER @strAccountID, '2' UPDATE USERDATA SET Class = 212, Race = 13, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 3) WHERE strUserId = @strUserID END IF @strGMtype = 8 -- Male El Morad Arch Mage BEGIN EXEC NATION_TRANSFER @strAccountID, '2' UPDATE USERDATA SET Class = 210, Race = 12, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 4) WHERE strUserId = @strUserID END IF @strGMtype = 9 -- Female El Morad Arch Mage BEGIN EXEC NATION_TRANSFER @strAccountID, '2' UPDATE USERDATA SET Class = 210, Race = 13, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 4) WHERE strUserId = @strUserID END IF @strGMtype = 10 -- Arch Tuarek Berserker Hero BEGIN EXEC NATION_TRANSFER @strAccountID, '1' UPDATE USERDATA SET Class = 106, Race = 1, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 1) WHERE strUserId = @strUserID END IF @strGMtype = 11 -- Tuarek Shadow Vane BEGIN EXEC NATION_TRANSFER @strAccountID, '1' UPDATE USERDATA SET Class = 108, Race = 2, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 2) WHERE strUserId = @strUserID END IF @strGMtype = 12 -- Tuarek Shadow Knight BEGIN EXEC NATION_TRANSFER @strAccountID, '1' UPDATE USERDATA SET Class = 112, Race = 2, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 3) WHERE strUserId = @strUserID END IF @strGMtype = 13 -- Puri Tuarek Shadow Knight BEGIN EXEC NATION_TRANSFER @strAccountID, '1' UPDATE USERDATA SET Class = 112, Race = 4, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 3) WHERE strUserId = @strUserID END IF @strGMtype = 14 -- Wrinkle Tuarek Elemental Lord BEGIN EXEC NATION_TRANSFER @strAccountID, '1' UPDATE USERDATA SET Class = 110, Race = 3, [Level] = 80, [Exp] = 1000000, Authority = 1, Strong = 255, Sta = 255, Cha = 255, Dex = 255, Intel = 255, Points = 255, strSkill = 'Ą', Gold = 2100000000, Loyalty = 600, LoyaltyMonthly = 0, UpdateTime = GETDATE() WHERE strUserId = @strUserID UPDATE USERDATA SET strItem = (SELECT strItem FROM GM_ITEMS WHERE strGMtype = 4) WHERE strUserId = @strUserID END PRINT RTRIM(LTRIM(@strUserID)) + ' is completely modified for Kill The GM Event by your command.' PRINT 'Created by Thales' END COMMIT TRAN GO
    Kod 3:

    Kod:
    Kod:
    INSERT INTO GM_ITEMS VALUES (1, 0x00) INSERT INTO GM_ITEMS VALUES (2, 0x00) INSERT INTO GM_ITEMS VALUES (3, 0x00) INSERT INTO GM_ITEMS VALUES (4, 0x00)
    Şimdi öncelikle bir chara farklı farklı Item'lar dizin, çünkü bunları GM_ITEMS tablosuna kopyalattıracağız.

    GM_ITEMS tablosunda itemlar ayarlı değildir, siz ayarlayacaksınız.


    Kod:
    Kod:
    1 - Warrior 2 - Rogue 3 - Priest 4 - Mage
    Bir charı dizdiniz ve şimdi bunu GM_ITEMS'a kopyalamaya sıra geldi:

    Kod:
    Kod:
    UPDATE GM_ITEMS SET strItem = (SELECT strItem FROM USERDATA WHERE strUserId = 'Nick') WHERE strGMtype = x
    X yerine yukarıdaki class kodlarını yazacaksınız.

    Bunu sadece 1 kereye mahsus yapıyorsunuz, değiştirmek isterseniz tekrar yapabilirsiniz.

    Evet şimdi her şey tamamlandı, prosedürü kullanmak için:


    Kod:
    EXEC GM_EVENT 'Nick', 'x'
    X yerine gelecek rakamlar için:

    Kod:
    Kod:
    1 - Barbarian Blade Master 2 - Male El Morad Blade Master 3- Female El Morad Blade Master 4 - Male El Morad Kasar Hood 5 - Female El Morad Kasar Hood 6 - Male El Morad Paladin 7 - Female El Morad Paladin 8 - Male El Morad Arch Mage 9 - Female El Morad Arch Mage 10 - Arch Tuarek Berserker Hero 11 - Tuarek Shadow Vane 12 - Tuarek Shadow Knight 13 - Puri Tuarek Shadow Knight 14 - Wrinkle Tuarek Elemental Lord






      Forum Saati Cuma Ara. 09, 2016 9:44 am