Code for Ashtami Rohini

input “year ” to myear

set cent on
set date brit

use ahasx

loca for myear = year
store ahargana to ah1
skip
store ahargana to ah2

use long20

store lmoo to lmo
store lsun to lsu

lux=lmo -lsu

loca for ld >712 .and. ld< 812 .and. lmoo >40 .and. lmoo < 53.33 .and. lsun > 120 .and. lsun <150 .and. ahargana > ah1 .and. ahargana < ah2

store date to dt
display

?” ASH ROH”, dt

if found()

use holix
appe blank
repl holyday with “Ashtami Rohini”
repl date with dt
repl definition with ” Eighth LUNATION in LEO”
repl mathematic with ” Moon in 4th constellation”

endif

India’s Day

Millions of Indians go into ecstasy, as it is India’s Day at the Asia Cup Final, as SL buckles before Indian fast bowling !

Free Code for Durga Ashtami

DA = 8th Lunation after Black Moon in Kanya

input” YEAR ” to myear

set cent on
set date brit

use ahasx

loca for myear = year
store ahargana to ah1
skip
store ahargana to ah2

use long20

loca for lsun > 150 .and. lsun < 180 .and. ahargana > ah1 .and. ahargana < ah2

store recno() to rn

loca for recno()> rn .and. thidhi =”AMAVAS” .and. ahargana > ah1 .and. ahargana < ah2
?” DATE AMAVASI”,DATE
STORE DATE TO DATE0

LOCA FOR thidhi= “ASHTAMI” .AND. DATE > DATE0
store date to dt
display

if found()

use holix
appe blank
repl holyday with “DURGA ASHTAMI”
repl date with dt
repl definition with “Eighth Lunation”
repl mathematic with “Moon 84~96 in Sharad Ritu”



endif

?dt

Code for Chaitra Pournami, Full Moon

input ” year ” to myear

set cent on
set date brit

use ahasx

loca for myear = year
store ahargana to ah1
skip
store ahargana to ah2

use long20

loca for lsun > 330 .and. lsun < 360 .and. ahargana > ah1 .and. ahargana < ah2
store recno() to rn

loca for recno() >rn .and.thidhi = “AMAVAS”

store recno() to rX

loca for recno() >rx .and.thidhi = “POURNAMI”

display
store date to dt

if found()

use holi
appe blank
repl holyday with “Chithra Pournami”
repl date with dt

endif

Daily Astro Forecast

Daily Astro Forecast at https://www.eastrovedica.com/html/daily.htm

Edit

Like

Comment

Share

Code for the Sacred Vaishakha

input” YEAR ” to myear

set cent on
set date brit

use ahasx

loca for myear = year
store ahargana to ah1
skip
store ahargana to ah2

use long20

use long20
loca for lsun > 0 .and. lsun < 1 .and. ahargana > ah1 .and. ahargana < ah2

store recno() to rn

loca for thidhi=”AMAVAS” .and. recno() > rn

display
store date to dt

if found()

use holix
appe blank
repl holyday with “Vaisakha Lunar Month”
repl definition with “Second Lunar Month”
repl mathematic with ” From Lunisolar 0″
repl date with dt

endif
?dt

Code for the controversial Ganesh Chaturthi G C =…

input” YEAR ” to myear

set cent on
set date brit

use ahasx

loca for myear = year
store ahargana to ah1
skip
store ahargana to ah2

use chandra2

LOCA FOR MONTH= “BHADRA”
STORE RECNO() TO RE
?date

use long20
go re

LOCATE FOR lsun >120 .and. lsun < 150 .and. LD > 36 .and. ld < 48 .and. ahargana > ah1 .and. ahargana < ah2

?dATE

input” YEAR ” to myear

set cent on
set date brit

use ahasx

loca for myear = year
store ahargana to ah1
skip
store ahargana to ah2

use chandra2

LOCA FOR MONTH= “BHADRA”
STORE RECNO() TO RE
?date

use long20
go re

LOCATE FOR lsun >120 .and. lsun < 150 .and. LD > 36 .and. ld < 48 .and. ahargana > ah1 .and. ahargana < ah2

?dATE input” YEAR ” to myear set cent on set date brit use ahasx loca for myear = year store ahargana to ah1 skip store ahargana to ah2 use chandra2 LOCA FOR MONTH= “BHADRA” STORE RECNO() TO RE ?date use long20 go re LOCATE FOR lsun >120 .and. lsun < 150 .and. LD > 36 .and. ld < 48 .and. ahargana > ah1 .and. ahargana < ah2 ?dATE

input” YEAR ” to myear

set cent on
set date brit

use ahasx

loca for myear = year
store ahargana to ah1
skip
store ahargana to ah2

use chandra2

LOCA FOR MONTH= “BHADRA”
STORE RECNO() TO RE
?date

use long20
go re

LOCATE FOR lsun >120 .and. lsun < 150 .and. LD > 36 .and. ld < 48 .and. ahargana > ah1 .and. ahargana < ah2

?dATE

Code for Xmas

input” YEAR ” to myear

set cent on
set date brit

use ahasx

loca for myear = year
store ahargana to ah1
skip
store ahargana to ah2

use long20

loca for lsun > 249 .and. lsun < 250 .and. ahargana > ah1 .and. ahargana < ah2
store date to dt
display

store date to dt
store lsun to lx1

skip-1
display

store lsun to lx3
store date to dt1

lx =lx3-249
hx= lx*3600/149.58

?”Mins from Solstice”,hx
?”Longitudinal diff from S Point”,lx

if abs(lx) > .2205
dtx =dt1
else
dtx =dt
endif

?dtx

if found()

use holi
appe blank
repl holyday with “Mithra Jayanti”
repl date with dtx

endif

Bharath means Wisdom & Love

Why are the pseudosecularists & co rattled by India being renamed as Bharat?

Bha means that which illumines all sciences

Rathi means Love for all mankind

Tha means overcoming difficulties,

Such a land is Bharat clled !

Untitled