الموقع العربي الاول للعبة Silkroad Online Silkroad-R Joymax التسجيل

الانتقال للخلف   الموقع العربي الاول للعبة Silkroad Online > منتدى عمل السيرفرات الخاصة > قسم الشروحات و البرامج المستخدمة في عمل السيرفرات الخاصة

قسم الشروحات و البرامج المستخدمة في عمل السيرفرات الخاصة [ قسم متخصص فى شروحات و البرامج في عمل السيرفرات الخاصة ] [ يرجى عدم وضع الأسئلة والاستفسارات في هذا القسم ]


إضافة رد
 
أدوات الموضوع انواع عرض الموضوع
قديم 19-02-2015, 09:33 PM   #1

Aeron
عضو جديد





• الانـتـسـاب » Feb 2015
• رقـم العـضـويـة » 120788
• المشـــاركـات » 8
• الـدولـة »
• الـهـوايـة »
• اسـم الـسـيـرفـر » No Server
• الـجـنـس » Male
• نقـاط التقييم » 10
Aeron صـاعـد

Aeron غير متواجد حالياً



افتراضي رد: [Release] Quest Upgrade System



المشاركة الأصلية كتبت بواسطة Lazcano عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]
ماشي مش قصة ان اللى عاوز السيستم يعمل كويست سهلة .

الفكرة يا باشا فى حاجتين ..

انت مش شارح السيستم بالتفصيل .. يعني مثلاً هيجيبوا الخمس اسلحة منين كويست ولا من اليونيكات ولا الموبس ،،

هيغيروا ايه فى الـ Procedure عشان محدش يتلغبط

وكان من باب اولى انك تكمل موضوعك بملف كويست + Npc Lines
ع العموم مش مشكلة بس انت هارس حاجات كتير فى الـ Procedure ومش مترتب

دا نفس الـ Procedure بس مترتب ومتعدل فى بعض الاومر للأبسط اللى الناس تقدر تفهمه .

USE [SRO_VT_SHARD]
GO
/****** Object:  StoredProcedure [dbo].[_AeronQuestUpgrade]    Script Date: 02/19/2015 10:58:39 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

CREATE PROCEDURE 
[dbo].[_AeronQuestUpgrade]
 @
CharID Int,
 @
QuestID Int
  
As

-- Declare 
expression.
    Declare @
OldItemCode Varchar(128) , @NewItemCode Varchar(128) , @ItemID Int , @OldItemCount Int
    
Declare @CharName Varchar(max) = (Select CharName16 From [SRO_VT_SHARD].[dbo].[_CharWhere CharID = @CharID)
-----------------------------------------------------------------------


    IF @
QuestID 'Quest ID' -- Write here your quest ID
     Begin
        
      
IF @OldItemCode 'ITEM_EU_TSTAFF_10_B_RARE'    -- First Old item code name
       Begin
        Set 
@NewItemCode 'ITEM_EU_TSTAFF_10_C_RARE'  -- First new item code name to be exchanged with 5x First Old one.
       
End
      
ELSE IF @OldItemCode 'ITEM_EU_TSWORD_10_B_RARE'  -- Second Old item code name
       Begin
        Set 
@NewItemCode 'ITEM_EU_TSWORD_10_C_RARE'  -- Second new item code name to be exchanged with 5x Second Old one.
    -- 
Repeate this steps if u want more using ELSE IF.
       
End

    
--- Select Values ID and CodeName of Old item.
    
Select @ItemID = (Select ID From [SRO_VT_SHARD].[dbo].[_RefObjCommonWhere CodeName128 = @OldItemCode)
    
Select @OldItemCount = (Select Count(ItemIDFrom [SRO_VT_SHARD].[dbo].[_InventoryWhere ItemID in (Select ID64 From _Items Where RefItemID = @ItemID and Serial64 0) and CharID = @CharID)
    
    
   IF @
OldItemCount >= 5
    Begin
    
-- Delete Top 5 old items from Char inventory to add later the new item.
     
Update SRO_VT_SHARD.dbo.[SRO_VT_SHARD].[dbo].[_InventorySet ItemID 0
     Where ItemID in 
(Select Top 5 ItemID From [SRO_VT_SHARD].[dbo].[_InventoryWhere ItemID in (Select ID64 From [SRO_VT_SHARD].[dbo].[_ItemsWhere RefItemID = @ItemID and Serial64 0) and CharID = @CharID Order by ItemID)
    -- 
Set the rest of Items Serial if the old item count more than 5 items, for not use it later in same quest.
     
Update [SRO_VT_SHARD].[dbo].[_ItemsSet Serial64 0
     Where  ID64  in 
(Select Top 5 ItemID From [SRO_VT_SHARD].[dbo].[_InventoryWhere ItemID in (Select ID64 From [SRO_VT_SHARD].[dbo].[_ItemsWhere RefItemID = @ItemID and Serial64 0) and CharID = @CharID Order by ItemID)
    -- 
Add the new item to char name.
     
Execute [SRO_VT_SHARD].[dbo].[_ADD_ITEM_EXTERN] @Charname,@NewItemCode,1,0
    End
    End 


تقبل مروري
جميل اوى بس لازم تستعمل join و inner join فى الاكواد اللى زى ديه عشان تضمن انها تشتغل, و بدل عمل procedure جديد انا ممكن الخصها فى 3 lines فى _Quest_manage procedure.




رد مع اقتباس
إعلانات google

إضافة رد


يتصفح الموضوع حالياً : 1 (0 عضو و 1 زائر)
 
أدوات الموضوع
انواع عرض الموضوع

ضوابط المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع

المواضيع المتشابهه
الموضوع كاتب الموضوع المنتدى الردود آخر مشاركة
Quest Upgrade System F77 قسم الاسئلة و الاستفسارات لعمل السيرفرات الخاصة 13 27-11-2017 05:22 AM
Upgrade system ™XerK™ قسم الاسئلة و الاستفسارات لعمل السيرفرات الخاصة 7 11-09-2014 01:42 PM
13D upgrade system Information ™_ EthereaL_™ أخـبـار سـيـلك رود أون لايـن 36 09-05-2012 06:29 PM




[ الساعة الآن : | بـتـوقـيـت الـقـاهـرة ]


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