Body, TD, A {font-size: 9pt; color: black}
.none {border: Black 1PX Solid; Background: D9D9D9; Padding-top: 2}
.over {border: black 1px solid; Background: 707888; Color: White; Padding-top: 2}
style>
hEAD>
Class = none οnmοuseοver = "this.classname = 'over'; menuin ()"
οnmοuseοut = "this.classname = 'none'; menuout ()"> menu item 2 div>
οnmοuseοut = "this.classname = 'none'; menuout ()"> menu item three div>
Class = none οnmοuseοver = "this.classname = 'over'; menuin ()"
οnmοuseοut = "this.classname = 'None'; menuout ()"> menu item four div>
div>
Dim Down, Divleft, Divtop, Timelinestart, Timelinestop, Tidone, Tidtwo, Tidtree
Down = false
Timelinestart = 0
Timelinestop = 0
Sub Document_onmousemove
IF down kil
Plane.Style.Left = WINDOW.EVENT.CLIENTX-DIVLEFT
Plane.Style.top = WINDOW.EVENT.CLIENTY-DIVTOP
END IF
Lt.value = Divleft
TP.Value = Divtop
TX.Value = window.event.clientX
Ty.Value = window.event.clienty
End Sub
Sub Document_ondargStart
Window.Event.ReturnValue = false
End Sub
Function menuin ()
Cleartimeout (Tidtree)
END FUNCTION
Function menuout ()
Tidtree = setTimeout ("Outit ()", 200)
END FUNCTION
Function init ()
IF TimeLineStart <> 5 lifeArtimeout (TIDTWO)
Item1.style.pixelleft = item1.style.pixelleft-20
Item1.filters.alpha.opacity = item1.filters.alpha.opacity 20
Item2.style.pixelleft = item2.style.pixelleft-20-4
Item2.filters.alpha.opacity = item2.filters.alpha.opacity 20
Item3.style.pixelleft = item3.style.pixelleft-20-8
Item3.filters.alpha.opacity = item3.filters.alpha.opacity 20
Item4.Style.pixelleft = item4.style.pixelleft-20-12
Item4.filters.alpha.opacity = item4.filters.alpha.opacity 20
Item5.style.pixelleft = item5.style.pixelleft-20-16
Item5.filters.alpha.opacity = item5.filters.alpha.opacity 20
TimelineStart = Timelinestart 1
Else
Cleartimeout (TIDONE)
END IF
Tidone = setTimeout ("init ()", 5)
END FUNCTION
Function Outit ()
IF Timelinestart <> 0 THEN
Cleartimeout (TIDONE)
item1.style.pixelleft = item1.style.pixelleft-5
Item1.filters.alpha.opacity = item1.filters.alpha.opacity-20
Item2.style.pixelleft = item2.style.pixelleft-6-4
Item2.filters.alpha.opacity = item2.filters.alpha.opacity-20
Item3.style.pixelleft = item3.style.pixelleft-9-8
Item3.filters.alpha.opacity = item3.filters.alpha.opacity-20
Item4.style.pixelleft = item4.style.pixelleft-13-12
Item4.filters.alpha.opacity = item4.filters.alpha.opacity-20
Item5.Style.pixelleft = item5.style.pixelleft-15-16
Item5.filters.alpha.opacity = item5.filters.alpha.opacity-20
TimeLineStart = Timelinestart-1
Else
Cleartimeout (TIDTWO)
Item1.style.pixelleft = 250
Item2.style.pixelleft = 270
Item3.Style.pixelleft = 290
item4.style.pixelleft = 310
item5.style.pixelleft = 330
END IF
Tidtwo = setTimeout ("Outit ()", 1)
END FUNCTION
script> Divleft: divtop:
Clientx: clienty:
body>
html>