[KT] Share Script Plugin Save Tọa Độ Nhanh [Lưu trữ]

View Full Version : [KT] Share Script Plugin Save Tọa Độ Nhanh

__Jie__

25-07-20, 10:42 PM

Mấy nay mình có làm vài cái event mà thấy việc ghi lại toa độ cực quá nên có làm cái Script Plugin Save Tọa Độ Nhanh.

Bao gồm 2 file .Lua va .File Text (txt)

Link dowload : [Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]

Sau khi tải về chép vào interface phím tắt shift+5. Di chuyển nhân vật đến đâu save đến đó

Note : Có thể có tọa độ save bị trùng lại. Copy vào excel remove duplicate là được

[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>] ([Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>])

[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>] ([Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>])

1. File Lua những dòng màu đỏ các bạn có thể thay đổi theo ý mình

local tbSaveToaDo = Map.tbSaveToaDo or {};
Map.tbSaveToaDo = tbSaveToaDo;

local self = tbSaveToaDo;

local nSwitch = 0;
tbSaveToaDo.Folder = "\\interface\\JieNguyen\\"; -- duong dan folder
tbSaveToaDo.List = "Save_ToaDo.txt"; -- ten file txt

function tbSaveToaDo:SwitchSave()
if nSwitch == 0 then
self:Start()
else
self:Stop();
end
end

function tbSaveToaDo:Start()
me.Msg("<color=yellow>Bắt đầu Save Tọa Độ")
self.nTimers = Timer:Register(Env.GAME_FPS * 0.3,self.OnTimes,self);
nSwitch = 1
end

function tbSaveToaDo:Stop()
me.Msg("<color=green>Dừng Save Tọa Độ")
nSwitch = 0
Timer:Close(self.nTimers)
end

function tbSaveToaDo:OnTimes()
local nMyMapId, nMyPosX, nMyPosY = me.GetWorldPos();
me.Msg("Get ID Map<enter><color=green>Mã bản đồ: <color=orange>"..nMyMapId.."<color> - <color=orange>"..nMyPosX.."/"..nMyPosY.."<color> - <color=orange>"..(nMyPosX*32).." / "..(nMyPosY*32));
local szFile = tbSaveToaDo.Folder..tbSaveToaDo.List.."";
KFile.AppendFile(szFile, ""..nMyMapId.."\t"..nMyPosX.."\t"..nMyPosY.."\t"..(nMyPosX*32).."\t"..(nMyPosY*32).."\r\n");

end

local tCmd={ "Map.tbSaveToaDo:SwitchSave()", "SwitchSave", "", "Shift+5", "Shift+5", "Save Toa Do"}; -- phim tat
AddCommand(tCmd[4], tCmd[3], tCmd[2], tCmd[7] or UiShortcutAlias.emKSTATE_INGAME);
UiShortcutAlias:AddAlias(tCmd[2], tCmd[1]);

File TXT. Tạo 1 file nào cũng được đúng tên trên file lua là được

nMyMapId nMyPosX nMyPosY nMyPosX32 nMyPosY32
1 1375 3079 44000 98528
1 1375 3079 44000 98528

bosualongthanh

26-07-20, 10:50 AM

tks thím, thjm ấy lun cái pos 3 số ingame lun cho đủ. [ map > 5 so > 4so > 3 so ] ^_^
minh thích Flugin KT hơn là auto, an toàn và dễ dàng tích hợp,...
Các b yên tâm mà dùng, nó ko fai là soft bên thứ 3,
Được KS tích hợp và cho phép dùng a ^_^, nhưng họ ko chịu trách nhiệm cho các TH bị mất acc hay lừa đảo nhen :D

__Jie__

26-07-20, 01:55 PM

bosualongthanh

26-07-20, 09:59 PM

Mình vẫn chưa hiểu câu màu đỏ mình tô phía trên. Cho ví dụ được không bạn

Ân~
Đây nak thím, m cải tiến thêm tí á cho full lun ~
( Lúc trước có chơi KT của KS vào frum thấy bọn nó share nhiều Flugin hay lắm, lười ~ chỉ mới note chứ chưa dow nữa ^_^)
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]

function tbSaveToaDo:Start()
me.Msg("<color=yellow>Bắt đầu Save Tọa Độ")
self.nTimers = Timer:Register(Env.GAME_FPS * 0.5,self.OnTimes,self); -- XiXi^_^ = 0,5
nSwitch = 1
end

function tbSaveToaDo:Stop()
me.Msg("<color=green>Dừng Save Tọa Độ")
nSwitch = 0
Timer:Close(self.nTimers)
end
tbSaveToaDo.Folder = "\\interface\\JieNguyen\\"; -- duong dan folder
tbSaveToaDo.List = "Save_ToaDo.txt"; -- File Table
function tbSaveToaDo:OnTimes()
local nMyMapId, nMyPosX, nMyPosY = me.GetWorldPos();
local nXixiTenMap = GetMapNameFormId(me.nMapId); -- XiXi^_^ GETMAPNAME
--J block-- me.Msg("Get ID Map<enter><color=green>Mã bản đồ: <color=orange>"..nMyMapId.."<color> - <color=orange>"..nMyPosX.."/"..nMyPosY.."<color> - <color=orange>"..(nMyPosX*32).." / "..(nMyPosY*32));
me.Msg("Get ID Map<enter><color=green>Mã bản đồ: <color=orange>"..nXixiTenMap.." XiXi^_^ ID Map: "..nMyMapId.."<color> -- [Pos 3 số: "..(nMyPosX/8).." / "..(nMyPosY/16).."] -- [Pos 4 số: <color=orange>"..nMyPosX.."/"..nMyPosY.."<color>] --- Pos 5 số: <color=orange>"..(nMyPosX*32).." / "..(nMyPosY*32));
local szFile = tbSaveToaDo.Folder..tbSaveToaDo.List.."";
--XiXi^_^ New Table
-- nXixiTenMap nMyMapId nMyPosX3Xixi nMyPosY3Xixi nMyPosX nMyPosY nMyPosX32 nMyPosY32
KFile.AppendFile(szFile, ""..nXixiTenMap.."\t"..nMyMapId.."\t"..(nMyPosX/8).."\t"..(nMyPosY/16).."\t"..nMyPosX.."\t"..nMyPosY.."\t"..(nMyPosX*32).."\t"..(nMyPosY*32).."\r\n");

--J block-- KFile.AppendFile(szFile, ""..nMyMapId.."\t"..nMyPosX.."\t"..nMyPosY.."\t"..(nMyPosX*32).."\t"..(nMyPosY*32).."\r\n");
end

__Jie__

26-07-20, 10:17 PM

bạn còn save link mấy 4rum đó không cho xin với :D