216 begin

   216 begin

   217 tmpflag:= true;

   217 tmpflag:= true;

   218 

   218 

   219 while (headcmd <> nil) and ((GameTicks = headcmd^.Time) or (headcmd^.cmd = 's')) do

   219 while (headcmd <> nil) and ((GameTicks = headcmd^.Time) or (headcmd^.cmd = 's')) do

   220 	begin

   220 	begin

   222 	case headcmd^.cmd of

   221 	case headcmd^.cmd of

   223 		'L': ParseCommand('+left', true);

   222 		'L': ParseCommand('+left', true);

   224 		'l': ParseCommand('-left', true);

   223 		'l': ParseCommand('-left', true);

   225 		'R': ParseCommand('+right', true);

   224 		'R': ParseCommand('+right', true);

   226 		'r': ParseCommand('-right', true);

   225 		'r': ParseCommand('-right', true);