hedgewars/uScript.pas
changeset 13627 605767bbd022
parent 13618 edffc9b7ad58
child 13642 3d14950641a4
equal deleted inserted replaced
13626:2bdbef3f534c 13627:605767bbd022
  3374 ScriptSetInteger('MapFeatureSize', cFeatureSize);
  3374 ScriptSetInteger('MapFeatureSize', cFeatureSize);
  3375 ScriptSetInteger('ScreenHeight', cScreenHeight);
  3375 ScriptSetInteger('ScreenHeight', cScreenHeight);
  3376 ScriptSetInteger('ScreenWidth', cScreenWidth);
  3376 ScriptSetInteger('ScreenWidth', cScreenWidth);
  3377 ScriptSetInteger('TurnTime', cHedgehogTurnTime);
  3377 ScriptSetInteger('TurnTime', cHedgehogTurnTime);
  3378 ScriptSetInteger('CaseFreq', cCaseFactor);
  3378 ScriptSetInteger('CaseFreq', cCaseFactor);
       
  3379 ScriptSetInteger('MaxCaseDrops', cMaxCaseDrops);
  3379 ScriptSetInteger('HealthCaseProb', cHealthCaseProb);
  3380 ScriptSetInteger('HealthCaseProb', cHealthCaseProb);
  3380 ScriptSetInteger('HealthCaseAmount', cHealthCaseAmount);
  3381 ScriptSetInteger('HealthCaseAmount', cHealthCaseAmount);
  3381 ScriptSetInteger('DamagePercent', cDamagePercent);
  3382 ScriptSetInteger('DamagePercent', cDamagePercent);
  3382 ScriptSetInteger('RopePercent', cRopePercent);
  3383 ScriptSetInteger('RopePercent', cRopePercent);
  3383 ScriptSetInteger('MinesNum', cLandMines);
  3384 ScriptSetInteger('MinesNum', cLandMines);
  3406 cFeatureSize     := ScriptGetInteger('MapFeatureSize');
  3407 cFeatureSize     := ScriptGetInteger('MapFeatureSize');
  3407 GameFlags        := ScriptGetInteger('GameFlags');
  3408 GameFlags        := ScriptGetInteger('GameFlags');
  3408 WorldEdge        := TWorldEdge(ScriptGetInteger('WorldEdge'));
  3409 WorldEdge        := TWorldEdge(ScriptGetInteger('WorldEdge'));
  3409 cHedgehogTurnTime:= ScriptGetInteger('TurnTime');
  3410 cHedgehogTurnTime:= ScriptGetInteger('TurnTime');
  3410 cCaseFactor      := ScriptGetInteger('CaseFreq');
  3411 cCaseFactor      := ScriptGetInteger('CaseFreq');
       
  3412 cMaxCaseDrops    := ScriptGetInteger('MaxCaseDrops');
  3411 cHealthCaseProb  := ScriptGetInteger('HealthCaseProb');
  3413 cHealthCaseProb  := ScriptGetInteger('HealthCaseProb');
  3412 cHealthCaseAmount:= ScriptGetInteger('HealthCaseAmount');
  3414 cHealthCaseAmount:= ScriptGetInteger('HealthCaseAmount');
  3413 cDamagePercent   := ScriptGetInteger('DamagePercent');
  3415 cDamagePercent   := ScriptGetInteger('DamagePercent');
  3414 cRopePercent     := ScriptGetInteger('RopePercent');
  3416 cRopePercent     := ScriptGetInteger('RopePercent');
  3415 cLandMines       := ScriptGetInteger('MinesNum');
  3417 cLandMines       := ScriptGetInteger('MinesNum');