Auto Event 'Ask And Questions' On Vsro Multi Tool

[Dangers SrO]

http://upload.wikimedia.org/wikipedia/ar/c/c6/%D8%A8%D8%B3%D9%85_%D8%A7%D9%84%D9%84%D9%87_%D8%A7 %D9%84%D8%B1%D8%AD%D9%85%D9%86_%D8%A7%D9%84%D8%B1% D8%AD%D9%8A%D9%85.png
أولاً ،، لازم تنزل البرنامج دا وتسطب الجداول بتاعته عندك بإسم أي داتا بيز تختارها ،،
Here (http://www.silkroad4arab.com/vb/showthread.php?t=599404)
بعد كدا هضيف الجدول ده والبروسيدور برضه في الداتا اللي انتا عملها للبرنامج

USE [DANGERSS]
GO

/****** Object: Table [dbo].[_AutomaticTrivia_Questions] Script Date: 7/4/2016 10:13:55 PM ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

SET ANSI_PADDING ON
GO

CREATE TABLE [dbo].[_AutomaticTrivia_Questions](
[Service] [int] NULL,
[Question] [varchar](max) NULL,
[Answer] [varchar](300) NULL
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]

GO

SET ANSI_PADDING OFF
GO



CREATE TRIGGER
USE [DANGERSS]
GO

/****** Object: Trigger [dbo].[Trivia] Script Date: 7/4/2016 10:15:38 PM ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO


CREATE TRIGGER [dbo].[Trivia]
ON [dbo].[_IncomingPrivateChat]
after insert
as
-----------------------------------------------------------------------------------------------------
DECLARE @SenderName varchar(60) , @Message varchar(MAX)
BEGIN
Select @SenderName=CharName ,@Message =Chat From DANGERSS.._IncomingPrivateChat
/***************************************** Start System ************************************************** *************/
--================================================== =================
--------------------------------------/CREATE By Danger/-------------
--================================================== =================
IF @Message like '%'
Begin
EXEC [DANGERSS].[dbo].[_AutomaticTriviaEvent_2] @SenderName,@Message
end
end

GO



Procedure

USE [DANGERSS]
GO

/****** Object: StoredProcedure [dbo].[_AutomaticTriviaEvent_1] Script Date: 7/4/2016 10:20:24 PM ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO
/***************************************** Start System ************************************************** *************/
--================================================== =================
--------------------------------------/CREATE By Danger/-------------
--================================================== =================

CREATE Procedure [dbo].[_AutomaticTriviaEvent_1]
as
BEGIN
DECLARE @Question Varchar (max)
select Top 1 @Question=[Question] from _AutomaticTrivia_Questions order by newid()
update _AutomaticTrivia_Questions set [service]=1 where Question=@Question
insert into DANGERSS..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice','Automatic trivia event has started.[To answer PM [BOT] with Trivia:Answer]',GETDATE())
insert into DANGERSS..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice',@Question,GETDATE())
IF (SELECT SERVICE FROM _AutomaticTrivia_Questions where question=@Question) = 1
BEGIN
insert into DANGERSS..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice','Automatic trivia event has started without winners',GETDATE())
update _AutomaticTrivia_Questions set [Service]=0 where [Service]=1
END
END
GO



--
USE [DANGERSS]
GO

/****** Object: StoredProcedure [dbo].[_AutomaticTriviaEvent_2] Script Date: 7/4/2016 10:21:08 PM ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

/***************************************** Start System ************************************************** *************/
--================================================== =================
--------------------------------------/CREATE By Danger/-------------
--================================================== =================


CREATE Procedure [dbo].[_AutomaticTriviaEvent_2]
@SenderName VARCHAR(255),
@Message VARCHAR(255)
as
BEGIN
DECLARE @Answer Varchar(max) = (Select Answer from DANGERSS.dbo._AutomaticTrivia_Questions where [Service]='1')
DECLARE @CharID INT,@WinnerJID INT,@WinnerID INT,@Silk_Own INT,@Reward INT ,@RewardType int,@RewardCodeName int,@CharName int,@RewardCount int,@Reward2 Varchar(Max)
select @CharID=[CharID] from SRO_VT_SHARD.dbo._Char where CharName16 = @SenderNAme
select @WinnerJID=[UserJID] from SRO_VT_SHARD.dbo._User where CharID = @CharID
select @Silk_Own=[silk_own] from SRO_VT_ACCOUNT.dbo.SK_Silk where JID = @WinnerJID

select @Reward2= 10
select @Reward= 10

If (@Message=@Answer)
BEGIN
insert into DANGERSS..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice',''+@SenderName+' has written '+@Answer+' and won this round.',GETDATE())
Update SRO_VT_ACCOUNT.dbo.SK_Silk SET silk_own = @Silk_Own + @Reward where JID = @WinnerJID
insert into DANGERSS..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice','Automatic Trivia Event has ended.',GETDATE())
insert into DANGERSS..iLegend_Tool (Service,Type,target,Message,Date) values ('1','Private',@SenderName,'Congratulations, you won in the event and received '+@Reward2+' silks as reward.',GETDATE())

Exec [SRO_VT_SHARD].[dbo].[_ADD_ITEM_EXTERN] @CharName,'ITEM_ETC_ARENA_COIN',@RewardCount,'100'
End


END

GO



انا عامل الافينت ال Reward بتاعو بيدي 10 Silk و 100 Arena Coin لو انتا عايز تغيرو حاجه ترجعلك
-----------
في الأخر ناقص انك تدخل اكونت معاه قنصول وتدخل في Execute Schedule Tab وتعلم على Active Service

واللي هتعملو هتعدل في الوقت وتشوف اللي يناسبك في جدول
[dbo].[ExecQuery]
واللي ميعرفش انتا هتعمل كده في الجدول

Execute NameYourDatabeas..nameevent
Vedio بتشغيل الافينت
sz-05yglQ3A&feature[/QUOTE]
تحياتي الحاره

[Hamza FiGo]

ماشي يا عم متشكرين :kissing:

[Dangers SrO]

ماشي يا عم متشكرين :kissing:

حبيبي يا حمزا تشكر واستنا بس في 4 او 5 تاني هينزلو شويه بشويه :)
:111 (15):

[Dev.LumiusCux]

شكرا بس هتسيب المجال ليه ؟

[Howdare]

جميل بس مش فاهم .. انا هجرب بس لو كان فيه فيديو كان يبقى عداك العيب وازح :jump::icon5:

[Last_Fiddler]

على فكره البرنامج اتوقف مبقاش شغال

[Dangers SrO]

شكرا بس هتسيب المجال ليه ؟

المجال بقي كلو زي ما بتقولو اطفال
طبعاً ده مش للكل بس الاكتريه اطفال

[Dangers SrO]

جميل بس مش فاهم .. انا هجرب بس لو كان فيه فيديو كان يبقى عداك العيب وازح :jump::icon5:

الفيديو موجود بلفعل يا باشا وتقدر تجربو عادي
Good luck

[Dangers SrO]

على فكره البرنامج اتوقف مبقاش شغال

انتا كل حاجه لازم تحط التاتش بتاعك فيها :yeahright:
بهظر طبعاً البرنامج شغال ولو مش شغال هنزل انا افين عليه ليه
ولو كمان مش شغال معاك يبقي ده عيب منك مش من البرنامج
:sad2:

[Dev.BigBear]

تسلم ياقلبى
:pile:

[elbattawy1st]

عاااا عاش يامعلم ^_^
بس في كذا حاجه كدا
بص يامعلم كدا انا لازم ابعت الكلمه دي % علشان الايفينت يشتغل دي مشكله انت ممكن تعملو من تابل exce افضل و يكون بوقت علشان يشتغل اوتوماتك هيكون افضل
تاني حاجه زود في البروسيدور الا يجاوب مره و كانت غلط مايجوبش تاني
كدا هيكون السيستم شغال 100 %
و تسلم يامعلم علي مجهودك الجامد دا ^_^

[Dangers SrO]

تسلم ياقلبى
:pile:
حبيبي
عاااا عاش يامعلم ^_^
بس في كذا حاجه كدا
بص يامعلم كدا انا لازم ابعت الكلمه دي % علشان الايفينت يشتغل دي مشكله انت ممكن تعملو من تابل exce افضل و يكون بوقت علشان يشتغل اوتوماتك هيكون افضل
تاني حاجه زود في البروسيدور الا يجاوب مره و كانت غلط مايجوبش تاني
كدا هيكون السيستم شغال 100 %
و تسلم يامعلم علي مجهودك الجامد دا ^_^

لا يا عبدو مش لازم تكتب الكلمه دي % علشان الافينت يشتغل
انا فعلاتن عملو execute في بوقت محدد وشغال تمام auto
ممكن فعلاً اللي يكون ناقص ان اللي يجاوب غلط البوت يرد عليه
هعملها واعدل في الموضوع :shifty:

[Dev.LumiusCux]

عاااا عاش يامعلم ^_^
بس في كذا حاجه كدا
بص يامعلم كدا انا لازم ابعت الكلمه دي % علشان الايفينت يشتغل دي مشكله انت ممكن تعملو من تابل exce افضل و يكون بوقت علشان يشتغل اوتوماتك هيكون افضل
تاني حاجه زود في البروسيدور الا يجاوب مره و كانت غلط مايجوبش تاني
كدا هيكون السيستم شغال 100 %
و تسلم يامعلم علي مجهودك الجامد دا ^_^

حتيت جاوب مرع غلط و مبجوبش تاني دي وحشه تقبل مروري اديلو فرصه تانيه

[Dangers SrO]

حتيت جاوب مرع غلط و مبجوبش تاني دي وحشه تقبل مروري اديلو فرصه تانيه

ممكن توضح شويه مش فاهم تقصد ايه

[Dev.LumiusCux]

ممكن توضح شويه مش فاهم تقصد ايهمحمد بيقول ان لو حد جاوب غلط مره ميجوبش تاني انا بقول هتبثا وحشه نديلو فرصه تانيه

[Dangers SrO]

تمام كلامك

[omar hapshy]

يا ريت تبعت ال كلام الي حيكتب في [dbo].[ExecQuery] ويكون الربط اني ححط كذا سوال ويبقي الفرق دقيقة ما بين كل واحد مثلا و الايفنت في غلطة انا ممكن اكتب الاجابة من غير ما يسئل اصلا ويديني الهدية يا ريت توقفهاا

[Dev. iLegend]

يا ريت تبعت ال كلام الي حيكتب في [dbo].[ExecQuery] ويكون الربط اني ححط كذا سوال ويبقي الفرق دقيقة ما بين كل واحد مثلا و الايفنت في غلطة انا ممكن اكتب الاجابة من غير ما يسئل اصلا ويديني الهدية يا ريت توقفهاا


هي سهل انك تحددله الوقت في التريجر قبل ميعمل check answer ،،
بس ازاي هيعرف الإجابة ويكلم البوت وياخد الريوارد من غير ميعرف السؤال ؟
هينجم مثلاً ؟

وعموماً لصاحب الموضوع ،، البرنامج مش بيعمل insert بكيوري من البرنامج
الشات بيتسجل من خلال بروسيدور هو اللي بيعمل انسيرت ،،
فا تقدر تشتغل ع البروسيدور دا بدل متعمل تريجر ع الجدول

ع العموم شغل تمام ،، تسلم إيدك

[omar hapshy]

هي سهل انك تحددله الوقت في التريجر قبل ميعمل check answer ،،
بس ازاي هيعرف الإجابة ويكلم البوت وياخد الريوارد من غير ميعرف السؤال ؟
هينجم مثلاً ؟

وعموماً لصاحب الموضوع ،، البرنامج مش بيعمل insert بكيوري من البرنامج
الشات بيتسجل من خلال بروسيدور هو اللي بيعمل انسيرت ،،
فا تقدر تشتغل ع البروسيدور دا بدل متعمل تريجر ع الجدول

ع العموم شغل تمام ،، تسلم إيدك
منا معاك بس في مشكله انو مش اوتومتك لزم يتعمل اوتومتك وبوقت . النقطه الثانيه. حضرتك بتقول ازاي يعرف الاجابه مهو اكيد الاسئله حتكرر وحتتعرف الاجابه مثلا انا جربت ابعت للاكونت الي مسمي بوت او اي حاجه مثلا . مش وقت الايفنت ولا اي حاجه واجي اكتب اجابه السوال للبوت يعني الاكونت المفتوح . يديني السيلك والجايزة وهو اصلا مفيش وقت للايفنت ولا حتي سئلت سوال وبكدة يكسب ف يا ريت حل.

[kareem5656]

ممكن بعد اذنك تحطلنا الاسئلة والاجابات بتاعتها هنا هاتفيدنا فى السيرفرات ^^

[Dangers SrO]

منا معاك بس في مشكله انو مش اوتومتك لزم يتعمل اوتومتك وبوقت . النقطه الثانيه. حضرتك بتقول ازاي يعرف الاجابه مهو اكيد الاسئله حتكرر وحتتعرف الاجابه مثلا انا جربت ابعت للاكونت الي مسمي بوت او اي حاجه مثلا . مش وقت الايفنت ولا اي حاجه واجي اكتب اجابه السوال للبوت يعني الاكونت المفتوح . يديني السيلك والجايزة وهو اصلا مفيش وقت للايفنت ولا حتي سئلت سوال وبكدة يكسب ف يا ريت حل.
مع احترامي انتا مش فاهم هو ماشي ازاي
بس بص انتا هتعمل السوال والاجابه اللي انتا عيزها وهتعملها 0
وبكده لو هو عارف السول وجاوب مش هيرد عليه وله هياخد حاجه
[dbo].[ExecQuery]
ده بنسبه للوقت اللي انتا عيزو
انتا اقراء الموضوع وانتا هتفهم
انتا تقدر تعملو بوقت اللي انتا عيزو في الساعه اللي انتا عيزها ومش هيشتغل غير لما وقت الافينت بس

[Dangers SrO]

هي سهل انك تحددله الوقت في التريجر قبل ميعمل check answer ،،
بس ازاي هيعرف الإجابة ويكلم البوت وياخد الريوارد من غير ميعرف السؤال ؟
هينجم مثلاً ؟

وعموماً لصاحب الموضوع ،، البرنامج مش بيعمل insert بكيوري من البرنامج
الشات بيتسجل من خلال بروسيدور هو اللي بيعمل انسيرت ،،
فا تقدر تشتغل ع البروسيدور دا بدل متعمل تريجر ع الجدول

ع العموم شغل تمام ،، تسلم إيدك

تمام يا رامي احنا نتعلم منك برضو :lulu13:

[Dangers SrO]

ممكن بعد اذنك تحطلنا الاسئلة والاجابات بتاعتها هنا هاتفيدنا فى السيرفرات ^^

دي علي حسب اللي انتا عيزو وانتا ومزاجك في سرفرك لازم تعمل حاجه جديده مش
Copy and past وخلاص

[kareem5656]

دي علي حسب اللي انتا عيزو وانتا ومزاجك في سرفرك لازم تعمل حاجه جديده مش
Copy and past وخلاص

ماهو انا محتاج اللى موجود دلوقتى وانا هاضيف عليه او اغيره لو مافيهاش مضايقة معلش

[Last_Fiddler]

انتا كل حاجه لازم تحط التاتش بتاعك فيها :yeahright:
بهظر طبعاً البرنامج شغال ولو مش شغال هنزل انا افين عليه ليه
ولو كمان مش شغال معاك يبقي ده عيب منك مش من البرنامج
:sad2:

كان فعلن مش شغال عندى بس شغلته :harp:
تسلم ايدك

[BLACK X™]

ماشي علي راحتك !!!

[omar hapshy]

مع احترامي انتا مش فاهم هو ماشي ازاي
بس بص انتا هتعمل السوال والاجابه اللي انتا عيزها وهتعملها 0
وبكده لو هو عارف السول وجاوب مش هيرد عليه وله هياخد حاجه
[dbo].[ExecQuery]
ده بنسبه للوقت اللي انتا عيزو
انتا اقراء الموضوع وانتا هتفهم
انتا تقدر تعملو بوقت اللي انتا عيزو في الساعه اللي انتا عيزها ومش هيشتغل غير لما وقت الافينت بس

تمام هية علشان كانت ال 0 هيه السبب علشان كنت بعملها 1 . النقطة الثانية انا مش عارف احط الوقت في [dbo].[ExecQuery] ف ممكن تبعتي كل الايفنت وانا حعدل ع الوقت

[omar hapshy]

Up ��

[Dangers SrO]

تمام هية علشان كانت ال 0 هيه السبب علشان كنت بعملها 1 . النقطة الثانية انا مش عارف احط الوقت في [dbo].[ExecQuery] ف ممكن تبعتي كل الايفنت وانا حعدل ع الوقت
اتفضل اهو غير بقي للوقت اللي انتا عيزوو
1 00:00:00 Exec [dbo].[_AutomaticTriviaEvent_1]

[omar hapshy]

اتفضل اهو غير بقي للوقت اللي انتا عيزوو
1 00:00:00 Exec [dbo].[_AutomaticTriviaEvent_1]
بص كدة .http://www.3rbz.com/uploads/3f66bd83edf31.png
مش بيجاوب بقي .وانا عاوز قبلها نوتك تحظرهم ازاي
الصورة لو مش وضحة رابط مباشر http://www.3rbz.com/uploads/3f66bd83edf31.png

[Dangers SrO]

علشان تعمل Notice


1 00:00:00 Exec [dbo].[_AutomaticTriviaEvent_1] 1,'Automatic You Name Event Start After 00 minutes.',Null -- notice 1
1 00:00:00 Exec [dbo].[_AutomaticTriviaEvent_1] 1,'Automatic Has Been End.',Null -- notice 1

[firytail]

على فكره انا حولت اشغله اكثر من مره على الفرجين الجديد بس مش شغال بيجبلى ايرورر فى البرنامج

[omar hapshy]

علشان تعمل Notice


1 00:00:00 Exec [dbo].[_AutomaticTriviaEvent_1] 1,'Automatic You Name Event Start After 00 minutes.',Null -- notice 1
1 00:00:00 Exec [dbo].[_AutomaticTriviaEvent_1] 1,'Automatic Has Been End.',Null -- notice 1


مش شغال خالص .وب الرغم ان كل حاجه مظبوطه .ما تعملنا اسكرين او فديو لطريقة تشغيلو بس من SQL والبرنامج من عندك للايفنت :lulu13:

[Dev.BigBear]

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

[omar hapshy]

ارجو مراجعه الموضوع ب اكملو لانه لا يعمل كاملا .:111 (21):

[Mostafa Mosaad]

برنس :thumbsup:

[elbattawy1st]

الناس الا عندها مشاكل و الايفنت مش شغال عندهم اعمل البروسيدور الاتنين دول و هيشتغل معاكم من غير مشاكل
USE [DANGERSS]
GO

/****** Object: StoredProcedure [dbo].[_AutomaticTriviaEvent_1] Script Date: 7/4/2016 10:20:24 PM ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO
/***************************************** Start System ************************************************** *************/
--================================================== =================
--------------------------------------/CREATE By Danger/-------------
--================================================== =================

CREATE Procedure [dbo].[_AutomaticTriviaEvent_1]
as
BEGIN
DECLARE @Question Varchar (max)
select Top 1 @Question=[Question] from _AutomaticTrivia_Questions order by newid()
update _AutomaticTrivia_Questions set [service]=1 where Question=@Question
insert into DANGERSS..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice','Automatic trivia event has started.[To answer PM [BOT] with Trivia:Answer]',GETDATE())
insert into DANGERSS..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice',@Question,GETDATE())
IF (SELECT SERVICE FROM _AutomaticTrivia_Questions where question=@Question) = 1
BEGIN
insert into DANGERSS..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice','Automatic trivia event has started without winners',GETDATE())
END
END
GO

************************************************** *********

USE [DANGERSS]
GO

/****** Object: StoredProcedure [dbo].[_AutomaticTriviaEvent_2] Script Date: 7/4/2016 10:21:08 PM ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

/***************************************** Start System ************************************************** *************/
--================================================== =================
--------------------------------------/CREATE By Danger/-------------
--================================================== =================


CREATE Procedure [dbo].[_AutomaticTriviaEvent_2]
@SenderName VARCHAR(255),
@Message VARCHAR(255)
as
BEGIN
DECLARE @Answer Varchar(max) = (Select Answer from DANGERSS.dbo._AutomaticTrivia_Questions where [Service]='1')
DECLARE @CharID INT,@WinnerJID INT,@WinnerID INT,@Silk_Own INT,@Reward INT ,@RewardType int,@RewardCodeName int,@CharName int,@RewardCount int,@Reward2 Varchar(Max)
select @CharID=[CharID] from SRO_VT_SHARD.dbo._Char where CharName16 = @SenderNAme
select @WinnerJID=[UserJID] from SRO_VT_SHARD.dbo._User where CharID = @CharID
select @Silk_Own=[silk_own] from SRO_VT_ACCOUNT.dbo.SK_Silk where JID = @WinnerJID

select @Reward2= 10
select @Reward= 10

If (@Message=@Answer)
BEGIN
insert into DANGERSS..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice',''+@SenderName+' has written '+@Answer+' and won this round.',GETDATE())
Update SRO_VT_ACCOUNT.dbo.SK_Silk SET silk_own = @Silk_Own + @Reward where JID = @WinnerJID
insert into DANGERSS..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice','Automatic Trivia Event has ended.',GETDATE())
insert into DANGERSS..iLegend_Tool (Service,Type,target,Message,Date) values ('1','Private',@SenderName,'Congratulations, you won in the event and received '+@Reward2+' silks as reward.',GETDATE())
update _AutomaticTrivia_Questions set [Service]=0 where [Service]=1

Exec [SRO_VT_SHARD].[dbo].[_ADD_ITEM_EXTERN] @CharName,'ITEM_ETC_ARENA_COIN',@RewardCount,'100'
End


END

GO

[keshk2007]

عندى مشكلة

السيستم شغال زى الفل

بس لما برد على الاكونت بالاجابة مش بيحصل اى حاجة خالص
و بيظهر فى البرنامج

Error 03 please report it to the developer

USE [SRO_VT_SHARDLOG]
GO

/****** Object: StoredProcedure [dbo].[_AutomaticTriviaEvent_2] Script Date: 7/4/2016 10:21:08 PM ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

/***************************************** Start System ************************************************** *************/
--================================================== =================
--------------------------------------/CREATE By Danger/-------------
--================================================== =================


CREATE Procedure [dbo].[_AutomaticTriviaEvent_2]
@SenderName VARCHAR(255),
@Message VARCHAR(255)
as
BEGIN
DECLARE @Answer Varchar(max) = (Select Answer from SRO_VT_SHARDLOG.dbo._AutomaticTrivia_Questions where [Service]='1')
DECLARE @CharID INT,@WinnerJID INT,@WinnerID INT,@Silk_Own INT,@Reward INT ,@RewardType int,@RewardCodeName int,@CharName int,@RewardCount int,@Reward2 Varchar(Max)
select @CharID=[CharID] from SRO_VT_SHARD.dbo._Char where CharName16 = @SenderNAme
select @WinnerJID=[UserJID] from SRO_VT_SHARD.dbo._User where CharID = @CharID
select @Silk_Own=[silk_own] from SRO_VT_ACCOUNT.dbo.SK_Silk where JID = @WinnerJID

select @Reward2= 10
select @Reward= 10

If (@Message=@Answer)
BEGIN
insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice',''+@SenderName+' has written '+@Answer+' and won this round.',GETDATE())
Update SRO_VT_ACCOUNT.dbo.SK_Silk SET silk_own = @Silk_Own + @Reward where JID = @WinnerJID
insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice','Automatic Trivia Event has ended.',GETDATE())
insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,target,Message,Date) values ('1','Private',@SenderName,'Congratulations, you won in the event and received '+@Reward2+' silks as reward.',GETDATE())
update _AutomaticTrivia_Questions set [Service]=0 where [Service]=1

Exec [SRO_VT_SHARD].[dbo].[_ADD_ITEM_EXTERN] @SenderName,'ITEM_ETC_ARENA_COIN','10',0
End


END

GO


USE [SRO_VT_SHARDLOG]
GO

/****** Object: StoredProcedure [dbo].[_AutomaticTriviaEvent_2] Script Date: 7/4/2016 10:21:08 PM ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

/***************************************** Start System ************************************************** *************/
--================================================== =================
--------------------------------------/CREATE By Danger/-------------
--================================================== =================


CREATE Procedure [dbo].[_AutomaticTriviaEvent_2]
@SenderName VARCHAR(255),
@Message VARCHAR(255)
as
BEGIN
DECLARE @Answer Varchar(max) = (Select Answer from SRO_VT_SHARDLOG.dbo._AutomaticTrivia_Questions where [Service]='1')
DECLARE @CharID INT,@WinnerJID INT,@WinnerID INT,@Silk_Own INT,@Reward INT ,@RewardType int,@RewardCodeName int,@CharName int,@RewardCount int,@Reward2 Varchar(Max)
select @CharID=[CharID] from SRO_VT_SHARD.dbo._Char where CharName16 = @SenderNAme
select @WinnerJID=[UserJID] from SRO_VT_SHARD.dbo._User where CharID = @CharID
select @Silk_Own=[silk_own] from SRO_VT_ACCOUNT.dbo.SK_Silk where JID = @WinnerJID

select @Reward2= 10
select @Reward= 10

If (@Message=@Answer)
BEGIN
insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice',''+@SenderName+' has written '+@Answer+' and won this round.',GETDATE())
Update SRO_VT_ACCOUNT.dbo.SK_Silk SET silk_own = @Silk_Own + @Reward where JID = @WinnerJID
insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,Message,Date) values ('1','Notice','Automatic Trivia Event has ended.',GETDATE())
insert into SRO_VT_SHARDLOG..iLegend_Tool (Service,Type,target,Message,Date) values ('1','Private',@SenderName,'Congratulations, you won in the event and received '+@Reward2+' silks as reward.',GETDATE())
update _AutomaticTrivia_Questions set [Service]=0 where [Service]=1

Exec [SRO_VT_SHARD].[dbo].[_ADD_ITEM_EXTERN] @SenderName,'ITEM_ETC_ARENA_COIN','10',0
End


END

GO

[افندينا ™Hamboka™]

تسلم

[eslamsaied]

طيب انا ضيفت كل حاجه وعدلت علي اسم الداتا بيز في البروسيدجر وكل حاجه
وظبط اليعاد بتاع السيستم وظهر في VsroMultiTool
https://gulfupload.com/do.php?img=41896
وصورة اهي من البرنامج :111 (13):
https://gulfupload.com/do.php?img=41640

[axel007]

محتاج لينك البرنامج لو شغال لسه ممكن