Kết quả 1 đến 4 của 4
Chủ đề: Cho Hỏi Npc Này Sai Chổ Nào
-
24-07-12, 02:35 PM #1
- Ngày tham gia
- Nov 2011
- Bài viết
- 685
- Thanks
- 353
- Thanked 244 Times in 116 Posts
Cho Hỏi Npc Này Sai Chổ Nào
NPC Võ lâm Chí Tôn Đã Thêm Vào Các File Trong Dữ Liệu Đầy Đủ rồi ! cũng đã khai báo đúng ! nhưng sao click vào k hiện gì cả ! nhưng GS lại k báo lỗi
Code:---Author: Ohishu --------Big Bang Script New For JX Private ----Thay The Cho Bang Hoi Se Tao Nen 1 Cot Truyen Cho Game ! Include("\\script\\startup_remix.lua") Include("\\dulieu\\quyensohuu.lua") Include("\\dulieu\\minhchu_bd.lua") Include("\\dulieu\\minhchu_hd.lua") Include("\\dulieu\\minhchu_ld.lua") Include("\\dulieu\\listbachdao.lua") Include("\\dulieu\\listhacdao.lua") Include("\\dulieu\\listluongdao.lua") Include("\\dulieu\\tranhvlmc_hd.lua") Include("\\dulieu\\tranhvlmc_bd.lua") Include("\\dulieu\\tranhvlmc_ld.lua") Include("\\script\\source\\sourcejx49.lua") function main() if GetLevel() >= 90 then if GetFaction() ~= "" then if GetTask(1) == 0 and GetTask(2) == 0 and GetTask(3) == 0 and GetTask(4) == 0 and GetTask(5) == 0 and GetTask(6) == 0 and GetTask(7) == 0 and GetTask(8) == 0 and GetTask(9) == 0 and GetTask(10) == 0 then SetTask(42,0) SetRank(32) SetCamp(4) SetCurCamp(4) end end for i=1,getn(danhsachbachdao) do songuoibd = i if GetUUID() == danhsachbachdao[i][7] then SetTask(42,1) chucvubd = danhsachbachdao[i][6] SetCamp(1) SetCurCamp(1) capnhat() end end for i=1,getn(danhsachhacdao) do songuoihd = i if GetUUID() == danhsachhacdao[i][7] then SetTask(42,2) chucvuhd = danhsachhacdao[i][6] SetCamp(2) SetCurCamp(2) capnhat() end end for i=1,getn(danhsachluongdao) do songuoild = i if GetUUID() == danhsachluongdao[i][7] then SetTask(42,3) chucvuld = danhsachluongdao[i][6] SetCamp(3) SetCurCamp(3) capnhat() end end if GetTask(42) == 1 then kiemtra = thi_dau_bd elseif GetTask(42) == 2 then kiemtra = thi_dau_hd elseif GetTask(42) == 3 then kiemtra = thi_dau_ld end if timestart() == 1 then if GetTask(42) == 0 then SayEx({"<color=cyan>Vo Lam Chi Ton:<color> Thien Ha Loan The Chia Thanh <color=red>3<color> Nguoi Muon Gia Nhap Vao ? Muon Gia Nhap Phai Ton <color=yellow>5<color> Van Luong !", "Hac Dao/gianhaphacdao", "Bach Dao/gianhapbachdao", "Luong Dao/gianhapluongdao", "Thoat/Exit"}) elseif GetTask(42) >= 1 then a = getn(kiemtra) if a < 1 then a = 1 end for i=1,a do if kiemtra[i] == nil or GetUUID() ~= kiemtra[i][7] then SayEx({"<color=cyan>Vo Lam Chi Ton:<color> Hien Tai La Thoi Diem Bao Danh Tranh Ngoi Vo Lam Minh Chu Nguoi Muon Tham Gia Khong ?", "Tranh VLMC Bach Dao/tranhvlmc", "Tranh VLMC Hac Dao/tranhvlmc", "Tranh VLMC Luong Dao/tranhvlmc", "Vao Hoi Truong Thi Dau/gohoitruong", "Tim Hieu Dieu Kien/timhieuxv", "Thoat/Exit"}) elseif GetUUID() == kiemtra[i][7] then SayEx({"<color=cyan>Vo Lam Chi Ton:<color> Hien Tai La Nguoi Da Bao Danh Tranh Ngoi Vo Lam Minh Chu Nguoi Muon Vao Hoi Truong ?", "Vao Hoi Truong Thi Dau/gohoitruong", "Thoat/Exit"}) end end end elseif timestart() == 2 then if GetTask(42) == 0 then SayEx({"<color=cyan>Vo Lam Chi Ton:<color> Thien Ha Loan The Chia Thanh <color=red>3<color> Nguoi Muon Gia Nhap Vao ? Muon Gia Nhap Phai Ton <color=yellow>5<color> Van Luong !", "Hac Dao/gianhaphacdao", "Bach Dao/gianhapbachdao", "Luong Dao/gianhapluongdao", "Thoat/Exit"}) elseif GetTask(42) == 1 then Say("<color=red>Minh Chu Bach Dao: "..minhchubachdao[1][1].."<color>\n<color=yellow>So Nguoi Trong Bach Dao: "..songuoibd.." Nguoi\nDiem Cong Hien Ban Than: "..GetTask(41).."\nChuc Vu: "..chucvubd.."\nNgan Quy: "..GetGlbMissionV(22).." Van\nKhu Vuc Lanh Dia Thuoc Ve: "..quyensohuu[1][1].."",6,"Ta muon ly khai/lykhai","Tim Hieu/timhieu","Vao Lanh Dia/golanhdia","Cong Nap Tien/congnap","Cap Nhat Thong Tin/capnhat","Thoat./Exit") elseif GetTask(42) == 2 then Say("<color=red>Minh Chu Hac Dao: "..minhchuhacdao[1][1].."<color>\n<color=yellow>So Nguoi Trong Hac Dao: "..songuoihd.." Nguoi\nDiem Cong Hien Ban Than: "..GetTask(41).."\nChuc Vu: "..chucvuhd.."\nNgan Quy: "..GetGlbMissionV(23).." Van\nKhu Vuc Huu Lanh Dia Thuoc Ve: "..quyensohuu[1][2].."",6,"Ta muon ly khai/lykhai","Tim Hieu/timhieu","Vao Lanh Dia/golanhdia","Cong Nap Tien/congnap","Cap Nhat Thong Tin/capnhat","Thoat./Exit") elseif GetTask(42) == 3 then Say("<color=red>Minh Chu Luong Dao: "..minhchuluongdao[1][1].."<color>\n<color=yellow>So Nguoi Trong Luong Dao: "..songuoild.." Nguoi\nDiem Cong Hien Ban Than: "..GetTask(41).."\nChuc Vu: "..chucvuld.."\nNgan Quy: "..GetGlbMissionV(24).." Van\nKhu Vuc Huu Lanh Dia Thuoc Ve: "..quyensohuu[1][3].."",6,"Ta muon ly khai/lykhai","Tim Hieu/timhieu","Vao Lanh Dia/golanhdia","Cong Nap Tien/congnap","Cap Nhat Thong Tin/capnhat","Thoat./Exit") end end else Msg2Player("Dang Cap Tren 90 Moi Co The Gia Nhap Hac-Bach-Luong Dao !") end end function gohoitruong() if GetTask(42) == 1 then solanlap = thi_dau_bd maps = 19 elseif GetTask(42) == 2 then solanlap = thi_dau_hd maps = 20 elseif GetTask(42) == 3 then solanlap = thi_dau_ld maps = 21 end for i=1,getn(solanlap) do if GetUUID() == (solanlap[i][7]) then NewWorld(maps,1624+random(-2,2),random(-2,2)+3264) -- 203,204 Msg2Player("Ban Da Vao Dau Truong !") end end end function golanhdia() if GetTask(42) == 1 then gobachdao() elseif GetTask(42) == 2 then gohacdao() elseif GetTask(42) == 3 then goluongdao() end end function tranhvlmc() if GetTask(42) == 1 then solanlap2 = danhsachbachdao solanlap = thi_dau_bd dulieu = "thi_dau_bd" data = "dulieu/tranhvlmc_bd.lua" elseif GetTask(42) == 2 then solanlap2 = danhsachhacdao solanlap = thi_dau_hd dulieu = "thi_dau_hd" data = "dulieu/tranhvlmc_hd.lua" elseif GetTask(42) == 3 then solanlap2 = danhsachluongdao solanlap = thi_dau_ld dulieu = "thi_dau_ld" data = "dulieu/tranhvlmc_ld.lua" end if GetTask(42) >= 1 then for i=1,getn(solanlap2) do if GetUUID() == (solanlap2[i][7]) then if GetTask(197) >= 2 and GetTask(41) >= 200 and GetRepute() >= 100 and GetTask(12) >= 200 and GetCash() >= 1000000 then Pay(1000000) solanlap[getn(solanlap)+1] = {solanlap2[i][1],solanlap2[i][2],solanlap2[i][3],solanlap2[i][4],solanlap2[i][5],solanlap2[i][6],solanlap2[i][7]} --Thong Tin danhsach = TaoBang(solanlap,dulieu,"") SaveData(data,danhsach) Talk(1,"","<color=cyan>Vo Lam Chi Ton:<color> Truoc <color=red>19h25<color> Nguoi Phai Gap Ta De Vao Hoi Truong Neu Khong Se Bi Huy Quyen Tranh Ba ! Tran Dau Dien Ra Vao Luc <color=yellow>19h30<color> !") Msg2Player("Ban Dang Ky Tranh Ngoi Minh Chu Thanh Cong !") else Msg2Player("Ban Chua Du Dieu Kien Tham Gia Doat Ngoi Vo Lam Minh Chu Vui Long Tim Hieu Dieu Kien !") end end end else Msg2Player("Ban Khong Phai La Nguoi Cua Hac Bach Luong Dao Khong Nen Bon Chen Tai Noi Day !") end end function gianhaphacdao() if GetCash() >= 50000 then if GetTask(1) == 0 and GetTask(2) == 0 and GetTask(3) == 0 and GetTask(4) == 0 and GetTask(5) == 0 and GetTask(6) == 0 and GetTask(7) == 0 and GetTask(8) == 0 and GetTask(9) == 0 and GetTask(10) == 0 and GetCamp() == 4 and GetRank() == 32 then SetTask(42,2) SetRank(18) Pay(50000) danhsachhacdao[getn(danhsachhacdao)+1] = {GetName(),GetLevel(),GetTask(197),GetRepute(),GetTask(41),"De Tu",GetUUID()} --Thong Tin danhsach = TaoBang(danhsachhacdao,"danhsachhacdao","") SaveData("dulieu/listhacdao.lua",danhsach) SetCamp(2) SetCurCamp(2) Msg2SubWorld(" <<"..GetName()..">> Da Gia Nhap Hac Dao !") else Msg2Player("Ban Can Phai Xuat Su Moi Co The Gia Nhap Hac Dao !") end else Msg2Player("Khong Tim Thay Ngan Luong Trong Nguoi ! ") end end function gianhapbachdao() if GetCash() >= 50000 then if GetTask(1) == 0 and GetTask(2) == 0 and GetTask(3) == 0 and GetTask(4) == 0 and GetTask(5) == 0 and GetTask(6) == 0 and GetTask(7) == 0 and GetTask(8) == 0 and GetTask(9) == 0 and GetTask(10) == 0 and GetCamp() == 4 and GetRank() == 32 then SetTask(42,1) SetRank(11) Pay(50000) danhsachbachdao[getn(danhsachbachdao)+1] = {GetName(),GetLevel(),GetTask(197),GetRepute(),GetTask(41),"De Tu",GetUUID()} --Thong Tin danhsach = TaoBang(danhsachbachdao,"danhsachbachdao","") SaveData("dulieu/listbachdao.lua",danhsach) SetCamp(1) SetCurCamp(1) Msg2SubWorld(" <<"..GetName()..">> Da Gia Nhap Bach Dao !") else Msg2Player("Ban Can Phai Xuat Su Moi Co The Gia Nhap Bach Dao !") end else Msg2Player("Khong Tim Thay Ngan Luong Trong Nguoi ! ") end end function gianhapluongdao() if GetCash() >= 50000 then if GetTask(1) == 0 and GetTask(2) == 0 and GetTask(3) == 0 and GetTask(4) == 0 and GetTask(5) == 0 and GetTask(6) == 0 and GetTask(7) == 0 and GetTask(8) == 0 and GetTask(9) == 0 and GetTask(10) == 0 and GetCamp() == 4 and GetRank() == 32 then SetTask(42,3) SetRank(25) Pay(50000) danhsachluongdao[getn(danhsachluongdao)+1] = {GetName(),GetLevel(),GetTask(197),GetRepute(),GetTask(41),"De Tu",GetUUID()} --Thong Tin danhsach = TaoBang(danhsachluongdao,"danhsachluongdao","") SaveData("dulieu/listluongdao.lua",danhsach) SetCamp(3) SetCurCamp(3) Msg2SubWorld(" <<"..GetName()..">> Da Gia Nhap Luong Dao !") else Msg2Player("Ban Can Phai Xuat Su Moi Co The Gia Nhap Luong Dao !") end else Msg2Player("Khong Tim Thay Ngan Luong Trong Nguoi ! ") end end function capnhat() if GetTask(42) == 1 then solanlap = danhsachbachdao solanlap3 = minhchubachdao dulieu = "dulieu/listbachdao.lua" solanlap2 = "danhsachbachdao" rankld = 11 elseif GetTask(42) == 2 then solanlap = danhsachhacdao solanlap3 = minhchuhacdao dulieu = "dulieu/listhacdao.lua" solanlap2 = "danhsachhacdao" rankld = 18 elseif GetTask(42) == 3 then solanlap = danhsachluongdao solanlap3 = minhchuluongdao dulieu = "dulieu/listluongdao.lua" solanlap2 = "danhsachluongdao" rankld = 25 end for i=1,getn(solanlap) do if GetUUID() == (solanlap[i][7]) then vitri = i end end lv = GetLevel() cs = GetTask(197) dv = GetRepute() conghien = GetTask(41) if GetTask(41) < 200 then chucvu = "De Tu" rank = rankld + 0 elseif GetTask(41) >= 200 and GetTask(41) < 2000 then chucvu = "Duong Chu" rank = rankld + 1 elseif GetTask(41) >= 2000 and GetTask(41) < 5000 then chucvu = "Ta Su" rank = rankld + 2 elseif GetTask(41) >= 5000 and GetTask(41) < 8000 then chucvu = "Huu Su" rank = rankld + 3 elseif GetTask(41) >= 8000 and GetTask(41) < 15000 then chucvu = "Truong Lao" rank = rankld + 4 elseif GetTask(41) >= 15000 then chucvu = "Pho Cung Chu" rank = rankld + 5 end if solanlap[vitri][7] == solanlap3[1][7] then danhsach = TaoBang(solanlap,solanlap2,"") solanlap[vitri][2] = lv solanlap[vitri][3] = cs solanlap[vitri][4] = dv solanlap[vitri][5] = conghien SaveData(dulieu,danhsach) else danhsach = TaoBang(solanlap,solanlap2,"") solanlap[vitri][2] = lv solanlap[vitri][3] = cs solanlap[vitri][4] = dv solanlap[vitri][5] = conghien solanlap[vitri][6] = chucvu SaveData(dulieu,danhsach) SetRank(rank) end end function congnap() SayEx({"<color=cyan>Vo Lam Chi Ton:<color> Nguoi Muon Cong Hien Bao Nhieu Ngan Luong ?", "100 Van/ch1", "500 Van/ch2", "1000 Van/ch3", "2000 Van/ch4", "5000 Van/ch5", "Thoat/Exit"}) end function ch1() if GetTask(42) == 1 then idmoney = 22 elseif GetTask(42) == 2 then idmoney = 23 elseif GetTask(42) == 3 then idmoney = 24 end a = GetCash() if GetCash() >= 1000000 then Pay(1000000) if GetCash() == a - 1000000 then SetGlbMissionV(idmoney,GetGlbMissionV(idmoney)+100) SetTask(41,GetTask(41)+3) Msg2Player("Ban Da Cong Hien 100v Cho Lanh Dia !") Msg2Player("Diem Cong Hien Cua Ban Tang Len 3 Diem") else Msg2Player("Khong Tim Thay Ngan Luong Trong Nguoi !") end else Msg2Player("Khong Tim Thay Ngan Luong Trong Nguoi !") end end function ch2() if GetTask(42) == 1 then idmoney = 22 elseif GetTask(42) == 2 then idmoney = 23 elseif GetTask(42) == 3 then idmoney = 24 end a = GetCash() if GetCash() >= 5000000 then Pay(5000000) if GetCash() == a - 5000000 then SetGlbMissionV(idmoney,GetGlbMissionV(idmoney)+500) SetTask(41,GetTask(41)+20) Msg2Player("Ban Da Cong Hien 500v Cho Lanh Dia !") Msg2Player("Diem Cong Hien Cua Ban Tang Len 20 Diem") else Msg2Player("Khong Tim Thay Ngan Luong Trong Nguoi !") end else Msg2Player("Khong Tim Thay Ngan Luong Trong Nguoi !") end end function ch3() if GetTask(42) == 1 then idmoney = 22 elseif GetTask(42) == 2 then idmoney = 23 elseif GetTask(42) == 3 then idmoney = 24 end a = GetCash() if GetCash() >= 10000000 then Pay(10000000) if GetCash() == a - 10000000 then SetGlbMissionV(idmoney,GetGlbMissionV(idmoney)+1000) SetTask(41,GetTask(41)+40) Msg2Player("Ban Da Cong Hien 1kv Cho Lanh Dia !") Msg2Player("Diem Cong Hien Cua Ban Tang Len 40 Diem") else Msg2Player("Khong Tim Thay Ngan Luong Trong Nguoi !") end else Msg2Player("Khong Tim Thay Ngan Luong Trong Nguoi !") end end function ch4() if GetTask(42) == 1 then idmoney = 22 elseif GetTask(42) == 2 then idmoney = 23 elseif GetTask(42) == 3 then idmoney = 24 end a = GetCash() if GetCash() >= 20000000 then Pay(20000000) if GetCash() == a - 20000000 then SetGlbMissionV(idmoney,GetGlbMissionV(idmoney)+2000) SetTask(41,GetTask(41)+85) Msg2Player("Ban Da Cong Hien 2kv Cho Lanh Dia !") Msg2Player("Diem Cong Hien Cua Ban Tang Len 85 Diem") else Msg2Player("Khong Tim Thay Ngan Luong Trong Nguoi !") end else Msg2Player("Khong Tim Thay Ngan Luong Trong Nguoi !") end end function ch5() if GetTask(42) == 1 then idmoney = 22 elseif GetTask(42) == 2 then idmoney = 23 elseif GetTask(42) == 3 then idmoney = 24 end a = GetCash() if GetCash() >= 50000000 then Pay(50000000) if GetCash() == a - 50000000 then SetGlbMissionV(idmoney,GetGlbMissionV(idmoney)+5000) SetTask(41,GetTask(41)+210) Msg2Player("Ban Da Cong Hien 5kv Cho Lanh Dia !") Msg2Player("Diem Cong Hien Cua Ban Tang Len 210 Diem") else Msg2Player("Khong Tim Thay Ngan Luong Trong Nguoi !") end else Msg2Player("Khong Tim Thay Ngan Luong Trong Nguoi !") end end function lykhai() SayEx({"<color=cyan>Vo Lam Chi Ton:<color> Ly Khai Se Bi Mat Toan Bo <color=red>Diem Cong Hien<color> Nguoi Suy Nghi Ky Chua ?", "Ta Suy Nghi Ky Roi/yeslykhai", "De Ta Suy Nghi Lai/Exit"}) end function yeslykhai() if GetTask(42) == 1 then solanlap = danhsachbachdao dulieu = "dulieu/listbachdao.lua" solanlap2 = "danhsachbachdao" elseif GetTask(42) == 2 then solanlap = danhsachhacdao dulieu = "dulieu/listhacdao.lua" solanlap2 = "danhsachhacdao" elseif GetTask(42) == 3 then solanlap = danhsachluongdao dulieu = "dulieu/listluongdao.lua" solanlap2 = "danhsachluongdao" end vitri = getn(solanlap) for i=1,getn(solanlap) do if GetUUID() == (solanlap[i][7]) then solanlap[i][1] = solanlap[vitri][1] solanlap[i][2] = solanlap[vitri][2] solanlap[i][3] = solanlap[vitri][3] solanlap[i][4] = solanlap[vitri][4] solanlap[i][5] = solanlap[vitri][5] solanlap[i][6] = solanlap[vitri][6] solanlap[i][7] = solanlap[vitri][7] danhsach = TaoBang(solanlap,solanlap2,"") SaveData(dulieu,danhsach) end end solanlap[vitri] = nil danhsach = TaoBang(solanlap,solanlap2,"") SaveData(dulieu,danhsach) SetTask(42,0) SetTask(41,0) SetCamp(4) SetCurCamp(4) SetRank(32) Msg2Player(" Ban Da Ly Khai Khoi Lanh Dia Thanh Cong !") end function timhieu() SayEx({"<color=cyan>Vo Lam Chi Ton:<color> Nguoi Muon Biet Ve Chuyen Gi ?", "Tim Hieu Chuc Vu/timhieucv", "Tim Hieu Xung Vuong/timhieuxv", "Cach Tang Diem Cong Hien/timhieuch", "Thoat/Exit"}) end function timhieucv() Say("<color=cyan>Vo Lam Chi Ton:<color>\tKhi Vao Lanh Dia De Tang Chuc Vu Ta Can:\n200 Diem Cong Hien: <<Duong Chu>>\n2000 Diem Cong Hien: <<Ta Su>>\n5000 Diem Cong Hien: <<Huu Su>>\n8000 Diem Cong Hien: <<Truong Lao>>\nTren 15000 Diem Cong Hien Se La <color=red><<Pho Cung Chu>><color> !",1,"Quyen Han/tieptheo1") end function tieptheo1() Say("Chuc Vu Cang Cao Cang Co Quyen:\n<color=yellow><<Duong Chu>>: Co Quyen Mua Lenh Bai\n<<Ta Su>>: x2 Tien Va Exp Khi Train\n<<Huu Su>>: x3 Tien Va Exp Khi Train\n<<Truong Lao>>: x4 Tien Va Exp Khi Train\n<<Pho Cung Chu>>: x5 Tien Va Exp Khi Train !",1,"Thoat/Exit") end function timhieuxv() Say("<color=cyan>Vo Lam Chi Ton:<color>\tDe Duoc Lam Vo Lam Minh Chu Can Phai:\n<color=yellow>Diem Cong Hien: Tren 200\nSo Lan Chuyen Sinh: Tren 2 Lan\nPhuc Duyen: Tren 200\nDanh Vong: Tren 100\nPhi Bao Danh: 100 Van !",1,"Chi Tiet/tieptheo2") end function tieptheo2() Talk(1,"","Tranh Minh Chu Dien Ra Hang Ngay Luc <color=water>19h<color> Thoi Gian Bao Danh <color=yellow>20<color> Phut Ta Se La Nguoi Phu Trach !") end function timhieuch() Talk(1,"","De Tang Diem Cong Hien Nguoi Phai:\n<color=blue>Cong Hien Tien Cho Lanh Dia\n<color=yellow>Lam Nhiem Vu Tren Khu Vuc Cua Lanh Dia !") end ---------------------------------------------------BIG BANG HAM HO TRO ALL SCRIPT--------------------------------------- function timestart() gio = tonumber(date("%H")) phut = tonumber(date("%M")) if gio == 19 and phut < 25 then return 1 else return 2 end end
Lần sửa cuối bởi thaihoa91, ngày 24-07-12 lúc 03:07 PM.
Khách viếng thăm hãy cùngLinh_JXxây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
24-07-12, 03:27 PM #2
- Ngày tham gia
- Jan 2012
- Đang ở
- Quảng Nam
- Bài viết
- 228
- Thanks
- 43
- Thanked 223 Times in 58 Posts
Ðề: Cho Hỏi Npc Này Sai Chổ Nào
Kích vào không nói chuyện được thì chỉ có 1 lỗi duy nhất là đường dẫn Script thôi kiểm tra lại xem.
Khách viếng thăm hãy cùng heocon246 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
24-07-12, 07:57 PM #3
- Ngày tham gia
- Jan 2012
- Bài viết
- 161
- Thanks
- 44
- Thanked 158 Times in 36 Posts
Ðề: Cho Hỏi Npc Này Sai Chổ Nào
Làm như heocon k dc nữa thì thay hàm SayEx = hàm Say là ok
Khách viếng thăm hãy cùng Rogue xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
25-07-12, 12:53 AM #4