hedgewars/hwengine.dpr
changeset 2154 3d2917be12c3
parent 2152 a2811690da1b
child 2161 0c8634241fa4
equal deleted inserted replaced
2153:e41fdfaa8edd 2154:3d2917be12c3
   303 		
   303 		
   304 		for p:= Succ(Low(TPathType)) to High(TPathType) do
   304 		for p:= Succ(Low(TPathType)) to High(TPathType) do
   305 			if p <> ptMapCurrent then Pathz[p]:= PathPrefix + '/' + Pathz[p]
   305 			if p <> ptMapCurrent then Pathz[p]:= PathPrefix + '/' + Pathz[p]
   306 	end;
   306 	end;
   307  15: begin
   307  15: begin
       
   308 		PathPrefix:= ParamStr(1);
       
   309 		recordFileName:= ParamStr(2);
   308 		if ParamStr(3) = '--set-everything' then
   310 		if ParamStr(3) = '--set-everything' then
   309 		begin
   311 		begin
   310 			val(ParamStr(4), cScreenWidth);
   312 			val(ParamStr(4), cScreenWidth);
   311 			val(ParamStr(5), cScreenHeight);
   313 			val(ParamStr(5), cScreenHeight);
   312 			cInitWidth:= cScreenWidth;
   314 			cInitWidth:= cScreenWidth;
   366 LoadLocale(Pathz[ptLocale] + '/' + cLocaleFName);
   368 LoadLocale(Pathz[ptLocale] + '/' + cLocaleFName);
   367 
   369 
   368 if recordFileName = '' then
   370 if recordFileName = '' then
   369 	SendIPCAndWaitReply('C')        // ask for game config
   371 	SendIPCAndWaitReply('C')        // ask for game config
   370 else
   372 else
       
   373  begin
   371 	LoadRecordFromFile(recordFileName);
   374 	LoadRecordFromFile(recordFileName);
       
   375  end;
   372 
   376 
   373 s:= 'eproto ' + inttostr(cNetProtoVersion);
   377 s:= 'eproto ' + inttostr(cNetProtoVersion);
   374 SendIPCRaw(@s[0], Length(s) + 1); // send proto version
   378 SendIPCRaw(@s[0], Length(s) + 1); // send proto version
   375 
   379 
   376 InitTeams;
   380 InitTeams;