Re: [MI400] Is there an easy way to scan for bits?

["Steve Richter" <srichter@xxxxxxxxxxxxx>]

I like the idea of writing a pgm to generate this code.

----- Original Message -----
From: "Leif Svalgaard" <leif@leif.org>
To: <mi400@midrange.com>
Sent: Thursday, December 20, 2001 10:22 PM
Subject: Re: [MI400] Is there an easy way to scan for bits?


> true, but it will only have to be done once, will never
> have to be maintained, and can to a generated by a
> program that takes the codes as input.
>
> ----- Original Message -----
> From: Steve Richter <srichter@AutoCoder.com>
> To: <mi400@midrange.com>
> Sent: Thursday, December 20, 2001 9:21 PM
> Subject: Re: [MI400] Is there an easy way to scan for bits?
>
>
> >
> > I agree the Leif binary tree method would run the fastest, but if the
> > psuedocode that follows represents it correctly, I think it will be a
> coding
> > rats nest.
> >
> > If Bit_0 is On
> >     If Bit_1 is On
> >         If Bit_2 is On
> >             If Bit_3 is On
> >                 Result = 7
> >             Else
> >                 Result = 6
> >             End
> >         Else
> >             If Bit_3 is On
> >             Else
> >                 Result = 5
> >             End
> >         End
> >
> > From: "Harry Williams" <planesmart@teleteam.com>
> > > 0111 = 2
> > > 1000 = 3
> > > 1011 = 4
> > > 1100 = 5
> > > 1110 = 6
> > > 1111 = 7
>
>
> _______________________________________________
> This is the MI Programming on the AS400 / iSeries (MI400) mailing list
> To post a message email: MI400@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/mi400
> or email: MI400-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/mi400.
>
>