|
|
|
Easy Navigation System
Added on 7/31/2004
|
|
Compatibilities:
|
This item has not yet been rated
|
This is very unique Behaviour that can make the Navigation to another movies [dirs] very easy, its identify the path of your [DIR]s , usuallay in the same project folder and the behaviour can attach the desired Movie you want to go to instead of writing [go to movie...]
---------------------------------------------------------------------
--With The Name of God----------------------------------------
--go TO DIR Behaviour ver 1--
--Written Proudly By : Mohammed Ibrahim Hasanin
--All Rights Reserved to Mohammed Ibrahim hasanin -18 March 2004-- 05:49PM
--e-mail : medos20@yahoo.com--
---------------------------------------------------------------------
property pTargetDIR
global gDIRfolder -- where the DIRS are located
global gDIRList -- a list of all DIR file names
on getPropertyDescriptionList me
gDIRfolder = the moviepath
getDIRList
return [#pTargetDIR: [#comment: "Target DIR:",
#format: #filename,#range:gDIRList, #default: gDIRList]]
end
-- this handler looks at each file in the folder and gets the filename of that DIR
on getDIRList
gDIRList = []
repeat with i = 1 to 255
filename = getNthFileNameinFolder(gDIRfolder,i)
if filename = "" then exit repeat
add gDIRList, filename
end repeat
end
end
on getBehaviorDescription me
return "Jumps to movie on mouseUp."
end
on mouseUp me
go to Movie pTargetDIR
end
on mouseEnter me
cursor 280
end
on mouseLeave me
cursor -1
end
--End of CODE--
|
|