jxvietnam
21-05-13, 10:57 PM
cái này mình viết rùi mà, bạn có thể down bất cứ sv nào từ awjx mà trên nên của mình sẽ có thôi
Include("\\script\\source\\sourcejx49.lua")
Include("\\script\\GetFaction.lua")
Include("\\script\\source\\hamchuot.lua")
function doilenhbai()
Say("Xin chao !",11,
"Ho祅g kim [+1]/hkl",
"Ho祅g kim [+2]/bkl",
"Ho祅g kim [+3]/bkl",
"Ho祅g kim [+4]/bkl",
"Ho祅g kim [+5]/bkl",
"Ho祅g kim [+6]/bkl",
"Ho祅g kim [+7]/bkl",
"Ho祅g kim [+8]/bkl",
"Ho祅g kim [+9]/bkl",
"Ho祅g kim [+10]/bkl",
"Tho竧/thoat")
end
function thoat()
SetTaskTemp(34,0)
SetTaskTemp(35,0)
SetTaskTemp(40,0)
end
function hkl()
SetTaskTemp(34,1)
tieptheo()
end
function bkl(sel)
n = sel + 1
SetTaskTemp(34,n)
tieptheo()
end
function hopthanh()
SetTaskTemp(35,0)
tieptheo()
end
function phanloai()
if GetTaskTemp(35) == 1 then
return "Tu Khong"
elseif GetTaskTemp(35) == 2 then
return "Mong Long"
elseif GetTaskTemp(35) == 3 then
return "Phuc Ma"
elseif GetTaskTemp(35) == 4 then
return "Ham Thien"
elseif GetTaskTemp(35) == 5 then
return "Ke Nghiep"
elseif GetTaskTemp(35) == 6 then
return "Ngu Long"
elseif GetTaskTemp(35) == 7 then
return "Bang Han"
elseif GetTaskTemp(35) == 8 then
return "Sam Hoang"
elseif GetTaskTemp(35) == 9 then
return "Thien Quang"
elseif GetTaskTemp(35) == 10 then
return "Dia Phach"
elseif GetTaskTemp(35) == 11 then
return "Chu Phuoc"
elseif GetTaskTemp(35) == 12 then
return "U Lung"
elseif GetTaskTemp(35) == 13 then
return "Minh Ao"
elseif GetTaskTemp(35) == 14 then
return "Vo Ma"
elseif GetTaskTemp(35) == 15 then
return "Vo Gian"
elseif GetTaskTemp(35) == 16 then
return "Vo Tran"
elseif GetTaskTemp(35) == 17 then
return "Te Hoang"
elseif GetTaskTemp(35) == 18 then
return "Bich Hai"
elseif GetTaskTemp(35) == 19 then
return "Dong Cuu"
elseif GetTaskTemp(35) == 20 then
return "Dich Khai"
elseif GetTaskTemp(35) == 21 then
return "Ma Hoang"
elseif GetTaskTemp(35) == 22 then
return "Ma Thi"
elseif GetTaskTemp(35) == 23 then
return "Ma Sat"
elseif GetTaskTemp(35) == 24 then
return "Cap Phong"
elseif GetTaskTemp(35) == 25 then
return "Lang Nhac"
elseif GetTaskTemp(35) == 26 then
return "Suong Tinh"
elseif GetTaskTemp(35) == 27 then
return "Loi Khung"
elseif GetTaskTemp(35) == 28 then
return "Vu Ao"
end
end
function tieptheo()
Say("Ch鋘 m玭 ph竔 ?",11,"Thi誹 L﹎/tp1","Thi猲 Vng/tp1","Л阯g M玭/tp1","Ng?чc/tp1","Nga My/tp1","Th髖 Y猲/tp1","C竔 Bang/tp1","Thi猲 Nh蒼/tp1","V?ng/tp1","C玭 L玭/tp1","Tho竧/thoat")
end
function tp1(sel)
n = sel + 1
if n == 1 then
Say("M玭 ph竔 : <color=fire>Thi誹 L﹎",4,"T?kh玭g/thieulam","M閚g long/thieulam","Ph鬰 ma/thieulam","Tho竧/thoat")
elseif n == 2 then
Say("M玭 ph竔 : <color=fire>Thi猲 Vng",4,"H竚 thi猲/thienvuong","K?nghi謕/thienvuong","Ng?long/thienvuong","Tho竧/thoat")
elseif n == 3 then
Say("M玭 ph竔 : <color=fire>Л阯g M玭",5,"B╪g h祅/duongmon","S﹎ ho祅g/duongmon","Thi猲 quang/duongmon","мa ph竎h/duongmon","Tho竧/thoat")
elseif n == 4 then
Say("M玭 ph竔 : <color=fire>Ng?чc",4,"Ch?phc/ngudoc","U Lung/ngudoc","Minh Ao/ngudoc","Tho竧/thoat")
elseif n == 5 then
Say("M玭 ph竔 : <color=fire>Nga My",4,"V?ma/ngamy","V?gian/ngamy","V?tr莕/ngamy","Tho竧/thoat")
elseif n == 6 then
Say("M玭 ph竔 : <color=fire>Th髖 Y猲",3,"T?ho祅g/thuyyen","B輈h h秈/thuyyen","Tho竧/thoat")
elseif n == 7 then
Say("M玭 ph竔 : <color=fire>C竔 Bang",3,"уng c鮱/caibang","мch kh秈/caibang","Tho竧/thoat")
elseif n == 8 then
Say("M玭 ph竔 : <color=fire>Thi猲 Nh蒼",4,"Ma ho祅g/thiennhan","Ma th?thiennhan","Ma s竧/thiennhan","Tho竧/thoat")
elseif n == 9 then
Say("M玭 ph竔 : <color=fire>V?ng",3,"C藀 phong/vodang","L╪g nh筩/vodang","Tho竧/thoat")
elseif n == 10 then
Say("M玭 ph竔 : <color=fire>C玭 L玭",4,"Sng tinh/conlon","L玦 kh駈g/conlon","V?秓/conlon","Tho竧/thoat")
end
end
function thieulam(sel)
n = sel + 1
if n == 1 then
SetTaskTemp(35,1)
Say("Trang b?<color=red>Tu Khong<color> h?tr?<color=yellow>Thieu Lam Dao<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"竜 gi竝/ao",
"o/dao",
"Bao tay/baotay",
"Nh蒼/nhan",
"i l璶g/dai",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif n == 2 then
SetTaskTemp(35,2)
Say("Trang b?<color=red>Mong Long<color> h?tr?<color=yellow>Thieu Lam Quyen<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"竜 gi竝/ao",
"Gi莥/giay",
"Ng鋍 b閕/ngocboi",
"N鉵/non",
"i l璶g/dai",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif n == 3 then
SetTaskTemp(35,3)
Say("Trang b?<color=red>Phuc Ma<color> h?tr?<color=yellow>Thieu Lam Con<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"C玭 b鎛g/bong",
"竜 gi竝/ao",
"i l璶g/dai",
"Gi莥/giay",
"Ng鋍 b閕/ngocboi",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
end
end
-------------- THIEN VUONG -----------------------
function thienvuong(sel)
m = sel + 1
if m == 1 then
SetTaskTemp(35,4)
Say("Trang b?<color=red>Ham Thien<color> h?tr?<color=yellow>Thien Vuong Chuy<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"Ch飝/chuy",
"竜 gi竝/ao",
"Bao tay/baotay",
"Gi莥/giay",
"i l璶g/dai",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 2 then
SetTaskTemp(35,5)
Say("Trang b?<color=red>Ke Nghiep<color> h?tr?<color=yellow>Thien Vuong Thuong<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"Thng/thuong",
"竜 gi竝/ao",
"Gi莥/giay",
"Bao tay/baotay",
"i l璶g/dai",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 3 then
SetTaskTemp(35,6)
Say("Trang b?<color=red>Ngu Long<color> h?tr?<color=yellow>Thien Vuong Dao<color><enter>Ch鋘 trang b?h頿 th祅h !",6,
"o/dao",
"i l璶g/dai",
"D﹜ chuy襫/daychuyen",
"Nh蒼/nhan",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
end
end
--------------- DUONG MON -----------------------
function duongmon(sel)
m = sel + 1
if m == 1 then
SetTaskTemp(35,7)
Say("Trang b?<color=red>Bang Han<color> h?tr?<color=yellow>Duong Mon Phi Dao<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"Phi 產o/phidao",
"竜 gi竝/ao",
"Ng鋍 b閕/ngocboi",
"Gi莥/giay",
"i l璶g/dai",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 2 then
SetTaskTemp(35,8)
Say("Trang b?<color=red>Sam Hoang<color> h?tr?<color=yellow>Duong Mon Phi Tieu<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"Phi ti猽/phitieu",
"竜 gi竝/ao",
"Ng鋍 b閕/ngocboi",
"Gi莥/giay",
"i l璶g/dai",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 3 then
SetTaskTemp(35,9)
Say("Trang b?<color=red>Thien Quang<color> h?tr?<color=yellow>Duong Mon Tu Tien<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"T?ti詎/tutien",
"Gi莥/giay",
"Bao tay/baotay",
"D﹜ chuy襫/daychuyen",
"i l璶g/dai",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 4 then
SetTaskTemp(35,10)
Say("Trang b?<color=red>Dia Phach<color> h?tr?<color=yellow>Duong Mon Bay<color><enter>Ch鋘 trang b?h頿 th祅h !",3,
"N鉵/non",
--"Bao Tay Dia Phach/diaphach",
--"Nhan Dia Phach/diaphach",
--"Day Chuyen Dia Phach/diaphach",
--"Dai Dia Phach/diaphach",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
end
end
------------ NGU DOC-------------
function ngudoc(sel)
m = sel + 1
if m == 1 then
SetTaskTemp(35,11)
Say("Trang b?<color=red>Chu Phuoc<color> h?tr?<color=yellow>Ngu Doc Bua<color><enter>Ch鋘 trang b?h頿 th祅h !",6,
"N鉵/non",
"Bao tay/baotay",
"Nh蒼/nhan",
"D﹜ chuy襫/daychuyen",
--"Dai/chuphuoc",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 2 then
SetTaskTemp(35,12)
Say("Trang b?<color=red>U Lung<color> h?tr?<color=yellow>Ngu Doc Chuong<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"竜 gi竝/ao",
"Gi莥/giay",
"N鉵/non",
"Bao tay/baotay",
"i l璶g/dai",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 3 then
SetTaskTemp(35,13)
Say("Trang b?<color=red>Minh Ao<color> h?tr?<color=yellow>Ngu Doc Dao<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"o/dao",
"竜 gi竝/ao",
"Bao tay/baotay",
"Gi莥/giay",
"Nh蒼/nhan",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
end
end
------------ NGA MY----------------
function ngamy(sel)
m = sel + 1
if m == 1 then
SetTaskTemp(35,14)
Say("Trang b?<color=red>Vo Ma<color> h?tr?<color=yellow>Nga My Chuong<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"N鉵/non",
"竜 gi竝/ao",
"Nh蒼/nhan",
"Gi莥/giay",
"Ng鋍 b閕/ngocboi",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 2 then
SetTaskTemp(35,15)
Say("Trang b?<color=red>Vo Gian<color> h?tr?<color=yellow>Nga My Kiem<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"Ki誱/kiem",
"竜 gi竝/ao",
"Nh蒼/nhan",
"Bao tay/baotay",
"i l璶g/dai",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 3 then
SetTaskTemp(35,16)
Say("Trang b?<color=red>Vo Tran<color> h?tr?<color=yellow>Nga My Buff<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"Nh蒼 lo筰 1/nhan",
"Nh蒼 lo筰 2/nhan1",
"Ng鋍 b閕/ngocboi",
"N鉵/non",
"D﹜ chuy襫/daychuyen",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
end
end
------------- CAi BANG ---------------
function caibang(sel)
m = sel + 1
if m == 1 then
SetTaskTemp(35,19)
Say("Trang b?<color=red>Dong Cuu<color> h?tr?<color=yellow>Cai Bang Chuong<color><enter>Ch鋘 trang b?h頿 th祅h !",6,
"N鉵/non",
"竜 gi竝/ao",
"Nh蒼/nhan",
"i l璶g/dai",
"Bao tay/baotay",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 2 then
SetTaskTemp(35,20)
Say("Trang b?<color=red>Dich Khai<color> h?tr?<color=yellow>Cai Bang Bong<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"B鎛g/bong",
"竜 gi竝/ao",
"Nh蒼/nhan",
"Bao tay/baotay",
"i l璶g/dai",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
end
end
------------- THUY YEN -----------
function thuyyen(sel)
m = sel + 1
if m == 1 then
SetTaskTemp(35,17)
Say("Trang b?<color=red>Te Hoang<color> h?tr?<color=yellow>Thuy Yen Dao<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"竜 gi竝/ao",
"o/dao",
"Nh蒼/nhan",
"i l璶g/dai",
"Bao tay/baotay",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 2 then
SetTaskTemp(35,18)
Say("Trang b?<color=red>Bich Hai<color> h?tr?<color=yellow>Thuy Yen Song Dao<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"Song 產o/songdao",
"D﹜ chuy襫/daychuyen",
"Nh蒼/nhan",
"Ng鋍 b閕/ngocboi",
"i l璶g/dai",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
end
end
--------------- THIEN NHAN ---------------
function thiennhan(sel)
m = sel + 1
if m == 1 then
SetTaskTemp(35,21)
Say("Trang b?<color=red>Ma Hoang<color> h?tr?<color=yellow>Thien Nhan Bua<color><enter>Ch鋘 trang b?h頿 th祅h !",6,
--"Non/mahoang",
"Bao tay/baotay",
"D﹜ chuy襫/daychuyen",
"Gi莥/giay",
"i l璶g/dai",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 2 then
SetTaskTemp(35,22)
Say("Trang b?<color=red>Ma Thi<color> h?tr?<color=yellow>Thien Nhan Chuong<color><enter>Ch鋘 trang b?h頿 th祅h !",6,
"N鉵/non",
"Ng鋍 b閕/ngocboi",
"D﹜ chuy襫/daychuyen",
"Nh蒼/nhan",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 3 then
SetTaskTemp(35,23)
Say("Trang b?<color=red>Ma Sat<color> h?tr?<color=yellow>Thien Nhan Thuong<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"竜 gi竝/ao",
"Thng/thuong",
"Bao tay/baotay",
"i l璶g/dai",
"Nh蒼/nhan",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
end
end
----------------VO DANG ----------------
function vodang(sel)
m = sel + 1
if m == 1 then
SetTaskTemp(35,24)
Say("Trang b?<color=red>Cap Phong<color> h?tr?<color=yellow>Vo Dang Kiem<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"Ki誱/kiem",
"D﹜ chuy襫/daychuyen",
"Ng鋍 b閕/ngocboi",
"i l璶g/dai",
"Nh蒼/nhan",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 2 then
SetTaskTemp(35,25)
Say("Trang b?<color=red>Lang Nhac<color> h?tr?<color=yellow>Vo Dang Khi<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"Ki誱/kiem",
"竜 gi竝/ao",
"Nh蒼 lo筰 1/nhan",
"Nh蒼 lo筰 2/nhan1",
"Ng鋍 b閕/ngocboi",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
end
end
------------- CON LON---------------
function conlon(sel)
m = sel + 1
if m == 1 then
SetTaskTemp(35,26)
Say("Trang b?<color=red>Suong Tinh<color> h?tr?<color=yellow>Con Lon Dao<color><enter>Ch鋘 trang b?h頿 th祅h !",7,
"o/dao",
"竜 gi竝/ao",
"Bao tay/baotay",
"Nh蒼/nhan",
"i l璶g/dai",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 2 then
SetTaskTemp(35,27)
Say("Trang b?<color=red>Loi Khung<color> h?tr?<color=yellow>Con Lon Kiem<color><enter>Ch鋘 trang b?h頿 th祅h !",6,
"N鉵/non",
"D﹜ chuy襫/daychuyen",
"Ng鋍 b閕/ngocboi",
--"Bao Tay/loikhung",
"Nh蒼/nhan",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
elseif m == 3 then
SetTaskTemp(35,28)
Say("Trang b?<color=red>Vu Ao<color> h?tr?<color=yellow>Con Lon Bua<color><enter>Ch鋘 trang b?h頿 th祅h !",6,
"N鉵/non",
"Gi莥/giay",
"Ng鋍 b閕/ngocboi",
--"Day Chuyen/vuao",
"Nh蒼/nhan",
"Tr?l筰/hopthanh",
"Tho竧/thoat")
end
end
function ao()
if GetTaskTemp(35) == 2 then
t=1
elseif GetTaskTemp(35) == 3 then
t=2
elseif GetTaskTemp(35) == 1 then
t=3
elseif GetTaskTemp(35) == 4 then
t=4
elseif GetTaskTemp(35) == 5 then
t=5
elseif GetTaskTemp(35) == 15 then
t=6
elseif GetTaskTemp(35) == 14 then
t=7
elseif GetTaskTemp(35) == 17 then
t=8
elseif GetTaskTemp(35) == 12 then
t=9
elseif GetTaskTemp(35) == 13 then
t=10
elseif GetTaskTemp(35) == 7 then
t=11
elseif GetTaskTemp(35) == 8 then
t=12
elseif GetTaskTemp(35) == 19 then
t=13
elseif GetTaskTemp(35) == 20 then
t=14
elseif GetTaskTemp(35) == 23 then
t=15
elseif GetTaskTemp(35) == 25 then
t=16
elseif GetTaskTemp(35) == 26 then
t=17
end
SetTaskTemp(40,t)
XacDinhTrangBi("Ao",phanloai())
end
function non()
if GetTaskTemp(35) == 2 then
t = 74
elseif GetTaskTemp(35) == 14 then
t = 75
elseif GetTaskTemp(35) == 15 then
t = 76
elseif GetTaskTemp(35) == 12 then
t = 77
elseif GetTaskTemp(35) == 11 then
t = 78
elseif GetTaskTemp(35) == 10 then
t =79
elseif GetTaskTemp(35) == 22 then
t = 80
elseif GetTaskTemp(35) == 27 then
t = 81
elseif GetTaskTemp(35) == 28 then
t = 82
elseif GetTaskTemp(35) == 19 then
t = 132
end
SetTaskTemp(40,t)
XacDinhTrangBi("Non",phanloai())
end
function giay()
if GetTaskTemp(35) == 2 then
t = 47
elseif GetTaskTemp(35) == 3 then
t = 48
elseif GetTaskTemp(35) == 4 then
t = 49
elseif GetTaskTemp(35) == 5 then
t = 50
elseif GetTaskTemp(35) == 14 then
t = 51
elseif GetTaskTemp(35) == 12 then
t = 52
elseif GetTaskTemp(35) == 13 then
t = 53
elseif GetTaskTemp(35) == 7 then
t = 54
elseif GetTaskTemp(35) == 8 then
t = 55
elseif GetTaskTemp(35) == 9 then
t = 56
elseif GetTaskTemp(35) == 21 then
t = 57
elseif GetTaskTemp(35) == 22 then
t = 58
elseif GetTaskTemp(35) == 28 then
t = 59
end
SetTaskTemp(40,t)
XacDinhTrangBi("Giay",phanloai())
end
function dai()
if GetTaskTemp(35) == 2 then
t=27
elseif GetTaskTemp(35) == 3 then
t=28
elseif GetTaskTemp(35) == 1 then
t=29
elseif GetTaskTemp(35) == 4 then
t=30
elseif GetTaskTemp(35) == 5 then
t=31
elseif GetTaskTemp(35) == 6 then
t=32
elseif GetTaskTemp(35) == 15 then
t=33
elseif GetTaskTemp(35) == 17 then
t=34
elseif GetTaskTemp(35) == 18 then
t=35
elseif GetTaskTemp(35) == 12 then
t=36
elseif GetTaskTemp(35) == 7 then
t=37
elseif GetTaskTemp(35) == 9 then
t=38
elseif GetTaskTemp(35) == 8 then
t=39
elseif GetTaskTemp(35) == 19 then
t=40
elseif GetTaskTemp(35) == 20 then
t=41
elseif GetTaskTemp(35) == 23 then
t=42
elseif GetTaskTemp(35) == 21 then
t=43
elseif GetTaskTemp(35) == 24 then
t=44
elseif GetTaskTemp(35) == 26 then
t=45
elseif GetTaskTemp(35) == 27 then
t=46
end
SetTaskTemp(40,t)
XacDinhTrangBi("Dai",phanloai())
end
function daychuyen()
if GetTaskTemp(35) == 6 then
t = 18
elseif GetTaskTemp(35) == 16 then
t = 19
elseif GetTaskTemp(35) == 18 then
t = 20
elseif GetTaskTemp(35) == 11 then
t = 21
elseif GetTaskTemp(35) == 9 then
t = 22
elseif GetTaskTemp(35) == 21 then
t = 23
elseif GetTaskTemp(35) == 22 then
t = 24
elseif GetTaskTemp(35) == 24 then
t = 25
elseif GetTaskTemp(35) == 27 then
t = 26
end
SetTaskTemp(40,t)
XacDinhTrangBi("Day Chuyen",phanloai())
end
function ngocboi()
if GetTaskTemp(35) == 2 then
t = 83
elseif GetTaskTemp(35) == 3 then
t = 84
elseif GetTaskTemp(35) == 14 then
t = 85
elseif GetTaskTemp(35) == 16 then
t = 86
elseif GetTaskTemp(35) == 18 then
t = 87
elseif GetTaskTemp(35) == 7 then
t = 88
elseif GetTaskTemp(35) == 8 then
t = 89
elseif GetTaskTemp(35) == 22 then
t = 90
elseif GetTaskTemp(35) == 25 then
t = 91
elseif GetTaskTemp(35) == 24 then
t = 92
elseif GetTaskTemp(35) == 27 then
t = 93
elseif GetTaskTemp(35) == 28 then
t = 94
end
SetTaskTemp(40,t)
XacDinhTrangBi("Ngoc Boi",phanloai())
end
function baotay()
if GetTaskTemp(35) == 1 then
t = 60
elseif GetTaskTemp(35) == 4 then
t = 61
elseif GetTaskTemp(35) == 5 then
t = 62
elseif GetTaskTemp(35) == 15 then
t = 63
elseif GetTaskTemp(35) == 17 then
t = 64
elseif GetTaskTemp(35) == 12 then
t = 65
elseif GetTaskTemp(35) == 13 then
t = 66
elseif GetTaskTemp(35) == 11 then
t = 67
elseif GetTaskTemp(35) == 9 then
t = 68
elseif GetTaskTemp(35) == 19 then
t = 69
elseif GetTaskTemp(35) == 20 then
t = 70
elseif GetTaskTemp(35) == 23 then
t = 71
elseif GetTaskTemp(35) == 21 then
t = 72
elseif GetTaskTemp(35) == 26 then
t = 73
end
SetTaskTemp(40,t)
XacDinhTrangBi("Bao Tay",phanloai())
end
function nhan()
if GetTaskTemp(35) == 1 then
t = 95
elseif GetTaskTemp(35) == 6 then
t = 96
elseif GetTaskTemp(35) == 15 then
t = 97
elseif GetTaskTemp(35) == 14 then
t = 98
elseif GetTaskTemp(35) == 16 then
t = 99
elseif GetTaskTemp(35) == 17 then
t = 101
elseif GetTaskTemp(35) == 18 then
t = 102
elseif GetTaskTemp(35) == 13 then
t = 103
elseif GetTaskTemp(35) == 11 then
t = 104
elseif GetTaskTemp(35) == 19 then
t = 105
elseif GetTaskTemp(35) == 20 then
t = 106
elseif GetTaskTemp(35) == 23 then
t = 107
elseif GetTaskTemp(35) == 22 then
t = 108
elseif GetTaskTemp(35) == 25 then
t = 109
elseif GetTaskTemp(35) == 24 then
t = 111
elseif GetTaskTemp(35) == 26 then
t = 112
elseif GetTaskTemp(35) == 27 then
t = 113
elseif GetTaskTemp(35) == 28 then
t = 114
end
SetTaskTemp(40,t)
XacDinhTrangBi("Nhan",phanloai())
end
function nhan1()
if GetTaskTemp(35) == 16 then
t = 100
elseif GetTaskTemp(35) == 25 then
t = 110
end
SetTaskTemp(40,t)
XacDinhTrangBi("Nhan1",phanloai())
end
----
function dao()
if GetTaskTemp(35) == 6 then
t = 118
elseif GetTaskTemp(35) == 1 then
t = 119
elseif GetTaskTemp(35) == 17 then
t = 120
elseif GetTaskTemp(35) == 13 then
t = 121
elseif GetTaskTemp(35) == 26 then
t = 122
end
SetTaskTemp(40,t)
XacDinhTrangBi("Dao",phanloai())
end
function bong()
if GetTaskTemp(35) == 3 then
t = 126
elseif GetTaskTemp(35) == 20 then
t = 127
end
SetTaskTemp(40,t)
XacDinhTrangBi("Bong",phanloai())
end
function songdao()
SetTaskTemp(40,128)
XacDinhTrangBi("Song Dao","Bich Hai")
end
function thuong()
if GetTaskTemp(35) == 5 then
t = 124
elseif GetTaskTemp(35) == 23 then
t = 125
end
SetTaskTemp(40,t)
XacDinhTrangBi("Thuong",phanloai())
end
function chuy()
SetTaskTemp(40,123)
XacDinhTrangBi("Chuy","Ham Thien")
end
function tutien()
SetTaskTemp(40,129)
XacDinhTrangBi("Tu Tien","Thien Quang")
end
function phidao()
SetTaskTemp(40,131)
XacDinhTrangBi("Phi Dao","Bang Han")
end
function phitieu()
SetTaskTemp(40,130)
XacDinhTrangBi("Phi Tieu","Sam Hoang")
end
function kiem()
if GetTaskTemp(35) == 24 then
t = 115
elseif GetTaskTemp(35) == 25 then
t = 116
elseif GetTaskTemp(35) == 15 then
t = 117
end
SetTaskTemp(40,t)
XacDinhTrangBi("Kiem",phanloai())
end
-------
function XacDinhTrangBi(tb,pl)
temp = GetTaskTemp(34)
if GetTaskTemp(34) == 1 then
id = 4
elseif GetTaskTemp(34) == 2 then
id = 5
elseif GetTaskTemp(34) == 3 then
id = 6
elseif GetTaskTemp(34) == 4 then
id = 7
elseif GetTaskTemp(34) == 5 then
id = 8
elseif GetTaskTemp(34) == 6 then
id = 9
elseif GetTaskTemp(34) == 7 then
id = 10
elseif GetTaskTemp(34) == 8 then
id = 11
elseif GetTaskTemp(34) == 9 then
id = 12
elseif GetTaskTemp(34) == 10 then
id = 13
end
ht = GetItemCount(id)
if GetTaskTemp(34) == 1 then
nl = 49
a = GetItemCount(nl)
if GetItemCount(nl) >= 1 then
DelItem(nl)
if GetItemCount(nl) == (a - 1) then
addtbmp(GetTaskTemp(34),tb,pl)
-- logWrite("[Che Tao][+"..GetTaskTemp(34).."]["..tb.."]["..pl.."]")
Msg2Player("H頿 th祅h trang b?ho祅g kim th祅h c玭g")
else
Msg2Player("Hack !!!!!")
end
else
Msg2Player("Kh玭g c?Ho祅g kim l謓h trong h祅h trang")
end
elseif GetTaskTemp(34) > 1 or GetTaskTemp(34) < 11 then
k = GetTaskTemp(40)
if ht >= 1 then
if HaveBaseItem(0,MangTrangBi[k][3],MangTrangBi[k][4],MangTrangBi[k][5],GetTaskTemp(34)-1) > 0 then
DelBaseItem(0,MangTrangBi[k][3],MangTrangBi[k][4],MangTrangBi[k][5],GetTaskTemp(34)-1)
DelItem(id)
if GetItemCount(id) == (ht - 1) then
addtbmp(GetTaskTemp(34),tb,pl)
Msg2Player("H頿 th祅h "..MangTrangBi[k][1].." "..MangTrangBi[k][2].." +"..GetTaskTemp(34).." th祅h c玭g")
-- logWrite("[Che Tao][+"..GetTaskTemp(34).."]["..tb.."]["..pl.."]")
else
Talk(1,"","hack !!")
end
else
Msg2Player("Ngi kh玭g c?"..MangTrangBi[k][1].." "..MangTrangBi[k][2].." +"..(GetTaskTemp(34)-1).."")
end
else
Msg2Player("Ngi kh玭g c?1 vi猲 huy襫 tinh c蕄 "..temp.."")
end
end
SetTaskTemp(34,0)
SetTaskTemp(35,0)
SetTaskTemp(40,0)
end
Powered by vBulletin® Version 4.2.0 Copyright © 2024 vBulletin Solutions, Inc. All rights reserved.