DeathKO | v.24xx Light Farm | ORION | Beta: 17 Kasım | Official: 24 Kasım

Görevle Açılan Skilleri Görevsiz Yapma

  • Konbuyu başlatan TheSky
  • Başlangıç tarihi
  • Cevaplar : 320
  • Görüntüleme : 101K
T Çevrimdışı

TheSky

Yeni Cüce
3 Mart 2013
870
143
0
28
Kod:
[HIDE]

USE [kn_online]

GO

/****** Object:  StoredProcedure [dbo].[EDIT_QUEST]    Script Date: 26.10.2015 12:13:36 ******/

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER ON

GO

ALTER PROCEDURE [dbo].[EDIT_QUEST]

(

@strUserId varchar(21),

@sQuestId smallint,

@bQuestStatus tinyint

)

AS

DECLARE @binQuest binary(400), @sQuestCount smallint, @tmpQuestId smallint, @tmpQuestStatus tinyint, @strQuest varbinary(400), @i int, @freePos int, @bFound tinyint

BEGIN

SELECT @binQuest = CAST(strQuest as varbinary(400)), @sQuestCount = sQuestCount FROM USERDATA WHERE strUserId = @strUserId





SET @freePos = null

SET @bFound = 0

SET @i = 1





IF (@binQuest IS NULL)

SET @binQuest = CONVERT(varbinary(400), 0)

/*Create By TheSky*/

WHILE (@i < 400 AND @bFound = 0)

BEGIN

SET @tmpQuestId = SUBSTRING(@binQuest, @i, 2) + SUBSTRING(@binQuest, @i, 1)

SET @tmpQuestStatus = SUBSTRING(@binQuest, @i + 2, 1)





IF (@tmpQuestId = @sQuestId)

BEGIN

SET @bFound = 1

IF (@bQuestStatus IS NULL)

BEGIN

SET @sQuestCount = @sQuestCount - 1

SET @sQuestId = 0

SET @bQuestStatus = 0

END 





SET @strQuest = SUBSTRING(@binQuest, 1, @i - 1) 

+ CAST(SUBSTRING(CONVERT(varbinary(2), @sQuestId), 2, 1) AS varbinary(1))

+ CAST(SUBSTRING(CONVERT(varbinary(2), @sQuestId), 1, 1) AS varbinary(1))

+ CAST(@bQuestStatus as varbinary(1))

/*Create By TheSky*/ 

+ SUBSTRING(@binQuest, @i + 3, 400 - (@i + 3))

END

ELSE IF (@tmpQuestId = 0 AND @freePos IS NULL)

BEGIN

SET @freePos = @i

END





SET @i = @i + 3

END

/*Create By TheSky*/

IF (@bFound = 0 AND @freePos IS NOT NULL)

BEGIN

SET @sQuestCount = @sQuestCount + 1

SET @strQuest = SUBSTRING(@binQuest, 1, @freePos - 1) 

+ CAST(SUBSTRING(CONVERT(varbinary(2), @sQuestId), 2, 1) AS varbinary(1))

+ CAST(SUBSTRING(CONVERT(varbinary(2), @sQuestId), 1, 1) AS varbinary(1))

+ CAST(@bQuestStatus as varbinary(1)) 

+ SUBSTRING(@binQuest, @freePos + 3, 400 - (@freePos + 3))

END









IF (@bFound = 0 AND @freePos IS NULL)

BEGIN

print'error'

END

ELSE

BEGIN

UPDATE USERDATA SET strQuest = @strQuest, sQuestCount = @sQuestCount WHERE strUserId = @strUserId

END

END

[/HIDE]


Create New Char'a



İçerik Açılmıştır Teşekkürler :)
EXEC EDIT_QUEST @strCharID,51 , 2

EXEC EDIT_QUEST @strCharID,510 , 2

EXEC EDIT_QUEST @strCharID,511 , 2

--rogue

EXEC EDIT_QUEST @strCharID,53 , 2

EXEC EDIT_QUEST @strCharID,515 , 2

EXEC EDIT_QUEST @strCharID,516 , 2

EXEC EDIT_QUEST @strCharID,517 , 2

--mage

EXEC EDIT_QUEST @strCharID,52 , 2

EXEC EDIT_QUEST @strCharID,512 , 2

EXEC EDIT_QUEST @strCharID,513 , 2

EXEC EDIT_QUEST @strCharID,514 , 2

---pre

EXEC EDIT_QUEST @strCharID,54 , 2

EXEC EDIT_QUEST @strCharID,518 , 2

EXEC EDIT_QUEST @strCharID,519 , 2

EXEC EDIT_QUEST @strCharID,520 , 2

EXEC EDIT_QUEST @strCharID,521 , 2

EXEC EDIT_QUEST @strCharID,522 , 2

EXEC EDIT_QUEST @strCharID,523 , 2







Data skill tbl yi düzenleyin yeterliydi.



v1950 için :



Skill_Magic_Main_usNoQuest
 
Reactions: baburbbr
K Çevrimdışı

kekele

Kayıtlı Üye
20 Ağustos 2015
73
0
6
47
Cevap: Görevle Açılan Skilleri Görevsiz Yapma



Teşekkür ederim sayın moderatörüm.
 
C Çevrimdışı

chef

Kayıtlı Üye
11 Aralık 2014
353
0
16
35
Cevap: Görevle Açılan Skilleri Görevsiz Yapma



sagol kardeşim
 
K Çevrimdışı

Koe

Kayıtlı Üye
24 Eylül 2015
191
0
16
30
Cevap: Görevle Açılan Skilleri Görevsiz Yapma



teşekkürler