الموقع العربي الاول للعبة Silkroad Online

الموقع العربي الاول للعبة Silkroad Online (https://silkroad4arab.com/vb/index.php)
-   قسم الشروحات و البرامج المستخدمة في عمل السيرفرات الخاصة (https://silkroad4arab.com/vb/forumdisplay.php?f=289)
-   -   [Release]Instant Silk Procedure (https://silkroad4arab.com/vb/showthread.php?t=630993)

Dev.Hyper 30-04-2019 01:25 AM

[Release]Instant Silk Procedure
 
https://f.top4top.net/p_1214hsqgn1.gif
الموضوع بخصوص انك تبعت silk لل Character على طول من غير Teleport وطبعا شوية تعديلات عليه

https://a.top4top.net/p_1214gac932.gif
#Procedure
كود:

USE [RI3O_VT_SYSTEMS]
GO

/****** Object:  StoredProcedure [dbo].[Silks]    Script Date: 4/30/2019 12:00:55 AM ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER OFF
GO

 

CREATE PROCEDURE [dbo].[Silks]
    @UserID  INT,
    @NumSilk INT,
    @Type INT
as
    DECLARE @SilkRemain INT,@SilkType tinyint,@OrderID INT,@Reason tinyint
-------------------------------  All silk types ----------------------------------- Created By #Ri3o -----
IF (@Type = 1) /** silk own **/
Begin
Set @SilkRemain = (Select silk_own from SRO_VT_ACCOUNT.dbo.SK_Silk Where JID=@UserID)
UPDATE SRO_VT_ACCOUNT.dbo.SK_Silk SET silk_own = @SilkRemain + @NumSilk WHERE JID = @UserID
Set @SilkType = 0 -- silk type --
Set @Reason = 0 -- notice ---
END
ELSE IF (@Type = 2) /** silk gift **/
Begin
Set @SilkRemain = (Select silk_gift from SRO_VT_ACCOUNT.dbo.SK_Silk Where JID=@UserID)
UPDATE SRO_VT_ACCOUNT.dbo.SK_Silk SET silk_gift = @SilkRemain + @NumSilk WHERE JID = @UserID
Set @SilkType = 1 -- silk gift type --
Set @Reason = 2 -- notice ---
END
ELSE IF (@Type = 3) /** silk point **/
Begin
Set @SilkRemain = (Select silk_point from SRO_VT_ACCOUNT.dbo.SK_Silk Where JID=@UserID)
UPDATE SRO_VT_ACCOUNT.dbo.SK_Silk SET silk_point = @SilkRemain + @NumSilk WHERE JID = @UserID
Set @SilkType = 2 -- silk point type --
Set @Reason = 1 -- notice ---
END           

            --INSERT Silk Own
        SELECT @OrderID = cast(MAX(OrderNumber)+1 as INT) FROM SRO_VT_ACCOUNT.dbo.SK_SilkBuyList WHERE UserJID = @UserID
        IF(@OrderID is NULL)
        BEGIN
            set @OrderID = 0
        END
        INSERT SRO_VT_ACCOUNT.dbo.SK_SilkBuyList(UserJID,Silk_Type,Silk_Reason,Silk_Offset,Silk_Remain,ID,BuyQuantity,SlipPaper,RegDate,OrderNumber) VALUES( @UserID,@SilkType,0,@NumSilk,@SilkRemain + @NumSilk,0,1,"User Purchase Silk from VDC-Net2E Billing System",GETDATE(),@OrderID)
        INSERT SRO_VT_ACCOUNT.dbo.SK_SilkChange_BY_Web(JID,silk_remain,silk_offset,silk_type,reason) VALUES(@UserID,@SilkRemain + @NumSilk,@NumSilk,@SilkType,@Reason)
        IF (@@error <> 0 or @@rowcount = 0)
        BEGIN
            SELECT Result = "FAIL"
--          ROLLBACK TRANSACTION
            RETURN
        END
        SELECT Result = "SUCCESS"
--  COMMIT TRANSACTION
    RETURN
SET QUOTED_IDENTIFIER OFF


GO

https://a.top4top.net/p_1214gac932.gif
كل اللى هتعملو انك هتعمل Execute لل Procedure فى اى system عندك فى الجزء بتاع ال Rewad
زى كدة
كود:

EXEC RI3O_VT_SYSTEMS.dbo.Silks JID, Amount, Type
Type : 1 اللى هو ال Normal Silk
والرسالة بتاعتو تقدر تعدل عليها من ال Textuisystem هتدور على
كود:

UIIT_STT_SILK_BUY_RESULT
وتشوف عايز تكتب ايه
https://a.top4top.net/p_1214gac932.gif
Type : 2 اللى هو ال Gift Silk
والرسالة بتاعتو تقدر تعدل عليها من ال Textuisystem هتدور على
كود:

UIIT_STT_SILK_BUY_RECEIVE
وتشوف عايز تكتب ايه
https://a.top4top.net/p_1214gac932.gif
Type : 3 اللى هو ال Silk point
والرسالة بتاعتو تقدر تعدل عليها من ال Textuisystem هتدور على
كود:

UIIT_STT_SILK_BUY_CANCLE
وتشوف عايز تكتب ايه
https://a.top4top.net/p_1214gac932.gif
https://c.top4top.net/p_121494ovh1.jpg
تحياتى الحارة ^_^

.Gamer. 30-04-2019 01:28 AM

رد: [Release]Instant Silk Procedure
 
الله ينور يا احمد ... تسلم:Emoji2:

Dev.Hyper 30-04-2019 01:30 AM

رد: [Release]Instant Silk Procedure
 
اقتباس:

المشاركة الأصلية كتبت بواسطة .Gamer. (المشاركة 5367713)
الله ينور يا احمد ... تسلم:Emoji2:

الله يسلمك يا غالى <3

MR.KaBO 30-04-2019 04:33 AM

رد: [Release]Instant Silk Procedure
 
ممتاز تسلم ��
بس كان عاوز بعض الصور للتوضيح شوية للناس اللي متعرفش حاجة خالص


الساعة الآن 06:31 PM.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.