update:
[You must be registered and logged in to see this link.]

update:
[You must be registered and logged in to see this link.]











=====================================================
Chào các bạn, mình có cái tool này dùng để xem cái file EL muốn nhờ các bạn xem và góp ý:
+ Có thể xem được nhiều version nhờ vào việc tùy chỉnh file config
+ Có source (mình tự type)
+ Bạn nào có nhu cầu và yêu thích, mình sẽ gửi source
+ Có thể edit được (tạm thời bị disable)
+ Code:delphi
pass: fullhouse.forum-viet.com
link: [You must be registered and logged in to see this link.]

ái chà xem lại thấy giống một tools đã có trong 4rum. quả là ý tưởng trùng hợp quá khi hì


update:
newwww[You must be registered and logged in to see this link.]

Tiếc quá tool này không edit được

vitvn đã viết:

Tiếc quá tool này không edit được

hi hi, mình đang hiệu chỉnh file text config, cái này tốn khá nhiều time, code thì nhanh mà cái dò file text để tool dùng nó để đọc thấy mệt quá. định mỗi ngày dò một list
bạn nào hứng thú build file text config thì mình chân thành cám ơn!!
Cái file config mình tạo nhanh, muốn đúng cần dò lại theo file EL <-- mệt cái khâu này!!

thank bạn đã chia sẻ trên diễn đàn ^^!

code này viết bằng delphi ^^! , tác giả chính của tool hình như có puplic code thì phải, mà hem có thì ta dịch ngược code ^^!

nói chung các tool cũng na ná giống nhau thui, quan trọng là sử dụng cách nào cho hợp lý và có lợi nhất cho chúng ta phải hem bạn ^^!

Ngọc Châu đã viết:

thank bạn đã chia sẻ trên diễn đàn ^^!

code này viết bằng delphi ^^! , tác giả chính của tool hình như có puplic code thì phải, mà hem có thì ta dịch ngược code ^^!

nói chung các tool cũng na ná giống nhau thui, quan trọng là sử dụng cách nào cho hợp lý và có lợi nhất cho chúng ta phải hem bạn ^^!

ịch, dịch ngược code, có cách nào để không dịch ngược code không bạn chỉ mình với.
Mình thấy cách của mình hơi tốn ram, đang nghiên cứu lại.
Cám ơn bạn đã nhắc nhở mình (phải nghiên cứu cái không dịch ngược mới được).

việc học dịch ngược code và chống dịch code không nằm trong phạm vi puplic, kể cả trên diễn đàn này hay trên mạng . Nó là một công việc, mà mình hem thích mang công việc vào game chỉ để chơi

Nói chung mềnh cũng hem bít nhìu về code đâu ^^! thấy các bác a mềnh cũng a, b mềnh cũng b thui ^^!

ừa vui là chính, để học hỏi và nghiên cứu là chính....còn lại phụ tất...
Mình sửa lại code rồi, nói chung tự nhân thấy cũng good, có điều không dám puplic, để sửa thêm đã, đúng là .... chẳng đâu vào đâu!

Tool Hay.. Chỉ tội cứ mổi lần read xong lại hiện form "Xong!" hơi phiền... . Nhưng vẫn hơn Trminh chỉ biết xài của người khác... . Vấn đề Exp vẩn chưa mò ra .????????????????????

uh nhưng mà tốn ram kinh khủng, fix được vấn đề này và có edit thì tool rất hay, mong sớm được nhìn thấy 1 tool ưu việt, hjhj

cái này chưa hoàn thiện lắm, check thử nhé các bạn:
[You must be registered and logged in to see this link.]

Hoan hô tinh thần của bạn ... Trên cả tuyệt vời, để mình thêm vài item rùi test xem sao .

phần edit rootnode không biết có tác dụng gì, mình đưa vào luôn:

Code:

[url=http://www.mediafire.com/?yktmifq4w5d]as[/url]

simple code, nếu bạn nào quan tâm sửa cho gọn và ngắn lại giùm nhé vì mình chưa sửa code

procedure TfrmELEdit.SpeedButtonloadrootClick(Sender: TObject);
var
s,s1,str:string;
int:int64;
aa,bb,cc,dd,i,j,k,m,size1,Enum:integer;
FileStream, FileStream1:TFileStream;
begin
if _Busy then exit;
_Busy:=true;
ListBox1.Items.Clear;
s:=Edit6.Text;
int:=strtoint(Edit4.Text);
if not FileExists(s) then exit;
FileStream:=TFileStream.Create(s,fmOpenRead);
with FileStream do
try
seek(int,0);
read(aa,4);
ListBox1.Items.Add(inttostr(aa));
int:=int+4;
Enum:=aa;
m:=1;
repeat
seek(int,0);
read(aa,4);
s1:='';
setlength(s1,128*2);
zeromemory(Pointer(s1),128*2);
read(Pointer(s1)^,128);
ListBox1.Items.Add(#13+#10+inttostr(aa) +': '+ '++++++++++++++++++++++++++++++++++');
ListBox1.Items.Add(s1);
read(aa,4);
int:=int+4+128+4;
k:=1;
while k<=aa do
begin
read(bb,4);
read(cc,4);
read(size1,4);
s1:='';
setlength(s1,size1*2*2);
zeromemory(Pointer(s1),size1*2*2);
read(Pointer(s1)^,size1*2);
ListBox1.Items.Add(inttostr(bb) +'/'+ inttostr(aa));
ListBox1.Items.Add(inttostr(cc));
ListBox1.Items.Add(s1);
int:=int+12+size1*2;
read(bb,4);
ListBox1.Items.Add(inttostr(bb));
for I := 1 to bb do
begin
read(dd,4);
s1:='';
setlength(s1,132*2);
zeromemory(Pointer(s1),132*2);
read(Pointer(s1)^,132);
ListBox1.Items.Add(inttostr(dd));
ListBox1.Items.Add(s1);
end;
int:=int+4+(4+132)*bb;
inc(k);
end;
int:=int;
read(aa,4);
s1:='';
setlength(s1,128*2);
zeromemory(Pointer(s1),128*2);
read(Pointer(s1)^,128);
inc(m);
if m=46 then
m:=m;
until (m=Enum+1);

finally
free;
end;
_Busy:=false;
end;

procedure TfrmELEdit.SpeedButtonsaverootClick(Sender: TObject);
var
s,s1,str:string;
int:int64;
aa,bb,cc,dd,i,j,k,m,size1,size2,tren:integer;
FileStream, FileStream1:TFileStream;
begin
if _Busy then exit;
_Busy:=true;
s:=Edit6.Text;
int:=strtoint(Edit4.Text);
if not FileExists(s) then exit;
FileStream:=TFileStream.Create(s,fmOpenRead);
FileStream1:=TFileStream.Create(File_tanker+'.tmp',fmCreate);

FileStream1.CopyFrom(FileStream,int);
i:=strtoint(ListBox1.Items.Strings[0]);
FileStream1.write(i,4);
k:=1;
dd:=0;
repeat
dd:=dd+2;
FileStream1.write(k,4);
s1:='';
setlength(s1,128*2);
zeromemory(Pointer(s1),128*2);
s:=ListBox1.Items.Strings[dd]+s1;
FileStream1.write(pointer(s)^,128);
s:=ListBox1.Items.Strings[1+dd];
tren:=strtoint(copy(s,pos('/',s)+1,length(s)-1));
FileStream1.write(tren,4);
m:=1;
while m<=tren do
begin
s:=ListBox1.Items.Strings[dd+1];
j:=strtoint(copy(s,1,pos('/',s)-1));
FileStream1.write(j,4);
i:=strtoint(ListBox1.Items.Strings[2+dd]);
FileStream1.write(i,4);
dd:=dd+2;
s:=ListBox1.Items.Strings[1+dd];
i:=length(s)+1;
FileStream1.write(i,4);
s1:='';
setlength(s1, i*2*2);
zeromemory(Pointer(s1),i*2*2);
s:=s+s1;
FileStream1.write(pointer(s)^,i*2);
i:=strtoint(ListBox1.Items.Strings[2+dd]);
FileStream1.write(i,4);
dd:=dd+2;
for j := 1 to i do
begin
aa:=strtoint(ListBox1.Items.Strings[1+dd]);
FileStream1.write(aa,4);
s:=ListBox1.Items.Strings[2+dd];
s1:='';
setlength(s1, 132*2);
zeromemory(Pointer(s1),132*2);
s:=s+s1;
FileStream1.write(pointer(s)^,132);
dd:=dd+2;
end;
inc(m);
end;
inc(k);
if k=46 then
k:=46;
until k=60;
FileStream1.Free;
FileStream.Free;
if FileExists(File_tanker+'.bak') then
deletefile(File_tanker+'.bak');
renamefile(File_tanker,File_tanker+'.bak');
renamefile(File_tanker+'.tmp', File_tanker);
if _change then
showmessage('Lưu xong!');
_change:=false;
_Busy:=false;
end;

Cái rootnode để view và edit các lời nói của npc trong game
Còn cái element thì cần tăng thêm tốc độ load id và nên thêm phần config tên list :D dễ tìm mà không lẫn lộn

P/S : tools rất tốt :) nên share src cho anh em nghiên cứu

hy vọng trong thời gian tới dung059 sẽ ra hoàn thiện bản ELread với các chức năng pro để share cho anh em, Nhi nghĩ rằng hầu như mọi người ở đây đều mong chờ điều đó, 1 tool dễ sử dụng, tùy biến, không ngốn bộ nhớ và hoàn hảo. . Nhi rất phục khả năng code của bạn , cảm ơn bạn đã đóng góp tài nguyên cho diễn đàn

rick đã viết:

Cái rootnode để view và edit các lời nói của npc trong game
Còn cái element thì cần tăng thêm tốc độ load id và nên thêm phần config tên list :D dễ tìm mà không lẫn lộn

P/S : tools rất tốt :) nên share cho anh em nghiên cứu

có lẽ nên shred , mỗi tội, mình code không khoa học lắm nên ngại[You must be registered and logged in to see this link.]

Cái rootnode không edit đc rồi ^^ edit là lỗi ngay
Còn src thì mình chỉ bảo share cho anh em nào bít delphi thôi
Còn mình ngu ngơ cái đó lắm

rick đã viết:

Cái rootnode không edit đc rồi ^^ edit là lỗi ngay
Còn src thì mình chỉ bảo share cho anh em nào bít delphi thôi
Còn mình ngu ngơ cái đó lắm

chết rồi, khi save dư một dòng lệnh nên ghi dư mất 4 bytes, thôi để vậy đi, có src đó, hy vọng có ai đó nhiều thời gian hơn mình :D, file trên mình sẽ xoá đi vậy!
mình sẽ dành thời gian để hoàn thiện cái file *.editor cái dã rồi tiếp tục sau. Nên hoàn thiện từng mục một :::

cái tool này đã có chức năng edit rootnode chưa dung?

Tool này hay nhỉ Thank cái nè lần trước down bản cũ thì tốn ram quá bản này thấy ok thật.Tiếc là trước mình học mỗi cái pascal nên cái này không hiểu để làm

nếu ok thì trình đọc .cfg sau đó sửa để tool này đọc được bất cứ EL nào cũng không phải là khó

vitvn đã viết:

Tool này hay nhỉ Thank cái nè lần trước down bản cũ thì tốn ram quá bản này thấy ok thật.Tiếc là trước mình học mỗi cái pascal nên cái này không hiểu để làm

HÀ HÀ trước mình học pascal đấy, cái này thì tự mò, mà giờ pascal thì xin đầu hàng.
dạo này lười quá, lâu lâu nghĩ ra cái gì thì gõ cái đó
@Châu nhi: có edỉt rootnode, nhưng không add new.

có edit thì tốt rùi , mà phát triển cho bản 422 chưa dung?

mình không có ý tiếp tục, hôm qua del (chính xác là bị) hết ổ cứng. cài cái ubuntu desktop đẹp phết!!!!

có update cho 422, có bạn nào quan tâm tới cái này và làm file cfg share cho mình cái, thank!!!!
mời lên trang đầu (nói thực mình chưa test)!!