The Museum Of Anything Goes/MOAG.bin/pc/data/kids/shared.dxr/00512.ls

Text File | 1995-01-01 | 515 b | 24 lines

on GONEXTMOVIE
  global CURRENTFRAME, CURRENTMOVIE
  sound stop 1
  go(CURRENTFRAME, CURRENTMOVIE)
  unLoad()
end

on GONEXTINTERVIEW anum, aMov
  sound stop 1
  go(anum, aMov)
end

on GOTOAFRAME anum
  go(anum)
end

on GETCOPYRIGHTSTRING
  set somedate to the long date
  set inum to the number of items in somedate
  set theyear to item inum of somedate
  set thecpstr to QUOTE & "The Museum of ANYTHING GOES" & QUOTE & RETURN & " © Copyright " & theyear & RETURN & "Markowski - Robertson"
  return thecpstr
end