Page.StartTimer( 10);
sPCdate = System.GetDate(DATE_FMT_ISO);
sPCdate2 = System.GetDate(DATE_FMT_DAY);
sPCdate3 = System.GetDate(DATE_FMT_MONTH);
sPCdate4 = System.GetDate(DATE_FMT_YEAR);
date=Input.SetText("Input1", sPCdate);
day=Input.SetText("Input2", sPCdate2 );
month=Input.SetText("Input3", sPCdate3);
year=Input.SetText("Input4", sPCdate4);

moh = System.GetTime(TIME_FMT_MIL);
Label.SetText("time",moh );

sPCdate = System.GetDate(DATE_FMT_ISO);
sPCdate2 = System.GetDate(DATE_FMT_DAY);
sPCdate3 = System.GetDate(DATE_FMT_MONTH);
sPCdate4 = System.GetDate(DATE_FMT_YEAR);
date=Input.SetText("Input1", sPCdate);
day=Input.SetText("Input2", sPCdate2 );
month=Input.SetText("Input3", sPCdate3);
year=Input.SetText("Input4", sPCdate4);
year =Input.GetText("Input4");
month =Input.GetText("Input3");
day =Input.GetText("Input2");
n = ((367*year)-(Math.Floor((7/4)*(year+Math.Floor((month+9)/12))))+Math.Floor(275*(month/9))+day-730531.5)
t=Input.SetText("Input5", n);
t =Input.GetText("Input5");
i =  Math.Mod(280.461+0.9856474*t,360);
a3 = Math.Round(i,2);
u = Input.SetText("Input6",a3);
s = Math.Mod (357.528+0.9856003*t,360);
a2 = Math.Round(s,2);
p = Input.SetText("Input7",a2);
u =Input.GetText("Input6");
p =Input.GetText("Input7");
v = u+1.915*Math.Sin(p*3.1415926535897932/180)+0.02*Math.Sin(2*p*3.1415926535897932/180)
a1 = Math.Round(v,2);
lom = Input.SetText("Input8",a1);
lom= Input.GetText("Input8");
w = Input.SetText("Input9",Math.Round(23.439-0.0000004*t,3));
w = Input.GetText("Input9");
q=Math.Atan(Math.Cos(w*3.1415926535897932/180)*Math.Tan(lom*3.1415926535897932/180))*180/3.1415926535897932
q = Input.SetText("Input10",q);
q = Input.GetText("Input10");
b = Input.SetText("Input11",q-(360*Math.Floor(q/360)));
b = Input.GetText("Input11");
tamer =b+ 90*(Math.Round(lom/90,0)-Math.Round(b/90,0))
tamer1 = Math.Round(tamer,2);
tamer1= Input.SetText("Input12",tamer1);
tamer1 = Input.GetText("Input12");
belkiss=Math.Mod(100.46 + 0.985647352 *t,360)
belkiss= Input.SetText("Input13",belkiss);
belkiss = Input.GetText("Input13");
g=Math.Asin(Math.Sin(w*3.1415926535897932/180)*Math.Sin(lom*3.1415926535897932/180))*180/3.1415926535897932
nad = Input.SetText("Input14",g);
nad = Input.GetText("Input14");
ss=Math.Mod(tamer1-belkiss,360)
yu =  Math.Abs(ss)
der = Input.SetText("Input15",yu);
der = Input.GetText("Input15");
tool = Input.GetText("Input17");
Input.SetText("Input16", der-tool);
sm =  Input.GetText("Input16");
alfarek =  Input.GetText("Input19");
Input.SetText("Input18",sm /15+alfarek);
 fh = Input.GetText("Input18");
ib1=  Math.Floor(fh)
ib3= fh-ib1
ib2=ib3*60/100
total= ib1+ib2
total= Math.Round( total, 2);
if String.Length(total)==5 then
total = String.Replace(total, ".", ":", false);
total =total..':00'
Input.SetText("Input20",total);
dohr = Input.GetText("Input20");
elseif String.Length(total)==4 then
total = String.Replace(total, ".", ":", false);
total =total..'0:00'
Input.SetText("Input20",total);
dohr = Input.GetText("Input20");
end
maz = Input.GetText("Input22");
ha=Math.Atan(1+Math.Tan((maz-nad)*3.1415926535897932/180))*180/3.1415926535897932
Input.SetText("Input21",ha);
rad = Input.GetText("Input21");
h2=Math.Atan(2+Math.Tan((maz-nad)*3.1415926535897932/180))*180/3.1415926535897932
Input.SetText("Input23",h2);
my = Input.GetText("Input23");
sup=Math.Acos((Math.Sin((90-rad)*3.1415926535897932/180)-Math.Sin(nad*3.1415926535897932/180)*Math.Sin(maz*3.1415926535897932/180))/(Math.Cos(nad*3.1415926535897932/180)*Math.Cos(maz*3.1415926535897932/180)))*180/3.1415926535897932/15
Input.SetText("Input24",sup);
ko1=Input.GetText("Input24");
rabrh=Math.Acos((Math.Sin((90-my)*3.1415926535897932/180)-Math.Sin(nad*3.1415926535897932/180)*Math.Sin(maz*3.1415926535897932/180))/(Math.Cos(nad*3.1415926535897932/180)*Math.Cos(maz*3.1415926535897932/180)))*180/3.1415926535897932/15
Input.SetText("Input25",rabrh);
srt = Input.GetText("Input25");
Input.SetText("Input26",fh+ko1);
fh2 = Input.GetText("Input26");
salah = Input.GetText("Input26");
sa=Math.Floor(salah)
sa2= salah-sa      
sa3=sa2*60/100   
total2= sa+sa3
total2= Math.Round( total2, 2);
if String.Length(total2)==5 then
total2 = String.Replace(total2, ".", ":", false);
total2 =total2..':00'
Input.SetText("Input27",total2);
elseif String.Length(total2)==4 then
total2 = String.Replace(total2, ".", ":", false);
total2 =total2..'0:00'
Input.SetText("Input27",total2);
end
Input.SetText("Input28",fh+srt);
dert = Input.GetText("Input28");
ma=Math.Floor(dert)
ma2= dert-ma      
ma3=ma2*60/100   
total3= ma+ma3
total3= Math.Round( total3, 2);
if String.Length(total3)==5 then
total3 = String.Replace(total3, ".", ":", false);
total3 =total3..':00'
Input.SetText("Input29",total3);
elseif String.Length(total3)==4 then
total3 = String.Replace(total3, ".", ":", false);
total3 =total3..'0:00'
Input.SetText("Input29",total3);
end
kho = Input.GetText("Input22");
bas=Math.Acos((Math.Sin(-0.8333*3.1415926535897932/180)-Math.Sin(nad*3.1415926535897932/180)*Math.Sin(kho*3.1415926535897932/180))/(Math.Cos(nad*3.1415926535897932/180)*Math.Cos(kho*3.1415926535897932/180)))*180/3.1415926535897932
Input.SetText("Input30",bas);
zg = Input.GetText("Input30");
-----
Input.SetText("Input31",fh -zg/15);
chourouk=Input.GetText("Input31");
va=Math.Floor(chourouk)
va2= chourouk-va     
va3=va2*60/100   
total4= va+va3
total4= Math.Round( total4, 2);
Input.SetText("Input32",total4);
Input.SetText("Input33",fh+zg/15);
magreb = Input.GetText("Input33");
ga=Math.Floor(magreb)
ga2= magreb-ga     
ga3=ga2*60/100   
total5= ga+ga3
total5= Math.Round( total5, 2);
if String.Length(total5)==5 then
total5 = String.Replace(total5, ".", ":", false);
total5 =total5..':00'
Input.SetText("Input34",total5);
elseif String.Length(total5)==4 then
total5 = String.Replace(total5, ".", ":", false);
total5 =total5..'0:00'
Input.SetText("Input34",total5);
end
icha=Math.Acos((Math.Sin(-18*3.1415926535897932/180)-Math.Sin(nad*3.1415926535897932/180)*Math.Sin(kho*3.1415926535897932/180))/(Math.Cos(nad*3.1415926535897932/180)*Math.Cos(kho*3.1415926535897932/180)))*180/3.1415926535897932
Input.SetText("Input35",icha);
yrt = Input.GetText("Input35");
----
Input.SetText("Input36",fh+(yrt/15));
alicha = Input.GetText("Input36");
xa=Math.Floor(alicha)
xa2= alicha-xa     
xa3=xa2*60/100   
total6= xa+xa3
total6= Math.Round( total6, 2);
if String.Length(total6)==5 then
total6 = String.Replace(total6, ".", ":", false);
total6 =total6..':00'
Input.SetText("Input37",total6);
elseif String.Length(total6)==4 then
total6 = String.Replace(total6, ".", ":", false);
total6 =total6..'0:00'
Input.SetText("Input37",total6);
end
fad=Math.Acos((Math.Sin(-18*3.1415926535897932/180)-Math.Sin(nad*3.1415926535897932/180)*Math.Sin(kho*3.1415926535897932/180))/(Math.Cos(nad*3.1415926535897932/180)*Math.Cos(kho*3.1415926535897932/180)))*180/3.1415926535897932
Input.SetText("Input38",fad);
rte = Input.GetText("Input38");
Input.SetText("Input39",fh-rte/15);
niha = Input.GetText("Input39");
na=Math.Floor(niha)
na2= niha -na     
na3=na2*60/100    
total7= na+na3
total7= Math.Round( total7, 2);
if String.Length(total7)==4 then
total7 = String.Replace(total7, ".", ":", false);
 total7 = '0'..total7..':00'
Input.SetText("Input40",total7);
elseif String.Length(total7)==3 then
total7 = String.Replace(total7, ".", ":", false);
 total7 = '0'..total7..'0:00'
Input.SetText("Input40",total7);
end