[oopic] URGENT - OOPic Events not functioning

I am using an OOPic-R to control a sensor and servo for an important
presentation this Monday, but I need to use its event-driven
capabilities, which seem to be at a complete lack at the moment. The
OOPic will run code and light the onboard LEDs (and light the onboard
LEDs with code, even utilizing oWire commands), it just refuses to run
event-driven code. This includes the code on this page:
http://www.oopic.com/pgchap9.htm#Sub copied verbatim.

Dim BLINK As New oEvent
Dim WIRE As New oWire
Dim LED As New oDIO1

Sub Main()
LED.IOLine = 31
LED.Direction = cvOutput
WIRE.Input.Link(ooPIC.Hz1)
WIRE.Output.Link(BLINK.Operate)
WIRE.Operate = cvTrue
End Sub

Sub BLINK_Code()
LED.State = 1
LED.State = 0
LED.State = 1
LED.State = 0
LED.State = 1
LED.State = 0
End Sub

Is there some error in this code, or is it a problem with my OOPic?
And how can I fix it? I am suffering from time constraints (hence the
"URGENT"), so any help within the next day or so would be much
appreciated.

Thanks!

------------------------------------

Yahoo! Groups Links

<*> To visit your group on the web, go to:

http://groups.yahoo.com/group/oopic/

<*> Your email settings:
Individual Email | Traditional

<*> To change settings online go to:

http://groups.yahoo.com/group/oopic/join

(Yahoo! ID required)

<*> To change settings via email:
mailto:oopic-digest@yahoogroups.com
mailto:oopic-fullfeatured@yahoogroups.com

<*> To unsubscribe from this group, send an email to:
oopic-unsubscribe@yahoogroups.com

<*> Your use of Yahoo! Groups is subject to:

http://docs.yahoo.com/info/terms/