ズンドコキヨシ

ズンドコキヨシまとめ - Qiita

まずズンドコ生成。rは -v r=$RANDOMでシード値を与える。

# zundoko.awk
BEGIN{
        srand(r)
         while(1) print (rand()>0.2)?"ズン":"ドコ"
}

キヨシ判定。

# kiyoshi.awk
/ズン/ { z++ }
/ドコ/ && z==4 {
        print "キ・ヨ・シ！";
        exit;
}
/ドコ/ { z=0 }

このようにして実行。
gawk -v r=$RANDOM -f zundoko.awk | gawk -f kiyoshi.awk

ついでにドリフのズンドコ節を判定。

/ズン/ { z++ }
/ドコ/ && z==6 && d==1 {
        print "ドリフのズンドコ節";
        exit;
}
/ドコ/ && z==6 { d++; z=0; next }
/ドコ/ { d=0;z=0 }