Inventory Editor(AVCI)

[ADOS]

piyasada bulunması zor hale geldi, @kissmenin arşivinde varmış ben de aldım paylaşayım dedim.(uzun bir süre arayıp bulamamıştım, başka arayan varsa yorulmasın dedim



yeni editorlerin hepsi bi hata veriyor bu dll istemez ocx istemez.(bunun yeri ayrı:b

Inventory Editor&uploadhercai.rar

sql 2000 için gerekli proclar:

--bu procedure Maktiris1536 tarafından eylenmiştir..



CREATE procedure itemleri_bul 

@StrUserID varchar(30)

AS

DECLARE

@length int, -- stritem uzunluğu

@i int, -- item'in stritem deki yeri

@dwid int, 

@dur int,

@duar int,

@StackSize1 int,

@Sira int,

@Row int,

@name varchar(100),

@extname varchar(100),

@ext int





    set @i = 14*0+1

    set @length = 401



select @row=count(*) from userdata where struserid=@StrUserID



delete from itemler where struserid=@StrUserID



if @row>0 

  begin



WHILE @i < @length

Begin



Select @dwid=cast(cast(substring(cast(substring(strItem, @i,4) as varbinary(4)), 4, 

1)+substring(cast(substring(strItem, @i,4) as varbinary(4)), 3, 1)+substring(cast(substring(strItem, @i,4) as 

varbinary(4)), 2, 1)+substring(cast(substring(strItem, @i,4) as varbinary(4)), 1, 1) as varbinary(4)) as int(4)),

@dur = cast(cast(cast( substring(strItem, @i+5, 1) as varbinary(1))+cast(substring(strItem, @i+4, 1) as 

varbinary(1)) as varbinary(2)) as smallint),

@StackSize1 = cast(cast(cast( substring(strItem, @i+7, 1) as varbinary(1))+cast(substring(strItem, @i+6, 1) as 

varbinary(1)) as varbinary(2)) as smallint),

        @StrUserID = strUserID

        From UserData

        Where strUserID = @StrUserID









insert into itemler (dwid,stacksize,durability,struserid,sira,itembasicname,extname) 

values(@dwid,@stacksize1,@dur,@StrUserID,(@i-1) / 8,@extname,@name )



set @i=@i+8



end

end



GO

--bu procedure Maktiris1536 tarafından eylenmiştir..





CREATE procedure itemleri_encode

@StrUserID varchar(30)

AS

DECLARE

@length int, -- stritem uzunluğu

@row int, -- yerine göre deişior.

@i int, -- item'in stritem deki yeri

@dwid int, -- dwid

@pos int,

@dur int,

@dur1 int,

@ext int,

@StackSize1 int,

@strName varchar(30),

@strExtName varchar(30),

@Cdwid varbinary(4),

@cdur varchar(2),

@Source tinyint,

@NEWdwid int,

@StackSize int,

@cstack varchar(2),

@sira int



    set @sira=0

    set @i = 14*0

    set @length = 401



select @row=count( * ) from userdata where struserid=@StrUserID



if @row>0 

  begin





Select @dwid=dwid,

@dur = durability,

@StackSize1 = stacksize,

        @StrUserID = strUserID

        From itemler

        Where strUserID = @StrUserID and sira=@sira



    Set @Cdwid = Substring(cast(@dwid as varbinary(4)), 4, 1) + Substring(cast(@dwid as varbinary(4)), 3, 1) + 

Substring(cast(@dwid as varbinary(4)), 2, 1) + Substring(cast(@dwid as varbinary(4)), 1, 1)

    Set @Cdur = cast(Substring(cast(@dur as varbinary(2)), 2, 1)+Substring(cast(@dur as varbinary(2)), 1, 1) as 

varchar(2))

    Set @Cstack = cast(Substring(cast(@StackSize1 as varbinary(2)), 2, 1)+Substring(cast(@StackSize1 as 

varbinary(2)), 1, 1) as varchar(2))





    update UserData set strItem = cast(cast(cast(@Cdwid as varchar(4)) + @Cdur + @Cstack as varchar(8))   as 

binary(400)) where strUserID = @strUserID





set @i=@i+8

set @sira=@sira+1







WHILE @sira < 50

Begin



Select @dwid=dwid,

@dur = durability,

@StackSize1 = stacksize,

        @StrUserID = strUserID

        From itemler

        Where strUserID = @StrUserID and sira=@sira



    Set @Cdwid = Substring(cast(@dwid as varbinary(4)), 4, 1) + Substring(cast(@dwid as varbinary(4)), 3, 1) + 

Substring(cast(@dwid as varbinary(4)), 2, 1) + Substring(cast(@dwid as varbinary(4)), 1, 1)

    Set @Cdur = cast(Substring(cast(@dur as varbinary(2)), 2, 1)+Substring(cast(@dur as varbinary(2)), 1, 1) as 

varchar(2))

    Set @Cstack = cast(Substring(cast(@StackSize1 as varbinary(2)), 2, 1)+Substring(cast(@StackSize1 as 

varbinary(2)), 1, 1) as varchar(2))





    update UserData set strItem = cast( substring(strItem, 1, @i) + cast(cast(@Cdwid as varchar(4)) + @Cdur + 

@Cstack as varchar(8)) + substring(strItem, @i+8, 401-@i) as binary(400)) where strUserID = @strUserID





set @i=@i+8

set @sira=@sira+1



end

end

delete from itemler





GO

Sql 2008 için prosedürler:Inventory editor çalıştırmak.(SQL 2008)

 

[Kocu]

ty kanki

 

[vesvashannas]

saolasın .

 

[kurzschleudern]

teşekkürler hercai sagolasın...

 

[kyaxares]

tsk ederim payklaşımın için

 

[ToruqMACTO]

eyw ++++++

 

[love1233]

Süper tv

 

[Rabbit]

+++++++++++++

 

[new_cocuk]

teşekkürler

 

[BrainV4Lor]

Cevap: Inventory Editor(AVCI)



Teşekkürler.

 

[ATASAY]

Cevap: Inventory Editor(AVCI)



Eyw Güzel paylasım Şahin

 

[rgrgrg]

Cevap: Inventory Editor(AVCI)



sağol

 

[hstsapi]

tyyyy

 

[DAVUTBEY]

Cevap: Inventory Editor(AVCI)



Teşekkürler reis

 

[zamandar]

Cevap: Inventory Editor(AVCI)



Teşekkürler

 

[alphalord000]

Cevap: Inventory Editor(AVCI)



saol

 

[akkerman11]

teşekkürler

 

[UzmanDatabase]

Cevap: Inventory Editor(AVCI)



teşekkürler.

 

[kamilsahin]

Cevap: Inventory Editor(AVCI)



saolasın

 

[BaLTaZaR]

Cevap: Inventory Editor(AVCI)



eyw+++++++++++++++++