hedgewars/uFLTeams.pas
branchqmlfrontend
changeset 11459 3c5d99013baf
parent 11451 321d0ce43568
child 11460 96decedd9400
equal deleted inserted replaced
11458:e7c7ca0c1556 11459:3c5d99013baf
    49 var i: Longword;
    49 var i: Longword;
    50 begin
    50 begin
    51     with team do
    51     with team do
    52     begin
    52     begin
    53         ipcToEngine('eaddteam <hash> ' + colorsSet[color] + ' ' + teamName);
    53         ipcToEngine('eaddteam <hash> ' + colorsSet[color] + ' ' + teamName);
       
    54         if extDriven then
       
    55             ipcToEngine('rdriven');
    54         for i:= 0 to Pred(hogsNumber) do
    56         for i:= 0 to Pred(hogsNumber) do
    55         begin
    57         begin
    56             ipcToEngine('eaddhh ' + inttostr(botLevel) + ' 100 hog');// + hedgehogs[i].name);
    58             ipcToEngine('eaddhh ' + inttostr(botLevel) + ' 100 ' + hedgehogs[i].name);
    57             //ipcToEngine('ehat ' + hedgehogs[i].hat);
    59             ipcToEngine('ehat ' + hedgehogs[i].hat);
    58         end;
    60         end;
    59     end
    61     end
    60 end;
    62 end;
    61 
    63 
    62 
    64