equal
deleted
inserted
replaced
111 if s[1]='"' then |
111 if s[1]='"' then |
112 Delete(s, 1, 1); |
112 Delete(s, 1, 1); |
113 if s[byte(s[0])]='"' then |
113 if s[byte(s[0])]='"' then |
114 Delete(s, byte(s[0]), 1); |
114 Delete(s, byte(s[0]), 1); |
115 cScriptName:= s; |
115 cScriptName:= s; |
116 ScriptLoad(s) |
116 ScriptLoad(s, true) |
117 end; |
117 end; |
118 |
118 |
119 procedure chScriptParam(var s: shortstring); |
119 procedure chScriptParam(var s: shortstring); |
120 begin |
120 begin |
121 ScriptSetString('ScriptParam', s); |
121 ScriptSetString('ScriptParam', s); |
534 else |
534 else |
535 cPathz[ptMapCurrent]:= cPathz[ptMaps] + '/' + s; |
535 cPathz[ptMapCurrent]:= cPathz[ptMaps] + '/' + s; |
536 InitStepsFlags:= InitStepsFlags or cifMap |
536 InitStepsFlags:= InitStepsFlags or cifMap |
537 end; |
537 end; |
538 cMapName:= s; |
538 cMapName:= s; |
539 ScriptLoad('Maps/' + s + '/map.lua') |
539 ScriptLoad('Maps/' + s + '/map.lua', false) |
540 end; |
540 end; |
541 |
541 |
542 procedure chSetTheme(var s: shortstring); |
542 procedure chSetTheme(var s: shortstring); |
543 begin |
543 begin |
544 if isDeveloperMode then |
544 if isDeveloperMode then |