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

الموقع العربي الاول للعبة Silkroad Online (https://silkroad4arab.com/vb/index.php)
-   قسم الحماية والاوتوايفنت للسيرفرات الخاصه (https://silkroad4arab.com/vb/forumdisplay.php?f=323)
-   -   Auto Event 'Ask And Questions' On Vsro Multi Tool (https://silkroad4arab.com/vb/showthread.php?t=603054)

Dangers SrO 05-07-2016 12:23 AM

Auto Event 'Ask And Questions' On Vsro Multi Tool
 
http://upload.wikimedia.org/wikipedi...9%8A%D9%85.png
أولاً ،، لازم تنزل البرنامج دا وتسطب الجداول بتاعته عندك بإسم أي داتا بيز تختارها ،،
Here
بعد كدا هضيف الجدول ده والبروسيدور برضه في الداتا اللي انتا عملها للبرنامج

كود PHP:

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] [intNULL,
    [
Question] [varchar](maxNULL,
    [
Answer] [varchar](300NULL
ON [PRIMARYTEXTIMAGE_ON [PRIMARY]

GO

SET ANSI_PADDING OFF
GO 

CREATE TRIGGER
كود PHP:

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

كود PHP:

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=[Questionfrom _AutomaticTrivia_Questions order by newid()
update _AutomaticTrivia_Questions set [service]=1 where Question=@Question
insert into  DANGERSS
..iLegend_Tool (Service,Type,Message,Datevalues ('1','Notice','Automatic trivia event has started.[To answer PM [BOT] with Trivia:Answer]',GETDATE())
insert into  DANGERSS..iLegend_Tool (Service,Type,Message,Datevalues ('1','Notice',@Question,GETDATE())
IF (
SELECT SERVICE FROM _AutomaticTrivia_Questions where question=@Question) = 1
BEGIN
insert into DANGERSS
..iLegend_Tool (Service,Type,Message,Datevalues ('1','Notice','Automatic trivia event has started without winners',GETDATE())
update _AutomaticTrivia_Questions set [Service]=0 where [Service]=1
END
END
GO 

--
كود PHP:

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=[CharIDfrom SRO_VT_SHARD.dbo._Char where CharName16 = @SenderNAme
select 
@WinnerJID=[UserJIDfrom SRO_VT_SHARD.dbo._User where CharID = @CharID
select 
@Silk_Own=[silk_ownfrom SRO_VT_ACCOUNT.dbo.SK_Silk where JID = @WinnerJID
 
   select 
@Reward210
select 
@Reward10

If (@Message=@Answer)
BEGIN
insert into DANGERSS
..iLegend_Tool (Service,Type,Message,Datevalues ('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,Datevalues ('1','Notice','Automatic Trivia Event has ended.',GETDATE())
insert into DANGERSS..iLegend_Tool (Service,Type,target,Message,Datevalues ('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 بتشغيل الافينت
[YOUTUBE]sz-05yglQ3A&feature[/YOUTUBE]
[/QUOTE]
تحياتي الحاره

Hamza FiGo 05-07-2016 03:57 AM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
ماشي يا عم متشكرين :kissing:

Dangers SrO 05-07-2016 04:05 AM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Hamza FiGo (المشاركة 5271026)
ماشي يا عم متشكرين :kissing:

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

Dev.LumiusCux 05-07-2016 02:25 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
شكرا بس هتسيب المجال ليه ؟

Howdare 05-07-2016 04:32 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
جميل بس مش فاهم .. انا هجرب بس لو كان فيه فيديو كان يبقى عداك العيب وازح :jump::icon5:

Last_Fiddler 05-07-2016 05:15 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
على فكره البرنامج اتوقف مبقاش شغال

Dangers SrO 05-07-2016 07:36 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Abdelazizomar (المشاركة 5271061)
شكرا بس هتسيب المجال ليه ؟

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

Dangers SrO 05-07-2016 07:37 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Howdare (المشاركة 5271067)
جميل بس مش فاهم .. انا هجرب بس لو كان فيه فيديو كان يبقى عداك العيب وازح :jump::icon5:

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

Dangers SrO 05-07-2016 07:39 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Last_Fiddler (المشاركة 5271068)
على فكره البرنامج اتوقف مبقاش شغال

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

Dev.BigBear 05-07-2016 07:49 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
تسلم ياقلبى
:pile:

elbattawy1st 06-07-2016 09:21 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
عاااا عاش يامعلم ^_^
بس في كذا حاجه كدا
بص يامعلم كدا انا لازم ابعت الكلمه دي % علشان الايفينت يشتغل دي مشكله انت ممكن تعملو من تابل exce افضل و يكون بوقت علشان يشتغل اوتوماتك هيكون افضل
تاني حاجه زود في البروسيدور الا يجاوب مره و كانت غلط مايجوبش تاني
كدا هيكون السيستم شغال 100 %
و تسلم يامعلم علي مجهودك الجامد دا ^_^

Dangers SrO 07-07-2016 04:24 AM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة MrMisoBear (المشاركة 5271079)
تسلم ياقلبى
:pile:

حبيبي
اقتباس:

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

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

Dev.LumiusCux 07-07-2016 02:14 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

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

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

Dangers SrO 08-07-2016 10:32 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Abdelazizomar (المشاركة 5271292)
حتيت جاوب مرع غلط و مبجوبش تاني دي وحشه تقبل مروري اديلو فرصه تانيه

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

Dev.LumiusCux 08-07-2016 11:44 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Dangers SrO (المشاركة 5271400)
ممكن توضح شويه مش فاهم تقصد ايه

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

Dangers SrO 11-07-2016 10:28 AM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
تمام كلامك

omar hapshy 01-08-2016 02:14 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
يا ريت تبعت ال كلام الي حيكتب في [dbo].[ExecQuery] ويكون الربط اني ححط كذا سوال ويبقي الفرق دقيقة ما بين كل واحد مثلا و الايفنت في غلطة انا ممكن اكتب الاجابة من غير ما يسئل اصلا ويديني الهدية يا ريت توقفهاا

Dev. iLegend 01-08-2016 03:28 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

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


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

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

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

omar hapshy 01-08-2016 07:30 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Dev. iLegend (المشاركة 5273849)
هي سهل انك تحددله الوقت في التريجر قبل ميعمل check answer ،،
بس ازاي هيعرف الإجابة ويكلم البوت وياخد الريوارد من غير ميعرف السؤال ؟
هينجم مثلاً ؟

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

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

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

kareem5656 02-08-2016 12:36 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
ممكن بعد اذنك تحطلنا الاسئلة والاجابات بتاعتها هنا هاتفيدنا فى السيرفرات ^^

Dangers SrO 02-08-2016 02:15 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة omar hapshy (المشاركة 5273868)

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

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

Dangers SrO 02-08-2016 02:16 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Dev. iLegend (المشاركة 5273849)
هي سهل انك تحددله الوقت في التريجر قبل ميعمل check answer ،،
بس ازاي هيعرف الإجابة ويكلم البوت وياخد الريوارد من غير ميعرف السؤال ؟
هينجم مثلاً ؟

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

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

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

Dangers SrO 02-08-2016 02:18 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة kareem5656 (المشاركة 5273959)
ممكن بعد اذنك تحطلنا الاسئلة والاجابات بتاعتها هنا هاتفيدنا فى السيرفرات ^^

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

kareem5656 02-08-2016 02:39 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Dangers SrO (المشاركة 5273966)
دي علي حسب اللي انتا عيزو وانتا ومزاجك في سرفرك لازم تعمل حاجه جديده مش
Copy and past وخلاص

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

Last_Fiddler 02-08-2016 07:50 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Dangers SrO (المشاركة 5271078)
انتا كل حاجه لازم تحط التاتش بتاعك فيها :yeahright:
بهظر طبعاً البرنامج شغال ولو مش شغال هنزل انا افين عليه ليه
ولو كمان مش شغال معاك يبقي ده عيب منك مش من البرنامج
:sad2:

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

BLACK X™ 02-08-2016 09:04 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
ماشي علي راحتك !!!

omar hapshy 03-08-2016 03:53 AM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

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

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

omar hapshy 04-08-2016 09:10 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
Up ��

Dangers SrO 09-08-2016 05:09 AM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة omar hapshy (المشاركة 5274029)


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

اتفضل اهو غير بقي للوقت اللي انتا عيزوو
1 00:00:00 Exec [dbo].[_AutomaticTriviaEvent_1]

omar hapshy 09-08-2016 12:58 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Dangers SrO (المشاركة 5274632)
اتفضل اهو غير بقي للوقت اللي انتا عيزوو
1 00:00:00 Exec [dbo].[_AutomaticTriviaEvent_1]

بص كدة .http://www.3rbz.com/uploads/3f66bd83edf31.png
مش بيجاوب بقي .وانا عاوز قبلها نوتك تحظرهم ازاي

الصورة لو مش وضحة رابط مباشر http://www.3rbz.com/uploads/3f66bd83edf31.png

Dangers SrO 09-08-2016 10:11 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
علشان تعمل Notice


كود PHP:

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


firytail 09-08-2016 11:18 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
على فكره انا حولت اشغله اكثر من مره على الفرجين الجديد بس مش شغال بيجبلى ايرورر فى البرنامج

omar hapshy 10-08-2016 01:20 AM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
اقتباس:

المشاركة الأصلية كتبت بواسطة Dangers SrO (المشاركة 5274740)
علشان تعمل Notice


كود PHP:

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


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

Dev.BigBear 10-08-2016 10:09 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
انا جربتو على فكرة و بيظهر كل الكلام ورا بعض و مش بيستنى لغيت ما حد يرد

omar hapshy 13-08-2016 03:49 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
ارجو مراجعه الموضوع ب اكملو لانه لا يعمل كاملا .:111 (21):

Mostafa Mosaad 18-08-2016 03:58 AM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
برنس :thumbsup:

elbattawy1st 11-09-2016 04:30 AM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
الناس الا عندها مشاكل و الايفنت مش شغال عندهم اعمل البروسيدور الاتنين دول و هيشتغل معاكم من غير مشاكل
كود PHP:

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=[Questionfrom _AutomaticTrivia_Questions order by newid() 
update _AutomaticTrivia_Questions set [service]=1 where Question=@Question 
insert into  DANGERSS
..iLegend_Tool (Service,Type,Message,Datevalues ('1','Notice','Automatic trivia event has started.[To answer PM [BOT] with Trivia:Answer]',GETDATE()) 
insert into  DANGERSS..iLegend_Tool (Service,Type,Message,Datevalues ('1','Notice',@Question,GETDATE()) 
IF (
SELECT SERVICE FROM _AutomaticTrivia_Questions where question=@Question) = 
BEGIN 
insert into DANGERSS
..iLegend_Tool (Service,Type,Message,Datevalues ('1','Notice','Automatic trivia event has started without winners',GETDATE()) 
END 
END 
GO 


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

كود PHP:

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=[CharIDfrom SRO_VT_SHARD.dbo._Char where CharName16 = @SenderNAme 
select 
@WinnerJID=[UserJIDfrom SRO_VT_SHARD.dbo._User where CharID = @CharID 
select 
@Silk_Own=[silk_ownfrom SRO_VT_ACCOUNT.dbo.SK_Silk where JID = @WinnerJID 
  
   select 
@Reward210 
select 
@Reward10 

If (@Message=@Answer
BEGIN 
insert into DANGERSS
..iLegend_Tool (Service,Type,Message,Datevalues ('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,Datevalues ('1','Notice','Automatic Trivia Event has ended.',GETDATE()) 
insert into DANGERSS..iLegend_Tool (Service,Type,target,Message,Datevalues ('1','Private',@SenderName,'Congratulations, you won in the event and received '+@Reward2+' silks as reward.',GETDATE()) 
update _AutomaticTrivia_Questions set [Service]=0 where [Service]=
     
    Exec 
[SRO_VT_SHARD].[dbo].[_ADD_ITEM_EXTERN] @CharName,'ITEM_ETC_ARENA_COIN',@RewardCount,'100' 
   
End 

   
END 

GO 


keshk2007 20-12-2016 09:46 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
عندى مشكلة

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

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

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™ 21-12-2016 02:08 PM

رد: Auto Event 'Ask And Questions' On Vsro Multi Tool
 
تسلم

eslamsaied 04-01-2018 11:27 PM

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


الساعة الآن 04:21 PM.

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