#69 Article 482 Posted at 1994/10/18 07:05:40 by 桑野誼智 (MAP2509) [MACRO.WT]

Subject: Re: 修正: WTERM 9.00用 Full auto macro Ver.0.49k /481

ううっ、ゴロゴロ忍者にボコボコにされてしまった(;_;)。
 豚に反撃食らったし(T_T)。

 あ、なんかキャンセルについて急に思い出しました(^^;)。

|case("\fキャンセルされたアーティクルにはフォローできません。")
|    stimeout(0)
|    call(c_fol)

 …の3行を script3: の switch~end の中に入れて、

|#########
|# c_fol #
|#########
|#フォローアーティクルがキャンセルされていたときの処理
|#a$をエラーファイルに出力
|#b$破壊
|c_fol:
|    bell(100,2,10)
|    b$=u$
|    cat(b$,"MACROERR")
|    cat(b$,e$)
|    iffiley(b$)
|        wappend(b$)
|    iffilen(b$)
|        wopen(b$)
|    b$=h$
|    cat(b$," Follow不能。 Command: ")
|    cat(b$,a$)
|    write(b$)
|    wclose
|    c_fol2:
|    rread(a$,c_fol3)
|    jumpe(a$,".",c_fol3)
|    jumpe(a$,"./",c_fol3)
|    goto(c_fol2)
|    c_fol3:
|    return

 …の様なサブルーチンを適当な所(最後とか)に入れておくと本文
タレ流しが防げて良いかもしれません…ってコマンド数残ってたかな?(^^;)

 batchコマンドでフォローする人には必要無いでしょう。

                    桑野誼智♪