用户名: 密码: 验证码: 验证码 注册 找回
今天是:2008年11月21日 星期五  您现在位于: 首页 → 技术文栏 → 千级系统自动发信送P脚...
千级系统自动发信送P脚本
2008年06月17日  无双网  出处:红月私服中心
以下代码请在企业管理器-储存过程-dbo.RMS_LEVEL1000MAIL里修改或替换:
/****** Object: Stored Procedure dbo.RMS_LEVEL1000MAIL script Date: 2004-5-13 11:21:09 ******/
CREATE PROCEDURE RMS_LEVEL1000MAIL
@GameID varchar(14),
@Time datetime
AS
set nocount on
declare @MailCount int, @InsertMailError int, @InsertTickError int , @level int , @face int,@WindowKind int,@WindowIndex int,@permission int
set @MailCount = 0
set @InsertMailError = 1
set @InsertTickError = 1
begin transaction
select @MailCount = count(*) from tblMail1 where Recipient = @GameID and Time = @Time
while @MailCount > 0
begin
set @MailCount = 0
set @Time = dateadd(second, 1, @Time)
select @MailCount = count(*) from tblMail1 where Recipient = @GameID and Time = @Time
end
insert tblMail1 (Time, Recipient, Sender, ReadOrNot, Title, Line, Content, Item) values(@Time, @GameID, [永年红月], 0, 千级奖励, 20, 感谢您对永年红月的支持, )
select @InsertMailError = @@ERROR
select @Level=lvl from tblGameID1 where @GameID=GameID
begin

begin
select @face=face from tblGameID1 where @GameID=GameID
if @face=0
insert tblSpecialItem1 (ItemKind, ItemIndex, ItemDurability, Position, Map, X, Y, TileKind, GameID, WindowKind, WindowIndex, MiscTime, AttackGrade, StrengthGrade, SpiritGrade, DexterityGrade, PowerGrade) values (6, 187, 4, 2, 1, 100, 100, 1, @GameID, 100, 0, @Time, 4,0,0,0,0)
if @face=1
insert tblSpecialItem1 (ItemKind, ItemIndex, ItemDurability, Position, Map, X, Y, TileKind, GameID, WindowKind, WindowIndex, MiscTime, AttackGrade, StrengthGrade, SpiritGrade, DexterityGrade, PowerGrade) values (6, 188, 4, 2, 1, 100, 100, 1, @GameID, 100, 0, @Time, 4,0,0,0,0)
if @face=2
insert tblSpecialItem1 (ItemKind, ItemIndex, ItemDurability, Position, Map, X, Y, TileKind, GameID, WindowKind, WindowIndex, MiscTime, AttackGrade, StrengthGrade, SpiritGrade, DexterityGrade, PowerGrade) values (6, 190, 4, 2, 1, 100, 100, 1, @GameID, 100, 0, @Time, 4,0,0,0,0)
if @face=3
insert tblSpecialItem1 (ItemKind, ItemIndex, ItemDurability, Position, Map, X, Y, TileKind, GameID, WindowKind, WindowIndex, MiscTime, AttackGrade, StrengthGrade, SpiritGrade, DexterityGrade, PowerGrade) values (6, 190, 4, 2, 1, 100, 100, 1, @GameID, 100, 0, @Time, 4,0,0,0,0)
if @face=4
insert tblSpecialItem1 (ItemKind, ItemIndex, ItemDurability, Position, Map, X, Y, TileKind, GameID, WindowKind, WindowIndex, MiscTime, AttackGrade, StrengthGrade, SpiritGrade, DexterityGrade, PowerGrade) values (6, 192, 4, 2, 1, 100, 100, 1, @GameID, 100, 0, @Time, 4,0,0,0,0)
if @face=5
insert tblSpecialItem1 (ItemKind, ItemIndex, ItemDurability, Position, Map, X, Y, TileKind, GameID, WindowKind, WindowIndex, MiscTime, AttackGrade, StrengthGrade, SpiritGrade, DexterityGrade, PowerGrade) values (6, 194, 4, 2, 1, 100, 100, 1, @GameID, 100, 0, @Time, 4,0,0,0,0)
if @face=6
insert tblSpecialItem1 (ItemKind, ItemIndex, ItemDurability, Position, Map, X, Y, TileKind, GameID, WindowKind, WindowIndex, MiscTime, AttackGrade, StrengthGrade, SpiritGrade, DexterityGrade, PowerGrade) values (6, 191, 4, 2, 1, 100, 100, 1, @GameID, 100, 0, @Time, 4,0,0,0,0)
if @face=7
insert tblSpecialItem1 (ItemKind, ItemIndex, ItemDurability, Position, Map, X, Y, TileKind, GameID, WindowKind, WindowIndex, MiscTime, AttackGrade, StrengthGrade, SpiritGrade, DexterityGrade, PowerGrade) values (6, 190, 4, 2, 1, 100, 100, 1, @GameID, 100, 0, @Time, 4,0,0,0,0)
if @face=8
insert tblSpecialItem1 (ItemKind, ItemIndex, ItemDurability, Position, Map, X, Y, TileKind, GameID, WindowKind, WindowIndex, MiscTime, AttackGrade, StrengthGrade, SpiritGrade, DexterityGrade, PowerGrade) values (6, 193, 4, 2, 1, 100, 100, 1, @GameID, 100, 0, @Time, 4,0,0,0,0)
end
end
select @InsertTickError = @@ERROR
If @InsertMailError = 0 and @InsertTickError = 0
begin
commit transaction
end
else
begin
rollback transaction
end
GO


 
 (本文已被浏览 369 次)
 发布人:asp126
 → 推荐给我的好友
上篇文章:红月单机版制作
下篇文章:G.D.P的信息编辑器~!部分使用方法
   文章评论
  → 评论内容 (点击查看)   共0条评论,每页显示5条评论   浏览所有评论
(没有相关评论)
  → 发表我的评论 (点击发表)
 网站留言· 友情链接·与我在线·网站收录查询关于我们·管理·TOP 
 陕ICP备05001883号 
Processed in 9 queries, Cache 38,Counter 584895,10 Online