Kết quả 1 đến 3 của 3
-
24-01-16, 12:43 PM #1
- Ngày tham gia
- May 2015
- Bài viết
- 29
- Thanks
- 6
- Thanked 2 Times in 2 Posts
Xin cript thần hành phù có đến bản đồ luyện công theo cấp
ai có script cho mình xin với hoặc sử dụng hàm nào để đến tọa độ bản đồ
Khách viếng thăm hãy cùng thanh858036 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
24-01-16, 06:49 PM #2
- Ngày tham gia
- May 2015
- Bài viết
- 29
- Thanks
- 6
- Thanked 2 Times in 2 Posts
Ðề: Xin cript thần hành phù có đến bản đồ luyện công theo cấp
uppppppppppppppppppppppppppppppppppppppppppppppp
Khách viếng thăm hãy cùng thanh858036 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
24-01-16, 08:15 PM #3
- Ngày tham gia
- Sep 2014
- Đang ở
- Lâm An
- Bài viết
- 957
- Thanks
- 490
- Thanked 427 Times in 231 Posts
Ðề: Xin cript thần hành phù có đến bản đồ luyện công theo cấp
đây là file xa phu bạn add vào đâu cũng đc
-- °ï»á³µ·ò½Å±¾-- lixin 2005-12-27
Include("\\script\\global\\station.lua")
Include([[\script\tong\workshop\tongcolltask.lua]]);
function main()
local tabContent = {"Nh÷ng n¬i ®· ®i qua/WayPointFun", "Nh÷ng thµnh thÞ ®· ®i qua/want2station"};
if (GetMapType(SubWorld) == 1 and GetTask(TASK_LP_COUNT) ~= 0)then
local nTongID = GetMapParam(SubWorld, 0)
if (nTongID ~= 0)then
local _,b = GetTongName()
if (b ~= nTongID and TONG_GetTongMapBan(nTongID) == 1)then
tinsert(tabContent, "QuÝ bang ®· më cÊm ®Þa bang héi, phiÒn chuyÓn lêi ®Õn "..tab_Workshop[GetTask(TASK_LP_ZONGGUANIDX)].."Phêng tæng qu¶n gióp ta/chuanhua");
end
end
end
tinsert(tabContent, "§©u còng kh«ng muèn ®i!/OnCancel");
Say("<#>Xa phu: §¹i hiÖp muèn ®i ®©u?", getn(tabContent), tabContent)
end;
function chuanhua()
Say("Bæn bang"..tab_Workshop[GetTask(TASK_LP_ZONGGUANIDX)].."Tæng qu¶n ®ang bËn qu¸ nªn c¨n dÆn ta chuyÓn lêi ®Õn ®¹i hiÖp, ®¹i hiÖp muèn hái g×?", 2, "Hái tin tøc/#rwlp_dedaojianshu(1, 1)", "Rêi khái/OnCancel")
end;
function want2station()
Say("<#>§¹i hiÖp muèn ®i ®©u: ",8, "Phîng Têng [800 lîng]/#wlls_want2go(1)", "Thµnh §« [800 lîng]/#wlls_want2go(11)", "§¹i Lý [800 lîng]/#wlls_want2go(162)", "BiÖn Kinh [800 lîng]/#wlls_want2go(37)", "T¬ng D¬ng [800 lîng]/#wlls_want2go(78)", "D¬ng Ch©u [800 lîng]/#wlls_want2go(80)", "L©m An [800 lîng]/#wlls_want2go(176)", "§©u còng kh«ng muèn ®i!/OnCancel")
end
tbCP_STATION = {
[1] = { {1557, 3112}, {1537, 3237}, {1649, 3287}, {1656, 3167}, "Phîng Têng Phñ " },
[11] = { {3193, 5192}, {3266, 5004}, {3011, 5101}, {3031, 4969}, "Thµnh §« Phñ " },
[37] = { {1598, 3000}, {1866, 2930}, {1701, 3224}, {1636, 3191}, "BiÖn Kinh Phñ " },
[78] = { {1592, 3377}, {1704, 3225}, {1508, 3147}, {1440, 3219}, "T¬ng D¬ng Phñ " },
[80] = { {1670, 2996}, {1598, 3201}, {1722, 3210}, {1834, 3063}, "D¬ng Ch©u Phñ " },
[162] = { {1669, 3129}, {1696, 3280}, {1472, 3273}, "§¹i Lý" },
[176] = { {1603, 2917}, {1692, 3296}, {1375, 3337}, {1356, 3017}, "L©m An Phñ " }
}
------------------------------------------chú tích-------------------------------
-----màu đỏ là ID máp màu xanh là tọa độ
----còn hàm lấy tọa độ đang đứng thì dùng hàm này
function toado()
local w,x,y = GetWorldPos()
local nIdPlay = PlayerIndex
Say("M¸p sè <color=Green>"..w.."<color> täa ®é <color=Yellow>"..x..", "..y)
end;
--------------------------------------
function wlls_want2go(stationname)
if (tbCP_STATION[stationname] == nil) then
print("chefu cann't find station")
return
end
if(GetCash() < 800) then
Say("Xa phu: Tõ bang héi ®Õn c¸c ®¹i thµnh thÞ cÇn cÇn 800 lîng, kh«ng mang theo lé phÝ sao?",0)
else
local count = getn(tbCP_STATION[stationname]) - 1
local randnum = random(count)
Msg2Player("Ngåi yªn cha? Chóng ta ®i "..tbCP_STATION[stationname][count+1])
NewWorld(stationname, tbCP_STATION[stationname][randnum][1], tbCP_STATION[stationname][randnum][2])
SetFightState(0)
SetPunish(1)
DisabledUseTownP(0)
SetRevPos(GetPlayerRev())
Pay(800)
end
endKhách viếng thăm hãy cùng vuduymanh xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
Các Chủ đề tương tự
-
[JX] Xin scrip luyện công theo cấp jx Linux
Bởi gakfc1993 trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 2Bài viết cuối: 13-10-15, 12:52 AM -
[JX] Mem mới chưa viết crip được nên muốn xin vài cript để học tập
Bởi binhhdt trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 12Bài viết cuối: 28-08-15, 03:45 PM -
[JX] cầu cứu về cript sever Phong Van
Bởi hamandat trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 0Bài viết cuối: 30-07-14, 10:10 PM -
[KT] Hướng dẫn luyện mật tịch 1 phát lên max cấp
Bởi dazhus trong diễn đàn ReleasesTrả lời: 4Bài viết cuối: 01-03-12, 11:01 PM