PDA

View Full Version : [JX] [Linux] Mấy anh giúp em fixx lại đoạn code này vs ạ



gakfc1993
20-10-15, 02:37 PM
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},
},
}



<b><font color=red>[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>]</font></b>

e mới vọc scrip nên hổng biết sửa sao hết

bil4i3n
20-10-15, 04:37 PM
*.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ột :)

bthhhz
20-10-15, 05:20 PM
function cap80()
Thiếu sự kết thúc của function .
mở file = notepad++ sẽ thấy lỗi này rõ rệch

bthhhz
20-10-15, 06:04 PM
*.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ột :)

đính chính lại. muốn kiểm tra bằng cách mở notepad++ đánh RETURN và Return hoặc return .
nói chung các kiểu con đà điểu về return in hay ko in xem . nếu đúng nó tự định dạng là chữ màu xanh !!

gakfc1993
20-10-15, 07:50 PM
*.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ột :)


function cap80()
Thiếu sự kết thúc của function .
mở file = notepad++ sẽ thấy lỗi này rõ rệch


đính chính lại. muốn kiểm tra bằng cách mở notepad++ đánh RETURN và Return hoặc return .
nói chung các kiểu con đà điểu về return in hay ko in xem . nếu đúng nó tự định dạng là chữ màu xanh !!

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 ạ
:D