## R, 60

    x=rbind(97:122-diag(26)*32,10)
    cat(intToUtf8(c(x,x[,25:1])))

This is based on ASCII codes that are transformed to characters.