Passport/passport.iso/pc/passport/numbers.dxr/Script_4.ls

Text File | 1998-01-26 | 952 b | 51 lines

on mouseEnter
  set R to the rollOver
  case R of
    8:
      set the loc of sprite 18 to point(34, 87)
    9:
      set the loc of sprite 18 to point(33, 140)
    10:
      set the loc of sprite 18 to point(33, 184)
    12:
      set the loc of sprite 18 to point(32, 223)
    13:
      set the loc of sprite 18 to point(32, 258)
    14:
      set the loc of sprite 18 to point(32, 295)
    otherwise:
      exit
  end case
  set the visible of sprite 18 to 1
end

on mouseLeave
  set R to the rollOver
  if (R < 8) or (R > 14) or (R = 11) then
    set the visible of sprite 18 to 0
  end if
end

on mouseDown
  set R to the rollOver
  case R of
    8:
      mode("Cardinal")
    9:
      mode("Ordinal")
    10:
      mode("Test")
    12:
      if not (the visible of sprite 16) then
        ThisTest()
      end if
    13:
      if not (the visible of sprite 16) then
        SolTest()
      end if
    14:
      NextTest()
  end case
  pass()
end