anchor.diff:  var
     doAddBeacon: Boolean;
   begin
  -  handId := aCommand.WordParams[2] - HAND_ID_AS_WORD_ADJ;
  +  handId := aCommand.SmallIntParams[2];
     // Beacon script event must always be run by all players for consistency
  -  gScriptEvents.ProcBeacon(handId, 1 + (aCommand.WordParams[0] div 10), 1 + (aCommand.WordParams[1] div 10));
  +  gScriptEvents.ProcBeacon(handId, 1 + (aCommand.SmallIntParams[0] div 10), 1 + (aCommand.SmallIntParams[1] div 10));
   
     doAddBeacon := False;
   
  
positive.code:     gicpt_Int2,     // gicArmyAttackHouse
      gicpt_Int1,     // gicArmyHalt
      gicpt_Int3,     // gicArmyFormation
      gicpt_Int1Word3,// gicArmyWalk
      gicpt_Int1,     // gicArmyStorm
      //II.      Unit commands
      gicpt_Int1,     // gicUnitDismiss
  
negative.code:     gicpt_Int2:       Result := Result + Format('[%10d,%10d]', [Data.Integers[0], Data.Integers[1]]);
      gicpt_Int3:       Result := Result + Format('[%10d,%10d,%10d]', [Data.Integers[0], Data.Integers[1], Data.Integers[2]]);
      gicpt_Int1Word3:  Result := Result + Format('[%10d,%10d,%10d,%10d]', [Data.Integers[0], Data.Words[2], Data.Words[3], Data.Words[4]]);
      gicpt_Int1SmInt3: Result := Result + Format('[%10d,%10d,%10d,%10d]', [Data.Integers[0], Data.SmallInts[2], Data.SmallInts[3], Data.SmallInts[4]]);
      gicpt_AnsiStr1:   Result := Result + Format('[%s]', [ReplaceStr(Data.AsAnsiString(0), #0, '#')]);
      gicpt_Ansi1Int2:  Result := Result + Format('[%s]', [ReplaceStr(Data.AsAnsiString(0), #0, '#')]);
      gicpt_Ansi1Int3:  Result := Result + Format('[%s]', [ReplaceStr(Data.AsAnsiString(0), #0, '#')]);
  