我們在做多媒體作品時，自然少不了用漸變色來裝飾自己。可是，Authorware中卻沒有現成的東東來畫漸變顏色。本著DIY的精神，咱仔細地想了又想，終于可以在Authorware中直接做出漸變效果了。以下是三個小例子：一個是線性漸變、一個是圓的徑向漸變以及一個扇形漸變。


　　速度條漸變


　　首先利用其他軟件（比如Windows自帶的畫圖板）得到紅色和黃色的RGB值。打開畫圖板，點擊“顏色→編輯顏色…”菜單，彈出“編輯顏色”對話框，單擊其中的“規定自定義顏色”按鈕，然后選中紅色，您就會在最右側看到這個顏色的RGB值了（如圖1）。現在您看到了吧，純紅色的RGB值是（255，0，0），而純黃色的RGB值是（255，255，0）。

　　您只要把這些內容寫到一個計算圖標里就行了。

　　h:=100

　　k:=80

　　x:=h

　　b:=0

　　repeat while x〈=400

　　x1:=x+1

　　if b〉255 then

　　b:=255

　　end if


　　圖1 顏色設置窗口

　　SetFrame(1,RGB(255,b,0))

　　Line(20,x,k,x1,k)

　　x:=x+1

　　b:=b+1

　　end repeat

　　怎么樣，帶紅黃漸變的進度條效果是不是很酷啊？如圖2所示。

　　如果想調整色塊的寬度，就調整Line(20,x,k,x1,k)語句中那個“20”的數值就可以了，而如果您想調整長度呢，就請調整repeat while x〈=400語句中那個“400”的數值。


　　圖2 進度條漸變


　　徑向漸變


　　拖一個計算圖標到流程線上，雙擊打開其輸入窗口，輸入如下的內容：

　　h:=400

　　k:=250

　　p:=0

　　c:=0

　　repeat while p〈=130

　　 if c〉=255 then

　　 c:=255

　　 end if

　　 SetFrame(1,RGB(255,c,0))

　　Circle(2,h-p,k-p,h+p,k+p)

　　p:=p+1

　　c:=c+2

　　end repeat


　　圖3 徑向漸變

　　執行一下，效果怎么樣？還不錯吧？如圖3所示。

　　如果您想改變一下漸變色，是非常簡單的。只要您把上面程序中RGB(255,c,0)中的三個數值做個調整就可以了。您可以試試RGB(255,c,c)或RGB(c,c,c)，甚至RGB(c,255-c,c)。此外，調整一下c:=c+2一句中的數字，可能有意想不到的效果出現喔！


　　扇形漸變


　　您先看看效果，如圖4所示。在Photoshop中我們常見這種效果，是不是？在Authorware中咱們照樣可以把它做出來。您只要在計算圖標中寫入如下的內容：

　　h:=200

　　k:=200

　　x:=0

　　b:=0

　　r:=150

　　angle:=0


　　圖4 扇形漸變

　　repeat while angle〈=2*Pi

　　 x:=r*COS(angle)+h

　　 y:=r*SIN(angle)+k

　　 if b〉255 then

　　 b:=255-(b-255)

　　 end if

　　 SetFrame(1,RGB(255,b,0))

　　 Line(5,h,k,x,y)

　　b:=b+1

　　x:=x+1

　　angle:=angle+0.02

　　end repeat

　　OK，執行一下，體驗一下那種成功的快樂吧！