デスマコロシアム2のawk解

deathmatch2.awk

BEGIN{s="あアぃィいイぅゥうウぇェえエぉォおオかカがガきキぎギくクぐグけケげゲこコごゴさサざザしシじジすスずズせセ";for(i=0;i<26;f(i++));}function f(i){a=97+i;b=65+i;c=substr(s,2*i+1,1);d=substr(s,2*i+2,1);printf("%c%c%s%s%c%c",a,b,c d,d c,b,a)}
#
#（注）以下を1行にまとめただけ
#　　　変数のスコープは引数以外はグローバル変数なので、function f(i)から メインのsを参照している汚いコード。
#
#BEGIN{
# s="あアぃィいイぅゥうウぇェえエぉォおオかカがガきキぎギくクぐグけケげゲこコごゴさサざザしシじジすスずズせセ";
# for(i=0;i<26;f(i++));
#}
#
#function f(i){
#	a=97+i;
#	b=65+i;
#	c=substr(s,2*i+1,1);
#	d=substr(s,2*i+2,1);
#	printf("%c%c%s%s%c%c",a,b,c d,d c,b,a)
#}