diff --git a/fr/FR_Tests.ttcn b/fr/FR_Tests.ttcn
index 23c8e26..2bac1f8 100644
--- a/fr/FR_Tests.ttcn
+++ b/fr/FR_Tests.ttcn
@@ -115,19 +115,28 @@
 
 function f_ul_ud(charstring id) runs on UE_CT {
 
-	log("Waiting for BVC-UNBLOCK");
+	log(id, " Waiting for BVC-UNBLOCK");
+	timer T := 15.0;
+	T.start;
 	alt {
 	[] BSSGP[0].receive(BssgpStatusIndication:{*,?,BVC_S_UNBLOCKED}) { }
 	[] BSSGP[0].receive { repeat; }
+	[] T.timeout {
+		setverdict(fail, id, " Timeout waiting for BVC-UNBLOCK");
+		self.stop;
+		}
 	}
 
-	log ("Entering main loop");
+	log (id, " Entering main loop");
 	for (var integer num_pkts := 0; num_pkts < 50; num_pkts := num_pkts + 1) {
 		var integer ran_index := 0;
 		//BSSGP[ran_index].send(ts_BSSGP_UL_UD(g_pars.tlli, g_pars.bssgp_cell_id[ran_index], llc_enc));
 		BSSGP[ran_index].send(ts_LLC_UI(f_rnd_octstring(512), '0000'B, '1'B, 0))
 		f_sleep(0.5);
+		/* 512 bytes + 32 bytes HDR every 0.5s (1088/s) means about 8704/s per UE */
+		/* at 100 UE that ends up about 870 kBps */
 	}
+	log (id, "Leaving main loop");
 }
 
 function f_start_ue(void_fn fn, charstring id, GbInstance gb, integer imsi_suffix, BSSGP_BVC_CT bvc_comp, float t_guard := 40.0)