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

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

Dev. iLegend 24-01-2015 07:28 PM

Full Useful Procedure Scroll
 

http://www2.0zz0.com/2012/10/22/15/311256858.gif

http://www2.0zz0.com/2012/10/22/16/593531309.png


http://im45.gulfup.com/wsCcCQ.png

Full Useful Procedure Scroll

باختصار يا جماعة دا Procedure لامم فيه حاجات كتيرة وميزته انه بيضيف أيتم للـ 2 Gender

بسكرولاية واحدة يعني مثلاً ممكن تعمل بيه Devils Full Blue ويتضاف مكان الديفل

للكراكتر الـ Male والـ Female بنفس الاسكرول بس طبعاً مع التعديل ع الـ Procedure

انا عامله على Dragon Flag - Slot 3 الديفيل Slot 5 وهكذا. ممكن اصلا تمسح حاجات منه وتعيد صياغة حجات بسيطه فيه

وتخليه على حسب منتا عاوز انا اقصد انه مش مرتبط بحاجة معينة وفى نفس الوقت ممكن تشغله بـ Scroll .

وضايف فيه شرح بسيط بخطوات تفهمك الـ Procedure ماشي إزاي عشان لما تعدل تكون عارف كل حاجة بتعمل ايه.

نيجي للمهم ..

dbo._RefObjCommon

كود PHP:

1    42155    ITEM_MALL_NEW_SCROLL    ????? (????)    xxx    SN_ITEM_MALL_NEW_SCROLL    SN_ITEM_MALL_NEW_SCROLL_TT_DESC    0    0    3    3    3    1    180000    3    0    0    1    1    0    0    1    0    0    1    0    0    0    0    0    0    0    -1    0    -1    0    -1    0    -1    0    -1    0    0    0    0    0    0    0    100    0    0    0    xxx    item\etc\drop_mall_scroll.bsr    item\etc\archemy_potiontablet_immun_frozen.ddj    xxx    xxx    21630 



dbo._RefObjItem

كود PHP:

21630    1    2    0    0    1    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    1000    ????    1    ??????    -1    RESURRECT    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    0    0    0 



Itemdata_4500.txt

كود PHP:

1    42155    ITEM_MALL_NEW_SCROLL    ????? (????)    xxx    SN_ITEM_MALL_NEW_SCROLL    SN_ITEM_MALL_NEW_SCROLL_TT_DESC    0    0    3    3    3    1    180000    3    0    0    1    1    0    0    1    0    0    1    0    0    0    0    0    0    0    -1    0    -1    0    -1    0    -1    0    -1    0    0    0    0    0    0    0    100    0    0    0    xxx    item\etc\drop_mall_scroll.bsr    item\etc\archemy_potiontablet_immun_frozen.ddj    xxx    xxx    1    2    0    0    1    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    1000    ????    1    ??????    -1    RESURRECT    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    0    0 



Textdata_Object.txt

كود PHP:

1    SN_ITEM_MALL_NEW_SCROLL                                Useful Scroll
1    SN_ITEM_MALL_NEW_SCROLL_TT_DESC                                
<sml2>Useful Scroll Added :)<br><br><strong><font color="255,236,219,156">Created by:</font></strong><br><strong><font color="255,0,255,127">iLegend</font></strong></sml2



SRO_VT_SHARDLOG
dbo._AddLogItem

كود PHP:

   IF (@Operation 41) -- If item used!
  
Begin
    
IF (@ItemRefID 42156) -- RefObjCommon ID
       Begin
        Execute 
[SRO_VT_SHARD].[dbo].[_ADD_FLAG] @CharID
       End
  End 



Copy This Procedure then execute it by Shard Name

كود PHP:

USE [SRO_VT_SHARD]
GO
/****** Object:  StoredProcedure [dbo].[_ADD_FLAG]    Script Date: 01/24/2015 16:57:28 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- =============================================
CREATE PROCEDURE [dbo].[_ADD_FLAG]
 @
CharID Int 
    
As

    -- 
This Procedure created by [iLegend] for several uses.
    -- 
Main of them is adding item for both gender by 1 scrolletc.
    -- 
You can change values and parameters as u want.
    -- For 
change to add the item to inventory :
    -- 
Work with this ParameterSlot = @Empty_Slot and change every _InventoryForAvatar to _Inventory
    
-- ================================================================================================

     Declare @
RefObjID Int = (Select RefObjID From [SRO_VT_SHARD].[dbo].[_CharWhere CharID = @CharID)
     Declare @
ID64 Int = (Select MAX (ID64FROM [SRO_VT_SHARD].[dbo].[_Items]) +1
     
Declare @ItemID Int = (Select ItemID From [SRO_VT_SHARD].[dbo].[_InventoryForAvatarWhere CharID = @CharID and Slot 3)
     Declare @
RefItemID Int
     
Declare @FreeItemID Bigint
     
Declare @Inv_Capacity int
     
Declare @Empty_Slot Int
     
Declare @SN Bigint = (Select LatestItemSerial From [SRO_VT_SHARD].[dbo].[_LatestItemSerial])
     
Select @FreeItemID MAX (ItemIDFrom [SRO_VT_SHARD].[dbo].[_ItemPoolWith (NolockWhere InUse 0
     Set 
@Inv_Capacity = (Select InventorySize From [SRO_VT_SHARD].[dbo].[_CharWhere CharID = @CharID)
     
Select Top 1 @Empty_Slot Slot From [SRO_VT_SHARD].[dbo].[_InventoryWith (NolockWhere CharID = @CharID and Slot >= 13 and Slot < @Inv_Capacity and ItemID 0 Order By Slot
     
    
-- IF Char Gender = [M]
    -- =====================
   IF (@
RefObjID between 1907 and 1919) or (@RefObjID between 14875 and 14887
    
Begin
    
-- Step 1 : *If item exist in the selected slot.
    -- 
Actions :
    -- 
1Update the exist item by a new parameters that we want.
    -- =================================================================
      IF (@
ItemID 0
       
Begin
        Update 
[SRO_VT_SHARD].[dbo].[_ItemsSet OptLevel CreaterName 'iLegend' MagParamNum MagParam1 30064771305 MagParam2 30064771304
        Where ID64 
= @ItemID
       End
    
-- Step 2 : *If item not exist in the selected slot and free item is exist from dbo._ItemPool.
    -- 
Actions :
    -- 
1Update the free item by a new parameters that we want.
    -- 
2Update dbo.ItemPool for change the free item to InUse Item.
    -- 
3Update the free slot item to the updated item that we do.
    -- =================================================================
      IF (@
ItemID 0) and (@FreeItemID 0
       
Begin
        Set 
@RefItemID 9374  -- Male Item ID
        Update 
[SRO_VT_SHARD].[dbo].[_ItemsSet RefItemID=@RefItemID,OptLevel=0,Variance=0,Data=0,CreaterName='iLegend',MagParamNum=2,MagParam1=30064771305,MagParam2=30064771304,MagParam3=NULL,MagParam4=NULL,MagParam5=NULL,MagParam6=NULL,MagParam7=NULL,MagParam8=NULL,MagParam9=NULL,MagParam10=NULL,MagParam11=NULL,MagParam12=NULL
        Where ID64 
= @FreeItemID
        Update 
[SRO_VT_SHARD].[dbo].[_ItemPoolSet InUse 1 Where ItemID = @FreeItemID
        Update 
[SRO_VT_SHARD].[dbo].[_InventoryForAvatarSet ItemID = @FreeItemID Where CharID = @CharID and Slot 3
       End
    
-- Step 3 : *If item not exist in the selected slot and item free is not exist from dbo._ItemPool.
    -- 
Actions :
    -- 
1Create new item in dbo._Items by a new parameters that we want.
    -- 
2Create a line in dbo.ItemPool for make the new item to InUse Item.
    -- 
3Update the free slot item to the created item that we create.
    -- =================================================================
      IF (@
ItemID 0) and (@FreeItemID 0)
       
Begin
        Exec 
[SRO_VT_SHARD].[dbo].[_GetLatestItemSerial] @SN
        Set 
@RefItemID 9374  -- Male Item ID
        SET IDENTITY_INSERT 
[SRO_VT_SHARD].[dbo].[_ItemsON
        Insert InTo 
[SRO_VT_SHARD].[dbo].[_Items]
        (
ID64,RefItemID,OptLevel,Variance,Data,CreaterName,MagParamNum,MagParam1,MagParam2,MagParam3,MagParam4,MagParam5,MagParam6,MagParam7,MagParam8,MagParam9,MagParam10,MagParam11,MagParam12,Serial64)
        
Values (@ID64,@RefItemID,0,0,0,'iLegend',2,30064771305,30064771304,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,@SN)
        
SET IDENTITY_INSERT [SRO_VT_SHARD].[dbo].[_ItemsOFF
        Insert InTo 
[SRO_VT_SHARD].[dbo].[_ItemPoolValues (@ID64,1)
        
Update [SRO_VT_SHARD].[dbo].[_InventoryForAvatarSet ItemID = @ID64 Where CharID = @CharID and Slot 3
       End
    End
        
  
Else
    
    -- IF 
Char Gender = [F]
    -- =====================
   IF (@
RefObjID Between 1920 and 1932) Or (@RefObjID Between 14888 and 14900)
    
Begin
    
-- Step 1 : *If item exist in the selected slot.
    -- 
Actions :
    -- 
1Update the exist item by a new parameters that we want.
    -- =================================================================
      IF (@
ItemID 0)
       
Begin
        Update 
[SRO_VT_SHARD].[dbo].[_ItemsSet OptLevel CreaterName 'iLegend' MagParamNum MagParam1 30064771305 MagParam2 30064771304
        Where ID64 
= @ItemID
       End
    
-- Step 2 : *If item not exist in the selected slot and free item is exist from dbo._ItemPool.
    -- 
Actions :
    -- 
1Update the free item by a new parameters that we want.
    -- 
2Update dbo.ItemPool for change the free item to InUse Item.
    -- 
3Update the free slot item to the updated item that we do.
    -- =================================================================
      IF (@
ItemID 0) and (@FreeItemID 0)
       
Begin
        Set 
@RefItemID 9375
        Update 
[SRO_VT_SHARD].[dbo].[_ItemsSet RefItemID=@RefItemID,OptLevel=0,Variance=0,Data=0,CreaterName='iLegend',MagParamNum=2,MagParam1=30064771305,MagParam2=30064771304,MagParam3=NULL,MagParam4=NULL,MagParam5=NULL,MagParam6=NULL,MagParam7=NULL,MagParam8=NULL,MagParam9=NULL,MagParam10=NULL,MagParam11=NULL,MagParam12=NULL
        Where ID64 
= @FreeItemID  -- Female Item ID
        Update 
[SRO_VT_SHARD].[dbo].[_ItemPoolSet InUse 1 Where ItemID = @FreeItemID
        Update 
[SRO_VT_SHARD].[dbo].[_InventoryForAvatarSet ItemID = @FreeItemID Where CharID = @CharID and Slot 3
       End
    
-- Step 3 : *If item not exist in the selected slot and item free is not exist from dbo._ItemPool.
    -- 
Actions :
    -- 
1Create new item in dbo._Items by a new parameters that we want.
    -- 
2Create a line in dbo.ItemPool for make the new item to InUse Item.
    -- 
3Update the free slot item to the created item that we create.
    -- =================================================================
      IF (@
ItemID 0) and (@FreeItemID 0)
       
Begin
        Exec 
[SRO_VT_SHARD].[dbo].[_GetLatestItemSerial] @SN
        Set 
@RefItemID 9375  -- Female Item ID
        SET IDENTITY_INSERT 
[SRO_VT_SHARD].[dbo].[_ItemsON
        Insert InTo 
[SRO_VT_SHARD].[dbo].[_Items]
        (
ID64,RefItemID,OptLevel,Variance,Data,CreaterName,MagParamNum,MagParam1,MagParam2,MagParam3,MagParam4,MagParam5,MagParam6,MagParam7,MagParam8,MagParam9,MagParam10,MagParam11,MagParam12,Serial64)
        
Values (@ID64,@RefItemID,0,0,0,'iLegend',2,30064771305,30064771304,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,@SN)
        
SET IDENTITY_INSERT [SRO_VT_SHARD].[dbo].[_ItemsOFF
        Insert InTo 
[SRO_VT_SHARD].[dbo].[_ItemPoolValues (@ID64,1)
        
Update [SRO_VT_SHARD].[dbo].[_InventoryForAvatarSet ItemID = @ID64 Where CharID = @CharID and Slot 3
       End
    End 








Mr Z!dane 14-02-2015 12:29 PM

Approved#

Hamza FiGo 14-02-2015 05:39 PM

رد: |►(●̮●)♔ Release : Full Useful Procedure Scroll ♔(●̮●)◄|
 
تسلم
:winner_third_h4h:

Dev. iLegend 14-02-2015 10:48 PM

رد: |►(●̮●)♔ Release : Full Useful Procedure Scroll ♔(●̮●)◄|
 
Thanks :mwah1:

merazz012 15-02-2015 01:04 PM

رد: |►(●̮●)♔ Release : Full Useful Procedure Scroll ♔(●̮●)◄|
 
في حاجات مينفعش تتعمل لاني اول حاجه هتبوظ الpvp لانك بتزود hp mp و damge مش هيتغير في كده انت بوظت الpvp الحاجات اللي بتبوظ الpvp

godbless
devil blue
تقدر تقول الhonor scroll في الpvp سيرفر
حتي لو هتلاحظ في اي سيرفر في ناس كتير الgm مش بيكون عامل الحاجات دي و الحاجات دي بتتعمل في السيرفرات
pay2play

™Dev Microsoft™ 15-02-2015 01:38 PM

رد: |►(●̮●)♔ Release : Full Useful Procedure Scroll ♔(●̮●)◄|
 
تمام عاش شغل :)

Jaffa 15-02-2015 01:43 PM

رد: |►(●̮●)♔ Release : Full Useful Procedure Scroll ♔(●̮●)◄|
 
عالمى والله استمر

Dev. iLegend 16-02-2015 02:39 AM

رد: |►(●̮●)♔ Release : Full Useful Procedure Scroll ♔(●̮●)◄|
 
اقتباس:

المشاركة الأصلية كتبت بواسطة merazz012 (المشاركة 5161499)
في حاجات مينفعش تتعمل لاني اول حاجه هتبوظ الpvp لانك بتزود hp mp و damge مش هيتغير في كده انت بوظت الpvp الحاجات اللي بتبوظ الpvp

godbless
devil blue
تقدر تقول الhonor scroll في الpvp سيرفر
حتي لو هتلاحظ في اي سيرفر في ناس كتير الgm مش بيكون عامل الحاجات دي و الحاجات دي بتتعمل في السيرفرات
pay2play

باشا هو سيادتك بتتكلم على ايه ؟ هو انا منزل سكرول بتزود DMG or Def

انا منزل Procedure تضيف بيه اي ايتم

Male if char male

Female if char female

ودا تستخدمه فى اي حاجة بدماغك .. ارجوا انك تقرا الموضوع قبل متحط رد ..

اقتباس:

المشاركة الأصلية كتبت بواسطة ™Dev Microsoft™ (المشاركة 5161502)
تمام عاش شغل :)

شكرا على مرورك يا معلم

اقتباس:

المشاركة الأصلية كتبت بواسطة Jaffa (المشاركة 5161504)
عالمى والله استمر

تسلم يا ريس



Gummies 17-02-2015 06:57 PM

رد: |►(●̮●)♔ Release : Full Useful Procedure Scroll ♔(●̮●)◄|
 
برنس :cool:

Dev. iLegend 17-02-2015 10:09 PM

رد: |►(●̮●)♔ Release : Full Useful Procedure Scroll ♔(●̮●)◄|
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Gummies (المشاركة 5162567)
برنس :cool:

شكراً يا ريس

Dangers SrO 18-02-2015 01:57 AM

رد: |►(●̮●)♔ Release : Full Useful Procedure Scroll ♔(●̮●)◄|
 
GooD Jop

Dev. iLegend 19-02-2015 11:14 AM

رد: |►(●̮●)♔ Release : Full Useful Procedure Scroll ♔(●̮●)◄|
 
Thanks

™ EgY_KhaN ™ 24-02-2015 07:25 AM

رد: |►(●̮●)♔ Release : Full Useful Procedure Scroll ♔(●̮●)◄|
 
Prot جميله وهتساعد كتير (Y)

Jaffa 05-03-2015 04:56 AM

رد: |►(●̮●)♔ Release : Full Useful Procedure Scroll ♔(●̮●)◄|
 
لحد الان انا حاسيس انى غبى انا مش فاهم الاسكرولة ديه خالص يريت حد يفهمهالى

Jaffa 06-03-2015 04:28 AM

رد: |►(●̮●)♔ Release : Full Useful Procedure Scroll ♔(●̮●)◄|
 
itemdata طويل اوى و مش شغال


الساعة الآن 10:22 PM.

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