動(dòng)畫精靈制作實(shí)例介紹如下。
一、我們根據(jù)前面講過的內(nèi)容做一個(gè)控制精靈的實(shí)例,程序的效果圖如圖5-7所示。

圖5-7 精靈實(shí)例效果圖
二、程序的流程圖如圖5-8所示,交互有8個(gè)交互按鈕,分別實(shí)現(xiàn)對(duì)精靈的各種控制。

圖5-8 精靈實(shí)例流程圖(一)
三、“setup”和“裝載精靈”計(jì)算圖標(biāo)的內(nèi)容如下。
1)在“setup”計(jì)算圖標(biāo)中輸入:
string:="第一次運(yùn)行此程序需要安裝msagent2.0服
務(wù)驅(qū)動(dòng)程序和語音驅(qū)動(dòng)程序,確認(rèn)嗎?"
result:=messagebox( windowhandle, string, "三石工
作室", 49)
if result=1 then
jumpoutreturn(filelocation^"msagent2.0.exe" , "" , "")
jumpoutreturn(filelocation^"speak.exe","","")
else
goto(iconid@"裝載精靈")
end if
要求用戶在第一次運(yùn)行程序是詢問是否要安裝動(dòng)畫精靈的驅(qū)動(dòng)程序。
2)在“裝載精靈”計(jì)算圖標(biāo)中輸入:
maremove(id)
id:=maload(filelocation^"genie.acs")
卸載掉之前出現(xiàn)的動(dòng)畫精靈,再裝載新的精靈“genie.acs”。
四、八個(gè)交互計(jì)算圖標(biāo)內(nèi)容的設(shè)置。
1)在“顯示精靈”計(jì)算圖標(biāo)內(nèi)輸入:
mashow(id,100,100,1,0)
2)在“隱藏精靈”計(jì)算圖標(biāo)內(nèi)輸入:
mahide(id)
3)在“移動(dòng)精靈”計(jì)算圖標(biāo)內(nèi)輸入:
mamove(id,50,60)
4)在“朗讀英文”計(jì)算圖標(biāo)內(nèi)輸入:
maspeak(id,"how are you","")
5)在“招手動(dòng)作”計(jì)算圖標(biāo)內(nèi)輸入:
magesture(id,120,130)
6)在“施展魔法”計(jì)算圖標(biāo)內(nèi)輸入:
maplay(id,"domagic2")
7)在“停止動(dòng)作”計(jì)算圖標(biāo)內(nèi)輸入:
mastopall(id)
8)在“清除精靈”計(jì)算圖標(biāo)內(nèi)輸入:
maremove(id)
后面的幾個(gè)按鈕如圖5-9所示。

圖5-9 精靈實(shí)例流程圖(二)
新聞熱點(diǎn)
疑難解答