Otóż ostatnio mnie naszło na robienie mapek ale kompletnie nie ogarniam tych skryptów a teraz to bez tego ani rusz x.x Dlatego zwracam się do was o pomoc
Staram się zrozumieć jak one działają ale nie zbyt mi to wychodzi x.xNapisałem jak narazie coś takiego :
Kod: Zaznacz cały
procedure OnTick;
begin
if States.GameTime = 10 then
Actions.ShowMsg(-1, 'Przykładowy tekst');
end;
procedure OnPlanRoadPlaced (aIndex, X, Y: Integer);
begin
case [((X = 119)and (Y = 64)),((X = 122)and (Y = 64))]of
((X = 119)and (Y = 64)):
begin
Actions.PlanRemove(0,119,64);
Actions.GiveRoad (0,119,64);
Actions.PlayerAllianceChange(0, 2, true, false);
Actions.PlayerAllianceChange(1, 2, true, false);
end;
if ((X = 122)and (Y = 64)) :
begin
Actions.PlanRemove(0,122,64);
Actions.GiveRoad (0,122,64);
Actions.PlayerAllianceChange(0, 3, true, false);
Actions.PlayerAllianceChange(1, 3, true, false);
end;
end;
end;
