Purpose: Animates the top portion of the corporate news and info page
and incorporates other special effects
Used by: /intel/index.htm -->
<SCRIPT LANGUAGE="VBScript">
<!--
Dim x, move_y
x = 0
move_y = -60
Sub Icon1_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub Icon1_MouseExit()
window.t=1000
icon1_label.visible=0
end sub
Sub Icon1_MouseEnter()
window.t=0
icon2_label.visible=0
icon3_label.visible=0
icon4_label.visible=0
icon1_label.visible=1
end sub
Sub Icon2_MouseExit()
window.t=1000
icon2_label.visible=0
end sub
Sub Icon2_MouseEnter()
window.t=0
icon3_label.visible=0
icon4_label.visible=0
icon1_label.visible=0
icon2_label.visible=1
end sub
Sub Icon2_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub Icon3_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub Icon3_MouseEnter()
window.t=0
icon4_label.visible=0
icon1_label.visible=0
icon2_label.visible=0
icon3_label.visible=1
end sub
Sub Icon3_MouseExit()
window.t=1000
icon3_label.visible=0
end sub
Sub Icon4_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub Icon4_MouseEnter()
window.t=0
icon1_label.visible=0
icon2_label.visible=0
icon3_label.visible=0
icon4_label.visible=1
end sub
Sub Icon4_MouseExit()
window.t=1000
icon4_label.visible=0
end sub
Sub gifshoplabel2_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub giftshoplabel1_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub investorlabel3_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub investorlabel2_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub investorlabel1_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub employlabel3_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub employlabel2_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub Employlabel1_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub corpinfolabel3_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub corpinfolabel2_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub corpinfolabel1_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
Sub Newsroomlabel3_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub Newsroomlabel2_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub Newsroomlabel1_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub corpinfolabel6_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub corpinfolabel5_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub corpinfolabel4_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub corpinfolabel8_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub corpinfolabel7_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub corpinfolabel9_MouseDown(ByVal Button, ByVal Shift, ByVal X, ByVal Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub support_MouseDown(Button, Shift, X, Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub feedback_MouseDown(Button, Shift, X, Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub contents_MouseDown(Button, Shift, X, Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub search_MouseDown(Button, Shift, X, Y)
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."
end sub
Sub intelhome_MouseDown(Button, Shift, X, Y)
Window.location.href = "../index.htm"
end sub
Sub layout_OnLoad
layout.drawbuffer=140000
window.rt "1"
window.ch "1"
end sub
sub trade_onClick()
MsgBox "Welcome to a sampling of Intel's World Wide Web site using Microsoft's Internet Explorer 3.0 browser technology. The particular link you've chosen is not activated on this CD, though you can check it out live on the World Wide Web at http://www.intel.com. Please try another link."