: VE clrscr 0acc 0 EDPOS ! modeM contents BEGIN status setpos KEY MODE @ EXECUTE UNTIL 18 aty ;