Definition & Code for Kuchela Day


Kuchela Day = First WED in Dhanu

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
go top

locate for lsun > 239 .and. lsun < 240 .and. ahargana > ah1 .and. ahargana < ah2

?lsun
?ah1
?ah2

store recno() to re
go re
?re

loca for day=”Wed” .and. recno() > re

store date to dt

?date

Daughter of Heaven, Swarga Nandini

Daughter of Heaven, Swarga Nandini

https://www.youtube.com/embed/6OiLOOfFSL4Video Song herehttps://www.youtube.com/watch?v=6OiLOOfFSL4

O Daughter of Heaven,Luxuriating in Dreams,

Beloved Deity Great,O Mighty Goddess of Wisdom !

Swarga Nandini, Swapna Viharini,

Ishta Devate Saraswate !

Thou exist as Swara in tongue,

As Nada in the strings of instruments musical,

Be the grand words of Poetry,

In the Pen and bless us !

Swaramay Naavil, Nadamay Tantriyil,

Padamay Thoovalil Vanaruluka Nee

Vaneemani, Varadayini

Swarga Nandini, Swapna Viharini,

Ishta Devate Saraswate !

Thou art the Raaga, Thou art the Taaala,

Bhava Sruti and Laya Thou art !

In this Mighty Art before whom even Time bows,

May I get the Laurel, by Thy Grace !

Raagavum Neeye, Taalavum Neeye.

Bhavavum Layavum Sruthiyum Neeye

Kalam Namikkum Keli Kalayil,

Kanikayam Njanam swara maniyenam

Vaneemani, Varadayini

Swarga Nandini, Swapna Viharini,

Ishta Devate Saraswate !

Code for computing Thrikkarthika, the New Festival of Lights !

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 lmoo > 26.66 .AND. lmoo < 40 .and. ahargana > ah1 .and. ahargana < ah2 .and. lsun> 210 .and. lsun< 240
display

store date to dt
?dt

Program shows 27/11/2023 as date for above.

Calculation of next New Moon !

A simple code will get us the date for the next New Moon, called in our language as Black Moon / Karutha Vavu

use long8
locate for abs(elongation) < 12 .and. recno() > 1340
?date

Date for next New Moon shown as 14/09/23

Code for calculating Narayaneeyam Day

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 > 237 .and. lsun < 238 .and. ahargana > ah1 .and. ahargana < ah2
store date to dt
store lsun to lx1
skip-1
store date to dt1

xd = lx1 -270

lx = xd*3600/149.58

?”Solstice at hours before IM “,lx, xd
?”Solstice at hrs “,lx,”on”, dt1

?dt

Code for calculating Meena Bharani

There is a 24 degree or 24 days difference between Tropical and Sidereal. IF you go by Sayana, add 24 degrees or days.

input” YEAR ” to myear

set cent on
set date brit

use ahas

loca for myear = year

store ahargana to ah1
skip
store ahargana to ah2

use long20

loca for ahargana > ah1 .and. ahargana < ah2 .and. lsun > 329 .and. lsun < 360 .and. lmoo > 13.3333 .and. lmoo < 26.666666
store date to dt

?dt

   

 

 

New Page 7

 

 

Code for computing Thiruvathira

input” YEAR ” to myear

set cent on
set date brit

use ahas

loca for myear = year

store ahargana to ah1
skip
store ahargana to ah2

use long20

loca for lmoo > 66.66 .and. lmoo < 80 .and. lsun > 240 .and. lsun < 270 .and. ahargana > ah1 .and. ahargana< ah2

store date to dt

?dt

display

Code for computing Tula Varsha, Tula Vishu

input” YEAR ” to myear

set cent on
set date brit

use ahas

loca for myear = year

store ahargana to ah1
skip
store ahargana to ah2

use long20

loca for ahargana > ah1 .and. ahargana< ah2 .and. lsun > 180 .and. lsun < 181
store date to string

display

?”Date”, string

store lsun to lx1

lq = 66.3333 – lx1

if lq > .7748
string= string+1
endif

?string

Code for calculating date for Thiruvathira Njattuvela

set cent on
set date brit

use ahas

loca for myear = year

store ahargana to ah1
skip
store ahargana to ah2

use long20

loca for ahargana > ah1 .and. ahargana< ah2 .and. lsun > 65.6666 .and. lsun < 80
store date to string

display

?”Date”, string

    More info at                         Facebook Axis Bank

 

 

https://ajiio.in/woslXgV