//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 |
AITimer | timer | No | |
Akama | unit | No | |
Akama02 | unit | No | |
AkamaReturnSpot | location | No | |
AP01_Player | player | No | Player00 |
AP1_Player | player | No | |
APG1_Player | force | No | Force00 |
BloodElves | group | No | |
CameraReturnPoint | location | No | |
Code | StringExt | No | |
CombatCheckTimer | timer | No | |
CountdownTimer | timer | No | |
CountdownTimerWindow | timerdialog | No | |
DemonTimer | timer | No | |
DraeneiBuildings | group | No | |
DraeneiQuestCompleted | boolean | No | |
DraeneiQuestDiscovered | boolean | No | |
DraeneiTimer | timer | No | |
DraeneiUnit01 | unit | No | |
DraeneiUnit02 | unit | No | |
DraeneiUnit03 | unit | No | |
DraeneiUnit04 | unit | No | |
DraeneiUnitDiscovered | boolean | No | |
EnoughPlayers | boolean | No | |
EnvironmentLightWind | weathereffect | No | |
ExchangeSelection1 | group | No | |
ExchangeSelection2 | group | No | |
ExchangeSucces | boolean | No | |
Exchanging1 | boolean | No | |
Exchanging2 | boolean | No | |
Exchanging3 | boolean | No | |
Exchangingfail1 | boolean | No | |
Exchangingfail2 | boolean | No | |
Exchangingfail3 | boolean | No | |
ExpDisabledForIlidan | boolean | No | false |
ExpDisabledForKael | boolean | No | false |
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 | |
GameOver | boolean | No | false |
GameSelection | boolean | No | |
Gate01 | unit | No | |
Gate01Busy | boolean | No | |
Gate01Closed | boolean | No | |
Gate01Dead | boolean | No | |
Gate01Group | group | No | |
Gate02 | unit | No | |
Gate02Busy | boolean | No | |
Gate02Closed | boolean | No | |
Gate02Dead | boolean | No | |
Gate02Group | group | No | |
Gate03 | unit | No | |
Gate03Busy | boolean | No | |
Gate03Closed | boolean | No | |
Gate03Dead | boolean | No | |
Gate03Group | group | No | |
Gate04 | unit | No | |
Gate04Busy | boolean | No | |
Gate04Closed | boolean | No | |
Gate04Dead | boolean | No | |
Gate04Group | group | No | |
GateCheck | integer | No | |
GateClosing | integer | No | |
GateClosingTimer | timer | No | |
GatesDestroyed | integer | No | |
Hard | boolean | No | |
Hero | unit | No | |
HiddenUnits | group | No | |
Illidan | unit | No | UnitNull |
Illidan_Old | unit | No | |
IllidanGetsHitTimer | timer | No | |
IllidanHit | integer | No | |
IllidanInDanger | boolean | No | |
IllidanReturnSpot | location | No | |
IllidanTimer | timer | No | |
InCinematic | boolean | No | false |
InCombat | boolean | No | false |
IntroSkipped | boolean | No | false |
IntroSkipped1 | boolean | No | false |
Item | item | No | |
Kael | unit | No | UnitNull |
KaelReturnSpot | location | No | |
Kiljaeden | unit | No | |
LeaderboardCounter | leaderboard | No | |
LeaderboardGateActive | boolean | No | |
LeftOverGateUnits | group | No | |
Load | integer | Yes | |
LoadCount | integer | No | |
MidCinCompleteSkipped | boolean | No | |
MidCinDraeneiGroup | group | No | |
MidCinOrcGroup | group | No | |
MidCinSkipped | boolean | No | |
Normal | boolean | No | |
NorthGroup | group | No | |
P02_BlueGate | player | No | Player01 |
P03_TealGate | player | No | Player02 |
P04_PurpleChaosOrc | player | No | Player03 |
P05_YellowChaosOrc | player | No | Player04 |
P06_OrangeChaosOrc | player | No | Player05 |
P07_DraeneiGreen | player | No | Player06 |
P08_PinkGate | player | No | Player07 |
P09_GrayGate | player | No | Player08 |
P12_IllidanChanneling | player | No | Player11 |
PauseUnits | group | No | |
Peon01 | unit | No | |
Peon02 | unit | No | |
Peon03 | unit | No | |
Peon04 | unit | No | |
Peon05 | unit | No | |
Peon06 | unit | No | |
PreplacedGateUnits | group | No | |
QuestDimensionalGate | quest | No | |
QuestDimensionalGate01Req | questitem | No | |
QuestDimensionalGate02Req | questitem | No | |
QuestDimensionalGate03Req | questitem | No | |
QuestDimensionalGate04Req | questitem | No | |
QuestDraenei | quest | No | |
QuestDraeneiReq | questitem | No | |
Ravael | unit | No | |
RavaelReturnSpot | location | No | |
ResourceDropBuildings | group | No | |
ResourceDropHashtable | hashtable | No | |
RevivalAltar | unit | No | UnitNull |
RevivalHero | unit | No | UnitNull |
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 | |
SelectedUnits | group | No | |
SelectionGroup1 | group | No | |
SelectionGroup2 | group | No | |
SouthGroup | group | No | |
Speaker | unit | No | |
SpeakingDistance | real | No | 2500.00 |
SpecialEffect | effect | No | |
StartChanneling | boolean | No | |
TempBoolean | boolean | No | |
Tempinteger | integer | No | |
Tempitem | item | No | |
Tempitemtype | itemcode | No | |
tempoint | location | No | |
TempPGroup | force | No | |
TempPGroup2 | force | No | |
TempPlayer | player | No | |
TempPoint | location | No | |
Temppoint | location | No | |
TempUGroup | group | No | |
tempugroup | group | No | |
TempUGroup2 | force | No | |
TempUnit | unit | No | |
TempunitType | unitcode | No | |
Vash | unit | No | |
Vashj | unit | No | |
VashjReturnSpot | location | No | |
VictorySkipped | boolean | No | false |
VisibilityGate01 | fogmodifier | No | |
VisibilityGate02 | fogmodifier | No | |
VisibilityGate03 | fogmodifier | No | |
VisibilityGate04 | fogmodifier | No | |
WestGroup | group | No | |
x | real | No | |
y | real | No | |
YellowOrcBuildings | group | No |