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

الموقع العربي الاول للعبة Silkroad Online (https://silkroad4arab.com/vb/index.php)
-   قسم الاسئلة و الاستفسارات لعمل السيرفرات الخاصة (https://silkroad4arab.com/vb/forumdisplay.php?f=226)
-   -   طلبين بس (https://silkroad4arab.com/vb/showthread.php?t=577306)

Deadly_Man 26-01-2015 04:35 PM

طلبين بس
 
انا عاوز اطلع اللعبة اون لاين لازم اقفل الفاير وول ولا اعمل
http://im64.gulfup.com/mzwwZH.png
عاوز اعرف اقفل ايه ولا افتح ايه بس تكون الفاير وول شغال و اللعبة اونلاين
------------------------------------------------------------------------------------
الطلب التانى
عاوز ادمج ده مع دوول
كود PHP:

USE [SRO_VT_SHARDLOG]
GO
/****** Object:  StoredProcedure [dbo].[_AddLogChar]    Script Date: 1/26/2015 3:33:54 PM ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO


ALTER   procedure 
[dbo].[_AddLogChar
@
CharID        int,
@
EventID        tinyint,
@
Data1        int,
@
Data2        int,
@
strPos        varchar(64),
@
Desc        varchar(128)
as

IF    ( -- 
Skips over the unnecessary Records
        
(@EventID != 11) AND 
        (@
EventID NOT BETWEEN 21 AND 27) AND
        (@
EventID NOT BETWEEN 200 AND 202) AND
        (@
EventID NOT BETWEEN 204 AND 206) AND 
        (@
EventID != 210) AND (@EventID != 214) AND (@EventID != 244)
    )
BEGIN

    
declare @len_pos     int
    
declare @len_desc    int
    set 
@len_pos len(@strPos)
    
set @len_desc len(@Desc)
    if (@
len_pos and @len_desc 0)
    
begin    
        insert _LogEventChar values
(@CharIDGetDate(), @EventID, @Data1, @Data2, @strPos, @Desc)    
    
end
    
else if (@len_pos and @len_desc 0)
    
begin     
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2EventPosvalues(@CharIDGetDate(), @EventID, @Data1, @Data2, @strPos)
    
end
    
else if (@len_pos and @len_desc 0)
    
begin     
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2strDescvalues(@CharIDGetDate(), @EventID, @Data1, @Data2, @Desc)
    
end
    
else
    
begin
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2values(@CharIDGetDate(), @EventID, @Data1, @Data2)
    
end
    

declare @curlevel int=(select curlevel from SRO_VT_SHARD.._char where CharID=@CharID)
if @
curlevel>=100

IF not exists (SELECT CharID FROM _OnlineOffline WHERE CharID = @CharID)
    
BEGIN
        INSERT INTO _OnlineOffline 
(CharIDCharname, [Status], [Date], [Minutes], [tMinutes], eSilkmOnline, [Silk/Hour], [stillOnline@])
        
VALUES (
                @
CharID,
                (
SELECT CharName16 FROM SRO_VT_SHARD.dbo._Char WHERE CharID = @CharID),
                
'OnHold',
                
GETDATE(),
                
0,0,0,
                
NULL,(SELECT DefaultSilk FROM [_Silk/Hour-ConfigWHERE [Desclike 'Rates'),
                
NULL
                
);
    
END

IF (@EventID OR @EventID 6)
    
BEGIN

    
IF (@EventID AND ((SELECT [StatusFROM _OnlineOffline WHERE CharID = @CharIDlike 'OnHold'))
        
BEGIN
            UPDATE _OnlineOffline
            SET 
[Status] = 'Offline'
            
WHERE CharID = @CharID
        END
        
    
IF (@EventID AND ((SELECT [StatusFROM _OnlineOffline WHERE CharID = @CharIDlike 'Online'))
        
BEGIN
            UPDATE _OnlineOffline
            SET
                
[Status] = 'Offline',
                [
Minutes] = [Minutes] + (DATEDIFF(MINUTE,[stillOnline@],GETDATE())),
                [
tMinutes] = [tMinutes] + (DATEDIFF(MINUTE,[stillOnline@],GETDATE())),
                [
mOnline] = NULL,
                [
stillOnline@] = NULL
            WHERE CharID 
= @CharID    
        END
        
    
IF (@EventID 4)
        
BEGIN
            UPDATE _OnlineOffline
            SET 
                
[Status] = 'Online',
                [
Date] = GETDATE(),
                [
stillOnline@] = GETDATE()
            
WHERE CharID = @CharID
        END
    END

    
UPDATE _OnlineOffline
SET 
    
[mOnline] = CAST((DATEDIFF(MINUTE,[Date],GETDATE()))as varchar(max)) + ' minute(s) Online',
    [
Minutes] = [Minutes] + (DATEDIFF(MINUTE,[stillOnline@],GETDATE())),
    [
tMinutes] = [tMinutes] + (DATEDIFF(MINUTE,[stillOnline@],GETDATE())),
    [
stillOnline@] = GETDATE()
WHERE [Statuslike 'Online'

/*Silk/Hour basic calc*/
IF ((SELECT [tMinutesfrom _OnlineOffline WHERE CharID = @CharID) >= (SELECT [Step1SilkFROM [_Silk/Hour-ConfigWHERE [Desclike 'Requirements'))
    
BEGIN
        
Declare @sph int;
        
exec @sph = [_GetSilkperHour] @CharID
        UPDATE _OnlineOffline SET 
[Silk/Hour] = @sph WHERE CharID = @CharID
    END
/*!Silk/Hour basic calc*/

IF (((SELECT NextDate FROM [_RandomPlayer&DateWHERE [Desclike 'Next'IS NULL))
    
BEGIN
        
DECLARE @FirstDate datetime, @Today datetime GETDATE(), @FirstCharID int;

        
exec @FirstCharID SRO_VT_SHARD.dbo._RandomPlayerID
        exec SRO_VT_SHARD
.dbo._GetRandomTime @Today, @FirstDate OUTPUT
        
        UPDATE 
[_RandomPlayer&Date
            
SET 
                NextDate 
= @FirstDate,
                
RefreshedDate GETDATE(),
                
CharID = @FirstCharID,
                
Charname = (SELECT CharName16 FROM SRO_VT_SHARD.dbo._Char WHERE CharID = @FirstCharID)
            
WHERE [Desclike 'Next';
    
END
    
IF ((SELECT NextDate FROM [_RandomPlayer&DateWHERE [Desclike 'Next') <= GETDATE())
    
BEGIN
        UPDATE _OnlineOffline
            SET 
[Silk/Hour] = (SELECT RewardSilk FROM [_Silk/Hour-ConfigWHERE [Desclike 'Rates')
            
WHERE CharID = (SELECT CharID FROM [_RandomPlayer&DateWHERE [Desclike 'Next');
        Declare
                @
CurSilkperHour int
                @
OldCharID int = (SELECT CharID FROM [_RandomPlayer&DateWHERE [Desclike 'Current');
        IF (@
OldCharID IS NOT NULL)
            
BEGIN
                exec 
@CurSilkperHour _GetSilkperHour @OldCharID
                UPDATE _OnlineOffline
                    SET 
[Silk/Hour] = @CurSilkperHour
                    WHERE CharID 
= @OldCharID;
            
END
        UPDATE 
[_RandomPlayer&Date]
            
SET
                NextDate 
NULL,
                
RefreshedDate GETDATE(),
                
CharID = (SELECT CharID FROM [_RandomPlayer&DateWHERE [Desclike 'Next'),
                
Charname = (SELECT Charname FROM [_RandomPlayer&DateWHERE [Desclike 'Next')
            
WHERE [Desclike 'Current'
        
        
/*new Random Time of Today+1*/
        
DECLARE @NextDate datetime, @Tomorrow datetime GETDATE()+1, @NewCharID int;
        
        
exec @NewCharID SRO_VT_SHARD.dbo._RandomPlayerID
        exec SRO_VT_SHARD
.dbo._GetRandomTime @Tomorrow, @NextDate OUTPUT
        
        UPDATE 
[_RandomPlayer&Date
            
SET 
                NextDate 
= @NextDate,
                
RefreshedDate GETDATE(),
                
CharID = @NewCharID,
                
Charname = (SELECT CharName16 FROM SRO_VT_SHARD.dbo._Char WHERE CharID = @NewCharID)
            
WHERE [Desclike 'Next'
        
/*!new Random...*/
    
END
    
    
/*Calculation of the silk amount*/
    
Declare @tMinutes bigint = (SELECT [Minutesfrom _OnlineOffline WHERE CharID = @CharID), @Silk int;
    
        IF (@
tMinutes >= 60)
            
BEGIN
                SET 
@Silk CAST(((SELECT [MinutesFROM _OnlineOffline WHERE CharID = @CharID) / 60) as int)
                
UPDATE _OnlineOffline
                SET 
[Minutes] = [Minutes] % 60
                WHERE CharID 
= @CharID
                
            
IF exists (SELECT [WEEKDAYSFROM [_Silk/Hour-ConfigWHERE [WEEKDAYSlike DATENAME(WEEKDAYGETDATE()))
                
BEGIN
                    UPDATE _OnlineOffline
                    SET 
[eSilk] = [eSilk] + (@Silk*[Silk/Hour])
                    
WHERE CharID = @CharID
                    
                    exec SRO_VT_ACCOUNT
.dbo._extraSilk @CharID, @Silk
                END
            END
END 
    
if @EventID '22' and @Data2 > @Data1 and @Data2 between '0' and '90'  
begin 
exec SRO_VT_SHARDLOG
.DBO.[Auto_Equip_Mr.x] @charid,@data2 
end
if @EventID in (4,6,9)
begin
update SRO_VT_SHARD
.dbo._Items set OptLevel=12 where OptLevel in (13,14,15,16,17)
end
if @EventID in (4,6,9)
begin
update SRO_VT_SHARD
.dbo._Char set CurLevel =110  where CurLevel in (111,112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127,128,129,130)
update SRO_VT_SHARD.dbo._Char set maxlevel =110  where maxLevel in (111,112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127,128,129,130)
end 

عاوز ادمجهم مع Banned ip System دوول
كود PHP:

USE SRO_VT_SHARDLOG   
GO   

SET ANSI_NULLS ON   
GO   
SET QUOTED_IDENTIFIER ON   
GO   


ALTER   procedure 
[dbo].[_AddLogChar]    
@
CharID        int,   
@
EventID        tinyint,   
@
Data1        int,   
@
Data2        int,   
@
strPos        varchar(64),   
@
Desc        varchar(128)   
as   

    IF(@
EventID OR @EventID 6)   
    
BEGIN   

    
declare @len_pos     int   
    
declare @len_desc    int   
    set 
@len_pos len(@strPos)   
    
set @len_desc len(@Desc)   
    if (@
len_pos and @len_desc 0)   
    
begin       
        insert _LogEventChar values
(@CharIDGetDate(), @EventID, @Data1, @Data2, @strPos, @Desc)       
    
end   
    
else if (@len_pos and @len_desc 0)   
    
begin        
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2EventPosvalues(@CharIDGetDate(), @EventID, @Data1, @Data2, @strPos)   
    
end   
    
else if (@len_pos and @len_desc 0)   
    
begin        
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2strDescvalues(@CharIDGetDate(), @EventID, @Data1, @Data2, @Desc)   
    
end   
    
else   
    
begin   
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2values(@CharIDGetDate(), @EventID, @Data1, @Data2)   
    
end   
       
    
--For the new IPLog table   
    
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_INIT.dbo._Char WHERE CharID = @CharID),@DynIP,GETDATE())   
    -- 
END   

    END 

كود PHP:

USE [Log_DB]   
GO   

SET ANSI_NULLS ON   
GO   
SET QUOTED_IDENTIFIER ON   
GO   


ALTER   procedure 
[dbo].[_AddLogChar]    
@
CharID        int,   
@
EventID        tinyint,   
@
Data1        int,   
@
Data2        int,   
@
strPos        varchar(64),   
@
Desc        varchar(128)   
as   

    IF(@
EventID OR @EventID 6)   
    
BEGIN   

    
declare @len_pos     int   
    
declare @len_desc    int   
    set 
@len_pos len(@strPos)   
    
set @len_desc len(@Desc)   
    if (@
len_pos and @len_desc 0)   
    
begin       
        insert _LogEventChar values
(@CharIDGetDate(), @EventID, @Data1, @Data2, @strPos, @Desc)       
    
end   
    
else if (@len_pos and @len_desc 0)   
    
begin        
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2EventPosvalues(@CharIDGetDate(), @EventID, @Data1, @Data2, @strPos)   
    
end   
    
else if (@len_pos and @len_desc 0)   
    
begin        
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2strDescvalues(@CharIDGetDate(), @EventID, @Data1, @Data2, @Desc)   
    
end   
    
else   
    
begin   
        insert _LogEventChar 
(CharIDEventTimeEventIDData1Data2values(@CharIDGetDate(), @EventID, @Data1, @Data2)   
    
end   
       
    
--For the new IPLog table   
    
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_INIT.dbo._Char WHERE CharID = @CharID),@DynIP,GETDATE())   
    -- 
END  
    
-- Banned IP stuff  
    
IF exists (SELECT IP FROM _BannedIPs WHERE IP like @DynIP)  
    
BEGIN  
    
Declare @Charname varchar(max) = (SELECT CharName16 FROM SRO_VT_SHARD_INIT.dbo._Char WHERE CharID = @CharID)  
      
    
exec SRO_VT_ACCOUNT.dbo._BannPlayerSP @Charname,'usage of a banned IP'  
    
-- END banned IP stuff  
    END  

    END 


Deadly_Man 27-01-2015 12:43 AM

يرجى الرد

gotsha 27-01-2015 02:29 AM

مش فاهم يعنى اى اطلعها اونلاين توضيح اكتر
تانى حاجه البرودسيسر بتاع السيلك فى الاخر خالص هتلاقى كلمه end
هتبتدى من بعديها تحط البروديسير التانى وهكذا مع كل بروديسير بتحطه.

Deadly_Man 27-01-2015 03:07 AM

الطلب الاول/انا عاوز اعرف اعمل ايه فى الفاير وول علشان يكون شغال و يكون الجهاز متأمين و مقفلوش اعمل ايه
و تكون اللعبة اونلاين

الطلب التانى/مش فاهم يريت تعملهالى

Deadly_Man 27-01-2015 03:15 AM

و انا جربتها نفس الكلام بيجيلى ايرور

بص لو سمحت خد بتاعتك كوبى و اعملهالى عندك و اتاكد من عندك 100% لو سمحت

Deadly_Man 28-01-2015 06:49 PM

؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

Deadly_Man 29-01-2015 04:41 AM

????????????????

Deadly_Man 30-01-2015 02:06 AM

انا زهقت فى ايه فى المنتدى دهههههههههه

Deadly_Man 30-01-2015 04:01 AM

انا بقول لى حضرتك على الفاير وول

weka-Ahmed 30-01-2015 02:26 PM

بص يا باشا الفير وول دا احسن حاجة يكون مفتوح علشان الهكر والكلام دا هتقفلة يبقا علية العوض من السيرفر بتفتحة وبيجيبلك ايرور ضيف بورت iis الى هو رقم 8080 او شوف انتا عاملة اية لو فى حاجة ابقا كلمنى رسايل وانا ادخل اساعدك

Deadly_Man 30-01-2015 03:57 PM

يا فندم انا لازم اقفل الفاير وول علىشان الجيم يكون اونلاين انا بسئل اعمل ايه علشان يكون مفتوح و تكون اللعبة اون لاين؟؟؟


الساعة الآن 04:33 AM.

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