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

الموقع العربي الاول للعبة Silkroad Online (https://silkroad4arab.com/vb/index.php)
-   قسم الاسئلة و الاستفسارات لعمل السيرفرات الخاصة (https://silkroad4arab.com/vb/forumdisplay.php?f=226)
-   -   طلب (https://silkroad4arab.com/vb/showthread.php?t=606923)

mohamed9000 05-11-2016 08:47 AM

طلب
 
1-عايز Auto Billionaire System بس عايزه يشتغل ببرنامج Vsro Multi Tool وعايزة يشتغل كل 12 ساعة يعني كل 12 ساعة يشوف مين اعلي واحد معا جولد في السيرفير ويديلو ال title ولو اتشالت من علية ترجعلوا ال title القديمة الي كانت علية


2-عاير Auto Plus Notice System ويكون شغال علي Vsro Multi Tool وياريت حد يعملهولي انه يبدأ النوتيس من اول +14 واحوت produce فين

Dev.Ri3o 05-11-2016 01:10 PM

رد: طلب
 
مفيش مشكلة انت هتشغل ال Vsro Multi Tool وبالتسبة انو يرجع لل PLayer ال Old Title الى كان معاه اما تشيل منو Title ال Auto Billionarie
هتعمل ال Table ده
كود:

USE [SRO_VT_SHARDLOG]
GO

/****** Object:  Table [dbo].[_OldTitles]    Script Date: 24/03/2016 09:50:27 أ• ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

SET ANSI_PADDING ON
GO

CREATE TABLE [dbo].[_OldTitles](
        [ID] [int] IDENTITY(1,1) NOT NULL,
        [CharName] [varchar](50) NOT NULL,
        [OldHwan] [int] NULL,
        [UName] [varchar](50) NULL,
 CONSTRAINT [PK__OldTitles] PRIMARY KEY CLUSTERED
(
        [ID] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
) ON [PRIMARY]

GO

SET ANSI_PADDING OFF
GO

وبعد كدة تحط ال Procedure ده فى Memo_Add
كود:

If  (@TargetCharName like 'TesT' and @message = 'Back My Title') 
 begin
 DECLARE @OLDHWAN int = (Select OldHwan From [SRO_VT_SHARDLOG].[dbo].[_OldTitles] where CharName = @SenderCharName)
 UPDATE [SRO_VT_SHARD].[dbo].[_Char] Set HwanLevel = @OLDHWAN where CharName16=@SenderCharName
 Insert Into [SRO_VT_SHARDLOG].[dbo].[iLegend_Tool] (Service,Type,Target,Message,Date) Values (1,'Private',@SenderCharName,'Plz Teleport To Get ur Old Title',Getdate()) 
end

وهتشيل السطر ده من ال Procedure بتاع Auto Billionaire System
كود:

Update SH_OWOJuStiCe.dbo._Char Set HwanLevel = '0' Where HwanLevel = 'your Billionaire number' and not CharID = @CharID And HwanLevel not in (Team Titlename Number,Team Titlename Number,Team Titlename Number)

mohamed9000 05-11-2016 03:07 PM

رد: طلب
 
طيب انا عندي ال table موجودة تمام الي هي OldTitles انا عايز اعرف اية produce الي المطلوب مني عشان كدة السيستم يشتغل 100% واهم حاجة هيتعمل كل 12 ساعة ولا لا .. وبالنسبة لل Plus Notice System معندكش فكره عنها ؟

Dev.Ri3o 05-11-2016 04:46 PM

رد: طلب
 
انا وضحتلك انت تعمل ال Procedure اللى فى الموضوع الاصلى من هنا
http://silkroad4arab.com/vb/showthread.php?t=591951
بس هتشيل السطر ده منو
كود:

Update SH_OWOJuStiCe.dbo._Char Set HwanLevel = '0' Where HwanLevel = 'your Billionaire number' and not CharID = @CharID And HwanLevel not in (Team Titlename Number,Team Titlename Number,Team Titlename Number)
وبكدة الموضوع هيشتغل تمام 100%
وهتعمل ال procedure اللى ادتهولك فوق تحطو فى Memo_Add عشان لما حد تانى ياخد ال Title يرجع ال Title القديم للى اتاخد منو ال Title
وبالنسبة لكل 12 ساعة لا دى بتتعمل تلقائى بعد اما ال Player يعمل TP او Restart لل Game

mohamed9000 05-11-2016 04:55 PM

رد: طلب
 
طب بالنسبة ل plus notice انا مش بعرف اعملة من plus معين انا عايزه يشتغل من اول +14 وده الproduce

كود PHP:

   if(@Operation 90)  
   
begin  
    
DECLARE @iid int
            @
itemName varchar(129),        @CharName varchar(64)  ,@CodeName varchar(64
    
select @iid RefItemID from SRO_VT_SHARD.dbo._Items where RefItemID = @ItemRefID 
    Set 
@CodeName= (select CodeName128 from SRO_VT_SHARD.dbo._RefObjCommon where id = @iid
    
select @itemName Name from ELBATTAWY_SYSTEMS.dbo._ItemName where CodeName128=@CodeName 
    select 
@CharName CharName16 from SRO_VT_SHARD.dbo._Char where CharID = @CharID 
          set 
@len_desc CHARINDEX (']',@strDesc)   
      if(@
len_desc 9)    
     
begin  
     set 
@strDesc SUBSTRING(@strDesc,0,9)  
     
set @strDesc SUBSTRING(@strDesc81)  
    
end  
   
else if(@len_desc 10)  
        
begin  
        set 
@strDesc SUBSTRING(@strDesc,0,10)  
        
set @strDesc SUBSTRING(@strDesc82)  
        
end 
    
if(@strDesc >= 8
    
begin 
    insert into ELBATTAWY_SYSTEMS
..iLegend_Tool ([Service],[Type],[Message],[Date]) Values ('1','Notice','[' +@CharName '] has increased [' + @itemName '] to [Lvl ' CAST(@strDesc AS NVARCHAR) + ']',GETDATE())   
 
END 
 end 


Dev.Ri3o 05-11-2016 05:13 PM

رد: طلب
 
هتعدل على
كود:

if(@strDesc >= 8)
خلى ال 8 الرقم اللى انت عايزو

mohamed9000 05-11-2016 05:27 PM

رد: طلب
 
تمام

Dev.Ri3o 05-11-2016 06:05 PM

رد: طلب
 
##


الساعة الآن 12:42 AM.

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