Code for computing Nathonnatha Bala

SET DATE BRIT

******NATHONNATHA BALA*****************

D4 = (mmt/60) * 15

IF D4 > 180
   d4 = 360 - d4
endif   

diva = d4/3
RATRI = 60-diva

USE SHAD
ZAP

USE SHAD
APPEND BLANK
REPL PLANET WITH "NATHONNATHA BALA"
REPL SUN WITH diva
repl jup with diva
repl ven with diva
repl mars with ratri
repl moon with ratri
repl sat with ratri
repl merc with 60   

Leave a Reply

Your email address will not be published. Required fields are marked *