キービジュアルを提出したら、次は返事待ち。この時間がたまりません。いい気分じゃないです。「いーの?悪いの?、、、どないですのん!」って感じの。

さて、待ち時間は壊れたサーバを修理しつつ、またまた壁紙。今日は20/100点ぐらい、、、そんなに毎日気に入ったのものが出来るわけぢゃないです。

プロなのに、、、

陶芸家ならここで自分の作品を割ってる所ですが、デジタルデータはカケラも残らないのが情緒がなくてつまりません。

でかサイズ→twisted.jpg
いまいちなときはタイトルも思い浮かばないんですよねぇ。

「Net」て文字が中央に来てるのは偶然です。

側面ばかり&ボケてるので見えないですが、テキストをいっぱい配置しているのは以下のスクリプト。ホントは2000ワードぐらいあったのですが、VRayが落ちました。密度も考えて300ワードにしてます。

maxscriptです。スクリプトファイルと同ディレクトリにあるinput.txtと言う名のファイルからテキストを取り出します。単語毎に改行を入れておいて下さい。

-- textScatter.ms
-- Word cloud generator, creating extruded textShapes from text file.
-- Auther: hTaka.
fn gaussian = (
  m = 0.5;
  sigma = 0.1;
  
  while true do (
    r = random 0.0 1;
    if 1.0/sqrt(2*2*pi*sigma)*exp(-(r-m)*(r-m)/2.0/sigma/sigma) >= (random 0.0 1) do exit;
  )
  
  return r-0.5;
)
-- Open text file by read only
fp = openFile ("input.txt") mode:"r";
--
spreadx = 1000;
spready = 250;
spreadz = 250;
-- Create textshape line by line.
while (not eof fp) do
(
 myShape = text font:"Arial" text:(readLine fp) size:5; -- change font, size setting as you like!

 move myShape [gaussian()*spreadx, gaussian()*spready, gaussian()*spreadz];
 rot_obj = eulerangles (random -30.0 30.0) (random -30.0 30.0) (random -30.0 30.0)
 addModifier myShape (Extrude amount:2.5);
 rotate myShape rot_obj
)

--Close fileStream
close fp;