REBOL [Title: "Plugin Ready" Version: 1.2.0]

vers: 1.2.46

up: false

view/new layout [
	origin 0
	box 200x40 "REBOL/Plugin Ready" effect [gradient 200.0.0 0.0.200] rate 10 feel [
		engage: func [f a e] [
			if a = 'time [
				f/effect/2: a: either up [f/effect/2 + 0.0.10 - 10.0.0][f/effect/2 - 0.0.10 + 10.0.0]
				f/effect/3: either up [f/effect/3 - 0.0.10 + 10.0.0][f/effect/3 + 0.0.10 - 10.0.0]
				if a/3 > 250 [up: false]
				if a/3 < 11 [up: true]
				show f
			]
			if a = 'down [
				alert reform ["REBOL/Plugin ViewDLL Version" system/version]
			]
		]
	]
]

if system/version < vers [
	if request reduce[
		rejoin [
			"You are using an older version of the REBOL/Plugin. You should be using version "
			vers " but it looks like you are using " system/version ". "
			"Click the help button and perform step 4 to reinstall."
		]
		"Help"
		"Cancel"
	][
		browse http://www.rebol.net/plugin/demos/problem.html
	]
]

do-events