Kết quả 1 đến 5 của 5
-
20-10-15, 02:37 PM #1
- Ngày tham gia
- Oct 2014
- Bài viết
- 202
- Thanks
- 229
- Thanked 13 Times in 11 Posts
[Linux] Mấy anh giúp em fixx lại đoạn code này vs ạ
PHP Code:Include("\\script\\lib\\awardtemplet.lua");
function main()
dofile("script/event/birthday_jieri/200905/npc/npc_zhanxin_zunzhe.lua")
local tbSay = {}
tinsert(tbSay,"NhËn HuyÒn Vò Hµo HiÖp/HVHH")
tinsert(tbSay,"NhËn thëng theo cÊp ®é./nhanthuongcap")
tinsert(tbSay,"NhËn lÖnh bµi hæ trî t©n thñ./lenhbaihotrotanthu")
tinsert(tbSay,"NhËn m¸u t©n thñ./nhanmau")
tinsert(tbSay,"Ðæi truy c«ng lÖnh./doitcl")
tinsert(tbSay,"N©ng cÊp ngùa./nangcapngua")
tinsert(tbSay,"KÕt thóc ®èi tho¹i/Quit")
Say("Hæ trî t©n thñ", getn(tbSay), tbSay)
end
function HVHH()
local nCurDate = tonumber(GetLocalDate("%Y%m%d"))
local nMonth =tonumber(GetLocalDate("%d"))
local IsDailyTSK = GetTask(Task_Daily_Quest)
if (IsDailyTSK ~= nCurDate) then
SetTask(Task_Daily_Quest, nCurDate)
SetTask(Task_IsQuest, 0)
SetTask(Task_IsFinishQuest, 0)
SetTask(Task_lag_TskID, 0)
end
local tbOpt = {};
local szTitle = format("Xin chµo!");
tinsert(tbOpt, 1, szTitle)
tbVngToolAward:AddDialog(tbOpt, "ChiÕn T©m T«n Gi¶")
tbVnHuyenVu:AddDialog(tbOpt)
end
function lenhbaihotrotanthu()
AddItem(6,1,4257,0,0,0,0)
end
function nhanthuongcap()
local tbSay = {}
tinsert(tbSay,"NhËn thuong cap 80/cap80")
tinsert(tbSay,"NhËn thuong cap 100/cap100")
tinsert(tbSay,"NhËn thuong cap 120/cap120")
tinsert(tbSay,"NhËn thuong cap 150/cap150")
tinsert(tbSay,"Nhan thuong cap 180/cap180")
tinsert(tbSay,"KÕt thóc ®èi tho¹i/Quit")
Say("Hæ trî t©n thñ", getn(tbSay), tbSay)
end
function cap80()
if (GetLevel ()>80 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 80 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
for i=424,427 do
AddGoldItem(0 ,i)
end
function cap100()
if (GetLevel ()>100 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 100 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
for i=424,427 do
AddGoldItem(0 ,i)
end
function cap120()
if (GetLevel ()>120 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 120 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
for i=424,427 do
AddGoldItem(0 ,i)
end
function cap150()
if (GetLevel ()>150 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 150 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
for i=424,427 do
AddGoldItem(0 ,i)
end
function cap180()
if (GetLevel ()>180 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 180 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
for i=424,427 do
AddGoldItem(0 ,i)
end
function nhanmau()
if CalcFreeItemCellCount() < 10 then
Say("H·y cÊt bít vËt phÈm ®Ó ®¶m b¶o cã 10 « trèng råi h·y më.",0);
return 1;
end
if GetLevel()<90 then
local tbItem = {szName="Ngò Hoa Ngäc Lé Hoµn", tbProp={1, 2, 0, 5, 0, 0}, nCount = 10, nExpiredTime = 10080, nBindState = -2}
Talk(1, "", "B¹n nhËn ®îc hæ trî nµy ®Õn cÊp 90");
tbAwardTemplet:GiveAwardByList(tbItem, "PhÇn thëng t©n thñ");
end
end
function doitcl()
local nCount = CalcEquiproomItemCount(6,1,2015,-1)
local nRepute = random(10,15)
if nCount < 1 then
Say("Ng¬¬i kh«ng cã Truy C«ng LÖnh!",0)
return
end
ConsumeEquiproomItem(1,6,1,2015,-1)
AddRepute(nRepute)
Msg2Player("Ng¬¬i nhËn ®¬îc ".. nRepute .." ®iÓm danh väng")
end
function nangcapngua()
local tbOpt =
{
{"N©ng cÊp ngùa Phi V©n", bovaophivan},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Ng¬i cÇn g×?", tbOpt)
end
function bovaophivan()
GiveItemUI("§ãng mÆt tra phÝ .","§em m· bµi ®Æt ë phÝa díi ", "nangcapphivan", "no")
end
function nangcapphivan(ncount)
local tien = 10000000
local lam = 1
local tu = 1
local luc = 1
local tinhhong = 1
if (ncount == 0) then
Say("CÇn bá vµo m· bµi!", 0)
return
end
if (ncount > 1) then
Say("Ta chØ cÇn 1 m· bµi, nh÷ng thø kh¸c ta kh«ng cÇn", 0)
return
end
local nItemIdx = GetGiveItemUnit(1);
local nStackCount = GetItemStackCount(nItemIdx);
if (nStackCount > 1) then
Say("Ta chØ cÇn 1 m· bµi, nh÷ng thø kh¸c ta kh«ng cÇn", 0)
return
end
local itemgenre, detailtype, particular = GetItemProp(nItemIdx);
if (itemgenre ~= 6 or particular ~= 2332) then
Say(format("ThÈm C©u: Ta chØ cÇn 1 m· bµi ChiÕu D¹ nh÷ng thø kh¸c ta kh«ng cÇn", "M· bµi chiÕu d¹"), 2, "§Ó ta ®Æt l¹i/bovaophivan", "Tho¸t/no")
return
end
if (GetCash() < tien) then
Say("Kh«ng ®ñ tiÒn trªn ngêi, Sè lîng cÇn: " ..tien.. "lîng", 0)
return
end
if (CalcEquiproomItemCount(4, 238, 1, 1) < lam) then
Say("Kh«ng ®ñ Lam Thñy Tinh trªn ngêi, Sè lîng cÇn: " ..lam.. "", 0)
return
end
if (CalcEquiproomItemCount(4, 239, 1, 1) < tu) then
Say("Kh«ng ®ñ Tö Thñy Tinh trªn ngêi, Sè lîng cÇn: " ..tu.. "", 0)
return
end
if (CalcEquiproomItemCount(4, 240, 1, 1) < luc) then
Say("Kh«ng ®ñ Lôc Thñy Tinh trªn ngêi, Sè lîng cÇn: " ..luc.. "", 0)
return
end
if (CalcEquiproomItemCount(4, 353, 1, 1) < tinhhong) then
Say("Kh«ng ®ñ Tinh Hång B¶o Th¹ch trªn ngêi, Sè lîng cÇn: " ..tinhhong.. "", 0)
return
end
---
local nSeed = random(1, 10000);
local nIdx = 1;
local nTotal = 0;
for i = 1, getn(tab_phivan) do
nTotal = nTotal + tab_phivan[i][2] * 10000;
if (nSeed <= nTotal) then
nIdx = i;
break
end;
end;
if (nIdx == 1) then
RemoveItemByIndex(nItemIdx);
Pay(tien);
ConsumeEquiproomItem(lam, 4, 238, 1, 1);
ConsumeEquiproomItem(tu, 4, 239, 1, 1);
ConsumeEquiproomItem(luc, 4, 240, 1, 1);
ConsumeEquiproomItem(tinhhong, 4, 353, 1, 1);
AddItem(0,10,8,10,0,0,0);
Msg2Player("Chóc mõng! B¹n nhËn ®îc <color=yellow>"..tab_phivan[nIdx][1].."<color>");
else
RemoveItemByIndex(nItemIdx);
Pay(tien);
ConsumeEquiproomItem(lam, 4, 238, 1, 1);
ConsumeEquiproomItem(tu, 4, 239, 1, 1);
ConsumeEquiproomItem(luc, 4, 240, 1, 1);
ConsumeEquiproomItem(tinhhong, 4, 353, 1, 1);
Msg2Player("N©ng cÊp thÊt b¹i! ThËt ®¸ng tiÕc.");
end;
end
function Quit() end
tbAllSkill = {
shaolin = {
[1] = {10,14},
[2] = {4,6,8},
[3] = {15},
[4] = {16},
[5] = {20},
[6] = {11,19,271},
[7] = {21,273},
[9] = {318,319,321,709},
},
tianwang = {
[1] = {29,30,34},
[2] = {23,24,26},
[3] = {33},
[4] = {31,35,37},
[5] = {40},
[6] = {42},
[7] = {32,36,41,324},
[9] = {322,323,325,708},
},
tangmen = {
[1] = {45},
[2] = {43,347},
[3] = {303},
[4] = {47,50,54,343},
[5] = {345},
[6] = {349},
[7] = {48,58,249,341},
[9] = {302,339,342,351,710},
},
wudu = {
[1] = {63,65},
[2] = {60,62,67},
[3] = {66,70},
[4] = {64,68,69,384},
[5] = {73,356},
[6] = {72},
[7] = {71,74,75},
[9] = {353,355,390,711},
},
emei = {
[1] = {80,85},
[2] = {77,79},
[3] = {93},
[4] = {82,89,385},
[5] = {86},
[6] = {92},
[7] = {88,91,252,282},
[9] = {328,332,380,712},
},
cuiyan = {
[1] = {99,102},
[2] = {95,97},
[3] = {269},
[4] = {105,113},
[5] = {100},
[6] = {109},
[7] = {108,111,114},
[9] = {336,337,713},
},
gaibang = {
[1] = {119,122},
[2] = {115,116},
[3] = {129},
[4] = {124,274},
[5] = {277},
[6] = {125,128},
[7] = {130,360},
[9] = {357,359,714},
},
tianren = {
[1] = {135,145},
[2] = {131,132,136},
[3] = {137},
[4] = {138,140,141},
[5] = {364},
[6] = {143},
[7] = {142,148,150},
[9] = {361,362,391,715},
},
wudang = {
[1] = {153,155},
[2] = {151,152},
[3] = {159},
[4] = {158,164},
[5] = {160},
[6] = {157},
[7] = {165,166,267},
[9] = {365,368,716},
},
kunlun = {
[1] = {169,179},
[2] = {167,168,171,392},
[3] = {174},
[4] = {172,173,178,393},
[5] = {175,181},
[6] = {90,176},
[7] = {182,275,630},
[9] = {372,375,394,717},
},
}
e mới vọc scrip nên hổng biết sửa sao hếtKhách viếng thăm hãy cùng gakfc1993 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
20-10-15, 04:37 PM #2
- Ngày tham gia
- Feb 2015
- Đang ở
- fb.com/bil.jx
- Bài viết
- 321
- Thanks
- 87
- Thanked 276 Times in 151 Posts
Ðề: [Linux] Mấy anh giúp em fixx lại đoạn code này vs ạ
*.LUA là ngôn ngữ có phân biệt chữ hoa chữ thường nên bạn nhấn Ctrl + H và nhập vào:
dòng trên: Return
dòng dưới: return
và nhấn thay thế, để xem từng cái mộtKhách viếng thăm hãy cùng bil4i3n xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
Các thành viên gởi lời cảm ơn đến bil4i3n vì bài viết này !
gakfc1993 (20-10-15)
-
20-10-15, 05:20 PM #3
- Ngày tham gia
- Apr 2013
- Bài viết
- 1,237
- Thanks
- 315
- Thanked 500 Times in 292 Posts
Ðề: [Linux] Mấy anh giúp em fixx lại đoạn code này vs ạ
function cap80()
Thiếu sự kết thúc của function .
mở file = notepad++ sẽ thấy lỗi này rõ rệchKhách viếng thăm hãy cùngbthhhzxây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
Các thành viên gởi lời cảm ơn đến bthhhz vì bài viết này !
gakfc1993 (20-10-15)
-
20-10-15, 06:04 PM #4
- Ngày tham gia
- Apr 2013
- Bài viết
- 1,237
- Thanks
- 315
- Thanked 500 Times in 292 Posts
Ðề: [Linux] Mấy anh giúp em fixx lại đoạn code này vs ạ
Khách viếng thăm hãy cùngbthhhzxây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
Các thành viên gởi lời cảm ơn đến bthhhz vì bài viết này !
gakfc1993 (20-10-15)
-
20-10-15, 07:50 PM #5
- Ngày tham gia
- Oct 2014
- Bài viết
- 202
- Thanks
- 229
- Thanked 13 Times in 11 Posts
Ðề: [Linux] Mấy anh giúp em fixx lại đoạn code này vs ạ
Dù ai đi ngược về xuôi nhớ ngày giỗ tổ ... ? (gợi ý câu trả lời: mung 10 thang 3)
tk 2 anh
em fixx đc rồi ạ
Khách viếng thăm hãy cùng gakfc1993 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
Các Chủ đề tương tự
-
[MU] Cần mọi người giúp fixx lỗi này dùm
Bởi nhocute19 trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 3Bài viết cuối: 17-05-14, 09:38 AM -
[KT] Hỏi cách fixx lỗi dissconec của 1 số map
Bởi arsenalk108 trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 2Bài viết cuối: 24-05-12, 05:55 PM -
cách fixx pet
Bởi linhkids trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 3Bài viết cuối: 10-08-11, 11:31 AM -
fixx lỗi chế đồ sv zrockman
Bởi mathewno1 trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 3Bài viết cuối: 27-02-11, 07:56 PM