kera= mdate+3102 B C E
use long20
locate for date = date()
store lsun to ls
if ls < 255
kera = kera
else
kera = kera -1
endif
HIndu Astrology Consultancy Research & Software 9388556053
Science of the Albsolute and other Liberating Arts & Sciences Eighteen