Save/Load Inventory? Unit to 4 only

[gwcadu942]

• SaveLoad Initialization Hero
  • SaveLoad Initialization Hero
    • Events
      • Map initialization
    • Conditions
    • Actions
      • -------- Inventory Player 1 --------
      • Set SaveLoad_Inventory_Player1[1] = Inventory 0029 <gen>
      • Set SaveLoad_Inventory_Player1[2] = Inventory 0032 <gen>
      • Set SaveLoad_Inventory_Player1[3] = Inventory 0030 <gen>
      • Set SaveLoad_Inventory_Player1[4] = Inventory 0031 <gen>
      • -------- Inventory Player 2 --------
      • Set SaveLoad_Inventory_Player2[1] = Inventory 0033 <gen>
      • Set SaveLoad_Inventory_Player2[2] = Inventory 0036 <gen>
      • Set SaveLoad_Inventory_Player2[3] = Inventory 0034 <gen>
      • Set SaveLoad_Inventory_Player2[4] = Inventory 0035 <gen>
      • -------- List of Heroes --------
      • Set SaveLoad_Heroes[1] = Paladin
      • Set SaveLoad_Heroes[2] = Priest
      • Set SaveLoad_Heroes[3] = Hunter
      • Set SaveLoad_Heroes[4] = Mage
      • Set SaveLoad_Heroes[5] = Rogue
      • Set SaveLoad_Heroes[6] = Warrior
      • Set SaveLoad_Heroes[7] = Druid
      • Set SaveLoad_Heroes[8] = Warlock
      • -------- Number of Heroes --------
      • Set SaveLoad_Heroes_LastIndex = 4
      • -------- These three lines may be changed if needed --------
      • Set SaveLoad_Alphabet = ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789
      • Set SaveLoad_CaseSensitive = False
      • Set SaveLoad_UsePlayername = True
      • -------- Required: false --------
      • Set SaveLoad_Initialized = False
      • -------- Leave as is. Used to autocreate variables when copy & pasting to a new map --------
      • Set Save[1] = 0
      • Set SaveCount = 1
      • Set Validate = False
      • Set SaveLoad_Compress[1] = 0
      • Set SaveLoad_Uncompress[1] = 0

• Save Inventory Player 1
  • Events
    • Player - Player 1 (Red) types a chat message containing -save2 as An exact match
    • Player - Player 2 (Blue) types a chat message containing -save as An exact match
    • Player - Player 3 (Teal) types a chat message containing -save as An exact match
    • Player - Player 4 (Purple) types a chat message containing -save as An exact match
    • Player - Player 5 (Yellow) types a chat message containing -save as An exact match
    • Player - Player 6 (Orange) types a chat message containing -save as An exact match
    • Player - Player 7 (Green) types a chat message containing -save as An exact match
    • Player - Player 8 (Pink) types a chat message containing -save as An exact match
  • Conditions
  • Actions
    • Wait 1.00 seconds
    • Set SaveCount = 6
    • Unit Group - Pick every unit in (Units of type (Unit-type of SaveLoad_Inventory_Player1[1])) and do (Actions)
      • Loop - Actions
        • For each (Integer A) from 1 to 6, do (Actions)
          • Loop - Actions
            • If (All Conditions are True) then do (Then Actions) else do (Else Actions)
              • If - Conditions
                • ((Item carried by (Picked unit) in slot (Integer A)) is owned) Equal to True
              • Then - Actions
                • -------- The actual item --------
                • Set SaveCount = (SaveCount + 1)
                • Set TempItem = (Item carried by (Picked unit) in slot (Integer A))
                • Custom script: set udg_Save[udg_SaveCount] = SaveLoad_Item2Integer( udg_TempItem )
                • -------- The number of charges it has --------
                • Set SaveCount = (SaveCount + 1)
                • Set Save[SaveCount] = (Charges remaining in (Item carried by (Picked unit) in slot (Integer A)))
              • Else - Actions
    • Unit Group - Pick every unit in (Units of type (Unit-type of SaveLoad_Inventory_Player1[2])) and do (Actions)
      • Loop - Actions
        • For each (Integer A) from 1 to 6, do (Actions)
          • Loop - Actions
            • If (All Conditions are True) then do (Then Actions) else do (Else Actions)
              • If - Conditions
                • ((Item carried by (Picked unit) in slot (Integer A)) is owned) Equal to True
              • Then - Actions
                • -------- The actual item --------
                • Set SaveCount = (SaveCount + 1)
                • Set TempItem = (Item carried by (Picked unit) in slot (Integer A))
                • Custom script: set udg_Save[udg_SaveCount] = SaveLoad_Item2Integer( udg_TempItem )
                • -------- The number of charges it has --------
                • Set SaveCount = (SaveCount + 1)
                • Set Save[SaveCount] = (Charges remaining in (Item carried by (Picked unit) in slot (Integer A)))
              • Else - Actions
    • Unit Group - Pick every unit in (Units of type (Unit-type of SaveLoad_Inventory_Player1[3])) and do (Actions)
      • Loop - Actions
        • For each (Integer A) from 1 to 6, do (Actions)
          • Loop - Actions
            • If (All Conditions are True) then do (Then Actions) else do (Else Actions)
              • If - Conditions
                • ((Item carried by (Picked unit) in slot (Integer A)) is owned) Equal to True
              • Then - Actions
                • -------- The actual item --------
                • Set SaveCount = (SaveCount + 1)
                • Set TempItem = (Item carried by (Picked unit) in slot (Integer A))
                • Custom script: set udg_Save[udg_SaveCount] = SaveLoad_Item2Integer( udg_TempItem )
                • -------- The number of charges it has --------
                • Set SaveCount = (SaveCount + 1)
                • Set Save[SaveCount] = (Charges remaining in (Item carried by (Picked unit) in slot (Integer A)))
              • Else - Actions
    • Unit Group - Pick every unit in (Units of type (Unit-type of SaveLoad_Inventory_Player1[4])) and do (Actions)
      • Loop - Actions
        • For each (Integer A) from 1 to 6, do (Actions)
          • Loop - Actions
            • If (All Conditions are True) then do (Then Actions) else do (Else Actions)
              • If - Conditions
                • ((Item carried by (Picked unit) in slot (Integer A)) is owned) Equal to True
              • Then - Actions
                • -------- The actual item --------
                • Set SaveCount = (SaveCount + 1)
                • Set TempItem = (Item carried by (Picked unit) in slot (Integer A))
                • Custom script: set udg_Save[udg_SaveCount] = SaveLoad_Item2Integer( udg_TempItem )
                • -------- The number of charges it has --------
                • Set SaveCount = (SaveCount + 1)
                • Set Save[SaveCount] = (Charges remaining in (Item carried by (Picked unit) in slot (Integer A)))
              • Else - Actions
    • -------- Turn values into code --------
    • Custom script: set udg_Code = SaveLoad_Encode()
    • -------- Show code to player --------
    • Quest - Display to (Player group((Triggering player))) the Secret message: [Inventory] Your co...
    • Game - Display to (Player group((Triggering player))) for 300.00 seconds the text: Code

• Load Inventory Player 1
  • Events
    • Player - Player 1 (Red) types a chat message containing -load2 as A substring
  • Conditions
    • (Substring((Entered chat string), 1, 7)) Equal to (Matched chat string)
    • (Length of (Entered chat string)) Greater than 7
  • Actions
    • Trigger - Turn off (This trigger)
    • -------- Try to decode what was typed --------
    • Set Code = (Substring((Entered chat string), 8, (Length of (Entered chat string))))
    • Custom script: set udg_Validate = SaveLoad_Decode( udg_Code )
    • If (All Conditions are True) then do (Then Actions) else do (Else Actions)
      • If - Conditions
        • Validate Equal to False
      • Then - Actions
        • -------- Invalid code --------
        • Trigger - Turn on (This trigger)
        • Skip remaining actions
      • Else - Actions
    • -------- It worked, let's do something with it --------
    • For each (Integer A) from 1 to 6, do (Actions)
      • Loop - Actions
        • Hero - Drop the item from slot 6 of SaveLoad_Inventory_Player1[(Integer A)]
        • Item - Remove (Last dropped item)
    • Set SaveCount = 6
    • For each (Integer A) from 1 to Save[SaveCount], do (Actions)
      • Loop - Actions
        • Set SaveCount = (SaveCount + 1)
        • Custom script: set udg_TempItemType = SaveLoad_Integer2Item(udg_Save[udg_SaveCount])
        • Hero - Create TempItemType and give it to SaveLoad_Inventory_Player1[1]
        • Set SaveCount = (SaveCount + 1)
        • Item - Set charges remaining in (Last created item) to Save[SaveCount]

Please help me!

Im are noob =/

 

[Tru_Power22]

What is you question? I don't get it, please explain it better.

 

[gwcadu942]

Bump...
i have horas 03:06 AM​

 

[Tru_Power22]

That was a half hour bump... I even responded say what people need. More description.

 

[gwcadu942]

i got failed tigger

 

[gwcadu942]

Please help me, You need edit in the tigger save/load.

 

[gwcadu942]

-=Bump=-
i have horas 02:02 AM​

 

[Joccaren]

1. Stop bumping every 5 minutes, its against forum rules.
2. Exactly what isn't working? Are you not given a code, is the code not working, is only part of the code not working?