Director向前或向后翻页控制脚本添加方法：
该方法实现了鼠标左右键、上下方向键、PgUp和PgDn键（与常用外部控制笔一致）对Director课件的翻页控制。
另外，空格键和回车键可控制课件向下翻页。直接按数字键0，课件返回最初页面，按数字键1至9，课件跳转至相应章节，若没有相应章节，课件不做任何动作。
1、在第一个停顿点添加以下代码：
global rightMouseClick, PgUpPress, UpPress
on exitFrame me
_movie.go(_movie.frame)
if _Mouse.MouseDown then
_movie.go(_movie.frame+1)
Set RightMouseClick=0
Set PgUpPress=0
Set UpPress=0
end if
on KeyDown()
if (_key.keyCode = 121) or (_key.keyCode = 125) or (_key.keyCode = 36) or (_key.keyCode =49) then
_movie.go(_movie.frame+1)
Set RightMouseClick =0
Set PgUpPress =0
Set UpPress =0
end if
case (_Key.KeyCode) of
29:
if _https://www.doczj.com/doc/f61092252.html,bel("Part0") <> 0 then
_movie.go("Part0")
end if
18:
if _https://www.doczj.com/doc/f61092252.html,bel("Part1") <> 0 then
_movie.go("Part1")
end if
19:
if _https://www.doczj.com/doc/f61092252.html,bel("Part2") <> 0 then
_movie.go("Part2")
end if
20:
if _https://www.doczj.com/doc/f61092252.html,bel("Part3") <> 0 then
_movie.go("Part3")
end if
21:
if _https://www.doczj.com/doc/f61092252.html,bel("Part4") <> 0 then
_movie.go("Part4")
end if
23:
if _https://www.doczj.com/doc/f61092252.html,bel("Part5") <> 0 then
_movie.go("Part5")
end if
22:
if _https://www.doczj.com/doc/f61092252.html,bel("Part6") <> 0 then
_movie.go("Part6")
end if
26:
if _https://www.doczj.com/doc/f61092252.html,bel("Part7") <> 0 then
_movie.go("Part7")
end if
28:
if _https://www.doczj.com/doc/f61092252.html,bel("Part8") <> 0 then
_movie.go("Part8")
end if
25:
if _https://www.doczj.com/doc/f61092252.html,bel("Part9") <> 0 then
_movie.go("Part9")
end if
end case
end KeyDown
end
2、在以后所有的停顿点都添加以下相同代码：
global RightMouseClick, PgUpPress, UpPress
on exitFrame me
_movie.go(_movie.frame)
if _Mouse.MouseDown then
_movie.go(_movie.frame+1)
else
_movie.go(_movie.Frame)
end if
if (RightMouseClick=0) and (_Mouse.RightMouseDown) then
_movie.go(_movie.marker(-1))
Set RightMouseClick =1
end if
if _Mouse.RightMouseUP then
Set RightMouseClick =0
end if
on keyDown()
if (_key.keyCode = 121) or (_key.keyCode = 125) or (_key.keyCode = 36) or (_key.keyCode =49) then
_movie.go(_movie.frame+1)
end if
if ((PgUpPress=0) and (_key.keyCode = 116)) or ((UpPress=0) and (_key.keyCode = 126)) then
_movie.go(_movie.marker(-1))
Set PgUpPress =1
Set UpPress =1
end if
case (_Key.KeyCode) of
29:
if _https://www.doczj.com/doc/f61092252.html,bel("Part0") <> 0 then
_movie.go("Part0")
end if
18:
if _https://www.doczj.com/doc/f61092252.html,bel("Part1") <> 0 then
_movie.go("Part1")
end if
19
:
if _https://www.doczj.com/doc/f61092252.html,bel("Part2") <> 0 then
_movie.go("Part2")
end if
20:
if _https://www.doczj.com/doc/f61092252.html,bel("Part3") <> 0 then
_movie.go("Part3")
end if
21:
if _https://www.doczj.com/doc/f61092252.html,bel("Part4") <> 0 then
_movie.go("Part4")
end if
23:
if _https://www.doczj.com/doc/f61092252.html,bel("Part5") <> 0 then
_movie.go("Part5")
end if
22:
if _https://www.doczj.com/doc/f61092252.html,bel("Part6") <> 0 then
_movie.go("Part6")
end if
26:
if _https://www.doczj.com/doc/f61092252.html,bel("Part7") <> 0 then
_movie.go("Part7")
end if
28:
if _https://www.doczj.com/doc/f61092252.html,bel("Part8") <> 0 then
_movie.go("Part8")
end if
25:
if _https://www.doczj.com/doc/f61092252.html,bel("Part9") <> 0 then
_movie.go("Part9")
end if
end case
end keyDown
on keyUp()
if (_key.keyCode = 116) or (_key.keyCode = 126) then
Set RightMouseClick =0
Set PgUpPress =0
Set UpPress =0
end if
end keyUp
end
3、在每个停顿点上方添加Marker，其中，第一个停顿点的Marker改名为Part0,各章节第一个停顿点改名为PartN(N为1至9)，其余Marker可不改名。