script AppDelegate
　　
　　property parent : class "NSObject"
　　
　　— IBOutlets
　　property theWindow : missing value
　　property theView : missing value
　　property DCButton : missing value
　　property aConMenu : missing value
　　
　　on applicationWillFinishLaunching:aNotification
　　　　—
　　end applicationWillFinishLaunching:
　　
　　on applicationShouldTerminate:sender
　　　　return current application’s NSTerminateNow
　　end applicationShouldTerminate:
　　
　　on clicked:aSender
　　　　display dialog "Clicked"
　　end clicked:
　　
　　on dispContextual:aEvent
　　　　current application’s NSMenu’s popUpContextMenu:(aConMenu) withEvent:(aEvent) forView:(theView)
　　end dispContextual:
　　
　　on action:aSender
　　　　display dialog (tag of aSender) as string
　　end action:
　　
end script

★Click Here to Open This Script　

script DCButton
　　property parent : class "NSButton"
　　
　　on mouseDown:aEvent
　　　　set buttonNum to aEvent’s buttonNumber()
　　　　set aEtype to aEvent’s type()
　　　　set aCount to aEvent’s clickCount()
　　　　
　　　　if aCount = 3 then –Triple Click
　　　　　　display dialog "Triple Click"
　　　　　　
　　　　else if aCount = 2 then –Double Click
　　　　　　display dialog "Double Click"
　　　　　　
　　　　end if
　　end mouseDown:
　　
　　on mouseMoved:theEvent
　　　　log {"mouseMoved", aEvent}
　　end mouseMoved:
　　
　　on mouseUp:aEvent
　　　　log {"mouseUp", aEvent}
　　end mouseUp:
　　
　　on mouseDragged:aEvent
　　　　log "mouseDragged"
　　end mouseDragged:
　　
　　on rightMouseDown:aEvent
　　　　–Display Contextual Menu
　　　　current application’s NSApp’s delegate()’s performSelector:"dispContextual:" withObject:(aEvent)
　　end rightMouseDown:
　　
　　on rightMouseUp:aEvent
　　　　log {"rightMouseUp", aEvent}
　　end rightMouseUp:
　　
　　on clicked:aSender
　　　　continue clicked:(missing value)
　　end clicked:
　　
　　(*
　　on mouseEntered:theEvent
　　　　log {"mouseEntered", theEvent}
　　end mouseEntered:

　　on mouseExited:theEvent
　　　　log {"mouseExited", theEvent}
　　end mouseExited:
*)
end script

★Click Here to Open This Script