PC Player 1999 June/LIB_DAY.BIN/DEMOS/DEMOS.DXR/00027.ls

Text File | 1998-02-27 | 720 b | 31 lines

on exitFrame
  global popupCount, blnd20
  if popupCount < 5 then
    set popupCount to popupCount + 1
    set blnd20 to blnd20 + 20
    set the blend of sprite 20 to blnd20
    sendSprite(21, #CycleState)
    go(the frame)
  else
    if popupCount >= 5 then
      set the member of sprite 21 to "popup1"
      set the visible of sprite 21 to 0
      sendSprite(21, #setstate, 1)
      set the blend of sprite 20 to 100
      set blnd20 to 20
    end if
  end if
  if rollOver(7) then
    sendSprite(5, #CycleState)
  end if
  if rollOver(11) then
    sendSprite(9, #CycleState)
  end if
  if rollOver(15) then
    sendSprite(13, #CycleState)
  end if
  if rollOver(19) then
    sendSprite(17, #CycleState)
  end if
end