ขอบคุณล่วงหน้านะครับ
ขอสคิปโดดเควสม้าเฉียวออกตัวเดียวที่เหลียงโจวหน่อยนะครับ
เริ่มโดย eaykeng, Mar 06 2007 10:51 PM
มี 1 โพสต์ตอบกลับกระทู้นี้
#1
โพสต์เมื่อ 06 March 2007 - 10:51:25 PM
#2
โพสต์เมื่อ 07 March 2007 - 03:44:46 AM
ขอบคุณล่วงหน้านะครับ
var i: Byte;
procedure Logon;
begin
i := 0;
end;
procedure OnTimer;
begin
Inc(i);
if (i = 2) then ClickNpc(1);
end;
procedure NpcDialog(DialogId: Integer);
begin
if (DialogId = 28236) then
begin
SendDialogEnd;
SendDialogEnd;
SendDialogEnd;
SendDialogEnd;
SendDialogEnd;
end;
if (DialogId = 28241) then
SendCancelQuest;
ClickNPC(1);
end;
end;
begin
echoChat('ม้าเสียว.txt โหลดเสร็จแล้วครับ',clRed);
end.
procedure Logon;
begin
i := 0;
end;
procedure OnTimer;
begin
Inc(i);
if (i = 2) then ClickNpc(1);
end;
procedure NpcDialog(DialogId: Integer);
begin
if (DialogId = 28236) then
begin
SendDialogEnd;
SendDialogEnd;
SendDialogEnd;
SendDialogEnd;
SendDialogEnd;
end;
if (DialogId = 28241) then
SendCancelQuest;
ClickNPC(1);
end;
end;
begin
echoChat('ม้าเสียว.txt โหลดเสร็จแล้วครับ',clRed);
end.
0 สมาชิกกำลังอ่านกระทู้นี้
0 สมาชิก, 0 ผู้เยี่ยมชม, 0 ผู้ใช้งานที่ซ่อนตัว