updating @cb and @ub

[Kenneth Brody]

Quoting Walter Vaughan (Fri, 22 Dec 2006 13:51:16 -0500):
[...]
> Then: 	hf=id
> If: 	hf le "256"     '<= 256 - NO OFFSET   - DIFFERENCE
> Then: 	hg=hf-"256";hi=chr("0");goto setit
> If: 	hf lt "512"     '< 512 - OFFSET 1     + DIFFERENCE
> Then: 	hg=hf-"256";hi=chr("1");goto setit
> If: 	hf lt "768"      '< 768 - OFFSET 2     + DIFFERENCE
> Then: 	hg=hf-"512";hi=chr("2");goto setit
> If: 	hf lt "1024"     '< 1024 - OFFSET 3    + DIFFERENCE
> Then: 	hg=hf-"768";hi=chr("3");goto setit
>
> setit
> Then:   hh=chr(hg)
[...]

(What if id is greater than 1023?)

I assume you are trying to do something like:

    hh = chr(mod(id,"256")) ; hi = chr(int(id / "256"))

Or, for 5.6:

    OrdKey[4] = put16(id)

--
KenBrody at BestWeb dot net        spamtrap: <g8ymh8uf001 at sneakemail.com>
http://www.hvcomputer.com
http://www.fileProPlus.com