home *** CD-ROM | disk | FTP | other *** search
/ Picasso Un Homme, Une Oeuvre, Une Légende / PICASSO.ISO / data / accueil.dxr / 00006.ls < prev    next >
Encoding:
Text File  |  1996-09-16  |  383 b   |  23 lines
  1. on exitFrame
  2.   global g_exit, g_call_param, g_next_movie
  3.   put "g_exit = " && g_exit
  4.   put "g_next_movie = " && g_next_movie
  5.   unLoad()
  6.   unloadMember()
  7.   cursor(4)
  8.   if g_exit = 1 then
  9.     set g_exit to -1
  10.     OwnPlay(g_next_movie)
  11.     exit
  12.   end if
  13.   if g_exit = 0 then
  14.     set g_exit to -1
  15.     OwnPlayDone()
  16.     exit
  17.   end if
  18.   if g_exit = -1 then
  19.     go(1)
  20.     exit
  21.   end if
  22. end
  23.