VBScriptでズンドコキヨシ(ワンライナー)

  • 1
    Like
  • 0
    Comment
More than 1 year has passed since last update.

こちらもブログに書いていたものを転載することにしました。
ワンライナーと言っても、cscriptはファイルしか受け取ってくれませんけど。
それにワンライナーにしても標準出力に「WScript.echo」は長すぎる気がします。

z=array("ズン","ドコ"):k="":do:randomize:r=Int(2*Rnd):WScript.echo z(r):k=k&z(r):loop until right(k,10)="ズンズンズンズンドコ":WScript.echo "キ・ヨ・シ!"

ズンドコ

変数宣言の強制なんかしないようにしてるので短くできてますが、やらない方がいい気がします。