WPF | 宇宙仮面の研究室

Visual Studio でアイコンが編集できない！？

Visual Studio 2019 Community で、Icon を編集しようとしたら、編集用のボタンがグレーアウトされていて、編集できない！？

と思ったら、32ビット画像が編集できないのは、by Design （仕様）だそうです。Visual Studio のIcon エディタを使用するには、8ビットカラーであれば、次の通り。

WPFでメニューが左に表示される問題

ある日、突然WPFのメニュが左側に出るようになりました。

解決策は、次にあるように　 HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows の　MenuDropAlignmentを0に変更し、再ログインすることで解決しました。どこで書き換わってしまったかは謎です。

Why Menu Items Box is aligned at left when created in XAML & WPF [duplicate]

WebBrowser で、innterTextやリンクを取得する方法

環境： Visual Studio 2010 / WPF

インターネット上のHTMLより、リンクや文書を取得するには、単にWebClient でHTMLを取って来て、処理すればいいのですが・・・

とある理由でHTMLをブラウズしながら、ドキュメントに含まれるリンクなどを取得する必要があったので、WebBrowser を使って作ってみました。

WebBrowser は、裏側で mshtml の COMで実装されているので、ちょっと使い方が面倒だったのでメモしておきます。

参照の追加より、COM のmshtml.tlb を追加する。

WebBrowserに対して、Navigate でブラウズする。

Navigated イベントだと、document を完全に取得する前に、Navigated イベントが発生してしまう。

そこで、Document が完全にロードを完了したイベントとして、LoadCompleted を使用する。

例１：　innterTextを取得する場合

        <span class="kwrd">private</span> <span class="kwrd">void</span> Window_Loaded(<span class="kwrd">object</span> sender, RoutedEventArgs e)
        {
            <span class="kwrd">this</span>.webBrowser1.LoadCompleted += <span class="kwrd">new</span> System.Windows.Navigation.LoadCompletedEventHandler(webBrowser1_LoadCompleted);
        }

        <span class="kwrd">void</span> webBrowser1_LoadCompleted(<span class="kwrd">object</span> sender, System.Windows.Navigation.NavigationEventArgs e)
        {
            <span class="kwrd">if</span> (webBrowser1.Document == <span class="kwrd">null</span>)
                <span class="kwrd">return</span>;

            mshtml.IHTMLDocument2 doc2 = (IHTMLDocument2)webBrowser1.Document;

            <span class="kwrd">this</span>.textBox2.Text = doc2.body.innerText;
        }

        <span class="kwrd">private</span> <span class="kwrd">void</span> button1_Click(<span class="kwrd">object</span> sender, RoutedEventArgs e)
        {
            <span class="kwrd">string</span> url = <span class="kwrd">this</span>.textBox1.Text;
            <span class="kwrd">this</span>.webBrowser1.Navigate(url);
        }

private void Window_Loaded(object sender, RoutedEventArgs e)

{

this.webBrowser1.LoadCompleted += new System.Windows.Navigation.LoadCompletedEventHandler(webBrowser1_LoadCompleted);

}

void webBrowser1_LoadCompleted(object sender, System.Windows.Navigation.NavigationEventArgs e)

{

if (webBrowser1.Document == null)

return;

mshtml.IHTMLDocument2 doc2 = (IHTMLDocument2)webBrowser1.Document;

this.textBox2.Text = doc2.body.innerText;

}

private void button1_Click(object sender, RoutedEventArgs e)

{

string url = this.textBox1.Text;

this.webBrowser1.Navigate(url);

}

例２：　リンクの HTML をリストする場合

        <span class="kwrd">void</span> webBrowser1_LoadCompleted(<span class="kwrd">object</span> sender, System.Windows.Navigation.NavigationEventArgs e)
        {
            <span class="kwrd">if</span> (webBrowser1.Document == <span class="kwrd">null</span>)
                <span class="kwrd">return</span>;

            mshtml.IHTMLDocument2 doc2 = (IHTMLDocument2)webBrowser1.Document;

            <span class="kwrd">foreach</span> (mshtml.IHTMLElement elem <span class="kwrd">in</span> doc2.links)
            {
                <span class="kwrd">this</span>.textBox2.Text += ((mshtml.IHTMLAnchorElement)elem).href + Environment.NewLine;
            }
        }

void webBrowser1_LoadCompleted(object sender, System.Windows.Navigation.NavigationEventArgs e)

{

if (webBrowser1.Document == null)

return;

mshtml.IHTMLDocument2 doc2 = (IHTMLDocument2)webBrowser1.Document;

foreach (mshtml.IHTMLElement elem in doc2.links)

{

this.textBox2.Text += ((mshtml.IHTMLAnchorElement)elem).href + Environment.NewLine;

}

実際の実行結果はこんな感じ。

スレートPC上でのマルチタッチ開発メモその１

ONKYOのスレートPCを入手した。

http://www.jp.onkyo.com/pc/personalmobile/

さっそく、マルチタッチアプリケーションを作ってみる。

まずは、スレートPC上では開発できないというか、とてもやりにくいので、メインPC上で開発して、スレートPC上で動作させる形。リモートデバッグはできないので、ちょっと厄介かも。

ちょっとイベントがどのように取れているのか確認するプログラムをWPFで作ってみる。

.NET Framework 4.0　がないと動かないので、.NET Framework 4.0をインストール。

TouchEnter, TouchMove, TouchLeave, TouchUp関連は、

private void image1_TouchMove(object sender, TouchEventArgs e)
{
this.textBoxTouchType.Text = “TouchMove”;

ShowTouchParams(e);
}

private void ShowTouchParams(TouchEventArgs e)
{
this.textBoxID.Text = “Touch ID = ” + e.TouchDevice.Id;

TouchPoint tp = e.GetTouchPoint(this);

    this.textBoxPointX.Text = tp.Position.X.ToString();
    this.textBoxPointY.Text = tp.Position.Y.ToString();
    this.textBoxWidth.Text = tp.Size.Width.ToString(); // 値取れず
    this.textBoxHeight.Text = tp.Size.Height.ToString();　// 値取れず

    this.textBoxBoundsX.Text = tp.Bounds.X.ToString();
    this.textBoxBoundsY.Text = tp.Bounds.Y.ToString();
    this.textBoxBoundsW.Text = tp.Bounds.Width.ToString(); // 値取れず
    this.textBoxBoundsH.Text = tp.Bounds.Height.ToString(); // 値取れず
}

Manipulation系は、

IsManipulationEnabled を trueにセットして、
private void checkBoxManipulationEnabled_Click(object sender, RoutedEventArgs e)
{
this.image1.IsManipulationEnabled = (bool)checkBoxManipulationEnabled.IsChecked;
this.textBoxManipulation.Text = this.image1.IsManipulationEnabled.ToString();
}

private void image1_ManipulationDelta(object sender, ManipulationDeltaEventArgs e)
{
    this.textBoxManipulation.Text = “ManipulationDelta”;
    this.textBoxRotationDelta.Text = e.DeltaManipulation.Rotation.ToString();
    this.textBoxManipulationOrigX.Text = e.ManipulationOrigin.X.ToString();
    this.textBoxManipulationOrigY.Text = e.ManipulationOrigin.Y.ToString();
    this.textBoxRotation.Text = e.CumulativeManipulation.Rotation.ToString();
    this.textBoxManTransX.Text = e.CumulativeManipulation.Translation.X.ToString();
    this.textBoxManTransY.Text = e.CumulativeManipulation.Translation.Y.ToString();

    if (e.DeltaManipulation.Rotation != 0)
    {
        Matrix mat = this.image1.RenderTransform.Value;
        mat.RotateAt(e.DeltaManipulation.Rotation, e.ManipulationOrigin.X, e.ManipulationOrigin.Y);
        this.image1.RenderTransform = new MatrixTransform(mat);
    }
    else
    {
        Matrix mat = this.image1.RenderTransform.Value;
        mat.Translate(e.CumulativeManipulation.Translation.X, e.CumulativeManipulation.Translation.Y);
        this.image1.RenderTransform = new MatrixTransform(mat);
    }
}

イナーシャーは、

private void checkBoxInertier_Click(object sender, RoutedEventArgs e)
{
if(checkBoxInertier.IsChecked == true)
Manipulation.StartInertia(this.image1);
}

private void image1_ManipulationInertiaStarting(object sender, ManipulationInertiaStartingEventArgs e)
{
    this.textBoxManipulation.Text = “ManipulationInertiaStarting”;
    this.textBoxManipulationOrigX.Text = e.ManipulationOrigin.X.ToString();
    this.textBoxManipulationOrigY.Text = e.ManipulationOrigin.Y.ToString();

e.TranslationBehavior.DesiredDeceleration = 0.001;
e.RotationBehavior.DesiredDeceleration = 0.001;
}

これで、Delta, Cumulative が取れた。イベントをモニタリングのためにTextBoxに書き出していたら、かなりもっさりした感じになってしまった。

リモートデバッグできないのは、やっかいだな。

移動・ローテーションは、もう少しまともなコードの気がするが、とりあえず機能の説明を忘れないうちにっと。あとでスクリーンショットをもらおう・・・

WPF Morphing Video

As my WPF Morphing Video got expired in the soapbox service, I’m uploading the video again to the youtube.

[youtube=http://www.youtube.com/watch?v=COCXpxDUjkU&hl=en]

The coding memo is here.

http://uchukamen.spaces.live.com/blog/cns!7CB203A44BF94940!613.entry?sa=169211054

WPF Shooting Star

[youtube=http://www.youtube.com/watch?v=0l7xTEgUT54&hl=en]

This is something like shooting star implemented by WPF/C#. Here is the code. It’s messy, but it is just for my coding memo.

        private void button1_Click(object sender, RoutedEventArgs e)
        {
            int size = 2;

            Storyboard sb = (Storyboard)this.Resources["OnClick2"];
            SBMoveCanvas(sb, "canvas1");
            SBLength(sb, "r");

for (int i = 0; i < 200; i++)
 {
 string name = "r" + i.ToString();
 Rectangle r = new Rectangle();
 r.Fill = new SolidColorBrush(Colors.Magenta);
 r.Height = size;
 r.Width = size;

                ScaleTransform st = new ScaleTransform();
                SkewTransform skt = new SkewTransform();
                RotateTransform rt = new RotateTransform();
                TranslateTransform tt = new TranslateTransform();
                TransformGroup tg = new TransformGroup();
                tg.Children.Add(st);
                tg.Children.Add(skt);
                tg.Children.Add(rt);
                tg.Children.Add(tt);

                r.RenderTransform = tg;
                this.RegisterName(name, r);
                Canvas.SetLeft(r, i * size);
                Canvas.SetTop(r, 30);
                SBDissolve(sb, name, i);
                canvas1.Children.Add(r);
            }
        }

System.Random rnd = new System.Random();

        private void SBDissolve(Storyboard sb, string name, int pos)
        {
            DoubleAnimationUsingKeyFrames daukfX = new DoubleAnimationUsingKeyFrames();

            daukfX.BeginTime = new TimeSpan(0, 0, 0);
            daukfX.Duration = new TimeSpan(0, 0, duration);
            daukfX.KeyFrames.Add(
                 new SplineDoubleKeyFrame(0, KeyTime.FromTimeSpan(new TimeSpan(0, 0, 0))));
            daukfX.KeyFrames.Add(
                new SplineDoubleKeyFrame(rnd.Next(6000, 8000), KeyTime.FromTimeSpan(new TimeSpan(0, 0, duration + (200-pos)))));

Storyboard.SetTargetName(daukfX, name);
Storyboard.SetTargetProperty(daukfX, new PropertyPath("(UIElement.RenderTransform).(TransformGroup.Children)[3].(TranslateTransform.X)"));

sb.Children.Add(daukfX);

DoubleAnimationUsingKeyFrames daukfY = new DoubleAnimationUsingKeyFrames();

            daukfY.BeginTime = new TimeSpan(0, 0, 0);
            daukfY.Duration = new TimeSpan(0, 0, duration);
            daukfY.KeyFrames.Add(
                 new SplineDoubleKeyFrame(0, KeyTime.FromTimeSpan(new TimeSpan(0, 0, 0))));
            daukfY.KeyFrames.Add(
                new SplineDoubleKeyFrame(rnd.Next(-500, 500), KeyTime.FromTimeSpan(new TimeSpan(0, 0, duration + (200-pos)))));

Storyboard.SetTargetName(daukfY, name);
Storyboard.SetTargetProperty(daukfY, new PropertyPath("(UIElement.RenderTransform).(TransformGroup.Children)[3].(TranslateTransform.Y)"));

sb.Children.Add(daukfY);

DoubleAnimationUsingKeyFrames daukfOp = new DoubleAnimationUsingKeyFrames();

            daukfOp.BeginTime = new TimeSpan(0, 0, 0);
            daukfOp.Duration = new TimeSpan(0, 0, duration);
            daukfOp.KeyFrames.Add(
                 new SplineDoubleKeyFrame(1.0, KeyTime.FromTimeSpan(new TimeSpan(0, 0, 0))));
            daukfOp.KeyFrames.Add(
                new SplineDoubleKeyFrame(0.0, KeyTime.FromTimeSpan(new TimeSpan(0, 0, duration))));

Storyboard.SetTargetName(daukfOp, name);
Storyboard.SetTargetProperty(daukfOp, new PropertyPath("(UIElement.Opacity)"));

sb.Children.Add(daukfOp);
}

const int duration = 5;

        private void SBMoveCanvas(Storyboard sb, string name)
        {
            DoubleAnimationUsingKeyFrames daukfX = new DoubleAnimationUsingKeyFrames();

            daukfX.BeginTime = new TimeSpan(0, 0, 0);
            daukfX.Duration = new TimeSpan(0, 0, duration);
            daukfX.KeyFrames.Add(
                 new SplineDoubleKeyFrame(500, KeyTime.FromTimeSpan(new TimeSpan(0, 0, 0))));
            daukfX.KeyFrames.Add(
                new SplineDoubleKeyFrame(-500, KeyTime.FromTimeSpan(new TimeSpan(0, 0, duration))));

Storyboard.SetTargetName(daukfX, name);
Storyboard.SetTargetProperty(daukfX, new PropertyPath("(UIElement.RenderTransform).(TransformGroup.Children)[3].(TranslateTransform.X)"));

sb.Children.Add(daukfX);

DoubleAnimationUsingKeyFrames daukfY = new DoubleAnimationUsingKeyFrames();

            daukfY.BeginTime = new TimeSpan(0, 0, 0);
            daukfY.Duration = new TimeSpan(0, 0, duration);
            daukfY.KeyFrames.Add(
                 new SplineDoubleKeyFrame(30, KeyTime.FromTimeSpan(new TimeSpan(0, 0, 0))));
            daukfY.KeyFrames.Add(
                new SplineDoubleKeyFrame(30, KeyTime.FromTimeSpan(new TimeSpan(0, 0, duration))));

Storyboard.SetTargetName(daukfY, name);
Storyboard.SetTargetProperty(daukfY, new PropertyPath("(UIElement.RenderTransform).(TransformGroup.Children)[3].(TranslateTransform.Y)"));

sb.Children.Add(daukfY);
}

        private void SBLength(Storyboard sb, string name)
        {
            DoubleAnimationUsingKeyFrames daukfX = new DoubleAnimationUsingKeyFrames();

            daukfX.BeginTime = new TimeSpan(0, 0, 0);
            daukfX.Duration = new TimeSpan(0, 0, duration);
            daukfX.KeyFrames.Add(
                 new SplineDoubleKeyFrame(1, KeyTime.FromTimeSpan(new TimeSpan(0, 0, 0))));
            daukfX.KeyFrames.Add(
                new SplineDoubleKeyFrame(0, KeyTime.FromTimeSpan(new TimeSpan(0, 0, duration))));

Storyboard.SetTargetName(daukfX, name);
Storyboard.SetTargetProperty(daukfX, new PropertyPath("(UIElement.RenderTransform).(TransformGroup.Children)[0].(ScaleTransform.ScaleX)"));

            sb.Children.Add(daukfX);
        }
    }

GeometryModel3D を手書き

             //TriangleIndices="0 1 2 0 2 3 "
             //Positions="0 0 0, 1 0 0, 1 1 0, 0 1 0"
             //TextureCoordinates="0,1 1,1 1,0 0,0 "
             //Normals="0,0,1 0,0,1 0,0,1 0,0,1"

            MeshGeometry3D mg3d = new MeshGeometry3D();
            mg3d.Positions = new Point3DCollection { new Point3D(0, 0, 0), new Point3D(1, 0, 0), new Point3D(1, 1, 0), new Point3D(0, 1, 0) };
            mg3d.TriangleIndices = new Int32Collection { 0,1,2,0,2,3};
            mg3d.TextureCoordinates = new PointCollection{ new Point(0, 1), new Point(1, 1), new Point(1, 0), new Point(0, 0)};
            mg3d.Normals = new Vector3DCollection { new Vector3D(0, 0, 1), new Vector3D(0, 0, 1), new Vector3D(0, 0, 1), new Vector3D(0, 0, 1) };

GeometryModel3D gm3d = new GeometryModel3D();

MediaElement me = new MediaElement();
me.Source = new Uri(@"……….\Wildlife.wmv");

            TextBlock someText = new TextBlock();
            FontSizeConverter myFontSizeConverter = new FontSizeConverter();
            someText.FontSize = (double)myFontSizeConverter.ConvertFrom("30pt");
            someText.Text = "Hello, World!";

            VisualBrush vb = new VisualBrush();
            vb.Visual = someText;
または
            vb.Visual = me;

gm3d.Material = new DiffuseMaterial(vb);
gm3d.Geometry = mg3d;

this.BoxOR9.Children.Add(gm3d);

WPF 3D 上での画像とビデオの表示

イメージ部分を抜き出したもの

<GeometryModel3D.Material>
 <DiffuseMaterial>
 <DiffuseMaterial.Brush>
 <ImageBrush ImageSource="bobsled.jpg"></ImageBrush>
 </DiffuseMaterial.Brush>
 </DiffuseMaterial>
</GeometryModel3D.Material>
<GeometryModel3D.Geometry>
 <MeshGeometry3D
 TriangleIndices="0 1 2 0 2 3 "
 Positions="0 0 0, 1 0 0, 1 1 0, 0 1 0"
 TextureCoordinates="0,1 1,1 1,0 0,0 "
 Normals="0,0,1 0,0,1 0,0,1 0,0,1"
 />
</GeometryModel3D.Geometry>

ビデオ部分を抜き出したもの

<GeometryModel3D.Material>
 <DiffuseMaterial>
 <DiffuseMaterial.Brush>
 <VisualBrush>
 <VisualBrush.Visual>
 <MediaElement Source="wildlife.wmv" />
 </VisualBrush.Visual>
 </VisualBrush>
 </DiffuseMaterial.Brush>
 </DiffuseMaterial>
</GeometryModel3D.Material>
<GeometryModel3D.Geometry>
 <MeshGeometry3D
 TriangleIndices="0 1 2 0 2 3 "
 Positions="0 0 0, 1 0 0, 1 1 0, 0 1 0"
 TextureCoordinates="0,1 1,1 1,0 0,0 "
 Normals="0,0,1 0,0,1 0,0,1 0,0,1"
 />
</GeometryModel3D.Geometry>

WPF覚書

サンプルコード

WPF 調べ中のメモ

Creating 2-D and 3-D Dynamic Animations in Windows Presentation Foundation

http://msdn.microsoft.com/en-us/library/Aa480159

WPF を使ってコントロールと 3D の表面にビデオを追加する

http://msdn.microsoft.com/ja-jp/magazine/cc163455.aspx

TMScreensaver V0.6 をアップしました。

V0.5は、XP の場合設定ファイルが機能しないという問題点がありました。これは、8.3ファイル名の制限によるものでした。

修正版V0.6 をアップします。修正点は、ファイル名の変更(TMScreensaver.scr → TMScrs.scr、TMScreensaver.config→ TMScrs.config）です。

古いバージョンをお使いの方は、次の手順でアンインストールしてください。m_ _m

    1.解凍したフォルダーを削除
    2.レジストリの CurrentUser\Software\Uchukamen\TMScreensaver 以下を削除
    PCに格納されたデータは、これで完全に削除されます。

[1] 名称
	TMScreensaver（x86 32bit 版）
	
[2] 概要
	映画 Matrix のように Twitter のタイムラインを縦に流れるように表示するスクリーンセーバー

[3] バージョン
	0.6

[4]	ダウンロード
    http://cid-7cb203a44bf94940.skydrive.live.com/browse.aspx/TMScreensaver
    より、TMScrs.zip をダウンロードしてください。 

[5] 動作環境
	Windows XP, Windows Vista, Windows 7で動作を確認しました。<br />　　　　　.NET Framework 4.0 が必要です。次のURLから .NET Framework 4.0 をインストールしてください。
	http://www.microsoft.com/downloads/details.aspx?FamilyID=9cfb2d51-5ff4-4491-b0e5-b386f32c0992&amp;displaylang=ja
	グラフィックアクセラレータを搭載していること（CPUでの描画だと苦しいはず）

[6] インストール方法
	1.古いバージョンをインストールしている人は、古いフォルダーの削除を行ってください。
	  レジストリはエントリを上書きしますので、削除不要です。<br />         2.TMScrs.zip をダウンロードし、任意の場所（たとえばマイドキュメントフォルダーなど）で、解凍する。
	3.エクスプローラで、解凍したフォルダーを開き、TMScrs.scr を右クリックし、[インストール]を選択
	4.初めての場合は、TMScreensaver Configurationダイアログが表示されるので、次の情報を入力
		Username...twitter のユーザーアカウントを入力
		Password...twitter のパスワードを入力
	5.OKボタンを押すと、設定情報をレジストリに格納
	6.プレビューボタンを押し、プレビューで動作を確認
	
[7] アンインストール方法
	1.解凍したフォルダーを削除
	2.レジストリの CurrentUser\Software\Uchukamen\TMScreensaver 以下を削除
	PCに格納されたデータは、これで完全に削除されます	

[8] 注意制限
	1.最大タイムラインは200個
	2.通信エラー等発生した場合は、赤いメッセージを表示

[9] 各種設定
	TMScreensaver.config のXML Configurationファイルを修正する

	MaxTweets...タイムラインの同時表示数
	BackColor...背景色
	ForeColor...文字色
	FontSize...タイムラインのフォントサイズ
	Rotation...メッセージの方向(-90...上から下へ、0...左から右へ)
	ShowImage...プロファイルアイコンの表示(Visible)、非表示(Hide)

[10] バグ報告、要望など
	uchukamen宛に、#TMScreensaver タグでつぶやいてください。

[1] 名称

TMScreensaver（x86 32bit 版）

[2] 概要

映画 Matrix のように Twitter のタイムラインを縦に流れるように表示するスクリーンセーバー

[3] バージョン

0.6

[4] ダウンロード

http://cid-7cb203a44bf94940.skydrive.live.com/browse.aspx/TMScreensaver

より、TMScrs.zip をダウンロードしてください。

[5] 動作環境

Windows XP, Windows Vista, Windows 7で動作を確認しました。 　　　　　.NET Framework 4.0 が必要です。次のURLから .NET Framework 4.0 をインストールしてください。

http://www.microsoft.com/downloads/details.aspx?FamilyID=9cfb2d51-5ff4-4491-b0e5-b386f32c0992&displaylang=ja

グラフィックアクセラレータを搭載していること（CPUでの描画だと苦しいはず）

[6] インストール方法

1.古いバージョンをインストールしている人は、古いフォルダーの削除を行ってください。

レジストリはエントリを上書きしますので、削除不要です。 2.TMScrs.zip をダウンロードし、任意の場所（たとえばマイドキュメントフォルダーなど）で、解凍する。

3.エクスプローラで、解凍したフォルダーを開き、TMScrs.scr を右クリックし、[インストール]を選択

4.初めての場合は、TMScreensaver Configurationダイアログが表示されるので、次の情報を入力

Username...twitter のユーザーアカウントを入力

Password...twitter のパスワードを入力

5.OKボタンを押すと、設定情報をレジストリに格納

6.プレビューボタンを押し、プレビューで動作を確認

[7] アンインストール方法

1.解凍したフォルダーを削除

2.レジストリの CurrentUser\Software\Uchukamen\TMScreensaver 以下を削除

PCに格納されたデータは、これで完全に削除されます

[8] 注意制限

1.最大タイムラインは200個

2.通信エラー等発生した場合は、赤いメッセージを表示

[9] 各種設定

TMScreensaver.config のXML Configurationファイルを修正する

MaxTweets...タイムラインの同時表示数

BackColor...背景色

ForeColor...文字色

FontSize...タイムラインのフォントサイズ

Rotation...メッセージの方向(-90...上から下へ、0...左から右へ)

ShowImage...プロファイルアイコンの表示(Visible)、非表示(Hide)

[10] バグ報告、要望など

uchukamen宛に、#TMScreensaver タグでつぶやいてください。