home *** CD-ROM | disk | FTP | other *** search
/ The Best of Mecomp Multimedia 2 / MECOMP-CD-II.iso / amiga / programmieren / basic / guitoolkit / arexx / moveallgads.rx next >
Encoding:
Text File  |  1997-11-15  |  214 b   |  15 lines

  1. /* This script will move all gadgets xoffset and yoffset  */
  2.  
  3. address "GUITKREXX"
  4. Options Results
  5. xoff=0
  6. yoff=10
  7.  
  8. NoOfGadgets
  9. n=Result
  10. do loop = 1 to n
  11.     MoveGadget loop xoff yoff
  12. end
  13. UpDateDisplay    
  14. say "all done!"
  15.