• Listen to a special audio message from Bill Roper to the Hive Workshop community (Bill is a former Vice President of Blizzard Entertainment, Producer, Designer, Musician, Voice Actor) 🔗Click here to hear his message!
  • Read Evilhog's interview with Gregory Alper, the original composer of the music for WarCraft: Orcs & Humans 🔗Click here to read the full interview.

Triggers

Rotgier RPG 1.1.w3x
Variables
Hero
Hero
Hero2
Hero3
Hero4
SavingLoading
Heros
Items
Save
Load
Untitled Category
Untitled Trigger 001
Untitled Trigger 001 Copy
Untitled Trigger 001 Copy 2
Untitled Trigger 001 Copy 3
Untitled Category
Untitled Trigger 001 Copy 3 Copy
Untitled Trigger 001 Copy 3 Copy Copy
Name Type is_array initial_value
A string No A
a string No a
B string No B
b string No b
c string No c
C string No C
Colour image No
d string No d
D string No D
e string No e
E string No E
Eight string No 8
F string No F
f string No f
Five string No 5
Four string No 4
G string No G
g string No g
H string No H
h string No h
Heros unitcode Yes
HerosOwned integer No
I string No I
i string No i
Item itemcode Yes
J string No J
j string No j
K string No K
k string No k
L string No L
l string No l
LevelSave string No
LoadCode string No
M string No M
m string No m
n string No n
N string No N
Nine string No 9
O string No O
o string No o
One string No 1
OtherSaves string No
P string No P
p string No p
Q string No Q
q string No q
r string No r
R string No R
S string No S
s string No s
SaveCode string No
Seven string No 7
Six string No 6
SpaceSlot integer Yes
T string No T
t string No t
Three string No 3
TotalHeros integer No
TotalItems integer No
Two string No 2
u string No u
U string No U
v string No v
V string No V
w string No w
W string No W
X string No X
x string No x
y string No y
Y string No Y
z string No z
Z string No Z
Zero string No 0
Hero
Events
Unit - A unit enters Region_000_Copy_2 <gen>
Conditions
(Unit-type of (Triggering unit)) Equal to Wisp
Actions
Unit - Kill (Triggering unit)
Unit - Create 1 Paladin for (Owner of (Triggering unit)) at (Center of SpawnGuy <gen>) facing (Position of (Triggering unit))
Hero2
Events
Unit - A unit enters Region_000 <gen>
Conditions
(Unit-type of (Triggering unit)) Equal to Wisp
Actions
Unit - Kill (Triggering unit)
Unit - Create 1 Archmage for (Owner of (Triggering unit)) at (Center of SpawnGuy <gen>) facing (Position of (Triggering unit))
Hero3
Events
Unit - A unit enters Region_000_Copy <gen>
Conditions
(Unit-type of (Triggering unit)) Equal to Wisp
Actions
Unit - Kill (Triggering unit)
Unit - Create 1 Mountain King for (Owner of (Triggering unit)) at (Center of SpawnGuy <gen>) facing (Position of (Triggering unit))
Hero4
Events
Unit - A unit enters Region_000_Copy_3 <gen>
Conditions
(Unit-type of (Triggering unit)) Equal to Wisp
Actions
Unit - Kill (Triggering unit)
Unit - Create 1 Blood Mage for (Owner of (Triggering unit)) at (Center of SpawnGuy <gen>) facing (Position of (Triggering unit))
Heros
Events
Map initialization
Conditions
Actions
-------- Heros Used --------
Set Variable Set Heros[1] = "Hpal"
Set Variable Set Heros[2] = "Obla"
Set Variable Set Heros[3] = "Nbbc"
Set Variable Set Heros[4] = "Udea"
Set Variable Set Heros[5] = "Edem"
-------- Total Heros --------
Set Variable Set TotalHeros = "5"
Items
Events
Map initialization
Conditions
Actions
-------- Below are the items used in the game. --------
Set Variable Set Item[1] = "ratf"
Set Variable Set Item[2] = "gmfr"
-------- Set this to the total items used. --------
Set Variable Set TotalItems = "2"
Save
Events
Player - Player 1 (Red) types a chat message containing -save (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing -save (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing -save (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing -save (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing -save (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing -save (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing save (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing -save (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Set Variable Set SaveCode = (SaveCode + (Substring((Name of (Triggering player)), 2, 2)))
Unit Group - Pick every unit in (Units in (Playable map area)) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of (Picked unit)) Equal to (Triggering player)
((Picked unit) is A Hero) Equal to True
Then - Actions
If ((Unit-type of (Picked unit)) Equal to Heros[1]) then do (Set VariableSet SaveCode = (SaveCode + A)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[2]) then do (Set VariableSet SaveCode = (SaveCode + B)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[3]) then do (Set VariableSet SaveCode = (SaveCode + C)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[4]) then do (Set VariableSet SaveCode = (SaveCode + D)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[5]) then do (Set VariableSet SaveCode = (SaveCode + E)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[6]) then do (Set VariableSet SaveCode = (SaveCode + F)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[7]) then do (Set VariableSet SaveCode = (SaveCode + G)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[8]) then do (Set VariableSet SaveCode = (SaveCode + H)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[9]) then do (Set VariableSet SaveCode = (SaveCode + I)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[10]) then do (Set VariableSet SaveCode = (SaveCode + J)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[11]) then do (Set VariableSet SaveCode = (SaveCode + K)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[12]) then do (Set VariableSet SaveCode = (SaveCode + L)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[13]) then do (Set VariableSet SaveCode = (SaveCode + M)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[14]) then do (Set VariableSet SaveCode = (SaveCode + N)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[15]) then do (Set VariableSet SaveCode = (SaveCode + O)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[16]) then do (Set VariableSet SaveCode = (SaveCode + P)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[17]) then do (Set VariableSet SaveCode = (SaveCode + Q)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[18]) then do (Set VariableSet SaveCode = (SaveCode + R)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[19]) then do (Set VariableSet SaveCode = (SaveCode + S)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[20]) then do (Set VariableSet SaveCode = (SaveCode + T)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[21]) then do (Set VariableSet SaveCode = (SaveCode + U)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[22]) then do (Set VariableSet SaveCode = (SaveCode + V)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[23]) then do (Set VariableSet SaveCode = (SaveCode + W)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[24]) then do (Set VariableSet SaveCode = (SaveCode + X)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[25]) then do (Set VariableSet SaveCode = (SaveCode + Y)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[26]) then do (Set VariableSet SaveCode = (SaveCode + Z)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[27]) then do (Set VariableSet SaveCode = (SaveCode + a)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[28]) then do (Set VariableSet SaveCode = (SaveCode + b)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[29]) then do (Set VariableSet SaveCode = (SaveCode + c)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[30]) then do (Set VariableSet SaveCode = (SaveCode + d)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[31]) then do (Set VariableSet SaveCode = (SaveCode + e)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[32]) then do (Set VariableSet SaveCode = (SaveCode + f)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[33]) then do (Set VariableSet SaveCode = (SaveCode + g)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[34]) then do (Set VariableSet SaveCode = (SaveCode + h)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[35]) then do (Set VariableSet SaveCode = (SaveCode + i)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[36]) then do (Set VariableSet SaveCode = (SaveCode + j)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[37]) then do (Set VariableSet SaveCode = (SaveCode + k)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[38]) then do (Set VariableSet SaveCode = (SaveCode + l)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[39]) then do (Set VariableSet SaveCode = (SaveCode + m)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[40]) then do (Set VariableSet SaveCode = (SaveCode + n)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[41]) then do (Set VariableSet SaveCode = (SaveCode + o)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[42]) then do (Set VariableSet SaveCode = (SaveCode + p)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[43]) then do (Set VariableSet SaveCode = (SaveCode + q)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[44]) then do (Set VariableSet SaveCode = (SaveCode + r)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[45]) then do (Set VariableSet SaveCode = (SaveCode + s)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[46]) then do (Set VariableSet SaveCode = (SaveCode + t)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[47]) then do (Set VariableSet SaveCode = (SaveCode + u)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[48]) then do (Set VariableSet SaveCode = (SaveCode + v)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[49]) then do (Set VariableSet SaveCode = (SaveCode + w)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[50]) then do (Set VariableSet SaveCode = (SaveCode + x)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[51]) then do (Set VariableSet SaveCode = (SaveCode + y)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[52]) then do (Set VariableSet SaveCode = (SaveCode + z)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[53]) then do (Set VariableSet SaveCode = (SaveCode + One)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[54]) then do (Set VariableSet SaveCode = (SaveCode + Two)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[55]) then do (Set VariableSet SaveCode = (SaveCode + Three)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[56]) then do (Set VariableSet SaveCode = (SaveCode + Four)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[57]) then do (Set VariableSet SaveCode = (SaveCode + Five)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[58]) then do (Set VariableSet SaveCode = (SaveCode + Six)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[59]) then do (Set VariableSet SaveCode = (SaveCode + Seven)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[60]) then do (Set VariableSet SaveCode = (SaveCode + Eight)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[61]) then do (Set VariableSet SaveCode = (SaveCode + Nine)) else do (Do nothing)
If ((Unit-type of (Picked unit)) Equal to Heros[62]) then do (Set VariableSet SaveCode = (SaveCode + Zero)) else do (Do nothing)
Else - Actions
Unit Group - Pick every unit in (Units in (Playable map area)) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is A Hero) Equal to True
(Owner of (Picked unit)) Equal to (Triggering player)
Then - Actions
Set Variable Set LevelSave = (String((Hero level of (Picked unit))))
If ((Substring(LevelSave, 2, 2)) Equal to ) then do (Set VariableSet LevelSave = (0 + LevelSave)) else do (Do nothing)
If ((Substring(LevelSave, 3, 3)) Equal to ) then do (Set VariableSet LevelSave = (0 + LevelSave)) else do (Do nothing)
If ((Substring(LevelSave, 4, 4)) Equal to ) then do (Set VariableSet LevelSave = (0 + LevelSave)) else do (Do nothing)
Set Variable Set SpaceSlot[1] = "1"
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 1) then do (Set VariableSet SaveCode = (SaveCode + A)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 2) then do (Set VariableSet SaveCode = (SaveCode + B)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 3) then do (Set VariableSet SaveCode = (SaveCode + C)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 4) then do (Set VariableSet SaveCode = (SaveCode + D)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 5) then do (Set VariableSet SaveCode = (SaveCode + E)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 6) then do (Set VariableSet SaveCode = (SaveCode + F)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 7) then do (Set VariableSet SaveCode = (SaveCode + G)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 8) then do (Set VariableSet SaveCode = (SaveCode + H)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 9) then do (Set VariableSet SaveCode = (SaveCode + I)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 0) then do (Set VariableSet SaveCode = (SaveCode + Zero)) else do (Do nothing)
Set Variable Set SpaceSlot[1] = "2"
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 1) then do (Set VariableSet SaveCode = (SaveCode + A)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 2) then do (Set VariableSet SaveCode = (SaveCode + B)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 3) then do (Set VariableSet SaveCode = (SaveCode + C)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 4) then do (Set VariableSet SaveCode = (SaveCode + D)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 5) then do (Set VariableSet SaveCode = (SaveCode + E)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 6) then do (Set VariableSet SaveCode = (SaveCode + F)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 7) then do (Set VariableSet SaveCode = (SaveCode + G)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 8) then do (Set VariableSet SaveCode = (SaveCode + H)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 9) then do (Set VariableSet SaveCode = (SaveCode + I)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 0) then do (Set VariableSet SaveCode = (SaveCode + Zero)) else do (Do nothing)
Set Variable Set SpaceSlot[1] = "3"
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 1) then do (Set VariableSet SaveCode = (SaveCode + A)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 2) then do (Set VariableSet SaveCode = (SaveCode + B)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 3) then do (Set VariableSet SaveCode = (SaveCode + C)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 4) then do (Set VariableSet SaveCode = (SaveCode + D)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 5) then do (Set VariableSet SaveCode = (SaveCode + E)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 6) then do (Set VariableSet SaveCode = (SaveCode + F)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 7) then do (Set VariableSet SaveCode = (SaveCode + G)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 8) then do (Set VariableSet SaveCode = (SaveCode + H)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 9) then do (Set VariableSet SaveCode = (SaveCode + I)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 0) then do (Set VariableSet SaveCode = (SaveCode + Zero)) else do (Do nothing)
Set Variable Set SpaceSlot[1] = "4"
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 1) then do (Set VariableSet SaveCode = (SaveCode + A)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 2) then do (Set VariableSet SaveCode = (SaveCode + B)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 3) then do (Set VariableSet SaveCode = (SaveCode + C)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 4) then do (Set VariableSet SaveCode = (SaveCode + D)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 5) then do (Set VariableSet SaveCode = (SaveCode + E)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 6) then do (Set VariableSet SaveCode = (SaveCode + F)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 7) then do (Set VariableSet SaveCode = (SaveCode + G)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 8) then do (Set VariableSet SaveCode = (SaveCode + H)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 9) then do (Set VariableSet SaveCode = (SaveCode + I)) else do (Do nothing)
If ((Substring(LevelSave, SpaceSlot[1], SpaceSlot[1])) Equal to 0) then do (Set VariableSet SaveCode = (SaveCode + Zero)) else do (Do nothing)
Else - Actions
Set Variable Set SaveCode = (SaveCode + -)
Unit Group - Pick every unit in (Units in (Playable map area)) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is A Hero) Equal to True
(Owner of (Picked unit)) Equal to (Triggering player)
Then - Actions
For each (Integer A) from 1 to 6 , do (Actions)
Loop - Actions
Unit Group - Pick every unit in (Units in (Playable map area)) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of (Picked unit)) Equal to (Triggering player)
((Picked unit) is A Hero) Equal to True
Then - Actions
Set Variable Set SpaceSlot[2] = "1"
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + A)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + B)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + C)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + D)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + E)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + Nine)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + G)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + H)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + I)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + J)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + K)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + L)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + M)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + N)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + O)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + P)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + Q)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + R)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + S)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + T)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + U)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + V)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + W)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + X)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + Y)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + Z)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + a)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + b)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + c)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + d)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + e)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + f)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + g)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + h)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + i)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + j)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + k)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + l)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + m)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + n)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + o)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + p)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + q)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + r)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + s)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + t)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + u)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + v)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + w)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + x)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + y)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + z)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + One)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + Two)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + Three)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + Four)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + Five)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + Six)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + Seven)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + Eight)) else do (Do nothing)
Set Variable Set SpaceSlot[2] = (SpaceSlot[2] + 1)
If (((Item-type of (Item carried by (Picked unit) in slot (Integer A))) Equal to Item[SpaceSlot[2]]) and (TotalItems Greater than or equal to SpaceSlot[2])) then do (Set VariableSet SaveCode = (SaveCode + a)) else do (Do nothing)
Else - Actions
Else - Actions
For each (Integer A) from 8 to 13 , do (Actions)
Loop - Actions
If ((Substring(SaveCode, (Integer A), (Integer A))) Equal to ) then do (Set VariableSet SaveCode = (SaveCode + 0)) else do (Do nothing)
If ((Substring(SaveCode, 7, 8)) Equal to -) then do (Set VariableSet SaveCode = (SaveCode + 000000)) else do (Do nothing)
Set Variable Set SaveCode = (SaveCode + -)
Set Variable Set OtherSaves = (String(((Triggering player) Current gold)))
For each (Integer A) from 1 to 9 , do (Actions)
Loop - Actions
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to ) then do (Set VariableSet OtherSaves = (0 + OtherSaves)) else do (Do nothing)
For each (Integer A) from 1 to 9 , do (Actions)
Loop - Actions
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 0) then do (Set VariableSet SaveCode = (SaveCode + V)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 1) then do (Set VariableSet SaveCode = (SaveCode + A)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 2) then do (Set VariableSet SaveCode = (SaveCode + B)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 3) then do (Set VariableSet SaveCode = (SaveCode + C)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 4) then do (Set VariableSet SaveCode = (SaveCode + D)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 5) then do (Set VariableSet SaveCode = (SaveCode + E)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 6) then do (Set VariableSet SaveCode = (SaveCode + F)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 7) then do (Set VariableSet SaveCode = (SaveCode + G)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 8) then do (Set VariableSet SaveCode = (SaveCode + H)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 9) then do (Set VariableSet SaveCode = (SaveCode + I)) else do (Do nothing)
Set Variable Set SaveCode = (SaveCode + -)
Unit Group - Pick every unit in (Units in (Playable map area)) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of (Picked unit)) Equal to (Triggering player)
((Picked unit) is A Hero) Equal to True
Then - Actions
Set Variable Set OtherSaves = (String((Strength of (Picked unit) (Exclude bonuses))))
Else - Actions
For each (Integer A) from 1 to 9 , do (Actions)
Loop - Actions
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to ) then do (Set VariableSet OtherSaves = (0 + OtherSaves)) else do (Do nothing)
For each (Integer A) from 1 to 9 , do (Actions)
Loop - Actions
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 0) then do (Set VariableSet SaveCode = (SaveCode + V)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 1) then do (Set VariableSet SaveCode = (SaveCode + A)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 2) then do (Set VariableSet SaveCode = (SaveCode + B)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 3) then do (Set VariableSet SaveCode = (SaveCode + C)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 4) then do (Set VariableSet SaveCode = (SaveCode + D)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 5) then do (Set VariableSet SaveCode = (SaveCode + E)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 6) then do (Set VariableSet SaveCode = (SaveCode + F)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 7) then do (Set VariableSet SaveCode = (SaveCode + G)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 8) then do (Set VariableSet SaveCode = (SaveCode + H)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 9) then do (Set VariableSet SaveCode = (SaveCode + I)) else do (Do nothing)
Set Variable Set SaveCode = (SaveCode + -)
Unit Group - Pick every unit in (Units in (Playable map area)) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of (Picked unit)) Equal to (Triggering player)
((Picked unit) is A Hero) Equal to True
Then - Actions
Set Variable Set OtherSaves = (String((Agility of (Picked unit) (Exclude bonuses))))
Else - Actions
For each (Integer A) from 1 to 9 , do (Actions)
Loop - Actions
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to ) then do (Set VariableSet OtherSaves = (0 + OtherSaves)) else do (Do nothing)
For each (Integer A) from 1 to 9 , do (Actions)
Loop - Actions
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 0) then do (Set VariableSet SaveCode = (SaveCode + V)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 1) then do (Set VariableSet SaveCode = (SaveCode + A)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 2) then do (Set VariableSet SaveCode = (SaveCode + B)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 3) then do (Set VariableSet SaveCode = (SaveCode + C)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 4) then do (Set VariableSet SaveCode = (SaveCode + D)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 5) then do (Set VariableSet SaveCode = (SaveCode + E)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 6) then do (Set VariableSet SaveCode = (SaveCode + F)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 7) then do (Set VariableSet SaveCode = (SaveCode + G)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 8) then do (Set VariableSet SaveCode = (SaveCode + H)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 9) then do (Set VariableSet SaveCode = (SaveCode + I)) else do (Do nothing)
Set Variable Set SaveCode = (SaveCode + -)
Unit Group - Pick every unit in (Units in (Playable map area)) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of (Picked unit)) Equal to (Triggering player)
((Picked unit) is A Hero) Equal to True
Then - Actions
Set Variable Set OtherSaves = (String((Intelligence of (Picked unit) (Exclude bonuses))))
Else - Actions
For each (Integer A) from 1 to 9 , do (Actions)
Loop - Actions
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to ) then do (Set VariableSet OtherSaves = (0 + OtherSaves)) else do (Do nothing)
For each (Integer A) from 1 to 9 , do (Actions)
Loop - Actions
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 0) then do (Set VariableSet SaveCode = (SaveCode + V)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 1) then do (Set VariableSet SaveCode = (SaveCode + A)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 2) then do (Set VariableSet SaveCode = (SaveCode + B)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 3) then do (Set VariableSet SaveCode = (SaveCode + C)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 4) then do (Set VariableSet SaveCode = (SaveCode + D)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 5) then do (Set VariableSet SaveCode = (SaveCode + E)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 6) then do (Set VariableSet SaveCode = (SaveCode + F)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 7) then do (Set VariableSet SaveCode = (SaveCode + G)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 8) then do (Set VariableSet SaveCode = (SaveCode + H)) else do (Do nothing)
If ((Substring(OtherSaves, (Integer A), (Integer A))) Equal to 9) then do (Set VariableSet SaveCode = (SaveCode + I)) else do (Do nothing)
Game - Display to (Player group((Triggering player))) for 120.00 seconds the text: (SaveCode + |c00FF2222Is your save code. Don't lose it.|r)
Set Variable Set SaveCode = ""
Load
Events
Player - Player 1 (Red) types a chat message containing -load (Unexpected type: 'stringnoformat') as A substring
Player - Player 2 (Blue) types a chat message containing -load (Unexpected type: 'stringnoformat') as A substring
Player - Player 3 (Teal) types a chat message containing -load (Unexpected type: 'stringnoformat') as A substring
Player - Player 4 (Purple) types a chat message containing -load (Unexpected type: 'stringnoformat') as A substring
Player - Player 5 (Yellow) types a chat message containing -load (Unexpected type: 'stringnoformat') as A substring
Player - Player 6 (Orange) types a chat message containing -load (Unexpected type: 'stringnoformat') as A substring
Player - Player 7 (Green) types a chat message containing -load (Unexpected type: 'stringnoformat') as A substring
Player - Player 8 (Pink) types a chat message containing -load (Unexpected type: 'stringnoformat') as A substring
Conditions
Actions
If ((Substring((Entered chat string), 12, 12)) Equal to -) then do (Do nothing) else do (Skip remaining actions)
If ((Substring((Entered chat string), 19, 19)) Equal to -) then do (Do nothing) else do (Skip remaining actions)
If ((Substring((Entered chat string), 29, 29)) Equal to -) then do (Do nothing) else do (Skip remaining actions)
If ((Substring((Entered chat string), 39, 39)) Equal to -) then do (Do nothing) else do (Skip remaining actions)
If ((Substring((Entered chat string), 49, 49)) Equal to -) then do (Do nothing) else do (Skip remaining actions)
Set Variable Set SpaceSlot[3] = "0"
If ((Substring((Entered chat string), 6, 6)) Equal to (Substring((Name of (Triggering player)), 2, 2))) then do (Do nothing) else do (Skip remaining actions)
Unit Group - Pick every unit in (Units in (Playable map area)) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of (Picked unit)) Equal to (Triggering player)
Then - Actions
Unit - Remove (Picked unit) from the game
Else - Actions
For each (Integer A) from 7 to 7 , do (Actions)
Loop - Actions
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to A) then do (Set VariableSet LoadCode = (LoadCode + 1)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to B) then do (Set VariableSet LoadCode = (LoadCode + 2)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to C) then do (Set VariableSet LoadCode = (LoadCode + 3)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to D) then do (Set VariableSet LoadCode = (LoadCode + 4)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to E) then do (Set VariableSet LoadCode = (LoadCode + 5)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to F) then do (Set VariableSet LoadCode = (LoadCode + 6)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to G) then do (Set VariableSet LoadCode = (LoadCode + 7)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to H) then do (Set VariableSet LoadCode = (LoadCode + 8)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to I) then do (Set VariableSet LoadCode = (LoadCode + 9)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to J) then do (Set VariableSet LoadCode = (LoadCode + 10)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to K) then do (Set VariableSet LoadCode = (LoadCode + 11)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to L) then do (Set VariableSet LoadCode = (LoadCode + 12)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to M) then do (Set VariableSet LoadCode = (LoadCode + 13)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to N) then do (Set VariableSet LoadCode = (LoadCode + 14)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to O) then do (Set VariableSet LoadCode = (LoadCode + 15)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to P) then do (Set VariableSet LoadCode = (LoadCode + 16)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Q) then do (Set VariableSet LoadCode = (LoadCode + 17)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to R) then do (Set VariableSet LoadCode = (LoadCode + 18)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to S) then do (Set VariableSet LoadCode = (LoadCode + 19)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to T) then do (Set VariableSet LoadCode = (LoadCode + 20)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to U) then do (Set VariableSet LoadCode = (LoadCode + 21)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to V) then do (Set VariableSet LoadCode = (LoadCode + 22)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to W) then do (Set VariableSet LoadCode = (LoadCode + 23)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to X) then do (Set VariableSet LoadCode = (LoadCode + 24)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Y) then do (Set VariableSet LoadCode = (LoadCode + 25)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Z) then do (Set VariableSet LoadCode = (LoadCode + 26)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to a) then do (Set VariableSet LoadCode = (LoadCode + 27)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to b) then do (Set VariableSet LoadCode = (LoadCode + 28)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to c) then do (Set VariableSet LoadCode = (LoadCode + 29)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to d) then do (Set VariableSet LoadCode = (LoadCode + 30)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to e) then do (Set VariableSet LoadCode = (LoadCode + 31)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to f) then do (Set VariableSet LoadCode = (LoadCode + 32)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to g) then do (Set VariableSet LoadCode = (LoadCode + 33)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to h) then do (Set VariableSet LoadCode = (LoadCode + 34)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to i) then do (Set VariableSet LoadCode = (LoadCode + 35)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to j) then do (Set VariableSet LoadCode = (LoadCode + 36)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to k) then do (Set VariableSet LoadCode = (LoadCode + 37)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to l) then do (Set VariableSet LoadCode = (LoadCode + 38)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to m) then do (Set VariableSet LoadCode = (LoadCode + 39)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to n) then do (Set VariableSet LoadCode = (LoadCode + 40)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to o) then do (Set VariableSet LoadCode = (LoadCode + 41)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to p) then do (Set VariableSet LoadCode = (LoadCode + 42)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to q) then do (Set VariableSet LoadCode = (LoadCode + 43)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to r) then do (Set VariableSet LoadCode = (LoadCode + 44)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to s) then do (Set VariableSet LoadCode = (LoadCode + 45)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to t) then do (Set VariableSet LoadCode = (LoadCode + 46)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to u) then do (Set VariableSet LoadCode = (LoadCode + 47)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to v) then do (Set VariableSet LoadCode = (LoadCode + 48)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to w) then do (Set VariableSet LoadCode = (LoadCode + 49)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to x) then do (Set VariableSet LoadCode = (LoadCode + 50)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to y) then do (Set VariableSet LoadCode = (LoadCode + 51)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to z) then do (Set VariableSet LoadCode = (LoadCode + 52)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to One) then do (Set VariableSet LoadCode = (LoadCode + 53)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Two) then do (Set VariableSet LoadCode = (LoadCode + 54)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Three) then do (Set VariableSet LoadCode = (LoadCode + 55)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Four) then do (Set VariableSet LoadCode = (LoadCode + 56)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Five) then do (Set VariableSet LoadCode = (LoadCode + 57)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Six) then do (Set VariableSet LoadCode = (LoadCode + 58)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Seven) then do (Set VariableSet LoadCode = (LoadCode + 59)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Eight) then do (Set VariableSet LoadCode = (LoadCode + 60)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Nine) then do (Set VariableSet LoadCode = (LoadCode + 61)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Zero) then do (Set VariableSet LoadCode = (LoadCode + 62)) else do (Do nothing)
Unit - Create 1 . Heros[(Integer(LoadCode))] for (Triggering player) at (Center of SpawnGuy <gen>) facing 0.00 degrees
Set Variable Set LoadCode = ""
Unit Group - Pick every unit in (Units in (Playable map area)) and do (If (((Owner of (Picked unit)) Equal to (Triggering player)) and (((Picked unit) is A Hero) Equal to True)) then do (Set VariableSet HerosOwned = "1") else do (Do nothing))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
HerosOwned Equal to 1
Then - Actions
Wait 0.25 seconds
Set Variable Set HerosOwned = "0"
Else - Actions
Skip remaining actions
For each (Integer A) from 8 to 11 , do (Actions)
Loop - Actions
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to A) then do (Set VariableSet LoadCode = (LoadCode + 1)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to B) then do (Set VariableSet LoadCode = (LoadCode + 2)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to C) then do (Set VariableSet LoadCode = (LoadCode + 3)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to D) then do (Set VariableSet LoadCode = (LoadCode + 4)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to E) then do (Set VariableSet LoadCode = (LoadCode + 5)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to F) then do (Set VariableSet LoadCode = (LoadCode + 6)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to G) then do (Set VariableSet LoadCode = (LoadCode + 7)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to H) then do (Set VariableSet LoadCode = (LoadCode + 8)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to I) then do (Set VariableSet LoadCode = (LoadCode + 9)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Zero) then do (Set VariableSet LoadCode = (LoadCode + 0)) else do (Do nothing)
Hero - Set (Last created unit) Hero-level to (Integer(LoadCode)) , Show level-up graphics
Set Variable Set LoadCode = ""
For each (Integer A) from 13 to 13 , do (Actions)
Loop - Actions
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to A) then do (Set VariableSet LoadCode = (LoadCode + 1)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to B) then do (Set VariableSet LoadCode = (LoadCode + 2)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to C) then do (Set VariableSet LoadCode = (LoadCode + 3)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to D) then do (Set VariableSet LoadCode = (LoadCode + 4)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to E) then do (Set VariableSet LoadCode = (LoadCode + 5)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to F) then do (Set VariableSet LoadCode = (LoadCode + 6)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to G) then do (Set VariableSet LoadCode = (LoadCode + 7)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to H) then do (Set VariableSet LoadCode = (LoadCode + 8)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to I) then do (Set VariableSet LoadCode = (LoadCode + 9)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to J) then do (Set VariableSet LoadCode = (LoadCode + 10)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to K) then do (Set VariableSet LoadCode = (LoadCode + 11)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to L) then do (Set VariableSet LoadCode = (LoadCode + 12)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to M) then do (Set VariableSet LoadCode = (LoadCode + 13)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to N) then do (Set VariableSet LoadCode = (LoadCode + 14)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to O) then do (Set VariableSet LoadCode = (LoadCode + 15)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to P) then do (Set VariableSet LoadCode = (LoadCode + 16)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Q) then do (Set VariableSet LoadCode = (LoadCode + 17)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to R) then do (Set VariableSet LoadCode = (LoadCode + 18)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to S) then do (Set VariableSet LoadCode = (LoadCode + 19)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to T) then do (Set VariableSet LoadCode = (LoadCode + 20)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to U) then do (Set VariableSet LoadCode = (LoadCode + 21)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to V) then do (Set VariableSet LoadCode = (LoadCode + 22)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to W) then do (Set VariableSet LoadCode = (LoadCode + 23)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to X) then do (Set VariableSet LoadCode = (LoadCode + 24)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Y) then do (Set VariableSet LoadCode = (LoadCode + 25)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Z) then do (Set VariableSet LoadCode = (LoadCode + 26)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to a) then do (Set VariableSet LoadCode = (LoadCode + 27)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to b) then do (Set VariableSet LoadCode = (LoadCode + 28)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to c) then do (Set VariableSet LoadCode = (LoadCode + 29)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to d) then do (Set VariableSet LoadCode = (LoadCode + 30)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to e) then do (Set VariableSet LoadCode = (LoadCode + 31)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to f) then do (Set VariableSet LoadCode = (LoadCode + 32)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to g) then do (Set VariableSet LoadCode = (LoadCode + 33)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to h) then do (Set VariableSet LoadCode = (LoadCode + 34)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to i) then do (Set VariableSet LoadCode = (LoadCode + 35)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to j) then do (Set VariableSet LoadCode = (LoadCode + 36)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to k) then do (Set VariableSet LoadCode = (LoadCode + 37)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to l) then do (Set VariableSet LoadCode = (LoadCode + 38)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to m) then do (Set VariableSet LoadCode = (LoadCode + 39)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to n) then do (Set VariableSet LoadCode = (LoadCode + 40)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to o) then do (Set VariableSet LoadCode = (LoadCode + 41)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to p) then do (Set VariableSet LoadCode = (LoadCode + 42)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to q) then do (Set VariableSet LoadCode = (LoadCode + 43)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to r) then do (Set VariableSet LoadCode = (LoadCode + 44)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to s) then do (Set VariableSet LoadCode = (LoadCode + 45)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to t) then do (Set VariableSet LoadCode = (LoadCode + 46)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to u) then do (Set VariableSet LoadCode = (LoadCode + 47)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to v) then do (Set VariableSet LoadCode = (LoadCode + 48)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to w) then do (Set VariableSet LoadCode = (LoadCode + 49)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to x) then do (Set VariableSet LoadCode = (LoadCode + 50)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to y) then do (Set VariableSet LoadCode = (LoadCode + 51)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to z) then do (Set VariableSet LoadCode = (LoadCode + 52)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to One) then do (Set VariableSet LoadCode = (LoadCode + 53)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Two) then do (Set VariableSet LoadCode = (LoadCode + 54)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Three) then do (Set VariableSet LoadCode = (LoadCode + 55)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Four) then do (Set VariableSet LoadCode = (LoadCode + 56)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Five) then do (Set VariableSet LoadCode = (LoadCode + 57)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Six) then do (Set VariableSet LoadCode = (LoadCode + 58)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Seven) then do (Set VariableSet LoadCode = (LoadCode + 59)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Eight) then do (Set VariableSet LoadCode = (LoadCode + 60)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Nine) then do (Set VariableSet LoadCode = (LoadCode + 61)) else do (Do nothing)
Hero - Create Item[(Integer(LoadCode))] and give it to (Last created unit)
Set Variable Set LoadCode = ""
For each (Integer A) from 14 to 14 , do (Actions)
Loop - Actions
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to A) then do (Set VariableSet LoadCode = (LoadCode + 1)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to B) then do (Set VariableSet LoadCode = (LoadCode + 2)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to C) then do (Set VariableSet LoadCode = (LoadCode + 3)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to D) then do (Set VariableSet LoadCode = (LoadCode + 4)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to E) then do (Set VariableSet LoadCode = (LoadCode + 5)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to F) then do (Set VariableSet LoadCode = (LoadCode + 6)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to G) then do (Set VariableSet LoadCode = (LoadCode + 7)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to H) then do (Set VariableSet LoadCode = (LoadCode + 8)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to I) then do (Set VariableSet LoadCode = (LoadCode + 9)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to J) then do (Set VariableSet LoadCode = (LoadCode + 10)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to K) then do (Set VariableSet LoadCode = (LoadCode + 11)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to L) then do (Set VariableSet LoadCode = (LoadCode + 12)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to M) then do (Set VariableSet LoadCode = (LoadCode + 13)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to N) then do (Set VariableSet LoadCode = (LoadCode + 14)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to O) then do (Set VariableSet LoadCode = (LoadCode + 15)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to P) then do (Set VariableSet LoadCode = (LoadCode + 16)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Q) then do (Set VariableSet LoadCode = (LoadCode + 17)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to R) then do (Set VariableSet LoadCode = (LoadCode + 18)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to S) then do (Set VariableSet LoadCode = (LoadCode + 19)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to T) then do (Set VariableSet LoadCode = (LoadCode + 20)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to U) then do (Set VariableSet LoadCode = (LoadCode + 21)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to V) then do (Set VariableSet LoadCode = (LoadCode + 22)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to W) then do (Set VariableSet LoadCode = (LoadCode + 23)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to X) then do (Set VariableSet LoadCode = (LoadCode + 24)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Y) then do (Set VariableSet LoadCode = (LoadCode + 25)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Z) then do (Set VariableSet LoadCode = (LoadCode + 26)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to a) then do (Set VariableSet LoadCode = (LoadCode + 27)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to b) then do (Set VariableSet LoadCode = (LoadCode + 28)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to c) then do (Set VariableSet LoadCode = (LoadCode + 29)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to d) then do (Set VariableSet LoadCode = (LoadCode + 30)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to e) then do (Set VariableSet LoadCode = (LoadCode + 31)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to f) then do (Set VariableSet LoadCode = (LoadCode + 32)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to g) then do (Set VariableSet LoadCode = (LoadCode + 33)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to h) then do (Set VariableSet LoadCode = (LoadCode + 34)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to i) then do (Set VariableSet LoadCode = (LoadCode + 35)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to j) then do (Set VariableSet LoadCode = (LoadCode + 36)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to k) then do (Set VariableSet LoadCode = (LoadCode + 37)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to l) then do (Set VariableSet LoadCode = (LoadCode + 38)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to m) then do (Set VariableSet LoadCode = (LoadCode + 39)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to n) then do (Set VariableSet LoadCode = (LoadCode + 40)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to o) then do (Set VariableSet LoadCode = (LoadCode + 41)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to p) then do (Set VariableSet LoadCode = (LoadCode + 42)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to q) then do (Set VariableSet LoadCode = (LoadCode + 43)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to r) then do (Set VariableSet LoadCode = (LoadCode + 44)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to s) then do (Set VariableSet LoadCode = (LoadCode + 45)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to t) then do (Set VariableSet LoadCode = (LoadCode + 46)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to u) then do (Set VariableSet LoadCode = (LoadCode + 47)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to v) then do (Set VariableSet LoadCode = (LoadCode + 48)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to w) then do (Set VariableSet LoadCode = (LoadCode + 49)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to x) then do (Set VariableSet LoadCode = (LoadCode + 50)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to y) then do (Set VariableSet LoadCode = (LoadCode + 51)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to z) then do (Set VariableSet LoadCode = (LoadCode + 52)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to One) then do (Set VariableSet LoadCode = (LoadCode + 53)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Two) then do (Set VariableSet LoadCode = (LoadCode + 54)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Three) then do (Set VariableSet LoadCode = (LoadCode + 55)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Four) then do (Set VariableSet LoadCode = (LoadCode + 56)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Five) then do (Set VariableSet LoadCode = (LoadCode + 57)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Six) then do (Set VariableSet LoadCode = (LoadCode + 58)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Seven) then do (Set VariableSet LoadCode = (LoadCode + 59)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Eight) then do (Set VariableSet LoadCode = (LoadCode + 60)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Nine) then do (Set VariableSet LoadCode = (LoadCode + 61)) else do (Do nothing)
Hero - Create Item[(Integer(LoadCode))] and give it to (Last created unit)
Set Variable Set LoadCode = ""
For each (Integer A) from 15 to 15 , do (Actions)
Loop - Actions
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to A) then do (Set VariableSet LoadCode = (LoadCode + 1)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to B) then do (Set VariableSet LoadCode = (LoadCode + 2)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to C) then do (Set VariableSet LoadCode = (LoadCode + 3)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to D) then do (Set VariableSet LoadCode = (LoadCode + 4)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to E) then do (Set VariableSet LoadCode = (LoadCode + 5)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to F) then do (Set VariableSet LoadCode = (LoadCode + 6)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to G) then do (Set VariableSet LoadCode = (LoadCode + 7)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to H) then do (Set VariableSet LoadCode = (LoadCode + 8)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to I) then do (Set VariableSet LoadCode = (LoadCode + 9)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to J) then do (Set VariableSet LoadCode = (LoadCode + 10)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to K) then do (Set VariableSet LoadCode = (LoadCode + 11)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to L) then do (Set VariableSet LoadCode = (LoadCode + 12)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to M) then do (Set VariableSet LoadCode = (LoadCode + 13)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to N) then do (Set VariableSet LoadCode = (LoadCode + 14)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to O) then do (Set VariableSet LoadCode = (LoadCode + 15)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to P) then do (Set VariableSet LoadCode = (LoadCode + 16)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Q) then do (Set VariableSet LoadCode = (LoadCode + 17)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to R) then do (Set VariableSet LoadCode = (LoadCode + 18)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to S) then do (Set VariableSet LoadCode = (LoadCode + 19)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to T) then do (Set VariableSet LoadCode = (LoadCode + 20)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to U) then do (Set VariableSet LoadCode = (LoadCode + 21)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to V) then do (Set VariableSet LoadCode = (LoadCode + 22)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to W) then do (Set VariableSet LoadCode = (LoadCode + 23)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to X) then do (Set VariableSet LoadCode = (LoadCode + 24)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Y) then do (Set VariableSet LoadCode = (LoadCode + 25)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Z) then do (Set VariableSet LoadCode = (LoadCode + 26)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to a) then do (Set VariableSet LoadCode = (LoadCode + 27)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to b) then do (Set VariableSet LoadCode = (LoadCode + 28)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to c) then do (Set VariableSet LoadCode = (LoadCode + 29)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to d) then do (Set VariableSet LoadCode = (LoadCode + 30)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to e) then do (Set VariableSet LoadCode = (LoadCode + 31)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to f) then do (Set VariableSet LoadCode = (LoadCode + 32)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to g) then do (Set VariableSet LoadCode = (LoadCode + 33)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to h) then do (Set VariableSet LoadCode = (LoadCode + 34)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to i) then do (Set VariableSet LoadCode = (LoadCode + 35)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to j) then do (Set VariableSet LoadCode = (LoadCode + 36)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to k) then do (Set VariableSet LoadCode = (LoadCode + 37)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to l) then do (Set VariableSet LoadCode = (LoadCode + 38)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to m) then do (Set VariableSet LoadCode = (LoadCode + 39)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to n) then do (Set VariableSet LoadCode = (LoadCode + 40)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to o) then do (Set VariableSet LoadCode = (LoadCode + 41)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to p) then do (Set VariableSet LoadCode = (LoadCode + 42)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to q) then do (Set VariableSet LoadCode = (LoadCode + 43)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to r) then do (Set VariableSet LoadCode = (LoadCode + 44)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to s) then do (Set VariableSet LoadCode = (LoadCode + 45)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to t) then do (Set VariableSet LoadCode = (LoadCode + 46)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to u) then do (Set VariableSet LoadCode = (LoadCode + 47)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to v) then do (Set VariableSet LoadCode = (LoadCode + 48)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to w) then do (Set VariableSet LoadCode = (LoadCode + 49)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to x) then do (Set VariableSet LoadCode = (LoadCode + 50)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to y) then do (Set VariableSet LoadCode = (LoadCode + 51)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to z) then do (Set VariableSet LoadCode = (LoadCode + 52)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to One) then do (Set VariableSet LoadCode = (LoadCode + 53)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Two) then do (Set VariableSet LoadCode = (LoadCode + 54)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Three) then do (Set VariableSet LoadCode = (LoadCode + 55)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Four) then do (Set VariableSet LoadCode = (LoadCode + 56)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Five) then do (Set VariableSet LoadCode = (LoadCode + 57)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Six) then do (Set VariableSet LoadCode = (LoadCode + 58)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Seven) then do (Set VariableSet LoadCode = (LoadCode + 59)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Eight) then do (Set VariableSet LoadCode = (LoadCode + 60)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Nine) then do (Set VariableSet LoadCode = (LoadCode + 61)) else do (Do nothing)
Hero - Create Item[(Integer(LoadCode))] and give it to (Last created unit)
Set Variable Set LoadCode = ""
For each (Integer A) from 16 to 16 , do (Actions)
Loop - Actions
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to A) then do (Set VariableSet LoadCode = (LoadCode + 1)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to B) then do (Set VariableSet LoadCode = (LoadCode + 2)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to C) then do (Set VariableSet LoadCode = (LoadCode + 3)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to D) then do (Set VariableSet LoadCode = (LoadCode + 4)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to E) then do (Set VariableSet LoadCode = (LoadCode + 5)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to F) then do (Set VariableSet LoadCode = (LoadCode + 6)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to G) then do (Set VariableSet LoadCode = (LoadCode + 7)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to H) then do (Set VariableSet LoadCode = (LoadCode + 8)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to I) then do (Set VariableSet LoadCode = (LoadCode + 9)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to J) then do (Set VariableSet LoadCode = (LoadCode + 10)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to K) then do (Set VariableSet LoadCode = (LoadCode + 11)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to L) then do (Set VariableSet LoadCode = (LoadCode + 12)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to M) then do (Set VariableSet LoadCode = (LoadCode + 13)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to N) then do (Set VariableSet LoadCode = (LoadCode + 14)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to O) then do (Set VariableSet LoadCode = (LoadCode + 15)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to P) then do (Set VariableSet LoadCode = (LoadCode + 16)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Q) then do (Set VariableSet LoadCode = (LoadCode + 17)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to R) then do (Set VariableSet LoadCode = (LoadCode + 18)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to S) then do (Set VariableSet LoadCode = (LoadCode + 19)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to T) then do (Set VariableSet LoadCode = (LoadCode + 20)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to U) then do (Set VariableSet LoadCode = (LoadCode + 21)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to V) then do (Set VariableSet LoadCode = (LoadCode + 22)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to W) then do (Set VariableSet LoadCode = (LoadCode + 23)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to X) then do (Set VariableSet LoadCode = (LoadCode + 24)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Y) then do (Set VariableSet LoadCode = (LoadCode + 25)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Z) then do (Set VariableSet LoadCode = (LoadCode + 26)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to a) then do (Set VariableSet LoadCode = (LoadCode + 27)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to b) then do (Set VariableSet LoadCode = (LoadCode + 28)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to c) then do (Set VariableSet LoadCode = (LoadCode + 29)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to d) then do (Set VariableSet LoadCode = (LoadCode + 30)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to e) then do (Set VariableSet LoadCode = (LoadCode + 31)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to f) then do (Set VariableSet LoadCode = (LoadCode + 32)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to g) then do (Set VariableSet LoadCode = (LoadCode + 33)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to h) then do (Set VariableSet LoadCode = (LoadCode + 34)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to i) then do (Set VariableSet LoadCode = (LoadCode + 35)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to j) then do (Set VariableSet LoadCode = (LoadCode + 36)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to k) then do (Set VariableSet LoadCode = (LoadCode + 37)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to l) then do (Set VariableSet LoadCode = (LoadCode + 38)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to m) then do (Set VariableSet LoadCode = (LoadCode + 39)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to n) then do (Set VariableSet LoadCode = (LoadCode + 40)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to o) then do (Set VariableSet LoadCode = (LoadCode + 41)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to p) then do (Set VariableSet LoadCode = (LoadCode + 42)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to q) then do (Set VariableSet LoadCode = (LoadCode + 43)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to r) then do (Set VariableSet LoadCode = (LoadCode + 44)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to s) then do (Set VariableSet LoadCode = (LoadCode + 45)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to t) then do (Set VariableSet LoadCode = (LoadCode + 46)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to u) then do (Set VariableSet LoadCode = (LoadCode + 47)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to v) then do (Set VariableSet LoadCode = (LoadCode + 48)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to w) then do (Set VariableSet LoadCode = (LoadCode + 49)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to x) then do (Set VariableSet LoadCode = (LoadCode + 50)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to y) then do (Set VariableSet LoadCode = (LoadCode + 51)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to z) then do (Set VariableSet LoadCode = (LoadCode + 52)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to One) then do (Set VariableSet LoadCode = (LoadCode + 53)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Two) then do (Set VariableSet LoadCode = (LoadCode + 54)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Three) then do (Set VariableSet LoadCode = (LoadCode + 55)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Four) then do (Set VariableSet LoadCode = (LoadCode + 56)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Five) then do (Set VariableSet LoadCode = (LoadCode + 57)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Six) then do (Set VariableSet LoadCode = (LoadCode + 58)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Seven) then do (Set VariableSet LoadCode = (LoadCode + 59)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Eight) then do (Set VariableSet LoadCode = (LoadCode + 60)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Nine) then do (Set VariableSet LoadCode = (LoadCode + 61)) else do (Do nothing)
Hero - Create Item[(Integer(LoadCode))] and give it to (Last created unit)
Set Variable Set LoadCode = ""
For each (Integer A) from 17 to 17 , do (Actions)
Loop - Actions
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to A) then do (Set VariableSet LoadCode = (LoadCode + 1)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to B) then do (Set VariableSet LoadCode = (LoadCode + 2)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to C) then do (Set VariableSet LoadCode = (LoadCode + 3)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to D) then do (Set VariableSet LoadCode = (LoadCode + 4)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to E) then do (Set VariableSet LoadCode = (LoadCode + 5)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to F) then do (Set VariableSet LoadCode = (LoadCode + 6)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to G) then do (Set VariableSet LoadCode = (LoadCode + 7)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to H) then do (Set VariableSet LoadCode = (LoadCode + 8)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to I) then do (Set VariableSet LoadCode = (LoadCode + 9)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to J) then do (Set VariableSet LoadCode = (LoadCode + 10)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to K) then do (Set VariableSet LoadCode = (LoadCode + 11)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to L) then do (Set VariableSet LoadCode = (LoadCode + 12)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to M) then do (Set VariableSet LoadCode = (LoadCode + 13)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to N) then do (Set VariableSet LoadCode = (LoadCode + 14)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to O) then do (Set VariableSet LoadCode = (LoadCode + 15)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to P) then do (Set VariableSet LoadCode = (LoadCode + 16)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Q) then do (Set VariableSet LoadCode = (LoadCode + 17)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to R) then do (Set VariableSet LoadCode = (LoadCode + 18)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to S) then do (Set VariableSet LoadCode = (LoadCode + 19)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to T) then do (Set VariableSet LoadCode = (LoadCode + 20)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to U) then do (Set VariableSet LoadCode = (LoadCode + 21)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to V) then do (Set VariableSet LoadCode = (LoadCode + 22)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to W) then do (Set VariableSet LoadCode = (LoadCode + 23)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to X) then do (Set VariableSet LoadCode = (LoadCode + 24)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Y) then do (Set VariableSet LoadCode = (LoadCode + 25)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Z) then do (Set VariableSet LoadCode = (LoadCode + 26)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to a) then do (Set VariableSet LoadCode = (LoadCode + 27)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to b) then do (Set VariableSet LoadCode = (LoadCode + 28)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to c) then do (Set VariableSet LoadCode = (LoadCode + 29)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to d) then do (Set VariableSet LoadCode = (LoadCode + 30)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to e) then do (Set VariableSet LoadCode = (LoadCode + 31)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to f) then do (Set VariableSet LoadCode = (LoadCode + 32)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to g) then do (Set VariableSet LoadCode = (LoadCode + 33)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to h) then do (Set VariableSet LoadCode = (LoadCode + 34)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to i) then do (Set VariableSet LoadCode = (LoadCode + 35)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to j) then do (Set VariableSet LoadCode = (LoadCode + 36)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to k) then do (Set VariableSet LoadCode = (LoadCode + 37)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to l) then do (Set VariableSet LoadCode = (LoadCode + 38)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to m) then do (Set VariableSet LoadCode = (LoadCode + 39)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to n) then do (Set VariableSet LoadCode = (LoadCode + 40)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to o) then do (Set VariableSet LoadCode = (LoadCode + 41)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to p) then do (Set VariableSet LoadCode = (LoadCode + 42)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to q) then do (Set VariableSet LoadCode = (LoadCode + 43)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to r) then do (Set VariableSet LoadCode = (LoadCode + 44)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to s) then do (Set VariableSet LoadCode = (LoadCode + 45)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to t) then do (Set VariableSet LoadCode = (LoadCode + 46)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to u) then do (Set VariableSet LoadCode = (LoadCode + 47)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to v) then do (Set VariableSet LoadCode = (LoadCode + 48)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to w) then do (Set VariableSet LoadCode = (LoadCode + 49)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to x) then do (Set VariableSet LoadCode = (LoadCode + 50)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to y) then do (Set VariableSet LoadCode = (LoadCode + 51)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to z) then do (Set VariableSet LoadCode = (LoadCode + 52)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to One) then do (Set VariableSet LoadCode = (LoadCode + 53)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Two) then do (Set VariableSet LoadCode = (LoadCode + 54)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Three) then do (Set VariableSet LoadCode = (LoadCode + 55)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Four) then do (Set VariableSet LoadCode = (LoadCode + 56)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Five) then do (Set VariableSet LoadCode = (LoadCode + 57)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Six) then do (Set VariableSet LoadCode = (LoadCode + 58)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Seven) then do (Set VariableSet LoadCode = (LoadCode + 59)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Eight) then do (Set VariableSet LoadCode = (LoadCode + 60)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Nine) then do (Set VariableSet LoadCode = (LoadCode + 61)) else do (Do nothing)
Hero - Create Item[(Integer(LoadCode))] and give it to (Last created unit)
Set Variable Set LoadCode = ""
For each (Integer A) from 18 to 18 , do (Actions)
Loop - Actions
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to A) then do (Set VariableSet LoadCode = (LoadCode + 1)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to B) then do (Set VariableSet LoadCode = (LoadCode + 2)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to C) then do (Set VariableSet LoadCode = (LoadCode + 3)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to D) then do (Set VariableSet LoadCode = (LoadCode + 4)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to E) then do (Set VariableSet LoadCode = (LoadCode + 5)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to F) then do (Set VariableSet LoadCode = (LoadCode + 6)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to G) then do (Set VariableSet LoadCode = (LoadCode + 7)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to H) then do (Set VariableSet LoadCode = (LoadCode + 8)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to I) then do (Set VariableSet LoadCode = (LoadCode + 9)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to J) then do (Set VariableSet LoadCode = (LoadCode + 10)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to K) then do (Set VariableSet LoadCode = (LoadCode + 11)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to L) then do (Set VariableSet LoadCode = (LoadCode + 12)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to M) then do (Set VariableSet LoadCode = (LoadCode + 13)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to N) then do (Set VariableSet LoadCode = (LoadCode + 14)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to O) then do (Set VariableSet LoadCode = (LoadCode + 15)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to P) then do (Set VariableSet LoadCode = (LoadCode + 16)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Q) then do (Set VariableSet LoadCode = (LoadCode + 17)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to R) then do (Set VariableSet LoadCode = (LoadCode + 18)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to S) then do (Set VariableSet LoadCode = (LoadCode + 19)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to T) then do (Set VariableSet LoadCode = (LoadCode + 20)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to U) then do (Set VariableSet LoadCode = (LoadCode + 21)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to V) then do (Set VariableSet LoadCode = (LoadCode + 22)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to W) then do (Set VariableSet LoadCode = (LoadCode + 23)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to X) then do (Set VariableSet LoadCode = (LoadCode + 24)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Y) then do (Set VariableSet LoadCode = (LoadCode + 25)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Z) then do (Set VariableSet LoadCode = (LoadCode + 26)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to a) then do (Set VariableSet LoadCode = (LoadCode + 27)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to b) then do (Set VariableSet LoadCode = (LoadCode + 28)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to c) then do (Set VariableSet LoadCode = (LoadCode + 29)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to d) then do (Set VariableSet LoadCode = (LoadCode + 30)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to e) then do (Set VariableSet LoadCode = (LoadCode + 31)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to f) then do (Set VariableSet LoadCode = (LoadCode + 32)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to g) then do (Set VariableSet LoadCode = (LoadCode + 33)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to h) then do (Set VariableSet LoadCode = (LoadCode + 34)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to i) then do (Set VariableSet LoadCode = (LoadCode + 35)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to j) then do (Set VariableSet LoadCode = (LoadCode + 36)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to k) then do (Set VariableSet LoadCode = (LoadCode + 37)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to l) then do (Set VariableSet LoadCode = (LoadCode + 38)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to m) then do (Set VariableSet LoadCode = (LoadCode + 39)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to n) then do (Set VariableSet LoadCode = (LoadCode + 40)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to o) then do (Set VariableSet LoadCode = (LoadCode + 41)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to p) then do (Set VariableSet LoadCode = (LoadCode + 42)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to q) then do (Set VariableSet LoadCode = (LoadCode + 43)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to r) then do (Set VariableSet LoadCode = (LoadCode + 44)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to s) then do (Set VariableSet LoadCode = (LoadCode + 45)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to t) then do (Set VariableSet LoadCode = (LoadCode + 46)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to u) then do (Set VariableSet LoadCode = (LoadCode + 47)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to v) then do (Set VariableSet LoadCode = (LoadCode + 48)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to w) then do (Set VariableSet LoadCode = (LoadCode + 49)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to x) then do (Set VariableSet LoadCode = (LoadCode + 50)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to y) then do (Set VariableSet LoadCode = (LoadCode + 51)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to z) then do (Set VariableSet LoadCode = (LoadCode + 52)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to One) then do (Set VariableSet LoadCode = (LoadCode + 53)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Two) then do (Set VariableSet LoadCode = (LoadCode + 54)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Three) then do (Set VariableSet LoadCode = (LoadCode + 55)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Four) then do (Set VariableSet LoadCode = (LoadCode + 56)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Five) then do (Set VariableSet LoadCode = (LoadCode + 57)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Six) then do (Set VariableSet LoadCode = (LoadCode + 58)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Seven) then do (Set VariableSet LoadCode = (LoadCode + 59)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Eight) then do (Set VariableSet LoadCode = (LoadCode + 60)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to Nine) then do (Set VariableSet LoadCode = (LoadCode + 61)) else do (Do nothing)
Hero - Create Item[(Integer(LoadCode))] and give it to (Last created unit)
Set Variable Set LoadCode = ""
For each (Integer A) from 20 to 28 , do (Actions)
Loop - Actions
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to A) then do (Set VariableSet LoadCode = (LoadCode + 1)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to B) then do (Set VariableSet LoadCode = (LoadCode + 2)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to C) then do (Set VariableSet LoadCode = (LoadCode + 3)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to D) then do (Set VariableSet LoadCode = (LoadCode + 4)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to E) then do (Set VariableSet LoadCode = (LoadCode + 5)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to F) then do (Set VariableSet LoadCode = (LoadCode + 6)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to G) then do (Set VariableSet LoadCode = (LoadCode + 7)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to H) then do (Set VariableSet LoadCode = (LoadCode + 8)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to I) then do (Set VariableSet LoadCode = (LoadCode + 9)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to V) then do (Set VariableSet LoadCode = (LoadCode + 0)) else do (Do nothing)
Player - Set (Triggering player) . Current gold to (Integer(LoadCode))
Set Variable Set LoadCode = ""
For each (Integer A) from 30 to 38 , do (Actions)
Loop - Actions
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to A) then do (Set VariableSet LoadCode = (LoadCode + 1)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to B) then do (Set VariableSet LoadCode = (LoadCode + 2)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to C) then do (Set VariableSet LoadCode = (LoadCode + 3)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to D) then do (Set VariableSet LoadCode = (LoadCode + 4)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to E) then do (Set VariableSet LoadCode = (LoadCode + 5)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to F) then do (Set VariableSet LoadCode = (LoadCode + 6)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to G) then do (Set VariableSet LoadCode = (LoadCode + 7)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to H) then do (Set VariableSet LoadCode = (LoadCode + 8)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to I) then do (Set VariableSet LoadCode = (LoadCode + 9)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to V) then do (Set VariableSet LoadCode = (LoadCode + 0)) else do (Do nothing)
Hero - Modify Strength of (Last created unit) : Set to (Integer(LoadCode)) .
Set Variable Set LoadCode = ""
For each (Integer A) from 40 to 48 , do (Actions)
Loop - Actions
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to A) then do (Set VariableSet LoadCode = (LoadCode + 1)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to B) then do (Set VariableSet LoadCode = (LoadCode + 2)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to C) then do (Set VariableSet LoadCode = (LoadCode + 3)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to D) then do (Set VariableSet LoadCode = (LoadCode + 4)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to E) then do (Set VariableSet LoadCode = (LoadCode + 5)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to F) then do (Set VariableSet LoadCode = (LoadCode + 6)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to G) then do (Set VariableSet LoadCode = (LoadCode + 7)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to H) then do (Set VariableSet LoadCode = (LoadCode + 8)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to I) then do (Set VariableSet LoadCode = (LoadCode + 9)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to V) then do (Set VariableSet LoadCode = (LoadCode + 0)) else do (Do nothing)
Hero - Modify Agility of (Last created unit) : Set to (Integer(LoadCode)) .
Set Variable Set LoadCode = ""
For each (Integer A) from 50 to 58 , do (Actions)
Loop - Actions
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to A) then do (Set VariableSet LoadCode = (LoadCode + 1)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to B) then do (Set VariableSet LoadCode = (LoadCode + 2)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to C) then do (Set VariableSet LoadCode = (LoadCode + 3)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to D) then do (Set VariableSet LoadCode = (LoadCode + 4)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to E) then do (Set VariableSet LoadCode = (LoadCode + 5)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to F) then do (Set VariableSet LoadCode = (LoadCode + 6)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to G) then do (Set VariableSet LoadCode = (LoadCode + 7)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to H) then do (Set VariableSet LoadCode = (LoadCode + 8)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to I) then do (Set VariableSet LoadCode = (LoadCode + 9)) else do (Do nothing)
If ((Substring((Entered chat string), (Integer A), (Integer A))) Equal to V) then do (Set VariableSet LoadCode = (LoadCode + 0)) else do (Do nothing)
Hero - Modify Intelligence of (Last created unit) : Set to (Integer(LoadCode)) .
Set Variable Set LoadCode = ""
Untitled Trigger 001
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Paladin
Actions
Wait 5.00 seconds
Unit - Rescue (Triggering unit) for (Owner of (Triggering unit)) and Change color
Unit - Move (Triggering unit) instantly to (Center of SpawnGuy <gen>)
Untitled Trigger 001 Copy
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Archmage
Actions
Wait 5.00 seconds
Unit - Rescue (Triggering unit) for (Owner of (Triggering unit)) and Change color
Unit - Move (Triggering unit) instantly to (Center of SpawnGuy <gen>)
Untitled Trigger 001 Copy 2
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Mountain King
Actions
Wait 5.00 seconds
Unit - Rescue (Triggering unit) for (Owner of (Triggering unit)) and Change color
Unit - Move (Triggering unit) instantly to (Center of SpawnGuy <gen>)
Untitled Trigger 001 Copy 3
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Blood Mage
Actions
Wait 5.00 seconds
Unit - Rescue (Triggering unit) for (Owner of (Triggering unit)) and Change color
Unit - Move (Triggering unit) instantly to (Center of SpawnGuy <gen>)
Untitled Trigger 001 Copy 3 Copy
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Wolf
Actions
Wait 25.00 seconds
Unit - Rescue (Triggering unit) for (Owner of (Triggering unit)) and Change color
Untitled Trigger 001 Copy 3 Copy Copy
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Forest Troll
Actions
Wait 25.00 seconds
Unit - Rescue (Triggering unit) for (Owner of (Triggering unit)) and Change color
Top