IN THE FOLLOWING BIT OF CODE, MOST NOTABLE THE INPUTIF, WHEN THIS IS
RUN USING A TELNET SESSION, EVERYTHING WORKS JUST FINE, WHEN THE
CONNECTION IS SSH1 EVERYTHING IS FINE, HOWEVER, RUNNING IT USING SSH2
IT TAKE ABOUT 20 SECONDS BEFORE YOU GET ANYTHING TO RESPOND AFTER YOU
INPUT.  WE ARE USING UV 10.3 AND AIX 5.3


      SUBROUTINE TIMER2(ANS,HUSH,SECONDS,POS1,POS2)
      *TLK DIFFERS FROM LBP TIMER, WAITS FOR <CR> AFTER INPUT
      STOP=0 ; Y=SECONDS
      IF Y='' THEN Y=5
      PROMPT''
10:
      TIME.SAV=TIME()
      TIME.SAV=FIELD(TIME.SAV,".",1)
      IF STOP=0 THEN
         TIME.STOP=TIME.SAV+Y
      END
      DONE=0
      LOOP UNTIL DONE DO
         TIME = TIME()
         TIME =FIELD(TIME,".",1)
         IF TIME > TIME.SAV THEN DONE=1
         IF TIME > TIME.STOP THEN ANS='' ; RETURN
         PRINT @(POS1,POS2) : ; INPUTIF ANS ELSE ANS=''
         IF ANS#'' THEN RETURN
      REPEAT
      IF NOT(HUSH) THEN
         PRINT @(10,23): "COUNTDOWN ":Y:
      END

      PRINT @(POS1,POS2) : ; INPUTIF ANS ELSE ANS=''

      IF ANS#'' THEN RETURN
      Y=Y-1
      STOP=1
      GOTO 10
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

Reply via email to