ARexxでWorkbenchを制御（Ram Diskをカスタマイズ） (2002.09.01)

---

一時的に利用するデータをRam Diskに保存してから、
アイコン「Ram Disk」をダブルクリックして開けても
フォルダの設定がないので、
一時ファイルがアイコンで表示されない場合があります。
そんなとき、毎度、フォルダの設定を変更していたのが常でした。

これでは面倒なので、
Amigaが起動した際にRam Diskの設定を変更する
ARexxスクリプトRWSAf.rexxを用意しました。
(RWSAf = Ram disk Windows Show All files)

ここから

---

/*
    $VER: drawer 'Ram Disk' change show all files. 1.0, 2002/08/19

    Ram Disk: Window Show All files
*/

OPTIONS RESULTS

ADDRESS workbench

'WINDOW "Ram Disk:" OPEN'

'MENU WINDOW "Ram Disk:" INVOKE WINDOW.SHOW.ALLFILES'

'WINDOW "Ram Disk:" CLOSE'

---

ここまで

Workbench起動後に実行するように
アイコンだけのSYS:WBStartup/RWSAfを作成し、次のように設定しました。

Type: Project
Default Tool: （RWSAf.rexxのフルパス）
Stacksize: 8192
Priority: 0
Start from: Shell
Prompt for input: (none)
Start priority: 0
Wait until finished: (none)

これで、

1. Workbench起動後に
2. RWSAfが起動され
3. RWSAf.rexxが起動され
4. フォルダ「Ram Disk:」が開かれ
5. メニュー「Window | Show | All files」が選択され
6. フォルダ「Ram Disk:」が閉じられます。

という動作になります。