Release] Marriage System]

[elbattawy1st]

النهارده جايبلكم سيستم غريب شويه بس قولت انزله ممكن حد يطلع منه با اى حاجه او اى فكره عنده فى سيرفر
سيستم شغال على برنامج Vsro Multi Tools V1.8
السيستم دا عباره عن شخصيه Male هتكلم الشخصيه الا برنامج فاتحها و هتقوله Marriage System
بوت هيبعتله Guide ازاي يتستخدم السيستم و بعد كدا هيبعت لكاركتر ال Female الا هوا اختارها
لو كاركتر Female واقفت البوت هينقلهم فى مكان انت هتحدده فى سيستم من بروسيدور Pro (Marrige_Settings) دا و هيوقلهم يفتحو pvp الشخصيه Male لو موتت الشخصيه Female يبقى كدا
هما اتجوزو ^_^ و هينكتب فى سيرفر انو اتجوزو و لو الشخصيه ال Female هيا الا موتت شخصيه ال Male
مش هتيجوزو و هينكتب برضو notice فى سيرفر بكدا
مش عارف انا كنت شارب ايه و انا بعمل السيستم دا الصراحه ^_^
بس الفكره هنا انا حبيت اشارك سيستم معاكم ممكن حد يطوره بحيث ان يبقى fun عنده فى الجيم
او كان عاوز يعمل سيستم معين و مش عارف ممكن ياخد منه اكواد تفيده فى سيستم دا :D

عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

ملحوظه : فى كام Cheat فى السيستم انا حلتهم يعنى زى لو هوا مش Male لو شخصيه Female دى متجوزه قبل كدا و هكذا حاجات كتير بس مش فاكر كل حاجه الصراحه ^_^

PW :

Abdo.Elbattawy

[Hamza FiGo]

[elbattawy1st]

المشاركة الأصلية كتبت بواسطة Hamza FiGo عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

تسلم ياكبير على الموافقه ^_^

[™ EgY_KhaN ™]

نسيت يبقي فيه نوتيك في الاخر
فراشة ابو نواف تتمني لكم عرس مبارك وبوفيها شهيا

[Hamza FiGo]

المشاركة الأصلية كتبت بواسطة ™ EgY_KhaN ™ عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

نسيت يبقي فيه نوتيك في الاخر
فراشة ابو نواف تتمني لكم عرس مبارك وبوفيها شهيا

هههههههههههههههههه

[Destructions]

انت مش بتجيب غير الحاجة المفيدة <3 5 عليك

[HB#]

باسوورد فك الضغط انت نسيت تحطوا : Abdo.Elbattawy
وتسلم ايدك

[ahmedbadrbedo]

بصرحه انتا فشخت الواقع السستم عايز بس reward وامكنيه الغاه يعنى لو مش عجبانى بنت الجزمه الى اتجوزتها اغيرها هههههه

[elbattawy1st]

المشاركة الأصلية كتبت بواسطة ™ EgY_KhaN ™ عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

نسيت يبقي فيه نوتيك في الاخر
فراشة ابو نواف تتمني لكم عرس مبارك وبوفيها شهيا

ههههههههههههههه مش عارف الواحد كان شارب ايه و هوا بيعمله ^_^

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

انت مش بتجيب غير الحاجة المفيدة <3 5 عليك

فى الخدمه ياباشا

المشاركة الأصلية كتبت بواسطة HB# عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

باسوورد فك الضغط انت نسيت تحطوا : Abdo.Elbattawy
وتسلم ايدك

اها معلش نسيتو حطو فى الموضوع حالا

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

بصرحه انتا فشخت الواقع السستم عايز بس reward وامكنيه الغاه يعنى لو مش عجبانى بنت الجزمه الى اتجوزتها اغيرها هههههه

اها انت ممكن تعدل عليه براحتك علشان كدا انا نشرتو الا عاوز يعدل عليه براحته بقى يعنى من الاخر كدا Enjoy ^_^

[ابو ليلى]

الله ينور يا ياحج عبدو الماذون الشرعى لسيلك روود المفروض لما يتجوز يجبو بيت اتاك ولا بيت جراب هدية

[elbattawy1st]

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

الله ينور يا ياحج عبدو الماذون الشرعى لسيلك روود المفروض لما يتجوز يجبو بيت اتاك ولا بيت جراب هدية

ههههههههههههههه كل واحد و على قده بقى :D

[Destructions]

في مشكلة بس ! عاوز احل المشكلة ديه
your parnter must be level 120
عملتهم 120
بيقولي نفس الكلام انا عاوز 110 انا جيمي 110

[elbattawy1st]

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

في مشكلة بس ! عاوز احل المشكلة ديه
your parnter must be level 120
عملتهم 120
بيقولي نفس الكلام انا عاوز 110 انا جيمي 110

هات كدا Trigger (Marrige)

[ahmedbadrbedo]

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

هات كدا Trigger (Marrige)

كود PHP:

USE [ELBATTAWY_SYSTEMS]
GO


/****** Object:  Trigger [dbo].[Marrige]    Script Date: 10/4/2016 11:49:25 PM ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO



-- =============================================
-- Author:        Abdelrhman Elbattawy
-- Create date: <2016 - 10 - 04>
-- Description:    <Marrige System>
-- =============================================


CREATE TRIGGER [dbo].[Marrige] 
ON  [dbo].[_IncomingPrivateChat]
after  insert  
as
/********************************* System Start ********************************/
----------- # Main Declares
DECLARE @CharName        varchar(60)    ,@CharName_Male   varchar(50)          ,@CharName_Female varchar(50)   
       ,@Chat            varchar(MAX)   ,@Configration    varchar(25)          ,@Case            varchar(50)
       ,@system          varchar(50)    ,@Level_Male      int                  ,@Level_Female    int
       ,@ReFCharID       int            ,@charsex         varchar(max)         ,@charsex2        varchar(max)
       ,@targetrefcharid int

Select @CharName=CharName ,@Chat=Chat From _IncomingPrivateChat
----------- # Sets
Set @ReFCharID = (Select Top 1 RefObjID From [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @CharName)
Set @Case = (Select [Case] From [dbo].[Marriage_challenge] where CharName_Male = @CharName)
Set @System = 'Marriage System'
----------- # Male Section
IF (@Chat = @System)
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'Hey u , u wanna marriage ???',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'Pm with char name that the girl u want ^_^',Getdate())  
End
----- @ Part secuss
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And @Case is NULL And Not Exists (Select Top 1 Configration From [dbo].[Marriage_challenge] Where CharName_FeMale = @Chat) And Exists (Select * from [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @Chat) And (@RefCharID <=14887 And @RefCharID >=14875 or @RefCharID<=1919 AND @RefCharID>=1907))
Begin
Insert into [dbo].[Marriage_challenge] (CharName_Male,CharName_Female) Values (@CharName,@Chat)
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@Chat,'This Is CharName ['+@CharName+'] want to marrie u .',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@Chat,'IF u Accept pm with Yes',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@Chat,'IF u Dont Accept pm with No',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'wait until she accpet or Not',Getdate())
End
----- @ Part fail
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And @Case is NULL And Not Exists (Select Top 1 Configration From [dbo].[Marriage_challenge] Where CharName_FeMale = @Chat) And Exists (Select * from [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @Chat) And (@RefCharID<=1932 AND @RefCharID>=1920 OR @RefCharID<=14900 AND @RefCharID>=14888))
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'u are not male only male can do it.',Getdate())
Delete From [dbo].[_IncomingPrivateChat] Where CharName = @CharName
End
----- @ Application Yet
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And @Case is NULL And Exists (Select Top 1 Configration From [dbo].[Marriage_challenge] Where CharName_FeMale = @Chat) And Exists (Select * from [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @Chat))
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'She Have Application For Marrie Not Finish Yet.',Getdate())
End
----- @ Part error char female marrie
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And @Case = 'Married')
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'Already Married.',Getdate())
End

----- @ Part error char female not exists
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And Not Exists (Select * from [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @Chat))
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'There Is No Charname With This Charname.',Getdate())
End

----------- # Female Section
----- @ Sets
Set @Configration = (Select Top 1 Configration From [dbo].[Marriage_challenge] Where CharName_FeMale = @CharName)
Set @CharName_FeMale = (Select Top 1 CharName_Female From [dbo].[Marriage_challenge] Where CharName_Female = @CharName)
Set @CharName_Male = (Select Top 1 CharName_Male From [dbo].[Marriage_challenge] Where CharName_Female = @CharName)
Set @level_Female = (Select Top 1 CurLevel From [SRO_VT_SHARD].[dbo].[_Char] Where CharName16 = @CharName_Female)
Set @Level_Male = (Select Top 1 CurLevel From [SRO_VT_SHARD].[dbo].[_Char] Where CharName16 = @CharName_Male)
Set @ReFCharID = (Select Top 1 RefObjID From [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @CharName_Male)
Set @charsex = case
when @RefCharID <=14887 And @RefCharID >=14875 or @RefCharID<=1919 AND @RefCharID>=1907 then 'Male'
else 'Female' end
Set @targetrefcharid =(Select Top 1 RefObjID From [SRO_VT_SHARD].[dbo].[_Char] Where CharName16 = @CharName_Female)
Set @charsex2 = case
when @targetrefcharid <=14887 And @targetrefcharid >=14875 or @targetrefcharid<=1919 AND @targetrefcharid>=1907 then 'Male'
else 'Female' end
------------- @ Accepted Part
IF (@Chat = 'Yes' And @CharName in (Select CharName_Female From [dbo].[Marriage_challenge]) And @Configration is NULL And @Level_Female >= 120 And @Level_Male >= 120 And @charsex != @charsex2)
Begin
Update [dbo].[Marriage_challenge] Set Configration = 'Yes' where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'She like u , And Accepted Challenge Fun Will be Start Soon ^_^',Getdate())
End
----------- @ error level require Char female
IF (@Chat = 'Yes' And @CharName in (Select CharName_Female From [dbo].[Marriage_challenge]) And @Configration is NULL And @Level_Female < 120)
Begin
Delete From [dbo].[Marriage_challenge] where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'Your Partner Must Be Level 120.',Getdate())
End
----------- @ error level require Char male
IF (@Chat = 'Yes' And @CharName in (Select CharName_Female From [dbo].[Marriage_challenge]) And @Configration is NULL And @Level_Male < 120)
Begin
Delete From [dbo].[Marriage_challenge] where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'You Must Be Level 120 At First To Enjoy This Feature.',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Female,'Your Partner Must Be Level 120.',Getdate())
End
---------- @ error Same Sex
IF (@Chat = 'Yes' And @CharName in (Select CharName_Female From [dbo].[Marriage_challenge]) And @Configration is NULL And @charsex = @charsex2)
Begin
Delete From [dbo].[Marriage_challenge] where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'You Can Not Marry Player With The Same Sex.',Getdate())
End
---------- @ Don't Accepted part
Else IF (@Chat = 'No')
Begin
Delete From [dbo].[Marriage_challenge] where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'She Dont like u try another girl ^_^',Getdate())
End
GO 


[elbattawy1st]

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

USE [ELBATTAWY_SYSTEMS]
GO

/****** Object:  Trigger [dbo].[Marrige]    Script Date: 10/4/2016 11:49:25 PM ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO



-- =============================================
-- Author:		Abdelrhman Elbattawy
-- Create date: <2016 - 10 - 04>
-- Description:	<Marrige System>
-- =============================================


CREATE TRIGGER [dbo].[Marrige] 
ON  [dbo].[_IncomingPrivateChat]
after  insert  
as
/********************************* System Start ********************************/
----------- # Main Declares
DECLARE @CharName        varchar(60)    ,@CharName_Male   varchar(50)          ,@CharName_Female varchar(50)   
       ,@Chat            varchar(MAX)   ,@Configration    varchar(25)          ,@Case            varchar(50)
	   ,@system          varchar(50)    ,@Level_Male      int                  ,@Level_Female    int
	   ,@ReFCharID       int            ,@charsex         varchar(max)         ,@charsex2        varchar(max)
	   ,@targetrefcharid int

Select @CharName=CharName ,@Chat=Chat From _IncomingPrivateChat
----------- # Sets
Set @ReFCharID = (Select Top 1 RefObjID From [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @CharName)
Set @Case = (Select [Case] From [dbo].[Marriage_challenge] where CharName_Male = @CharName)
Set @System = 'Marriage System'
----------- # Male Section
IF (@Chat = @System)
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'Hey u , u wanna marriage ???',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'Pm with char name that the girl u want ^_^',Getdate())  
End
----- @ Part secuss
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And @Case is NULL And Not Exists (Select Top 1 Configration From [dbo].[Marriage_challenge] Where CharName_FeMale = @Chat) And Exists (Select * from [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @Chat) And (@RefCharID <=14887 And @RefCharID >=14875 or @RefCharID<=1919 AND @RefCharID>=1907))
Begin
Insert into [dbo].[Marriage_challenge] (CharName_Male,CharName_Female) Values (@CharName,@Chat)
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@Chat,'This Is CharName ['+@CharName+'] want to marrie u .',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@Chat,'IF u Accept pm with Yes',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@Chat,'IF u Dont Accept pm with No',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'wait until she accpet or Not',Getdate())
End
----- @ Part fail
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And @Case is NULL And Not Exists (Select Top 1 Configration From [dbo].[Marriage_challenge] Where CharName_FeMale = @Chat) And Exists (Select * from [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @Chat) And (@RefCharID<=1932 AND @RefCharID>=1920 OR @RefCharID<=14900 AND @RefCharID>=14888))
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'u are not male only male can do it.',Getdate())
Delete From [dbo].[_IncomingPrivateChat] Where CharName = @CharName
End
----- @ Application Yet
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And @Case is NULL And Exists (Select Top 1 Configration From [dbo].[Marriage_challenge] Where CharName_FeMale = @Chat) And Exists (Select * from [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @Chat))
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'She Have Application For Marrie Not Finish Yet.',Getdate())
End
----- @ Part error char female marrie
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And @Case = 'Married')
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'Already Married.',Getdate())
End

----- @ Part error char female not exists
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And Not Exists (Select * from [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @Chat))
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'There Is No Charname With This Charname.',Getdate())
End

----------- # Female Section
----- @ Sets
Set @Configration = (Select Top 1 Configration From [dbo].[Marriage_challenge] Where CharName_FeMale = @CharName)
Set @CharName_FeMale = (Select Top 1 CharName_Female From [dbo].[Marriage_challenge] Where CharName_Female = @CharName)
Set @CharName_Male = (Select Top 1 CharName_Male From [dbo].[Marriage_challenge] Where CharName_Female = @CharName)
Set @level_Female = (Select Top 1 CurLevel From [SRO_VT_SHARD].[dbo].[_Char] Where CharName16 = @CharName_Female)
Set @Level_Male = (Select Top 1 CurLevel From [SRO_VT_SHARD].[dbo].[_Char] Where CharName16 = @CharName_Male)
Set @ReFCharID = (Select Top 1 RefObjID From [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @CharName_Male)
Set @charsex = case
when @RefCharID <=14887 And @RefCharID >=14875 or @RefCharID<=1919 AND @RefCharID>=1907 then 'Male'
else 'Female' end
Set @targetrefcharid =(Select Top 1 RefObjID From [SRO_VT_SHARD].[dbo].[_Char] Where CharName16 = @CharName_Female)
Set @charsex2 = case
when @targetrefcharid <=14887 And @targetrefcharid >=14875 or @targetrefcharid<=1919 AND @targetrefcharid>=1907 then 'Male'
else 'Female' end
------------- @ Accepted Part
IF (@Chat = 'Yes' And @CharName in (Select CharName_Female From [dbo].[Marriage_challenge]) And @Configration is NULL And @Level_Female >= 120 And @Level_Male >= 120 And @charsex != @charsex2)
Begin
Update [dbo].[Marriage_challenge] Set Configration = 'Yes' where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'She like u , And Accepted Challenge Fun Will be Start Soon ^_^',Getdate())
End
----------- @ error level require Char female
IF (@Chat = 'Yes' And @CharName in (Select CharName_Female From [dbo].[Marriage_challenge]) And @Configration is NULL And @Level_Female < 120)
Begin
Delete From [dbo].[Marriage_challenge] where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'Your Partner Must Be Level 120.',Getdate())
End
----------- @ error level require Char male
IF (@Chat = 'Yes' And @CharName in (Select CharName_Female From [dbo].[Marriage_challenge]) And @Configration is NULL And @Level_Male < 120)
Begin
Delete From [dbo].[Marriage_challenge] where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'You Must Be Level 120 At First To Enjoy This Feature.',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Female,'Your Partner Must Be Level 120.',Getdate())
End
---------- @ error Same Sex
IF (@Chat = 'Yes' And @CharName in (Select CharName_Female From [dbo].[Marriage_challenge]) And @Configration is NULL And @charsex = @charsex2)
Begin
Delete From [dbo].[Marriage_challenge] where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'You Can Not Marry Player With The Same Sex.',Getdate())
End
---------- @ Don't Accepted part
Else IF (@Chat = 'No')
Begin
Delete From [dbo].[Marriage_challenge] where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'She Dont like u try another girl ^_^',Getdate())
End
GO

كود PHP:

USE [ELBATTAWY_SYSTEMS]
GO

/****** Object:  Trigger [dbo].[Marrige]    Script Date: 10/4/2016 11:49:25 PM ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO



-- =============================================
-- Author:        Abdelrhman Elbattawy
-- Create date: <2016 - 10 - 04>
-- Description:    <Marrige System>
-- =============================================


CREATE TRIGGER [dbo].[Marrige] 
ON  [dbo].[_IncomingPrivateChat]
after  insert  
as
/********************************* System Start ********************************/
----------- # Main Declares
DECLARE @CharName        varchar(60)    ,@CharName_Male   varchar(50)          ,@CharName_Female varchar(50)   
       ,@Chat            varchar(MAX)   ,@Configration    varchar(25)          ,@Case            varchar(50)
       ,@system          varchar(50)    ,@Level_Male      int                  ,@Level_Female    int
       ,@ReFCharID       int            ,@charsex         varchar(max)         ,@charsex2        varchar(max)
       ,@targetrefcharid int

Select @CharName=CharName ,@Chat=Chat From _IncomingPrivateChat
----------- # Sets
Set @ReFCharID = (Select Top 1 RefObjID From [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @CharName)
Set @Case = (Select [Case] From [dbo].[Marriage_challenge] where CharName_Male = @CharName)
Set @System = 'Marriage System'
----------- # Male Section
IF (@Chat = @System)
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'Hey u , u wanna marriage ???',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'Pm with char name that the girl u want ^_^',Getdate())  
End
----- @ Part secuss
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And @Case is NULL And Not Exists (Select Top 1 Configration From [dbo].[Marriage_challenge] Where CharName_FeMale = @Chat) And Exists (Select * from [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @Chat) And (@RefCharID <=14887 And @RefCharID >=14875 or @RefCharID<=1919 AND @RefCharID>=1907))
Begin
Insert into [dbo].[Marriage_challenge] (CharName_Male,CharName_Female) Values (@CharName,@Chat)
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@Chat,'This Is CharName ['+@CharName+'] want to marrie u .',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@Chat,'IF u Accept pm with Yes',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@Chat,'IF u Dont Accept pm with No',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'wait until she accpet or Not',Getdate())
End
----- @ Part fail
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And @Case is NULL And Not Exists (Select Top 1 Configration From [dbo].[Marriage_challenge] Where CharName_FeMale = @Chat) And Exists (Select * from [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @Chat) And (@RefCharID<=1932 AND @RefCharID>=1920 OR @RefCharID<=14900 AND @RefCharID>=14888))
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'u are not male only male can do it.',Getdate())
Delete From [dbo].[_IncomingPrivateChat] Where CharName = @CharName
End
----- @ Application Yet
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And @Case is NULL And Exists (Select Top 1 Configration From [dbo].[Marriage_challenge] Where CharName_FeMale = @Chat) And Exists (Select * from [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @Chat))
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'She Have Application For Marrie Not Finish Yet.',Getdate())
End
----- @ Part error char female marrie
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And @Case = 'Married')
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'Already Married.',Getdate())
End

----- @ Part error char female not exists
else IF (@System in (Select Chat From _IncomingPrivateChat where CharName = @CharName) And Not Exists (Select * from [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @Chat))
Begin
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName,'There Is No Charname With This Charname.',Getdate())
End

----------- # Female Section
----- @ Sets
Set @Configration = (Select Top 1 Configration From [dbo].[Marriage_challenge] Where CharName_FeMale = @CharName)
Set @CharName_FeMale = (Select Top 1 CharName_Female From [dbo].[Marriage_challenge] Where CharName_Female = @CharName)
Set @CharName_Male = (Select Top 1 CharName_Male From [dbo].[Marriage_challenge] Where CharName_Female = @CharName)
Set @level_Female = (Select Top 1 CurLevel From [SRO_VT_SHARD].[dbo].[_Char] Where CharName16 = @CharName_Female)
Set @Level_Male = (Select Top 1 CurLevel From [SRO_VT_SHARD].[dbo].[_Char] Where CharName16 = @CharName_Male)
Set @ReFCharID = (Select Top 1 RefObjID From [SRO_VT_SHARD].[dbo].[_char] where CharName16 = @CharName_Male)
Set @charsex = case
when @RefCharID <=14887 And @RefCharID >=14875 or @RefCharID<=1919 AND @RefCharID>=1907 then 'Male'
else 'Female' end
Set @targetrefcharid =(Select Top 1 RefObjID From [SRO_VT_SHARD].[dbo].[_Char] Where CharName16 = @CharName_Female)
Set @charsex2 = case
when @targetrefcharid <=14887 And @targetrefcharid >=14875 or @targetrefcharid<=1919 AND @targetrefcharid>=1907 then 'Male'
else 'Female' end
------------- @ Accepted Part
IF (@Chat = 'Yes' And @CharName in (Select CharName_Female From [dbo].[Marriage_challenge]) And @Configration is NULL And @Level_Female >= 110 And @Level_Male >= 110 And @charsex != @charsex2)
Begin
Update [dbo].[Marriage_challenge] Set Configration = 'Yes' where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'She like u , And Accepted Challenge Fun Will be Start Soon ^_^',Getdate())
End
----------- @ error level require Char female
IF (@Chat = 'Yes' And @CharName in (Select CharName_Female From [dbo].[Marriage_challenge]) And @Configration is NULL And @Level_Female < 110)
Begin
Delete From [dbo].[Marriage_challenge] where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'Your Partner Must Be Level 110.',Getdate())
End
----------- @ error level require Char male
IF (@Chat = 'Yes' And @CharName in (Select CharName_Female From [dbo].[Marriage_challenge]) And @Configration is NULL And @Level_Male < 110)
Begin
Delete From [dbo].[Marriage_challenge] where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'You Must Be Level 110 At First To Enjoy This Feature.',Getdate())
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Female,'Your Partner Must Be Level 110.',Getdate())
End
---------- @ error Same Sex
IF (@Chat = 'Yes' And @CharName in (Select CharName_Female From [dbo].[Marriage_challenge]) And @Configration is NULL And @charsex = @charsex2)
Begin
Delete From [dbo].[Marriage_challenge] where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'You Can Not Marry Player With The Same Sex.',Getdate())
End
---------- @ Don't Accepted part
Else IF (@Chat = 'No')
Begin
Delete From [dbo].[Marriage_challenge] where CharName_Female = @CharName
Insert Into [dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@CharName_Male,'She Dont like u try another girl ^_^',Getdate())
End
GO