//TESH.scrollpos=90
//TESH.alwaysfold=0
function CodeGen_SaveToDisk takes string loadcode, string filename returns nothing
call PreloadGenClear()
call PreloadGenStart()
call Preload(loadcode)
call PreloadGenEnd(filename)
call ClearSelection()
endfunction
function CodeGen_Init takes nothing returns nothing
local integer i = 1
local integer b = udg_SaveLoad_Base
local integer m = udg_SaveLoad_MaxValue
loop
exitwhen i >= udg_SaveLoad_MaxValue
set udg_SaveLoad_Char[i] = SubString(udg_SaveLoad_Alphabet, i, i+1)
set i = i + 1
endloop
set udg_SaveLoad_Alphabet = SubString(udg_SaveLoad_Alphabet, 0, 1) + SubString(udg_SaveLoad_Alphabet, m + 1, b)
set udg_SaveLoad_Base = b - m
endfunction
function CodeGen_ConvertItem takes integer id returns integer
local integer i = 1
loop
exitwhen i > udg_SaveLoad_ItemCount
if (id == udg_SaveLoad_Item[i]) then
return i
endif
set i = i + 1
endloop
return 0
endfunction
function CodeGen_ConvertUnit takes integer id returns integer
local integer i = 1
loop
exitwhen i > udg_SaveLoad_HeroCount
if (id == udg_SaveLoad_Hero[i]) then
return i
endif
set i = i + 1
endloop
return 0
endfunction
function CodeGen_Encode takes integer i returns string
local integer b
local string s = ""
if i <= udg_SaveLoad_Base then
return SubString(udg_SaveLoad_Alphabet, i, i + 1)
endif
loop
exitwhen i <= 0
set b = i - (i / udg_SaveLoad_Base) * udg_SaveLoad_Base
set s = SubString(udg_SaveLoad_Alphabet, b, b + 1) + s
set i = i / udg_SaveLoad_Base
endloop
return s
endfunction
function CodeGen_StrPos takes string s returns integer
local integer i = 0
loop
exitwhen i > udg_SaveLoad_Base
if s == SubString(udg_SaveLoad_Alphabet, i, i + 1) then
return i
endif
set i = i + 1
endloop
return -1
endfunction
function CodeGen_Decode takes string s returns integer
local integer a = 0
loop
exitwhen StringLength(s) == 1
set a = a * udg_SaveLoad_Base + udg_SaveLoad_Base * CodeGen_StrPos(SubString(s, 0, 1))
set s = SubString(s, 1, 99)
endloop
return a+CodeGen_StrPos(s)
endfunction
function CodeGen_StringChecksum takes string in returns integer
local integer i = 0
local integer l = StringLength(in)
local integer t = 0
local integer o = 0
loop
exitwhen i >= l
set t = CodeGen_Decode(SubString(in, i, i + 1))
set o = o + t
set i = i + 1
endloop
return o
endfunction
function CodeGen_Color takes string char returns string
local integer i = 0
local integer l = StringLength(udg_SaveLoad_Full)
local string x = ""
loop
exitwhen i >= l
set x = SubString(udg_SaveLoad_Full, i, i + 1)
if char == x then
if (x=="0" or S2I(x) > 0) then
return udg_SaveLoad_Number + char + "|r"
elseif StringCase(x, false) == x then
return udg_SaveLoad_Lower + char + "|r"
elseif StringCase(x, true) == x then
return udg_SaveLoad_Upper + char + "|r"
endif
endif
set i = i + 1
endloop
return char
endfunction
function CodeGen_Format takes string s returns string
local integer i = 0
local integer x = StringLength(s)
local integer j = 1
local string s2 = ""
loop
exitwhen i >= x
set s2 = s2 + CodeGen_Color(SubString(s, i, i + 1))
if (j >= udg_SaveLoad_HyphenSpace and i != (x-1)) then
set j = 0
set s2 = s2 + udg_SaveLoad_SeperationChar
endif
set j = j + 1
set i = i + 1
endloop
return s2
endfunction
function CodeGen_Strip takes string s returns string
local integer i = 0
local integer x = StringLength(s)
local string out = ""
local string a = ""
loop
exitwhen i >= x
set a = SubString(s, i, i + 1)
if (a != udg_SaveLoad_SeperationChar) then
set out = out + a
endif
set i = i + 1
endloop
return out
endfunction
// yeeahh descriptive variables
function CodeGen_Load takes string s returns nothing
local string str = CodeGen_Strip(s)
local string tmp = ""
local string c = ""
local integer x = 0
local integer i = 1
local integer l = 0
local integer j = 1
local integer f = 0
local boolean b = true
set udg_SaveLoad_Valid = false
if (udg_SaveLoad_Security) then
loop
exitwhen i > 3
if (CodeGen_Decode(SubString(str, 0, i)) == CodeGen_StringChecksum(SubString(str, i, 999))) then
set udg_SaveLoad_Valid = true
set str = SubString(str, i, 999)
set i = 4
endif
set i = i + 1
endloop
endif
if (not udg_SaveLoad_Valid) then
set udg_SaveLoad_Error = "Invalid Code"
return
endif
set i = 0
set l = StringLength(str)
if (udg_SaveLoad_CheckName) then
set c = CodeGen_Encode(CodeGen_StringChecksum(GetPlayerName(GetTriggerPlayer())))
set i = StringLength(c)
if (c != SubString(str, l - i, i)) then
set udg_SaveLoad_Valid = false
set udg_SaveLoad_Error = "Wrong username"
return
endif
set l = l - i
endif
set i = 0
loop
exitwhen i >= l
set tmp = SubString(str, i, i + 1)
set b = true
set f = 0
set j = 1
loop
exitwhen f >= (udg_SaveLoad_MaxValue)
if (tmp == udg_SaveLoad_Char[f]) then
set j = f + 2
set udg_Load[x] = CodeGen_Decode(SubString(str, i + 1, i + (j)))
set b = false
set f = udg_SaveLoad_MaxValue
endif
set f = f + 1
endloop
if (b) then
set udg_Load[x] = CodeGen_Decode(tmp)
endif
set i = i + j
set x = x + 1
endloop
set udg_SaveLoad_Valid = true
endfunction
function CodeGen_Compile takes nothing returns string
local integer i = 0
local integer j = 0
local string out = ""
local string ln = ""
local string x = ""
loop
exitwhen i > udg_SaveCount
set x = CodeGen_Encode(udg_Save[i])
set j = StringLength(x)
if (j > 1) then
set out = out + udg_SaveLoad_Char[j-1]
endif
set out = out + x
set i = i + 1
endloop
if (udg_SaveLoad_CheckName) then
set out = out + CodeGen_Encode(CodeGen_StringChecksum(GetPlayerName(GetTriggerPlayer())))
endif
if (udg_SaveLoad_Security) then
set out = CodeGen_Encode(CodeGen_StringChecksum(out)) + out
endif
if udg_SaveLoad_SaveToDisk and GetLocalPlayer() == GetTriggerPlayer() then
call CodeGen_SaveToDisk(out, udg_SaveLoad_Directory + "\\" + udg_SaveLoad_Filename)
endif
return CodeGen_Format(out)
endfunction
Name | Type | is_array | initial_value |
AP1_Player | player | No | Player00 |
APG1_Player | force | No | Force00 |
Attach0_None | integer | No | 0 |
Attach1_HandLeft | integer | No | 1 |
Attach2_HandRight | integer | No | 2 |
Attach3_Base | integer | No | 3 |
AttachPoint | string | No | |
AttackingUnits | group | No | |
BoomExplodeUnits | group | No | |
BoomKillUnits | group | No | |
BoomSpot | location | No | |
Code | StringExt | No | |
CombatCheckTimer | timer | No | |
CurrentWaveInt | integer | No | |
DefendTimer | timer | No | |
DefendTimerWindow | timerdialog | No | |
DyingPathTarget | integer | No | |
EnableTower3Timer | timer | No | |
EnableTower4Timer | timer | No | |
EnableTower5Timer | timer | No | |
EnemyGate | destructable | No | |
EnemyGateUsers | integer | No | 0 |
Engineer01Cin | unit | No | |
Engineer02Cin | unit | No | |
Engineer03Cin | unit | No | |
Engineer04Cin | unit | No | |
EngineerForeman01 | unit | No | |
EngineerForeman02 | unit | No | |
EngineerForeman03 | unit | No | |
EngineerUnits | group | No | |
EngineerWorker01 | unit | No | |
EngineerWorker02 | unit | No | |
EngineerWorker03 | unit | No | |
EngineerWorkers | group | No | |
EnoughPlayers | boolean | No | |
EPitTower3 | unit | No | |
EPitTower4 | unit | No | |
EPitTower5 | unit | No | |
EscapeEffect01 | effect | No | |
EscapeEffect01Busy | boolean | No | |
EscapeEffect02 | effect | No | |
EscapeEffect02Busy | boolean | No | |
EscapeEffectRecent | boolean | No | |
ExodusMoveSpeed | real | No | 190.00 |
ExodusPeasants | group | No | |
ExodusTroops | group | No | |
ExodusUnits | group | No | |
ExpDisabledForKael | boolean | No | |
ExpDisabledForRavael | boolean | No | |
ExpDisabledForVashj | boolean | No | |
ExplosiveArt | string | No | |
FF_AllowCliffs | boolean | Yes | |
FF_AllowedToKeepMoving | boolean | Yes | |
FF_AllowWater | boolean | Yes | |
FF_Angle | real | Yes | |
FF_AoEDamages | real | Yes | |
FF_BuildingAoE | boolean | Yes | |
FF_Caster | unit | Yes | |
FF_DistanceCast | real | No | |
FF_DistanceReached | real | Yes | |
FF_Done | boolean | Yes | |
FF_DummyUnit | unit | Yes | |
FF_ExplosionEffect | string | Yes | |
FF_FinalAoE | real | Yes | |
FF_FireBall1 | unit | Yes | |
FF_FireBall2 | unit | Yes | |
FF_FireBallAdditionnalDistance | real | Yes | |
FF_FireBallAoE | real | Yes | |
FF_FireBallArc | real | Yes | |
FF_FireBallArcSettings | real | Yes | |
FF_FireBallDistance | real | Yes | |
FF_FireBallDistanceInit | real | No | |
FF_FireBallSpeed | real | Yes | |
FF_FireBallTempAdd | real | Yes | |
FF_FullDistance | real | Yes | |
FF_GoThroughBuildings | boolean | Yes | |
FF_GoThroughTrees | boolean | Yes | |
FF_GroupFireBall1 | group | Yes | |
FF_GroupFireBall2 | group | Yes | |
FF_HitBuildings | boolean | Yes | |
FF_Integer1 | integer | No | |
FF_Integer2 | integer | No | |
FF_Integer3 | integer | No | |
FF_KillTrees | boolean | Yes | |
FF_KillTreesAoE | boolean | Yes | |
FF_MinimalDistance | real | No | |
FF_RealTimer | real | Yes | |
FF_SingleDamages | real | Yes | |
FF_SingleUnitEffect | string | Yes | |
FF_TempGroup | group | No | |
FF_TempPoint1 | location | No | |
FF_TempPoint2 | location | No | |
FF_TempPoint3 | location | No | |
FinalWaveGroup | group | No | |
FinalWaveHighScore | integer | No | |
FootmanSpy | unit | No | |
ForemanSleepEffect01 | effect | No | |
ForemanSleepEffect02 | effect | No | |
ForemanSleepEffect03 | effect | No | |
GameOver | boolean | No | |
GameSelection | boolean | No | |
Garithos | unit | No | |
GoldDroppers | group | No | |
GoldFloatingText | texttag | No | |
GoldFloatTextUnit | unit | No | |
HandicapValue | real | No | |
Hero | unit | No | |
HeroActiveHamg | boolean | No | |
HeroActiveHmkg | boolean | No | |
HeroActiveHpal | boolean | No | |
HeroHmkg | unit | No | |
HiddenUnits | group | No | |
HighScoreEasy | integer | No | |
HighScoreHard | integer | No | |
HighScoreNormal | integer | No | |
HintBuildTimer | timer | No | |
HintTrainTimer | timer | No | |
InCinematic | boolean | No | |
InCombat | boolean | No | |
IntroSkipped | boolean | No | |
Item | item | No | |
Kael | unit | No | |
KaelReturnSpot | location | No | |
Load | integer | Yes | |
LoadCount | integer | No | |
MainGate | destructable | No | |
minutes | real | No | 60.00 |
N | integer | No | |
Observatory | unit | No | |
ObservatoryVision | fogmodifier | No | |
ObservatoryVisionRadius | real | No | 7700.00 |
P02_Escapees | player | No | Player01 |
P06_HumansBase | player | No | Player05 |
P07_HumansWave | player | No | Player06 |
PathIndex | integer | No | |
PathTarget | rect | Yes | |
PathTargets | integer | No | |
PeasantTimer | timer | No | |
PointEscapePath1A | location | No | |
PointEscapePath1B | location | No | |
PointEscapePath1C | location | No | |
PointEscapePath2A | location | No | |
PointEscapePath2B | location | No | |
PointEscapePath3A | location | No | |
PointEscapePath3B | location | No | |
PointEscapePath3C | location | No | |
PointEscapePortalEffect | location | No | |
PointEscapePortalTarget | location | No | |
PointExodusPeasantSpawn | location | No | |
PointExodusTroopSpawn | location | No | |
PointExplosivesFaceTarget | location | No | |
PointGateSound | location | No | |
PointPathTarget00 | location | No | |
PointPathTarget01 | location | No | |
PointPathTarget02 | location | No | |
PointPathTarget03 | location | No | |
PointPathTarget04 | location | No | |
PointPathTarget05 | location | No | |
PointPathTarget06 | location | No | |
PointPathTarget07 | location | No | |
PointPathTarget08 | location | No | |
PointPathTarget09 | location | No | |
PointPathTarget10 | location | No | |
PointPathTarget11 | location | No | |
PointPathTarget12 | location | No | |
PointPathTarget13 | location | No | |
PointPathTarget14 | location | No | |
PointPathTarget15 | location | No | |
PointPathTarget16 | location | No | |
PointPathTarget17 | location | No | |
PointPathTarget18 | location | No | |
PointPathTarget19 | location | No | |
PointPathTarget20 | location | No | |
PointPathTarget21 | location | No | |
PointPathTarget22 | location | No | |
PointPathTarget23 | location | No | |
PointPathTarget24 | location | No | |
PointPathTargetArray | location | Yes | |
PointPortal | location | No | |
PointSource0CastleLeft | location | No | |
PointSource0CastleRight | location | No | |
PointSource1BarracksLeft | location | No | |
PointSource1BarracksRight | location | No | |
PointSource2WorkshopLeft | location | No | |
PointSource2WorkshopRight | location | No | |
PointSource3AviaryLeft | location | No | |
PointSource3AviaryRight | location | No | |
PointSource4MercLeft | location | No | |
PointSource4MercRight | location | No | |
PointSource5DragLeft | location | No | |
PointSource5DragRight | location | No | |
PointSource6BeastsLeft | location | No | |
PointSource6BeastsRight | location | No | |
PointSourceAltar | location | No | |
PointWaitingLeaderSpot | location | No | |
PointWaitingRedirect01Left | location | No | |
PointWaitingRedirect01Right | location | No | |
Portal | unit | No | |
PortalAttackedMessage | integer | No | 0 |
PortalLeaderboard | leaderboard | No | |
PortalLeaderboardCreated | boolean | No | |
PortalLifePercent | real | No | |
QuestDefend | quest | No | |
QuestDefendReq1 | questitem | No | |
QuestDefendReq2 | questitem | No | |
Ravael | unit | No | |
RavaelReturnSpot | location | No | |
RedirectIndex | integer | No | |
RedirectPoint | location | No | |
ReleaseBeastsTimer | timer | No | |
RevivalAltar | unit | No | |
RevivalHero | unit | No | |
RevivalReturnSpot | location | No | |
RevivalSpot | location | No | |
Save | integer | Yes | |
SaveCount | integer | No | |
SaveLoad_Abilities | abilcode | Yes | |
SaveLoad_AbilityCount | integer | No | |
SaveLoad_Alphabet | string | No | |
SaveLoad_Base | integer | No | |
SaveLoad_Char | string | Yes | |
SaveLoad_CheckName | boolean | No | |
SaveLoad_Directory | string | No | |
SaveLoad_Error | string | No | |
SaveLoad_Filename | string | No | |
SaveLoad_Full | string | No | |
SaveLoad_Hero | unitcode | Yes | |
SaveLoad_HeroCount | integer | No | |
SaveLoad_HyphenSpace | integer | No | |
SaveLoad_Item | itemcode | Yes | |
SaveLoad_ItemCount | integer | No | |
SaveLoad_Lower | string | No | |
SaveLoad_MaxValue | integer | No | |
SaveLoad_Number | string | No | |
SaveLoad_SaveToDisk | boolean | No | |
SaveLoad_Security | boolean | No | |
SaveLoad_SeperationChar | string | No | |
SaveLoad_Upper | string | No | |
SaveLoad_Valid | boolean | No | |
ScoreScreenPlaying | boolean | No | |
SendingArray | unit | Yes | |
SendingCount | integer | No | |
SendingIndex | integer | No | |
SendingLeader | unit | No | |
SendingTimePerUnit | real | No | |
SewerGate | destructable | No | |
Source0_Castle | integer | No | 0 |
Source1_Barracks | integer | No | 1 |
Source2_Workshop | integer | No | 2 |
Source3_Aviary | integer | No | 3 |
Source4_MercCamp | integer | No | 4 |
Source5_DragRoost | integer | No | 5 |
Source6_Beast | integer | No | 6 |
SourceAltar | location | No | |
SpawnIndex | integer | No | |
SpawnPoint | location | No | |
SpawnPointLeft | location | No | |
SpawnPointRight | location | No | |
SpawnTime | real | No | |
SpawnTimePerUnit | real | No | |
Speaker | unit | No | |
SpeakingDistance | real | No | 1500.00 |
SubspawnIndex | integer | No | |
SubspawnType | unitcode | No | |
Tempinteger | integer | No | |
TempInteger | integer | No | |
TempPathPointRandom | location | No | |
TempPoint | location | No | |
TempReal | real | No | |
TempUnit | unit | No | |
TempUnitGroup | group | No | |
TempUnitGroup2 | group | No | |
TimeWarning1Timer | timer | No | |
TimeWarning2Timer | timer | No | |
Trevfx1 | effect | No | |
Trevfx2 | effect | No | |
TroopTimer | timer | No | |
UnitsOnPath | group | Yes | |
Vashj | unit | No | |
VashjReturnSpot | location | No | |
Vault01 | unit | No | |
Vault01Done | boolean | No | false |
Vault02 | unit | No | |
Vault02Done | boolean | No | false |
Vault03 | unit | No | |
Vault03Done | boolean | No | false |
VaultFoundTimer | timer | No | |
VictorySkipped | boolean | No | |
WaitingArray | unit | Yes | UnitNull |
WaitingCount | integer | No | |
WaitingLeader | unit | No | |
WaitingSpots | location | Yes | |
Wave | integer | No | |
WaveAttach | integer | Yes | |
WaveHeroConfig | trigger | Yes | |
WaveLeaderTypes | unitcode | Yes | hfoo |
WaveSendTime | real | Yes | |
WavesRemainingInt | integer | No | 30 |
WaveTimer | timer | Yes | |
WaveUnitCounts | integer | Yes | 20 |
WaveUnitSource | integer | Yes | 0 |
WaveUnitTypes | unitcode | Yes | hfoo |
ZeppelinSpawns01 | integer | No | 0 |
ZeppelinSpawns02 | integer | No | 0 |
ZeppelinSpawnType01 | unitcode | No | |
ZeppelinSpawnType02 | unitcode | No | |
ZeppelinType01 | unitcode | No | |
ZeppelinType02 | unitcode | No |