Car Screensaver - Toyota/TOYOTA.iso/mjparty/vivi_ex.exe/vivi_ex.DXR/00008.ls

Text File | 1996-05-13 | 413 b | 18 lines

on exitFrame
  global gstg, gscr, gbor, ghislist, ghdlist
  if not soundBusy(1) then
    puppetSound(1, 61)
  end if
  set gstg to 1
  set gscr to 0
  set gbor to 0
  set ghislist to []
  set ghdlist to [50, 20, 15, 12, 10, 7, 5, 2, 1, 5]
  set the cursor of sprite 46 to -1
  set the cursor of sprite 48 to -1
  repeat with n = 20 to 24
    set the cursor of sprite n to -1
  end repeat
  cursor([111, 112])
end