□投稿者/ クジラ飛行机 -(2002/05/26(Sun) 11:19:47)
□U R L/ |
'エヴ○風電光掲示板
{▼ユーザーの設定}
{---プログラム掲示板投稿フォーム---
【ソフト名】エヴ○風電光掲示板(バージョン 1.00)
【作 成 者】クジラ飛行机
【種 別】フリーソフトウェア
【ひまわりのバージョン】ver.1.49
【転 載】可(転載条件:ご自由に)
【改変運用】可
【ひまわり本体への梱包】可
【実行時に利用作成するファイル】無
【コメント】適当な内容の文章を、某アニメ『エヴ○』風に表示する掲示板です。
メモリ消費量が激しいので、
---投稿フォームここまで---}
エラーを無視。
'表示させたい文字を設定する
表示内容=「ひまわり式エヴ○風掲示板
作画：クジラ飛行机 監督：クジラ飛行机
あの坂の向こうには、ひまわりが植えてある。
僕は、どうしても、それが見たくて、
Windowsを、買った。
完」
'表示間隔の設定
表示間隔=200{ミリ秒}
'文字属性
文字サイズ=50
文字書体=「ＭＳゴシック」
{▲ユーザーの設定ここまで}
'----------------------------------------------------------------
'初期設定
WW=640
HH=400
掲示板のサイズ=「(0,0,{WW},{HH})」
母艦の、サイズは、掲示板のサイズ
母艦の、タイトルは、表示内容#0
母艦を、中央へ移動。
白色で、画面クリア。
待ち時間 = 表示間隔÷1000 * 要素数(表示内容)
板アニメを、アニメとして、作成。
その、サイズは、掲示板のサイズ
その、値は、表示間隔
その、可視は、オフ。
(0,0)へ、移動。
一時セルを、イメージとして、作成。
その、サイズは、掲示板のサイズ。
'----------------------------------------------------------------
＊実行手順指定
母艦=「作成中」
パラパラ表示。
一時セルの、可視は、オフ。
板アニメの、可視は、オン。
母艦=表示内容#0
待機。
'----------------------------------------------------------------
＊パラパラ表示
板アニメの、画像は、「」'アニメ初期化
表示内容を、反復(
文章へ、入れる。
文章を、10バイトで、行揃えして、文章へ、入れる。
'クリア
ペン色は、白色。塗り色は、白色。
一時セルの、(0,0)から、(WW,HH)へ、四角形描画。
3回、適当に線を引く
5回(
3回、適当に線を引く
一時セルを、10度、画像ボカシ
文字色は、RGB(乱数(255),乱数(255),255)
一時セルの、((乱数(5)+5),(乱数(5)+5))へ、文章と、文字描画。
板アニメの、追加画像は、「一時セル」
描画処理反映。
)
3回(
一時セルを、20度、明るさ補正。
板アニメの、追加画像は、「一時セル」
)
)。
戻る。
＊適当に線を引く
ペン色は、RGB((100+乱数(156)),255,255)
X1=乱数(WW); X2=乱数(WW)
Y1=乱数(HH); Y2=乱数(HH)
一時セルの、(X1,Y1)から、(X2,Y2)へ、円形描画。
X1=乱数(WW); X2=乱数(WW)
Y1=乱数(HH); Y2=乱数(HH)
一時セルの、(X1,Y1)から、(X2,Y2)へ、線描画。
戻る |
|
エヴ○風電光掲示板
/クジラ飛行机 (02/05/26(Sun) 11:19) [948]