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

LiveYourLife: Forum Kurucusu; Mesaj Sayısı : 525
Leader Point: : 17903
Kayıt tarihi : 19/01/10
Nerden : Derinliklerden :)

Post n°1

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

tarafından LiveYourLife 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 [Linkleri görebilmek için üye olun veya giriş yapın.]
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

Pvp Server | Pvp Serverler | Metin2 Pvp İp Adresleri | Knight Online Bilgi Paylaşım Platforumu

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

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

Similar topics

Similar topics

Arama

Sonuç : Mesajlar Konular
çıkıntı araştırma