Test1(Waarde)
	do Waarde.Insert(1)
Label1
	do Waarde.Insert(2)
	quit
	
Test2(Waarde)
	do Waarde.Insert(1)
Label2()
	do Waarde.Insert(2)
	quit