Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- setbatchlines, -1
- #Include CLR.ahk
- c# =
- (
- using System;
- using System.IO;
- namespace lod
- {
- public class parse
- {
- public string mobname(string path)
- {
- byte[] bytes = File.ReadAllBytes(path);
- long len = bytes.Length;
- long i = 0;
- int i2 = 0;
- int id;
- int namelen;
- string mobname;
- string output = "";
- do
- {
- id = (bytes[i + 4] + (bytes[i + 5] * 256) + (bytes[i + 6] * 256) + (bytes[i + 7] * 256));
- namelen = (bytes[i + 8] + bytes[i + 9] + bytes[i + 10] + bytes[i + 11]);
- mobname = "";
- i2 = 1;
- while (i2 < namelen + 1)
- {
- i2++;
- mobname = mobname + (char)(bytes[i + 10 + i2]);
- }
- output = output + id + ";" + mobname + "|";
- i = i + 8 + namelen;
- } while (i < len - 4);
- return output;
- }
- }
- }
- )
- fileselectfile, path, o
- CLR_Start()
- asm := CLR_CompileC#(c#, "system.dll")
- get := CLR_CreateObject(asm, "lod.parse")
- allmobs := get.mobname(path)
- if FileExist(path)
- {
- Gui, Add, ListView, x12 y10 w240 h350 vlb, ID|Name
- loop, parse, allmobs, |
- LV_Add(0, substr(a_loopfield, 1, instr(a_loopfield, ";")-1), substr(a_loopfield, instr(a_loopfield, ";")+1))
- Gui, Show, h377 w267, Mobname Parse ~ILAN
- }
- else
- exitapp
- return
- GuiClose:
- ExitApp
- msgbox,
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement