diff --git a/ArcFormats/ArcFormats.csproj b/ArcFormats/ArcFormats.csproj
index c81f2e03..831d608c 100644
--- a/ArcFormats/ArcFormats.csproj
+++ b/ArcFormats/ArcFormats.csproj
@@ -114,6 +114,9 @@
+
+
+
diff --git a/ArcFormats/KScript/ArcKPC.cs b/ArcFormats/KScript/ArcKPC.cs
new file mode 100644
index 00000000..7ab8b26f
--- /dev/null
+++ b/ArcFormats/KScript/ArcKPC.cs
@@ -0,0 +1,74 @@
+//! \file ArcKPC.cs
+//! \date Wed Aug 31 11:06:51 2016
+//! \brief KScript engine resource archive.
+//
+// Copyright (C) 2016 by morkt
+//
+// Permission is hereby granted, free of charge, to any person obtaining a copy
+// of this software and associated documentation files (the "Software"), to
+// deal in the Software without restriction, including without limitation the
+// rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
+// sell copies of the Software, and to permit persons to whom the Software is
+// furnished to do so, subject to the following conditions:
+//
+// The above copyright notice and this permission notice shall be included in
+// all copies or substantial portions of the Software.
+//
+// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
+// IN THE SOFTWARE.
+//
+
+using System.Collections.Generic;
+using System.ComponentModel.Composition;
+using GameRes.Utility;
+
+namespace GameRes.Formats.KScript
+{
+ [Export(typeof(ArchiveFormat))]
+ public class KpcOpener : ArchiveFormat
+ {
+ public override string Tag { get { return "KPC"; } }
+ public override string Description { get { return "KScript engine resource archive"; } }
+ public override uint Signature { get { return 0x50524353; } } // 'SCRPACK1'
+ public override bool IsHierarchic { get { return false; } }
+ public override bool CanCreate { get { return false; } }
+
+ public override ArcFile TryOpen (ArcView file)
+ {
+ if (!file.View.AsciiEqual (4, "ACK1"))
+ return null;
+ int count = file.View.ReadInt32 (8);
+ if (!IsSaneCount (count))
+ return null;
+ uint index_size = file.View.ReadUInt32 (0xC);
+ var index = file.View.ReadBytes (0x20, index_size);
+ if (index.Length != index_size)
+ return null;
+ for (int i = 0; i < index.Length; ++i)
+ index[i] ^= 0x45;
+
+ int index_pos = 0;
+ var dir = new List (count);
+ for (int i = 0; i < count; ++i)
+ {
+ var name = Binary.GetCString (index, index_pos, 0x18);
+ if (string.IsNullOrWhiteSpace (name))
+ return null;
+ index_pos += 0x18;
+ var entry = FormatCatalog.Instance.Create (name);
+ entry.Offset = LittleEndian.ToUInt32 (index, index_pos);
+ entry.Size = LittleEndian.ToUInt32 (index, index_pos+4);
+ if (!entry.CheckPlacement (file.MaxOffset))
+ return null;
+ dir.Add (entry);
+ index_pos += 8;
+ }
+ return new ArcFile (file, this, dir);
+ }
+ }
+}
diff --git a/ArcFormats/KScript/ImageKGP.cs b/ArcFormats/KScript/ImageKGP.cs
new file mode 100644
index 00000000..d623db78
--- /dev/null
+++ b/ArcFormats/KScript/ImageKGP.cs
@@ -0,0 +1,95 @@
+//! \file ImageKGP.cs
+//! \date Wed Aug 31 11:49:03 2016
+//! \brief KScript engine RGB image format.
+//
+// Copyright (C) 2016 by morkt
+//
+// Permission is hereby granted, free of charge, to any person obtaining a copy
+// of this software and associated documentation files (the "Software"), to
+// deal in the Software without restriction, including without limitation the
+// rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
+// sell copies of the Software, and to permit persons to whom the Software is
+// furnished to do so, subject to the following conditions:
+//
+// The above copyright notice and this permission notice shall be included in
+// all copies or substantial portions of the Software.
+//
+// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
+// IN THE SOFTWARE.
+//
+
+using System.ComponentModel.Composition;
+using System.IO;
+using System.Security.Cryptography;
+using System.Windows.Media;
+using GameRes.Utility;
+
+namespace GameRes.Formats.KScript
+{
+ internal class KgpMetaData : ImageMetaData
+ {
+ public byte Key;
+ public int DataOffset;
+ public int DataLength;
+ }
+
+ [Export(typeof(ImageFormat))]
+ public class KgpFormat : ImageFormat
+ {
+ public override string Tag { get { return "KGP"; } }
+ public override string Description { get { return "KScript image format"; } }
+ public override uint Signature { get { return 0x48505247; } } // 'GRPH'
+
+ public override ImageMetaData ReadMetaData (Stream stream)
+ {
+ var header = new byte[0x1C];
+ if (header.Length != stream.Read (header, 0, header.Length))
+ return null;
+ byte key = (byte)(header[4] ^ header[5]);
+ int data_offset = 0x14;
+ int x = 0, y = 0;
+ if (0 != header[0xC])
+ {
+ data_offset += LittleEndian.ToInt32 (header, 0x10) / 0x10 * 0x18;
+ x = LittleEndian.ToInt32 (header, 0x14);
+ y = LittleEndian.ToInt32 (header, 0x18);
+ }
+ using (var input = new StreamRegion (stream, data_offset, true))
+ using (var png = new CryptoStream (input, new XorTransform (key), CryptoStreamMode.Read))
+ {
+ var info = Png.ReadMetaData (png);
+ if (null == info)
+ return null;
+ return new KgpMetaData
+ {
+ Width = info.Width,
+ Height = info.Height,
+ OffsetX = x,
+ OffsetY = y,
+ BPP = info.BPP,
+ Key = key,
+ DataOffset = data_offset,
+ DataLength = LittleEndian.ToInt32 (header, 8),
+ };
+ }
+ }
+
+ public override ImageData Read (Stream stream, ImageMetaData info)
+ {
+ var meta = (KgpMetaData)info;
+ using (var input = new StreamRegion (stream, meta.DataOffset, true))
+ using (var png = new CryptoStream (input, new XorTransform (meta.Key), CryptoStreamMode.Read))
+ return Png.Read (png, info);
+ }
+
+ public override void Write (Stream file, ImageData image)
+ {
+ throw new System.NotImplementedException ("KgpFormat.Write not implemented");
+ }
+ }
+}
diff --git a/ArcFormats/KScript/ImageKSL.cs b/ArcFormats/KScript/ImageKSL.cs
new file mode 100644
index 00000000..25e96d6c
--- /dev/null
+++ b/ArcFormats/KScript/ImageKSL.cs
@@ -0,0 +1,77 @@
+//! \file ImageKSL.cs
+//! \date Wed Aug 31 11:18:38 2016
+//! \brief KScript engine grayscale image format.
+//
+// Copyright (C) 2016 by morkt
+//
+// Permission is hereby granted, free of charge, to any person obtaining a copy
+// of this software and associated documentation files (the "Software"), to
+// deal in the Software without restriction, including without limitation the
+// rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
+// sell copies of the Software, and to permit persons to whom the Software is
+// furnished to do so, subject to the following conditions:
+//
+// The above copyright notice and this permission notice shall be included in
+// all copies or substantial portions of the Software.
+//
+// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
+// IN THE SOFTWARE.
+//
+
+using System.ComponentModel.Composition;
+using System.IO;
+using System.Windows.Media;
+using GameRes.Utility;
+
+namespace GameRes.Formats.KScript
+{
+ internal class KslMetaData : ImageMetaData
+ {
+ public byte Key;
+ public int DataLength;
+ }
+
+ [Export(typeof(ImageFormat))]
+ public class KslFormat : ImageFormat
+ {
+ public override string Tag { get { return "KSL"; } }
+ public override string Description { get { return "KScript grayscale image format"; } }
+ public override uint Signature { get { return 0x4D4C534B; } } // 'KSLM'
+
+ public override ImageMetaData ReadMetaData (Stream stream)
+ {
+ var header = new byte[0x14];
+ if (header.Length != stream.Read (header, 0, header.Length))
+ return null;
+ return new KslMetaData
+ {
+ Width = LittleEndian.ToUInt32 (header, 0xC),
+ Height = LittleEndian.ToUInt32 (header, 0x10),
+ BPP = 8,
+ Key = (byte)(header[4] ^ header[5]),
+ DataLength = LittleEndian.ToInt32 (header, 8),
+ };
+ }
+
+ public override ImageData Read (Stream stream, ImageMetaData info)
+ {
+ var meta = (KslMetaData)info;
+ var pixels = new byte[meta.DataLength];
+ stream.Position = 0x14;
+ stream.Read (pixels, 0, pixels.Length);
+ for (int i = 0; i < pixels.Length; ++i)
+ pixels[i] ^= meta.Key;
+ return ImageData.Create (info, PixelFormats.Gray8, null, pixels);
+ }
+
+ public override void Write (Stream file, ImageData image)
+ {
+ throw new System.NotImplementedException ("KslFormat.Write not implemented");
+ }
+ }
+}
diff --git a/supported.html b/supported.html
index 447d1a36..ced3e887 100644
--- a/supported.html
+++ b/supported.html
@@ -1078,6 +1078,11 @@ ToHeart2 AnotherDays
*.ark | - | No | Irrlicht |
Alter Ego
|
+*.kpc | SCRPACK1 | No | KScript |
+Inumimi Berserk
+ |
+*.kgp | GRPH | No |
+*.ksl | KSLM | No |
Non-encrypted only