home *** CD-ROM | disk | FTP | other *** search
/ GU 15 - Background Photo Collection - Hanabi / gu15.iso / pc / browser.exe / browser.DXR / 00096.ls < prev    next >
Encoding:
Text File  |  1996-09-12  |  694 b   |  26 lines
  1. on correctregpoint n, m
  2.   preLoadCast(n, m)
  3.   repeat with i = n to m
  4.     set the regPoint of cast i to point(the width of cast i / 2, the height of cast i / 2)
  5.     put i && the regPoint of cast i
  6.   end repeat
  7. end
  8.  
  9. on showregpoint
  10.   repeat with i = 105 to 404
  11.     put i && the regPoint of cast i
  12.   end repeat
  13. end
  14.  
  15. on namechange
  16.   repeat with i = 105 to 204
  17.     set the name of cast i to "120" & "HA" & char 3 to 6 of the name of cast i
  18.   end repeat
  19.   repeat with i = 205 to 304
  20.     set the name of cast i to "240" & "HA" & char 3 to 6 of the name of cast i
  21.   end repeat
  22.   repeat with i = 305 to 404
  23.     set the name of cast i to "640" & "HA" & char 3 to 6 of the name of cast i
  24.   end repeat
  25. end
  26.