Msagent "Merlin"

Private Sub Button1_Click(ByVal sender As
System.Object, ByVal e As System.EventArgs) Handles
Button1.Click
'registra el Interop.AgentObjects.dll
Dim Agente As New AgentObjects.AgentClass
Agente.Connected = True
Agente.Characters.Load
("peedy", "C:\InfoAnimal\Peedy.acs")
Agente.Characters.Item("peedy").Height = 90
Agente.Characters.Item("peedy").Width = 112

Agente.Characters("peedy").Show()
Agente.Characters("peedy").MoveTo(10, -2)
Agente.Characters("peedy").Play("Greet")
Agente.Characters("peedy").Think("Comprate un
libro. ")

End Sub



Solo cambia Merlin por peedy




Miao.
Comprate un libro.

Saludos...
Quisiera molestarlos con la siguiente inquietud,

quisiera

ver si alguno de ustedes tiene algun material que me

pueda

servir para aprender algo sobre como trabajar con

Msagent,

especificamente Merlin..., que me la puediera reembir

por

favor.


Rsc.
.