Sử dụng "ông già" Merlin

[tungcan5diop]

Thủ thuật: Sử dụng "ông già" Merlin
Tác giả: Sưu tầm
Mô tả: Sử dụng "ông già" Merlin

---

hẳn các bạn đã ko ít thì nhiều đã gặp qua ông già Merlin,xuất hiện trong các đoạn video clip hướng dẫn học Visual Studio hay các chương trình của MS. Ứng dụng khá nhiều trong các Web page,nhưng mà Window Form thì chưa thấy
"vô tình lượm được bí kíp" chia sẽ với mọi người cách sử dụng nhân vật này.mình thấy nó khá hay nếu sử dụng nó trong File Hướng Dẫn cho thêm sinh động.
còn mình thấy làm cái này để mà "tán gái" là tốt nhất ,nhất là đối với những anh chàng "nhát" gái,dám nói lên những suy nghĩ của mình ko cần phải nói trực tiếp với nàng,chỉ cần bạn biết sắp xếp một cách khéo léo,hợp lý cho các hành động của nhân vật này.chúc các bạn thành công.hihi
đầu tiên muốn sử dụng bạn cần add 2 cái DLL sau vào chương trình của bạn
chép vào thư mục Bin và Add reference vào chương trình

dll.rar

(16.97 KiB) Đã tải 751 lần

khai báo 2 biến này trong thân của chương trình

Mã: Chọn hết

1.  Private agentController As AgentObjects.Agent
2.  
3.  
4.     Private agentCharacter As AgentObjects.IAgentCtlCharacter

trong Form_Load viết như sau

Mã: Chọn hết

1. agentController = New AgentObjects.Agent()
2.         With agentController
3.             .Connected = True
4.             .Characters.Load("merlin", "merlin.acs")
5.             agentCharacter = .Characters("merlin")
6.         End With

Mã: Chọn hết

1.   With agentCharacter
2.  
3. .
4. .
5. .
6.  End With

 
bây giờ ta chỉ việc viết giữa With và End With  những hành động mà Merlin sẽ làm

Mã: Chọn hết

1. di chuyển:
2. .MoveTo(CShort(Me.Location.X + 420), CShort(Me.Location.Y + 130))

Mã: Chọn hết

1. xuất hiện:
2. .Show()

Mã: Chọn hết

1. ẩn đi:
2. .Hide

Mã: Chọn hết

1. nói chuyện:
2.   .Speak("Hello, my name is tungcan5diop a member of http://www.caulacbovb.com "
3.  

Mã: Chọn hết

1. chìa tay phải:
2.   .Play("GestureRight")

 

Mã: Chọn hết

1. chìa tay trái:
2.   .Play("GestureLeft")

Mã: Chọn hết

1. ngạc nhiên:
2. .Play("Surprised")

Mã: Chọn hết

1. chúc mừng:
2. .Play("Congratulate")

còn rất rất nhiều những hành động khác nữa.các bạn có thể tìm trên Internet để phong phú thêm
mình chỉ biết được nhiêu thôi,các bạn nào thấy thiếu thì bổ sung thêm nhé

Mã: Chọn hết

1. .Play("Read")
2.             .Play("Congratulate")
3.             .Play("Surprised")
4.             .Play("GetAttention")
5.             .Play("Congratulate_2")
6.             .Play("Blink")
7.             .Play("Process")
8.             .Play("Acknowledge")
9.             .Play("Announce")
10.             .Play("Explain")
11.             .Play("GestureDown")
12.             .Play("LookUpBlink")
13.             .Play("Greet")
14.             .Play("Pleased")
15.             .Play("Sad")
16.             .Play("Search")
17.             .Play("Think")
18.             .Play("Wave")
19.             .Play("Write")
20.             .Play("Process")
21.             .Play("Explain")
22.             .Play("Confused")
23.             .Play("Idle1_1")
24.             .Play("DoMAgic2")
25.             .Play("RestPose")
26.             .Play("Alert")

[vo_minhdat2007]

Chà, đang viết cái TUT về Agent mà anh Tùng đi trước rồi

[tungcan5diop]

Chà, đang viết cái TUT về Agent mà anh Tùng đi trước rồi

em viết tiếp cái TUT đó đi,chứ em ko thấy cái này a post vào "Mẹo Vặt" àh.
chứ như vậy thì đâu có đưa vô TUT được đâu viết tiếp rồi post lên cho mọi người tham khảo đi nha Đạt

[bocapit]

Cái này rất thú vị đối với những người mới mài mò tin học. hối xưa tui củng vậy.
Hồi đó thấy nên tìm được vài thứ củng được lắm nè.
Dùng cái này để lấy các động tác và thiết kế hoạt động của nhân vật. Xuất sang được vb, vb script, javascript, exe,.. củng khá thú vị
http://www.bellcraft.com/mash/download.aspx
Ngoài ra có thể kiếm mấy nhân vật từ trang này củng hay lắm.

Còn ai muốn tự tạo cho mình môt nhân vật như thế thì dùng đồ chơi này của microsoft
http://www.microsoft.com/downloads/deta ... c122ef8eb6

Còn hướng dẫn tạo thì ở đây
http://msdn.microsoft.com/en-us/library ... 85%29.aspx
Tìm trên google nữa nha!

[anhnamct]

bạn nào hảo tâm chuyển sang vb6 cho mình dùng với
chứ vb.net kô phải là lập trình đọc lập mình ko thik

[CoffeeShop]

ko thik thì tự ngâm cứu rồi viết ra. cái vụ ông già merlin code vb6 dễ mà

[bocapit]

bạn nào hảo tâm chuyển sang vb6 cho mình dùng với
chứ vb.net kô phải là lập trình đọc lập mình ko thik

Bạn thử dùng cái soft của mình giới thiệu đi nó là code vb6 mà
Mình gởi tập tin kèm, bạn coi thử nha

Test.rar

(111.59 KiB) Đã tải 513 lần

[thaitunganha]

cho em source code sử dụng đi mấy anh. em khoái cái này lắm

[tungcan5diop]

cho em source code sử dụng đi mấy anh. em khoái cái này lắm

hix,bạn đọc kỹ hướng dẫn đi,cái này đâu có source gì đâu

[tinhyeusoida]

Anh Tùng ơi, em đã load file dll về và sử dụng rất tốt!

Anh cho em hỏi cách để cho "ông già" Merlin hiện thông báo yes, no!

Cũng Giống như MsgBox khi xóa dữ liệu vậy, nhấn yes thì thực hiện xóa, nhấn no thì không!

MsgBox thì e làm được , còn Ông già thì chưa ra! mấy anh chị chỉ e với, em làm cả tuần nay mà không được

[vo_minhdat2007]

Cái đó mình cũng từng tìm kiếm nhiều nơi mà làm mãi không được. Với lại cũng không ưa đám Agent này nữa vì không hỗ trợ Unicode (trực tiếp) và Windows 7 thì mấy con Agent chết queo

[tinhyeusoida]

Hic, e tìm mãi mà không tìm ra cách để ông già Merlin hiện thông báo! Nhưng e nghĩ chắc chắn là có cách mà mình không tìm ra đó chứ!

vì bộ office 2003 làm được mà!!!!

[anhnamct]

cái test cảu bạn khá tốt đó nhưng bạn có biết cách list các hiệu ứng của animate không dậy

[vietteiv]

list = code vb6 hẻ bồ tèo
"ông già" trong vb6 không "nói" được tiếng việt = font chữ unicode đâu. nên đừng có mò mẫm, tìm kiếm nữa chi cho mệt

[vo_minhdat2007]

Chịu thôi .NET cũng đâu có dùng Unicode được vì nó cũng chỉ là thành phần COM thôi . Còn các lấy danh sách các animation của Agent thì đây :

Mã: [Chọn hết] [Mở rộng/Thu hẹp] [Tải về]

1. For Each animationName In Character.AnimationNames
2.     cboCombo.Items.Add(animationName)
3. Next

GeSHi © Codebox Plus