[Doc] Added Brl.Event samples

event.mod/doc/allocusereventid.bmx

@@ -0,0 +1,15 @@
+SuperStrict
+
+Graphics 640,480
+
+Local myEventID:Int = AllocUserEventId("My optional event description")
+Local myEvent:TEvent = CreateEvent(myEventID)
+Local myTimer:TTImer = CreateTimer(10, myEvent)
+Repeat
+	WaitEvent
+	Cls
+	If EventID() = myEventID
+		DrawText "Timer has ticked " + TimerTicks(myTimer) + " times",10,15
+	EndIf
+	Flip
+Until AppTerminate()

event.mod/doc/emitevent.bmx

@@ -0,0 +1,26 @@
+SuperStrict
+
+Graphics 640,480
+
+Local myEventID:Int = AllocUserEventId("My optional event description")
+Local myEvent:TEvent = CreateEvent(myEventID)
+Local myTimer:TTImer = CreateTimer(10, myEvent)
+Local myQuitEventID:Int = AllocUserEventId("We want to quit now")
+Local myQuitEvent:TEvent = CreateEvent(myQuitEventID)
+
+Repeat
+	WaitEvent
+	Cls
+	Select EventID()
+		Case myEventID
+			DrawText "Timer has ticked " + TimerTicks(myTimer) + " times",10,15
+			
+			' exit application after 50 ticks
+			If TimerTicks(myTimer) = 50
+				EmitEvent(myQuitEvent)
+			EndIf
+		Case myQuitEventID
+			End
+	End Select
+	Flip
+Until AppTerminate()