v1299 SOACSv41 FREE [KANAT (Wing) version][UNLICENCED]

koray_10' Alıntı:

eski konu silinmiş kim sildi bilmiyorum.dediğim gibi internet cafeden yaptım 1 2 saat anca baktım pek vaktim olmadı aceleye geldi biraz sorun çıkarsa pm atın.



özkanın yaptığı kanattır ilk yaptığı version daha sonrasını bilmiyorum yenisini parlıyo uçuyor bişiler oluyomuş bunda kıpraşma fln yokmuş bişi yokmuş da tam ney yokmuş bilmiyom

turkkodan bir resim buranın exesinide kullanabilirsiniz ama version farklı buranın version değiştirmeyi bi ara hatırlatın yaparım.

burada kendi serverımızdan çektiğimiz bir resim

Server Files Download Link:​

***Hidden content cannot be quoted.***

KanatPatch Download Link:​

***Hidden content cannot be quoted.***

SOACS TBLEDITOR Download Link:​

***Hidden content cannot be quoted.***



Gerekli Prosedürler

Kod:

CREATE PROCEDURE [dbo].[SOACS_LOGIN]

@AccountID varchar(21),

@Password varchar(13),

@IpAddress	varchar(50),

@HwID		varchar(50),

@nRet		smallint	OUTPUT

AS



if(exists(select * from HardwareBanList where ltrim(rtrim(HWID)) = ltrim(rtrim(@HwID))))

begin

	-- Blocked HardwareID

	SET @nRet = 4

	RETURN

end

IF dbo.IsValidCharacters(@AccountID) = 1

BEGIN

	SET @nRet = 2 -- Hesap Bulunamady.

	RETURN

END



IF dbo.IsValidCharacters(@Password) = 1

BEGIN

	SET @nRet = 3 -- ?ifreniz Hatalydyr.

	RETURN

END



-- Oto Üyelik

select @nRet = count(straccountid) from tb_user where straccountid = @AccountID



if @nRet = 0

BEGIN

	INSERT INTO TB_USER (strAccountID, strPasswd, strSocNo, iDays) VALUES (@AccountID, @Password, 1, '6')

END



------- Database By_Bts Tarafindan Hazirlanmistir. --------

DECLARE @Nation tinyint, @CharNum smallint

SET @Nation = 0

SET @CharNum = 0

DECLARE @pwd varchar(13)

SET @pwd = null

SELECT @pwd = strPasswd FROM [dbo].[TB_USER] WHERE strAccountID = @AccountID

IF @pwd IS null

BEGIN

 SET @nRet = 0

 RETURN

END

ELSE IF @pwd <> @Password

BEGIN

 SET @nRet = 0

 RETURN

END

--CurrentUserdan Silelim

delete from currentuser where straccountid = @AccountID

--Currentuser bitis

---Login bilgilerini kaydet

Insert Into HardwareLog values (@AccountID,@IpAddress,ltrim(rtrim(@HwID)),getdate())

--Login bilgileri bitis

SELECT @Nation = bNation, @CharNum = bCharNum FROM ACCOUNT_CHAR WHERE strAccountID = @AccountID

IF @@ROWCOUNT = 0

BEGIN

 SET @nRet = 1

 RETURN

END

IF @CharNum >= 0

BEGIN

 SET @nRet = 1

 RETURN

END

ELSE

BEGIN

 SET @nRet = @Nation+1

 RETURN

END

Kod:

CREATE FUNCTION [dbo].[IsValidCharacters](@SData varchar(8000))

RETURNS INT 

AS



BEGIN



	DECLARE @SDataLen int

	DECLARE @Loop int

	DECLARE @Letter varchar(1)

	DECLARE @RXLetters varchar(8000)

	DECLARE @Match tinyint

	

	SET @RXLetters = 'qwertyuopasdfghjklizxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM1234567890_'

	SET @SDataLen = LEN(@SData)

	SET @Loop = 1

	SET @Match = 0

	

	WHILE @Loop < (@SDataLen + 1)

	BEGIN

	

		SET @Letter = RTRIM(LTRIM(SUBSTRING(@SData,@Loop,1)))



		IF CHARINDEX(@Letter,@RXLetters) = 0

		BEGIN

			SET @Match = 1

			BREAK

		END

	

		SET @Loop = @Loop + 1

	END

	

	RETURN @Match

END

Kod:

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[HardwareBanList]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)

drop table [dbo].[HardwareBanList]

GO



CREATE TABLE [dbo].[HardwareBanList] (

	[strAccountID] [varchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,

	[HWID] [varchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,

	[Time] [datetime] NULL 

) ON [PRIMARY]

GO

Kod:

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[HardwareLog]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)

drop table [dbo].[HardwareLog]

GO



CREATE TABLE [dbo].[HardwareLog] (

	[AccountID] [char] (32) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,

	[IP] [char] (32) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,

	[HWID] [char] (32) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,

	[LoginTime] [datetime] NULL 

) ON [PRIMARY]

GO

Kod:

create PROCEDURE [dbo].[HWBAN] 

	-- Add the parameters for the stored procedure here

@AccountID varchar(21),

@HwID		varchar(50)

AS

BEGIN

	SET NOCOUNT ON;



    -- Insert statements for procedure here

	Insert Into HardwareBanList values (@AccountID,@HwID,GETDATE())

	PRINT @AccountID  + ' hesabina ait ' + @HwID + ' seri no banlandi'

END

içinde server filesler ve client klasörü vardır client klasörünü patch olarak atın.

server ip sini server.ini yazın değişir.



Koray_10

Genişletmek için tıkla ...