الموقع العربي الاول للعبة Silkroad Online - LOCK & Unlock System By Massage With Secret Word By HLP

- - LOCK & Unlock System By Massage With Secret Word By HLP (https://silkroad4arab.com/vb/showthread.php?t=600996)

LOCK & Unlock System By Massage With Secret Word By HLP

http://www.dreamjordan.com/up/17855hlmjo
اولا : الموضوع فكرة الاستاذ : حمزة
Lock / Unlock Scroll
ثانيا :
موضوع سهل ان انت لو عايز تقفل اي item علشان لو حد خد char بتعك ميعرفيش ياخد اي حاجة منه .
بس السيستم ده فيه عيب واحد بس ان البلاص بيكون شغال والايتم مقفول و جاري الحل
ثالثا :
السيسم ده شغال علي Secret Word و سيلك
يعني انت بيبعت رساله ل Char أسمه )LOCK انت بتعمله و مش شرط انه يكون مفتوح
الرسالة بتكون زي كدة

كود PHP:

LOCK (Secret Word) or UNLOCK (Secret Word)

و علشان السيسم يشتغل معك لازم Secret Word تكون صح
و يكون معك 15 سيلك علشان كل عملية اقفل او فتح بياخد 15 سيلك
رابعا :
سيستم فيه نظام رسايل وشغال ب Vsro Multi Tool
Program : Vsro Multi Tool Series
المهم ندخل في الجد

--------------------------------

1- اعمل سطور جديدة للاسلحة او الايتم.

خد كوبي من السطور الاصلية بتاع الايتم او الاسلحة وغير الاي دي هات والاسامي

مهم:

في السطور الجديدة لازم تراعي انك تعمل الحاجات دي صفر
Can trade-Can Drop-Can Borrow-Can Sell = 0
دي سطور items D14 اللي انا شغال بيها
_RefObjCommon

http://pastebin.com/raw/WzNtvii5

_RefObjItem

http://pastebin.com/raw/1p0VLkyU

2 : CREATE TABLE

http://pastebin.com/raw/V9RAQRJz

3 : و دي طريقة وضع items في teble

http://pastebin.com/raw/ZyFk6S7A

4 : Create procedure

كود PHP:

USE [SRO_VT_SHARDLOG] GO /****** Object: StoredProcedure [dbo].[_LockUnLockSystemByHLP] Script Date: 16/04/2016 09:25:24 ص ******/ SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO Create procedure [dbo].[_LockUnLockSystemByHLP] @SenderCharName varchar(64), @Message varchar(300) as DECLARE @Silk_Own int ,@JID Int ,@CharID Int ,@SecretWord varchar(300) ,@ID int ,@Type varchar(50) ,@Lock_type varchar(50) ,@Gender varchar(50) ,@DG int ,@NEW_lockID int ,@New_UnlockID int ,@RefID int ,@ItemID int select @CharID = A.CharID ,@JID =U.UserJID from SRO_VT_SHARD.._Char a inner join SRO_VT_SHARD.._User u On A.CharID = U.CharID where CharName16 = @SenderCharName select @Silk_Own = silk_own from SRO_VT_ACCOUNT..SK_Silk where JID = @JID Select @SecretWord = certificate_num from SRO_VT_ACCOUNT..TB_User where JID = @JID ------------------------------------------------------------------- Select @ItemID = F.ItemID ,@RefID = I.RefItemID from SRO_VT_SHARD.._Inventory F inner join SRO_VT_SHARD.._Items I ON F.ItemID = I.ID64 Where CharID = @CharID and Slot = '13' ------------------------------------------------------- Select @ID = ID , @DG = DG , @Gender = Gender ,@Type = Type ,@Lock_type = Lock_type from SRO_VT_RAMY.dbo._LockUnLockSystem where ID = @RefID ------------------------------------------------------------ SET @NEW_lockID =(SELECT ID FROM SRO_VT_SHARDLOG.dbo._LockUnLockSystem WHERE TYPE = @Type and Lock_Type = 'lock' and Gender =@Gender AND DG = @DG) SET @New_UnlockID =(SELECT ID FROM SRO_VT_SHARDLOG.dbo._LockUnLockSystem WHERE TYPE = @Type and Lock_Type = 'unlock' and Gender =@Gender AND DG = @DG) ---------------------------------------------------------------------------------------------------- IF @Message = 'lock ('+(@SecretWord)+')' and @RefID not like @NEW_lockID begin IF not exists (select @Silk_Own where @Silk_Own >= 15) begin Insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,Target,Message,Date) values (1,'Private',@SenderCharName, 'Lock process Cannot Completed Due to inSufficient Silk ,You need to have [15 silk] for lock. ',Getdate()) End Else IF (exists (select @Silk_Own where @Silk_Own >= 15)) begin Update SRO_VT_SHARD.._Items Set RefItemID=@NEW_lockID,CreaterName='HLP' Where ID64 = @ItemID update SRO_VT_ACCOUNT..SK_Silk set silk_own = @Silk_Own - 15 where JID = @JID Insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,Target,Message,Date) values (1,'Private',@SenderCharName,'Your item has been Locked Successfuly. ',Getdate()) Insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,Target,Date) values (1,'Totown',@SenderCharName,Getdate()) End End Else If not Exists (Select @RefID from SRO_VT_SHARDLOG.dbo._LockUnLockSystem where ID =@RefID) begin Insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,Target,Message,Date) values (1,'Private',@SenderCharName,'The Target Item Cannot be Lock. ',Getdate()) end IF @Message = 'unlock ('+(@SecretWord)+')' and @RefID not like @New_UnlockID begin IF not exists (select @Silk_Own where @Silk_Own >= 15) Begin Insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,Target,Message,Date) values (1,'Private',@SenderCharName, 'Unlock process Cannot Completed Due to inSufficient Silk ,You need to have [15 silk] for unlock. ',Getdate()) End Else IF (exists (select @Silk_Own where @Silk_Own >= 15)) begin Update SRO_VT_SHARD.._Items Set RefItemID=@New_UnlockID,CreaterName='HLP' Where ID64 = @ItemID update SRO_VT_ACCOUNT..SK_Silk set silk_own = @Silk_Own - 15 where JID = @JID Insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,Target,Message,Date) values (1,'Private',@SenderCharName,'Your item has been UnLocked Successfuly. ',Getdate()) Insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,Target,Date) values (1,'Totown',@SenderCharName,Getdate()) End End

5: _Memo_Add

كود PHP:

DECLARE @CharID int = (select CHARid from _Char where CharName16 = @SenderCharName) DECLARE @SecretWord varchar(300) , @JID int select @SecretWord = A.certificate_num , @JID =B.CharID from SRO_VT_ACCOUNT..TB_User A inner join _User B ON A.JID = B.UserJID where CharID =@CharID IF (@TargetCharName = 'LOCK' and @Message = 'lock ('+(@SecretWord)+')' or @Message = 'unlock ('+(@SecretWord)+')' ) BEGIN exec SRO_VT_SHARDLOG..[_LockUnLockSystemByHLP] @SenderCharName , @Message end else IF Exists (select @Message where @Message not like 'lock ('+(@SecretWord)+')' or @Message not like 'unlock ('+(@SecretWord)+')' ) begin If (@TargetCharName = 'LOCK') begin Insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,Target,Message,Date) values (1,'Private',@SenderCharName,'InCorrect Secret Word , Please Re-Type A Correct Secret Word and Send it again ',Getdate()) End end

System Review Video

[YOUTUBE]IEJfCPP0EyY[/YOUTUBE]
ارجو يكون الموضوع مفيد
ملف Icons في مرفقات