問題4の解答例
#include "hmm.as" ; 画面の初期化 ddinit ddscreen 640,480,1,2 await 16 ddgsel 0 gosub *Clear_Screen ; グラデーションがかかった文字列を書く repeat 8 wordx=32:wordy=32+(7-cnt) red=16*cnt green=16*cnt blue=128+(16*cnt) gosub *Write_Word loop ddredraw stop ; 画面をクリアする *Clear_Screen ddcolor 0,0,0 ddboxf 0,0,640,480 return ; 言葉を書く *Write_Word ddcolor red,green,blue ddpos wordx,wordy font "MS 明朝",32 ddprint "世界よこんにちは" return