tedd said:
>   1. Start;
>   2. Look at its TEXT resources and compute the length;
>   3. Compare that length with a constant defined within the program;
>   4. If the two are equal, then run. If not, then don't run.

WINDOW 1,"",(100,100)-(800,800)
EDIT FIELD 1999,%128%,(100,100)-(200,200),_statframed
EDIT FIELD 1999
n=WINDOW(_efTextLen)
PRINT n
IF n<>73 THEN BEEP : END

DO
  HANDLEEVENTS
UNTIL 0