hedgewars/uCommandHandlers.pas
changeset 10455 e167cfdf6e80
parent 10439 7de934f2247c
child 10472 8d04cebedb16
equal deleted inserted replaced
10453:7e90d5856d56 10455:e167cfdf6e80
   578     exit;
   578     exit;
   579 
   579 
   580 if autoCameraOn then
   580 if autoCameraOn then
   581     begin
   581     begin
   582     FollowGear:= nil;
   582     FollowGear:= nil;
   583     AddCaption(ansistring('Auto Camera Off'), $CCCCCC, capgrpVolume);
   583     AddCaption(trmsg[sidAutoCameraOff], $CCCCCC, capgrpVolume);
   584     autoCameraOn:= false
   584     autoCameraOn:= false
   585     end
   585     end
   586 else
   586 else
   587     begin
   587     begin
   588     AddCaption(ansistring('Auto Camera On'), $CCCCCC, capgrpVolume);
   588     AddCaption(trmsg[sidAutoCameraOn], $CCCCCC, capgrpVolume);
   589     bShowFinger:= true;
   589     bShowFinger:= true;
   590     if not CurrentHedgehog^.Unplaced then
   590     if not CurrentHedgehog^.Unplaced then
   591         FollowGear:= CurrentHedgehog^.Gear;
   591         FollowGear:= CurrentHedgehog^.Gear;
   592     autoCameraOn:= true
   592     autoCameraOn:= true
   593     end
   593     end