<< Previous Message Main Index Next Message >>
<< Previous Message in Thread This Month Next Message in Thread >>
Date   : Fri, 11 Feb 2005 01:39:53 +0000
From   : jgh@... (Jonathan Graham Harston)
Subject: Re: Programming tips.

Mike Tomlinson <mike@...> wrote:
> >220 REPEAT K%=GET AND &DF: UNTIL K% = ASC("Y") OR K% = ASC("N")
> 
> My variant of this is:
> 
> 220 REPEAT K$=CHR$(GET AND &DF): UNTIL INSTR("YyNn",K$)
 
You're forcing it to upper case anyway, so you only need:
 
REPEAT K$=CHR$(GET AND &DF): UNTIL INSTR("YN",K$)
 
:)
 
-- 
J.G.Harston - jgh@...                - mdfs.net/User/JGH
Badly formed email is deleted unseen as spam
<< Previous Message Main Index Next Message >>
<< Previous Message in Thread This Month Next Message in Thread >>