Message System / Level Up / Item Destroy
Hello RageZoner's
i got Alot of Free time so i decided to help newbies with some usefull stuff
Here's A Small message System For GM'S
Code:
USE [SRO_VT_SHARD]GO
/****** Object: StoredProcedure [dbo].[_Memo_Add] Script Date: 5/21/2014 12:35:32 PM ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER OFF
GO
------------------------------------------------
-- # PROCEDURE _Memo_Add ¼öÁ¤
------------------------------------------------
ALTER procedure [dbo].[_Memo_Add]
--ÇÊ¿ä ÆĶó¹ÌÅÍ
@TargetCharName varchar(64),
@SenderCharName varchar(64),
@message varchar(300),
--ºÎ°¡ ÆĶó¹ÌÅÍ
@Max_MEMO_COUNT int
as
DECLARE @SI1D int = (SELECT charid FROM _Char where CharName16 = @SenderCharName)
-- Penalty Remover
IF @TargetCharName like 'Penalty_R'
BEGIN
DELETE FROM _TimedJob where JobID = '1' and CharID = @SI1D or JobID = '2' and CharID = @SI1D
END
begin transaction
declare @Target_charid int
set @Target_charid = (select CharID from _Char where CharName16 = @TargetCharName)
if (@@error <> 0 or @@rowcount = 0 )
begin
--±×·±¾Ö´Â ¾ø¾î~
rollback transaction
return -1
end
declare @memo_count int
select @memo_count = count(*) from _Memo where CharID = @Target_charid
if( @memo_count >= @Max_MEMO_COUNT )
begin
-- ÂÊÁöÇÔÀÌ ²Ëá³×~
rollback transaction
return -2
end
--@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
-- EUROPE_SYSTEM (ÃÖÀÎÈ£)
--@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
declare @ReFObjID int
select @ReFObjID = RefObjID from _Char with (nolock) where CharName16 = @SenderCharName
if (@@error <> 0 or @@rowcount = 0 )
begin
rollback transaction
return -4
end
declare @RecordDate smalldatetime
set @RecordDate = GetDate()
insert _Memo (CharID, FromCharName,Message,Date,Status,RefObjID) values( @Target_charid, @SenderCharName, @message, @RecordDate, 0, @ReFObjID )
--@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
--@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
if (@@error <> 0 or @@rowcount = 0 )
begin
rollback transaction
--È£°î!!
return -3
end
commit transaction
return @@identity
If @TargetCharName like 'IAMGM' and @message = 'GM_SET_EU_HA_M')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_HEAVY_11_SA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_HEAVY_11_HA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_HEAVY_11_AA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_HEAVY_11_BA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_HEAVY_11_LA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_HEAVY_11_FA_SET_B_RARE',1,250
end
If @TargetCharName like 'IAMGM' and @message = 'GM_SET_EU_HA_W')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_HEAVY_11_SA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_HEAVY_11_HA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_HEAVY_11_AA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_HEAVY_11_BA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_HEAVY_11_LA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_HEAVY_11_FA_SET_B_RARE',1,250
end
If @TargetCharName like 'IAMGM' and @message = 'GM_SET_EU_LA_M')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_LIGHT_11_SA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_LIGHT_11_HA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_LIGHT_11_AA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_LIGHT_11_BA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_LIGHT_11_LA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_LIGHT_11_FA_SET_B_RARE',1,250
end
If @TargetCharName like 'IAMGM' and @message = 'GM_SET_EU_LA_W')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_LIGHT_11_SA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_LIGHT_11_HA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_LIGHT_11_AA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_LIGHT_11_BA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_LIGHT_11_LA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_LIGHT_11_FA_SET_B_RARE',1,250
end
If @TargetCharName like 'IAMGM' and @message = 'GM_SET_EU_CL_M')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_CLOTHES_11_SA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_CLOTHES_11_HA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_CLOTHES_11_AA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_CLOTHES_11_BA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_CLOTHES_11_LA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_M_CLOTHES_11_FA_SET_B_RARE',1,250
end
If @TargetCharName like 'IAMGM' and @message = 'GM_SET_EU_CL_W')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_CLOTHES_11_SA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_CLOTHES_11_HA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_CLOTHES_11_AA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_CLOTHES_11_BA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_CLOTHES_11_LA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_W_CLOTHES_11_FA_SET_B_RARE',1,250
end
If @TargetCharName like 'IAMGM' and @message = 'GM_SET_CH_HA_M')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_HEAVY_11_SA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_HEAVY_11_HA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_HEAVY_11_AA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_HEAVY_11_BA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_HEAVY_11_LA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_HEAVY_11_FA_SET_B_RARE',1,250
end
If @TargetCharName like 'IAMGM' and @message = 'GM_SET_CH_HA_W')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_HEAVY_11_SA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_HEAVY_11_HA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_HEAVY_11_AA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_HEAVY_11_BA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_HEAVY_11_LA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_HEAVY_11_FA_SET_B_RARE',1,250
end
If @TargetCharName like 'IAMGM' and @message = 'GM_SET_CH_LA_M')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_LIGHT_11_SA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_LIGHT_11_HA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_LIGHT_11_AA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_LIGHT_11_BA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_LIGHT_11_LA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_LIGHT_11_FA_SET_B_RARE',1,250
end
If @TargetCharName like 'IAMGM' and @message = 'GM_SET_CH_LA_W')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_LIGHT_11_SA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_LIGHT_11_HA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_LIGHT_11_AA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_LIGHT_11_BA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_LIGHT_11_LA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_LIGHT_11_FA_SET_B_RARE',1,250
end
If @TargetCharName like 'IAMGM' and @message = 'GM_SET_CH_CL_M')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_CLOTHES_11_SA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_CLOTHES_11_HA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_CLOTHES_11_AA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_CLOTHES_11_BA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_CLOTHES_11_LA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_M_CLOTHES_11_FA_SET_B_RARE',1,250
end
If @TargetCharName like 'IAMGM' and @message = 'GM_SET_CH_CL_W')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_CLOTHES_11_SA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_CLOTHES_11_HA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_CLOTHES_11_AA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_CLOTHES_11_BA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_CLOTHES_11_LA_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_W_CLOTHES_11_FA_SET_B_RARE',1,250
end
If @TargetCharName like 'IAMGM' and @message = 'GM_EU_ITEMS_PACK')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_TSTAFF_11_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_TSWORD_11_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_SWORD_11_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_STAFF_11_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_HARP_11_S_ET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_SHIELD_11_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_DAGGER_11_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_CROSSBOW_11_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_EU_DARKSTAFF_11_SET_B_RARE',1,250
end
If @TargetCharName like 'IAMGM' and @message = 'GM_CH_ITEMS_PACK')
begin
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_BOW_11_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_BLADE_11_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_SWORD_11_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_TBLADE_11_SET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_SPEAR_11_S_ET_B_RARE',1,250
exec _ADD_ITEM_EXTERN @SenderCharName,'ITEM_CH_SHIELD_11_SET_B_RARE',1,250
end
How it Works?
this Msg system got all SET CH / EU M / F D11 EGY B +250
Send Message To CharName : IAMGM
And write in message : GM_SET_EU_HA_M
To get chinese Replace "EU" With "CH"
HA = Heavy Armor
LA = Light Armor
CL = Robe
GM_EU_ITEMS_PACK : FULL EUROPE ITEMS D11 EGY B +250
GM_CH_ITEMS_PACK : Full CHINESE ITEMS D11 EGY B +250
To Get Female Gears Change "M" To "F"
There's Penalty Reset in this pRocedure
-----------------------------------------------------------------
Another small System
Put This Query in _AddLogItem
Code:
if(@Operation = 41) And @strDesc_separado >= 15Begin
Declare @CharNameReward Varchar(64)
select @CharNameReward =CharName16 from SRO_VT_SHARD.dbo._Char where CharID @CharID
exec SRO_VT_SHARD.._ADD_ITEM_EXTERN @CharNameReward,'ITEM_EVENT_PREMIUM_VIETNAM_GOLDTIME_PLUS',1,1
exec SRO_VT_SHARD.._ADD_ITEM_EXTERN @CharNameReward,'ITEM_COS_P_CAT_SCROLL',1,1
exec SRO_VT_SHARD.._ADD_ITEM_EXTERN @CharNameReward,'ITEM_COS_P_FLUTE_WHITE_SMALL',1,1
End
if Your item +15+ And it destroyed you will get Gift Change ITEM CODE Between '' To Change the Reward
@strDesc_separado >= 15 ( 15 = Item Plus )
-----------------------------------------------------------------
Here's Same Thing But this One in _addLogChar
When You Level Up To Level 110 it will Give you Some items As a gift
Code:
if @eventID = '22' and @data2 = '110'declare @CharName16 varchar(64) = (Select CharName16 From SRO_VT_SHARD.._Char Where CharID = @CharID)
begin
exec SRO_VT_SHARD.._ADD_ITEM_EXTERN @CharName16,'ITEM_EVENT_PREMIUM_VIETNAM_GOLDTIME_PLUS',1,1
exec SRO_VT_SHARD.._ADD_ITEM_EXTERN @CharName16,'ITEM_COS_P_CAT_SCROLL',1,1
exec SRO_VT_SHARD.._ADD_ITEM_EXTERN @CharName16,'ITEM_COS_P_FLUTE_WHITE_SMALL',1,1
END
@data2 = '110' ( Level )
also you can change rewards by changing Item codename Between ''
Have Fun...
Re: Message System / Level Up / Item Destroy
Re: Message System / Level Up / Item Destroy
Quote:
Originally Posted by
Mirenexx
Thanks . You;) :thumbup:
you are welcome :):
Re: Message System / Level Up / Item Destroy
Re: Message System / Level Up / Item Destroy
Re: Message System / Level Up / Item Destroy
Quote:
Originally Posted by
Caosfox
nice, good job!
thank you hope you like it :)
wait more releases
- - - Updated - - -
Quote:
Originally Posted by
tormentor
nice very thx
you are welcome :):
Re: Message System / Level Up / Item Destroy
actually even not that bad i bet some newbs will be very happy to see this
i mean .. the 2nd and 3rd stuff is just common if you know your database and its procedures etc but still .. nice for newbs ^^
//edit:
btw you forgot to mention the penalty reset feature inside your _Memo_Add procedure ^^
Code:
IF @TargetCharName like 'Penalty_R'
BEGIN
DELETE FROM _TimedJob where JobID = '1' and CharID = @SI1D or JobID = '2' and CharID = @SI1D
END
also you forgot to mention GM_EU_ITEMS_PACK and GM_CH_ITEMS_PACK to get weapons
Re: Message System / Level Up / Item Destroy
Quote:
Originally Posted by
lemoniscool
actually even not that bad i bet some newbs will be very happy to see this
i mean .. the 2nd and 3rd stuff is just common if you know your database and its procedures etc but still .. nice for newbs ^^
//edit:
btw you forgot to mention the penalty reset feature inside your _Memo_Add procedure ^^
Code:
IF @TargetCharName like 'Penalty_R'
BEGIN
DELETE FROM _TimedJob where JobID = '1' and CharID = @SI1D or JobID = '2' and CharID = @SI1D
END
also you forgot to mention GM_EU_ITEMS_PACK and GM_CH_ITEMS_PACK to get weapons
oh thanks for attention iam sorry i forgot them :D
Edit : Edited First Post Added Missing Info
Have Fun..
Re: Message System / Level Up / Item Destroy
Good work we need more good systems :)
Re: Message System / Level Up / Item Destroy
Quote:
Originally Posted by
RenePunik
Good work we need more good systems :)
sure there's more
Re: Message System / Level Up / Item Destroy
can you make system for the number one in kills unique take title please
Re: Message System / Level Up / Item Destroy
Quote:
Originally Posted by
tormentor
can you make system for the number one in kills unique take title please
Sure
give me unique kills record table name
Re: Message System / Level Up / Item Destroy
Good Job ........ :)
If Can Make Query To Auto Guild Winner FTW Gift..
This is Very Special We need It .
Re: Message System / Level Up / Item Destroy
Re: Message System / Level Up / Item Destroy
thanks good job
( You can create where the Guild win the ftw win silk )
pls
