|
You last visited: Today at 00:44
Advertisement
Any Professional here?
Discussion on Any Professional here? within the SRO Private Server forum part of the Silkroad Online category.
03/23/2015, 20:32
|
#1
|
elite*gold: 0
Join Date: Mar 2015
Posts: 48
Received Thanks: 2
|
Any Professional here?
I want to make job war in my game !?
|
|
|
03/24/2015, 11:50
|
#2
|
elite*gold: 857
Join Date: Dec 2013
Posts: 857
Received Thanks: 679
|
why not just do it
or go to buy it if you need just contact me
skype = king.sro29
|
|
|
03/24/2015, 14:18
|
#3
|
elite*gold: 77
Join Date: Jan 2015
Posts: 1,314
Received Thanks: 856
|
Procedure;
Quote:
USE [SRO_VT_SYSTEM_]
GO
/****** Object: StoredProcedure [dbo].[_JobSystem] Script Date: 01/06/2014 02:22:51 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER PROCEDURE [dbo].[_JobSystem]
@CharID INT,
@Desc varchar(128)
AS
declare @Hisname varchar(500) = (select LEFT((Select Substring(@desc, PATINDEX('%(%',@desc) + 1, LEN(@desc))), CHARINDEX(')', (Select Substring(@desc, PATINDEX('%(%',@desc) + 1, LEN(@desc)))) - 1) WHERE CHARINDEX(')',(Select Substring(@desc, PATINDEX('%(%',@desc) + 1, LEN(@desc)))) > 0)
declare @HisJob varchar(300) = (select 'JobType' = Case When JobType = 1 Then 'Trader' When JobType = 2 Then 'Robber' When JobType = 3 Then 'Hunter' End From SRO_VT_SHARD.dbo._CharTrijob where CharID = (Select CharID From SRO_VT_SHARD.dbo._Char Where CharName16 = @HisName))
declare @MyCharName varchar(200) = (Select CharName16 From SRO_VT_SHARD.dbo._Char Where CharID = @CharID)
declare @MyJob varchar(300) = (select 'JobType' = Case When JobType = 1 Then 'Trader' When JobType = 2 Then 'Robber' When JobType = 3 Then 'Hunter' End From SRO_VT_SHARD.dbo._CharTrijob where CharID = @CharID)
declare @TotalKill int = (Select TotalKillCount From _JobKillLog Where CharID = @CharID And HisName = @Hisname)
declare @Penalty varchar(max) = (select SUM(TotalKillCount) from _JobKillLog where MyCharName = @MyCharName)
declare @IP1 varchar(max) = (select IP from _IPLogs Where Charname = @MyCharName)
declare @IP2 varchar(max) = (select IP from _IPLogs Where Charname = @Hisname)
declare @silk int = '1'
declare @JID int = (Select UserJID from SRO_VT_SHARD.dbo._User Where CharID = (Select CharID From SRO_VT_SHARD.dbo._Char Where CharName16 = @MyCharName))
declare @ID varchar(200) = (Select StrUserID From SRO_VT_ACCOUNT.dbo.TB_User Where JID = @JID)
if not exists (Select CharID From _JobKillLog Where CharID = @CharID And HisName = @Hisname) And (@MyCharName not in (select CharName from _PenatlyJOB Where CharName = @MyCharName))
begin
Insert Into _JobKillLog values (@CharID,@MyJob,@MyCharName,@Hisname,@HisJob,1,Get Date(),NULL)
EXEC [SRO_VT_ACCOUNT].[CGI].[CGI_WebPurchaseSilk] @OrderID = NULL, @UserID = @ID, @PkgID = NULL, @NumSilk = @Silk, @Price = NULL
end
if exists (select CharID,HisName from _JobKillLog Where CharID = @CharID and HisName = @Hisname and EndDate is null) and (@TotalKill < 5) And (@MyCharName not in (select CharName from _PenatlyJOB Where CharName = @MyCharName))
and (@IP1 != @IP2)
begin
update _JobKillLog
set TotalKillCount += 1
where CharID = @CharID
and Hisname = @Hisname
EXEC [SRO_VT_ACCOUNT].[CGI].[CGI_WebPurchaseSilk] @OrderID = NULL, @UserID = @ID, @PkgID = NULL, @NumSilk = @Silk, @Price = NULL
end
else if exists (select CharID from _JobKillLog Where CharID = @CharID and HisName = @Hisname and EndDate is null) and (@TotalKill = 5) And (@MyCharName not in (select CharName from _PenatlyJOB Where CharName = @MyCharName))
and (@IP1 != @IP2)
begin
update _JobKillLog
set EndDate = DATEADD (DAY,1,GETDATE())
where CharID = @CharID
and HisName = @Hisname
EXEC [SRO_VT_ACCOUNT].[CGI].[CGI_WebPurchaseSilk] @OrderID = NULL, @UserID = @ID, @PkgID = NULL, @NumSilk = @Silk, @Price = NULL
end
if exists (select CharID,HisName,EndDate from _JobKillLog Where CharID = @CharID and HisName = @Hisname and EndDate <= GETDATE())
and (@IP1 != @IP2)
begin
update _JobKillLog
set TotalKillCount = 0,
EndDate = NULL
Where CharID = @CharID
and HisName = @Hisname
EXEC [SRO_VT_ACCOUNT].[CGI].[CGI_WebPurchaseSilk] @OrderID = NULL, @UserID = @ID, @PkgID = NULL, @NumSilk = @Silk, @Price = NULL
end
if (@Penalty = 100)
begin
insert into _PenatlyJOB values (@MyCharName , DATEADD (DAY,1,GETDATE()))
update _JobKillLog
set EndDate = (select PenaltyTime from _PenatlyJOB Where CharName = @MyCharName)
where MyCharName = @MyCharName
EXEC [SRO_VT_ACCOUNT].[CGI].[CGI_WebPurchaseSilk] @OrderID = NULL, @UserID = @ID, @PkgID = NULL, @NumSilk = @Silk, @Price = NULL
end
if exists (select CharName from _PenatlyJOB Where CharName = @MyCharName and PenaltyTime <= GETDATE())
begin
delete from _PenatlyJOB Where CharName = @MyCharName
update _JobKillLog
set TotalKillCount = 0,
EndDate = NULL
Where CharID = @CharID
EXEC [SRO_VT_ACCOUNT].[CGI].[CGI_WebPurchaseSilk] @OrderID = NULL, @UserID = @ID, @PkgID = NULL, @NumSilk = @Silk, @Price = NULL
end
|
_addlogchar
Quote:
IF (@EventID = 19)
begin
IF (@Desc LIKE '%Robber, Neutral, no freebattle team%' -- thief
) BEGIN
exec _JobSystem @CharID , @Desc
end
end
if (@EventID = 4)
begin
Declare @DynIP varchar(max);
exec @DynIP = SRO_VT_ACCOUNT.dbo.split_ip @Data2
INSERT INTO _IPLogs (CharID,Charname,IP,[Date]) VALUES (@CharID, (SELECT CharName16 FROM SRO_VT_SHARD.dbo._Char WHERE CharID = @CharID),@DynIP,GETDATE())
end
if (@EventID = 6)
begin
delete from ._IPLogs Where CharID = @CharID
end
|
credits goes to madengo.
|
|
|
|
Similar Threads
|
[Selling] [Affordable & Professional] Legend Boosting - Quick, Reliable, Professional Company!
06/21/2014 - League of Legends Trading - 29 Replies
NEW SUMMER PRICES! 30% CHEAPER THAN NORMAL!
http://i.imgur.com/DQnQTAa.jpg
http://i.imgur.com/U2WDAOQ.jpg
http://i.imgur.com/2BmAIeJ.jpg
http://puu.sh/7MDXu/e0dcf03be5.png
http://i.imgur.com/QTxwTFI.png
http://i.imgur.com/ekBfazy.png
http://i.imgur.com/WtXm7HA.png
http://i.imgur.com/Aixf7Ur.png
http://i.imgur.com/lgPeTaJ.png
|
[Selling] League of Legends Professional International EloBoosting EUW/EUNE by Professional
04/06/2014 - League of Legends Trading - 0 Replies
Dear League of Legends Players from Europe,
you are stuck in Elohell or you just can't jump your current division or tier?
You want to improve your Gamestyle? You wanna buy rarely Skins?
No Problem!
Simply join us on Eloshuttle Europe - ESEP, Your Boosting/Coaching Service (Already existing over 1 Year)
Currently 15% on everything.
|
[Selling] Microsoft Windows 7 Professional N, 8.1 Professional, 8 Professional
12/13/2013 - Trading - 0 Replies
Folgende 3 Keys stehen hier zum Verkauf:
1 x Windows 8 Professional 32/64-bit Ger Download | 40€
1 x Windows 7 Professional N with Service Pack 1 32/64-bit Ger- Download | 30€
1 x Windows 8.1 Professional 32/64-bit German Download | 45€
|
All times are GMT +2. The time now is 00:44.
|
|