From a40873a0631be213800144cef19641d4e539db76 Mon Sep 17 00:00:00 2001
From: "RamiLego4Game (Mobile)" <ramilego4game@gmail.com>
Date: Fri, 11 May 2018 08:18:32 +0300
Subject: [PATCH] The icon extraction process is almost complete

---
 icon-changer.lua | 42 +++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 41 insertions(+), 1 deletion(-)

diff --git a/icon-changer.lua b/icon-changer.lua
index b13fa13..323d7d5 100644
--- a/icon-changer.lua
+++ b/icon-changer.lua
@@ -179,6 +179,8 @@ local function readResourceDirectoryTable(exeFile,Sections,RootOffset,Level)
           print("Unkown type")
         end
       end
+      
+      Name = tostring(Name)
     end
     
     if band(Offset,0x80000000) ~= 0 then
@@ -316,7 +318,45 @@ function icapi.extractIcon(exeFile)
   
   writeTree(ResourcesTree,"/")
   
-  return "MEH"
+  --Icon extraction process
+  local IconGroup = ResourcesTree["Group Icons"]["1"]["1033"]
+  
+  do
+    local Icons = {""}
+    
+    local o = 5 --String Offset
+    
+    --Read the icon header
+    local Count = decodeNumber(IconGroup:sub(o,o+1))
+    
+    error(Count)
+    
+    o = o+2
+    
+    local DataOffset = 6 + 16*Count
+    
+    for i=1,Count do
+      o = o+12
+      
+      local IcoID = decodeNumber(IconGroup:sub(o,o+1))
+      
+      if not ResourcesTree["Icons"][tostring(IcoID)] then error(IcoID) end
+      
+      Icons[#Icons+1] = ResourcesTree["Icons"][tostring(IcoID)]["1033"]
+      
+      local Length = #Icons[#Icons]
+      
+      IconGroup = IconGroup:sub(1,o-1) .. encodeNumber(DataOffset,4,true) .. IconGroup:sub(o+2,-1)
+      
+      o = o + 4
+      
+      DataOffset = DataOffset + Length
+    end
+    
+    Icons[1] = IconGroup
+    
+    return table.concat(Icons)
+  end
 end
 
 return icapi
\ No newline at end of file