Personal Computer World 1997 September/Personal_Computer_World_Sep_97.iso/Democd3/oasquiz.dxr/00126.ls

Text File | 1997-06-04 | 2.0 KB | 69 lines

on mouseDown
  global timeoption, timerate, diff, n, helpon, y, z
  puppetSound("click")
  set the visible of sprite 7 to 1
  if timeoption = 0 then
    set diff to 1
  end if
  if timeoption = 1 then
    set timerate to 2
  end if
  set the visible of sprite 13 to 0
  set the visible of sprite 28 to 0
  set the visible of sprite 29 to 0
  set the visible of sprite 30 to 0
  set the locH of sprite 5 to the locH of sprite 5 + 2
  set the locV of sprite 5 to the locV of sprite 5 + 2
  set the locH of sprite 22 to the locH of sprite 22 + 2
  set the locV of sprite 22 to the locV of sprite 22 + 2
  updateStage()
  startTimer()
  repeat while the timer < 15
    nothing()
  end repeat
  set the locH of sprite 5 to the locH of sprite 5 - 2
  set the locV of sprite 5 to the locV of sprite 5 - 2
  set the locH of sprite 22 to the locH of sprite 22 - 2
  set the locV of sprite 22 to the locV of sprite 22 - 2
  updateStage()
  if helpon = 1 then
    set the visible of sprite 22 to 0
    set the visible of sprite 23 to 0
    set the visible of sprite 24 to 0
    set the visible of sprite 13 to 0
    set the visible of sprite 21 to 1
    set the visible of sprite 25 to 1
    set the visible of sprite 5 to 0
    set the visible of sprite 6 to 0
    set the visible of sprite 7 to 0
    set the visible of sprite 12 to 0
    set the text of cast "quest" to "At the start, click on the clock in the top left hand corner, and select the timer speed you want"
    updateStage()
    startTimer()
    repeat while the mouseDown = 0
      repeat with z = 1 to 15
        if the mouseDown then
          go(1, "oasquiz")
          exit
        end if
        set the castNum of sprite 35 to z + 291
        updateStage()
      end repeat
    end repeat
  end if
  if (timeoption = 0) and (helpon = 0) then
    set the visible of sprite 22 to 0
    set the visible of sprite 23 to 0
    set the visible of sprite 24 to 0
    go("s")
  end if
  if timeoption = 1 then
    set timeoption to 0
    go(the frame)
  end if
  if helpon = 1 then
    set helpon to 0
    go(the frame)
  end if
end