source: trunk/lingosource/castlib1/custom_Utilities.ls

-- custom_Utilities
-----------------------------------
-- PROPERTIES:
--!memberProperties: [#name: "custom_Utilities", #scripttype: #parent, #scriptSyntax: #lingo, #comments: "~/Documents/Scripts/lingo/commonMovieScript.ls"]
--
-- DESCRIPTION:
--               you can use the utility handlers from script alexUtilities in this script, as it uses it as ancestor.
--
-- REQUIRES:
--               script "alexUtilities" -> ancestor -> basic function provider
--
-- USAGE:
--               define the handlers, which are provided in the Utilities menu and defined in script "OSCmenu_Utilities"
--
--
-- if you want to display a status for long calls (like my svn utilities do)
-- use:
-- me.mSwitchToStatusMode(1) -- to switch it on
-- me.mSwitchToStatusMode(0) -- to switch it off
-- and:
-- me.mDisplayWaitStatusText(aString) -- to display a status message
--
--
-- WARNINGS:
--              keep in mind, that you are in the scope of the stage, when these hadlers here are called!
--              so calling a script of this movie "Handlermenu" here is only possible, if you use a "tell" statement
--              use it like so: tell window(me.pHandlerMenuWindowName) to doSomething
-----------------------------------

property ancestor

on new me
  ancestor = new(script "alexUtilities")
  return me
end

-- xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
on _______________CUSTOM_UTILITIES me
end
-- xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

on Add_Your_Own_Handler_Here me, paremeters
  
  ----------------------------
  -- me.mSwitchToStatusMode(1)
  -- me.mDisplayWaitStatusText("A really long time consuming procedure...")
  ----------------------------
  
  -- your code here:
  alert "This is an example handler."
  
  
  ----------------------------
  -- me.mSwitchToStatusMode(0)
  ----------------------------
  
end