[JX] xem giúp mình cấu trúc script Event này !
Hello & Welcome to our community. Is this your first visit? Đăng Ký
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 3 của 3
  1. #1
    Thành Viên
    Ngày tham gia
    Apr 2014
    Bài viết
    288
    Thanks
    180
    Thanked 21 Times in 15 Posts

    xem giúp mình cấu trúc script Event này !

    Code:
    function main()
    
    	ThoNauBanh()
    end
    
    
    -- lenh get
    a 		= HaveItem(951)
    b 		= HaveItem(952)
    c 		= HaveItem(953)
    d 		= HaveItem(954)
    e 		= HaveItem(955)     
    
    n 		= GetCash()
    
    TAB_COST = {
    {1,5000},
    {2,5000},
    {3,5000},
    {4,10000},
    {5,10000},
    }
    
    
    function ThoNauBanh()
    	local TAB_THONAUBANH = {
    			"Ta t×m ®­îc ngò qu¶, h·y ®æi b¸nh cho ta nhÐ!/NauBanh",
    			"Ta sÏ quay l¹i sau/no",
    		
    			}
    	SayImg("<color=green>Thî Lµm B¸nh:<color> B¸nh cña ta lµ ngon nhÊt xø nµy, nÕu cã B× kÝp nÊu bµnh TÕt n÷a th× tuyÖt!",
    		2,24,
    		TAB_THONAUBANH[1],
    		TAB_THONAUBANH[2]
    		)
    end
    
    -- EVENT BANH TET
    function NauBanh()
    	local TAB_NAUBANH = {
    			"§æi cho ta c¸i b¸nh tÐt ®Ëu xanh/tetdau",
    			"§æi cho ta c¸i b¸nh tÐt thËp cÈm/tettc",
    			"§æi cho ta c¸i b¸nh ch­ng thËp cÈm/chungtc",
    		    "§æi cho ta c¸i b¸nh Ýt th­îng h¹ng/bich",
    			"§æi cho ta c¸i b¸nh ch­ng th­îng h¹ng/chungth",
    			"KÕt thóc ®èi tho¹i/no",
    			}
    	SayImg("<color=green>Thî Lµm B¸nh:<color> Ta còng ®ang cÇn lµm m©m Ngò Qu¶ cho ngµy tÕt...Th«i ®­îc! ta sÏ ®æi cho ThiÕu hiÖp, ng­¬i lÊy b¸nh nµo?\n<pic=917> <pic=919> <pic=921>. ",
    		6,24,
    		TAB_NAUBANH[1],
    		TAB_NAUBANH[2],
    		TAB_NAUBANH[3],
    		TAB_NAUBANH[4],
    		TAB_NAUBANH[5],
    		-- TAB_NAUBANH[6],
    		TAB_NAUBANH[6]
    		)
    end
    TAB_NAUBANHNAO = {
    	"Ta cã ®ñ 5 qu¶ ®©y, h·y ®æi cho ta!/banhtetdx",
    	"Ta cã ®ñ 5 qu¶ ®©y, h·y ®æi cho ta!/banhtettc",
    	"Ta cã ®ñ 5 qu¶ ®©y, h·y ®æi cho ta!/banhchungtc",
    	"Ta cã ®ñ 5 qu¶ ®©y, h·y ®æi cho ta!/banhich",
    	"Ta cã ®ñ 5 qu¶ ®©y, h·y ®æi cho ta!/banhchungth",
    	"Ta kh«ng mang ®ñ råi!/no",
    }
    function tetdau()
    	SayImg("<color=green>Thî Lµm B¸nh:<color> Muèn ®æi b¸nh <color=blue>TÐt ®Ëu xanh cÇn:\n<pic=917> = 3<pic=912> + 2<pic=913>  + "..TAB_COST[1][2].." l­îng.",
    		2,24,
    		TAB_NAUBANHNAO[1],
    		TAB_NAUBANHNAO[6])
    end
    function tettc()
    	SayImg("<color=green>Thî Lµm B¸nh:<color> Muèn ®æi b¸nh<color=blue>TÐt thËp cÈm cÇn:\n<pic=917> = 3<pic=913> +2 <pic=914> + "..TAB_COST[2][2].." l­îng.",
    		2,24,
    		TAB_NAUBANHNAO[2],
    		TAB_NAUBANHNAO[6])
    end
    function chungtc()
    	SayImg("<color=green>Thî Lµm B¸nh:<color> Muèn ®æi b¸nh <color=blue>Ch­ng thËp cÈm cÇn:\n<pic=919> = 3<pic=914> + 2<pic=915> +  "..TAB_COST[3][2].." l­îng.",
    		2,24,
    		TAB_NAUBANHNAO[3],
    		TAB_NAUBANHNAO[6])
    end
    function bich()
    	SayImg("<color=green>Thî Lµm B¸nh:<color> Muèn ®æi b¸nh <color=blue>B¸nh Ýt cÇn: \n<pic=648> = 3<pic=915> + 2<pic=916> + 1 <pic=918> + "..TAB_COST[4][2].." l­îng.",
    		2,24,
    		TAB_NAUBANHNAO[4],
    		TAB_NAUBANHNAO[6])
    end
    function chungth()
    	SayImg("<color=green>Thî Lµm B¸nh:<color> Muèn ®æi b¸nh <color=blue>Ch­ng th­îng h¹ng cÇn:\n<pic=921> = 5<pic=916> + 2 <pic=918> + "..TAB_COST[5][2].." l­îng.",
    		2,24,
    		TAB_NAUBANHNAO[5],
    		TAB_NAUBANHNAO[6])
    end
    
    
    function banhtetdx(sel)
    	local TAB_BANHTHUONG = {
    		"<color=green>Thî NÊu B¸nh<color> Cung hû ph¸t tµi!: <pic=917>.",
    		"<color=green>Thî NÊu B¸nh<color> Chóc Mõng N¨m Míi!: ",
    		"Lçi råi th«ng b¸o GM nhÐ",
    		"<color=green>Thî NÊu B¸nh<color>: Ng­¬i d¸m lõa ta!!!. ",}
        
    	if (a >= 3) and (b >= 2) and (n >= TAB_COST[1][2]) then
    	    DelItem (951)
    		DelItem(951)
    		DelItem(951)
    		DelItem(952)
    		DelItem(952)
    		Pay(TAB_COST[1][2])
    		if (HaveItem(951) == (a - 3)) and (HaveItem(952) == (b - 2)) and (GetCash() ~= n) then
    			local aHeo = random(1,10)
    			if (aHeo > 1) then
    				AddItem(6,1,1024,0,0,0,0)
    				Talk(1,"no",TAB_BANHTHUONG[1])
    				return
    			else
    				AddEventItem(951)
    				AddEventItem(951)
    				AddEventItem(951)
    				Talk(1,"no",TAB_BANHTHUONG[2])
    				return
    			end
    		else
    			Msg2Player(TAB_BANHTHUONG[3])
    			return
    		end
    	else
    		Msg2Player(TAB_BANHTHUONG[4])
    		return
    	end
    end
    
    function banhtettc()
    		local TAB_BANHDAUXANH = {
    		"<color=green>Thî NÊu B¸nh<color> Cung hû ph¸t tµi!: <pic=917>.",
    		"<color=green>Thî NÊu B¸nh<color> Chóc Mõng N¨m Míi!: ",
    		"Lçi råi th«ng b¸o GM nhÐ",
    		"<color=green>Thî NÊu B¸nh<color>: Ng­¬i d¸m lõa ta!!!. ",}
    	
    	if (b >= 3) and (c >= 2) and (n >= TAB_COST[2][2]) then
    	    DelItem (952)
    		DelItem(952)
    		DelItem(952)
    		DelItem(953)
    		DelItem(953)
    		Pay(TAB_COST[2][2])
    		if (HaveItem(952) == (b - 3)) and (HaveItem(953) == (c - 2)) and (GetCash() ~= n) then
    			local aHeo = random(1,10)
    			if (aHeo > 1) then
    				AddItem(6,1,1023,0,0,0,0)
    				Talk(1,"no",TAB_BANHDAUXANH[1])
    				return
    			else
    				AddEventItem(952)
    				AddEventItem(952)
    				AddEventItem(952)
    				Talk(1,"no",TAB_BANHDAUXANH[2])
    				return
    			end
    		else
    			Msg2Player(TAB_BANHDAUXANH[3])
    			return
    		end
    	else
    		Msg2Player(TAB_BANHDAUXANH[4])
    		return
    	end
    end
    function banhchungtc()
    	local TAB_BANHDACBIET = {
    		"<color=green>Thî NÊu B¸nh<color> Cung hû ph¸t tµi!: <pic=917>.",
    		"<color=green>Thî NÊu B¸nh<color> Chóc Mõng N¨m Míi!: ",
    		"Lçi råi th«ng b¸o GM nhÐ",
    		"<color=green>Thî NÊu B¸nh<color>: Ng­¬i d¸m lõa ta!!!. ",}
    	
    	if (c >= 3) and (d >= 2) and (n >= TAB_COST[3][2]) then
    		DelItem(953)
    		DelItem(953)
    		DelItem(953)
    		DelItem(954)
    		DelItem(954)
    		Pay(TAB_COST[3][2])
    		if (HaveItem(953) == (c - 3)) and (HaveItem(954) == (d - 2)) and (GetCash() ~= n) then
    			local aHeo = random(1,10)
    			if (aHeo > 1) then
    				AddItem(6,1,1025,0,0,0,0)
    				Talk(1,"no",TAB_BANHDACBIET[1])
    			else
    				AddEventItem(953)
    				AddEventItem(953)
    				AddEventItem(953)
    				Talk(1,"no",TAB_BANHDACBIET[2])
    			return
    			end
    		else
    			Msg2Player(TAB_BANHDACBIET[3])
    			return
    		end
    	else
    		Msg2Player(TAB_BANHDACBIET[4])
    		return
    	end
    end
    function banhich()
    	local TAB_BANHNHANTRUNG = {
    		"<color=green>Thî NÊu B¸nh<color> Cung hû ph¸t tµi!: <pic=917>.",
    		"<color=green>Thî NÊu B¸nh<color> Chóc Mõng N¨m Míi!: ",
    		"Lçi råi th«ng b¸o GM nhÐ",
    		"<color=green>Thî NÊu B¸nh<color>: Ng­¬i d¸m lõa ta!!!. ",}
    	
    	if (d >= 3) and (e >= 2)  and (n >= TAB_COST[4][2]) then
    		DelItem(954)
    		DelItem(954)
    		DelItem(954)
    		DelItem(955)
    		DelItem(955)
    		 
    		Pay(TAB_COST[4][2])
    		if (HaveItem(954) == (d - 3)) and (HaveItem(955) == (e - 2))  and (GetCash() ~= n)  then
    			local aHeo = random(1,10)
    			if (aHeo > 1) then
    				AddItem(6,1,1026,0,0,0,0)
    				Talk(1,"no",TAB_BANHNHANTRUNG[1])
    			else
    				AddEventItem(954)
    				AddEventItem(954)
    				AddEventItem(954)
    				Talk(1,"no",TAB_BANHNHANTRUNG[2])
    			return
    			end
    		else
    			Msg2Player(TAB_BANHNHANTRUNG[3])
    			return
    		end
    	else
    		Msg2Player(TAB_BANHNHANTRUNG[4])
    		return
    	end
    end
    function banhchungth()
    	local TAB_BANHHATSEN = {
    		"<color=green>Thî NÊu B¸nh<color> Cung hû ph¸t tµi!: <pic=917>.",
    		"<color=green>Thî NÊu B¸nh<color> Chóc Mõng N¨m Míi!: ",
    		"Lçi råi th«ng b¸o GM nhÐ",
    		"<color=green>Thî NÊu B¸nh<color>: Ng­¬i d¸m lõa ta!!!. ",}
    	
    	if (e >= 5)  and (n >= TAB_COST[5][2]) then
    		DelItem(955)
    		DelItem(955)
    		DelItem(955)
    		DelItem(955)
    		DelItem(955)
    	  
    		 
    		Pay(TAB_COST[5][2])
    	if (HaveItem(955) == (e - 5)) and   (GetCash() ~= n) then 
    			local aHeo = random(1,10)
    			if (aHeo > 1) then
    				AddItem(6,1,1395,0,0,0,0)
    				Talk(1,"no",TAB_BANHHATSEN[1])
    			else
    				AddEventItem(955)
    				AddEventItem(955)
    				AddEventItem(955)
    			
    				Talk(1,"no",TAB_BANHHATSEN[2])
    			return	
    			end
    		else
    			Msg2Player(TAB_BANHHATSEN[3])
    			return
    		end
    	else
    		Msg2Player(TAB_BANHHATSEN[4])
    		return
    	end
    	end
    xem giúp mình dùng như vậy có ổn ko ^^
    Khách viếng thăm hãy cùng yeuVLTK xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  2. #2
    Thành Viên vuongminh's Avatar
    Ngày tham gia
    Jul 2013
    Bài viết
    129
    Thanks
    18
    Thanked 19 Times in 9 Posts

    Ðề: xem giúp mình cấu trúc script Event này !

    Bạn Ko Test Đc Ah :Z
    30 charrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr
    Khách viếng thăm hãy cùng vuongminh xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  3. #3
    Thành Viên
    Ngày tham gia
    Dec 2011
    Bài viết
    354
    Thanks
    454
    Thanked 40 Times in 32 Posts

    Ðề: xem giúp mình cấu trúc script Event này !

    Vãi icon.
    Khách viếng thăm hãy cùng dovietthai xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

 

 

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

  1. [JX] viết script event linux ??
    Bởi yeuVLTK trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 5
    Bài viết cuối: 24-05-14, 03:52 PM
  2. [JX] Script Event Nho Nhỏ
    Bởi DarkOfTheMoon trong diễn đàn Scripts
    Trả lời: 4
    Bài viết cuối: 02-02-13, 11:04 AM
  3. Xin script event 8.3 sv Mướp
    Bởi sontung93 trong diễn đàn Scripts
    Trả lời: 4
    Bài viết cuối: 29-08-10, 11:29 AM
  4. Script event đêm huy hoàng
    Bởi sangpronhat trong diễn đàn Scripts
    Trả lời: 7
    Bài viết cuối: 13-01-10, 08:47 AM
  5. Script event quả huy hoàng
    Bởi Mr.Rezo™ trong diễn đàn Scripts
    Trả lời: 12
    Bài viết cuối: 20-07-09, 05:20 PM

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à 11:40 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ệ.