original-war.net

Mam pytanie co mam jeżeli chciałbym aby medal też zależał od tego czy zwiad mi ucieknie to co powinienem wpisać ?

Jak zatrzymac uzupelnianie expa przez misje w których jednostka nie brala udzialu? Konkretniej, chodzi mi o to, ze u mnie w modzie po 9. misji mamy rozgalezienie(10 i 10a), no i misja 10a musi mieć numer w edytorze alt. 12 (bo mniejszych nie ma; w missions.dat ma 16, ale to chyba bez znaczenia). W...

Funkcja zwraca prawdę jeśli dane koordynaty x,y należą do danej arei.

Export Function HexInArea(x, y, area);
var i, tmp, list;
begin
tmp := false;
list := AreaToList(area, 0);

for i = 1 to list do
begin
if list = x and list = y then
begin
tmp := true;
break;
end;
end;

result := tmp;
End;...

Does anyone have any SAIL code that they want made into a command? LoadCharacter for example was originally SAIL code by Radzio which was turned into a command because it was useful. One main benefit of commands is that they are faster than SAIL.

Funkcja pobiera danego typu (btype) dla strony (side).
Dla argumentu btype = -1 funkcja zwraca listę ze wszystkimi budynkami danej strony.

Export Function GetBuildingsList(side, btype);
var i, tmp, list;
begin
if btype = -1 then
tmp := FilterAllUnits([ , ])
else
tmp := FilterAllUnits([ , ]);...

Funkcja zwraca prawdę jeśli naukowiec (sci) chce leczyć jednostkę (unit).

Export Function WantHeal(sci, unit);
begin
if GetTaskList(sci) > 0 then
begin
if GetTaskList(sci) = 'l' and GetTaskList(sci) = unit then
result := true
else
result := false;
end
else
result := false;
End;

Export Function RandExplosionInArea(area, time, num);
var i, c, tmp;
begin
tmp := AreaToList(area, 0);
Randomize;

for i = 1 to num do
begin
c := Rand(1, tmp );
MineExplosion(tmp , tmp , 1);
Wait(time);
end;

End;

Funkcja powoduje losowe wybuchy w danej arei.

RandExplosionInArea(area,...

Napisalem sobie funkcje bombardujaca (wiem, smieszne brzmi xD), i jednym z jej ficzerow mialo byc, ze jesli bomba udezy niedaleko drzewa, to zostanie ono usuniete, lub zastapione zlamanym.

export function SetBombing(x,y,str);
var _x,_y,i,j;
begin
for i=1 to str do
begin
_x=Rand(x -...

Funkcja zwraca rozbudowy fabryki zadanej parametrem.

Export Function GetFacExt(factory);
var tmp, i, list;
begin
tmp := [];
list := [];

for i = 16 to 25 do
tmp := tmp ^ FilterAllUnits([[ , , ]]);

for i = 1 to tmp do
list := list ^ [[GetBType(tmp ), GetX(tmp ), GetY(tmp ), GetDir(tmp )]];...

Funkcja zwraca prawdę jeżeli jednostka chce zmienić swoją klasę na klasę = class.

Export Function WantChangeClass(unit, class);
var i;
begin

if GetTaskList(unit) then
begin
for i = 1 to GetTaskList(unit) do
if '!' = GetTaskList(unit) and
class = GetTaskList(unit) then
begin
result :=...

Zwraca prawdę jeżeli naukowiec o idencie unit chce skazić złoże o koordynatach x, y.

Export Function WantDestroySibDeposit(unit, x, y);
begin

if GetTaskList(unit) then
begin
if 'G' = GetTaskList(unit) and
x = GetTaskList(unit) and
y = GetTaskList(unit) then
result := true
else
result :=...

Funkcja zwraca prawdę jeśli jednostka (unit) zmierza na hexa o koordynatach x,y:

Export Function UnitGoingToXY(unit, x, y);
begin

if GetTaskList(unit) then
begin
if 'M' = GetTaskList(unit) and
x = GetTaskList(unit) and
y = GetTaskList(unit) then
result := true
else
result := false;
end...

Na prośbę Marta napisałem funkcję która zwraca prawdę jeśli jednostka (unit) chce rozmontować budynek (building).

Export Function WantDismantle(unit, building);
var x, y;
begin
x := GetX(building);
y := GetY(building);

if GetTaskList(unit) then
begin
if 'Y' = GetTaskList(unit) and
x =...

a więc no, zrobiłem taką mapkę
rozmiar: 160x214

tekstur było malutko, raptem 1 pagórek, 2 wzgórza i rzeczka.
Problem wystąpił w momencie gdy postawiłem trawę, serpek radził dodawać po trochu, zapisywać i wchodzić od nowa, ponieważ gdy zbyt dużo rzeczy dodałem bez takiego zapisu i resetu edytora...

Hi, napisałem mały program który umożliwia wczytanie klatek w formacie .bmp i wyświetlanie ich w sekwencji. Dzięki temu możemy sprawdzić jak będą wyglądać nasze animacje mapy w grze bez konieczności używania ow_editora.

Export Function GetDistUnitToSide(unit, side);
var tmp, dist;
begin
tmp := NearestUnitToUnit(FilterAllUnits( ), unit);
dist := GetDistUnits(unit, tmp);

if dist >= 9999 then
result := -1
else
result := dist;
End;

Funkcja zwraca odległość pomiędzy jednostką ( unit ) zadaną parametrem a daną...

Witam zastanawiał się chyba każdy jak całkowicie wyłączyć intro w OW. I przeglądając ostatnio pliki OW wpadłem na pewien pomysł by przestawić coś w pliku a otrzymałem wynik pozytywny.

Co trzeba zrobić by pominąć intro?
1. Wchodzimy w główny folder gry Original-War
2. Szukamy pliku eset(jeśli go...

Przy dodawaniu animacji do mapy za pomocą edytora w pliku mapy zapisuje się lokalizacja do danych klatek.

Problem leży w tym że zapisana lokalizacja to lokalizacja klatek na naszym komputerze, więc jeżeli ktoś odpali mapę z animacjami na innym komputerze gdzie ma zainstalowane OW w innej...

jakim cudem to:

McRepair(1, , ,[ , mcr_area_only, ,
, ])

kompiluje sie i dziala prawidlowo bez srednika na koncu? :D

Funkcja losująca to funkcja która zwraca losową liczbę z podanego zbioru liczb.

Najprostszą tego typu funkcją jest funkcja Rand:

Rand(min, max); // gdzie min oznacza dolny przedział liczb, a max górny.

Nieco bardziej rozbudową funkcją jest MultiRand:

MultiRand(min, max, c); // gdzie c...

Pewnie wielu z Was spotkało się z tym problemem. Chodzi mianowicie o to że jeśli umieścimy człowieka w bunkrze (nie w wieżyczce!) za pomocą PlaceHumanInUnit to zawsze jest on zwrócony w kierunku 0 (północy wschód).

Poniżej zamieszczam funkcję która rozwiązuje ten problem:

Export Function...

Hi, napisałem funkcję dla Nefarema która zwraca losowe koordynaty (hexy) z danego obszaru. Myślę że może się komuś przydać.

Poniżej znajduje się ulepszona funkcja.

// Losuj num razy punkty z obszaru pomiedzy koordynatami
Export Function RandPointsFromArea(x1, y1, x2, y2, num);
var list, i;...

Wiele razy słyszałem że ktoś chciał stworzyć dużą misje typu rpg składającą się z wielu map. Problem polegał na przełączaniu się map. Udało mi się jednak rozkminić to zagadnienie.

N
W M E
S

Zakładamy że każda litera to dana mapa. (mapy wsadźmy do folderu /missions/ __am ).
Mapa M to mapa...

W Original War wszystkie mapy zbudowane są z małych cegiełek tzw. hexów czyli symetrycznych sześcioboków.

Czasami może zajść potrzeba sprawdzenia co znajduje się na danym hexie (budynek, trawa czy czołg). Służy do tego specjalna funkcja:

HexInfo(x, y);

Jako parametry funkcja przyjmuje...

String to jak powszechnie wiadomo zmienne przechowujące znaki (ciągi znaków).
Ciągi znaków w SAIL'u zapisujemy pomiędzy znakami ' ' .

Przykład:
'macmilan' 'jurij' 'masza' 'kasza'

Do wyświetlania tego typu zmiennych w grze służy funkcja display_strings .

Display_Strings

Display_Strings :=...

Jak opracuje technologie jakas to zeby wlaczyl sie dialog i jak to zrobic?

Znalazłem buga w Indentify w sail editorze.
Funkcja ta jest dwuargumentowa, a jej opis w Indentify jest dla jednoargumentowej wersji, która nie działa :/

W SailFunctions tej funkcji nie ma.
Czy ktoś wie czym może być drugi argument?

Witam,
Czy ktoś wie czy i jak pisze się w SAILu return?
Sprawdzałem rozwiązanie pascalowe, ale nie działa :/

Every 0$1 Trigger GetDistUnits(frank1, NearestUnitToUnit(UnitFilter(Am04Ludzie1, ), frank1)) < 10 do

begin
//Am04Nearest1=NearestUnitToUnit(UnitFilter(Am04Ludzie1, ), frank1);
Am04Nearest1=NearestUnitToUnit(Am04Ludzie1, frank1);
Display_Strings=Am04Nearest1;

//InGameOn;...

every 10 trigger FilterUnitsInArea(A_tanks1,[ , ]) 10 do
var mech;
begin
for i in FilterUnitsInArea(A_tanks1, ) do
begin
if IsDrivenBy(i) 0 then
ComExitVehicle(IsDrivenBy(i));

SetSide(i,6);
end;

mech=NearestUnitToUnit(FilterAllUnits([ , , ]),UN_sasza);

wait(2);
DialogueOn;
if...

Zanim zacznę wszystko przeinstalowywać chciałym sprawdzić czy to tylko u mnie nie działają komendy, czy może najnowszy patch coś zepsuł. W temacie obok (kod ataku), pisałem o funkcji WantsToAttack. Teraz dochodzi jeszcze co najmniej UnitsInside. Taki o to prościutki kod, dla pewno prosto z PSFS i...

Eventy wywołują się wtedy gdy nastąpi dane zdarzenie. Przykładowo event(wydarzenie) BuildingComplete(b) wykona się za każdym razem gdy na mapie zostanie wybudowany budynek.

Przykład zastosowania eventu:
// chcemy aby licznik naliczał nam zabójstwa jednostek nie będących jednostkami...

Po dłuższym czasie wzięło mnie znów na powrót do modowania, podpalałem swoje stare misje, poprzypominałem sobie co i jak i okazało się, że darowałem sobie, gdy po dłuższym czasie nie mogłem zrozumieć czemu moje perfekcyjne kody na atak nie działają. Załozyłem więc sobie wczoraj nowa czystą mapkę,...

every 4$0 do
begin
ComConstruct(UN_fac1, ru_heavy_tracked, engine_siberite, control_manual, ru_heavy_gun);
AddComConstruct(UN_fac1, ru_heavy_tracked, engine_siberite, control_manual, ru_heavy_gun);
AddComConstruct(UN_fac1, ru_heavy_tracked, engine_siberite, control_manual, ru_heavy_gun);...

Jak zrobic zeby dialogi ktore prowadza bylo po polsku nie napisy tylko mowienie prosze o odp

Napisałem program w który umożliwia łatwiejsze tworzenie dialogów (przydatne dla początkujących).

Instrukcja jest raczej zbędna, program w 2 wersjach językowych.

Uwaga!
Program otwiera i zapisuje pliki w formacie ANSI a nie UNICODE.
Po zapisaniu pliku należy go Zapisać Jako za pomocą notatnika w...

Are people aware that you can Copy/Move terrain with the editor? I wasn't. The move selection mode will copy the Terrain Type and Height when you hold down shift (With CTRL held down it will move any units/trees and with ALT it will move not copy). It won't however re-create the background image...

Kiedy dodałem nową postać w \HN\Campaigns\Am\Start.txt
VARIABLES 0
CHARACTERS 7
Hidan 1
DEFINE
NAME Hidan
HUMAN 1 1 1
ATTR 11 11
SKILLS 4 2195 1 4582 2 2483 0 100
LAST_MISSION 1
CHAR @ 110 0
RANDSEED 0
VOICE 101 GALLERY Human 1
END_OF_DEFINE
Hidan_A 1
DEFINE
NAME Hidan
HUMAN 1 3...

Trapi mnie taki problem, w edytorze owszem można budynkom nadawać identy, ale budynki budowane w trakcie gry to całkiem inny wymiar, podpatrzone kawałki kodu czechów z Gammy nic nie dały, tam czesi przed komendą ComBuild pisali jakiś ident i znak równania, u mnie taki zabieg nic nie wnosi do gry....

Po pierwsze nie wiedziałem gdzie zamieścić post więc pisze tu.
Mam zdjęcie pulpitu w formacie .bmp (mam kilka .bmp 16,24,32 bitowe) zapisywałem w bmp w photoshopie i chciałem otworzyć programem GrndSec, lecz wyskoczył mi błąd:
not 256color bitmap! Możecie mi powiedzieć co robie nie tak?

@Edit...

Hi, pomyślałem że przydałaby się jakaś biblioteczka kodów SAILa. Stworzyłem więc malutki programik w którym znajduje się kilka zagadnień dot. SAILa. Obsługa jest dziecinnie prosta - po prostu wybieramy dane zagadnienie z listy i kilkamy Generuj.

Myślę że gdyby spodobałby się wam ten program to...

Niech mi ktoś wytłumaczy gdzie leży błąd i o co chodzi w tym errorze bo już nie mam do niego siły. Kod normalnie się kompiluje, nie widzę żadnego błędu w sailu z CreateCharacter. A 3 mapa (w jednej misji, 07_cont_cont) w dalszym ciągu się nie uruchamia.

General Info
------------
Application :...

Hi everybody!

Sorry that I write here in English, but I don't know if you observe the English section of OWN forum. I'd like to give you some my maps - you can use it as you think fit ;)

Here's a reference to the topic where I gave two maps ;)
I will try to add more maps ;)

Mam problem z celami misji.
mam w kodzie:
ChangeMissionObjectives('M1');

pracuje na mapie 2 misji rosyjskiej.
Mam wpisany dialog w pliku TXT1.wri,który znajduje się w /campaigns/am/#pol:

# M1
Add Main cel1
- cel.
#

odpalam moda w grze i wyskakuje mi cel misji- dotrzyj do L.P.Berii
a gdy...

Mamy aree, w ktorej dzieja sie rozne rzeczy, w zaleznosci, jakim pojazdem wjedziemy, czy tez wejdziemy tam na piechote. Gdy prowadzimy komora_2 lub komora_AR, wszystko jest OK, lecz gdy IsInUnit(sol3)=0, niezleznie, czy zmienna przenikniecie_dostepne jest true czy false odpala sie InGameOn;...

Szukam, szukam i znaleźć nie mogę. Więc niech ktoś mi powie - jak wgrać własne obrazy do tła w menu OW? Tak, żeby zamiast klasycznego menu i początkowej Syberii był mój własny obraz? :mrgreen:

Witam wszystkich. Ponieważ część userów próbuję pomagać w jakiś sposób obyć sie z SAILem grupie osób która ma z tym problem wychodzę z własną inicjatywą.

Postanowiłem nagrać video poradniki z poszczególnych funkcji które wybiorą sami zainteresowani projektem. Za każdym razem do wyboru będą trzy...