Rama Navami = Chaitra Shukla Navami. The Ninth Lunation in the Bright Fortnight in the lunar month, Chaitra.
input” YEAR ” to myear
set date brit
use ahasx
loca for myear = year
store ahargana to ah1
skip
store ahargana to ah2
?ah1
?ah2
use long20
loca for lsun > 330 .and. lsun < 359 .and. ahargana > ah1 .and. ahargana < ah2
store recno() to re
loca for recno() > re .and. thidhi = “NAVAMI”
store date to string
?dtoc(date)