Below is form:

PLANETS=: 0 : 0
pc planets;
xywh 6 7 50 10;cc ccstatic static;cn "Place:";
xywh 61 4 51 11;cc placef edit;
xywh 5 19 51 10;cc ccstatic static;cn "Date (y m d):";
xywh 61 18 50 11;cc datef edit;
xywh 5 32 50 10;cc ccstatic static;cn "Lat(+ve N) deg dec";
xywh 61 30 50 11;cc latf edit;
xywh 4 44 50 11;cc ccstatic static;cn "Long(+ve E) deg dec";
xywh 61 41 50 12;cc longf edit;
xywh 4 56 74 12;cc ccstatic static;cn "(0=GMT/BST,1=IST)";
xywh 60 53 51 12;cc istf edit;
xywh 5 119 50 66;cc editm editm;
xywh 5 184 50 10;cc dccstatic static;cn "Planet Nos (vec)";
xywh 63 182 50 11;cc plvecf edit;
xywh 7 80 60 11;cc Mm static;cn "M'm";
xywh 8 90 42 11;cc Dublin static;cn "Dublin";
xywh 60 69 16 11;cc lat static;cn "lat";
xywh 79 69 21 11;cc long static;cn "long";
xywh 79 80 39 11;cc longMm static;cn "80.22";
xywh 54 90 60 11;cc latD static;cn "53.43";
xywh 80 89 60 11;cc longD static;cn "_6.36";
xywh 54 80 24 11;cc latMm static;cn "12.6";
xywh 5 203 94 40;cc editm2 editm;
xywh 3 246 53 11;cc lct static;cn "Local Civil Time:";
xywh 62 245 17 12;cc lcthrsf edit;
xywh 83 245 17 12;cc lctminf edit;
xywh 37 260 48 12;cc process button;cn "Process";
pas 6 6;
rem form end;
)
editm2 is a table of sunrise and sunset.
It requires date, latritude,longitude, ist.

-Adam

The result of the form is a table with sunrise,sunset,
altitude.azimuth,magnitude of planets selected, displayed on the
(ijx)screen.
Why need sunrise sunset on form? To put in a useful local Civil Time.
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to