diff -r 839fd258ae6f -r e09f7c952a40 hedgewars/CCHandlers.inc --- a/hedgewars/CCHandlers.inc Fri Jan 20 19:02:50 2006 +0000 +++ b/hedgewars/CCHandlers.inc Sat Jan 21 16:18:19 2006 +0000 @@ -340,3 +340,30 @@ TurnTimeLeft:= 0 end; +procedure chSetMap(var s: shortstring); +begin +if isDeveloperMode then + begin + Pathz[ptMapCurrent]:= Pathz[ptMaps] + '/' + s; + InitStepsFlags:= InitStepsFlags or cifMap + end +end; + +procedure chSetTheme(var s: shortstring); +begin +if isDeveloperMode then + begin + Pathz[ptThemeCurrent]:= Pathz[ptThemes] + '/' + s; + InitStepsFlags:= InitStepsFlags or cifTheme + end +end; + +procedure chSetSeed(var s: shortstring); +begin +if isDeveloperMode then + begin + SetRandomParams(s, rndfillstr); + InitStepsFlags:= InitStepsFlags or cifRandomize + end +end; +