Wide Periodic Table by tails (whio(tybalt89) nobin)

@t=($"x129 .$/)x22;s/Q/Uu/,$n+=8*lc||map{substr$t[$x++%4+3*($n>>7)],$n%128,5,$_}$@='+---+',(map{sprintf'|%3s|',$_}++$c,$_|'@ '),$@for He15HLiBe12BCNOFNeNaMg12AlSiPSClArKCa7ScTiVCrMnFeCoNiCuZnGaGeAsSeBrKrRbSr7YZrNbMoTcRuRhPdAgCdInSnSbTeIXeCsBaLaCePrNdPmSmEuGdTbDyHoErTmYbLuHfTaWReOsIrPtAuHgTlPbBiPoAtRnFrRaAcThPaUNpPuamCmBkCfEsFmMdNoLrRfDbSgBhHsMtDsRgCnQtQqQpQhQsQo=~/.[^A-Z]?/g;print@t

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

download

return to the top page