Rumus Excell : Pasaran hari ini ?????

=TEXT(TODAY();"DDDD") &" "& IF(DATEVALUE("1904/1/2")=1; IF(MOD(TODAY();5)=0;"Pahing"; IF(MOD(TODAY();5)=1;"Pon"; IF(MOD(TODAY();5)=2;"Wage"; IF(MOD(TODAY();5)=3;"Kliwon"; IF(MOD(TODAY();5)=4;"Manis";))))); IF(MOD(TODAY();5)=0;"Kliwon"; IF(MOD(TODAY();5)=1;"Manis"; IF(MOD(TODAY();5)=2;"Pahing"; IF(MOD(TODAY();5)=3;"Pon";IF(MOD(TODAY();5)=4;"Wage";))))))