Vote: Terminal Behavior

[salvomic]

In some programs of mine I used intensely the Terminal, and a big problem was to wait Terminal and start another page...
In the astronomic program I used this trick: to define a function like this:

Code:


waittap()
BEGIN
 LOCAL a,b,c,d;
 a:=1;
 b:={};
 c:={};
 d:={1};
 WHILE a>0 DO
  a:=WAIT(−1);
  IF TYPE(a)==6 THEN
   b:=wait(-1);
   c:=wait(-1);
   if b(1)==2 then
   else
    while d(1)==1 do
     d:=wait(-1);
    end;
   end;
   break;
  end;
  a:=-a;
 END;
 return concat({a*1},{b*1},{c*1},{d*1});
END;

then use this waitapp() function so:

Code:


 PRINT;
  PRINT("Date " + m + " " + D + " " + Y);
  temp:= dayOfYear(lista);
  PRINT("Day " +temp+ " of the year "+Y);
  PRINT("Julian Day " + JD);
  PRINT("Julian Day Effemerides " + JDE);
  PRINT("N (from 1901-jan-01) " + N);
  PRINT("T (from JD) " + TSid(5));
  PRINT(" ");
  PRINT("Θ0 Sidereal Time 0h " + →HMS(TSid(1)));
  PRINT("Local Sideral Time " + →HMS(TSid(2)));
  PRINT("GAST TS apparente " + →HMS(TSid(3)));
  PRINT("θ0 Mean ST GMT " + →HMS(TSid(4)));
  PRINT("Θ0 Sidereal Time 0h (DEG) " + trunc_angle(TSid(1)*15));
  PRINT("θ0 Mean ST GMT (DEG) " + trunc_angle(TSid(4)*15));
waittap();
PRINT();
  PRINT("Δψ Nutazione (longit.) "+ deltapsi);
  PRINT("Δε Nutazione (obl.) "+ deltaepsilon);
// ...

waittap();
PRINT();
doesn't exit, cancel all, reuse the Terminal...

Maybe a function like this could be added by default to the Terminal behavior...

My two cents.

Salvo