home *** CD-ROM | disk | FTP | other *** search
/ Passport / passport.iso / pc / passport / dialog.dxr / Internal_53.ls < prev    next >
Encoding:
Text File  |  1998-01-27  |  437 b   |  21 lines

  1. on exitFrame
  2.   go(the frame)
  3. end
  4.  
  5. on prepareFrame
  6.   global MaxPag, DlgPath, ThisFrame
  7.   if ThisFrame <> the frame then
  8.     set ThisFrame to the frame
  9.     visible([7], [43, 19])
  10.     set V to count(DlgPath) > 0
  11.     set the visible of sprite 6 to not V
  12.     CloseAllWindows()
  13.     if GetPag() <> 1 then
  14.       SetPag(1)
  15.       repeat with i = 1 to MaxPag
  16.         set the visible of sprite (19 + i) to V
  17.       end repeat
  18.     end if
  19.   end if
  20. end
  21.