828 // push game variables so they may be modified by the script |
828 // push game variables so they may be modified by the script |
829 ScriptSetInteger('GameFlags', GameFlags); |
829 ScriptSetInteger('GameFlags', GameFlags); |
830 ScriptSetString('Seed', cSeed); |
830 ScriptSetString('Seed', cSeed); |
831 ScriptSetInteger('TurnTime', cHedgehogTurnTime); |
831 ScriptSetInteger('TurnTime', cHedgehogTurnTime); |
832 ScriptSetInteger('CaseFreq', cCaseFactor); |
832 ScriptSetInteger('CaseFreq', cCaseFactor); |
833 ScriptSetInteger('LandAdds', cLandAdditions); |
833 ScriptSetInteger('MinesNum', cLandMines); |
834 ScriptSetInteger('Explosives', cExplosives); |
834 ScriptSetInteger('Explosives', cExplosives); |
835 ScriptSetInteger('Delay', cInactDelay); |
835 ScriptSetInteger('Delay', cInactDelay); |
836 ScriptSetInteger('Ready', cReadyDelay); |
836 ScriptSetInteger('Ready', cReadyDelay); |
837 ScriptSetInteger('SuddenDeathTurns', cSuddenDTurns); |
837 ScriptSetInteger('SuddenDeathTurns', cSuddenDTurns); |
838 ScriptSetString('Map', ''); |
838 ScriptSetString('Map', ''); |
849 // pop game variables |
849 // pop game variables |
850 ParseCommand('seed ' + ScriptGetString('Seed'), true); |
850 ParseCommand('seed ' + ScriptGetString('Seed'), true); |
851 ParseCommand('$gmflags ' + ScriptGetString('GameFlags'), true); |
851 ParseCommand('$gmflags ' + ScriptGetString('GameFlags'), true); |
852 ParseCommand('$turntime ' + ScriptGetString('TurnTime'), true); |
852 ParseCommand('$turntime ' + ScriptGetString('TurnTime'), true); |
853 ParseCommand('$casefreq ' + ScriptGetString('CaseFreq'), true); |
853 ParseCommand('$casefreq ' + ScriptGetString('CaseFreq'), true); |
854 ParseCommand('$landadds ' + ScriptGetString('LandAdds'), true); |
854 ParseCommand('$minesnum ' + ScriptGetString('MinesNum'), true); |
855 ParseCommand('$explosives ' + ScriptGetString('Explosives'), true); |
855 ParseCommand('$explosives ' + ScriptGetString('Explosives'), true); |
856 ParseCommand('$delay ' + ScriptGetString('Delay'), true); |
856 ParseCommand('$delay ' + ScriptGetString('Delay'), true); |
857 ParseCommand('$ready ' + ScriptGetString('Ready'), true); |
857 ParseCommand('$ready ' + ScriptGetString('Ready'), true); |
858 ParseCommand('$sd_turns ' + ScriptGetString('SuddenDeathTurns'), true); |
858 ParseCommand('$sd_turns ' + ScriptGetString('SuddenDeathTurns'), true); |
859 if ScriptGetString('Map') <> '' then |
859 if ScriptGetString('Map') <> '' then |
1037 ScriptSetInteger('gfBorder', gfBorder); |
1037 ScriptSetInteger('gfBorder', gfBorder); |
1038 ScriptSetInteger('gfDivideTeams', gfDivideTeams); |
1038 ScriptSetInteger('gfDivideTeams', gfDivideTeams); |
1039 ScriptSetInteger('gfLowGravity', gfLowGravity); |
1039 ScriptSetInteger('gfLowGravity', gfLowGravity); |
1040 ScriptSetInteger('gfLaserSight', gfLaserSight); |
1040 ScriptSetInteger('gfLaserSight', gfLaserSight); |
1041 ScriptSetInteger('gfInvulnerable', gfInvulnerable); |
1041 ScriptSetInteger('gfInvulnerable', gfInvulnerable); |
1042 ScriptSetInteger('gfMines', gfMines); |
|
1043 ScriptSetInteger('gfVampiric', gfVampiric); |
1042 ScriptSetInteger('gfVampiric', gfVampiric); |
1044 ScriptSetInteger('gfKarma', gfKarma); |
1043 ScriptSetInteger('gfKarma', gfKarma); |
1045 ScriptSetInteger('gfArtillery', gfArtillery); |
1044 ScriptSetInteger('gfArtillery', gfArtillery); |
1046 ScriptSetInteger('gfOneClanMode', gfOneClanMode); |
1045 ScriptSetInteger('gfOneClanMode', gfOneClanMode); |
1047 ScriptSetInteger('gfRandomOrder', gfRandomOrder); |
1046 ScriptSetInteger('gfRandomOrder', gfRandomOrder); |