Delete/pl
From Original War Support Wiki
SAIL Functions/pl -> Delete/pl
Contents |
Opis
Funkcja Delete usuwa wartość/jednostkę z listy. Zwraca listę bez podanego elementu.
Szablon
Delete(list:plist index:integer)
list - lista, z której element ma być usunięty
index - numer/nazwa elementu do usunięcia
Użycie
nowa_lista := Delete(lista, element);
nowa_lista - nazwa listy, do której zostanie zapisana lista bez usuwanego elementu
Przykład
export soldier1, soldier2, soldier3, SoldierList; function PrepareSoldiers(); begin InitUc; InitHc; uc_side := 1; // niebiescy uc_nation := nation_arabian; hc_name := 'Zbigniew Pompa'; soldier1 := CreateHuman; hc_name := 'Zdzisław Pompa'; soldier2 := CreateHuman; hc_name := 'Stefan Pompa'; soldier3 := CreateHuman; end; starting begin PrepareSoldiers(); PlaceUnitXY(soldier1, 26, 20, false); PlaceUnitXY(soldier2, 27, 22, false); PlaceUnitXY(soldier3, 28, 24, false); //----------------------------------- SoldierList := [soldier1, soldier2, soldier3]; // utwórz listę ComMoveXY(SoldierList, 19, 22); AddComHold(SoldierList); //----------------------------------- SoldierList := Delete(SoldierList, soldier3); // usuń żołnierza z listy AddComMoveXY(SoldierList, 26, 19); AddComHold(SoldierList); //----------------------------------- SoldierList := Delete(SoldierList, soldier2); // usuń żołnierza z listy AddComMoveXY(SoldierList, 31, 29); AddComHold(SoldierList); end;
Powyższy kod utworzy trzech żołnierzy i rozkaże im ustawić się w trójkącie.