[Release] Send uppgraded items at create of character
Those functions will send to all created characters (by letter) equipement at max level of uppgrade (+24) with options on them - random effects, cloak, accessory and weapons also included.
Some items are missing, so add them yourself.
1 Step - Do a backup of TCreateChar if you would revert it.
2 Step - duplicate twice the function TMagicItemGive, rename them with TMagicItemGive2 and TMagicItemGive3.
3 Step - Replace the following functions with this code.
TMagicItemGive2 sends uppgraded eq (+24), TMagicItemGive3 sends non-uppgraded eq
Note: If you didn't got the new effects please change on TMagicItemGive2: "SET @Upper = 9" to SET @Upper = 5
TCreateChar (Before -- RETURN @@ERROR)
ALTER PROCEDURE [dbo].[TMagicItemGive2]
@szRecver VARCHAR(50),
@wItemID SMALLINT,
@szTitle VARCHAR(256),
@szMessage VARCHAR(2048),
@bMagic1 TINYINT = 0,
@wValue1 SMALLINT = 0,
@bMagic2 TINYINT = 0,
@wValue2 SMALLINT = 0,
@bMagic3 TINYINT = 0,
@wValue3 SMALLINT = 0,
@bMagic4 TINYINT = 0,
@wValue4 SMALLINT = 0,
@bMagic5 TINYINT = 0,
@wValue5 SMALLINT = 0,
@bMagic6 TINYINT = 0,
@wValue6 SMALLINT = 0
AS
DECLARE @dwCharID INT
DECLARE @bLenTitle BINARY(4)
DECLARE @bLenMessage BINARY(4)
DECLARE @szT VARCHAR(8)
DECLARE @szM VARCHAR(8)
DECLARE @szSender VARCHAR(50)
SET @szSender ='Ziegen4S'
SET @szMessage ='Weapons'
SELECT @dwCharID=dwCharID FROM TCHARTABLE WHERE szName=@szRecver AND bDelete = 0
IF @@ROWCOUNT = 0
BEGIN
PRINT 'FAIL'
RETURN 1
END
SET @bLenTitle = DATALENGTH(@szTitle)
SET @bLenMessage = DATALENGTH(@szMessage)
SET @szT = RIGHT(master.dbo.fn_sqlvarbasetostr(@bLenTitle), 8)
SET @szTitle = @szT + @szTitle
SET @szM = RIGHT(master.dbo.fn_sqlvarbasetostr(@bLenMessage), 8)
SET @szMessage = @szM + @szMessage
DECLARE @bRvType TINYINT
DECLARE @fRevision FLOAT
DECLARE @wMaxValue SMALLINT
DECLARE @wRetValue1 SMALLINT
DECLARE @wRetValue2 SMALLINT
DECLARE @wRetValue3 SMALLINT
DECLARE @wRetValue4 SMALLINT
DECLARE @wRetValue5 SMALLINT
DECLARE @wRetValue6 SMALLINT
-- Magic1
IF(@bMagic1 = 0 )
SET @wRetValue1 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic1
IF @wValue1 > @wMaxValue
SET @wValue1 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue1 = @wValue1 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic2
IF(@bMagic2 = 0 )
SET @wRetValue2 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType , @wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic2
IF @wValue2 > @wMaxValue
SET @wValue2 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue2 = @wValue2 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic3
IF(@bMagic3 = 0 )
SET @wRetValue3 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic3
IF @wValue3 > @wMaxValue
SET @wValue3 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue3 = @wValue3 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic4
IF(@bMagic4 = 0 )
SET @wRetValue4 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic4
IF @wValue4 > @wMaxValue
SET @wValue4 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue4 = @wValue4 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic5
IF(@bMagic5 = 0 )
SET @wRetValue5 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic5
IF @wValue5 > @wMaxValue
SET @wValue5 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue5 = @wValue5 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic6
IF(@bMagic6 = 0 )
SET @wRetValue6 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic6
IF @wValue6 > @wMaxValue
SET @wValue6 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue6 = @wValue6 * 100.0 / @wMaxValue/@fRevision + 1.0
END
DECLARE @dwDuraMax INT
SET @dwDuraMax = 0
SELECT @dwDuraMax = dwDuraMax FROM TITEMCHART WHERE wItemID = @wItemID
--Random Effects Function Started Brah brahh --
---- Create the variables for the random number generation and Item Grade LEVEL
DECLARE @bLevel TINYINT;
DECLARE @Random INT;
DECLARE @Upper INT;
DECLARE @Lower INT
SET @bLevel = 24
---- This will create a random number between 1 and 9 (effects)
SET @Lower = 1 ---- The lowest random number
SET @Upper = 9 ---- The highest random number
SELECT @Random = ROUND(((@Upper - @Lower -1) * RAND() + @Lower), 0)
SELECT @Random
INSERT INTO TRESERVEDPOST(
dwRecverID,
szSender,
szTitle,
szMessage,
bSend,
wItemID,
bLevel,
bCount,
bGLevel,
dwDuraMax,
dwDuraCur,
bGradeEffect,
bRefineCur,
dEndTime,
bMagic1,
bMagic2,
bMagic3,
bMagic4,
bMagic5,
bMagic6,
wValue1,
wValue2,
wValue3,
wValue4,
wValue5,
wValue6,
dwTime1,
dwTime2,
dwTime3,
dwTime4,
dwTime5,
dwTime6) VALUES(
@dwCharID,
@szSender,
@szTitle,
@szMessage,
0,
@wItemID,
@bLevel,
1,
0,
@dwDuraMax,
@dwDuraMax,
@Random,
0,
0,
@bMagic1,@bMagic2,@bMagic3,@bMagic4,@bMagic5,@bMagic6,
@wRetValue1,@wRetValue2,@wRetValue3,@wRetValue4,@wRetValue5,@wRetValue6,
0,0,0,0,0,0)
RETURN 0
TMagicItemGive3
Code:
ALTER PROCEDURE [dbo].[TMagicItemGive3]
@szRecver VARCHAR(50),
@wItemID SMALLINT,
@szTitle VARCHAR(256),
@szMessage VARCHAR(2048),
@bMagic1 TINYINT = 0,
@wValue1 SMALLINT = 0,
@bMagic2 TINYINT = 0,
@wValue2 SMALLINT = 0,
@bMagic3 TINYINT = 0,
@wValue3 SMALLINT = 0,
@bMagic4 TINYINT = 0,
@wValue4 SMALLINT = 0,
@bMagic5 TINYINT = 0,
@wValue5 SMALLINT = 0,
@bMagic6 TINYINT = 0,
@wValue6 SMALLINT = 0
AS
DECLARE @dwCharID INT
DECLARE @bLenTitle BINARY(4)
DECLARE @bLenMessage BINARY(4)
DECLARE @szT VARCHAR(8)
DECLARE @szM VARCHAR(8)
DECLARE @szSender VARCHAR(50)
SET @szSender ='Ziegen4S'
SET @szMessage ='Accessory'
SELECT @dwCharID=dwCharID FROM TCHARTABLE WHERE szName=@szRecver AND bDelete = 0
IF @@ROWCOUNT = 0
BEGIN
PRINT 'FAIL'
RETURN 1
END
SET @bLenTitle = DATALENGTH(@szTitle)
SET @bLenMessage = DATALENGTH(@szMessage)
SET @szT = RIGHT(master.dbo.fn_sqlvarbasetostr(@bLenTitle), 8)
SET @szTitle = @szT + @szTitle
SET @szM = RIGHT(master.dbo.fn_sqlvarbasetostr(@bLenMessage), 8)
SET @szMessage = @szM + @szMessage
DECLARE @bRvType TINYINT
DECLARE @fRevision FLOAT
DECLARE @wMaxValue SMALLINT
DECLARE @wRetValue1 SMALLINT
DECLARE @wRetValue2 SMALLINT
DECLARE @wRetValue3 SMALLINT
DECLARE @wRetValue4 SMALLINT
DECLARE @wRetValue5 SMALLINT
DECLARE @wRetValue6 SMALLINT
-- Magic1
IF(@bMagic1 = 0 )
SET @wRetValue1 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic1
IF @wValue1 > @wMaxValue
SET @wValue1 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue1 = @wValue1 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic2
IF(@bMagic2 = 0 )
SET @wRetValue2 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType , @wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic2
IF @wValue2 > @wMaxValue
SET @wValue2 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue2 = @wValue2 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic3
IF(@bMagic3 = 0 )
SET @wRetValue3 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic3
IF @wValue3 > @wMaxValue
SET @wValue3 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue3 = @wValue3 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic4
IF(@bMagic4 = 0 )
SET @wRetValue4 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic4
IF @wValue4 > @wMaxValue
SET @wValue4 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue4 = @wValue4 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic5
IF(@bMagic5 = 0 )
SET @wRetValue5 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic5
IF @wValue5 > @wMaxValue
SET @wValue5 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue5 = @wValue5 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic6
IF(@bMagic6 = 0 )
SET @wRetValue6 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic6
IF @wValue6 > @wMaxValue
SET @wValue6 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue6 = @wValue6 * 100.0 / @wMaxValue/@fRevision + 1.0
END
DECLARE @dwDuraMax INT
SET @dwDuraMax = 0
SELECT @dwDuraMax = dwDuraMax FROM TITEMCHART WHERE wItemID = @wItemID
--Random Effects Function Started Brah brahh --
---- Create the variables for the random number generation and Item Grade LEVEL
DECLARE @bLevel TINYINT;
DECLARE @Random INT;
DECLARE @Upper INT;
DECLARE @Lower INT
SET @bLevel = 0
---- This will create a random number between 1 and 9 (effects)
SET @Lower = 1 ---- The lowest random number
SET @Upper = 9 ---- The highest random number
SELECT @Random = ROUND(((@Upper - @Lower -1) * RAND() + @Lower), 0)
SELECT @Random
INSERT INTO TRESERVEDPOST(
dwRecverID,
szSender,
szTitle,
szMessage,
bSend,
wItemID,
bLevel,
bCount,
bGLevel,
dwDuraMax,
dwDuraCur,
bGradeEffect,
bRefineCur,
dEndTime,
bMagic1,
bMagic2,
bMagic3,
bMagic4,
bMagic5,
bMagic6,
wValue1,
wValue2,
wValue3,
wValue4,
wValue5,
wValue6,
dwTime1,
dwTime2,
dwTime3,
dwTime4,
dwTime5,
dwTime6) VALUES(
@dwCharID,
@szSender,
@szTitle,
@szMessage,
0,
@wItemID,
@bLevel,
1,
0,
@dwDuraMax,
@dwDuraMax,
@Random,
0,
0,
@bMagic1,@bMagic2,@bMagic3,@bMagic4,@bMagic5,@bMagic6,
@wRetValue1,@wRetValue2,@wRetValue3,@wRetValue4,@wRetValue5,@wRetValue6,
0,0,0,0,0,0)
RETURN 0
ions will send to all created characters (by letter) equipement at max level of uppgrade (+24) with options on them - random effects, cloak, accessory and weapons also included.
lol this script is similar at mine but you included cloak and accessory lol, good for the commitment but at least you could chenge the name of variables xD
Those functions will send to all created characters (by letter) equipement at max level of uppgrade (+24) with options on them - random effects, cloak, accessory and weapons also included.
Some items are missing, so add them yourself.
1 Step - Do a backup of TCreateChar if you would revert it.
2 Step - duplicate twice the function TMagicItemGive, rename them with TMagicItemGive2 and TMagicItemGive3.
3 Step - Replace the following functions with this code.
TMagicItemGive2 sends uppgraded eq (+24), TMagicItemGive3 sends non-uppgraded eq
Note: If you didn't got the new effects please change on TMagicItemGive2: "SET @Upper = 9" to SET @Upper = 5
TCreateChar (Before -- RETURN @@ERROR)
ALTER PROCEDURE [dbo].[TMagicItemGive2]
@szRecver VARCHAR(50),
@wItemID SMALLINT,
@szTitle VARCHAR(256),
@szMessage VARCHAR(2048),
@bMagic1 TINYINT = 0,
@wValue1 SMALLINT = 0,
@bMagic2 TINYINT = 0,
@wValue2 SMALLINT = 0,
@bMagic3 TINYINT = 0,
@wValue3 SMALLINT = 0,
@bMagic4 TINYINT = 0,
@wValue4 SMALLINT = 0,
@bMagic5 TINYINT = 0,
@wValue5 SMALLINT = 0,
@bMagic6 TINYINT = 0,
@wValue6 SMALLINT = 0
AS
DECLARE @dwCharID INT
DECLARE @bLenTitle BINARY(4)
DECLARE @bLenMessage BINARY(4)
DECLARE @szT VARCHAR(8)
DECLARE @szM VARCHAR(8)
DECLARE @szSender VARCHAR(50)
SET @szSender ='Ziegen4S'
SET @szMessage ='Weapons'
SELECT @dwCharID=dwCharID FROM TCHARTABLE WHERE szName=@szRecver AND bDelete = 0
IF @@ROWCOUNT = 0
BEGIN
PRINT 'FAIL'
RETURN 1
END
SET @bLenTitle = DATALENGTH(@szTitle)
SET @bLenMessage = DATALENGTH(@szMessage)
SET @szT = RIGHT(master.dbo.fn_sqlvarbasetostr(@bLenTitle), 8)
SET @szTitle = @szT + @szTitle
SET @szM = RIGHT(master.dbo.fn_sqlvarbasetostr(@bLenMessage), 8)
SET @szMessage = @szM + @szMessage
DECLARE @bRvType TINYINT
DECLARE @fRevision FLOAT
DECLARE @wMaxValue SMALLINT
DECLARE @wRetValue1 SMALLINT
DECLARE @wRetValue2 SMALLINT
DECLARE @wRetValue3 SMALLINT
DECLARE @wRetValue4 SMALLINT
DECLARE @wRetValue5 SMALLINT
DECLARE @wRetValue6 SMALLINT
-- Magic1
IF(@bMagic1 = 0 )
SET @wRetValue1 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic1
IF @wValue1 > @wMaxValue
SET @wValue1 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue1 = @wValue1 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic2
IF(@bMagic2 = 0 )
SET @wRetValue2 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType , @wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic2
IF @wValue2 > @wMaxValue
SET @wValue2 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue2 = @wValue2 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic3
IF(@bMagic3 = 0 )
SET @wRetValue3 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic3
IF @wValue3 > @wMaxValue
SET @wValue3 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue3 = @wValue3 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic4
IF(@bMagic4 = 0 )
SET @wRetValue4 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic4
IF @wValue4 > @wMaxValue
SET @wValue4 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue4 = @wValue4 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic5
IF(@bMagic5 = 0 )
SET @wRetValue5 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic5
IF @wValue5 > @wMaxValue
SET @wValue5 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue5 = @wValue5 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic6
IF(@bMagic6 = 0 )
SET @wRetValue6 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic6
IF @wValue6 > @wMaxValue
SET @wValue6 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue6 = @wValue6 * 100.0 / @wMaxValue/@fRevision + 1.0
END
DECLARE @dwDuraMax INT
SET @dwDuraMax = 0
SELECT @dwDuraMax = dwDuraMax FROM TITEMCHART WHERE wItemID = @wItemID
--Random Effects Function Started Brah brahh --
---- Create the variables for the random number generation and Item Grade LEVEL
DECLARE @bLevel TINYINT;
DECLARE @Random INT;
DECLARE @Upper INT;
DECLARE @Lower INT
SET @bLevel = 24
---- This will create a random number between 1 and 9 (effects)
SET @Lower = 1 ---- The lowest random number
SET @Upper = 9 ---- The highest random number
SELECT @Random = ROUND(((@Upper - @Lower -1) * RAND() + @Lower), 0)
SELECT @Random
INSERT INTO TRESERVEDPOST(
dwRecverID,
szSender,
szTitle,
szMessage,
bSend,
wItemID,
bLevel,
bCount,
bGLevel,
dwDuraMax,
dwDuraCur,
bGradeEffect,
bRefineCur,
dEndTime,
bMagic1,
bMagic2,
bMagic3,
bMagic4,
bMagic5,
bMagic6,
wValue1,
wValue2,
wValue3,
wValue4,
wValue5,
wValue6,
dwTime1,
dwTime2,
dwTime3,
dwTime4,
dwTime5,
dwTime6) VALUES(
@dwCharID,
@szSender,
@szTitle,
@szMessage,
0,
@wItemID,
@bLevel,
1,
0,
@dwDuraMax,
@dwDuraMax,
@Random,
0,
0,
@bMagic1,@bMagic2,@bMagic3,@bMagic4,@bMagic5,@bMagic6,
@wRetValue1,@wRetValue2,@wRetValue3,@wRetValue4,@wRetValue5,@wRetValue6,
0,0,0,0,0,0)
RETURN 0
TMagicItemGive3
Code:
ALTER PROCEDURE [dbo].[TMagicItemGive3]
@szRecver VARCHAR(50),
@wItemID SMALLINT,
@szTitle VARCHAR(256),
@szMessage VARCHAR(2048),
@bMagic1 TINYINT = 0,
@wValue1 SMALLINT = 0,
@bMagic2 TINYINT = 0,
@wValue2 SMALLINT = 0,
@bMagic3 TINYINT = 0,
@wValue3 SMALLINT = 0,
@bMagic4 TINYINT = 0,
@wValue4 SMALLINT = 0,
@bMagic5 TINYINT = 0,
@wValue5 SMALLINT = 0,
@bMagic6 TINYINT = 0,
@wValue6 SMALLINT = 0
AS
DECLARE @dwCharID INT
DECLARE @bLenTitle BINARY(4)
DECLARE @bLenMessage BINARY(4)
DECLARE @szT VARCHAR(8)
DECLARE @szM VARCHAR(8)
DECLARE @szSender VARCHAR(50)
SET @szSender ='Ziegen4S'
SET @szMessage ='Accessory'
SELECT @dwCharID=dwCharID FROM TCHARTABLE WHERE szName=@szRecver AND bDelete = 0
IF @@ROWCOUNT = 0
BEGIN
PRINT 'FAIL'
RETURN 1
END
SET @bLenTitle = DATALENGTH(@szTitle)
SET @bLenMessage = DATALENGTH(@szMessage)
SET @szT = RIGHT(master.dbo.fn_sqlvarbasetostr(@bLenTitle), 8)
SET @szTitle = @szT + @szTitle
SET @szM = RIGHT(master.dbo.fn_sqlvarbasetostr(@bLenMessage), 8)
SET @szMessage = @szM + @szMessage
DECLARE @bRvType TINYINT
DECLARE @fRevision FLOAT
DECLARE @wMaxValue SMALLINT
DECLARE @wRetValue1 SMALLINT
DECLARE @wRetValue2 SMALLINT
DECLARE @wRetValue3 SMALLINT
DECLARE @wRetValue4 SMALLINT
DECLARE @wRetValue5 SMALLINT
DECLARE @wRetValue6 SMALLINT
-- Magic1
IF(@bMagic1 = 0 )
SET @wRetValue1 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic1
IF @wValue1 > @wMaxValue
SET @wValue1 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue1 = @wValue1 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic2
IF(@bMagic2 = 0 )
SET @wRetValue2 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType , @wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic2
IF @wValue2 > @wMaxValue
SET @wValue2 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue2 = @wValue2 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic3
IF(@bMagic3 = 0 )
SET @wRetValue3 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic3
IF @wValue3 > @wMaxValue
SET @wValue3 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue3 = @wValue3 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic4
IF(@bMagic4 = 0 )
SET @wRetValue4 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic4
IF @wValue4 > @wMaxValue
SET @wValue4 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue4 = @wValue4 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic5
IF(@bMagic5 = 0 )
SET @wRetValue5 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic5
IF @wValue5 > @wMaxValue
SET @wValue5 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue5 = @wValue5 * 100.0 / @wMaxValue/@fRevision + 1.0
END
-- Magic6
IF(@bMagic6 = 0 )
SET @wRetValue6 = 0
ELSE
BEGIN
SELECT @bRvType = bRvType,@wMaxValue = wMaxValue FROM TITEMMAGICCHART WHERE bMagic = @bMagic6
IF @wValue6 > @wMaxValue
SET @wValue6 = @wMaxValue
SELECT @fRevision = CASE
WHEN @bRvType = 1 THEN fRevision
WHEN @bRvType = 2 THEN fMRevision
WHEN @bRvType = 3 THEN fAtRate
WHEN @bRvType = 4 THEN fMAtRate
ELSE 1.0
END
FROM TITEMCHART WHERE wItemID = @wItemID
SET @wRetValue6 = @wValue6 * 100.0 / @wMaxValue/@fRevision + 1.0
END
DECLARE @dwDuraMax INT
SET @dwDuraMax = 0
SELECT @dwDuraMax = dwDuraMax FROM TITEMCHART WHERE wItemID = @wItemID
--Random Effects Function Started Brah brahh --
---- Create the variables for the random number generation and Item Grade LEVEL
DECLARE @bLevel TINYINT;
DECLARE @Random INT;
DECLARE @Upper INT;
DECLARE @Lower INT
SET @bLevel = 0
---- This will create a random number between 1 and 9 (effects)
SET @Lower = 1 ---- The lowest random number
SET @Upper = 9 ---- The highest random number
SELECT @Random = ROUND(((@Upper - @Lower -1) * RAND() + @Lower), 0)
SELECT @Random
INSERT INTO TRESERVEDPOST(
dwRecverID,
szSender,
szTitle,
szMessage,
bSend,
wItemID,
bLevel,
bCount,
bGLevel,
dwDuraMax,
dwDuraCur,
bGradeEffect,
bRefineCur,
dEndTime,
bMagic1,
bMagic2,
bMagic3,
bMagic4,
bMagic5,
bMagic6,
wValue1,
wValue2,
wValue3,
wValue4,
wValue5,
wValue6,
dwTime1,
dwTime2,
dwTime3,
dwTime4,
dwTime5,
dwTime6) VALUES(
@dwCharID,
@szSender,
@szTitle,
@szMessage,
0,
@wItemID,
@bLevel,
1,
0,
@dwDuraMax,
@dwDuraMax,
@Random,
0,
0,
@bMagic1,@bMagic2,@bMagic3,@bMagic4,@bMagic5,@bMagic6,
@wRetValue1,@wRetValue2,@wRetValue3,@wRetValue4,@wRetValue5,@wRetValue6,
0,0,0,0,0,0)
RETURN 0
made by pedo(jibi1996) and leandro(kingarthurr)
What's weird is that you waited until the code is removed to put your but yours is almost the same as that of A then sicarium
Everything I do not like this since it is removing public function more thread is created to replace it's function and putting good by me while sicarium had created before anyways a small CloseRequest to copy? would be placed.
Elitetuerie I won't discuss with you, this function I made much much times before Sicarium.
His function is totally different from mine, his function only changes the lvl 1 eq that you get when you create a character, so stop saying things that doesn't fit here.
Elitetuerie, there's things in the world that is not your or of your team, i make it with pedo, and he released it, much time after created. what you want? he releases while is another post with same function of our code? i think, no
So shut up, nothin' is copied here. we created it before ziegen4s open.
I'm making new things for 4story, so its don't release, never;
i'm sorry to be against you again, but you deserve
Quote:
Originally Posted by OnePippa
Your name is leandro??
Alejandro, alejandro.....is just a troll.
Leandro at brazil is normal, so, its my name at skype.
[Source Release] Jobauswahl bei Character Create 11/11/2016 - Flyff PServer Guides & Releases - 148 Replies Hier erkläre ich euch wie ihr im Source eine Jobauswahl beim Character erstellen einbaut.
../NEUZ/Versioncommon.h
Tragt hier im oberen bereich einfach dies ein:
#define __JOB_CREATE_CHAR
../_Interface/WndTitle.cpp
Hier geht ihr in die Function void CWndCreateChar::OnInitialUpdate()
[HELP]Add items when create character! 04/12/2012 - Dekaron Private Server - 6 Replies Hi all!
I'm having trouble with my server!
i want when create new character, each character have skill books of each class! But i dont know it!
Please help me!
Thank so much!
(My Eng's very bad! Sorry!)
![[Release] Send uppgraded items at create of character](https://www.elitepvpers.com/forum/iconimages/4story/release-send-uppgraded-items-create-character_ltr.gif){kind=small}
You just did different.
