Maybe you need to try something like:

DIM RECORD Floaties
  DIM fX!
  DIM fY!
  DIM fRecPtr&
  DIM fScale!
  ..etc..
DIM END RECORD.FloatiesSize
DIM myFloaties.FloatiesSize


ENTERPROC%(PtrToFloaties&)  '  From @myFloaties
   PRINT PtrToFloaties&.fX!
   PRINT PtrToFloaties&.fY!
   PRINT PtrToFloaties&.fScale!
 ..etc..
EXITPROC%

Then you can have unlimted paramters of any type, and it will be faster.
Any help?

Jamin


On 17/04/02 6:34 PM, Andrea P. <andrea.pic@...> wrote:
>HI boys,
>
>I' dont' have understood because I cant' use floating-point(!) variable
>in code resource definition. (Future basic II)
>
>
>ENTERPROC%((X!,Y!,rectptr&,Scale!,ScrollX!,ScrollY!,ReduxRect%)
>  DIM PPmouse;4,IsInObj,rect;8
>  BLOCKMOVE rectptr&,@rect,8
>  IsInObj = 0
>  PPmouse.h%  =  (X! + ScrollX!) * Scale! /ReduxRect%
>  PPmouse.v%  =  (Y! + ScrollY!) * Scale! /ReduxRect%
>  IsInObj = FN PTINRECT(PPmouse,rect)
>EXITPROC%
>
>Why isn't possibile this?
>
>
>Any help is appreciated
>Thanks
>Andrea Piccinini
>
>
>--
>To unsubscribe, send ANY message to <futurebasic-unsubscribe@...>
>
>