Magnifier (script!)

[David Kwinter]

> I guess the trick is in the updating process, so that the actual screen
> comes back when you quit dragging
> 
> Ken N.
> 
> _______________________________________________
> use-revolution mailing list
> use-revolution at lists.runrev.com
> http://lists.runrev.com/mailman/listinfo/use-revolution


Ken, make a new stack, make it big and put this into the stack script:

on moveStack
  if exists(image 1) then delete image 1
 
  put the rect of this stack into sRect
  hide stack me
  import snapshot from rect sRect
 
  put the height of image 1 into originalH
  put the width of image 1 into originalV
  set the height of image 1 to originalH*2
  set the height of image 1 to originalV*2
  show stack me
 
end moveStack