alias readbots {
	@ ab.n = 0
	@ ab.r = open(${ev.dir}/abots.ev R T)
	@ temp = 1
	@ abots = []
	while (temp) {
		@ temp = read($ab.r)
		if ([$temp]!=[]) {
			@ ab.n = ab.n + 1
			@ ab[$ab.n] = temp
			if (ab.n == 1) {
				@ abv.1 = fix.ab.n($ab[$ab.n])
				@ abv.2 = fix.ab.h($ab[$ab.n])
				@ abots = abv.1##[!]##abv.2
			}{
				@ abv.1 = fix.ab.n($ab[$ab.n])
				@ abv.2 = fix.ab.h($ab[$ab.n])
				@ abots = abots##[ ]##abv.1##[!]##abv.2
			}
		}
	}
	@ function_return = ab.n
}
