[Сольвейг]

Подскажите, пожалуйста возникла следующая проблема. Необходимо создать тестовую прогу во MF. Имеется некая база вопросов, кот прописываются след образом:

Kol_voprosov=5 //кол-во вопросов кот. необходимо выбрать из базы
&Vopros1=Вопро1 //текст вопроса
&Otvet1_1=Ответ 1_1 //варианты ответа
&Otvet1_2=Ответ 1_2
&Otvet1_3=Ответ 1_3
&Otvet1_4=Ответ 1_4
&Otvet1_5=Ответ 1_5
&prav_otv1=1 // № правильного ответа

Вопросы с вариантами генерируются на сцене с пом. следующего кода

stop();
_root.createEmptyMovieClip("test", 0); 
loadVariables("data.txt", test); //загрузка данных из базы
var Number_vop:Number=1;
var vop= new Array();
var Kol_vop:Number;
test.onData = function() {
	Kol_vop=this.Kol_voprosov;
	vop[Number_vop]=random(5)+1;
	Vop.text=this["Vopros"+vop[Number_vop]]
	Rad_1.label=this["Otvet"+vop[Number_vop]+"_1"];
	Rad_2.label=this["Otvet"+vop[Number_vop]+"_2"];
	Rad_3.label=this["Otvet"+vop[Number_vop]+"_3"];
	Rad_4.label=this["Otvet"+vop[Number_vop]+"_4"];
	Rad_5.label=this["Otvet"+vop[Number_vop]+"_5"];	
};

Данные подгружаются шоколадно, но при проверки правильного ответа возникают косяки(( По первому вопросу всегда работает как надо, далее всегда выдается неверный ответ неважно какой вариант был выбран.

Обработка кнопки проверка ответа:

on (release) {
	var prav_ot:String;
	prav_ot = _root.test["prav_otv"+vop[Number_vop]];
	prav_ot = prav_ot.substring(0, prav_ot.length-2);
	if (_root["Rad_"+prav_ot].getState() == true) {
		rez.text = "Правильно!";
	} else {
		rez.text = "НЕ Правильно!";
		
	}
	
	var vop_next:Number;
	var nah:Boolean = false; // проверяется выпадал ли уже вопрос или нет
	
	while (!nah) {
		trace(nah)
		vop_next = random(5)+1;
		nah = true;
		for (var i = 1; i<=Number_vop; i++) {
			if (vop_next == Vop[i]) {
				nah = false;
			}
		}
	}
	trace(vop_next);
	vop[Number_vop]=vop_next;
	Vop.text = _root.test["Vopros"+vop[Number_vop]];
	Rad_1.label = _root.test["Otvet"+vop_next+"_1"];
	Rad_2.label = _root.test["Otvet"+vop_next+"_2"];
	Rad_3.label = _root.test["Otvet"+vop_next+"_3"];
	Rad_4.label = _root.test["Otvet"+vop_next+"_4"];
	Rad_5.label = _root.test["Otvet"+vop_next+"_5"];
	Number_vop++;
}

Помогите, пожалуйста каким образом сделать так что бы вопросы выпадали случайно, определенное количество раз не повторяясь, при этом и с проверкой правильности ответа.