@echo off title Screen 60x20 color 08 set/a law=0 set/a sidea=61 set/a sideb=120 set marker=O set barrier=X set empty=- set/a place=202 echo. :LawLoop if %law%==1200 goto ScreenLoop set/a law=%law% +1 if %law% LSS 61 ( set v%law%=%barrier% goto LawLoop ) if %law% GTR 1140 ( set v%law%=%barrier% goto LawLoop ) if %law%==%sidea% ( set v%law%=%barrier% set/a sidea=%sidea% +60 goto LawLoop ) if %law%==%place% ( set v%law%=%marker% goto LawLoop ) rem if %law%==422 ( rem set v%law%=%barrier% rem goto LawLoop rem ) if %law%==%sideb% ( set v%law%=%barrier% set/a sideb=%sideb% +60 echo * goto LawLoop ) else ( set v%law%=%empty% goto LawLoop ) :ScreenLoop cls call screen.bat set shove=y rem start move.vbs set/p shove= if %shove%==w goto Up if %shove%==s goto Down if %shove%==d goto Right if %shove%==a goto Left goto ScreenLoop :Up set/a spotcheck=%place% -60 set checker=%% set checker=%checker%v%spotcheck% set checker=%checker%%% echo set spotcheck=%checker%>spotcheck.bat call spotcheck.bat if %spotcheck%==%barrier% goto ScreenLoop set v%place%=%empty% set/a place=%place% -60 set v%place%=%marker% goto ScreenLoop :Down set/a spotcheck=%place% +60 set checker=%% set checker=%checker%v%spotcheck% set checker=%checker%%% echo set spotcheck=%checker%>spotcheck.bat call spotcheck.bat if %spotcheck%==%barrier% goto ScreenLoop set v%place%=%empty% set/a place=%place% +60 set v%place%=%marker% goto ScreenLoop :Right set/a spotcheck=%place% +1 set checker=%% set checker=%checker%v%spotcheck% set checker=%checker%%% echo set spotcheck=%checker%>spotcheck.bat call spotcheck.bat if %spotcheck%==%barrier% goto ScreenLoop set v%place%=%empty% set/a place=%place% +1 set v%place%=%marker% goto ScreenLoop :Left set/a spotcheck=%place% -1 set checker=%% set checker=%checker%v%spotcheck% set checker=%checker%%% echo set spotcheck=%checker%>spotcheck.bat call spotcheck.bat if %spotcheck%==%barrier% goto ScreenLoop set v%place%=%empty% set/a place=%place% -1 set v%place%=%marker% goto ScreenLoop