Share Server Jx ..:::CộngĐồngViệt:::..

[hoangcungclub]

Bác ơi, e có lấy server của bác về nghịch thử, thì phát sinh vấn đề là các quái từ 0x -> map 6x đều đánh mình ko mất máu, chỉ có quái map 7x trở lên đánh skill thì mình mới mất máu thôi, em đã có chỉnh sửa min dame, max dame trong file NPCs.txt rồi đồng bộ với client rồi nhưng vẫn ko đc, bác có thể hỗ trợ e bug này đc ko ạ ?

mình xin lỗi bạn, mình đã ngưng dv jx lâu rùi, và giờ mình có gia đình và baby rồi, nên ích đụng vào lắm, bạn làm cái topic rùi nhờ các bạn ở CLB xem sao.

[rexviet]

mình xin lỗi bạn, mình đã ngưng dv jx lâu rùi, và giờ mình có gia đình và baby rồi, nên ích đụng vào lắm, bạn làm cái topic rùi nhờ các bạn ở CLB xem sao.

Vâng, tks bác đã trả lời e ạ

[Kai_it]

Mình có 1 câu hỏi

Một số server có thể sửa trong config, (server này là trong congd5.dll thì phải) Represent=3 là có thể chơi được game trên chế độ màu 32bit Win7
Mình sửa thì nó báo lỗi thiếu DirectX9, mặc dù Win7 là DirectX11

Vậy có thể fix cái này không bác?

[haidaibang6677]

Cho mình hỏi khi mới vào thì nhân vật mặc định có 999 XU trong tiền trang, mình muốn set về 0 thì làm thế nào vậy ?

[alopay]

Bác nào đã fix được ép đồ và xếp chồng cho em xin cái file đã fix với, em xin cảm ơn nhiều ạh

[tinhhack]

sv này không nên dùng nữa bạn ơi
lỗi xếp chồng không fix dc cho dù trong sv không cho xếp vẫn bị

đã test rồi........ cạch

lên sv ngạo tuyết đi, khá chuẩn, nhưng script hơi khó hiểu

[alopay]

sv này không nên dùng nữa bạn ơi
lỗi xếp chồng không fix dc cho dù trong sv không cho xếp vẫn bị

đã test rồi........ cạch

lên sv ngạo tuyết đi, khá chuẩn, nhưng script hơi khó hiểu

vậy bạn có thể hướng dẫn mình fix cái ép đồ được không

[tinhhack]

file forge_item.lua

--Author: lzlsky301--Date: 07/11/12Include("\\script\\global\\sourceatn.lua")Include("\\script\\global\\tasklist.lua")
function ForgeItem()        -- Che tao trang bi huyen tinhdofile("Script/Special/forge_item.lua")    local TAB_FORGE =         {    "ChÕ t¹o trang bÞ huyÒn tinh thµnh c«ng. Xin chóc mõng!",            "ChÕ t¹o trang bÞ huyÒn tinh thÊt b¹i. Xin chia buån!",            "Nguyªn liÖu dupe tØ lÖ 0%, xin chia buån!",        }    local aSky1 = GetIndexForgeItem(0) --o^ item    local aSky2 = GetIndexForgeItem(1) --o^ HT aSky2 = lv HT    local aSky3 = GetDetailItem(aSky2)    if (aSky3 == 4) then             --check lv HT        aHeo = random(1,3)    elseif (aSky3 == 5) then        aHeo = random(2,4)    elseif (aSky3 >= 6) and (aSky3 <= 13) then        local eHeo = random(1,100)        if (eHeo == 1) then            aHeo = 6        elseif (eHeo > 1) and (eHeo < 6) then            aHeo = 6        else            aHeo = 6        end    end    local eHeo1 = random(1,8)  --% ti le thanh cong    local n = GetEventItemCount(GetDetailItem(aSky2)) --- lay so luong HT trc'    if eHeo1 > 1 then        RemoveItem(aSky2)            if GetEventItemCount(GetDetailItem(aSky2)) == (n-1) then --check so luong HT                SetPurpleItem(aSky1, aHeo)                Msg2Player(TAB_FORGE[1])                Pay(10000)                return            else                Msg2Player(TAB_FORGE[3])                            return            end    else        RemoveItem(aSky2)        Msg2Player(TAB_FORGE[2])        Pay(10000)        return    endend 

file distill_item.lua

--Author: lzlsky301--Date: 07/11/12Include("\\script\\global\\sourceatn.lua")Include("\\script\\global\\tasklist.lua")
function DistillItem()        -- Hut thuoc tinh trang bidofile("Script/Special/distill_item.lua")    local TAB_DISTILL =         {    "Hót thuéc tÝnh thµnh c«ng. Xin chóc mõng!",            "Hót thuéc tÝnh thÊt b¹i. Xin chia buån!",            "Nguyªn liÖu dupe tØ lÖ 0%, xin chia buån!",        }    local aSky1 = GetIndexDistillItem(0)    --o^ da'    local aSky2 = GetIndexDistillItem(1)     -- HT    local aSky3 = GetIndexDistillItem(2)    --o^ trang bi    local aSky4 = GetIndexDistillItem(3)    --o^ nguyen lieu 3-10 = 8 o^    local aSky5 = GetIndexDistillItem(4)    local aSky6 = GetIndexDistillItem(5)    local aSky7 = GetIndexDistillItem(6)    local aSky8 = GetIndexDistillItem(7)    local aSky9 = GetIndexDistillItem(8)    local aSky10 = GetIndexDistillItem(9)    local aSky11 = GetIndexDistillItem(10)    local aHeo = GetDetailItem(aSky3)    local aHeo0 = GetDetailItem(aSky2)    local aHeo1 = GetOp1Item(aSky1)    local aHeo2 = GetOp2Item(aSky1)    local aHeo3 = GetOp3Item(aSky1)    local aHeo4 = GetOp4Item(aSky1)    local aHeo5 = GetOp5Item(aSky1)    local aHeo6 = GetOp6Item(aSky1)    local iHeo1 = GetDetailItem(aSky4)    local iHeo2 = GetDetailItem(aSky5)    local iHeo3 = GetDetailItem(aSky6)    local iHeo4 = GetDetailItem(aSky7)    local iHeo5 = GetDetailItem(aSky8)    local iHeo6 = GetDetailItem(aSky9)    local iHeo7 = GetDetailItem(aSky10)    local iHeo8 = GetDetailItem(aSky11)    local TAB_OPTION = {{1,4,4,10},{2,5,7,14},{3,6,10,20},{4,7,15,25},{5,8,19,29},{6,9,24,34},{7,10,29,39},{8,11,34,44},{9,12,39,49},{10,13,44,54}}    local TAB_OPTION1 = {{1,14,3,4,5,6,7,8,4,8},{2,15,4,2,1,5,6,5,6,7},{3,16,2,5,1,3,6,7,6,4},{4,31,1,2,2,3,1,2,3,3},{5,32,1,2,2,3,3,4,1,4},{6,33,1,2,2,3,1,5,3,4}}    for i=1,getn(TAB_OPTION) do        if (aHeo0 == TAB_OPTION[i][2]) then            eHeo0 = random(TAB_OPTION[i][3],TAB_OPTION[i][4])        elseif (aSky2 == 0) then            eHeo0 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo1 == TAB_OPTION1[i][2]) then            eHeo1 = TAB_OPTION1[i][10]        elseif (aSky4 == 0) then            eHeo1 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo2 == TAB_OPTION1[i][2]) then            eHeo2 = TAB_OPTION1[i][8]        elseif (aSky5 == 0) then            eHeo2 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo3 == TAB_OPTION1[i][2]) then            eHeo3 = TAB_OPTION1[i][9]        elseif (aSky6 == 0) then            eHeo3 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo4 == TAB_OPTION1[i][2]) then            eHeo4 = TAB_OPTION1[i][5]        elseif (aSky7 == 0) then            eHeo4 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo5 == TAB_OPTION1[i][2]) then            eHeo5 = TAB_OPTION1[i][6]        elseif (aSky8 == 0) then            eHeo5 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo6 == TAB_OPTION1[i][2]) then            eHeo6 = TAB_OPTION1[i][4]        elseif (aSky9 == 0) then            eHeo6 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo7 == TAB_OPTION1[i][2]) then            eHeo7 = TAB_OPTION1[i][7]        elseif (aSky10 == 0) then            eHeo7 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo8 == TAB_OPTION1[i][2]) then            eHeo8 = TAB_OPTION1[i][5]        elseif (aSky11 == 0) then            eHeo8 = 0        end    end    eHeo = floor((eHeo0 + eHeo1 + eHeo2 + eHeo3 + eHeo4 + eHeo5 + eHeo6 + eHeo7 + eHeo8 + 10)/10)    if (eHeo >= 10) then        eHeo = 10    end--===================================================CHECK NGUYEN LIEU EP=============================
    local nl4 = GetEventItemCount(GetDetailItem(aSky4))    RemoveItem(aSky4)    if nl4 > 0 and GetEventItemCount(GetDetailItem(aSky4)) == nl4 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl5 = GetEventItemCount(GetDetailItem(aSky5))    RemoveItem(aSky5)    if nl5 > 0 and GetEventItemCount(GetDetailItem(aSky5)) == nl5 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl6 = GetEventItemCount(GetDetailItem(aSky6))    RemoveItem(aSky6)    if nl6 > 0 and GetEventItemCount(GetDetailItem(aSky6)) == nl6 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl7 = GetEventItemCount(GetDetailItem(aSky7))    RemoveItem(aSky7)    if nl7 > 0 and GetEventItemCount(GetDetailItem(aSky7)) == nl7 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl8 = GetEventItemCount(GetDetailItem(aSky8))    RemoveItem(aSky8)    if nl8 > 0 and GetEventItemCount(GetDetailItem(aSky8)) == nl8 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl9 = GetEventItemCount(GetDetailItem(aSky9))    RemoveItem(aSky9)    if nl9 > 0 and GetEventItemCount(GetDetailItem(aSky9)) == nl9 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl10 = GetEventItemCount(GetDetailItem(aSky10))    RemoveItem(aSky10)    if nl10 > 0 and GetEventItemCount(GetDetailItem(aSky10)) == nl10 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl11 = GetEventItemCount(GetDetailItem(aSky11))    RemoveItem(aSky11)    if nl11 > 0 and GetEventItemCount(GetDetailItem(aSky11)) == nl11 then        Msg2Player(TAB_DISTILL[3])        return    end    local ht = GetEventItemCount(GetDetailItem(aSky2))    RemoveItem(aSky2)    if GetEventItemCount(GetDetailItem(aSky2)) == ht then         Msg2Player(TAB_DISTILL[3])         return    end--====================================================================================================    Pay(5000)    if (aHeo == 0) then        SetMagic2Mine(aSky3,aHeo1,eHeo)        RemoveItem(aSky1)        Msg2Player(TAB_DISTILL[1])    elseif (aHeo == 1) then        SetMagic2Mine(aSky3,aHeo3,eHeo)        RemoveItem(aSky1)        Msg2Player(TAB_DISTILL[1])    elseif (aHeo == 2) then        SetMagic2Mine(aSky3,aHeo5,eHeo)        RemoveItem(aSky1)        Msg2Player(TAB_DISTILL[1])    elseif (aHeo >= 3) and (aHeo <= 7) then        SetMagic2Mine(aSky3,aHeo2,eHeo)        RemoveItem(aSky1)        Msg2Player(TAB_DISTILL[1])    elseif (aHeo >= 8) and (aHeo <= 12) then        SetMagic2Mine(aSky3,aHeo4,eHeo)        RemoveItem(aSky1)        Msg2Player(TAB_DISTILL[1])    elseif (aHeo >= 13) and (aHeo <= 17) then        SetMagic2Mine(aSky3,aHeo6,eHeo)        RemoveItem(aSky1)        Msg2Player(TAB_DISTILL[1])    endend 

file enchase_item.lua

--Author: lzlsky301--Date: 07/11/12Include("\\script\\global\\sourceatn.lua")Include("\\script\\global\\tasklist.lua")
function EnchaseItem()        -- Kham thuoc tinh trang bi    dofile("Script/Special/enchase_item.lua")    local TAB_ENCHASE =         {    "Kham n¹m thuéc tÝnh thµnh c«ng. Xin chóc mõng!",            "Kham n¹m tÝnh thÊt b¹i. Xin chia buån!",            "Trang bÞ vµ kho¸ng th¹ch kh«ng cïng hÖ!",            "Nguyªn liÖu dupe tØ lÖ 0%, xin chia buån!",        }    local aSky1 = GetIndexEnchaseItem(0)     --trang bi    local aSky2 = GetIndexEnchaseItem(1)    --HT    local aSky3 = GetIndexEnchaseItem(2)    --da ep    local aSky4 = GetIndexEnchaseItem(3)    --8 o^ nguyen lieu 3-10    local aSky5 = GetIndexEnchaseItem(4)    local aSky6 = GetIndexEnchaseItem(5)    local aSky7 = GetIndexEnchaseItem(6)    local aSky8 = GetIndexEnchaseItem(7)    local aSky9 = GetIndexEnchaseItem(8)    local aSky10 = GetIndexEnchaseItem(9)    local aSky11 = GetIndexEnchaseItem(10)    local eHeo2 = GetDetailItem(aSky2)    local eHeo3 = GetDetailItem(aSky3)    local eHeo4 = GetDetailItem(aSky4)    local eHeo5 = GetDetailItem(aSky5)    local eHeo6 = GetDetailItem(aSky6)    local eHeo7 = GetDetailItem(aSky7)    local eHeo8 = GetDetailItem(aSky8)    local eHeo9 = GetDetailItem(aSky9)    local eHeo10 = GetDetailItem(aSky10)    local eHeo11 = GetDetailItem(aSky11)    local emHeo1 = GetOp1Item(aSky3)    local emHeo = GetLevelItem(aSky3)    -- moi them Mr.Cung    local MK = GetSeriesItem(aSky3) -- da' ep    local MK1 = GetSeriesItem(aSky1) --item bo vao ep    -- end        local TAB_OPTION = {{1,4,1,10},{2,5,5,15},{3,6,10,20},{4,7,15,25},{5,8,20,35},{6,9,25,45},{7,10,30,50},{8,11,35,55},{9,12,40,60},{10,13,45,65}}    local TAB_OPTION2 = {{1,4,5,15},{2,5,10,20},{3,6,15,25},{4,7,20,30},{5,8,25,45},{6,9,30,55},{7,10,35,65},{8,11,40,75},{9,12,45,85},{10,13,50,95}}    local TAB_OPTION1 = {{1,14,5,9,10,11,12,6,7,8},{2,15,4,5,6,8,9,5,10,6},{3,16,6,7,7,8,10,9,5,6},{4,31,6,4,4,3,5,4,3,3},{5,32,4,5,6,7,3,6,6,4},{6,33,4,8,4,5,6,5,7,6}}    for i=1,getn(TAB_OPTION) do        if (eHeo2 == TAB_OPTION[i][2]) then                 --neu id HT = 4-13 tuong ung cap 1-10            iHeo0 = random(TAB_OPTION[i][3],TAB_OPTION[i][4])    --thi iHeo0 = random        end    end    for i=1,getn(TAB_OPTION2) do        if (emHeo == TAB_OPTION2[i][1]) then            iHeo9 = TAB_OPTION2[i][4]        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo4 == TAB_OPTION1[i][2]) then            iHeo1 = TAB_OPTION1[i][1]        elseif (aSky4 == 0) then            iHeo1 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo5 == TAB_OPTION1[i][2]) then            iHeo2 = TAB_OPTION1[i][2]        elseif (aSky5 == 0) then            iHeo2 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo6 == TAB_OPTION1[i][2]) then            iHeo3 = TAB_OPTION1[i][3]        elseif (aSky6 == 0) then            iHeo3 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo7 == TAB_OPTION1[i][2]) then            iHeo4 = TAB_OPTION1[i][4]        elseif (aSky7 == 0) then            iHeo4 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo8 == TAB_OPTION1[i][2]) then            iHeo5 = TAB_OPTION1[i][5]        elseif (aSky8 == 0) then            iHeo5 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo9 == TAB_OPTION1[i][2]) then            iHeo6 = TAB_OPTION1[i][6]        elseif (aSky9 == 0) then            iHeo6 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo10 == TAB_OPTION1[i][2]) then            iHeo7 = TAB_OPTION1[i][7]        elseif (aSky10 == 0) then            iHeo7 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo11 == TAB_OPTION1[i][2]) then            iHeo8 = TAB_OPTION1[i][8]        elseif (aSky11 == 0) then            iHeo8 = 0        end    end    local aTuong = (iHeo0 + iHeo1 + iHeo2 + iHeo3 + iHeo4 + iHeo5 + iHeo6 + iHeo7 + iHeo8 + iHeo9)    local TAB_LUCK = {{10},{20},{30},{40},{50},{60},{70},{80},{90},{95},{100},{105},{111},{115},{121},{126},{131},{136},{141},{146}}    if (aTuong == 55) or (aTuong == 77) or (aTuong == 99) or (aTuong == 111) then        aHang = random(28,30)    elseif (aTuong < TAB_LUCK[1][1]) then        aHang = 11    elseif (aTuong < TAB_LUCK[2][1]) then        aHang = 12    elseif (aTuong < TAB_LUCK[3][1]) then        aHang = 13    elseif (aTuong < TAB_LUCK[4][1]) then        aHang = 14    elseif (aTuong < TAB_LUCK[5][1]) then        aHang = 15    elseif (aTuong < TAB_LUCK[6][1]) then        aHang = 16    elseif (aTuong < TAB_LUCK[7][1]) then        aHang = 17    elseif (aTuong < TAB_LUCK[8][1]) then        aHang = 18    elseif (aTuong < TAB_LUCK[9][1]) then        aHang = 19    elseif (aTuong < TAB_LUCK[10][1]) then        aHang = 20    elseif (aTuong < TAB_LUCK[11][1]) then        aHang = 21    elseif (aTuong < TAB_LUCK[12][1]) then        aHang = 22    elseif (aTuong < TAB_LUCK[13][1]) then        aHang = 23    elseif (aTuong < TAB_LUCK[14][1]) then        aHang = 24    elseif (aTuong < TAB_LUCK[15][1]) then        aHang = 25    elseif (aTuong < TAB_LUCK[16][1]) then        aHang = 26    elseif (aTuong < TAB_LUCK[17][1]) then        aHang = 27    elseif (aTuong < TAB_LUCK[18][1]) then        aHang = 28    elseif (aTuong < TAB_LUCK[19][1]) then        aHang = 29    elseif (aTuong >= TAB_LUCK[19][1]) then        aHang = 30    end    if (eHeo3 == 0) then    --<-----------------------neu ID da' ((eHeo3) = 0,1,2 => da' hien 1,2,3)        eHeo = 0    --<-----------------------dong` khi ep = 0    elseif (eHeo3 == 1) then                eHeo = 2    --<-----------------------dong` khi ep = 2    elseif (eHeo3 == 2) then        eHeo = 4    --<-----------------------dong` khi ep = 4    elseif (eHeo3 >= 3) and (eHeo3 <= 7) then    --da' an 1        eHeo = 1                --dong` khi ep = 1    elseif (eHeo3 >= 8) and (eHeo3 <= 12) then    --da an 2        eHeo = 3                --dong` khi ep = 3    elseif (eHeo3 >= 13) and (eHeo3 <= 17) then    --da an 3        eHeo = 5                --dong` khi ep = 5    end--============================================================CHECK EP KHAC HE=============================     -- item MK1 can ep co he la 0 = kim, 1=moc,2=thuy,3=hoa,4=tho    --da' ep MK cung nhu the    0= kim, 1=moc,2=thuy,3=hoa,4=tho, 5 = da' hien    if (MK < 5) and  (MK ~= MK1) then        Msg2Player(TAB_ENCHASE[3])        return 0    end--==========================================================================================================--===================================================CHECK NGUYEN LIEU EP=============================
    local nl4 = GetEventItemCount(GetDetailItem(aSky4))    RemoveItem(aSky4)    if nl4 > 0 and GetEventItemCount(GetDetailItem(aSky4)) == nl4 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl5 = GetEventItemCount(GetDetailItem(aSky5))    RemoveItem(aSky5)    if nl5 > 0 and GetEventItemCount(GetDetailItem(aSky5)) == nl5 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl6 = GetEventItemCount(GetDetailItem(aSky6))    RemoveItem(aSky6)    if nl6 > 0 and GetEventItemCount(GetDetailItem(aSky6)) == nl6 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl7 = GetEventItemCount(GetDetailItem(aSky7))    RemoveItem(aSky7)    if nl7 > 0 and GetEventItemCount(GetDetailItem(aSky7)) == nl7 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl8 = GetEventItemCount(GetDetailItem(aSky8))    RemoveItem(aSky8)    if nl8 > 0 and GetEventItemCount(GetDetailItem(aSky8)) == nl8 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl9 = GetEventItemCount(GetDetailItem(aSky9))    RemoveItem(aSky9)    if nl9 > 0 and GetEventItemCount(GetDetailItem(aSky9)) == nl9 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl10 = GetEventItemCount(GetDetailItem(aSky10))    RemoveItem(aSky10)    if nl10 > 0 and GetEventItemCount(GetDetailItem(aSky10)) == nl10 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl11 = GetEventItemCount(GetDetailItem(aSky11))    RemoveItem(aSky11)    if nl11 > 0 and GetEventItemCount(GetDetailItem(aSky11)) == nl11 then        Msg2Player(TAB_ENCHASE[4])        return    end    local da = GetMineItemCount(GetDetailItem(aSky3))    RemoveItem(aSky3)    if GetMineItemCount(GetDetailItem(aSky3)) == da then         Msg2Player(TAB_ENCHASE[4])         return    end    local ht = GetEventItemCount(GetDetailItem(aSky2))    RemoveItem(aSky2)    if GetEventItemCount(GetDetailItem(aSky2)) == ht then         Msg2Player(TAB_ENCHASE[4])         return    end--====================================================================================================    local nA = random(1,100) --nA : ti le thanh cong 1 = 99%    if nA > 1 then        SetMagic2Equip(aSky1, emHeo1, eHeo, aHang)        --RemoveItem(aSky2)        --RemoveItem(aSky3)        --for i=3,10 do RemoveItem(GetIndexEnchaseItem(i)) end        Msg2Player(TAB_ENCHASE[1])    else        RemoveItem(aSky2)        RemoveItem(aSky3)        for i=3,10 do RemoveItem(GetIndexEnchaseItem(i)) end        Msg2Player(TAB_ENCHASE[2])    end        end 

[alopay]

file forge_item.lua

--Author: lzlsky301--Date: 07/11/12Include("\\script\\global\\sourceatn.lua")Include("\\script\\global\\tasklist.lua")
function ForgeItem()        -- Che tao trang bi huyen tinhdofile("Script/Special/forge_item.lua")    local TAB_FORGE =         {    "ChÕ t¹o trang bÞ huyÒn tinh thµnh c«ng. Xin chóc mõng!",            "ChÕ t¹o trang bÞ huyÒn tinh thÊt b¹i. Xin chia buån!",            "Nguyªn liÖu dupe tØ lÖ 0%, xin chia buån!",        }    local aSky1 = GetIndexForgeItem(0) --o^ item    local aSky2 = GetIndexForgeItem(1) --o^ HT aSky2 = lv HT    local aSky3 = GetDetailItem(aSky2)    if (aSky3 == 4) then             --check lv HT        aHeo = random(1,3)    elseif (aSky3 == 5) then        aHeo = random(2,4)    elseif (aSky3 >= 6) and (aSky3 <= 13) then        local eHeo = random(1,100)        if (eHeo == 1) then            aHeo = 6        elseif (eHeo > 1) and (eHeo < 6) then            aHeo = 6        else            aHeo = 6        end    end    local eHeo1 = random(1,8)  --% ti le thanh cong    local n = GetEventItemCount(GetDetailItem(aSky2)) --- lay so luong HT trc'    if eHeo1 > 1 then        RemoveItem(aSky2)            if GetEventItemCount(GetDetailItem(aSky2)) == (n-1) then --check so luong HT                SetPurpleItem(aSky1, aHeo)                Msg2Player(TAB_FORGE[1])                Pay(10000)                return            else                Msg2Player(TAB_FORGE[3])                            return            end    else        RemoveItem(aSky2)        Msg2Player(TAB_FORGE[2])        Pay(10000)        return    endend 

file distill_item.lua

--Author: lzlsky301--Date: 07/11/12Include("\\script\\global\\sourceatn.lua")Include("\\script\\global\\tasklist.lua")
function DistillItem()        -- Hut thuoc tinh trang bidofile("Script/Special/distill_item.lua")    local TAB_DISTILL =         {    "Hót thuéc tÝnh thµnh c«ng. Xin chóc mõng!",            "Hót thuéc tÝnh thÊt b¹i. Xin chia buån!",            "Nguyªn liÖu dupe tØ lÖ 0%, xin chia buån!",        }    local aSky1 = GetIndexDistillItem(0)    --o^ da'    local aSky2 = GetIndexDistillItem(1)     -- HT    local aSky3 = GetIndexDistillItem(2)    --o^ trang bi    local aSky4 = GetIndexDistillItem(3)    --o^ nguyen lieu 3-10 = 8 o^    local aSky5 = GetIndexDistillItem(4)    local aSky6 = GetIndexDistillItem(5)    local aSky7 = GetIndexDistillItem(6)    local aSky8 = GetIndexDistillItem(7)    local aSky9 = GetIndexDistillItem(8)    local aSky10 = GetIndexDistillItem(9)    local aSky11 = GetIndexDistillItem(10)    local aHeo = GetDetailItem(aSky3)    local aHeo0 = GetDetailItem(aSky2)    local aHeo1 = GetOp1Item(aSky1)    local aHeo2 = GetOp2Item(aSky1)    local aHeo3 = GetOp3Item(aSky1)    local aHeo4 = GetOp4Item(aSky1)    local aHeo5 = GetOp5Item(aSky1)    local aHeo6 = GetOp6Item(aSky1)    local iHeo1 = GetDetailItem(aSky4)    local iHeo2 = GetDetailItem(aSky5)    local iHeo3 = GetDetailItem(aSky6)    local iHeo4 = GetDetailItem(aSky7)    local iHeo5 = GetDetailItem(aSky8)    local iHeo6 = GetDetailItem(aSky9)    local iHeo7 = GetDetailItem(aSky10)    local iHeo8 = GetDetailItem(aSky11)    local TAB_OPTION = {{1,4,4,10},{2,5,7,14},{3,6,10,20},{4,7,15,25},{5,8,19,29},{6,9,24,34},{7,10,29,39},{8,11,34,44},{9,12,39,49},{10,13,44,54}}    local TAB_OPTION1 = {{1,14,3,4,5,6,7,8,4,8},{2,15,4,2,1,5,6,5,6,7},{3,16,2,5,1,3,6,7,6,4},{4,31,1,2,2,3,1,2,3,3},{5,32,1,2,2,3,3,4,1,4},{6,33,1,2,2,3,1,5,3,4}}    for i=1,getn(TAB_OPTION) do        if (aHeo0 == TAB_OPTION[i][2]) then            eHeo0 = random(TAB_OPTION[i][3],TAB_OPTION[i][4])        elseif (aSky2 == 0) then            eHeo0 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo1 == TAB_OPTION1[i][2]) then            eHeo1 = TAB_OPTION1[i][10]        elseif (aSky4 == 0) then            eHeo1 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo2 == TAB_OPTION1[i][2]) then            eHeo2 = TAB_OPTION1[i][8]        elseif (aSky5 == 0) then            eHeo2 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo3 == TAB_OPTION1[i][2]) then            eHeo3 = TAB_OPTION1[i][9]        elseif (aSky6 == 0) then            eHeo3 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo4 == TAB_OPTION1[i][2]) then            eHeo4 = TAB_OPTION1[i][5]        elseif (aSky7 == 0) then            eHeo4 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo5 == TAB_OPTION1[i][2]) then            eHeo5 = TAB_OPTION1[i][6]        elseif (aSky8 == 0) then            eHeo5 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo6 == TAB_OPTION1[i][2]) then            eHeo6 = TAB_OPTION1[i][4]        elseif (aSky9 == 0) then            eHeo6 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo7 == TAB_OPTION1[i][2]) then            eHeo7 = TAB_OPTION1[i][7]        elseif (aSky10 == 0) then            eHeo7 = 0        end    end    for i=1,getn(TAB_OPTION1) do         if (iHeo8 == TAB_OPTION1[i][2]) then            eHeo8 = TAB_OPTION1[i][5]        elseif (aSky11 == 0) then            eHeo8 = 0        end    end    eHeo = floor((eHeo0 + eHeo1 + eHeo2 + eHeo3 + eHeo4 + eHeo5 + eHeo6 + eHeo7 + eHeo8 + 10)/10)    if (eHeo >= 10) then        eHeo = 10    end--===================================================CHECK NGUYEN LIEU EP=============================
    local nl4 = GetEventItemCount(GetDetailItem(aSky4))    RemoveItem(aSky4)    if nl4 > 0 and GetEventItemCount(GetDetailItem(aSky4)) == nl4 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl5 = GetEventItemCount(GetDetailItem(aSky5))    RemoveItem(aSky5)    if nl5 > 0 and GetEventItemCount(GetDetailItem(aSky5)) == nl5 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl6 = GetEventItemCount(GetDetailItem(aSky6))    RemoveItem(aSky6)    if nl6 > 0 and GetEventItemCount(GetDetailItem(aSky6)) == nl6 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl7 = GetEventItemCount(GetDetailItem(aSky7))    RemoveItem(aSky7)    if nl7 > 0 and GetEventItemCount(GetDetailItem(aSky7)) == nl7 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl8 = GetEventItemCount(GetDetailItem(aSky8))    RemoveItem(aSky8)    if nl8 > 0 and GetEventItemCount(GetDetailItem(aSky8)) == nl8 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl9 = GetEventItemCount(GetDetailItem(aSky9))    RemoveItem(aSky9)    if nl9 > 0 and GetEventItemCount(GetDetailItem(aSky9)) == nl9 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl10 = GetEventItemCount(GetDetailItem(aSky10))    RemoveItem(aSky10)    if nl10 > 0 and GetEventItemCount(GetDetailItem(aSky10)) == nl10 then        Msg2Player(TAB_DISTILL[3])        return    end    local nl11 = GetEventItemCount(GetDetailItem(aSky11))    RemoveItem(aSky11)    if nl11 > 0 and GetEventItemCount(GetDetailItem(aSky11)) == nl11 then        Msg2Player(TAB_DISTILL[3])        return    end    local ht = GetEventItemCount(GetDetailItem(aSky2))    RemoveItem(aSky2)    if GetEventItemCount(GetDetailItem(aSky2)) == ht then         Msg2Player(TAB_DISTILL[3])         return    end--====================================================================================================    Pay(5000)    if (aHeo == 0) then        SetMagic2Mine(aSky3,aHeo1,eHeo)        RemoveItem(aSky1)        Msg2Player(TAB_DISTILL[1])    elseif (aHeo == 1) then        SetMagic2Mine(aSky3,aHeo3,eHeo)        RemoveItem(aSky1)        Msg2Player(TAB_DISTILL[1])    elseif (aHeo == 2) then        SetMagic2Mine(aSky3,aHeo5,eHeo)        RemoveItem(aSky1)        Msg2Player(TAB_DISTILL[1])    elseif (aHeo >= 3) and (aHeo <= 7) then        SetMagic2Mine(aSky3,aHeo2,eHeo)        RemoveItem(aSky1)        Msg2Player(TAB_DISTILL[1])    elseif (aHeo >= 8) and (aHeo <= 12) then        SetMagic2Mine(aSky3,aHeo4,eHeo)        RemoveItem(aSky1)        Msg2Player(TAB_DISTILL[1])    elseif (aHeo >= 13) and (aHeo <= 17) then        SetMagic2Mine(aSky3,aHeo6,eHeo)        RemoveItem(aSky1)        Msg2Player(TAB_DISTILL[1])    endend 

file enchase_item.lua

--Author: lzlsky301--Date: 07/11/12Include("\\script\\global\\sourceatn.lua")Include("\\script\\global\\tasklist.lua")
function EnchaseItem()        -- Kham thuoc tinh trang bi    dofile("Script/Special/enchase_item.lua")    local TAB_ENCHASE =         {    "Kham n¹m thuéc tÝnh thµnh c«ng. Xin chóc mõng!",            "Kham n¹m tÝnh thÊt b¹i. Xin chia buån!",            "Trang bÞ vµ kho¸ng th¹ch kh«ng cïng hÖ!",            "Nguyªn liÖu dupe tØ lÖ 0%, xin chia buån!",        }    local aSky1 = GetIndexEnchaseItem(0)     --trang bi    local aSky2 = GetIndexEnchaseItem(1)    --HT    local aSky3 = GetIndexEnchaseItem(2)    --da ep    local aSky4 = GetIndexEnchaseItem(3)    --8 o^ nguyen lieu 3-10    local aSky5 = GetIndexEnchaseItem(4)    local aSky6 = GetIndexEnchaseItem(5)    local aSky7 = GetIndexEnchaseItem(6)    local aSky8 = GetIndexEnchaseItem(7)    local aSky9 = GetIndexEnchaseItem(8)    local aSky10 = GetIndexEnchaseItem(9)    local aSky11 = GetIndexEnchaseItem(10)    local eHeo2 = GetDetailItem(aSky2)    local eHeo3 = GetDetailItem(aSky3)    local eHeo4 = GetDetailItem(aSky4)    local eHeo5 = GetDetailItem(aSky5)    local eHeo6 = GetDetailItem(aSky6)    local eHeo7 = GetDetailItem(aSky7)    local eHeo8 = GetDetailItem(aSky8)    local eHeo9 = GetDetailItem(aSky9)    local eHeo10 = GetDetailItem(aSky10)    local eHeo11 = GetDetailItem(aSky11)    local emHeo1 = GetOp1Item(aSky3)    local emHeo = GetLevelItem(aSky3)    -- moi them Mr.Cung    local MK = GetSeriesItem(aSky3) -- da' ep    local MK1 = GetSeriesItem(aSky1) --item bo vao ep    -- end        local TAB_OPTION = {{1,4,1,10},{2,5,5,15},{3,6,10,20},{4,7,15,25},{5,8,20,35},{6,9,25,45},{7,10,30,50},{8,11,35,55},{9,12,40,60},{10,13,45,65}}    local TAB_OPTION2 = {{1,4,5,15},{2,5,10,20},{3,6,15,25},{4,7,20,30},{5,8,25,45},{6,9,30,55},{7,10,35,65},{8,11,40,75},{9,12,45,85},{10,13,50,95}}    local TAB_OPTION1 = {{1,14,5,9,10,11,12,6,7,8},{2,15,4,5,6,8,9,5,10,6},{3,16,6,7,7,8,10,9,5,6},{4,31,6,4,4,3,5,4,3,3},{5,32,4,5,6,7,3,6,6,4},{6,33,4,8,4,5,6,5,7,6}}    for i=1,getn(TAB_OPTION) do        if (eHeo2 == TAB_OPTION[i][2]) then                 --neu id HT = 4-13 tuong ung cap 1-10            iHeo0 = random(TAB_OPTION[i][3],TAB_OPTION[i][4])    --thi iHeo0 = random        end    end    for i=1,getn(TAB_OPTION2) do        if (emHeo == TAB_OPTION2[i][1]) then            iHeo9 = TAB_OPTION2[i][4]        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo4 == TAB_OPTION1[i][2]) then            iHeo1 = TAB_OPTION1[i][1]        elseif (aSky4 == 0) then            iHeo1 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo5 == TAB_OPTION1[i][2]) then            iHeo2 = TAB_OPTION1[i][2]        elseif (aSky5 == 0) then            iHeo2 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo6 == TAB_OPTION1[i][2]) then            iHeo3 = TAB_OPTION1[i][3]        elseif (aSky6 == 0) then            iHeo3 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo7 == TAB_OPTION1[i][2]) then            iHeo4 = TAB_OPTION1[i][4]        elseif (aSky7 == 0) then            iHeo4 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo8 == TAB_OPTION1[i][2]) then            iHeo5 = TAB_OPTION1[i][5]        elseif (aSky8 == 0) then            iHeo5 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo9 == TAB_OPTION1[i][2]) then            iHeo6 = TAB_OPTION1[i][6]        elseif (aSky9 == 0) then            iHeo6 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo10 == TAB_OPTION1[i][2]) then            iHeo7 = TAB_OPTION1[i][7]        elseif (aSky10 == 0) then            iHeo7 = 0        end    end    for i=1,getn(TAB_OPTION1) do        if (eHeo11 == TAB_OPTION1[i][2]) then            iHeo8 = TAB_OPTION1[i][8]        elseif (aSky11 == 0) then            iHeo8 = 0        end    end    local aTuong = (iHeo0 + iHeo1 + iHeo2 + iHeo3 + iHeo4 + iHeo5 + iHeo6 + iHeo7 + iHeo8 + iHeo9)    local TAB_LUCK = {{10},{20},{30},{40},{50},{60},{70},{80},{90},{95},{100},{105},{111},{115},{121},{126},{131},{136},{141},{146}}    if (aTuong == 55) or (aTuong == 77) or (aTuong == 99) or (aTuong == 111) then        aHang = random(28,30)    elseif (aTuong < TAB_LUCK[1][1]) then        aHang = 11    elseif (aTuong < TAB_LUCK[2][1]) then        aHang = 12    elseif (aTuong < TAB_LUCK[3][1]) then        aHang = 13    elseif (aTuong < TAB_LUCK[4][1]) then        aHang = 14    elseif (aTuong < TAB_LUCK[5][1]) then        aHang = 15    elseif (aTuong < TAB_LUCK[6][1]) then        aHang = 16    elseif (aTuong < TAB_LUCK[7][1]) then        aHang = 17    elseif (aTuong < TAB_LUCK[8][1]) then        aHang = 18    elseif (aTuong < TAB_LUCK[9][1]) then        aHang = 19    elseif (aTuong < TAB_LUCK[10][1]) then        aHang = 20    elseif (aTuong < TAB_LUCK[11][1]) then        aHang = 21    elseif (aTuong < TAB_LUCK[12][1]) then        aHang = 22    elseif (aTuong < TAB_LUCK[13][1]) then        aHang = 23    elseif (aTuong < TAB_LUCK[14][1]) then        aHang = 24    elseif (aTuong < TAB_LUCK[15][1]) then        aHang = 25    elseif (aTuong < TAB_LUCK[16][1]) then        aHang = 26    elseif (aTuong < TAB_LUCK[17][1]) then        aHang = 27    elseif (aTuong < TAB_LUCK[18][1]) then        aHang = 28    elseif (aTuong < TAB_LUCK[19][1]) then        aHang = 29    elseif (aTuong >= TAB_LUCK[19][1]) then        aHang = 30    end    if (eHeo3 == 0) then    --<-----------------------neu ID da' ((eHeo3) = 0,1,2 => da' hien 1,2,3)        eHeo = 0    --<-----------------------dong` khi ep = 0    elseif (eHeo3 == 1) then                eHeo = 2    --<-----------------------dong` khi ep = 2    elseif (eHeo3 == 2) then        eHeo = 4    --<-----------------------dong` khi ep = 4    elseif (eHeo3 >= 3) and (eHeo3 <= 7) then    --da' an 1        eHeo = 1                --dong` khi ep = 1    elseif (eHeo3 >= 8) and (eHeo3 <= 12) then    --da an 2        eHeo = 3                --dong` khi ep = 3    elseif (eHeo3 >= 13) and (eHeo3 <= 17) then    --da an 3        eHeo = 5                --dong` khi ep = 5    end--============================================================CHECK EP KHAC HE=============================     -- item MK1 can ep co he la 0 = kim, 1=moc,2=thuy,3=hoa,4=tho    --da' ep MK cung nhu the    0= kim, 1=moc,2=thuy,3=hoa,4=tho, 5 = da' hien    if (MK < 5) and  (MK ~= MK1) then        Msg2Player(TAB_ENCHASE[3])        return 0    end--==========================================================================================================--===================================================CHECK NGUYEN LIEU EP=============================
    local nl4 = GetEventItemCount(GetDetailItem(aSky4))    RemoveItem(aSky4)    if nl4 > 0 and GetEventItemCount(GetDetailItem(aSky4)) == nl4 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl5 = GetEventItemCount(GetDetailItem(aSky5))    RemoveItem(aSky5)    if nl5 > 0 and GetEventItemCount(GetDetailItem(aSky5)) == nl5 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl6 = GetEventItemCount(GetDetailItem(aSky6))    RemoveItem(aSky6)    if nl6 > 0 and GetEventItemCount(GetDetailItem(aSky6)) == nl6 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl7 = GetEventItemCount(GetDetailItem(aSky7))    RemoveItem(aSky7)    if nl7 > 0 and GetEventItemCount(GetDetailItem(aSky7)) == nl7 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl8 = GetEventItemCount(GetDetailItem(aSky8))    RemoveItem(aSky8)    if nl8 > 0 and GetEventItemCount(GetDetailItem(aSky8)) == nl8 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl9 = GetEventItemCount(GetDetailItem(aSky9))    RemoveItem(aSky9)    if nl9 > 0 and GetEventItemCount(GetDetailItem(aSky9)) == nl9 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl10 = GetEventItemCount(GetDetailItem(aSky10))    RemoveItem(aSky10)    if nl10 > 0 and GetEventItemCount(GetDetailItem(aSky10)) == nl10 then        Msg2Player(TAB_ENCHASE[4])        return    end    local nl11 = GetEventItemCount(GetDetailItem(aSky11))    RemoveItem(aSky11)    if nl11 > 0 and GetEventItemCount(GetDetailItem(aSky11)) == nl11 then        Msg2Player(TAB_ENCHASE[4])        return    end    local da = GetMineItemCount(GetDetailItem(aSky3))    RemoveItem(aSky3)    if GetMineItemCount(GetDetailItem(aSky3)) == da then         Msg2Player(TAB_ENCHASE[4])         return    end    local ht = GetEventItemCount(GetDetailItem(aSky2))    RemoveItem(aSky2)    if GetEventItemCount(GetDetailItem(aSky2)) == ht then         Msg2Player(TAB_ENCHASE[4])         return    end--====================================================================================================    local nA = random(1,100) --nA : ti le thanh cong 1 = 99%    if nA > 1 then        SetMagic2Equip(aSky1, emHeo1, eHeo, aHang)        --RemoveItem(aSky2)        --RemoveItem(aSky3)        --for i=3,10 do RemoveItem(GetIndexEnchaseItem(i)) end        Msg2Player(TAB_ENCHASE[1])    else        RemoveItem(aSky2)        RemoveItem(aSky3)        for i=3,10 do RemoveItem(GetIndexEnchaseItem(i)) end        Msg2Player(TAB_ENCHASE[2])    end        end 

cảm ơn bạn, cậu có thể mở file 120.lua lên và chỉ mình sửa tên nhân vật admin chổ nào không ? mình mới tập tành còn gà lắm, mò nãy giờ chưa ra

[tinhhack]

file 120 tìm các từ khóa GetName hoặc Getaccount ấy. mà sv này bug ko fix dc bạn dùng làm gì nữa