No.1 ログファイル作成 Liners 

// メモ帳を開いてLogfile.txtに日付と時間を記録して閉じる。 One-Liners(一行野郎)の真髄?

Fid=Exec("notepad.exe LogFile.txt");SendSTR(Fid,"ログを作成しました。");SCKEY(Fid,VK_F5,VK_ENTER,VK_ALT,F,S,F,X)

// トリビア&トリッキー:あらかじめLogFile.txtを作成せずに実行すると??

 

No.2 タイマー録画(スタンバイモードへ移行) Liners 

//  WinDVR録画が終了してもスタンバイモードへ移行できないので自作。

//  もっといろいろ追加できるけど、コレで十分。愛用の一本です。

// ウィンドウ消失待ちなんか何の役に立つの?って思ってたキミ、これですよコレ!

 

while 1

    fukidasi("VTR 監視中")

    sleep(120) // 開始時間待ち(2分)

 

                while GETID("InterVideo WinDVR")>0

                       sleep(10)

                wend

 

            fukidasi("スタンバイ 準備中")

           sleep(30)

            if GETID("InterVideo WinDVR")<0 then POFF(P_SUSPEND2)

 

wend

 

No.3 掲示板用の特殊文字変換(クリップボード内で変換)

              //

//  掲示板用の特殊文字変換(クリップボード内で変換)

//  (大変便利!!投稿者に必須の一本。)

//

 

wks=GetStr(0)                          //クリップボードより文字列取得

wks=CHGMOJ(wks, "<", "&lt;") 

wks=CHGMOJ(wks, ">", "&gt;") 

wks=CHGMOJ(wks, "  ", " ")        //半角2文字空白を全角1文字の空白へ

SendStr(0,wks)                 //クリップボードに返却

 

// なお、<#DBL>など特殊文字は変換前に、空白などを入れて、( 例: <#  DBL> )

// 貼付け後削除してください。

 

No.4 クリップボードへ複数行転送 (いずれも質問内容から抜粋)

 

 

// クリップボードへ複数行転送

// GETDIR()は、1回で全ファイル名を取得します。

// しかし、クリップボードへは1度に1個しか内容を送れません。(2回目以降は上書きとなる。)
// そこでファイル名を改行付で連結し、後で一気にクリップボードへ送ります。

// スクリプトを手直しすると下記のようになります。


リスト=""

for i=0 to GETDIR(フォルダ,"*.*")-1
   print GETDIR_FILES[i]
   リスト=リスト+GETDIR_FILES[i]+"<#CR>"  
next

SendStr(0,リスト,0)    

 

// サンプルに追加しての応用例

// a.txt(ファイル)の内容が下記のように1行目タイトル、2行目以降を本文と仮定すると

// 1行目 題名カキカキ
// 2行目 本文もカキカキ
// 3行目 もう終わり残念。

// スクリプトはこんな感じでしょうか。

// サンプルにファイルから題名+ついでに本文も(複数行入力)

fp = FOPEN("a.txt", F_READ)
行数=FGET(fp, -1)
題名=FGET(fp, 1)
本文=""
Count=2                   // 2行目から本文      
While Count<=行数
  本文=本文+FGET(fp,Count)+"<#CR>"     // 本文内容を連結
  Count=Count+1
Wend
IE.document.all["subject"].value = 題名
IE.document.all["me"].value   = 本文