home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 September / macformat-028.iso / mac / Demos / UNZIP-DEMO / ZIPFILES / man00 / 00024.ls < prev    next >
Encoding:
Text File  |  1995-05-24  |  131 b   |  11 lines

  1. on exitFrame
  2.   global ship
  3.   if ship = 1 then
  4.     set ship to 0
  5.     play done
  6.   else
  7.     set ship to 0
  8.     go("loop")
  9.   end if
  10. end
  11.