[TLBB] Giúp npc này với
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 4 của 4

Chủ đề: Giúp npc này với

  1. 03-01-15, 10:13 PM #1
    dangvietanh
    dangvietanh vẫn chưa có mặt trong diễn đàn
    Thành Viên dangvietanh's Avatar
    Ngày tham gia
    Aug 2014
    Bài viết
    78
    Thanks
    72
    Thanked 13 Times in 7 Posts

    Giúp npc này với

    code :

    --NPC TongHop
    --ID: 854923
    --Script: NPC TongHop
    --**************************
    x854923_g_ScriptId = 854923
    --**************************
    function x854923_OnDefaultEvent(sceneId,selfId,targetId)
    local nam = LuaFnGetName(sceneId,selfId)

    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y Chao Mung "..nam.." Den Voi TLBB")
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Tri Lieu",1,20000)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Chuyen Sinh",1,20001)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Xem So Lan Chuyen Sinh",1,20003)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Nhan Danh Hieu",1,20004)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Doi Sang Post",1,20012)
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)

    end
    --**********************************
    --Ki琺 tra t鷌
    --**********************************
    function x854923_OnConditionCheck( sceneId, selfId )
    local FreeSpace = LuaFnGetPropertyBagSpace( sceneId, selfId )

    if( FreeSpace < 1 ) then
    local strNotice = "T鷌 餰o thi猽 kh鬾g gian!"
    x854923_ShowNotice( sceneId, selfId, strNotice)
    return 0
    end

    end
    --**************************
    function x854923_OnEventRequest(sceneId,selfId,targetId,eve ntId)
    local key = GetNumText()
    --************************************--
    if key == 20000 then
    BeginEvent(SceneId)
    CallScriptFunction(000064,"Restore_hpmp",sceneId,s elfId,targetId)
    RestoreStrikePoint(sceneId,selfId)
    EndEvent(SceneId)
    BeginEvent(SceneId)
    AddText(sceneId,"Tri Lieu Thanh Cong")
    EndEvent(SceneId)

    end
    if key == 20001 then

    BeginEvent(sceneId)
    AddText(sceneId,"#b#YSau Khi Chuyen Sinh Level Xuong 40")
    AddText(sceneId,"#b#YBan Co Dong Y Khong")
    AddNumText(sceneId,x900087_g_ScriptId,"#b#YToi Dong Y",2,20002)
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)

    end
    --*****************--
    if key == 20002 then

    if GetLevel(sceneId,selfId) < 130 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#YLevel Cua Ban Chua Dat Den 130 Hay Tu Luyen Them")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    elseif num > 200 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#YSo Lan Chuyen Sinh Cua Ban Da Vuot Qua 200 Lan ")
    AddText(sceneId,"#b#YBan Khong The Chuyen Sinh Duoc Nua ")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    SetLevel(sceneId,selfId,40)
    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    SetMissionData(sceneId,selfId,MD_ZHUANSHENG,num+1)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#YChuc Mung Ban Da Tu Luyen Thanh Cong ")
    AddText(sceneId,"#b#YSo Lan Tu Luyen Cua Ban Hien Tai La "..(num+1).."")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end

    if key == 20003 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#YSo Lan Chuyen Sinh Hien Tai Cua Ban La "..num.."")
    AddText(sceneId,"#b#YBan Con "..(200-num).." Lan Chuyen Sinh Nua")
    AddText(sceneId,"#b#Y #4 Hay Co Gang Len Nhe #4")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)

    end
    if key == 20004 then
    BeginEvent(sceneId)
    AddText(sceneId,"#Y Nhan Danh Hieu Theo So Lan Chhuyen Sinh")
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Supper_Saiyan_1",5,20005)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Supper_Saiyan_2",5,20006)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Supper_Saiyan_3",5,20007)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Supper_Saiyan_4",5,20008)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#ec00099 Supper_Saiyan_5",5,20009)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#ec00000 Dragon Ball Vip",5,20010)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#G Lan Chuyen Sinh Nhan Danh Hieu",11,20011)
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    if key == 20005 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if num < 1 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#YSo Lan Chuyen Sinh Cua Ban Chua Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#Y Supper_Saiyan_1 Can Chuyen Sinh 1 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#YSupper_S aiyan_1")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#Y Supper_Saiyan_1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end

    if key == 20006 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if num < 10 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#Y Supper_Saiyan_2 Can Chuyen Sinh 10 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#YSupper_S aiyan_2")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#Y Supper_Saiyan_2")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20007 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if num < 20 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#Y Supper_Saiyan_3 Can Chuyen Sinh 20 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#YSupper_S aiyan_3")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#Y Supper_Saiyan_3")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20008 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if num < 50 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#Y Supper_Saiyan_4 Can Chuyen Sinh 50 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#YSupper_S aiyan_4")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#Y Supper_Saiyan_4")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20009 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if num < 100 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#ec Supper_Saiyan_5 Can Chuyen Sinh 100 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#ec00099Su pper_Saiyan_5")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#ec Supper_Saiyan_5")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20010 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if num < 200 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#ec00000 Dragon Ball Vip Can Chuyen Sinh 200 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#ec00000Dr agon Ball Vip")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#ec00000 Dragon Ball Vip")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20011 then

    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y Supper_saiyan_1 Can 1 Lan Chuyen Sinh")
    AddText(sceneId,"#b#Y Supper_saiyan_2 Can 10 Lan Chuyen Sinh")
    AddText(sceneId,"#b#Y Supper_saiyan_3 Can 30 Lan Chuyen Sinh")
    AddText(sceneId,"#b#Y Supper_saiyan_4 Can 50 Lan Chuyen Sinh")
    AddText(sceneId,"#b#ec00099 Supper_saiyan_5 Can 100 Lan Chuyen Sinh")
    AddText(sceneId,"#b#ec00000 Dragon Ball Vip Can 200 Lan Chuyen Sinh")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end
    if key == 20012 then
    BeginEvent(sceneId)
    AddText(sceneId,"Ban Muon Nhan Loai Post Nao Sau Day ")
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y 5000 Post",1,20013)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y 10000 Post",1,20014)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y 20000 Post",1,20015)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#ec00000 50000 Post",1,20016)
    AddNumText(sceneId,x854923_g_ScriptId,"#G Post Can Bao Nhieu Nguyen Lieu",11,20017)
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end
    if key == 20013 then
    if LuaFnGetAvailableItemCount(sceneId, selfId, 30509092) < 1 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#G #213 Dinh Lua Dao A #213 ")
    AddText(sceneId,"#b#Y #24 Tren Nguoi Cac ha Khong Du Nguyen Lieu #24")
    AddText(sceneId,"#b#W #1 Hay Doc Huong Dan O Ben Duoi #1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnDelAvailableItem(sceneId,selfId,30509092,1)
    local RemainPoint = GetPlayerRemainPoints(sceneId, selfId)
    RemainPoint = RemainPoint + 5000
    SetPlayerRemainPoints(sceneId, selfId, RemainPoint)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#ec00000 Chuc Mung Ban Doi 5000 Post Thanh Cong")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20014 then
    if LuaFnGetAvailableItemCount(sceneId, selfId, 30509092) < 2 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#G #213 Dinh Lua Dao A #213 ")
    AddText(sceneId,"#b#Y #24 Tren Nguoi Cac ha Khong Du Nguyen Lieu #24")
    AddText(sceneId,"#b#W #1 Hay Doc Huong Dan O Ben Duoi #1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnDelAvailableItem(sceneId,selfId,30509092,2)
    local RemainPoint = GetPlayerRemainPoints(sceneId, selfId)
    RemainPoint = RemainPoint + 10000
    SetPlayerRemainPoints(sceneId, selfId, RemainPoint)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#ec00000 Chuc Mung Ban Doi 10000 Post Thanh Cong")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20015 then
    if LuaFnGetAvailableItemCount(sceneId, selfId, 30509092) < 4 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#G #213 Dinh Lua Dao A #213 ")
    AddText(sceneId,"#b#Y #24 Tren Nguoi Cac ha Khong Du Nguyen Lieu #24")
    AddText(sceneId,"#b#W #1 Hay Doc Huong Dan O Ben Duoi #1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnDelAvailableItem(sceneId,selfId,30509092,4)
    local RemainPoint = GetPlayerRemainPoints(sceneId, selfId)
    RemainPoint = RemainPoint + 20000
    SetPlayerRemainPoints(sceneId, selfId, RemainPoint)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#ec00000 Chuc Mung Ban Doi 20000 Post Thanh Cong")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20016 then
    if LuaFnGetAvailableItemCount(sceneId, selfId, 30509092) < 10 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#G #213 Dinh Lua Dao A #213 ")
    AddText(sceneId,"#b#Y #24 Tren Nguoi Cac ha Khong Du Nguyen Lieu #24")
    AddText(sceneId,"#b#W #1 Hay Doc Huong Dan O Ben Duoi #1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnDelAvailableItem(sceneId,selfId,30509092,10)
    local RemainPoint = GetPlayerRemainPoints(sceneId, selfId)
    RemainPoint = RemainPoint + 50000
    SetPlayerRemainPoints(sceneId, selfId, RemainPoint)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#ec00000 Chuc Mung Ban Doi 50000 Post Thanh Cong")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20017 then

    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y 5000 Post Can 1 Lien Nien Huu Du")
    AddText(sceneId,"#b#Y 10000 Post Can 2 Lien Nien Huu Du")
    AddText(sceneId,"#b#Y 20000 Post Can 4 Lien Nien Huu Du")
    AddText(sceneId,"#b#Y 50000 Post Can 10 Lien Nien Huu Du")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    function x854923_NotifyFailTips( sceneId, selfId, Tip )

    BeginEvent( sceneId )
    AddText( sceneId, Tip )
    EndEvent( sceneId )
    DispatchMissionTips( sceneId, selfId )

    end





    Bác Nào Xem Giúp Em Sai Ở Đâu Được Hum ??? Em Ấn Vào NPC Nó Không Hiên Lên J Cả
    Khách viếng thăm hãy cùng dangvietanh xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
    Trả lời kèm Trích dẫn Trả lời kèm Trích dẫn
  2. 04-01-15, 01:58 PM #2
    dangvietanh
    dangvietanh vẫn chưa có mặt trong diễn đàn
    Thành Viên dangvietanh's Avatar
    Ngày tham gia
    Aug 2014
    Bài viết
    78
    Thanks
    72
    Thanked 13 Times in 7 Posts

    Ðề: Giúp npc này với

    Trích dẫn Gửi bởi dangvietanh [Only registered and activated users can see links. ]
    code :

    --NPC TongHop
    --ID: 854923
    --Script: NPC TongHop
    --**************************
    x854923_g_ScriptId = 854923
    --**************************
    function x854923_OnDefaultEvent(sceneId,selfId,targetId)
    local nam = LuaFnGetName(sceneId,selfId)

    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y Chao Mung "..nam.." Den Voi TLBB")
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Tri Lieu",1,20000)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Chuyen Sinh",1,20001)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Xem So Lan Chuyen Sinh",1,20003)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Nhan Danh Hieu",1,20004)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Doi Sang Post",1,20012)
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)

    end
    --**********************************
    --Ki琺 tra t鷌
    --**********************************
    function x854923_OnConditionCheck( sceneId, selfId )
    local FreeSpace = LuaFnGetPropertyBagSpace( sceneId, selfId )

    if( FreeSpace < 1 ) then
    local strNotice = "T鷌 餰o thi猽 kh鬾g gian!"
    x854923_ShowNotice( sceneId, selfId, strNotice)
    return 0
    end

    end
    --**************************
    function x854923_OnEventRequest(sceneId,selfId,targetId,eve ntId)
    local key = GetNumText()
    --************************************--
    if key == 20000 then
    BeginEvent(SceneId)
    CallScriptFunction(000064,"Restore_hpmp",sceneId,s elfId,targetId)
    RestoreStrikePoint(sceneId,selfId)
    EndEvent(SceneId)
    BeginEvent(SceneId)
    AddText(sceneId,"Tri Lieu Thanh Cong")
    EndEvent(SceneId)

    end
    if key == 20001 then

    BeginEvent(sceneId)
    AddText(sceneId,"#b#YSau Khi Chuyen Sinh Level Xuong 40")
    AddText(sceneId,"#b#YBan Co Dong Y Khong")
    AddNumText(sceneId,x900087_g_ScriptId,"#b#YToi Dong Y",2,20002)
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)

    end
    --*****************--
    if key == 20002 then

    if GetLevel(sceneId,selfId) < 130 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#YLevel Cua Ban Chua Dat Den 130 Hay Tu Luyen Them")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    elseif num > 200 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#YSo Lan Chuyen Sinh Cua Ban Da Vuot Qua 200 Lan ")
    AddText(sceneId,"#b#YBan Khong The Chuyen Sinh Duoc Nua ")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    SetLevel(sceneId,selfId,40)
    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    SetMissionData(sceneId,selfId,MD_ZHUANSHENG,num+1)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#YChuc Mung Ban Da Tu Luyen Thanh Cong ")
    AddText(sceneId,"#b#YSo Lan Tu Luyen Cua Ban Hien Tai La "..(num+1).."")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end

    if key == 20003 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#YSo Lan Chuyen Sinh Hien Tai Cua Ban La "..num.."")
    AddText(sceneId,"#b#YBan Con "..(200-num).." Lan Chuyen Sinh Nua")
    AddText(sceneId,"#b#Y #4 Hay Co Gang Len Nhe #4")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)

    end
    if key == 20004 then
    BeginEvent(sceneId)
    AddText(sceneId,"#Y Nhan Danh Hieu Theo So Lan Chhuyen Sinh")
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Supper_Saiyan_1",5,20005)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Supper_Saiyan_2",5,20006)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Supper_Saiyan_3",5,20007)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y Supper_Saiyan_4",5,20008)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#ec00099 Supper_Saiyan_5",5,20009)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#ec00000 Dragon Ball Vip",5,20010)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#G Lan Chuyen Sinh Nhan Danh Hieu",11,20011)
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    if key == 20005 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if num < 1 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#YSo Lan Chuyen Sinh Cua Ban Chua Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#Y Supper_Saiyan_1 Can Chuyen Sinh 1 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#YSupper_S aiyan_1")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#Y Supper_Saiyan_1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end

    if key == 20006 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if num < 10 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#Y Supper_Saiyan_2 Can Chuyen Sinh 10 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#YSupper_S aiyan_2")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#Y Supper_Saiyan_2")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20007 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if num < 20 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#Y Supper_Saiyan_3 Can Chuyen Sinh 20 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#YSupper_S aiyan_3")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#Y Supper_Saiyan_3")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20008 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if num < 50 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#Y Supper_Saiyan_4 Can Chuyen Sinh 50 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#YSupper_S aiyan_4")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#Y Supper_Saiyan_4")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20009 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if num < 100 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#ec Supper_Saiyan_5 Can Chuyen Sinh 100 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#ec00099Su pper_Saiyan_5")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#ec Supper_Saiyan_5")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20010 then

    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if num < 200 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#ec00000 Dragon Ball Vip Can Chuyen Sinh 200 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#ec00000Dr agon Ball Vip")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#ec00000 Dragon Ball Vip")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20011 then

    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y Supper_saiyan_1 Can 1 Lan Chuyen Sinh")
    AddText(sceneId,"#b#Y Supper_saiyan_2 Can 10 Lan Chuyen Sinh")
    AddText(sceneId,"#b#Y Supper_saiyan_3 Can 30 Lan Chuyen Sinh")
    AddText(sceneId,"#b#Y Supper_saiyan_4 Can 50 Lan Chuyen Sinh")
    AddText(sceneId,"#b#ec00099 Supper_saiyan_5 Can 100 Lan Chuyen Sinh")
    AddText(sceneId,"#b#ec00000 Dragon Ball Vip Can 200 Lan Chuyen Sinh")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end
    if key == 20012 then
    BeginEvent(sceneId)
    AddText(sceneId,"Ban Muon Nhan Loai Post Nao Sau Day ")
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y 5000 Post",1,20013)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y 10000 Post",1,20014)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#Y 20000 Post",1,20015)
    AddNumText(sceneId,x854923_g_ScriptId,"#b#ec00000 50000 Post",1,20016)
    AddNumText(sceneId,x854923_g_ScriptId,"#G Post Can Bao Nhieu Nguyen Lieu",11,20017)
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end
    if key == 20013 then
    if LuaFnGetAvailableItemCount(sceneId, selfId, 30509092) < 1 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#G #213 Dinh Lua Dao A #213 ")
    AddText(sceneId,"#b#Y #24 Tren Nguoi Cac ha Khong Du Nguyen Lieu #24")
    AddText(sceneId,"#b#W #1 Hay Doc Huong Dan O Ben Duoi #1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnDelAvailableItem(sceneId,selfId,30509092,1)
    local RemainPoint = GetPlayerRemainPoints(sceneId, selfId)
    RemainPoint = RemainPoint + 5000
    SetPlayerRemainPoints(sceneId, selfId, RemainPoint)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#ec00000 Chuc Mung Ban Doi 5000 Post Thanh Cong")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20014 then
    if LuaFnGetAvailableItemCount(sceneId, selfId, 30509092) < 2 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#G #213 Dinh Lua Dao A #213 ")
    AddText(sceneId,"#b#Y #24 Tren Nguoi Cac ha Khong Du Nguyen Lieu #24")
    AddText(sceneId,"#b#W #1 Hay Doc Huong Dan O Ben Duoi #1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnDelAvailableItem(sceneId,selfId,30509092,2)
    local RemainPoint = GetPlayerRemainPoints(sceneId, selfId)
    RemainPoint = RemainPoint + 10000
    SetPlayerRemainPoints(sceneId, selfId, RemainPoint)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#ec00000 Chuc Mung Ban Doi 10000 Post Thanh Cong")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20015 then
    if LuaFnGetAvailableItemCount(sceneId, selfId, 30509092) < 4 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#G #213 Dinh Lua Dao A #213 ")
    AddText(sceneId,"#b#Y #24 Tren Nguoi Cac ha Khong Du Nguyen Lieu #24")
    AddText(sceneId,"#b#W #1 Hay Doc Huong Dan O Ben Duoi #1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnDelAvailableItem(sceneId,selfId,30509092,4)
    local RemainPoint = GetPlayerRemainPoints(sceneId, selfId)
    RemainPoint = RemainPoint + 20000
    SetPlayerRemainPoints(sceneId, selfId, RemainPoint)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#ec00000 Chuc Mung Ban Doi 20000 Post Thanh Cong")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20016 then
    if LuaFnGetAvailableItemCount(sceneId, selfId, 30509092) < 10 then
    BeginEvent(sceneId)
    AddText(sceneId,"#b#G #213 Dinh Lua Dao A #213 ")
    AddText(sceneId,"#b#Y #24 Tren Nguoi Cac ha Khong Du Nguyen Lieu #24")
    AddText(sceneId,"#b#W #1 Hay Doc Huong Dan O Ben Duoi #1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnDelAvailableItem(sceneId,selfId,30509092,10)
    local RemainPoint = GetPlayerRemainPoints(sceneId, selfId)
    RemainPoint = RemainPoint + 50000
    SetPlayerRemainPoints(sceneId, selfId, RemainPoint)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#ec00000 Chuc Mung Ban Doi 50000 Post Thanh Cong")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20017 then

    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y 5000 Post Can 1 Lien Nien Huu Du")
    AddText(sceneId,"#b#Y 10000 Post Can 2 Lien Nien Huu Du")
    AddText(sceneId,"#b#Y 20000 Post Can 4 Lien Nien Huu Du")
    AddText(sceneId,"#b#Y 50000 Post Can 10 Lien Nien Huu Du")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    function x854923_NotifyFailTips( sceneId, selfId, Tip )

    BeginEvent( sceneId )
    AddText( sceneId, Tip )
    EndEvent( sceneId )
    DispatchMissionTips( sceneId, selfId )

    end





    Bác Nào Xem Giúp Em Sai Ở Đâu Được Hum ??? Em Ấn Vào NPC Nó Không Hiên Lên J Cả
    Sao Không Có ai giúp Vậy
    Khách viếng thăm hãy cùng dangvietanh xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
    Trả lời kèm Trích dẫn Trả lời kèm Trích dẫn
  3. 04-01-15, 04:18 PM #3
    songtu
    songtu vẫn chưa có mặt trong diễn đàn
    Thành Viên songtu's Avatar
    Ngày tham gia
    Feb 2014
    Đang ở
    Còn lâu mới nói
    Bài viết
    625
    Thanks
    83
    Thanked 241 Times in 181 Posts

    Ðề: Giúp npc này với

    script này bạn đi copy ở đâu về vậy ?? hay là đã có ai đó add sẵn tong sever rồi!!
    lỗi tùm lum!!
    ví dụ như "event Id" ...bla.bla.. thiếu "end" các kiểu!!
    xem trong thư mục Log ở sever xem nó báo lỗi gì ?? ko có thì tạo thư mục ý ra, rồi vào xem! xem cụ thể trong file errorlua.txt gì đó..
    cách thứ 2 set acc thành GM (trong GMlist.txt)rồi dùng lệnh !!loadlua = ID_script, rồi chạy xem ở sever nó báo sao?
    rồi theo đó mà sửa!!
    nếu mà làm đúng hết rồi!! thid xem lại trong script.dat của cả client và sever xem đã khai báo chưa ?!!?
    Lần sửa cuối bởi songtu, ngày 04-01-15 lúc 04:23 PM.
    Khách viếng thăm hãy cùng songtu xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
    Trả lời kèm Trích dẫn Trả lời kèm Trích dẫn

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

    dangvietanh (04-01-15)
  5. 04-01-15, 04:28 PM #4
    songtu
    songtu vẫn chưa có mặt trong diễn đàn
    Thành Viên songtu's Avatar
    Ngày tham gia
    Feb 2014
    Đang ở
    Còn lâu mới nói
    Bài viết
    625
    Thanks
    83
    Thanked 241 Times in 181 Posts

    Ðề: Giúp npc này với

    code này ko biết chuẩn chưa!! chạy thử coi!!

    PHP Code:
    --NPC TongHop
    --ID: 808008
    --Script: NPC TongHop
    --**************************
    x808008_g_ScriptId = 808008
    --**************************
    function     x808008_OnDefaultEvent(sceneId,selfId,targetId)
    local nam = LuaFnGetName(sceneId,selfId)

    BeginEvent(sceneId)
    AddText(sceneId,"#b#Y Chao Mung "..nam.." Den Voi TLBB")
    AddNumText(sceneId,x808008_g_ScriptId,"#b#Y Tri Lieu",1,20000)
    AddNumText(sceneId,x808008_g_ScriptId,"#b#Y Chuyen Sinh",1,20001)
    AddNumText(sceneId,x808008_g_ScriptId,"#b#Y Xem So Lan Chuyen Sinh",1,20003)
    AddNumText(sceneId,x808008_g_ScriptId,"#b#Y Nhan Danh Hieu",1,20004)
    AddNumText(sceneId,x808008_g_ScriptId,"#b#Y Doi Sang Post",1,20012)
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)

    end
    --**********************************
    --    Ki? tra t?
    --**********************************
    function     x808008_OnConditionCheck( sceneId, selfId )
    local FreeSpace = LuaFnGetPropertyBagSpace( sceneId, selfId )

    if(     FreeSpace < 1 ) then
    local strNotice     = "T? ?o thi? kh?g gian!"
    x808008_ShowNotice( sceneId, selfId, strNotice)
    return     0
    end

    end
    --**************************
    function     x808008_OnEventRequest(sceneId,selfId,targetId,eventId)
    local key = GetNumText()
    --************************************--
    if     key == 20000 then
        BeginEvent    (SceneId)
                CallScriptFunction(000064,"Restore_hpmp",sceneId,selfId,targetId)
                RestoreStrikePoint(sceneId,selfId)
            EndEvent(SceneId)
            BeginEvent(SceneId)
                AddText(sceneId,"Tri Lieu Thanh Cong")
            EndEvent(SceneId)

    end
    if key == 20001 then

    BeginEvent    (sceneId)
    AddText(sceneId,"#b#YSau Khi Chuyen Sinh Level Xuong 40")
    AddText(sceneId,"#b#YBan Co Dong Y Khong")
    AddNumText(sceneId,x900087_g_ScriptId,"#b#YToi Dong Y",2,20002)
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)

    end
    --*****************--
    if     key == 20002 then

    if GetLevel(sceneId,selfId) < 130 then
    BeginEvent    (sceneId)
    AddText(sceneId,"#b#YLevel Cua Ban Chua Dat Den 130 Hay Tu Luyen Them")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    elseif     num > 200 then
    BeginEvent    (sceneId)
    AddText(sceneId,"#b#YSo Lan Chuyen Sinh Cua Ban Da Vuot Qua 200 Lan ")
    AddText(sceneId,"#b#YBan Khong The Chuyen Sinh Duoc Nua ")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    SetLevel(sceneId,selfId,40)
    num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    SetMissionData(sceneId,selfId,MD_ZHUANSHENG,num+1)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#YChuc Mung Ban Da Tu Luyen Thanh Cong ")
    AddText(sceneId,"#b#YSo Lan Tu Luyen Cua Ban Hien Tai La "..(num+1).."")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end

    if key == 20003 then

    num     = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    BeginEvent(sceneId)
    AddText(sceneId,"#b#YSo Lan Chuyen Sinh Hien Tai Cua Ban La "..num.."")
    AddText(sceneId,"#b#YBan Con "..(200-num).." Lan Chuyen Sinh Nua")
    AddText(sceneId,"#b#Y #4 Hay Co Gang Len Nhe #4")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)

    end
    if key == 20004 then
    BeginEvent    (sceneId)
    AddText(sceneId,"#Y Nhan Danh Hieu Theo So Lan Chhuyen Sinh")
    AddNumText(sceneId,x808008_g_ScriptId,"#b#Y Supper_Saiyan_1",5,20005)
    AddNumText(sceneId,x808008_g_ScriptId,"#b#Y Supper_Saiyan_2",5,20006)
    AddNumText(sceneId,x808008_g_ScriptId,"#b#Y Supper_Saiyan_3",5,20007)
    AddNumText(sceneId,x808008_g_ScriptId,"#b#Y Supper_Saiyan_4",5,20008)
    AddNumText(sceneId,x808008_g_ScriptId,"#b#ec00099 Supper_Saiyan_5",5,20009)
    AddNumText(sceneId,x808008_g_ScriptId,"#b#ec00000 Dragon Ball Vip",5,20010)
    AddNumText(sceneId,x808008_g_ScriptId,"#b#G Lan Chuyen Sinh Nhan Danh Hieu",11,20011)
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    if key == 20005 then

    num     = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if     num < 1 then
    BeginEvent    (sceneId)
    AddText(sceneId,"#b#YSo Lan Chuyen Sinh Cua Ban Chua Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#Y Supper_Saiyan_1 Can Chuyen Sinh 1 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#YSupper_S aiyan_1")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#Y Supper_Saiyan_1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end

    if key == 20006 then

    num     = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if     num < 10 then
    BeginEvent    (sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#Y Supper_Saiyan_2 Can Chuyen Sinh 10 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#YSupper_S aiyan_2")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#Y Supper_Saiyan_2")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20007 then

    num     = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if     num < 20 then
    BeginEvent    (sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#Y Supper_Saiyan_3 Can Chuyen Sinh 20 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#YSupper_S aiyan_3")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#Y Supper_Saiyan_3")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20008 then

    num     = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if     num < 50 then
    BeginEvent    (sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#Y Supper_Saiyan_4 Can Chuyen Sinh 50 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#YSupper_S aiyan_4")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#Y Supper_Saiyan_4")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20009 then

    num     = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if     num < 100 then
    BeginEvent    (sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#ec Supper_Saiyan_5 Can Chuyen Sinh 100 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#ec00099Su pper_Saiyan_5")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#ec Supper_Saiyan_5")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20010 then
        
        SetMissionData    (sceneId,selfId,MD_ZHUANSHENG,200)
            num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
    if     num < 200 then
    BeginEvent    (sceneId)
    AddText(sceneId,"#b#Y So Lan Chuyen Sinh Cua Ban Khong Du")
    AddText(sceneId,"#b#Y Muon Nhan Danh Hieu #b#ec00000 Dragon Ball Vip Can Chuyen Sinh 200 Lan")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnAwardSpouseTitle(sceneId,selfId,"#b#ec00000Dr agon Ball Vip")
    DispatchAllTitle(sceneId,selfId)
    BeginEvent(sceneId)
    AddText(sceneId,"Chuc Mung Ban Nhan Thanh Cong Danh Hieu #b#ec00000 Dragon Ball Vip")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20011 then

    BeginEvent    (sceneId)
    AddText(sceneId,"#b#Y Supper_saiyan_1 Can 1 Lan Chuyen Sinh")
    AddText(sceneId,"#b#Y Supper_saiyan_2 Can 10 Lan Chuyen Sinh")
    AddText(sceneId,"#b#Y Supper_saiyan_3 Can 30 Lan Chuyen Sinh")
    AddText(sceneId,"#b#Y Supper_saiyan_4 Can 50 Lan Chuyen Sinh")
    AddText(sceneId,"#b#ec00099 Supper_saiyan_5 Can 100 Lan Chuyen Sinh")
    AddText(sceneId,"#b#ec00000 Dragon Ball Vip Can 200 Lan Chuyen Sinh")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end
    if key == 20012 then
    BeginEvent    (sceneId)
    AddText(sceneId,"Ban Muon Nhan Loai Post Nao Sau Day ")
    AddNumText(sceneId,x808008_g_ScriptId,"#b#Y 5000 Post",1,20013)
    AddNumText(sceneId,x808008_g_ScriptId,"#b#Y 10000 Post",1,20014)
    AddNumText(sceneId,x808008_g_ScriptId,"#b#Y 20000 Post",1,20015)
    AddNumText(sceneId,x808008_g_ScriptId,"#b#ec00000 50000 Post",1,20016)
    AddNumText(sceneId,x808008_g_ScriptId,"#G Post Can Bao Nhieu Nguyen Lieu",11,20017)
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end
    if key == 20013 then
    if LuaFnGetAvailableItemCount(sceneId, selfId, 30509092) < 1 then
    BeginEvent    (sceneId)
    AddText(sceneId,"#b#G #213 Dinh Lua Dao A #213 ")
    AddText(sceneId,"#b#Y #24 Tren Nguoi Cac ha Khong Du Nguyen Lieu #24")
    AddText(sceneId,"#b#W #1 Hay Doc Huong Dan O Ben Duoi #1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnDelAvailableItem(sceneId,selfId,30509092,1) 
    local RemainPoint = GetPlayerRemainPoints(sceneId, selfId)
    RemainPoint = RemainPoint + 5000
    SetPlayerRemainPoints    (sceneId, selfId, RemainPoint) 
    BeginEvent(sceneId)
    AddText(sceneId,"#b#ec00000 Chuc Mung Ban Doi 5000 Post Thanh Cong")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20014 then
    if LuaFnGetAvailableItemCount(sceneId, selfId, 30509092) < 2 then
    BeginEvent    (sceneId)
    AddText(sceneId,"#b#G #213 Dinh Lua Dao A #213 ")
    AddText(sceneId,"#b#Y #24 Tren Nguoi Cac ha Khong Du Nguyen Lieu #24")
    AddText(sceneId,"#b#W #1 Hay Doc Huong Dan O Ben Duoi #1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnDelAvailableItem(sceneId,selfId,30509092,2) 
    local RemainPoint = GetPlayerRemainPoints(sceneId, selfId)
    RemainPoint = RemainPoint + 10000
    SetPlayerRemainPoints    (sceneId, selfId, RemainPoint) 
    BeginEvent(sceneId)
    AddText(sceneId,"#b#ec00000 Chuc Mung Ban Doi 10000 Post Thanh Cong")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20015 then
    if LuaFnGetAvailableItemCount(sceneId, selfId, 30509092) < 4 then
    BeginEvent    (sceneId)
    AddText(sceneId,"#b#G #213 Dinh Lua Dao A #213 ")
    AddText(sceneId,"#b#Y #24 Tren Nguoi Cac ha Khong Du Nguyen Lieu #24")
    AddText(sceneId,"#b#W #1 Hay Doc Huong Dan O Ben Duoi #1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnDelAvailableItem(sceneId,selfId,30509092,4) 
    local RemainPoint = GetPlayerRemainPoints(sceneId, selfId)
    RemainPoint = RemainPoint + 20000
    SetPlayerRemainPoints    (sceneId, selfId, RemainPoint) 
    BeginEvent(sceneId)
    AddText(sceneId,"#b#ec00000 Chuc Mung Ban Doi 20000 Post Thanh Cong")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20016 then
    if LuaFnGetAvailableItemCount(sceneId, selfId, 30509092) < 10 then
    BeginEvent    (sceneId)
    AddText(sceneId,"#b#G #213 Dinh Lua Dao A #213 ")
    AddText(sceneId,"#b#Y #24 Tren Nguoi Cac ha Khong Du Nguyen Lieu #24")
    AddText(sceneId,"#b#W #1 Hay Doc Huong Dan O Ben Duoi #1")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    else
    LuaFnDelAvailableItem(sceneId,selfId,30509092,10) 
    local RemainPoint = GetPlayerRemainPoints(sceneId, selfId)
    RemainPoint = RemainPoint + 50000
    SetPlayerRemainPoints    (sceneId, selfId, RemainPoint) 
    BeginEvent(sceneId)
    AddText(sceneId,"#b#ec00000 Chuc Mung Ban Doi 50000 Post Thanh Cong")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end

    end
    if key == 20017 then

    BeginEvent    (sceneId)
    AddText(sceneId,"#b#Y 5000 Post Can 1 Lien Nien Huu Du")
    AddText(sceneId,"#b#Y 10000 Post Can 2 Lien Nien Huu Du")
    AddText(sceneId,"#b#Y 20000 Post Can 4 Lien Nien Huu Du")
    AddText(sceneId,"#b#Y 50000 Post Can 10 Lien Nien Huu Du")
    EndEvent(sceneId)
    DispatchEventList(sceneId,selfId,targetId)
    end
    end
    function x808008_NotifyFailTips( sceneId, selfId, Tip )
            BeginEvent( sceneId )
                AddText( sceneId, Tip )
            EndEvent( sceneId )
            DispatchMissionTips( sceneId, selfId )
    end 
    Khách viếng thăm hãy cùng songtu xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
    Trả lời kèm Trích dẫn Trả lời kèm Trích dẫn

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

    dangvietanh (04-01-15)
 

 
« Chén Nhạc Vào TLBB | Cần người cài đặt TLBB. »

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
  •  

Nội quy - Quy định

Múi giờ GMT +7. Bây giờ là 04:25 AM.
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ệ.