Date : Fri, 11 Feb 2005 01:39:53 +0000
From : jgh@... (Jonathan Graham Harston)
Subject: Re: Programming tips.
> Message-ID: <iMs7XUBS8qCCFwHc@...>
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