home *** CD-ROM | disk | FTP | other *** search
/ Seeker / Seeker.iso / files_w / map.dir / 00052.ls < prev    next >
Encoding:
Text File  |  1994-12-12  |  326 b   |  15 lines
  1. on exitFrame
  2.   global cursoridnum
  3.   if (the mouseCast >= 11) and (the mouseCast <= 20) then
  4.     if cursoridnum = 4 then
  5.       set cursoridnum to 1
  6.     else
  7.       set cursoridnum to cursoridnum + 1
  8.     end if
  9.     cursor([233 + (cursoridnum * 2), 234 + (cursoridnum * 2)])
  10.   else
  11.     cursor([233, 234])
  12.   end if
  13.   go(#loop)
  14. end
  15.