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

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

on mouseDown
  global diff, timerate, timeoption, n, helpon
  puppetSound("click")
  set the visible of sprite 7 to 1
  if timeoption = 0 then
    if the keyCode = 28 then
      set diff to 2
    else
      if the keyCode <> 28 then
        set the text of cast "quest" to "Access Denied! You didn't enter the correct password! Complete the easy level to get the password"
        startTimer()
        repeat while the timer < 200
          nothing()
        end repeat
        go(1, "oasquiz")
        exit
      end if
    end if
  end if
  if timeoption = 1 then
    set timerate to 3
  end if
  set the locH of sprite 6 to the locH of sprite 6 + 2
  set the locV of sprite 6 to the locV of sprite 6 + 2
  set the locH of sprite 23 to the locH of sprite 23 + 2
  set the locV of sprite 23 to the locV of sprite 23 + 2
  updateStage()
  startTimer()
  repeat while the timer < 15
    nothing()
  end repeat
  set the locH of sprite 6 to the locH of sprite 6 - 2
  set the locV of sprite 6 to the locV of sprite 6 - 2
  set the locH of sprite 23 to the locH of sprite 23 - 2
  set the locV of sprite 23 to the locV of sprite 23 - 2
  updateStage()
  if helpon = 1 then
    set the text of cast "quest" to "When asked a question, simply click on the answer you think is correct!"
    set the visible of sprite 21 to 1
    set the visible of sprite 25 to 1
    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 5 to 0
    set the visible of sprite 6 to 0
    set the visible of sprite 7 to 0
    updateStage()
    repeat while the mouseDown = 0
    end repeat
    go(1, "oasquiz")
    exit
  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