Plus Auto Notice(Sample + Source

[™♥Dev Silkroad♥™]

السلام عليكم ورحمة الله وبركاته
طبعا الموضوع باين من عنونه
لقيت في منتدي اجنبي الحاجة دي فا حبيت اجبهلكم
الاول خد backup

1.Query

USE [SRO_VT_LOG]
GO
/****** Object:  StoredProcedure [dbo].[_AddLogItem]    Script Date: 09/11/2013 12:36:43 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER  procedure [dbo].[_AddLogItem]  
  @charID  int,   
  @ItemRefID int,   
  @ItemSerial bigint,   
  @dwData int,   
  @targetStorage tinyint,   
  @Operation tinyint,   
  @slot_From tinyint,   
  @slot_To tinyint,   
  @eventPos varchar(64),   
  @strDesc varchar(128), 
  @gold        bigint        -- #ifdef EXTEND_GOLD_TYPE »ğÀÔ    
  as   
   declare @len_pos int   
   declare @len_desc int  
   declare @strDesc_separado varchar(128)  
   declare  @len_desc1 int 
   set @len_pos = len @eventPos)   
   set @len_desc = len @strDesc)   
   if  @len_pos > 0 and @len_desc > 0)   
   begin   
            insert _LogEventItem (EventTime, CharID, ItemRefID, dwData, TargetStorage, Operation, Slot_From, Slot_To, EventPos, strDesc, Serial64, Gold)    -- #ifdef EXTEND_GOLD_TYPE ±³Ã¼ 
            values(GetDate(), @charID, @ItemRefID, @dwData, @targetStorage, @Operation, @slot_From, @slot_To, @eventPos, @strDesc, @ItemSerial, @gold)        -- #ifdef EXTEND_GOLD_TYPE ±³Ã¼ 
   end   
   else if  @len_pos > 0 and @len_desc = 0)   
   begin   
            insert _LogEventItem (EventTime, CharID, ItemRefID, dwData, TargetStorage, Operation, Slot_From, Slot_To, EventPos, Serial64, Gold)            -- #ifdef EXTEND_GOLD_TYPE ±³Ã¼ 
            values(GetDate(), @charID, @ItemRefID, @dwData, @targetStorage, @Operation, @slot_From, @slot_To, @eventPos, @ItemSerial, @gold)                -- #ifdef EXTEND_GOLD_TYPE ±³Ã¼  
   end   
   else if  @len_pos = 0 and @len_desc > 0)   
   begin   
            insert _LogEventItem (EventTime, CharID, ItemRefID, dwData, TargetStorage, Operation, Slot_From, Slot_To, strDesc, Serial64, Gold)            -- #ifdef EXTEND_GOLD_TYPE ±³Ã¼ 
            values(GetDate(), @charID, @ItemRefID, @dwData, @targetStorage, @Operation, @slot_From, @slot_To, @strDesc, @ItemSerial, @gold)                    -- #ifdef EXTEND_GOLD_TYPE ±³Ã¼  
   end   
   else if  @len_pos = 0 and @len_desc = 0)   
   begin   
            insert _LogEventItem (EventTime, CharID, ItemRefID, dwData, TargetStorage, Operation, Slot_From, Slot_To, Serial64, Gold)                        -- #ifdef EXTEND_GOLD_TYPE ±³Ã¼ 
            values(GetDate(), @charID, @ItemRefID, @dwData, @targetStorage, @Operation, @slot_From, @slot_To, @ItemSerial, @gold)                            -- #ifdef EXTEND_GOLD_TYPE ±³Ã¼ 
   end   
   -- À¯·á ¾ÆÀÌÅÛ ±¸ÀÔÀ̸é!   
   -- #define LOG_ITEMEVENT_BUY_CASHITEM  (BYTE)35   
   if (@Operation = 35)   
   begin   
    insert _LogCashItem (RefItemID, CharID, Cnt, EventTime, Serial64)   
    values(@ItemRefID, @charID, @dwData, GetDate(), @ItemSerial)   
   end 
   if (@Operation = 90 OR @Operation = 160)   
   begin   
   set @len_desc1 = CHARINDEX (']' @strDesc)  
  if @len_desc1 = 9)   
     begin 
     set @strDesc = SUBSTRING @strDesc,0,9) 
     set @strDesc_separado = SUBSTRING @strDesc, 8, 1) 
    end 
   else if @len_desc1 = 10) 
        begin 
        set @strDesc = SUBSTRING @strDesc,0,10) 
        set @strDesc_separado = SUBSTRING @strDesc, 8, 2) 
        end 
        if @strDesc_separado >= 8) 
        begin 
        --set @strDesc_separado = @len_desc1 
      insert _LogItemPlus(CharID, Serial64, Plus, Data, Lido) values @charID, @ItemSerial, @strDesc_separado, GetDate(), '0')   
    end  
   end 
   if(@Operation = 90)
   begin
    declare @iname varchar(129)
    declare @iid int
    declare @cname varchar(64)
    select @iid = RefItemID from SRO_VT_SHARD.dbo._Items where Serial64 = @ItemSerial
    select @iname = Name from SRO_VT_SHARD.dbo._ItemName where CodeName128 in
    (select CodeName128 from SRO_VT_SHARD.dbo._RefObjCommon where id = @iid) 
    select @cname = CharName16 from SRO_VT_SHARD.dbo._Char where CharID = @charID
    insert PlusNotice(Sent, Message)values(0,'[' +@cname + '] has increased [' + @iname + '] to [Lvl ' + CAST @strDesc_separado AS NVARCHAR) + ']')
 end

2.Query

USE [SRO_VT_LOG]
GO

/****** Object:  Table [dbo].[_LogItemPlus]    Script Date: 09/11/2013 12:37:14 ******/
IF  EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[_LogItemPlus]') AND type in (N'U'))
DROP TABLE [dbo].[_LogItemPlus]
GO

USE [SRO_VT_LOG]
GO

/****** Object:  Table [dbo].[_LogItemPlus]    Script Date: 09/11/2013 12:37:14 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

SET ANSI_PADDING ON
GO

CREATE TABLE [dbo].[_LogItemPlus](
    [ID] [int] IDENTITY(1,1) NOT NULL,
    [CharID] [varchar](10) NOT NULL,
    [Serial64] [varchar](64) NOT NULL,
    [Plus] [text] NOT NULL,
    [Data] [datetime] NOT NULL,
    [Lido] [int] NOT NULL,
 CONSTRAINT [PK__LogItemPlus1_1] 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] TEXTIMAGE_ON [PRIMARY]

GO

SET ANSI_PADDING OFF
GO

3.Query

USE [SRO_VT_LOG]
GO

IF  EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[DF_PlusNotice_Sent]') AND type = 'D')
BEGIN
ALTER TABLE [dbo].[PlusNotice] DROP CONSTRAINT [DF_PlusNotice_Sent]
END

GO

IF  EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[DF_PlusNotice_Date]') AND type = 'D')
BEGIN
ALTER TABLE [dbo].[PlusNotice] DROP CONSTRAINT [DF_PlusNotice_Date]
END

GO

USE [SRO_VT_LOG]
GO

/****** Object:  Table [dbo].[PlusNotice]    Script Date: 09/11/2013 12:37:51 ******/
IF  EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[PlusNotice]') AND type in (N'U'))
DROP TABLE [dbo].[PlusNotice]
GO

USE [SRO_VT_LOG]
GO

/****** Object:  Table [dbo].[PlusNotice]    Script Date: 09/11/2013 12:37:51 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

SET ANSI_PADDING ON
GO

CREATE TABLE [dbo].[PlusNotice](
    [Sent] [int] NOT NULL,
    [message] [varchar](max) NOT NULL,
    [Date] [datetime] NOT NULL
) ON [PRIMARY]

GO

SET ANSI_PADDING OFF
GO

ALTER TABLE [dbo].[PlusNotice] ADD  CONSTRAINT [DF_PlusNotice_Sent]  DEFAULT ((0)) FOR [Sent]
GO

ALTER TABLE [dbo].[PlusNotice] ADD  CONSTRAINT [DF_PlusNotice_Date]  DEFAULT (getdate()) FOR [Date]
GO

4.Query

USE [SRO_VT_SHARD]
GO

/****** Object:  Table [dbo].[_ItemName]    Script Date: 09/11/2013 12:38:45 ******/
IF  EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[_ItemName]') AND type in (N'U'))
DROP TABLE [dbo].[_ItemName]
GO

USE [SRO_VT_SHARD]
GO

/****** Object:  Table [dbo].[_ItemName]    Script Date: 09/11/2013 12:38:45 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

SET ANSI_PADDING ON
GO

CREATE TABLE [dbo].[_ItemName](
    [CodeName128] [varchar](50) NOT NULL,
    [Name] [varchar](50) NOT NULL
) ON [PRIMARY]

GO

SET ANSI_PADDING OFF
GO

الي في تيكست ده

حينزل هنا في الداتابيز

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