Chris Young wrote:

>>
>< DIM array%(1)
>< resH& = FN GET1RESOURCE(_"DATA",128)
>< LONG IF resH% AND FN RESERROR = _noErr
><     BLOCKMOVE [resH&], @array%(0), 4
>< END IF
>
>The only thing I can see is changing the LONG IF to:
>
>LONG IF (resH& <> 0) AND FN RESERROR = _noErr
>(also note the typo resH%in your code)
>

Thanks, Chris. Yes, I do that in real life. I wrote the snippet from memory...


Hans