equal
deleted
inserted
replaced
175 for i:= 0 to ParamCount do |
175 for i:= 0 to ParamCount do |
176 AddFileLog(inttostr(i) + ': ' + ParamStr(i)); |
176 AddFileLog(inttostr(i) + ': ' + ParamStr(i)); |
177 {$ENDIF} |
177 {$ENDIF} |
178 |
178 |
179 case ParamCount of |
179 case ParamCount of |
180 12: begin |
180 13: begin |
181 val(ParamStr(2), cScreenWidth); |
181 val(ParamStr(2), cScreenWidth); |
182 val(ParamStr(3), cScreenHeight); |
182 val(ParamStr(3), cScreenHeight); |
183 cBitsStr:= ParamStr(4); |
183 cBitsStr:= ParamStr(4); |
184 val(cBitsStr, cBits); |
184 val(cBitsStr, cBits); |
185 val(ParamStr(5), ipcPort); |
185 val(ParamStr(5), ipcPort); |
188 cLocaleFName:= ParamStr(8); |
188 cLocaleFName:= ParamStr(8); |
189 val(ParamStr(9), cInitVolume); |
189 val(ParamStr(9), cInitVolume); |
190 val(ParamStr(10), cTimerInterval); |
190 val(ParamStr(10), cTimerInterval); |
191 PathPrefix:= ParamStr(11); |
191 PathPrefix:= ParamStr(11); |
192 cShowFPS:= ParamStr(12) = '1'; |
192 cShowFPS:= ParamStr(12) = '1'; |
|
193 cAltDamage:= ParamStr(13) = '1'; |
193 for p:= Succ(Low(TPathType)) to High(TPathType) do |
194 for p:= Succ(Low(TPathType)) to High(TPathType) do |
194 if p <> ptMapCurrent then Pathz[p]:= PathPrefix + '/' + Pathz[p]; |
195 if p <> ptMapCurrent then Pathz[p]:= PathPrefix + '/' + Pathz[p]; |
195 AddClouds |
196 AddClouds |
196 end; |
197 end; |
197 3: begin |
198 3: begin |