Impress running macro

[NZ Jim]

I am going to run Impress for a display at a local club. With a slide show running in auto is it possible to trigger a macro each time the slide changes? I would like to use the output pins from the parallel port to operate lights highlighting different parts of the display as the show runs. I am NOT a programmer, but am willing to try writing a macro.
Thanks,
Jim

[FJCC]

Yes, a macro can be triggered each time a slide transition happens. There is a SlideShowListener that can be added to the slide show and it will respond to a variety of events. You can see the kinds of events in the names of the sub routines. Here is some simple code that just prints "Slide Transition Started" for each slide.

Code: Select all

Sub addListener
Doc = ThisComponent
Presentation = Doc.Presentation
Listener = createUnoListener("EV_","com.sun.star.presentation.XSlideShowListener")
Presentation.Start()
Controller = Presentation.Controller
Controller.addSlideShowListener(Listener)

end sub

Sub EV_paused(oEv)
End Sub

Sub EV_resumed(oEv)
End Sub

Sub EV_slideTransitionStarted(oEv)
Print "Transition Started"
End Sub

Sub EV_slideTransitionEnded(oEv)
End Sub

Sub EV_slideAnimationEnded(oEv)
End Sub

Sub EV_slideEnded(oEv)
End Sub

Sub EV_hyperLinkClicked(oEv)
End Sub

Sub EV_disposing(oEv)
End Sub