program test {
	
	#include <RCX2.h>
	#include <RCX2MLT.h>
	#include <RCX2Sounds.h>
	#include <RCX2Def.h>
	var DiscsFired = 0
	var TimeOut = 0
	event timer1_timer1Event when timer1 > 50
	sensor touch3 on 3
	touch3 is switch as boolean
	event tPress_touch3EventPress when touch3.pressed
	
	
	event tRelease_touch3EventRelease when touch3.released
	
	
	sensor light2 on 2
	light2 is light as percent
	event lBrite_light2EventHigh when light2.high
	
	
	
	main {
		ext InterfaceType "kFreestyle"
		rcx_ClearTimers
		bbs_GlobalReset([A B C])
		trigger tPress_touch3EventPress
		trigger tRelease_touch3EventRelease
		trigger lBrite_light2EventHigh
		try {
			display timer1:1
			direction [  ] [ B ]
			on [ B C  ] 
			DiscsFired = 0
		} retry on fail
		try {
			repeat {
				wait until lBrite_light2EventHigh
				clear Timer1
				wait 50
				reverse [ A  ] 
				on [ A  ] 
				repeat 5 {
					wait until tPress_touch3EventPress
					wait until tRelease_touch3EventRelease
				}
				off [ A  ] 
				DiscsFired += 10
			} until timer1_timer1Event
		} retry on fail
		try {
			float [ B C  ] 
			counter1 = DiscsFired
			rcx_Divide(counter1,200)
			rcx_Multiply( counter1,200)
			display counter1:1
		} retry on fail
		try {
			if DiscsFired = counter1{
				sound 2
			}
			else
			{
				tone 2000 for 100
				reverse [ A  ] 
				on [ A  ] 
				repeat 10 {
					wait until tPress_touch3EventPress
					wait until tRelease_touch3EventRelease
				}
				off [ A  ] 
			} 
		} retry on fail
		wait 100
		try {
			stop tasks
		} retry on fail
	}
	
	
}