Wide Periodic Table by whio(tybalt89)

@t=($"x129 .$/)x22;$n+=/\d/?$_*8:map{substr$t[$x++%4+3*($n>>7)],$n%128,5,$_}$@='+---+',(map{sprintf'|%3s|',$_}++$c,$_),$@for'He15H LiBe12B C N O F NeNaMg12AlSiP S ClArK Ca7 ScTiV CrMnFeCoNiCuZnGaGeAsSeBrKrRbSr7 Y ZrNbMoTcRuRhPdAgCdInSnSbTeI XeCsBaLaCePrNdPmSmEuGdTbDyHoErTmYbLuHfTaW ReOsIrPtAuHgTlPbBiPoAtRnFrRaAcThPaU NpPu amCmBkCfEsFmMdNoLrRfDbSgBhHsMtDsRgCnUutUuqUupUuhUusUuo'=~/..[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