소스

<OBJECT ID="AgentControl" width= 0height=0  CLASSID= "CLSID:D45FD31B-5C6E-11D1-9EC1-00C04FD7081F"CODEBASE="#VERSION=2,0,0,0"></OBJECT>

<OBJECT ID="TruVoice" width=0 height=0 CLASSID= "CLSID:B8F2846E-CE36-11D0-AC83-00C04FD97575"CODEBASE="#VERSION=6,0,0,0"></OBJECT>

<SCRIPT language=VBScript>

Dim Peedy
Sub window_OnLoad
        AgentControl.Connected = True
        AgentControl.Characters.Load "Peedy", "http://agent.microsoft.com/agent2/chars/peedy/peedy.acf"
        Set Peedy = AgentControl.Characters("Peedy")
        Peedy.LanguageID = &H0409

        Peedy.Get "State", "Showing, Speaking"
        Peedy.Get "Animation", "Greet, GreetReturn"

        Peedy.Show
        Peedy.Get "State", "Hiding"

        Peedy.Play "Greet" '제스쳐 1 //
        Peedy.Speak "Welcome to P H P school" '원하는 인삿말을 입력 하세요

        Peedy.Play "Congratulate" '제스쳐 2//
        Peedy.Speak "Ha! Ha! Ha!" '두번째 인삿말을 입력 하세요

        Peedy.Play "MoveLeft" '제스쳐 3//
        Peedy.Speak " P H P school Source Bank" '세번째 인삿말을 입력 하세요

        Peedy.Play "Surprised" '제스쳐 4//
        Peedy.Speak " P H P school is Great Homepage" '네번째 인삿말을 입력 하세요
        Peedy.Speak "Bye Bye" '다섯번째 인삿말을 입력 하세요

        Peedy.Hide
End Sub
</SCRIPT>
---------------------------------------------------------------------



--- 사용가능한 제스처 ---
Acknowledge
Alert
Announce
Blink
Confused
Congratulate
Decline
DoMagic1
DoMagic2
DontRecognize
Explain
GestureDown
GestureLeft
GestureRight
GestureUp
GetAttention
GetAttentionContinued
GetAttentionReturn
Greet
Hearing_1
Hearing_2
Hearing_3
Hide
Idle1_1
Idle1_2
Idle1_3
Idle1_4
Idle1_5
Idle2_1
Idle2_2
Idle3_1
Idle3_2
Idle3_3
LookDown
LookDownBlink
LookDownReturn
LookDownLeft
LookDownLeftBlink
LookDownLeftReturn
LookDownRight
LookDownRightBlink
LookDownRightReturn
LookLeft
LookLeftBlink
LookLeftReturn
LookRight
LookRightBlink
LookRightReturn
LookUp
LookUpBlink
LookUpReturn
LookUpLeft
LookUpLeftBlink
LookUpLeftReturn
LookUpRight
LookUpRightBlink
LookUpRightReturn
MoveDown
MoveLeft
MoveRight
MoveUp
Pleased
Process
Processing
Read
ReadContinued
ReadReturn
Reading
RestPose
Sad
Search
Searching
Show
StartListening
StopListening
Surprised
Think
Thinking
Uncertain
Wave
Write
WriteContinued
WriteReturn
Writing


---- 사용가능한 캐릭터 -----
Merlin(마법사)
Peedy(앵무새)
Genie(지니)
Robby(로봇)


---------------- 추가 -----------------------------

<OBJECT ID="AgentControl" width=0 height=0 CLASSID="CLSID:D45FD31B-5C6E-11D1-9EC1-00C04FD7081F" CODEBASE="#VERSION=2,0,0,0"></OBJECT>

<SCRIPT language=Javascript>
<!--
// 이 소스는 IE6에서만 동작하며 http://www.miniwini.com에서
// 가져온 소스이며 제가(Magic) 일부분 수정을 하였습니다.
// 간단한 수정으로 사용이 가능하게끔 하기위해 원본 소스에 붙어있던
// 주석은 삭제하여 제가 간단히 붙였고 다른 기능은 삭제 하였습니다.
// 원본 소스를 원하신다면 http://miniwini.com/sharetips/read.html?id=47&page=4 주소로 가시면 됩니다.

// 캐릭터의 숨겼어도 이 소스가 있는 페이지를 닫을때까지 트레이에 캐릭터 호출 아이콘이 있음

// 제스처 리스트 - 마법사로 예를 들었음 - 공통은 모든 캐릭터 동일 제스처
// Greet - 인사 (공통)
// Announce - 나팔은 붊
// GestureLeft - 왼손들기 (공통)
// GestureRight - 오른손들기 (공통)
// Congratulate - 트로피를 꺼냄
// GetAttentionContinued - 툭 쳐서 소리를 냄
// Pleased - 기다려 주세요 (공통)
// Surprised - 놀람 (공통)

// Peedy - (앵무새) : http://agent.microsoft.com/agent2/chars/peedy/Peedy.acf
// Genie - (램프의요정 지니) : http://agent.microsoft.com/agent2/chars/genie/Genie.acf
// Merlin - (아더왕의 전설에 나오는 마법사 멀린) : http://agent.microsoft.com/agent2/chars/merlin/Merlin.acf
// Robby - (못생긴 로봇) : http://agent.microsoft.com/agent2/chars/robby/Robby.acf
// Genie - (지니) : http://agent.microsoft.com/agent2/chars/genie/Genie.acf
var chara ='Marlin' // 캐릭터 명
var charaurl = 'http://agent.microsoft.com/agent2/chars/merlin/merlin.acf' // 캐릭터 URL
var Merlin;

function character() {
AgentControl.Connected = true;
AgentControl.Characters.Load(""+chara+"", ""+charaurl+"");

Merlin = AgentControl.Characters.Character(""+chara+"");
Merlin.LanguageID = 0x0412; // 0x0409 : 영어 , 0x0412 : 한글 - 한글을 추천..
Merlin.Get("state", "Showing, Speaking,Hiding");
Merlin.moveto(400,300,0); // ↓ 제스처 리스트 - 여기에 해당되는 제스터가 없다면 그냥 제스처 없이 메세지만 나타남
Merlin.Get("animation", "Greet, GreetReturn, Announce, GestureLeft,GestureRight,Pleased,Surprised,Congratulate,GetAttentionContinued");
Merlin.Show(); // ↑ 새로운 캐릭터로 로딩시에는 메모리로 제스처를 저장하기 때문에 시간이 걸리며 다시 Refresh를 해주는게 좋음..

Merlin.Play("Greet"); // 제스처 - 인사
Merlin.Think("1번째메세지 삽입"); // 메세지
Merlin.Play("Announce");
Merlin.Think("2번째메세지 삽입");
Merlin.Play("GestureLeft");
Merlin.Think("3번째메세지 삽입!");
Merlin.Play("GetAttentionContinued");
Merlin.Think("41번째메세지 삽입");
Merlin.Play("GetAttentionContinued");
Merlin.Think("5번째메세지 삽입 ~~ ");
Merlin.Play("GestureRight");
Merlin.Think("6번째메세지 삽입");
Merlin.Play("GestureLeft");
Merlin.Think("7번째메세지 삽입");
Merlin.Play("Surprised");
Merlin.Think("8번째메세지 삽입");
Merlin.Play("Blink"); // 이동

Merlin.moveto(screen.width-150,screen.height-150,1);
Merlin.Play("Blink");
}

function hide_1() {
Merlin.Hide();
}
//-->
</SCRIPT>
<a href="javascript: character();">실행</a>