計算圖標定義方式

　　根據內部計算圖標代碼定義函數(shù)是最基本方法，啟動authorware 6.5，開始創(chuàng)建一個具有非凡意義的自定義函數(shù)--閏年判斷函數(shù)leapyear。

　　1、 新建工程，命名自定義函數(shù)

　　新建一個"leapyearfunction.a6p"文件；拖動一個計算圖標到流程線上，并命名為"leapyear"，這個名字將成為即將誕生的自定義函數(shù)的名稱。函數(shù)命名需要注意唯一性，不能和其它圖標或者函數(shù)同名，否則將不能正常調用執(zhí)行。

　　2、 編寫閏年判斷函數(shù)leapyear

　　目前公認的閏年判斷算法，滿足下列二者之一，即為閏年：

　　① 能被4整除，但不能被100整除
　　② 能被4整除，且能被400整除

　　根據這個算法，我們就可以在程序中實現(xiàn)閏年的邏輯判斷。打開計算圖標"leapyear"，在里面寫入以下代碼：

if mod（args@"leapyear",400）=0|（mod（args@"leapyear",4）=0 & mod（args@"leapyear",100）<>0） then
result@"leapyear":=true
else
result@"leapyear":=false
end if

　　打開計算圖標"leapyear"的屬性對話框（ctrl+i），把contains script function選項勾上（如圖1），這意味著告訴系統(tǒng)把"leapyear"封裝為自定義函數(shù)。確定后返回流程，發(fā)現(xiàn)計算圖標"leapyear"的圖標變化了（如圖2），這樣自定義函數(shù)"leapyear"就宣告誕生！

圖1設置"leapyear"的屬性對話框

圖2 函數(shù)"leapyear"的圖標變化

此時執(zhí)行菜單window >functions打開函數(shù)列表窗口，在script icons分類中就可以看到leapyear自定義函數(shù)的"真身"（如圖3），你可以在函數(shù)描述（description）文本框里輸入函數(shù)說明和其它使用信息（也可通過執(zhí)行菜單modify > icon > description…來輸入函數(shù)相關說明信息），例如輸入：return:=leapyear（"year"）

圖3 自定義函數(shù)"leapyear"

　　3、 調用自定義函數(shù)leapyear

　　函數(shù)編寫封裝的目的就是為主程序服務，我們立馬派遣"leapyear"上崗。authorware 6.5中是通過系統(tǒng)函數(shù)callscripticon來調用內部計算圖標腳本方式定義的函數(shù)的。我們編寫的閏年判斷函數(shù)leapyear為一返回型函數(shù)，返回值為true（1）或者false（0），true表示為閏年，false則相反。

　　我們繼續(xù)在計算圖標"leapyear"后添加一交互圖標"showyear"，拖動一計算圖標到其右邊，選擇為文本輸入響應交互，并命名為"*"（即接受任何文本輸入）；打開該計算圖標并輸入以下代碼：

if callscripticon（@"leapyear",entrytext）=true then
ifleapyear:="是"
else
ifleapyear:="否"
end if

　　最后我們設置一下顯示界面，雙擊打開交互圖標"showyear"，用文本工具輸入{ ifleapyear }，并勾選"update displayed variables"顯示屬性，存盤后即完成函數(shù)的調用工作。

圖4 調用自定義函數(shù)"leapyear"

　　簡單的幾個步驟就完成計算圖標腳本的自定義函數(shù)工作，這實在是authorware 6.5的一個革命性新功能。如果腳本是存儲在外部文本文件里，這種情況該如何定義和調用函數(shù)呢？下面我們介紹一下外部文本文件的函數(shù)定義方式。

文本文件定義方式

　　1、 外部文本文件腳本準備工作

　　既然腳本存儲在外部文本文件里，當然首先得新建一個文本文件，例如"leapyear.txt"，編輯該txt文本文件并輸入以下腳本代碼：

if mod（args@iconid,400）=0|（mod（args@iconid,4）=0 & mod（args@iconid,100）<>0） then
result@iconid:=true
else
result@iconid:=false
end if

　　和上面第一種方法的函數(shù)代碼比較，你會發(fā)現(xiàn)唯一變化的是原來的args@"leapyear"被args@iconid所替代，這樣做是為了保證該函數(shù)可被任何的計算圖標調用，即外部文本文件定義方式考慮到了函數(shù)的通用性問題。存盤后這個外部腳本函數(shù)就完成了，也就是說這種方式定義的函數(shù)一切腳本都存在于外部txt文本中，比第一種定義方式顯得更加靈活和強大，因為authorware 提供了txt文本的讀寫接口，允許我們在authorware中隨時對它進行編輯修改。

　　2、 在authorware 6.5中調用外部腳本函數(shù)

　　調用任何外部腳本的自定義函數(shù)前都必須對外部腳本函數(shù)中的變量進行初始化，也就是自變量的創(chuàng)建過程，因為authorware在運行過程并不具備自動建立變量的功能。

　　新建一個"leapyearfilemethod.a6p"文件，拖入一個計算圖標到流程線上并命名為"initialize"，在計算圖標里輸入以下代碼：

args@iconid:=""
result@iconid:=""

　　輸入完畢后關閉計算圖標代碼編輯器時，系統(tǒng)會提示創(chuàng)建這些變量，一一確定后就完成了自定義函數(shù)的自變量初始化工作。

　　3、 調用自定義函數(shù)leapyear

　　和計算圖標自定義函數(shù)的調用不同，外部文本文件腳本定義的函數(shù)調用的是通過系統(tǒng)變量callscriptfile來完成的，因此我們只要把上面計算圖標定義方式第3步驟中的代碼替換為以下的代碼即可，其它的保持不變：
if callscriptfile（filelocation^"leapyear.txt",entrytext）=true then
ifleapyear:="是"
else
ifleapyear:="否"
end if

　　這樣自定義函數(shù)的調用也就完成了，執(zhí)行效果和計算圖標定義方式一樣。

　　字符串定義方式

　　除了上面介紹的兩種自定義函數(shù)方式外，authorware 6.5還支持把存儲在字符串中的腳本定義為函數(shù)，這些字符串可以是文本文件中的字符串行，數(shù)據庫中的字符串，甚至是加密的字符串（使用前須解密）等，字符串的不同行以return（回車）分隔。例如上面提到的外部文本文件"leapyear.txt"，我們可以用系統(tǒng)函數(shù)readextfile把該文本內容讀入賦予一字符串變量script，然后再當做函數(shù)來調用；需要注意的是字符串腳本函數(shù)是通過callscriptstring系統(tǒng)函數(shù)來調用的，具體代碼如下：

script := readextfile（filelocation^"leapyear.txt"）
callscriptstring（script）

　　過上面三種自定義函數(shù)實現(xiàn)方式的介紹，大家對authorware 6.5的自定義函數(shù)是否有更深刻的認識？

　　·相關小知識--時間歷法

　　太陽歷又稱為陽歷，是以地球繞太陽公轉的運動周期為基礎而制定的歷法。太陽歷的歷年近似等于回歸年，一年12個月，這個"月"，實際上與朔望月無關。陽歷的月份、日期都與太陽在黃道上的位置較好地符合，根據陽歷的日期，在一年中可以明顯看出四季寒暖變化的情況；但在每個月份中，看不出月亮的朔、望、兩弦。

　　如今世界通行的公歷就是一種陽歷（格里高利歷），平年365天，閏年366天，每四年一閏，每滿百年少閏一次，到第四百年再閏，即每四百年中有97個閏年。公歷的歷年平均長度與回歸年只有26秒之差，要累積3300年才差一日。下載源文件