edlin by nn

s=/N/?"Nice&*To#*Meet%4:*You%5@*1%1:*Nice%1:*Rice\n*3#*Meet#*Meat\n*l%1: Rice& To#*Meat%4: You":/4/?"1&*2#*4%4:*5%5@*3i#*3%4@*1d\n*l%1:*2& 3# 4%4: 5":/v/?"skjg;sdrljagjk&*!#*'%4@*1Sf& !\n*2Sf&*!\n*3Sf# '\n*1?Sf& !\nO.K.? n#*'\nO.K.? n\nNot found":_,$0="New file\n*i%1:*"s"\n*q\nAbort edit (Y/N)? y"{for(split("@0:*^Z\n0!0jfaiowperjvkaj0'0fawpfjkgf;ap;g0#0%3:0&0%2:0%0\n       ",a,0);i++<12;)gsub(a[i],a[++i])}$9

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top