[JX] Ai giúp em CODE thêm cái này với ạ!! Please!!
Follow us on
Follow us on Facebook Follow us on Twitter Linked In Flickr Watch us on YouTube My Space Blogger
 
Kết quả 1 đến 10 của 10
  1. #1
    Thành Viên
    Ngày tham gia
    Jun 2009
    Bài viết
    445
    Thanks
    213
    Thanked 53 Times in 37 Posts

    Ai giúp em CODE thêm cái này với ạ!! Please!!

    Ai cho em hỏi cái này xíu với ạ.
    Cụ thể là em muốn sau khi chuyển sinh thì hàng kháng của mình cộng thêm 1% (nếu kháng max 75 thì vẫn + thêm được nhé), với thêm máu khoảng 200 điểm + dame thêm 200 thì mình thêm code như thế nào vậy mấy bác.
    Cụ thể em đang xài bản của DuongdaicaJX ver 2.0.
    Đây là Script chuyển sinh của anh ấy.

    Code:
    Include("\\DataFiles\\chuyensinhdata.lua")Include("\\Script\\global\\sourcejx49.lua");
    Include("\\script\\GetFaction.lua")
    Include("\\DataFiles\\Getcs.lua")
    
    
    
    
    --================== sky.love123@yah«.com ===================
    
    
    iditemcantrongcs = 40
    vlmt = 16
    ttk = 15
    gioihancs = 50
    capsaukhics = 10
    TENVP = "Kim Nguyªn B¶o"
    
    
    --==================== sky.light9530 =======================
    
    
    function main()
    SetGlbMissionV(50,gioihancs)
    ktcss=GetTask(197)+1
    Say("<color=cyan>Giíi h¹n chuyÓn sinh hiÖn t¹i:<color> "..GetGlbMissionV(50).."\n<color=yellow>Sè lÇn chuyÓn sinh: "..GetTask(197).."\n<color=water>CÊp chuyÓn sinh: "..CSTABLE[GetTask(197)+1][1].."\n<color=wood>TiÒn cÇn chuyÓn sinh: "..(CSTABLE[GetTask(197)+1][2]/10000).." V¹n\nKim Nguyªn B¶o: "..CSTABLE[GetTask(197)+1][3]..".",3,
    "ChuyÓn sinh lÇn ["..ktcss.."]./chuyensinh",
    --"Vßng S¸ng ChuyÓn Sinh/vongsang",
    "Tho¸t./Exit")
    end
    
    
    
    
    
    
    
    
    function AddAll(Xdnt,Ydnt)
    if Xdnt == nil then Xdnt = 0 end
    if Ydnt == nil then Ydnt = 0 end
    AddProp(Xdnt)
    AddMagicPoint(Ydnt)
    Msg2Player("B¹n nhËn ®­îc  "..Xdnt.." ®iÓm tiÒm n¨ng");
    Msg2Player("B¹n nhËn ®­îc "..Ydnt.." ®iÓm kü n¨ng");
    end;
    
    
    
    
    
    
    function chuyensinh()
    cs = GetTask(197)
    if cs == nil then cs = 0 end
    cs = cs +1
            if GetTask(197) < GetGlbMissionV(50) then
        if GetLevel() >= CSTABLE[cs][1] then
            if GetCash() >= CSTABLE[cs][2] then
                if GetItemCount(iditemcantrongcs) >= CSTABLE[cs][3] then         
                    for i=1,CSTABLE[cs][3] do DelItem(iditemcantrongcs) end
                    Pay(CSTABLE[cs][2])
                    chuyensinhskylight()
                    SetTask(197,GetTask(197)+1)
                    diemtn = CSTABLE[cs][4] + (GetTask(ttk) * 5) + (CSTABLE[150][4]*GetTask(198))
                    diemkn = CSTABLE[cs][5] + GetTask(vlmt) + (CSTABLE[150][5]*GetTask(198))
                    RollPoint()
                    Talk(1,"","§©y lµ lÇn chuyÓn sinh thø: <color=metal>"..GetTask(197).."<color>!")        
                else
                Talk(1,"","B¹n cÇn cã <color=red>"..CSTABLE[cs][3].."<color> "..TENVP.." ®Ó chuyÓn sinh !")    
                end
            else
            Talk(1,"","<color=cyan>Lçi:<color> B¹n cÇn cã "..(CSTABLE[cs][2]/10000).." v¹n l­îng")
            end
        else
        Talk(1,"","<color=cyan>Lçi:<color> B¹n cÇn ®¹t "..CSTABLE[cs][1].." cÊp")
        end
    cs = 0
    diemtn = 0
    diemkn = 0
            else
    Talk(1,"","<color=cyan>Lçi:<color> B¹n ®· v­ît qu¸ giíi h¹n chuyÓn sinh lµ "..GetGlbMissionV(50).."lÇn !")    
            end
    end
    
    
    
    
    function vongsang()
    if GetTask(197) >= 2 then
        if HaveMagic(370) <= 0 then
            AddMagic(371,1)
            Msg2Player("B¹n NhËn §­îc Vßng S¸ng ChuyÓn Sinh")
            KickOutSelf()
        else
        Talk(1,"addrank","Ng­¬i ®· Nh©n <color=fire>Vßng S¸ng<color> kh«ng thÓ nhËn ®­îc n÷a")
        end
    elseif GetTask(197) >= 10 then
        if HaveMagic(371) >= 0 then
            AddMagic(372,1)
            Msg2Player("B¹n NhËn §­îc Vßng S¸ng ChuyÓn Sinh")
            KickOutSelf()
        else
        Talk(1,"addrank","Ng­¬i ®· Nh©n <color=fire>Vßng S¸ng<color> kh«ng thÓ nhËn ®­îc n÷a")
        end
    elseif GetTask(197) >= 20 then
        if HaveMagic(372) >= 0 then
            AddMagic(373,1)
            Msg2Player("B¹n NhËn §­îc Vßng S¸ng ChuyÓn Sinh")
            KickOutSelf()
        else
        Talk(1,"addrank","Ng­¬i ®· Nh©n <color=fire>Vßng S¸ng<color> kh«ng thÓ nhËn ®­îc n÷a")
        end
    elseif GetTask(197) >= 30 then
        if HaveMagic(373) >= 0 then
            AddMagic(369,1)
            Msg2Player("B¹n NhËn §­îc Vßng S¸ng ChuyÓn Sinh")
            KickOutSelf()
        else
        Talk(1,"addrank","Ng­¬i ®· Nh©n <color=fire>Vßng S¸ng<color> kh«ng thÓ nhËn ®­îc n÷a")
        end
    
    
        Msg2Player("Sè lÇn trïng sinh cña b¹n lµ : "..GetTask(197).." kh«ng thÓ nhËn th­ëng")
    end
    end
    
    
    
    
    function RollPoint()
    player_series = GetSeries() + 1;
    SetBasePoint(as[player_series][1],as[player_series][2],as[player_series][3],as[player_series][4])
    AddProp(-GetProp())
    AddMagicPoint(-GetMagicPoint())
    AddAll(diemtn,diemkn)
    end
    
    
    
    
    
    
    
    
    function chuyensinhskylight()
    SetLevel(capsaukhics)
    end
    function SetLevel(nLevel)
    if(nLevel<1 or nLevel >200) then
    --error
    return 0;
    end
    local a=GetNpcIdx ();
    a=setx (a,nLevel);
    ktcss=GetTask(197)+1
    if(a==1) then
    KickOutSelf()
    Msg2SubWorld("Ng­êi ch¬i ["..GetName().."] ®· chuyÓn sinh lÇn thø ["..ktcss.."]")
    print("|>> "..GetName().." Chuyen Sinh Thanh Cong Lan Thu "..ktcss.." ! <<|")
    else
    Msg2Player("<color=metal>Lçi khi chuyÓn sinh");
    print("|>> "..GetName().." Chuyen Sinh Loi ??????????????? <<|")
    end
    end
    Bác nào giúp em code thêm với ạ.
    Nếu được thank bác nhiệt tình.
    Khách viếng thăm hãy cùng nguyen_van003 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  2. #2
    Thành Viên
    Ngày tham gia
    Jun 2009
    Bài viết
    445
    Thanks
    213
    Thanked 53 Times in 37 Posts

    Ðề: Ai giúp em CODE thêm cái này với ạ!! Please!!

    Sao có người xem mà không có người trả lời vậy?
    Huhu
    Khách viếng thăm hãy cùng nguyen_van003 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  3. #3
    Thành Viên
    Ngày tham gia
    Jun 2009
    Bài viết
    445
    Thanks
    213
    Thanked 53 Times in 37 Posts

    Ðề: Ai giúp em CODE thêm cái này với ạ!! Please!!

    Không một ai trả lời. Hix
    Khách viếng thăm hãy cùng nguyen_van003 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  4. #4
    ♔YONKOU♔ Edward_Newgate's Avatar
    Ngày tham gia
    Nov 2010
    Bài viết
    2,773
    Thanks
    533
    Thanked 1,059 Times in 655 Posts

    Ðề: Ai giúp em CODE thêm cái này với ạ!! Please!!

    Thêm 1 đoạn thế này
    Code:
    SetLife(GetLife()+200) --Thêm 200 máu
    SetColdR(GetColdR()+1) --Kháng băng +1%
    SetPoisonR(GetPoisonR()+1) --Kháng độc +1%
    SetPhyR(GetPhyR()+1) --Phòng thủ vật lý +1%
    SetFireR(GetFireR()+1) --Kháng hỏa +1%
    SetLightR(GetLightR()+1) --Kháng lôi +1%
    p/s: cái hàm SetLife() ko biết là có không nữa Vì đoán là có GetLife() thì có SetLife(). Còn +dame thì ko có.
    STRONGEST MAN

  5. Các thành viên gởi lời cảm ơn đến Edward_Newgate vì bài viết này !

    nguyen_van003 (09-01-13)

  6. #5
    Thành Viên
    Ngày tham gia
    Jun 2009
    Bài viết
    445
    Thanks
    213
    Thanked 53 Times in 37 Posts

    Ðề: Ai giúp em CODE thêm cái này với ạ!! Please!!

    Cảm ơn bác EN nhé,
    Bác mà cũng đoán mò hàm nữa hả?
    Bác trong nghề lâu năm mà cũng chưa nắm hết lệnh hả Bác?
    Khách viếng thăm hãy cùng nguyen_van003 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  7. #6
    Thành Viên
    Ngày tham gia
    Jun 2009
    Bài viết
    445
    Thanks
    213
    Thanked 53 Times in 37 Posts

    Ðề: Ai giúp em CODE thêm cái này với ạ!! Please!!

    Em đã thử cái của bác EN, nó không hiểu lệnh SetLife là gì hết
    Nhưng em bỏ cái của bác EN vào chỗ Rollpoint như thế này:
    Code:
    function RollPoint()player_series = GetSeries() + 1;
    SetBasePoint(as[player_series][1],as[player_series][2],as[player_series][3],as[player_series][4])
    AddProp(-GetProp())
    AddMagicPoint(-GetMagicPoint())
    AddAll(diemtn,diemkn)
    SetColdR(GetColdR()+1) --Kháng bang +1%
    SetPoisonR(GetPoisonR()+1) --Kháng d?c +1%
    SetPhyR(GetPhyR()+1) --Phòng th? v?t lý +1%
    SetFireR(GetFireR()+1) --Kháng h?a +1%
    SetLightR(GetLightR()+1) --Kháng lôi +1%
    end
    Thì em thử lột hết đồ ra, đi chuyển sinh thì không thấy hàng kháng tăng thêm 1 điểm nào hết, thế là sao ta?
    Khách viếng thăm hãy cùng nguyen_van003 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  8. #7
    ♔YONKOU♔ Edward_Newgate's Avatar
    Ngày tham gia
    Nov 2010
    Bài viết
    2,773
    Thanks
    533
    Thanked 1,059 Times in 655 Posts

    Ðề: Ai giúp em CODE thêm cái này với ạ!! Please!!

    Trích dẫn Gửi bởi nguyen_van003 [Only registered and activated users can see links. ]
    Em đã thử cái của bác EN, nó không hiểu lệnh SetLife là gì hết
    Nhưng em bỏ cái của bác EN vào chỗ Rollpoint như thế này:
    Code:
    function RollPoint()player_series = GetSeries() + 1;
    SetBasePoint(as[player_series][1],as[player_series][2],as[player_series][3],as[player_series][4])
    AddProp(-GetProp())
    AddMagicPoint(-GetMagicPoint())
    AddAll(diemtn,diemkn)
    SetColdR(GetColdR()+1) --Kháng bang +1%
    SetPoisonR(GetPoisonR()+1) --Kháng d?c +1%
    SetPhyR(GetPhyR()+1) --Phòng th? v?t lý +1%
    SetFireR(GetFireR()+1) --Kháng h?a +1%
    SetLightR(GetLightR()+1) --Kháng lôi +1%
    end
    Thì em thử lột hết đồ ra, đi chuyển sinh thì không thấy hàng kháng tăng thêm 1 điểm nào hết, thế là sao ta?
    Thế là không có hàm SetLife() rùi
    Mà trước tiên phải test mấy hàm kia riêng ra, cho vào 1 function rồi thử xem có tăng ko đã.
    STRONGEST MAN

  9. #8
    Thành Viên
    Ngày tham gia
    Jun 2009
    Bài viết
    445
    Thanks
    213
    Thanked 53 Times in 37 Posts

    Ðề: Ai giúp em CODE thêm cái này với ạ!! Please!!

    Hjx. Em thử từng cái rùi mà không có tác dụng anh EN ơi. Hjzzz
    Khách viếng thăm hãy cùng nguyen_van003 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  10. #9
    Thành Viên Tâm Huyết KingMax's Avatar
    Ngày tham gia
    Dec 2010
    Bài viết
    642
    Thanks
    143
    Thanked 321 Times in 125 Posts

    Ðề: Ai giúp em CODE thêm cái này với ạ!! Please!!

    Bạn có thể tạo 1 skill Magic theo kiểu Addpoint hỗ trợ .
    Trong skill đó bạn có thể Sét Kháng vào , cứ mỗi lần CS thì tăng lên 1 skills là mốc đó tự nảy lên

    Ví dụ tạo 1 skill hỗ trợ bị động có các opt

    Tăng mức Kháng Tính tối đa : tăng 1 điẻm ( cái nào source đã có )
    Máu thì cũng có hàm add gì đó mình ko nhớ
    Còn Damge thì hơi khó, bạn phải phân ra theo phái để cộng damge cho đúng vì Cái Bang ko cần sức mạnh chẳng hạn

    Mình chỉ chỉ hướng làm , còn làm sao bạn phải tìm hiểu thêm vì đa số SV share hiệ nnay ko có chwucs năng này , bạn có thể vọc lại cái bản SV như TKH để check
    Comeback JXP

  11. Các thành viên gởi lời cảm ơn đến KingMax vì bài viết này !

    nguyen_van003 (10-01-13)

  12. #10
    Thành Viên
    Ngày tham gia
    Jun 2009
    Bài viết
    445
    Thanks
    213
    Thanked 53 Times in 37 Posts

    Ðề: Ai giúp em CODE thêm cái này với ạ!! Please!!

    Thanks bác KingMax nhé.
    Nghe bác nói mà em thấy oải quá.
    Khách viếng thăm hãy cùng nguyen_van003 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

 

 

Các Chủ đề tương tự

  1. [KT] Code gift code
    Bởi canh_2009 trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 0
    Bài viết cuối: 01-12-12, 10:51 PM
  2. [MU] Làm ơn Giúp mình tìm code Hộp Kundun, code rồng vàng cho các map!!!!!!!!!!!!!!!!
    Bởi lethanhbptv trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 4
    Bài viết cuối: 16-07-12, 10:19 PM
  3. Xin code
    Bởi phamnamhai trong diễn đàn Tru Tiên Private
    Trả lời: 0
    Bài viết cuối: 14-05-12, 08:23 PM
  4. Hỏi chút về code nhận thưởng khi lên cấp.
    Bởi Tiến Đạt trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 4
    Bài viết cuối: 14-01-11, 02:36 PM
  5. Code vật phẩm NV 3
    Bởi nhoccon trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 3
    Bài viết cuối: 09-01-11, 11:44 AM

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •  
Múi giờ GMT +7. Bây giờ là 10:47 PM.
vBulletin®, Copyright ©2000-2011, Jelsoft Enterprises Ltd.
CLBGamesVN không chịu trách nhiệm về Luật Bản Quyền của các tài liệu, bài viết v.v...được đăng tải trên diễn đàn này.
Diễn đàn phát triển dưới sự đóng góp của tất cả thành viên. BQT chỉ là những người thành lập ra sân chơi, quản lý và duy trì về mặt kỹ thuật, nội dung khi hợp lệ.