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

الموقع العربي الاول للعبة Silkroad Online (https://silkroad4arab.com/vb/index.php)
-   قـسـم تـعـديـل [ PK2 Edit ] (https://silkroad4arab.com/vb/forumdisplay.php?f=183)
-   -   Plus Auto Notice(Sample + Source (https://silkroad4arab.com/vb/showthread.php?t=578436)

™♥Dev Silkroad♥™ 08-02-2015 06:12 AM

Plus Auto Notice(Sample + Source
 

http://s1.postimg.org/ngepbsalr/download.jpg
السلام عليكم ورحمة الله وبركاته
طبعا الموضوع باين من عنونه
لقيت في منتدي اجنبي الحاجة دي فا حبيت اجبهلكم

الاول خد backup
http://s9.postimg.org/3wh5zw50v/dev.gif
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

الي في تيكست ده
http://s18.postimg.org/7eumt1mih/item.png
حينزل هنا في الداتابيز
http://s8.postimg.org/7d7qsggyd/item1.png
Download program and Source
Click here
:wavetowel2:


الساعة الآن 09:33 PM.

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