//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 |
BaseMaievRespawnTime | real | No | |
BaseSariusRespawnTime | real | No | |
BEBaseAttackedTimer | timer | No | |
BEBuildTimer | timer | No | |
BEGroupChosen | trigger | No | |
BETimerBaseMinimum | real | No | |
BETimerLength | real | No | |
BETimerLengthLast | real | No | |
BETimerMaximum | real | No | |
BETimerMinimum | real | No | |
BEUnitCount | integer | No | |
BEUnitToNEUnitRatio | real | No | |
BEVolatilityLimit | real | No | |
BreadcrumbAllowed | integer | No | |
BreadcrumbAngleArray | real | Yes | |
BreadcrumbCurrent | integer | No | |
BreadcrumbReached | integer | No | |
BreadcrumbTotal | integer | No | |
Brewmaster | unit | No | |
BuildTimerAdjustmentTimer | timer | No | |
CameraReturnPoint | location | No | |
CaravanAggroTimer | timer | No | |
CaravanArcher01 | unit | No | |
CaravanArcher02 | unit | No | |
CaravanCage | unit | No | |
CaravanGuardFirst | integer | No | |
CaravanGuardLast | integer | No | |
CaravanGuardsGroup | group | No | |
CaravanHunt01 | unit | No | |
CaravanMaiev | unit | No | |
CaravanOrderPulse | timer | No | |
CaravanSarius | unit | No | |
CaravanTestPulse | timer | No | |
CaravanUnitArray | unit | Yes | |
CaravanWagonFirst | integer | No | |
CaravanWagonLast | integer | No | |
CaravanWagonsGroup | group | No | |
ClosestRegionDistance | real | No | |
Code | StringExt | No | |
CombatCheckTimer | timer | No | |
DebugOn | boolean | No | |
EnoughPlayers | boolean | No | |
ExpDisabledForBrewmaster | boolean | No | false |
ExpDisabledForKael | boolean | No | false |
ExpDisabledForMaiev | boolean | No | |
ExpDisabledForRavael | boolean | No | false |
ExpDisabledForVashj | boolean | No | false |
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 | |
FormationAngleArray | real | Yes | |
FormationDistanceArray | real | Yes | |
FormationRegionArray | rect | Yes | |
FormationTotal | integer | No | |
GameOver | boolean | No | false |
GameSelection | boolean | No | |
GoldWispTimer | timer | No | |
GuardCallForHelpDist | real | No | |
GuardCallForHelpDuration | real | No | |
GuardCallForHelpFrequency | real | No | |
GuardLeftBehindRange | real | No | |
GuardsCatchingUp | boolean | No | |
Hard | boolean | No | |
Hero | unit | No | |
HeroSaysGoDistance | real | No | |
HiddenUnits | group | No | |
HighScoreEasy | integer | No | |
HighScoreHard | integer | No | |
HighScoreNormal | integer | No | |
Illidan | unit | No | |
InCinematic | boolean | No | false |
InCombat | boolean | No | false |
IntroArcher | unit | No | |
IntroMyrmidon | unit | No | |
IntroSiren | unit | No | |
IntroSkipped | boolean | No | false |
IntroSkipped1 | boolean | No | false |
IntroSpellBreaker | unit | No | |
IntroWorker | unit | No | |
IntroWorkerB | unit | No | |
IntroWorkerC | unit | No | |
IntroWorkerD | unit | No | |
Item | item | No | |
Kael | unit | No | UnitNull |
KaelReturnSpot | location | No | |
LadyVashj | unit | No | |
Load | integer | Yes | |
LoadCount | integer | No | |
Magtheridon | unit | No | |
Maiev | unit | No | UnitNull |
MaievOrderPulse | timer | No | |
MaievRespawnTime | real | No | |
NEBuildTimer | timer | No | |
NEGroupChosen | trigger | No | |
NETimerBaseMinimum | real | No | |
NETimerLength | real | No | |
NETimerLengthLast | real | No | |
NETimerMaximum | real | No | |
NETimerMinimum | real | No | |
NEUnitCount | integer | No | |
NEVolatilityLimit | real | No | |
Normal | boolean | No | |
OwnerBoard | leaderboard | No | |
P10_BloodElfAttack | player | No | Player09 |
P11_NightElfAttack | player | No | Player10 |
P2_Watchers | player | No | Player01 |
P3_IllidanCage | player | No | Player02 |
P5_Maiev | player | No | Player04 |
P8_BloodElfBase | player | No | Player07 |
PlayerHeroRespawnTime | real | No | |
QuestEscort | quest | No | |
QuestEscortToBloodElf | questitem | No | |
QuestIllidan | quest | No | |
QuestIllidanNoMaiev | questitem | No | |
QuestIllidanRecapture | questitem | No | |
RandomNumber | real | No | |
RandomValue | real | No | |
RangeFactor | real | No | |
RangeWagonToPlayerGoal | real | No | |
Ravael | unit | No | |
RavaelReturnSpot | location | No | |
ReorientAngle | real | No | |
RevivalAltar | unit | No | UnitNull |
RevivalHero | unit | No | UnitNull |
RevivalReturnSpot | location | No | |
RevivalSpot | location | No | |
RoyalGuardTimer | timer | No | |
Sarius | unit | No | UnitNull |
Sarius_Kopiuj | unit | No | UnitNull |
SariusOrderPulse | timer | No | |
SariusRespawnTime | real | 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 | |
SelectedUnits | group | No | |
Speaker | unit | No | |
SpeakingDistance | real | No | 1500.00 |
SpeedOfGuards | real | No | |
SpeedOfWagons | real | No | |
SummonedUnits | group | No | |
TempAngle | real | No | |
Tempinteger | integer | No | |
TempLastAngle | real | No | |
TempLastIndex | integer | No | |
TempMaxAngle | real | No | |
TempMinAngle | real | No | |
TempNextAngle | real | No | |
TempNextIndex | integer | No | |
TempPingPoint | location | No | |
TempPointA | location | No | |
TempPointB | location | No | |
TempPointC | location | No | |
TempPointD | location | No | |
TempPointE | location | No | |
TempPointF | location | No | |
TempX | real | No | |
TempY | real | No | |
TownPeasant01 | unit | No | |
TownPeasant02 | unit | No | |
TransferOwnerTimer | timer | No | |
UnitDifference | integer | No | |
Vashj | unit | No | UnitNull |
VashjReturnSpot | location | No | |
VengeanceUnit | unit | No | |
VictorySkipped | boolean | No | false |
Wagon | unit | No | |
WagonControlRadius | real | No | |
WagonHeartbeat | timer | No | |
WagonMovementSpeed | real | No | |
WagonOwner | player | No | Player01 |
WagonPingTimer | timer | No | |
zBreadcrumbArray | location | Yes | |
zReorientTarget | location | No |