@echo off
:begin
set a=%@select[themamen,1,25,25,55,Menu]
if not "%a" eq "" echo %@substr[%a,30]
%@substr[%a,30]
if not "%a" eq "" goto begin