jiji0513 发表于 2008-11-5 16:45:50

有人有無這個刷裝備工具???(有圖)

有人有無這個刷裝備工具???如圖
http://img363.imageshack.us/img363/7845/bytolqa04sm6.jpg

ctgwglzc 发表于 2008-11-5 16:49:03

原帖由 jiji0513 于 2008-11-5 16:45 发表 http://www.kofans.cn/bbs/static/image/common/back.gif
有人有無這個刷裝備工具???如圖
http://img363.imageshack.us/img363/7845/bytolqa04sm6.jpg
以前有,现在删了,我现在有更好的工具Electro Shock Private Server Gaming开发的USERDEITOR

jiji0513 发表于 2008-11-5 16:52:25

在哪裡??要錢嗎 = ="

ctgwglzc 发表于 2008-11-5 17:14:19

原帖由 jiji0513 于 2008-11-5 16:52 发表 http://www.kofans.cn/bbs/static/image/common/back.gif
在哪裡??要錢嗎 = ="
台币3000,嘿嘿~
回头我把你要的东东发上来,现在没空

jiji0513 发表于 2008-11-5 17:46:23

感恩哩^^"

[ 本帖最后由 jiji0513 于 2008-11-5 17:53 编辑 ]

1300121 发表于 2008-11-8 12:49:37

大大好棒 大大好棒

ctgwglzc 发表于 2008-11-8 23:15:30

提供这个工具的源进程,需要的自行开发

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

ctgwglzc 发表于 2008-11-8 23:15:49

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

ctgwglzc 发表于 2008-11-9 00:01:45

同时必须建立以下的表

USE kn_online
go
DROP TABLE itemler
go
CREATE TABLE itemler(
dwid int,
stacksize smallint,
durability smallint,
strUserId varchar(50),
sira int,
itembasicname varchar(100),
extname varchar(100)
)

jiji0513 发表于 2008-11-11 21:58:37

感謝提供^^"
原來還需要新增才可以使用~~難怪我資料庫等帳密都對卻無法正常使用= =!
页: [1] 2
查看完整版本: 有人有無這個刷裝備工具???(有圖)