original-war.net

By skorzystać z save , należy skopiować je do katalogu UserProfiles - znajdującego się w folderze z grą. Jeżeli nie znajdziesz tam folderu UserProfiles , możesz go utworzyć lub włączyć grę, wybrać opcję Kampania , przejść pierwszą misję gry lub stworzyć nowy profil o wybranym przez Ciebie nicku -...

Proszę zaraz o przyklejenie :disco:

Wielu z nas może mieć problemy z tzw. poziomem wody, gdy ustawiamy na naszej mapie żeby była woda (water) to i tak pisze ze jest - :

Jest to spowodowane tym że wielkość terenu jest większa od 0 (teraz 1)

1 kliknięcie (zaakceptowanie naszej wody) odpowiada...

Dobra, nieco Cię sprostuję xD

Te stałe odnoszą się do innej zmiennej, mianowicie...

music_class=VALUE;
Zmienna wymusza określony rodzaj muzyki, zależny od podanej VALUE:
music_auto = 0
music_combat = 1
music_prep = 2
music_recon = 3
music_victory = 4
music_menu = 5
Przykład:...

Utrzymać pozycje
ComHold(units:plist);

Spocznij
ComFree(humans:plist);

Częściowa niewidzialność
ComInvisible(humans:plist);

Tryb czolgania
ComCrawl(humans:plist);

Tryb powstania
ComWalk(humans:plist));

Podstawienie czasowego ładunku
ComPlaceDelayedCharge(humans:plist, x:integer,...

po paru minutach: Ha xD wyobraź sobie, że kod działa poprawnie bez jednego if (w obu przypadkach) xD
Export czolg1,czolg2;

Every 0$1 trigger GetDistUnits(fac1,abc)<10 or GetDistUnits(fac1,abc1)<10 or GetDistUnits(fac1,abc2)<10 do
Begin
czolg1 = addcomconstruct(fac1,...

Mam aree, w której jest kilka naukowców, mechaników, inżytnierów i żołnierzy. Sęk tkwi w tym, że potrzebuje wybrać z nich (pomijając mechaników i naukowców) 2-óch najlepszych naukowców za pomocą filtru

FilterUnitsInArea(area37,([ , , ])) >7;

Coś takiego nie wiem pokombinuj. Niesprawdzałem,...

co do losowych poziomów to

begin
PrepareSoldier(0,rand(min_level,max_level);
sol=CreateHuman;
end;

na losowego żolnierza :p

Author: Birkart
Topic:

Masz tu kod, ale jeśli jakiś inżynier będzie na danej arei wtedy pójdzie budować.

export inzynierki;
starting
begin
inzynierki:=FilterUnitsInArea(area,([ , , ]));
end;

Every 0$1 Marked 01 do
begin
ComBuild(inzynierki, b_oil_mine, x, y, strona budynku);
end;

// gdzies tam w kodzie wystarczy...

Masz tu gotowy u mnie działa elegancko.

every 0$5 trigger GetListOfCratesInArea(am_crates) do
var clear_crates;
begin
enable;
crate_list:=GetListOfCratesInArea(am_crates);

if IsLive(add) then
ComCollect(add,crate_list ,crate_list )
else
ComGet(add,crate_list ,crate_list );...

a na leczenie:
every 0$1 GetLives(czolg1)<550 do
Begin
ComMoveXY(czolg1,xx,yy);
ComExitVehicle(kierowcaczolgu1);
AddComRepairVehicle(kierowcaczolgu1,czolg1);
repeat
Begin
Wait(0$2);
end
until GetLives(czolg1)=1000;
ComEnterUnit(kierowcaczolgu1,czolg1);
AddComMoveXY(czolg1,novexx,noveyy);...

chodzi ci o dowolne auta? znaczy nie precyzujesz jaka bron, podwozie itp.?

every 0$01 FillterUnitsInArea(jakas_area,[ , ])>=4 do
begin
jakis tam kod;
end;

mozna tez dodac marked

Author: Birkart
Topic:

ComCrawl(units:plist);

ComWalk(units:plist) ;

tu akurat jest włąsciwa komenda na cołganie sie jednostki. Co prawda nie ma tu żadnych innych omend więc jednostka błyskawicznie po upadnieciu sie podniesie. Możesz w srodek włożyć np komende AddComMoveXY(Kolo,11,22); wtedy koleś po dojsciu do...

Jeśli chodzi ci o to, jeżeli 1 osoba wejdzie nic się nie stanie. Dopiero jak razem będą na arei wtedy od zadziała? jeśli tak masz tu:

every 0$1 trigger IsInArea(gostek,area) or IsInArea(gostek2,area) do
Begin
Say(gostek,'A');
Say(gostek2,'A1');
End;

every 0$1 trigger IsInArea(gostek,area) or...

miny amerykanskie i rosyjskie mozna wysadzac tylko przy pomocy saila

AddComFireExplosives(human);

gdzie human to ludzik ktory podstawil mine

Author: Birkart
Topic:

Imo najlepiej zrobić to za pomocą funkcji. I tak w jednej misji:
export function carsaving(idi,nazwa)
var i;
Begin
i= ;
SaveVariable(i,nazwa);
end;

// przy zapisywaniu:

carsaving(pojazd1,'zapispojazdu1');
a w następnej misji:
export pojazd1, pojazd2, pojazd3, pojazd4, pojazd5;

export function...

W nowej misji
export function funkcja;
begin
if not funkcja_ze_starej_misji then // lub bez not oczywiście
begin
end;

W starej funkcje spisz i wykorzystaj komendę, którą goth ci dał...

Nie przesadzaj Antitheus :P Wystarczy zapisać wartość. Robisz query kiedy pojawia się zakładnik i...

A co do losowych poziomów żołnierzy, to jeśli chcesz ich robić masowo to robisz to funkcją:
Export Function hcreation(name);
Begin
hc_sex=Rand(1,2);
hc_attr= ;
hc_skills= ;
name=CreateHuman;
end;
no i tworzysz ludzi:
hcreation(soldat1);
a jeśli to pojedyńcze ludki to określając odpowiednie...

Ja zrobiłbym to nieco inaczej :)
export counter;
Export Function atakx3;
Begin
for counter <= 3 do
Begin
counter += 1 { nie wiem czy '+=' zadziała w SAILu... jeśli nie zmienisz to na
counter = counter +1 }
// kod ataku
Wait(10$0);
end;
end;
i gdzieś po Starting lub jakimś warunku:
counter...

if you are using the LoadCharacter function (Which was designed by Radzio) then it does the following (Below is the sail version, you do not need to have the SAIL version in your code as LoadCharacter was made into an actual command).

export function LoadCharacter(ident,klasa,number);
begin
if...

No więc odnośnie CharacterSelection:
var wybrani;
Begin
wybrani=CharacterSelection('napis',2,5, ^dowybrania^ , ;
wybrani - ident grupy wybranych postaci,
'napis' - nazwa napisu który ma być w selekcji, nazwa z Texts.txt,
wybierasz od 2 do 5 postaci,
hero - ident ludzika którym dowodzisz, jest...

every 0$0.1 trigger IsInArea(Anti, area) do
begin
SetSide(FilterAllUnits( ), GetSide(Anti));
SetAreaMapShow(area,0);
SetAreaMapShow(innaarea,9);
end;

Author: Gothuk
Topic:

Proszę bardzo.

1. Ściągasz moda.

2. Instalacja:
a) Jeśli mod jest w postaci archiwum (*.zip, *.rar) to wypakowujesz zawartość do folderu mods w katalogu głównym Twojego Original War.
b) Jeśli jest to instalka to wskazujesz poprawną ścieżkę do Twojego Original War albo do wspomnianego wyżej...

Lepiej zrób funkcję SetMedals; ze wszystkimi medalami. może wyglądać np tak

var filter, araby;

export function SetMedals;
begin
AddMedal('MEDAL',1);
begin
filter:=FilterAllUnits([ , ]);
begin
araby=FilterAllUnits([ , , ]);
if filter>=araby then
begin
AddMedal('vehicles',1)
end
else
begin...

hmm nie ma kodu na niesmiertelnosc
jedyne co przychodzi mi na mysl to :

export function immortal(unit);
begin
live = GetLives(unit);
while live marked 02 do
begin
disable (01);
End;

a nóż zadziała ^^

Author: Gothuk & Lucyfer
Topic:

w poprzednij misji dajesz na końcu w kodzie

/// jakis kod
RewardPeople(mar);
SaveCharacters(mar,'mar');
YouWin;
end;

a co do kodu wyzej zmiań na

Starting
Begin
ResetFog;
end;
EXPORT mar;

mar=CreateCharacter('mar');
PlaceUnitArea (mar,JAKAS AREA,true);
end;

Author: Jeanks
Topic:

on BuildingCaptured(building,side,unit) do
begin
// kod
end;

every 0$0.1 trigger GetSide(building)=1 do // =1 to am, 2 rus itd ... begin
// kod
end,

Author: Gothuk
Topic:

chodzi ci o cos w tym stylu:
SetSide(FilterAllUnits( ), 1); :?:

Author: Gothuk
Topic:

do zmiany zachowania słuzy komena:
SetAttitude(fromside:integer toside:integer att:integer sym:boolean);
sets attitude to att (if sym then sets the symetric relation too)

w att mozesz wstawić jedno z:
att_neutral
att_friend
att_enemy
lub ich odpowiedniki w liczbach czyli kolejno 0, 1, 2....

Plik texts.txt powinien być w Mod/Mission/Nacja (np.Am)/(nr misji) (np. Mod/Mission/Am,/01 ), a jeżeli chcesz żeby dialogi miały być w kampanii to powinieneś dać to do Mod/Campaing/Nacja(np. Am) i (nazwa pliku) Txt(nr misji).wri np Txt01.wri a jeżeli robił być w kilku językach to powinno być tak...

units - jednostki
plist - lista
czyli lista jednostek, ktore maja robic dany pojazd

identyfikatory do budynku mozna robic:

tworzac budynek w edytorze wpisujesz jedo id w odpowiednie miejsce.
filtrowaniem np lab = FilterAllUnits([ , , ]);
nie wiem czy sie tak da, ale powinno. przy stawianiu...

Jeśli chcesz żeby gra się zatrzymała na czas dialogu to:

DialogueOn;
SayRadio(soldat1,'Dialog1');
DialogueOff;

A jeśli gra ma się toczyć i ma mówić:

InGameOn;
SayRadio(soldat1,'Dialog1');
IngameOff;

Author: RiderWolf
Topic:

Tak, w edytorze masz okienko zmiany kolorów i nie tylko dla trawy. Górne menu: Windows --> Inter. configs Visible. Tam z prawej strony na górze wybierasz Add i jako type podajesz grass . Akceptujesz i po prawej na dole możesz dodać parametry, jakie chcesz zmienić w wyglądzie. Nawet są podobne opcje...

Wystarczyło użyć kodu
every 0$1 trigger GetSide(kolo)=2 and GetSide(kolo2)=2 do
begin
kod;
end;

Chyba się nikt nie obrazi, jeśli powiem, że ambitniej było by użyć coś związanego z tym;P

every 0$1 trigger filterallunits([ , ])=4 do
begin
//kod
end;

Author: Gogeta103 & Anarchy
Topic:

every 0$0.1 marked 001 do
begin
AddComMoveXY(ktos, x1, y1);
AddComMoveXY(ktos, x2, y2);
enable;
end;
a gdzies w kodzie:
enabled(001);

dla kilku osob:
every 0$0.1 marked 001 do
begin
ludzie = // itd.
AddComMoveXY(ludzie, x1, y1);
AddComMoveXY(ludzie, x2, y2);
enable;
end;

btw. o...

nic trudnego

every 10$0 trigger getdistunits(ktos1, ktos2)<10 do
begin
// kod
end;

dodajesz tylko warunek (trigger) po jakim petla sie wykona, w tym przypadku kiedy ktos2 zobaczy ktos1.
getdistunits zwraca odleglosc miedzy jednostkami.

Tak, aby użyć to do kilku osób należy dodać or i...

Co do laboratorium:

export budovy, depot, deport,buii;
on BuildingComplete(build) do
begin
budovy:=budovy union build;

if GetBType(build)=b_lab then begin
//kod;
end;
end;

Co to małp:
every 0$1 trigger FilterAllUnits( )>=5 do
begin
//kod;
end;

class_apeman - Czyli zwykłe małpy a jeżeli...

export czolg1, czolg2;

Starting
Begin
czolg1 = ComConstruct();
czolg2 = AddComConstruct();
enable(01);
end;

Przeanalizuj sobie powyższy kod i ten tekst. Chcesz, żeby wróg wyprodukował pojazd w fabryce. Od tego jest funkcja ComConstruct. (Nie wpisałem jej tutaj z wymaganymi, parametrami, tylko...

W budynku, czy normalnie. Do tego pierwszego sposobu:
AddComChangeProfession(noob, class_nooba); . Do drugiego chyba nie ma sposobu. Możesz po prostu usunąć jednostkę i dodać taką samą \ inną jednostką.

Do drugiego chyba nie ma sposobu. Możesz po prostu usunąć jednostkę i dodać taką samą \ inną...

Edytuj plik: \Campaigns\#POL\headers.wri
Przykład: #Moja kampania //komentarz
__am\01 //lokalizacja mapy w folderach
1. Moja pierwsza misja //Nazwa misji
Briefing //rozpoczęcie odprawy
Jest to moja pierwsza misja stworzona do testowania różnych komend w SAILu. //odprawa
Co-ordinates //rozpoczęcie...

Nie zauważyłem tego na forum, więc postanowiłem napisać:
ComPlaceRemoteCharge(identyfikator_postaci,x,y,0);
Wartości x i y to współrzędne ładunku, a 0 (zero) to obrót (interesujące). Co jeszcze ciekawego? Ładunek mogą podstawiać również żołnierze amerykańscy i rosyjscy...

Author: Backero...

Po otrzymaniu ostatniego maila od gracza, postanowiłem opisać tę kwestię także tutaj.

Co zrobić, gdy nowo wykonana lub dodana do gry misja nie chce się uruchomić?

Pierwszą rzeczą, jaką powinniśmy zweryfikować w takim przypadku jest poprawność zastosowanej ścieżki dostępu do plików. Nowa mapa,...

Konkretnie chodzi o ostatni fragment kodu: every 0$1 trigger IsInArea(heros,Area02) do
Begin
Case Query( Zapytanie1 ) of
1 : begin
ComEnterUnit(kolo1,eon);
Wait(0$3);
ComEnterUnit(kolo2,eon);
Wait(0$3);
ComEnterUnit(kolo3,eon);
Wait(0$3);
ComEnterUnit(heros,eon);
AddMedal('med1',1);...

To działa tak:
NEXTM ILOŚĆ_MOŻLIWOŚCI MOŻLIWOŚĆ1 MOŻLIWOŚĆ2 ...
A później SetNextMission(1); przeniesie do misji MOŻLIWOŚĆ1, a SetNextMission(2); do misji MOŻLIWOŚĆ2 itd. YouWin już nie potrzeba. ;)
A i zapomniałem dodać, że może być tylko do 3 możliwości. ;)

Author: Radzio
Topic:

Mod = nazwa moda
Mod_Ver = wersja moda
Mod_Music = muzyka w menu głównym moda (plik .wav)
Mod_Ver_Align = 1 // położnie tekstu z wersją, 1 - lewy dolny róg, 2 i inne - prawy dolny róg.
CreditsDark1 = x
CreditsDark2 = y // x i y to współrzędne, które określają gdzie napisy w creditsach mają...

Normalnie dajesz, jak kierowca jest już w pojeździe:

AddComMoveXY(kierowca,x,y);

Author: Odyseusz
Topic:

kod to:
ComExit(ciół_z_budynku);
Note: Przy pojazdach ComExitVehicle(koles);

Author: Radzio
Topic:

Info: Cele misji:

Co do technologi to wiem, nie wiem tylko jak to wygląda w przypadku budynków. Nie chce mi się pisac dokładnie, więc wrzucam po prostu część kodu mojej misji 4:

every 0$1 trigger IsInArea(Kowalski,exit) do
Begin
AddMedal('MED1',1); /// ten dostaje się zawsze
AddMedal('MED2',1);...

Dajesz to, 'zolnierz' to postać która przechodzi na stronę 'heros'

SetSide(zolnierz,GetSide(heros));

Author: Odyseusz
Topic:

Kod Odysa jest uniwersalny pod takim względem, że zawsze zmieni kolor żołnierza na herosa , niezależnie od tego, do jakiej strony należy heros. Jeżeli chcesz zmienić kolor na konkretną stronę 0-natura 1-Amerykanie1 2-Arabowie1 3-Rosjanie1 4-Amerykanie2 5-Arabowie2 6-Rosjanie2 7-Przymierze 8-Legion...

A to o co sie pytales, da sie :P Wystarczy kazac reszcie tam isc np.
ComMoveToArea(wszyscy diff select,area);
W zalozeniu, ze wszyscy to wszyscy (doslownie wszyscy) ludzie uzywani w wyborze postaci.

Author: Radzio
Topic: