diff --git a/KKdBaseLib/A3DAKey.cs b/KKdBaseLib/A3DAKey.cs
index 2c7bc02..74cda9b 100644
--- a/KKdBaseLib/A3DAKey.cs
+++ b/KKdBaseLib/A3DAKey.cs
@@ -5,7 +5,7 @@ namespace KKdBaseLib
     public struct A3DAKey
     {
         public KeyType Type;
-        public int Unk04;
+        public float Value;
         public float MaxFrames;
         public EPType EPTypePre;
         public EPType EPTypePost;
@@ -18,10 +18,8 @@ namespace KKdBaseLib
         public int Unk2C;
         public int Unk30;
         public int Unk34;
-        public int Length;
-        public int Unk3C;
-        public int DataOffset; //Used only in-game and points to KFT3 Array
-        public int Unk44;
+        public long Length;
+        public long DataOffset; //Used only in-game and points to KFT3 Array
 
         public KFT3[] Keys;
     }
diff --git a/KKdBaseLib/Auth2D.cs b/KKdBaseLib/Auth2D.cs
index 6596d78..9b36ed7 100644
--- a/KKdBaseLib/Auth2D.cs
+++ b/KKdBaseLib/Auth2D.cs
@@ -2,10 +2,10 @@
 {
     public struct Header
     {
-        public Pointer<Data>[] Data;
+        public Pointer<Scene>[] Scenes;
     }
 
-    public struct Data
+    public struct Scene
     {
         public Pointer<string> Name;
         public float StartFrame;
@@ -15,9 +15,9 @@
         public uint Width;
         public uint Height;
         public Pointer<Vector2<CountPointer<KFT2>>> Camera;
-        public CountPointer<Composition > Compositions ;
-        public CountPointer<Surface> Surfaces;
-        public CountPointer<AetSoundEffect > SoundEffects ;
+        public CountPointer<Composition> Compositions;
+        public CountPointer<Video      > Videos;
+        public CountPointer<Audio      > Audios;
     }
 
     public struct Composition
@@ -38,47 +38,55 @@
         public int ID;
         public int Offset;
         public Pointer<string> Name;
-        public float StartFrame;
-        public float EndFrame;
-        public float StartOffset;
-        public float PlaybackSpeed;
-        public AetLayerFlags Flags;
-        public byte Pad;
-        public AetLayerType Type;
-        public int DataOffset;
+        public float  StartFrame;
+        public float    EndFrame;
+        public float OffsetFrame;
+        public float TimeScale;
+        public AetLayerFlags   Flags;
+        public AetLayerQuality Quality;
+        public AetLayerType    Type;
+        public int VideoItemOffset;
         public int ParentLayer;
-        public CountPointer<Marker> Marker;
-        public Pointer<AnimationData> Data;
-        public Pointer<AudioData> ExtraData;
+        public CountPointer<Marker> Markers;
+        public Pointer<VideoData> Video;
+        public Pointer<AudioData> Audio;
 
         public int DataID;
 
         public enum AetLayerFlags : ushort
         {
-            Visible      = 0b0000000000000001,
-            Audible      = 0b0000000000000010,
-            Unk2         = 0b0000000000000100,
-            Unk3         = 0b0000000000001000,
-            Unk4         = 0b0000000000010000,
-            AudioRealted = 0b0000000000100000,
-            Unk6         = 0b0000000001000000,
-            SpriteFrames = 0b0000000010000000,
-            Unk8         = 0b0000000100000000,
-            Unk9         = 0b0000001000000000,
-            Unk10        = 0b0000010000000000,
-            Unk11        = 0b0000100000000000,
-            Unk12        = 0b0001000000000000,
-            Unk13        = 0b0010000000000000,
-            Unk14        = 0b0100000000000000,
-            Unk15        = 0b1000000000000000,
+              VideoActive      = 0b0000000000000001,
+              AudioActive      = 0b0000000000000010,
+            EffectsActive      = 0b0000000000000100,
+            MotionBlur         = 0b0000000000001000,
+            FrameBlending      = 0b0000000000010000,
+            Locked             = 0b0000000000100000,
+            Shy                = 0b0000000001000000,
+            Collapse           = 0b0000000010000000,
+            AutoOrientRotation = 0b0000000100000000,
+            AdjustmentLayer    = 0b0000001000000000,
+            TimeRemapping      = 0b0000010000000000,
+            LayerIs3D          = 0b0000100000000000,
+            LookAtCamera       = 0b0001000000000000,
+            LookAtPOI          = 0b0010000000000000, //POI - Point Of Interest
+            Solo               = 0b0100000000000000,
+            MarkersLocked      = 0b1000000000000000,
+        }
+
+        public enum AetLayerQuality : byte
+        {
+            None      = 0,
+            Wireframe = 1,
+            Draft     = 2,
+            Best      = 3,
         }
 
         public enum AetLayerType : byte
         {
-            Nop = 0,
-            Pic = 1,
-            Aif = 2,
-            Eff = 3,
+            None        = 0,
+            Video       = 1,
+            Audio       = 2,
+            Composition = 3,
         }
 
         public override string ToString() => $"ID: {ID}; Name: {Name.V}; Type: {Type}" +
@@ -92,38 +100,58 @@
         public Pointer<string> Name;
     }
 
-    public struct AnimationData
+    public struct VideoData
     {
-        public BlendMode Mode;
-        public byte Padding0;
-        public bool UseTextureMask;
-        public byte Padding1;
-        public CountPointer<KFT2>   OriginX;
-        public CountPointer<KFT2>   OriginY;
+        public VideoTransferMode TransferMode;
+        public byte Padding;
+        public CountPointer<KFT2>   AnchorX;
+        public CountPointer<KFT2>   AnchorY;
         public CountPointer<KFT2> PositionX;
         public CountPointer<KFT2> PositionY;
-        public CountPointer<KFT2> Rotation;
+        public CountPointer<KFT2> Rotation ;
         public CountPointer<KFT2>    ScaleX;
         public CountPointer<KFT2>    ScaleY;
-        public CountPointer<KFT2> Opacity;
-        public Pointer<Perspective> Persp;
+        public CountPointer<KFT2>  Opacity ;
+        public Pointer<Video3DData> Video3D;
 
-        public enum BlendMode : byte
+        public struct VideoTransferMode
         {
-            Alpha                    = 3,
-            Additive                 = 5,
-            DstColorZero             = 6,
-            SrcAlphaOneMinusSrcColor = 7,
-            Transparent              = 8,
+            public TransferBlendMode  BlendMode;
+            public TransferFlags      Flags;
+            public TransferTrackMatte TrackMatte;
+
+            public enum TransferBlendMode : byte
+            {
+                Alpha                    = 3,
+                Additive                 = 5,
+                DstColorZero             = 6,
+                SrcAlphaOneMinusSrcColor = 7,
+                Transparent              = 8,
+            }
+
+            public enum TransferFlags : byte
+            {
+                 PreserveAlpha    = 0b01,
+                RandomizeDissolve = 0b10,
+            }
+
+            public enum TransferTrackMatte : byte
+            {
+                NoTrackMatte = 0,
+                       Alpha = 1,
+                    NotAlpha = 2,
+                       Luma  = 3,
+                    NotLuma  = 4,
+            }
         }
 
-        public struct Perspective
+        public struct Video3DData
         {
-            public CountPointer<KFT2> Unk1      ;
-            public CountPointer<KFT2> Unk2      ;
-            public CountPointer<KFT2> RotReturnX;
-            public CountPointer<KFT2> RotReturnY;
-            public CountPointer<KFT2> RotReturnZ;
+            public CountPointer<KFT2>    AnchorZ;
+            public CountPointer<KFT2>  PositionZ;
+            public CountPointer<KFT2> DirectionX;
+            public CountPointer<KFT2> DirectionY;
+            public CountPointer<KFT2> DirectionZ;
             public CountPointer<KFT2>  RotationX;
             public CountPointer<KFT2>  RotationY;
             public CountPointer<KFT2>     ScaleZ;
@@ -132,35 +160,35 @@
 
     public struct AudioData
     {
-        public CountPointer<KFT2> Data0;
-        public CountPointer<KFT2> Data1;
-        public CountPointer<KFT2> Data2;
-        public CountPointer<KFT2> Data3;
+        public CountPointer<KFT2> VolumeL;
+        public CountPointer<KFT2> VolumeR;
+        public CountPointer<KFT2>    PanL;
+        public CountPointer<KFT2>    PanR;
     }
 
-    public struct Surface
+    public struct Video
     {
         public int O;
         public uint Color;
         public ushort Width;
         public ushort Height;
         public float Frames;
-        public CountPointer<SpriteIdentifier> Sprites;
+        public CountPointer<Source> Sources;
 
         public override string ToString() => $"Width: {Width}; Height: {Height}; Color: {Color.ToString("X2")}";
+
+        public struct Source
+        {
+            public Pointer<string> Name;
+            public uint ID;
+
+            public override string ToString() => $"ID: {ID}; Name: {Name}";
+        }
     }
 
-    public struct SpriteIdentifier
-    {
-        public Pointer<string> Name;
-        public uint ID;
-
-        public override string ToString() => $"ID: {ID}; Name: {Name}";
-    }
-
-    public struct AetSoundEffect
+    public struct Audio
     {
         public int O;
-        public uint Unk;
+        public uint SoundID;
     }
 }
diff --git a/KKdBaseLib/Auth3D.cs b/KKdBaseLib/Auth3D.cs
index 86f8750..a029a62 100644
--- a/KKdBaseLib/Auth3D.cs
+++ b/KKdBaseLib/Auth3D.cs
@@ -27,7 +27,7 @@
 
     public struct _
     {
-        public int? CompressF16;
+        public CompressF16 CompressF16;
         public string FileName;
         public string PropertyVersion;
         public string ConverterVersion;
@@ -35,7 +35,7 @@
 
     public struct Ambient
     {
-        public string  Name;
+        public string Name;
         public Vector4<Key>    LightDiffuse;
         public Vector4<Key> RimLightDiffuse;
     }
@@ -57,7 +57,7 @@
 
         public struct ViewPoint
         {
-            public bool? FOVHorizontal;
+            public  bool  FOVHorizontal;
             public float? Aspect;
             public float? CameraApertureH;
             public float? CameraApertureW;
@@ -102,13 +102,11 @@
         public Vector4<Key> Diffuse;
     }
 
-    public enum KeyType : int
+    public enum CompressF16 : int
     {
-        Null    = 0,
-        Value   = 1,
-        Lerp    = 2,
-        Hermite = 3,
-        Hold    = 4,
+        F32F32F32F32 = 0,
+        I16F16F32F32 = 1,
+        I16F16F16F16 = 2,
     }
 
     public enum EPType : int
@@ -118,6 +116,15 @@
         EP_3 = 3,
     }
 
+    public enum KeyType : int
+    {
+        Null    = 0,
+        Value   = 1,
+        Lerp    = 2,
+        Hermite = 3,
+        Hold    = 4,
+    }
+
     public struct Key
     {
         public KeyType? Type;
@@ -138,10 +145,10 @@
             public string[] ValueList;
         }
 
-        public static Vector3<A3DAKey> ToA3DAKey(Vector3<Key> k) =>
+        public static Vector3<A3DAKey> ToA3DAKey(Vector3<     Key> k) =>
             new Vector3<A3DAKey> { X = (A3DAKey)k.X, Y = (A3DAKey)k.Y, Z = (A3DAKey)k.Z };
-        public static Vector3<Key> ToKey(Vector3<A3DAKey> k) =>
-            new Vector3<Key> { X = (Key)k.X, Y = (Key)k.Y, Z = (Key)k.Z };
+        public static Vector3<    Key> ToKey    (Vector3<A3DAKey> k) =>
+            new Vector3<    Key> { X = (    Key)k.X, Y = (    Key)k.Y, Z = (    Key)k.Z };
 
         public static explicit operator Key(A3DAKey k)
         {
@@ -152,7 +159,7 @@
             if (k.Length > 1)
             {
                 key.Type = k.Type;
-                key.Length = k.Length;
+                key.Length = (int)k.Length;
                 key.Keys = k.Keys;
             }
             else if (k.Length == 1)
@@ -179,17 +186,12 @@
             }
             else
             {
-                key.Length = 1;
-                key.Keys = new KFT3[1];
-                if (k.Length == 1)
-                {
-                    key.Type = KeyType.Value;
-                    key.Keys[0].V = k.Value ?? 0;
-                }
-                else if (k.Type.HasValue && k.Value.HasValue)
+                key.Type = 0;
+                key.Value = 0.0f;
+                if (k.Type.HasValue && k.Value.HasValue)
                 {
                     key.Type = k.Type.Value;
-                    key.Keys[0].V = k.Value.Value;
+                    key.Value = k.Value.Value;
                 }
             }
             return key;
@@ -293,11 +295,11 @@
 
     public struct PlayControl
     {
-        public int? Begin;
+        public int Begin;
         public int? Div;
-        public int? FPS;
+        public int FPS;
         public int? Offset;
-        public int? Size;
+        public int Size;
     }
 
     public struct PostProcess
diff --git a/KKdBaseLib/Extensions.cs b/KKdBaseLib/Extensions.cs
index 4f4c70a..64689ac 100644
--- a/KKdBaseLib/Extensions.cs
+++ b/KKdBaseLib/Extensions.cs
@@ -215,7 +215,7 @@ namespace KKdBaseLib
             return d.ToString();
         }
 
-        private static readonly string NumberDecimalSeparator =
+        private static readonly string NDS =
              System.Globalization.NumberFormatInfo.CurrentInfo.NumberDecimalSeparator;
 
         public static string ToS(this   bool? d) => (d ?? default).ToString();
@@ -237,28 +237,38 @@ namespace KKdBaseLib
         public static string ToS(this  ulong? d) => (d ?? default).ToString();
         public static string ToS(this  ulong  d) => d.ToString();
         public static string ToS(this  float? d, int round) => (d ?? default).ToS(round);
-        public static string ToS(this  float? d)            => (d ?? default).ToString();
-        public static string ToS(this  float  d, int round) =>
-            Math.Round(d, round).ToString().ToLower().Replace(NumberDecimalSeparator, ".");
-        public static string ToS(this  float  d) =>
-            Math.Round(d,    15).ToString().ToLower().Replace(NumberDecimalSeparator, ".");
+        public static string ToS(this  float? d)            => (d ?? default).ToS();
+        public static string ToS(this  float  d, int round)
+        { string s = (d.ToU32() & 0x80000000) != 0 ? "-" : ""; d = (d.ToU32() & 0x7FFFFFFF).ToF32();
+          return s + Math.Round(d, round).ToString().ToLower().Replace(NDS, "."); }
+        public static string ToS(this  float  d)
+        { string s = (d.ToU32() & 0x80000000) != 0 ? "-" : ""; d = (d.ToU32() & 0x7FFFFFFF).ToF32();
+          return s + Math.Round(d,    15).ToString().ToLower().Replace(NDS, "."); }
         public static string ToS(this double? d, int round) => (d ?? default).ToS(round);
-        public static string ToS(this double? d)            => (d ?? default).ToString();
-        public static string ToS(this double  d, int round) =>
-            Math.Round(d, round).ToString().ToLower().Replace(NumberDecimalSeparator, ".");
-        public static string ToS(this double  d) =>
-            Math.Round(d,    15).ToString().ToLower().Replace(NumberDecimalSeparator, ".");
-        public static  float ToF32(this string s) =>
-             float.   Parse(s.Replace(".", NumberDecimalSeparator));
-        public static   bool ToF32(this string s, out float value) =>
-             float.TryParse(s.Replace(".", NumberDecimalSeparator), out value);
-        public static double ToF64(this string s) =>
-            double.   Parse(s.Replace(".", NumberDecimalSeparator));
-        public static   bool ToF64(this string s, out double value) =>
-            double.TryParse(s.Replace(".", NumberDecimalSeparator), out value);
-        public static   bool ToF32(this string s, out float? value)
-        { bool Val = ToF32(s, out  float val); value = val; return Val; }
-        public static   bool ToF64(this string s, out double? value)
-        { bool Val = ToF64(s, out double val); value = val; return Val; }
+        public static string ToS(this double? d)            => (d ?? default).ToS();
+        public static string ToS(this double  d, int round)
+        { string s = (d.ToU64() & 0x8000000000000000) != 0 ? "-" : ""; d = (d.ToU64() & 0x7FFFFFFFFFFFFFFF).ToF64();
+          return s + Math.Round(d, round).ToString().ToLower().Replace(NDS, "."); }
+        public static string ToS(this double  d)
+        { string s = (d.ToU64() & 0x8000000000000000) != 0 ? "-" : ""; d = (d.ToU64() & 0x7FFFFFFFFFFFFFFF).ToF64();
+          return s + Math.Round(d,    15).ToString().ToLower().Replace(NDS, "."); }
+        public static  float ToF32(this string s)
+        { if (s.Length < 1) return 0;  uint d = 0; if (s[0] == '-') d = 0x80000000;
+          d |=  float.Parse(s.Replace(".", NDS)).ToU32(); return d.ToF32(); }
+        public static double ToF64(this string s)
+        { if (s.Length < 1) return 0; ulong d = 0; if (s[0] == '-') d = 0x8000000000000000;
+          d |= double.Parse(s.Replace(".", NDS)).ToU64(); return d.ToF64(); }
+        public static bool ToF32(this string s, out  float  val)
+        { val = 0; if (s.Length < 1) return false;  uint d = 0; if (s[0] == '-') d = 0x80000000;
+          bool b =  float.TryParse(s.Replace(".", NDS), out val); if (b) val = (d | val.ToU32()).ToF32(); return b; }
+        public static bool ToF64(this string s, out double  val)
+        { val = 0; if (s.Length < 1) return false; ulong d = 0; if (s[0] == '-') d = 0x8000000000000000;
+          bool b = double.TryParse(s.Replace(".", NDS), out val); if (b) val = (d | val.ToU64()).ToF64(); return b; }
+        public static bool ToF32(this string s, out  float? val)
+        { val = null; if (s.Length < 1) return false;  uint d = 0; if (s[0] == '-') d = 0x80000000;
+          bool b =  float.TryParse(s.Replace(".", NDS), out  float t); if (b) val = (d | t.ToU32()).ToF32(); return b; }
+        public static bool ToF64(this string s, out double? val)
+        { val = null; if (s.Length < 1) return false; ulong d = 0; if (s[0] == '-') d = 0x8000000000000000;
+          bool b = double.TryParse(s.Replace(".", NDS), out double t); if (b) val = (d | t.ToU64()).ToF64(); return b; }
     }
 }
diff --git a/KKdBaseLib/Interpolation/A3DAI.cs b/KKdBaseLib/Interpolation/A3DAI.cs
index c851428..81d6245 100644
--- a/KKdBaseLib/Interpolation/A3DAI.cs
+++ b/KKdBaseLib/Interpolation/A3DAI.cs
@@ -4,7 +4,7 @@ namespace KKdBaseLib.Interpolation
 {
     public struct A3DAI //A3DA Interpolation
     {
-        private A3DAKey key;
+        private A3DAKey a3daKey;
 
         private float f;
         private float last;
@@ -16,24 +16,39 @@ namespace KKdBaseLib.Interpolation
         private KFT3 firstKey;
         private KFT3  lastKey;
 
-        public float InterpolationFramerate
-        { get => @if; set { @if = value; df = @if / rf; } }
-        public float RequestedFramerate
-        { get => rf; set { rf = value; df = @if / rf; } }
+        public float InterpolationFramerate { get => @if; set { @if = value; df = @if / rf; } }
+        public float     RequestedFramerate { get =>  rf; set {  rf = value; df = @if / rf; } }
 
         public float Frame => f;
         public float Value => last;
-        public bool  IsNull => key.Keys == null ?  true : key.Length < 1;
-        public bool NotNull => key.Keys == null ? false : key.Length > 0;
+        public bool  IsNull => a3daKey.Keys == null ?  true : a3daKey.Length < 1;
+        public bool NotNull => a3daKey.Keys == null ? false : a3daKey.Length > 0;
+
+        public A3DAI(Key key, float a3daFramerate = 60, float requestedFramerate = 60)
+        {
+            lastTime = 0;
+            a3daKey = (A3DAKey)key; f = -1; df = last = rf = @if = 0;
+            @if = a3daFramerate;
+            firstKey = lastKey = default;
+            RequestedFramerate = requestedFramerate;
+            f = -df;
+            ResetFrameCount();
+
+            if (key.Keys != null && key.Length > 0)
+            {
+                firstKey = key.Keys[0];
+                 lastKey = key.Keys[key.Length - 1];
+            }
+        }
 
         public A3DAI(A3DAKey key, float a3daFramerate = 60, float requestedFramerate = 60)
         {
             lastTime = 0;
-            this.key = key; last = rf = @if = 0;
-            f = -1; df = 1;
+            a3daKey = key; f = -1; df = last = rf = @if = 0;
             @if = a3daFramerate;
             firstKey = lastKey = default;
             RequestedFramerate = requestedFramerate;
+            f = -df;
             ResetFrameCount();
 
             if (key.Keys != null && key.Length > 0)
@@ -45,8 +60,9 @@ namespace KKdBaseLib.Interpolation
 
         public float SetTime(float time)
         {
-            if ((int)key.Type <  1 || (int)key.Type > 4 || key.Length < 1) return 0;
-            if ((int)key.Type == 1) return key.Keys[0].V;
+                 if ((int)a3daKey.Type < 0 || (int)a3daKey.Type > 4) return 0.0f;
+            else if ((int)a3daKey.Type < 2) return a3daKey.Value;
+            else if (a3daKey.Length < 1) return 0.0f;
 
             lastTime = time;
             f = time * @if;
@@ -56,8 +72,9 @@ namespace KKdBaseLib.Interpolation
 
         public float SetFrame(float frame)
         {
-            if ((int)key.Type <  1 || (int)key.Type > 4 || key.Length < 1) return 0;
-            if ((int)key.Type == 1) return key.Keys[0].V;
+                 if ((int)a3daKey.Type < 0 || (int)a3daKey.Type > 4) return 0.0f;
+            else if ((int)a3daKey.Type < 2) return a3daKey.Value;
+            else if (a3daKey.Length < 1) return 0.0f;
 
             lastTime = frame / rf;
             f = frame * df;
@@ -67,8 +84,9 @@ namespace KKdBaseLib.Interpolation
 
         public float NextFrame(float time)
         {
-            if ((int)key.Type <  1 || (int)key.Type > 4 || key.Length < 1) return 0;
-            if ((int)key.Type == 1) return key.Keys[0].V;
+                 if ((int)a3daKey.Type < 0 || (int)a3daKey.Type > 4) return 0.0f;
+            else if ((int)a3daKey.Type < 2) return a3daKey.Value;
+            else if (a3daKey.Length < 1) return 0.0f;
 
             lastTime += time;
             f = lastTime * @if;
@@ -78,8 +96,9 @@ namespace KKdBaseLib.Interpolation
 
         public float NextFrame()
         {
-            if ((int)key.Type <  1 || (int)key.Type > 4 || key.Length < 1) return 0;
-            if ((int)key.Type == 1) return key.Keys[0].V;
+                 if ((int)a3daKey.Type < 0 || (int)a3daKey.Type > 4) return 0.0f;
+            else if ((int)a3daKey.Type < 2) return a3daKey.Value;
+            else if (a3daKey.Length < 1) return 0.0f;
 
             f += df;
             lastTime = f / @if;
@@ -95,83 +114,71 @@ namespace KKdBaseLib.Interpolation
 
             if (f < firstKey.F)
             {
-                if (key.EPTypePost < EPType.EP_1 || key.EPTypePost > EPType.EP_3)
-                    return firstKey.V;
+                if (a3daKey.EPTypePost < EPType.EP_1 || a3daKey.EPTypePost > EPType.EP_3) return firstKey.V;
 
                 df = firstKey.F - frame;
-                if (key.EPTypePre == EPType.EP_1)
-                    return firstKey.V - df * firstKey.T1;
-                else if (key.EPTypePre == EPType.EP_2 || key.EPTypePre == EPType.EP_3)
+                if (a3daKey.EPTypePre == EPType.EP_1) return firstKey.V - df * firstKey.T1;
+
+                frame = lastKey.F - df % a3daKey.FrameDelta;
+                f = (int)frame;
+                if (a3daKey.EPTypePre == EPType.EP_3)
                 {
-                    frame = lastKey.F - df % key.FrameDelta;
-                    f = (int)frame;
+                    ep = df / a3daKey.FrameDelta;
+                    ep = (ep > 0 && ep != (int)ep) ? (ep - (int)ep > 0 ? 1 : 0) : ep;
+                    ep = -(ep + 1) * a3daKey.ValueDelta;
                 }
             }
             else if (f >= lastKey.F)
             {
-                if (key.EPTypePost < EPType.EP_1 || key.EPTypePost > EPType.EP_3)
-                    return lastKey.V;
+                if (a3daKey.EPTypePost < EPType.EP_1 || a3daKey.EPTypePost > EPType.EP_3) return lastKey.V;
 
                 df = frame - lastKey.F;
-                if (key.EPTypePost == EPType.EP_1)
-                    return lastKey.V + df * lastKey.T2;
-                else if (key.EPTypePost == EPType.EP_2 || key.EPTypePost == EPType.EP_3)
+                if (a3daKey.EPTypePost == EPType.EP_1) return lastKey.V + df * lastKey.T2;
+
+                frame = firstKey.F + df % a3daKey.FrameDelta;
+                f = (int)frame;
+                if (a3daKey.EPTypePost == EPType.EP_3)
                 {
-                    frame = firstKey.F + df % key.FrameDelta;
-                    f = (int)frame;
+                    ep = df / a3daKey.FrameDelta;
+                    ep = (ep > 0 && ep != (int)ep) ? (ep - (int)ep > 0 ? 1 : 0) : ep;
+                    ep = (ep + 1) * a3daKey.ValueDelta;
                 }
             }
 
-            if ((f <  firstKey.F && key.EPTypePre  == EPType.EP_3) ||
-                (f >= firstKey.F && key.EPTypePost == EPType.EP_3))
-            {
-                ep = df / key.FrameDelta;
-                ep = (ep >= 0 && ep != (int)ep) ? (ep - (int)ep > 0 ? 1 : 0) : ep;
-                ep = (f < firstKey.F ? -1 : 1) * (ep + 1) * key.ValueDelta;
-            }
+                 if (f <= firstKey.F) return firstKey.V + ep;
+            else if (f >=  lastKey.F) return  lastKey.V + ep;
 
-            if (f <= firstKey.F)
-                return firstKey.V + ep;
-            else if (f >= lastKey.F)
-                return lastKey.V + ep;
-
-            int data = 0;
-            int length = key.Length;
-            int tempLength;
+            long key = 0;
+            long length = a3daKey.Length;
+            long temp;
             while (length > 0)
-            {
-                tempLength = length >> 1;
-                if (f <= key.Keys[data + tempLength].F)
-                    length = tempLength;
-                else
+                if (f > a3daKey.Keys[key + (temp = length >> 1)].F)
                 {
-                    data += tempLength + 1;
-                    length -= tempLength + 1;
+                       key += temp + 1;
+                    length -= temp + 1;
                 }
-            }
+                else length = temp;
 
-            ref KFT3 c = ref key.Keys[data - 1];
-            ref KFT3 n = ref key.Keys[data];
+            ref KFT3 c = ref a3daKey.Keys[key - 1];
+            ref KFT3 n = ref a3daKey.Keys[key];
             float result;
             if (frame > c.F && frame < n.F)
             {
-                if (key.Type == KeyType.Lerp)
+                if (a3daKey.Type == KeyType.Lerp)
                 {
                     float t = (frame - c.F) / (n.F - c.F);
                     result = (1 - t) * c.V + t * n.V;
                 }
-                else if (key.Type == KeyType.Hermite)
+                else if (a3daKey.Type == KeyType.Hermite)
                 {
                     float t = (frame - c.F) / (n.F - c.F);
                     float t_2 = (1 - t) * (1 - t);
                     result = t_2 * c.V * (1 + 2 * t) + (t * n.V * (3 - 2 * t) +
                         (t_2 * c.T2 + t * (t - 1) * n.T1) * (n.F - c.F)) * t;
                 }
-                else
-                    result = c.V;
+                else result = c.V;
             }
-            else
-                result = frame > c.F ? n.V : c.V;
+            else result = frame > c.F ? n.V : c.V;
             return result + ep;
         }
 
diff --git a/KKdBaseLib/Interpolation/PDI.cs b/KKdBaseLib/Interpolation/PDI.cs
index 7b08087..9557968 100644
--- a/KKdBaseLib/Interpolation/PDI.cs
+++ b/KKdBaseLib/Interpolation/PDI.cs
@@ -6,38 +6,36 @@
 
         private float f;
         private float last;
-        private float deltaFrame;
+        private float df;
         private float @if;
         private float rf;
         private float lastTime;
 
         private KFT2 firstKey;
-        private KFT2 lastKey;
+        private KFT2  lastKey;
 
-        public float InterpolationFramerate
-        { get => @if; set { @if = value; deltaFrame = @if / rf; } }
-        public float RequestedFramerate
-        { get => rf; set { rf = value; deltaFrame = @if / rf; } }
+        public float InterpolationFramerate { get => @if; set { @if = value; df = @if / rf; } }
+        public float     RequestedFramerate { get =>  rf; set {  rf = value; df = @if / rf; } }
 
         public float Frame => f;
         public float Value => last;
         public bool  IsNull => array == null ?  true : array.Length < 1;
         public bool NotNull => array == null ? false : array.Length > 0;
 
-        public PDI(KFT2[] Array, float InterpolationFramerate = 60, float RequestedFramerate = 60)
+        public PDI(KFT2[] array, float interpolationFramerate = 60, float requestedFramerate = 60)
         {
             lastTime = 0;
-            this.array = Array; f = -1; deltaFrame = last = rf = @if = 0;
-            @if = InterpolationFramerate;
+            this.array = array; f = -1; df = last = rf = @if = 0;
+            @if = interpolationFramerate;
             firstKey = lastKey = default;
-            this.RequestedFramerate = RequestedFramerate;
-            f = -deltaFrame;
+            RequestedFramerate = requestedFramerate;
+            f = -df;
             ResetFrameCount();
 
-            if (Array != null && Array.Length > 0)
+            if (array != null && array.Length > 0)
             {
-                firstKey = Array[0];
-                 lastKey = Array[Array.Length - 1];
+                firstKey = array[0];
+                 lastKey = array[array.Length - 1];
             }
         }
 
@@ -56,7 +54,7 @@
             if (array == null || array.Length < 1) return 0;
 
             lastTime = frame / rf;
-            f = frame * deltaFrame;
+            f = frame * df;
             last = Interpolate(f);
             return last;
         }
@@ -75,7 +73,7 @@
         {
             if (array == null || array.Length < 1) return 0;
 
-            f += deltaFrame;
+            f += df;
             lastTime = f / @if;
             last = Interpolate(f);
             return last;
@@ -85,38 +83,35 @@
         {
             float f = (int)frame;
 
-            int data = 0;
+                 if (f <= firstKey.F) return firstKey.V;
+            else if (f >=  lastKey.F) return  lastKey.V;
+
+            int key = 0;
             int length = array.Length;
+            int temp;
             while (length > 0)
-                if (f <= array[data + (length >> 1)].F)
-                    length >>= 1;
-                else
+                if (f > array[key + (temp = length >> 1)].F)
                 {
-                    int delta = (length >> 1) + 1;
-                    data += delta;
-                    length -= delta;
+                       key += temp + 1;
+                    length -= temp + 1;
                 }
+                else length = temp;
 
-            if (data == 0)
-                return firstKey.V;
-            else if (data >= array.Length)
-                return  lastKey.V;
-
-            KFT2 c = array[data - 1];
-            KFT2 n = array[data];
-            float result = c.F == n.F ? c.V : n.V;
-            if (frame < n.F)
+            ref KFT2 c = ref array[key - 1];
+            ref KFT2 n = ref array[key];
+            float result;
+            if (frame > c.F && frame < n.F)
             {
-
                 float t = (this.f - c.F) / (n.F - c.F);
                 float t_1 = t - 1;
                 result = (t_1 * 2 - 1) * (c.V - n.V) * t * t +
                     (t_1 * c.T + t * n.T) * t_1 * (this.f - c.F) + c.V;
             }
+            else result = frame > c.F ? n.V : c.V;
             return result;
         }
 
-        public void ResetFrameCount() => f = -deltaFrame;
+        public void ResetFrameCount() => f = -df;
 
         public override string ToString() => $"Frame: {f}, Value: {last}";
     }
diff --git a/KKdBaseLib/KKdBaseLib.csproj b/KKdBaseLib/KKdBaseLib.csproj
index 6b4539e..4a5480d 100644
--- a/KKdBaseLib/KKdBaseLib.csproj
+++ b/KKdBaseLib/KKdBaseLib.csproj
@@ -6,12 +6,12 @@
     <Configuration></Configuration>
     <Copyright>korenkonder © 2019-2020</Copyright>
     <Description>A base library</Description>
-    <FileVersion>0.4.8.2</FileVersion>
+    <FileVersion>0.4.9.0</FileVersion>
     <PackageId>KKdBaseLib</PackageId>
     <Product>KKdBaseLib</Product>
     <TargetFramework>netstandard2.0</TargetFramework>
     <Title>KKdBaseLib</Title>
-    <Version>0.4.8.2</Version>
+    <Version>0.4.9.0</Version>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
     <PlatformTarget>AnyCPU</PlatformTarget>
diff --git a/KKdBaseLib/MsgPack.cs b/KKdBaseLib/MsgPack.cs
index 32212a8..eea4454 100644
--- a/KKdBaseLib/MsgPack.cs
+++ b/KKdBaseLib/MsgPack.cs
@@ -11,20 +11,20 @@ namespace KKdBaseLib
         public KKdList<MsgPack>   List => Object is KKdList<MsgPack>   List ?  List : default;
 
         public static MsgPack New => new MsgPack { Object = KKdList<MsgPack>.New };
-        public static MsgPack NewReserve(int Capacity) =>
-            new MsgPack { Object = KKdList<MsgPack>.NewReserve(Capacity) };
+        public static MsgPack NewReserve(int capacity) =>
+            new MsgPack { Object = KKdList<MsgPack>.NewReserve(capacity) };
 
         public bool  IsNull => Array == null && List. IsNull;
         public bool NotNull => Array != null || List.NotNull;
 
-        public MsgPack(            string Name = null)
-        { Object = KKdList<MsgPack>.New; this.Name = Name; }
+        public MsgPack(            string name = null)
+        { Object = KKdList<MsgPack>.New; Name = name; }
 
-        public MsgPack(long Count, string Name = null)
-        { Object = Count > -1 ? new MsgPack[Count] : null; this.Name = Name; }
+        public MsgPack(long count, string name = null)
+        { Object = count > -1 ? new MsgPack[count] : null; this.Name = name; }
 
-        public MsgPack(string Name, object Object)
-        { this.Name = Name; this.Object = Object; }
+        public MsgPack(string name, object @object)
+        { Name = name; Object = @object; }
 
         public static MsgPack Null => new MsgPack();
 
@@ -37,7 +37,9 @@ namespace KKdBaseLib
             set { if (Object is MsgPack[] Array) { Array[index] =   value; Object = Array; } } }
 
         public MsgPack this[string key]
-        {   get =>    Object is KKdList<MsgPack> List  ? List[ElementIndex(key)] : default; }
+        {   get =>    Object is KKdList<MsgPack> List  ? List[ElementIndex(key)] : default;
+            set { if (Object is KKdList<MsgPack> List && value.Object != null) 
+                { List.Add(value); Object = List; } } }
 
         public MsgPack this[string key, bool array]
         {   get { if (!array) return this[key];
@@ -96,80 +98,105 @@ namespace KKdBaseLib
         public MsgPack Add( float  val) => Add(new MsgPack(null, val));
         public MsgPack Add(double  val) => Add(new MsgPack(null, val));
 
-        public MsgPack Add(string Val,   bool? val) => val.HasValue ? Add(Val, val.Value) : this;
-        public MsgPack Add(string Val,  sbyte? val) => val.HasValue ? Add(Val, val.Value) : this;
-        public MsgPack Add(string Val,   byte? val) => val.HasValue ? Add(Val, val.Value) : this;
-        public MsgPack Add(string Val,  short? val) => val.HasValue ? Add(Val, val.Value) : this;
-        public MsgPack Add(string Val, ushort? val) => val.HasValue ? Add(Val, val.Value) : this;
-        public MsgPack Add(string Val,    int? val) => val.HasValue ? Add(Val, val.Value) : this;
-        public MsgPack Add(string Val,   uint? val) => val.HasValue ? Add(Val, val.Value) : this;
-        public MsgPack Add(string Val,   long? val) => val.HasValue ? Add(Val, val.Value) : this;
-        public MsgPack Add(string Val,  ulong? val) => val.HasValue ? Add(Val, val.Value) : this;
-        public MsgPack Add(string Val,  float? val) => val.HasValue ? Add(Val, val.Value) : this;
-        public MsgPack Add(string Val, double? val) => val.HasValue ? Add(Val, val.Value) : this;
+        public MsgPack Add(string Name,   bool? val) => val.HasValue ? Add(Name, val.Value) : this;
+        public MsgPack Add(string Name,  sbyte? val) => val.HasValue ? Add(Name, val.Value) : this;
+        public MsgPack Add(string Name,   byte? val) => val.HasValue ? Add(Name, val.Value) : this;
+        public MsgPack Add(string Name,  short? val) => val.HasValue ? Add(Name, val.Value) : this;
+        public MsgPack Add(string Name, ushort? val) => val.HasValue ? Add(Name, val.Value) : this;
+        public MsgPack Add(string Name,    int? val) => val.HasValue ? Add(Name, val.Value) : this;
+        public MsgPack Add(string Name,   uint? val) => val.HasValue ? Add(Name, val.Value) : this;
+        public MsgPack Add(string Name,   long? val) => val.HasValue ? Add(Name, val.Value) : this;
+        public MsgPack Add(string Name,  ulong? val) => val.HasValue ? Add(Name, val.Value) : this;
+        public MsgPack Add(string Name,  float? val) => val.HasValue ? Add(Name, val.Value) : this;
+        public MsgPack Add(string Name, double? val) => val.HasValue ? Add(Name, val.Value) : this;
 
-        public MsgPack Add(string Val, byte[] val) => Add(new MsgPack(Val, val));
-        public MsgPack Add(string Val, string val) => Add(new MsgPack(Val, val));
-        public MsgPack Add(string Val,   bool val) => Add(new MsgPack(Val, val));
-        public MsgPack Add(string Val,  sbyte val) => Add(new MsgPack(Val, val));
-        public MsgPack Add(string Val,   byte val) => Add(new MsgPack(Val, val));
-        public MsgPack Add(string Val,  short val) => Add(new MsgPack(Val, val));
-        public MsgPack Add(string Val, ushort val) => Add(new MsgPack(Val, val));
-        public MsgPack Add(string Val,    int val) => Add(new MsgPack(Val, val));
-        public MsgPack Add(string Val,   uint val) => Add(new MsgPack(Val, val));
-        public MsgPack Add(string Val,   long val) => Add(new MsgPack(Val, val));
-        public MsgPack Add(string Val,  ulong val) => Add(new MsgPack(Val, val));
-        public MsgPack Add(string Val,  float val) => Add(new MsgPack(Val, val));
-        public MsgPack Add(string Val, double val) => Add(new MsgPack(Val, val));
+        public MsgPack Add(string Name, byte[] val) => Add(new MsgPack(Name, val));
+        public MsgPack Add(string Name, string val) => Add(new MsgPack(Name, val));
+        public MsgPack Add(string Name,   bool val) => Add(new MsgPack(Name, val));
+        public MsgPack Add(string Name,  sbyte val) => Add(new MsgPack(Name, val));
+        public MsgPack Add(string Name,   byte val) => Add(new MsgPack(Name, val));
+        public MsgPack Add(string Name,  short val) => Add(new MsgPack(Name, val));
+        public MsgPack Add(string Name, ushort val) => Add(new MsgPack(Name, val));
+        public MsgPack Add(string Name,    int val) => Add(new MsgPack(Name, val));
+        public MsgPack Add(string Name,   uint val) => Add(new MsgPack(Name, val));
+        public MsgPack Add(string Name,   long val) => Add(new MsgPack(Name, val));
+        public MsgPack Add(string Name,  ulong val) => Add(new MsgPack(Name, val));
+        public MsgPack Add(string Name,  float val) => Add(new MsgPack(Name, val));
+        public MsgPack Add(string Name, double val) => Add(new MsgPack(Name, val));
 
-        public   bool RB  (string Name) => RnB  (Name) ?? default;
-        public  sbyte RI8 (string Name) => RnI8 (Name) ?? default;
-        public   byte RU8 (string Name) => RnU8 (Name) ?? default;
-        public  short RI16(string Name) => RnI16(Name) ?? default;
-        public ushort RU16(string Name) => RnU16(Name) ?? default;
-        public    int RI32(string Name) => RnI32(Name) ?? default;
-        public   uint RU32(string Name) => RnU32(Name) ?? default;
-        public   long RI64(string Name) => RnI64(Name) ?? default;
-        public  ulong RU64(string Name) => RnU64(Name) ?? default;
-        public  float RF32(string Name) => RnF32(Name) ?? default;
-        public double RF64(string Name) => RnF64(Name) ?? default;
+        public   bool RB  (string name) => RnB  (name) ?? default;
+        public  sbyte RI8 (string name) => RnI8 (name) ?? default;
+        public   byte RU8 (string name) => RnU8 (name) ?? default;
+        public  short RI16(string name) => RnI16(name) ?? default;
+        public ushort RU16(string name) => RnU16(name) ?? default;
+        public    int RI32(string name) => RnI32(name) ?? default;
+        public   uint RU32(string name) => RnU32(name) ?? default;
+        public   long RI64(string name) => RnI64(name) ?? default;
+        public  ulong RU64(string name) => RnU64(name) ?? default;
+        public  float RF32(string name) => RnF32(name) ?? default;
+        public double RF64(string name) => RnF64(name) ?? default;
 
-        public   bool? RnB  (string Name)
+        public void R(string name, out   bool? val) { val = RnB  (name); }
+        public void R(string name, out  sbyte? val) { val = RnI8 (name); }
+        public void R(string name, out   byte? val) { val = RnU8 (name); }
+        public void R(string name, out  short? val) { val = RnI16(name); }
+        public void R(string name, out ushort? val) { val = RnU16(name); }
+        public void R(string name, out    int? val) { val = RnI32(name); }
+        public void R(string name, out   uint? val) { val = RnU32(name); }
+        public void R(string name, out   long? val) { val = RnI64(name); }
+        public void R(string name, out  ulong? val) { val = RnU64(name); }
+        public void R(string name, out  float? val) { val = RnF32(name); }
+        public void R(string name, out double? val) { val = RnF64(name); }
+
+        public void R(string name, out   bool val) { val = RB  (name); }
+        public void R(string name, out  sbyte val) { val = RI8 (name); }
+        public void R(string name, out   byte val) { val = RU8 (name); }
+        public void R(string name, out  short val) { val = RI16(name); }
+        public void R(string name, out ushort val) { val = RU16(name); }
+        public void R(string name, out    int val) { val = RI32(name); }
+        public void R(string name, out   uint val) { val = RU32(name); }
+        public void R(string name, out   long val) { val = RI64(name); }
+        public void R(string name, out  ulong val) { val = RU64(name); }
+        public void R(string name, out  float val) { val = RF32(name); }
+        public void R(string name, out double val) { val = RF64(name); }
+        public void R(string name, out string val) { val = RS  (name); }
+
+        public   bool? RnB  (string name)
         {
-            MsgPack MsgPack = this[Name];
+            MsgPack MsgPack = this[name];
                  if (MsgPack.Object is   bool B  ) return         B  ; return null;
         }
-        public  sbyte? RnI8 (string Name)
+        public  sbyte? RnI8 (string name)
         {
-            MsgPack MsgPack = this[Name];
+            MsgPack MsgPack = this[name];
                  if (MsgPack.Object is  sbyte I8 ) return         I8 ;
             else if (MsgPack.Object is   byte U8 ) return ( sbyte)U8 ; return null;
         }
-        public   byte? RnU8 (string Name)
+        public   byte? RnU8 (string name)
         {
-            MsgPack MsgPack = this[Name];
+            MsgPack MsgPack = this[name];
                  if (MsgPack.Object is  sbyte I8 ) return (  byte)I8 ;
             else if (MsgPack.Object is   byte U8 ) return         U8 ; return null;
         }
-        public  short? RnI16(string Name)
+        public  short? RnI16(string name)
         {
-            MsgPack MsgPack = this[Name];
+            MsgPack MsgPack = this[name];
                  if (MsgPack.Object is  sbyte I8 ) return         I8 ;
             else if (MsgPack.Object is   byte U8 ) return         U8 ;
             else if (MsgPack.Object is  short I16) return         I16;
             else if (MsgPack.Object is ushort U16) return ( short)U16; return null;
         }
-        public ushort? RnU16(string Name)
+        public ushort? RnU16(string name)
         {
-            MsgPack MsgPack = this[Name];
+            MsgPack MsgPack = this[name];
                  if (MsgPack.Object is  sbyte I8 ) return (ushort)I8 ;
             else if (MsgPack.Object is   byte U8 ) return         U8 ;
             else if (MsgPack.Object is  short I16) return (ushort)I16;
             else if (MsgPack.Object is ushort U16) return         U16; return null;
         }
-        public    int? RnI32(string Name)
+        public    int? RnI32(string name)
         {
-            MsgPack MsgPack = this[Name];
+            MsgPack MsgPack = this[name];
                  if (MsgPack.Object is  sbyte I8 ) return         I8 ;
             else if (MsgPack.Object is   byte U8 ) return         U8 ;
             else if (MsgPack.Object is  short I16) return         I16;
@@ -177,9 +204,9 @@ namespace KKdBaseLib
             else if (MsgPack.Object is    int I32) return         I32;
             else if (MsgPack.Object is   uint U32) return (   int)U32; return null;
         }
-        public   uint? RnU32(string Name)
+        public   uint? RnU32(string name)
         {
-            MsgPack MsgPack = this[Name];
+            MsgPack MsgPack = this[name];
                  if (MsgPack.Object is  sbyte I8 ) return (  uint)I8 ;
             else if (MsgPack.Object is   byte U8 ) return         U8 ;
             else if (MsgPack.Object is  short I16) return (  uint)I16;
@@ -187,9 +214,9 @@ namespace KKdBaseLib
             else if (MsgPack.Object is    int I32) return (  uint)I32;
             else if (MsgPack.Object is   uint U32) return         U32; return null;
         }
-        public   long? RnI64(string Name)
+        public   long? RnI64(string name)
         {
-            MsgPack MsgPack = this[Name];
+            MsgPack MsgPack = this[name];
                  if (MsgPack.Object is  sbyte I8 ) return         I8 ;
             else if (MsgPack.Object is   byte U8 ) return         U8 ;
             else if (MsgPack.Object is  short I16) return         I16;
@@ -199,9 +226,9 @@ namespace KKdBaseLib
             else if (MsgPack.Object is   long I64) return         I64;
             else if (MsgPack.Object is  ulong U64) return (  long)U64; return null;
         }
-        public  ulong? RnU64(string Name)
+        public  ulong? RnU64(string name)
         {
-            MsgPack MsgPack = this[Name];
+            MsgPack MsgPack = this[name];
                  if (MsgPack.Object is  sbyte I8 ) return ( ulong)I8 ;
             else if (MsgPack.Object is   byte U8 ) return         U8 ;
             else if (MsgPack.Object is  short I16) return ( ulong)I16;
@@ -210,9 +237,9 @@ namespace KKdBaseLib
             else if (MsgPack.Object is   uint U32) return         U32;
             else if (MsgPack.Object is   long I64) return ( ulong)I64; return null;
         }
-        public  float? RnF32(string Name)
+        public  float? RnF32(string name)
         {
-            MsgPack MsgPack = this[Name];
+            MsgPack MsgPack = this[name];
                  if (MsgPack.Object is  sbyte I8 ) return         I8 ;
             else if (MsgPack.Object is   byte U8 ) return         U8 ;
             else if (MsgPack.Object is  short I16) return         I16;
@@ -223,9 +250,9 @@ namespace KKdBaseLib
             else if (MsgPack.Object is  float F32) return         F32;
             else if (MsgPack.Object is double F64) return ( float)F64; return null;
         }
-        public double? RnF64(string Name)
+        public double? RnF64(string name)
         {
-            MsgPack MsgPack = this[Name];
+            MsgPack MsgPack = this[name];
                  if (MsgPack.Object is  sbyte I8 ) return         I8 ;
             else if (MsgPack.Object is   byte U8 ) return         U8 ;
             else if (MsgPack.Object is  short I16) return         I16;
@@ -236,9 +263,9 @@ namespace KKdBaseLib
             else if (MsgPack.Object is  float F32) return         F32;
             else if (MsgPack.Object is double F64) return         F64; return null;
         }
-        public string    RS(string Name)
+        public string    RS(string name)
         {
-            MsgPack MsgPack = this[Name];
+            MsgPack MsgPack = this[name];
                  if (MsgPack.Object is string S  ) return         S  ; return null;
         }
 
@@ -326,23 +353,23 @@ namespace KKdBaseLib
         public string  RS   ()
         {        if (Object is string S  ) return         S  ; return null; }
 
-        public MsgPack Element(string Name)
+        public MsgPack Element(string name)
         {
             if (List.IsNull) return default;
 
             for (int i = 0; i < List.Count; i++)
-                if (List[i].Name == Name) return List[i];
+                if (List[i].Name == name) return List[i];
             return default;
         }
 
-        public bool ContainsKey(string Name) => ElementIndex(Name) > -1;
+        public bool ContainsKey(string name) => ElementIndex(name) > -1;
 
-        public int ElementIndex(string Name)
+        public int ElementIndex(string name)
         {
             if (List.IsNull) return -1;
 
             for (int i = 0; i < List.Count; i++)
-                if (List[i].Name == Name) return i;
+                if (List[i].Name == name) return i;
             return -1;
         }
 
diff --git a/KKdBaseLib/Tables.cs b/KKdBaseLib/Tables.cs
new file mode 100644
index 0000000..200a89d
--- /dev/null
+++ b/KKdBaseLib/Tables.cs
@@ -0,0 +1,195 @@
+namespace KKdBaseLib
+{
+    public struct ButtonSE
+    {
+        public TableDate Start;
+        public TableDate End;
+
+        public int ID;
+        public int SortIndex;
+        public string   Name;
+        public string SEName;
+    }
+
+    public struct ChainSlideSE
+    {
+        public TableDate Start;
+        public TableDate End;
+
+        public int ID;
+        public int SortIndex;
+        public string          Name;
+        public string   FirstSEName;
+        public string FailureSEName;
+        public string     SubSEName;
+        public string SuccessSEName;
+    }
+
+    public struct CollectionCard
+    {
+        public TableDate Start;
+        public TableDate End;
+
+        public int DispNum;
+        public int ID;
+        public int NG;
+        public int SortIndex;
+        public int TypeParam;
+        public string Chara;
+        public string DivaProParam;
+        public string ModuleAuthor;
+        public string Name;
+        public string NameReading;
+        public string Type;
+        public string WallParam;
+    }
+
+    public struct CustomizeItem
+    {
+        public TableDate ShopStart;
+        public TableDate ShopEnd;
+
+        public int    ID;
+        public int ObjID;
+        public int NG;
+        public int SellType;
+        public int ShopPrice;
+        public int SortIndex;
+        public string Chara;
+        public string Name;
+        public string Parts;
+    }
+
+    public struct Module
+    {
+        public TableDate ShopStart;
+        public TableDate ShopEnd;
+
+        public int Attribute;
+        public int ID;
+        public int NG;
+        public int ShopPrice;
+        public int SortIndex;
+        public string Chara;
+        public string Costume;
+        public string Name;
+    }
+
+    public struct Plate
+    {
+        public int Alpha;
+        public int BaseID;
+        public int Border;
+        public int ColorB;
+        public int ColorG;
+        public int ColorR;
+        public int ID;
+        public int Shadow;
+        public int ShadowAlpha;
+        public int ShadowColorB;
+        public int ShadowColorG;
+        public int ShadowColorR;
+        public string Font;
+    }
+
+    public struct PV
+    {
+        public TableDate AdvStart;
+        public TableDate AdvEnd;
+
+        public int ID;
+        public int Ignore;
+        public string Name;
+        public Difficulty[] Easy;
+        public Difficulty[] Encore;
+        public Difficulty[] Extreme;
+        public Difficulty[] Normal;
+        public Difficulty[] Hard;
+
+        public struct Difficulty
+        {
+            public TableDate Start;
+            public TableDate End;
+
+            public int Edition;
+            public int Version;
+        }
+    }
+
+    public struct SlideSE
+    {
+        public TableDate Start;
+        public TableDate End;
+
+        public int ID;
+        public int SortIndex;
+        public string   Name;
+        public string SEName;
+    }
+
+    public struct SliderTouchSE
+    {
+        public TableDate Start;
+        public TableDate End;
+
+        public int ID;
+        public int SortIndex;
+        public string   Name;
+        public string SEName;
+    }
+    
+    public struct TableDate : INull
+    {
+        private int  year;
+        private int month;
+        private int  day;
+        
+        public int  Year { get =>  year; set {  year = value; CheckDate(); } }
+        public int Month { get => month; set { month = value; CheckDate(); } }
+        public int   Day { get =>   day; set {   day = value; CheckDate(); } }
+
+        public bool  IsNull => Year == -1 || Month == -1 || Day != -1;
+        public bool NotNull => Year != -1 && Month != -1 && Day != -1;
+
+        public bool WU => Year != 2029 || Month != 1 || Day != 1;
+        public bool WL => Year != 2000 || Month != 1 || Day != 1;
+
+        public void SN () => Year =   -1;
+        public void SDL() => Year = 2000;
+        public void SDU() => Year = 2029;
+        
+        public void SV(int? ymd, bool setDefaultUpper)
+        {
+            if (!setDefaultUpper) SDL();
+            else                  SDU();
+            if (ymd != null)
+            {
+                year  = ymd.Value / 10000;
+                month = ymd.Value / 100 % 100;
+                day   = ymd.Value % 100;
+                CheckDate();
+            }
+        }
+        
+        public int Int => NotNull ? (Year * 100 + Month) * 100 + Day : -1;
+        
+        private void CheckDate()
+        {
+            if (year == -1 || month == -1 || day == -1) { year = -1; month = -1; day = -1; return; }
+            if (year <  2000) { year = 2000; month = 1; day = 1; return; }
+            if (year >= 2029) { year = 2029; month = 1; day = 1; return; }
+                 if (month <  1) month = 1;
+            else if (month > 12) month = 12;
+                 if (day <  1) day = 1;
+            else if (day > 31 && (month == 1 || month ==  3 || month ==  5 ||
+                    month == 7 || month == 8 || month == 10 || month == 12)) day = 31;
+            else if (day > 30 && (month == 4 || month ==  6 ||
+                    month == 9 || month == 11)) day = 30;
+            else if (day > 29 && month == 2 && year % 4 == 0) day = 29;
+            else if (day > 28 && month == 2 && year % 4 != 0) day = 28;
+        }
+        
+        public override string ToString() =>
+                $"{Year.ToString("d4")}-{Month.ToString("d2")}-{Day.ToString("d2")}";
+    }
+}
diff --git a/KKdBaseLib/Vector.cs b/KKdBaseLib/Vector.cs
index 9e26b75..10bf4ea 100644
--- a/KKdBaseLib/Vector.cs
+++ b/KKdBaseLib/Vector.cs
@@ -5,8 +5,8 @@
         public T X;
         public T Y;
 
-        public Vector2(T X, T Y)
-        { this.X = X; this.Y = Y; }
+        public Vector2(T x, T y)
+        { X = x; Y = y; }
 
         public bool  IsNull => X == null && Y == null;
         public bool NotNull => X != null || Y != null;
@@ -20,8 +20,8 @@
         public T Y;
         public T Z;
 
-        public Vector3(T X, T Y, T Z)
-        { this.X = X; this.Y = Y; this.Z = Z; }
+        public Vector3(T x, T y, T z)
+        { X = x; Y = y; Z = z; }
 
         public bool  IsNull => X == null && Y == null && Z == null;
         public bool NotNull => X != null || Y != null || Z != null;
@@ -36,8 +36,8 @@
         public T Z;
         public T W;
 
-        public Vector4(T X, T Y, T Z, T W)
-        { this.X = X; this.Y = Y; this.Z = Z; this.W = W; }
+        public Vector4(T x, T y, T z, T w)
+        { X = x; Y = y; Z = z; W = w; }
 
         public bool  IsNull => X == null && Y == null && Z == null && W == null;
         public bool NotNull => X != null || Y != null || Z != null || W != null;
diff --git a/KKdMainLib/A3DA.cs b/KKdMainLib/A3DA.cs
index 0f99571..32b5b07 100644
--- a/KKdMainLib/A3DA.cs
+++ b/KKdMainLib/A3DA.cs
@@ -100,7 +100,7 @@ namespace KKdMainLib
 
             string[] strData = _IO.RS(Head.StringLength).Replace("\r\n", "\n").Replace("\r", "\n").Split('\n');
             for (i = 0; i < strData.Length; i++)
-                dict.GetDictionary(strData[i]);
+                dict.GD(strData[i]);
             strData = null;
 
             A3DAReader();
@@ -126,16 +126,17 @@ namespace KKdMainLib
 
         private void A3DAReader()
         {
-            if (dict.StartsWith("_"))
+            if (dict.SW("_"))
             {
                 Data._ = new _();
-                dict.FindValue(out Data._.CompressF16     , "_.compress_f16"     );
-                dict.FindValue(out Data._.ConverterVersion, "_.converter.version");
-                dict.FindValue(out Data._.FileName        , "_.file_name"        );
-                dict.FindValue(out Data._.PropertyVersion , "_.property.version" );
+                if (dict.FV(out int compressF16, "_.compress_f16"))
+                    Data._.CompressF16 = (CompressF16)compressF16;
+                dict.FV(out Data._.ConverterVersion, "_.converter.version");
+                dict.FV(out Data._.FileName        , "_.file_name"        );
+                dict.FV(out Data._.PropertyVersion , "_.property.version" );
             }
 
-            if (dict.StartsWith("camera_auxiliary"))
+            if (dict.SW("camera_auxiliary"))
             {
                 name = "camera_auxiliary" + d;
 
@@ -152,19 +153,19 @@ namespace KKdMainLib
                         Head.Format = Format.F;
             }
 
-            if (dict.StartsWith("play_control"))
+            if (dict.SW("play_control"))
             {
                 name = "play_control" + d;
 
                 Data.PlayControl = new PlayControl();
-                dict.FindValue(out Data.PlayControl.Begin , name + "begin" );
-                dict.FindValue(out Data.PlayControl.Div   , name + "div"   );
-                dict.FindValue(out Data.PlayControl.FPS   , name + "fps"   );
-                dict.FindValue(out Data.PlayControl.Offset, name + "offset");
-                dict.FindValue(out Data.PlayControl.Size  , name + "size"  );
+                dict.FV(out Data.PlayControl.Begin , name + "begin" );
+                dict.FV(out Data.PlayControl.Div   , name + "div"   );
+                dict.FV(out Data.PlayControl.FPS   , name + "fps"   );
+                dict.FV(out Data.PlayControl.Offset, name + "offset");
+                dict.FV(out Data.PlayControl.Size  , name + "size"  );
             }
 
-            if (dict.StartsWith("post_process"))
+            if (dict.SW("post_process"))
             {
                 name = "post_process" + d;
 
@@ -179,7 +180,7 @@ namespace KKdMainLib
                 };
             }
 
-            if (dict.FindValue(out value, "dof.name"))
+            if (dict.FV(out value, "dof.name"))
             {
                 DOF dof = new DOF { Name = value };
                 Head.Format = Format.AFT;
@@ -187,20 +188,20 @@ namespace KKdMainLib
                 Data.DOF = dof;
             }
 
-            if (dict.FindValue(out value, "ambient.length"))
+            if (dict.FV(out value, "ambient.length"))
             {
                 Data.Ambient = new Ambient[int.Parse(value)];
                 Head.Format = Format.MGF;
                 for (i0 = 0; i0 < Data.Ambient.Length; i0++)
                 {
                     name = "ambient" + d + i0 + d;
-                    dict.FindValue(out Data.Ambient[i0].Name, name + "name");
+                    dict.FV(out Data.Ambient[i0].Name, name + "name");
                     Data.Ambient[i0].   LightDiffuse = RRGBAK(name +    "light.Diffuse" + d);
                     Data.Ambient[i0].RimLightDiffuse = RRGBAK(name + "rimlight.Diffuse" + d);
                 }
             }
 
-            if (dict.FindValue(out value, "camera_root.length"))
+            if (dict.FV(out value, "camera_root.length"))
             {
                 Data.CameraRoot = new CameraRoot[int.Parse(value)];
                 for (i0 = 0; i0 < Data.CameraRoot.Length; i0++)
@@ -208,13 +209,13 @@ namespace KKdMainLib
                     name = "camera_root" + d + i0 + d;
                     nameView = name + "view_point" + d;
 
-                    dict.FindValue(out Data.CameraRoot[i0].VP.
+                    dict.FV(out Data.CameraRoot[i0].VP.
                         Aspect         , nameView + "aspect"           );
-                    dict.FindValue(out Data.CameraRoot[i0].VP.
+                    dict.FV(out Data.CameraRoot[i0].VP.
                         CameraApertureH, nameView + "camera_aperture_h");
-                    dict.FindValue(out Data.CameraRoot[i0].VP.
+                    dict.FV(out Data.CameraRoot[i0].VP.
                         CameraApertureW, nameView + "camera_aperture_w");
-                    dict.FindValue(out i1, nameView + "fov_is_horizontal");
+                    dict.FV(out i1, nameView + "fov_is_horizontal");
                     Data.CameraRoot[i0].VP.FOVHorizontal = i1 != 0;
 
                     Data.CameraRoot[i0].      MT = RMT(name);
@@ -226,52 +227,52 @@ namespace KKdMainLib
                 }
             }
 
-            if (dict.FindValue(out value, "chara.length"))
+            if (dict.FV(out value, "chara.length"))
             {
                 Data.Chara = new ModelTransform[int.Parse(value)];
                 for (i0 = 0; i0 < Data.Chara.Length; i0++)
                     Data.Chara[i0] = RMT("chara" + d + i0 + d);
             }
 
-            if (dict.FindValue(out value, "curve.length"))
+            if (dict.FV(out value, "curve.length"))
             {
                 Data.Curve = new Curve[int.Parse(value)];
                 for (i0 = 0; i0 < Data.Curve.Length; i0++)
                 {
                     name = "curve" + d + i0 + d;
 
-                    dict.FindValue(out Data.Curve[i0].Name, name + "name");
+                    dict.FV(out Data.Curve[i0].Name, name + "name");
                     Data.Curve[i0].CV = RK(name + "cv" + d);
                 }
             }
 
-            if (dict.FindValue(out value, "event.length"))
+            if (dict.FV(out value, "event.length"))
             {
                 Data.Event = new Event[int.Parse(value)];
                 for (i0 = 0; i0 < Data.Event.Length; i0++)
                 {
                     name = "event" + d + i0 + d;
 
-                    dict.FindValue(out Data.Event[i0].Begin       , name + "begin"         );
-                    dict.FindValue(out Data.Event[i0].ClipBegin   , name + "clip_begin"    );
-                    dict.FindValue(out Data.Event[i0].ClipEnd     , name + "clip_en"       );
-                    dict.FindValue(out Data.Event[i0].End         , name + "end"           );
-                    dict.FindValue(out Data.Event[i0].Name        , name + "name"          );
-                    dict.FindValue(out Data.Event[i0].Param1      , name + "param1"        );
-                    dict.FindValue(out Data.Event[i0].Ref         , name + "ref"           );
-                    dict.FindValue(out Data.Event[i0].TimeRefScale, name + "time_ref_scale");
-                    dict.FindValue(out Data.Event[i0].Type        , name + "type"          );
+                    dict.FV(out Data.Event[i0].Begin       , name + "begin"         );
+                    dict.FV(out Data.Event[i0].ClipBegin   , name + "clip_begin"    );
+                    dict.FV(out Data.Event[i0].ClipEnd     , name + "clip_en"       );
+                    dict.FV(out Data.Event[i0].End         , name + "end"           );
+                    dict.FV(out Data.Event[i0].Name        , name + "name"          );
+                    dict.FV(out Data.Event[i0].Param1      , name + "param1"        );
+                    dict.FV(out Data.Event[i0].Ref         , name + "ref"           );
+                    dict.FV(out Data.Event[i0].TimeRefScale, name + "time_ref_scale");
+                    dict.FV(out Data.Event[i0].Type        , name + "type"          );
                 }
             }
 
-            if (dict.FindValue(out value, "fog.length"))
+            if (dict.FV(out value, "fog.length"))
             {
                 Data.Fog = new Fog[int.Parse(value)];
                 for (i0 = 0; i0 < Data.Fog.Length; i0++)
                 {
                     name = "fog" + d + i0 + d;
 
-                    dict.FindValue(out Data.Fog[i0].Id, name + "id");
+                    dict.FV(out Data.Fog[i0].Id, name + "id");
                     Data.Fog[i0].Density = RK    (name + "density" + d);
                     Data.Fog[i0].Diffuse = RRGBAK(name + "Diffuse" + d);
                     Data.Fog[i0].End     = RK    (name +     "end" + d);
@@ -279,16 +280,16 @@ namespace KKdMainLib
                 }
             }
 
-            if (dict.FindValue(out value, "light.length"))
+            if (dict.FV(out value, "light.length"))
             {
                 Data.Light = new Light[int.Parse(value)];
                 for (i0 = 0; i0 < Data.Light.Length; i0++)
                 {
                     name = "light" + d + i0 + d;
 
-                    dict.FindValue(out Data.Light[i0].Id  , name + "id"  );
-                    dict.FindValue(out Data.Light[i0].Name, name + "name");
-                    dict.FindValue(out Data.Light[i0].Type, name + "type");
+                    dict.FV(out Data.Light[i0].Id  , name + "id"  );
+                    dict.FV(out Data.Light[i0].Name, name + "name");
+                    dict.FV(out Data.Light[i0].Type, name + "type");
 
                     Data.Light[i0].Ambient       = RRGBAK(name +        "Ambient" + d);
                     Data.Light[i0].Diffuse       = RRGBAK(name +        "Diffuse" + d);
@@ -299,49 +300,49 @@ namespace KKdMainLib
                 }
             }
 
-            if (dict.FindValue(out value, "m_objhrc.length"))
+            if (dict.FV(out value, "m_objhrc.length"))
             {
                 Data.MObjectHRC = new MObjectHRC[int.Parse(value)];
                 for (i0 = 0; i0 < Data.MObjectHRC.Length; i0++)
                 {
                     name = "m_objhrc" + d + i0 + d;
 
-                    dict.FindValue(out Data.MObjectHRC[i0].Name, name + "name");
+                    dict.FV(out Data.MObjectHRC[i0].Name, name + "name");
 
-                    if (dict.StartsWith(name + "joint_orient"))
+                    if (dict.SW(name + "joint_orient"))
                     {
                         Data.MObjectHRC[i0].JointOrient = new Vector3<float?>();
-                        dict.FindValue(out Data.MObjectHRC[i0].JointOrient.X, name + "joint_orient.x");
-                        dict.FindValue(out Data.MObjectHRC[i0].JointOrient.Y, name + "joint_orient.y");
-                        dict.FindValue(out Data.MObjectHRC[i0].JointOrient.Z, name + "joint_orient.z");
+                        dict.FV(out Data.MObjectHRC[i0].JointOrient.X, name + "joint_orient.x");
+                        dict.FV(out Data.MObjectHRC[i0].JointOrient.Y, name + "joint_orient.y");
+                        dict.FV(out Data.MObjectHRC[i0].JointOrient.Z, name + "joint_orient.z");
                     }
 
-                    if (dict.FindValue(out value, name + "instance.length"))
+                    if (dict.FV(out value, name + "instance.length"))
                     {
                         Data.MObjectHRC[i0].Instances = new MObjectHRC.Instance[int.Parse(value)];
                         for (i1 = 0; i1 < Data.MObjectHRC[i0].Instances.Length; i1++)
                         {
                             nameView = name + "instance" + d + i1 + d;
 
-                            dict.FindValue(out Data.MObjectHRC[i0]
+                            dict.FV(out Data.MObjectHRC[i0]
                                 .Instances[i1].   Name, nameView +     "name");
-                            dict.FindValue(out Data.MObjectHRC[i0]
+                            dict.FV(out Data.MObjectHRC[i0]
                                 .Instances[i1]. Shadow, nameView +   "shadow");
-                            dict.FindValue(out Data.MObjectHRC[i0]
+                            dict.FV(out Data.MObjectHRC[i0]
                                 .Instances[i1].UIDName, nameView + "uid_name");
 
                             Data.MObjectHRC[i0].Instances[i1].MT = RMT(nameView);
                         }
                     }
 
-                    if (dict.FindValue(out value, name + "node.length"))
+                    if (dict.FV(out value, name + "node.length"))
                     {
                         Data.MObjectHRC[i0].Node = new Node[int.Parse(value)];
                         for (i1 = 0; i1 < Data.MObjectHRC[i0].Node.Length; i1++)
                         {
                             nameView = name + "node" + d + i1 + d;
-                            dict.FindValue(out Data.MObjectHRC[i0].Node[i1].Name  , nameView + "name"  );
-                            dict.FindValue(out Data.MObjectHRC[i0].Node[i1].Parent, nameView + "parent");
+                            dict.FV(out Data.MObjectHRC[i0].Node[i1].Name  , nameView + "name"  );
+                            dict.FV(out Data.MObjectHRC[i0].Node[i1].Parent, nameView + "parent");
 
                             Data.MObjectHRC[i0].Node[i1].MT = RMT(nameView);
                         }
@@ -351,22 +352,22 @@ namespace KKdMainLib
                 }
             }
 
-            if (dict.FindValue(out value, "m_objhrc_list.length"))
+            if (dict.FV(out value, "m_objhrc_list.length"))
             {
                 Data.MObjectHRCList = new string[int.Parse(value)];
                 for (i0 = 0; i0 < Data.MObjectHRCList.Length; i0++)
-                    dict.FindValue(out Data.MObjectHRCList[i0], "m_objhrc_list" + d + i0);
+                    dict.FV(out Data.MObjectHRCList[i0], "m_objhrc_list" + d + i0);
             }
 
-            if (dict.FindValue(out value, "material_list.length"))
+            if (dict.FV(out value, "material_list.length"))
             {
                 Data.MaterialList = new MaterialList[int.Parse(value)];
                 Head.Format = Format.X;
                 for (i0 = 0; i0 < Data.MaterialList.Length; i0++)
                 {
                     name = "material_list" + d + i0 + d;
-                    dict.FindValue(out Data.MaterialList[i0].HashName, name + "hash_name");
-                    dict.FindValue(out Data.MaterialList[i0].    Name, name +      "name");
+                    dict.FV(out Data.MaterialList[i0].HashName, name + "hash_name");
+                    dict.FV(out Data.MaterialList[i0].    Name, name +      "name");
 
                     Data.MaterialList[i0].BlendColor    = RRGBAK(name +    "blend_color" + d);
                     Data.MaterialList[i0].GlowIntensity = RK    (name + "glow_intensity" + d);
@@ -374,49 +375,49 @@ namespace KKdMainLib
                 }
             }
 
-            if (dict.FindValue(out value, "motion.length"))
+            if (dict.FV(out value, "motion.length"))
             {
                 Data.Motion = new string[int.Parse(value)];
                 for (i0 = 0; i0 < Data.Motion.Length; i0++)
-                    dict.FindValue(out Data.Motion[i0], "motion" + d + i0 + d + "name");
+                    dict.FV(out Data.Motion[i0], "motion" + d + i0 + d + "name");
             }
 
-            if (dict.FindValue(out value, "object.length"))
+            if (dict.FV(out value, "object.length"))
             {
                 Data.Object = new Object[int.Parse(value)];
                 for (i0 = 0; i0 < Data.Object.Length; i0++)
                 {
                     name = "object" + d + i0 + d;
 
-                    dict.FindValue(out Data.Object[i0].Morph      , name + "morph"       );
-                    dict.FindValue(out Data.Object[i0].MorphOffset, name + "morph_offset");
-                    dict.FindValue(out Data.Object[i0].       Name, name +         "name");
-                    dict.FindValue(out Data.Object[i0]. ParentName, name +  "parent_name");
-                    dict.FindValue(out Data.Object[i0].    UIDName, name +     "uid_name");
+                    dict.FV(out Data.Object[i0].Morph      , name + "morph"       );
+                    dict.FV(out Data.Object[i0].MorphOffset, name + "morph_offset");
+                    dict.FV(out Data.Object[i0].       Name, name +         "name");
+                    dict.FV(out Data.Object[i0]. ParentName, name +  "parent_name");
+                    dict.FV(out Data.Object[i0].    UIDName, name +     "uid_name");
 
-                    if (dict.FindValue(out value, name + "tex_pat.length"))
+                    if (dict.FV(out value, name + "tex_pat.length"))
                     {
                         Data.Object[i0].TexPat = new Object.TexturePattern[int.Parse(value)];
                         for (i1 = 0; i1 < Data.Object[i0].TexPat.Length; i1++)
                         {
                             nameView = name + "tex_pat" + d + i1 + d;
-                            dict.FindValue(out Data.Object[i0].TexPat[i1]
+                            dict.FV(out Data.Object[i0].TexPat[i1]
                                 .Name     , nameView + "name"      );
-                            dict.FindValue(out Data.Object[i0].TexPat[i1]
+                            dict.FV(out Data.Object[i0].TexPat[i1]
                                 .Pat      , nameView + "pat"       );
-                            dict.FindValue(out Data.Object[i0].TexPat[i1]
+                            dict.FV(out Data.Object[i0].TexPat[i1]
                                 .PatOffset, nameView + "pat_offset");
                         }
                     }
 
-                    if (dict.FindValue(out value, name + "tex_transform.length"))
+                    if (dict.FV(out value, name + "tex_transform.length"))
                     {
                         Data.Object[i0].TexTrans = new Object.TextureTransform[int.Parse(value)];
                         for (i1 = 0; i1 < Data.Object[i0].TexTrans.Length; i1++)
                         {
                             nameView = name + "tex_transform" + d + i1 + d;
 
-                            dict.FindValue(out Data.Object[i0].TexTrans[i1].Name, nameView + "name");
+                            dict.FV(out Data.Object[i0].TexTrans[i1].Name, nameView + "name");
                             Data.Object[i0].TexTrans[i1].Coverage       =
                                 RKUV(nameView + "coverage"      );
                             Data.Object[i0].TexTrans[i1].Offset         =
@@ -436,32 +437,32 @@ namespace KKdMainLib
                 }
             }
 
-            if (dict.FindValue(out value, "objhrc.length"))
+            if (dict.FV(out value, "objhrc.length"))
             {
                 Data.ObjectHRC = new ObjectHRC[int.Parse(value)];
                 for (i0 = 0; i0 < Data.ObjectHRC.Length; i0++)
                 {
                     name = "objhrc" + d + i0 + d;
 
-                    if (dict.StartsWith(name + "joint_orient"))
+                    if (dict.SW(name + "joint_orient"))
                     {
                         Data.ObjectHRC[i0].JointOrient = new Vector3<float?>();
-                        dict.FindValue(out Data.ObjectHRC[i0].JointOrient.X, name + "joint_orient.x");
-                        dict.FindValue(out Data.ObjectHRC[i0].JointOrient.Y, name + "joint_orient.y");
-                        dict.FindValue(out Data.ObjectHRC[i0].JointOrient.Z, name + "joint_orient.z");
+                        dict.FV(out Data.ObjectHRC[i0].JointOrient.X, name + "joint_orient.x");
+                        dict.FV(out Data.ObjectHRC[i0].JointOrient.Y, name + "joint_orient.y");
+                        dict.FV(out Data.ObjectHRC[i0].JointOrient.Z, name + "joint_orient.z");
                     }
-                    dict.FindValue(out Data.ObjectHRC[i0].   Name, name +     "name");
-                    dict.FindValue(out Data.ObjectHRC[i0]. Shadow, name +   "shadow");
-                    dict.FindValue(out Data.ObjectHRC[i0].UIDName, name + "uid_name");
-                    if (dict.FindValue(out value, name + "node.length"))
+                    dict.FV(out Data.ObjectHRC[i0].   Name, name +     "name");
+                    dict.FV(out Data.ObjectHRC[i0]. Shadow, name +   "shadow");
+                    dict.FV(out Data.ObjectHRC[i0].UIDName, name + "uid_name");
+                    if (dict.FV(out value, name + "node.length"))
                     {
                         Data.ObjectHRC[i0].Node = new Node[int.Parse(value)];
                         for (i1 = 0; i1 < Data.ObjectHRC[i0].Node.Length; i1++)
                         {
                             nameView = name + "node" + d + i1 + d;
 
-                            dict.FindValue(out Data.ObjectHRC[i0].Node[i1].Name  , nameView + "name"  );
-                            dict.FindValue(out Data.ObjectHRC[i0].Node[i1].Parent, nameView + "parent");
+                            dict.FV(out Data.ObjectHRC[i0].Node[i1].Name  , nameView + "name"  );
+                            dict.FV(out Data.ObjectHRC[i0].Node[i1].Parent, nameView + "parent");
 
                             Data.ObjectHRC[i0].Node[i1].MT = RMT(nameView);
                         }
@@ -469,21 +470,21 @@ namespace KKdMainLib
                 }
             }
 
-            if (dict.FindValue(out value, "object_list.length"))
+            if (dict.FV(out value, "object_list.length"))
             {
                 Data.ObjectList = new string[int.Parse(value)];
                 for (i0 = 0; i0 < Data.ObjectList.Length; i0++)
-                    dict.FindValue(out Data.ObjectList[i0], "object_list" + d + i0);
+                    dict.FV(out Data.ObjectList[i0], "object_list" + d + i0);
             }
 
-            if (dict.FindValue(out value, "objhrc_list.length"))
+            if (dict.FV(out value, "objhrc_list.length"))
             {
                 Data.ObjectHRCList = new string[int.Parse(value)];
                 for (i0 = 0; i0 < Data.ObjectHRCList.Length; i0++)
-                    dict.FindValue(out Data.ObjectHRCList[i0], "objhrc_list" + d + i0);
+                    dict.FV(out Data.ObjectHRCList[i0], "objhrc_list" + d + i0);
             }
 
-            if (dict.FindValue(out value, "point.length"))
+            if (dict.FV(out value, "point.length"))
             {
                 Data.Point = new ModelTransform[int.Parse(value)];
                 for (i0 = 0; i0 < Data.Point.Length; i0++)
@@ -496,22 +497,22 @@ namespace KKdMainLib
             this.a3dc = a3dc;
             _IO = File.OpenWriter();
             DateTime date = DateTime.Now;
-            if (a3dc && Data._.CompressF16 != null && Data._.CompressF16 != 0)
+            if (a3dc && Data._.CompressF16 != 0)
                 W("", "#-compress_f16");
             if (!a3dc)
                 _IO.W("#A3DA__________\n");
-            W("#", DateTime.UtcNow.ToString("ddd MMM dd HH:mm:ss yyyy",
-                System.Globalization.CultureInfo.InvariantCulture));
+            _IO.W("#" + DateTime.UtcNow.ToString("ddd MMM dd HH:mm:ss yyyy",
+                System.Globalization.CultureInfo.InvariantCulture) + "\n");
             if (a3dc && Data._.CompressF16 != 0)
-                W("_.compress_f16=", Data._.CompressF16);
+                W("_.compress_f16", (int)Data._.CompressF16);
 
-            W("_.converter.version=", Data._.ConverterVersion);
-            W("_.file_name="        , Data._.FileName        );
-            W("_.property.version=" , Data._. PropertyVersion);
+            W("_.converter.version", Data._.ConverterVersion);
+            W("_.file_name"        , Data._.FileName        );
+            W("_.property.version" , Data._. PropertyVersion);
 
             if (Data.Ambient != null && Head.Format == Format.MGF)
             {
-                so0 = Data.Ambient.Length.SortWriter();
+                so0 = Data.Ambient.Length.SW();
                 for (i0 = 0; i0 < Data.Ambient.Length; i0++)
                 {
                     soi0 = so0[i0];
@@ -519,10 +520,10 @@ namespace KKdMainLib
                     ref Ambient Ambient = ref Data.Ambient[soi0];
 
                     W(ref Ambient.   LightDiffuse, name +    "light.Diffuse");
-                    W(name + "name=", Ambient.Name);
+                    W(name + "name", Ambient.Name);
                     W(ref Ambient.RimLightDiffuse, name + "rimlight.Diffuse");
                 }
-                W("ambient.length=", Data.Fog.Length);
+                W("ambient.length", Data.Fog.Length);
             }
 
             if (Data.CameraAuxiliary != null)
@@ -540,7 +541,7 @@ namespace KKdMainLib
 
             if (Data.CameraRoot != null)
             {
-                so0 = Data.CameraRoot.Length.SortWriter();
+                so0 = Data.CameraRoot.Length.SW();
                 for (i0 = 0; i0 < Data.CameraRoot.Length; i0++)
                 {
                     soi0 = so0[i0];
@@ -550,34 +551,34 @@ namespace KKdMainLib
 
                     W(ref cr.Interest, name + "interest" + d);
                     W(ref cr.MT, name, 0b11110);
-                    W(nameView + "aspect=", cr.VP.Aspect);
-                    if (cr.VP.CameraApertureH != null)
-                        W(nameView + "camera_aperture_h=", cr.VP.CameraApertureH);
-                    if (cr.VP.CameraApertureW != null)
-                        W(nameView + "camera_aperture_w=", cr.VP.CameraApertureW);
+                    W(nameView + "aspect", cr.VP.Aspect);
+                    if (cr.VP.CameraApertureH.HasValue)
+                        W(nameView + "camera_aperture_h", cr.VP.CameraApertureH);
+                    if (cr.VP.CameraApertureW.HasValue)
+                        W(nameView + "camera_aperture_w", cr.VP.CameraApertureW);
                     W(ref cr.VP.FocalLength, nameView + "focal_length" + d);
                     W(ref cr.VP.FOV, nameView + "fov" + d);
-                    if (cr.VP.FOVHorizontal != null)
-                        W(nameView + "fov_is_horizontal=", cr.VP.FOVHorizontal.Value ? 1 : 0);
+                    if (cr.VP.FOVHorizontal)
+                        W(nameView + "fov_is_horizontal", cr.VP.FOVHorizontal ? 1 : 0);
                     W(ref cr.VP.MT  , nameView, 0b10000);
                     W(ref cr.VP.Roll, nameView + "roll" + d);
                     W(ref cr.VP.MT  , nameView, 0b01111);
                     W(ref cr.MT  , name    , 0b00001);
                 }
-                W("camera_root.length=", Data.CameraRoot.Length);
+                W("camera_root.length", Data.CameraRoot.Length);
             }
 
             if (Data.Chara != null)
             {
-                so0 = Data.Chara.Length.SortWriter();
+                so0 = Data.Chara.Length.SW();
                 for (i0 = 0; i0 < Data.Chara.Length; i0++)
                     W(ref Data.Chara[so0[i0]], "chara" + d + so0[i0] + d);
-                W("chara.length=", Data.Chara.Length);
+                W("chara.length", Data.Chara.Length);
             }
 
             if (Data.Curve != null)
             {
-                so0 = Data.Curve.Length.SortWriter();
+                so0 = Data.Curve.Length.SW();
                 for (i0 = 0; i0 < Data.Curve.Length; i0++)
                 {
                     soi0 = so0[i0];
@@ -585,43 +586,43 @@ namespace KKdMainLib
                     ref Curve curve = ref Data.Curve[soi0];
 
                     W(ref curve.CV, name + "cv" + d);
-                    W(name + "name=", curve.Name);
+                    W(name + "name", curve.Name);
                 }
-                W("curve.length=", Data.Curve.Length);
+                W("curve.length", Data.Curve.Length);
             }
 
             if (Data.DOF != null && (Head.Format == Format.AFT || Head.Format == Format.FT))
             {
                 DOF dof = Data.DOF.Value;
-                W("dof.name=", dof.Name);
+                W("dof.name", dof.Name);
                 W(ref dof.MT, "dof" + d);
                 Data.DOF = dof;
             }
 
             if (Data.Event != null)
             {
-                so0 = Data.Event.Length.SortWriter();
+                so0 = Data.Event.Length.SW();
                 for (i0 = 0; i0 < Data.Event.Length; i0++)
                 {
                     soi0 = so0[i0];
                     name = "event" + d + soi0 + d;
                     ref Event @event = ref Data.Event[soi0];
 
-                    W(name + "begin="         , @event.Begin       );
-                    W(name + "clip_begin="    , @event.ClipBegin   );
-                    W(name + "clip_en="       , @event.ClipEnd     );
-                    W(name + "end="           , @event.End         );
-                    W(name + "name="          , @event.Name        );
-                    W(name + "param1="        , @event.Param1      );
-                    W(name + "ref="           , @event.Ref         );
-                    W(name + "time_ref_scale=", @event.TimeRefScale);
-                    W(name + "type="          , @event.Type        );
+                    W(name + "begin"         , @event.Begin       );
+                    W(name + "clip_begin"    , @event.ClipBegin   );
+                    W(name + "clip_en"       , @event.ClipEnd     );
+                    W(name + "end"           , @event.End         );
+                    W(name + "name"          , @event.Name        );
+                    W(name + "param1"        , @event.Param1      );
+                    W(name + "ref"           , @event.Ref         );
+                    W(name + "time_ref_scale", @event.TimeRefScale);
+                    W(name + "type"          , @event.Type        );
                 }
             }
 
             if (Data.Fog != null)
             {
-                so0 = Data.Fog.Length.SortWriter();
+                so0 = Data.Fog.Length.SW();
                 for (i0 = 0; i0 < Data.Fog.Length; i0++)
                 {
                     soi0 = so0[i0];
@@ -631,15 +632,15 @@ namespace KKdMainLib
                     W(ref fog.Diffuse, name + "Diffuse"      );
                     W(ref fog.Density, name + "density", true);
                     W(ref fog.End    , name + "end"    , true);
-                    W(name + "id=", fog.Id);
+                    W(name + "id", fog.Id);
                     W(ref fog.Start  , name + "start"  , true);
                 }
-                W("fog.length=", Data.Fog.Length);
+                W("fog.length", Data.Fog.Length);
             }
 
             if (Data.Light != null)
             {
-                so0 = Data.Light.Length.SortWriter();
+                so0 = Data.Light.Length.SW();
                 for (i0 = 0; i0 < Data.Light.Length; i0++)
                 {
                     soi0 = so0[i0];
@@ -650,18 +651,18 @@ namespace KKdMainLib
                     W(ref light.Diffuse      , name + "Diffuse"      );
                     W(ref light.Incandescence, name + "Incandescence");
                     W(ref light.Specular     , name + "Specular"     );
-                    W(name + "id="  , light.Id  );
-                    W(name + "name=", light.Name);
+                    W(name + "id"  , light.Id  );
+                    W(name + "name", light.Name);
                     W(ref light.Position     , name + "position"       + d);
                     W(ref light.SpotDirection, name + "spot_direction" + d);
-                    W(name + "type=", light.Type);
+                    W(name + "type", light.Type);
                 }
-                W("light.length=", Data.Light.Length);
+                W("light.length", Data.Light.Length);
             }
 
             if (Data.MObjectHRC != null)
             {
-                so0 = Data.MObjectHRC.Length.SortWriter();
+                so0 = Data.MObjectHRC.Length.SW();
                 for (i0 = 0; i0 < Data.MObjectHRC.Length; i0++)
                 {
                     soi0 = so0[i0];
@@ -671,14 +672,14 @@ namespace KKdMainLib
                     if (mObjectHRC.JointOrient.NotNull && (Head.Format ==
                         Format.X || Head.Format == Format.XHD))
                     {
-                        W(name + "joint_orient.x=", mObjectHRC.JointOrient.X);
-                        W(name + "joint_orient.y=", mObjectHRC.JointOrient.Y);
-                        W(name + "joint_orient.z=", mObjectHRC.JointOrient.Z);
+                        W(name + "joint_orient.x", mObjectHRC.JointOrient.X);
+                        W(name + "joint_orient.y", mObjectHRC.JointOrient.Y);
+                        W(name + "joint_orient.z", mObjectHRC.JointOrient.Z);
                     }
 
                     if (mObjectHRC.Instances != null)
                     {
-                        so1 = mObjectHRC.Instances.Length.SortWriter();
+                        so1 = mObjectHRC.Instances.Length.SW();
                         for (i1 = 0; i1 < mObjectHRC.Instances.Length; i1++)
                         {
                             soi1 = so1[i1];
@@ -686,22 +687,22 @@ namespace KKdMainLib
                             ref MObjectHRC.Instance instance = ref mObjectHRC.Instances[soi1];
 
                             W(ref instance.MT, nameView, 0b10000);
-                            W(nameView +     "name=", instance.   Name);
+                            W(nameView +     "name", instance.   Name);
                             W(ref instance.MT, nameView, 0b01100);
-                            W(nameView +   "shadow=", instance. Shadow);
+                            W(nameView +   "shadow", instance. Shadow);
                             W(ref instance.MT, nameView, 0b00010);
-                            W(nameView + "uid_name=", instance.UIDName);
+                            W(nameView + "uid_name", instance.UIDName);
                             W(ref instance.MT, nameView, 0b00001);
                         }
-                        W(name + "instance.length=", mObjectHRC.Instances.Length);
+                        W(name + "instance.length", mObjectHRC.Instances.Length);
                     }
 
                     W(ref mObjectHRC.MT, name, 0b10000);
-                    W(name + "name=", mObjectHRC.Name);
+                    W(name + "name", mObjectHRC.Name);
 
                     if (mObjectHRC.Node != null)
                     {
-                        so1 = mObjectHRC.Node.Length.SortWriter();
+                        so1 = mObjectHRC.Node.Length.SW();
                         for (i1 = 0; i1 < mObjectHRC.Node.Length; i1++)
                         {
                             soi1 = so1[i1];
@@ -709,29 +710,29 @@ namespace KKdMainLib
                             ref Node node = ref mObjectHRC.Node[soi1];
 
                             W(ref node.MT, nameView, 0b10000);
-                            W(nameView +   "name=", node.Name  );
-                            W(nameView + "parent=", node.Parent);
+                            W(nameView +   "name", node.Name  );
+                            W(nameView + "parent", node.Parent);
                             W(ref node.MT, nameView, 0b01111);
                         }
-                        W(name + "node.length=", mObjectHRC.Node.Length);
+                        W(name + "node.length", mObjectHRC.Node.Length);
                     }
 
                     W(ref mObjectHRC.MT, name, 0b01111);
                 }
-                W("m_objhrc.length=", Data.MObjectHRC.Length);
+                W("m_objhrc.length", Data.MObjectHRC.Length);
             }
 
             if (Data.MObjectHRCList != null)
             {
-                so0 = Data.MObjectHRCList.Length.SortWriter();
+                so0 = Data.MObjectHRCList.Length.SW();
                 for (i0 = 0; i0 < Data.MObjectHRCList.Length; i0++)
-                    W("m_objhrc_list" + d + so0[i0] + "=", Data.MObjectHRCList[so0[i0]]);
-                W("m_objhrc_list.length=", Data.MObjectHRCList.Length);
+                    W("m_objhrc_list" + d + so0[i0] + "", Data.MObjectHRCList[so0[i0]]);
+                W("m_objhrc_list.length", Data.MObjectHRCList.Length);
             }
 
             if (Data.MaterialList != null && (Head.Format == Format.X || Head.Format == Format.XHD))
             {
-                so0 = Data.MaterialList.Length.SortWriter();
+                so0 = Data.MaterialList.Length.SW();
                 for (i0 = 0; i0 < Data.MaterialList.Length; i0++)
                 {
                     soi0 = so0[i0];
@@ -740,24 +741,24 @@ namespace KKdMainLib
 
                     W(ref ml.BlendColor   , name + "blend_color"   );
                     W(ref ml.GlowIntensity, name + "glow_intensity");
-                    W(name + "hash_name=", ml.HashName);
+                    W(name + "hash_name", ml.HashName);
                     W(ref ml.Incandescence, name + "incandescence" );
-                    W(name +      "name=", ml.    Name);
+                    W(name +      "name", ml.    Name);
                 }
-                W("material_list.length=", Data.MaterialList.Length);
+                W("material_list.length", Data.MaterialList.Length);
             }
 
             if (Data.Motion != null)
             {
-                so0 = Data.Motion.Length.SortWriter();
+                so0 = Data.Motion.Length.SW();
                 for (i0 = 0; i0 < Data.Motion.Length; i0++)
-                    W(name + so0[i0] + d + "name=", Data.Motion[so0[i0]]);
-                W("motion.length=", Data.Motion.Length);
+                    W(name + so0[i0] + d + "name", Data.Motion[so0[i0]]);
+                W("motion.length", Data.Motion.Length);
             }
 
             if (Data.Object != null)
             {
-                so0 = Data.Object.Length.SortWriter();
+                so0 = Data.Object.Length.SW();
                 for (i0 = 0; i0 < Data.Object.Length; i0++)
                 {
                     soi0 = so0[i0];
@@ -767,39 +768,39 @@ namespace KKdMainLib
                     W(ref @object.MT, name, 0b10000);
                     if (@object.Morph != null)
                     {
-                        W(name + "morph="       , @object.Morph      );
-                        W(name + "morph_offset=", @object.MorphOffset);
+                        W(name + "morph"       , @object.Morph      );
+                        W(name + "morph_offset", @object.MorphOffset);
                     }
-                    W(name + "name="       , @object.Name      );
-                    W(name + "parent_name=", @object.ParentName);
+                    W(name + "name"       , @object.Name      );
+                    W(name + "parent_name", @object.ParentName);
                     W(ref @object.MT, name, 0b01100);
 
                     if (@object.TexPat != null)
                     {
-                        so1 = @object.TexPat.Length.SortWriter();
+                        so1 = @object.TexPat.Length.SW();
                         for (i1 = 0; i1 < @object.TexPat.Length; i1++)
                         {
                             soi1 = so1[i1];
                             nameView = name + "tex_pat" + d + soi1 + d;
                             ref Object.TexturePattern texPat = ref @object.TexPat[soi1];
 
-                            W(nameView + "name="      , texPat.Name     );
-                            W(nameView + "pat="       , texPat.Pat      );
-                            W(nameView + "pat_offset=", texPat.PatOffset);
+                            W(nameView + "name"      , texPat.Name     );
+                            W(nameView + "pat"       , texPat.Pat      );
+                            W(nameView + "pat_offset", texPat.PatOffset);
                         }
-                        W(name + "tex_pat.length=", @object.TexPat.Length);
+                        W(name + "tex_pat.length", @object.TexPat.Length);
                     }
 
                     if (@object.TexTrans != null)
                     {
-                        so1 = @object.TexTrans.Length.SortWriter();
+                        so1 = @object.TexTrans.Length.SW();
                         for (i1 = 0; i1 < @object.TexTrans.Length; i1++)
                         {
                             soi1 = so1[i1];
                             nameView = name + "tex_transform" + d + soi1 + d;
                             ref Object.TextureTransform texTrans = ref @object.TexTrans[soi1];
 
-                            W(nameView + "name=", @object.TexTrans[soi1].Name);
+                            W(nameView + "name", @object.TexTrans[soi1].Name);
                             W(ref texTrans.Coverage      , nameView + "coverage"      );
                             W(ref texTrans.Offset        , nameView + "offset"        );
                             W(ref texTrans.Repeat        , nameView + "repeat"        );
@@ -807,46 +808,46 @@ namespace KKdMainLib
                             W(ref texTrans.   RotateFrame, nameView + "rotateFrame"   );
                             W(ref texTrans.TranslateFrame, nameView + "translateFrame");
                         }
-                        W(name + "tex_transform.length=", @object.TexTrans.Length);
+                        W(name + "tex_transform.length", @object.TexTrans.Length);
                     }
 
                     W(ref @object.MT, name, 0b00010);
-                    W(name + "uid_name=", @object.UIDName);
+                    W(name + "uid_name", @object.UIDName);
                     W(ref @object.MT, name, 0b00001);
                 }
-                W("object.length=", Data.Object.Length);
+                W("object.length", Data.Object.Length);
             }
 
             if (Data.ObjectList != null)
             {
-                so0 = Data.ObjectList.Length.SortWriter();
+                so0 = Data.ObjectList.Length.SW();
                 for (i0 = 0; i0 < Data.ObjectList.Length; i0++)
-                    W("object_list" + d + so0[i0] + "=", Data.ObjectList[so0[i0]]);
-                W("object_list.length=", Data.ObjectList.Length);
+                    W("object_list" + d + so0[i0] + "", Data.ObjectList[so0[i0]]);
+                W("object_list.length", Data.ObjectList.Length);
             }
 
             if (Data.ObjectHRC != null)
             {
-                so0 = Data.ObjectHRC.Length.SortWriter();
+                so0 = Data.ObjectHRC.Length.SW();
                 for (i0 = 0; i0 < Data.ObjectHRC.Length; i0++)
                 {
                     soi0 = so0[i0];
                     name = "objhrc" + d + soi0 + d;
                     ref ObjectHRC objectHRC = ref Data.ObjectHRC[soi0];
 
-                    W(name + "name=", objectHRC.Name);
+                    W(name + "name", objectHRC.Name);
 
                     if (objectHRC.JointOrient.NotNull && (Head.Format ==
                         Format.X || Head.Format == Format.XHD))
                     {
-                        W(name + "joint_orient.x=", objectHRC.JointOrient.X);
-                        W(name + "joint_orient.y=", objectHRC.JointOrient.Y);
-                        W(name + "joint_orient.z=", objectHRC.JointOrient.Z);
+                        W(name + "joint_orient.x", objectHRC.JointOrient.X);
+                        W(name + "joint_orient.y", objectHRC.JointOrient.Y);
+                        W(name + "joint_orient.z", objectHRC.JointOrient.Z);
                     }
 
                     if (objectHRC.Node != null)
                     {
-                        so1 = objectHRC.Node.Length.SortWriter();
+                        so1 = objectHRC.Node.Length.SW();
                         for (i1 = 0; i1 < objectHRC.Node.Length; i1++)
                         {
                             soi1 = so1[i1];
@@ -854,39 +855,39 @@ namespace KKdMainLib
                             ref Node node = ref objectHRC.Node[soi1];
 
                             W(ref node.MT, nameView, 0b10000);
-                            W(nameView + "name="  , node.Name  );
-                            W(nameView + "parent=", node.Parent);
+                            W(nameView + "name"  , node.Name  );
+                            W(nameView + "parent", node.Parent);
                             W(ref node.MT, nameView, 0b01111);
                         }
-                        W(name + "node.length=", objectHRC.Node.Length);
+                        W(name + "node.length", objectHRC.Node.Length);
                     }
 
                     if (objectHRC.Shadow != null)
-                        W(name + "shadow=", objectHRC.Shadow);
-                    W(name + "uid_name=", objectHRC.UIDName);
+                        W(name + "shadow", objectHRC.Shadow);
+                    W(name + "uid_name", objectHRC.UIDName);
                 }
-                W("objhrc.length=", Data.ObjectHRC.Length);
+                W("objhrc.length", Data.ObjectHRC.Length);
             }
 
             if (Data.ObjectHRCList != null)
             {
-                so0 = Data.ObjectHRCList.Length.SortWriter();
+                so0 = Data.ObjectHRCList.Length.SW();
                 for (i0 = 0; i0 < Data.ObjectHRCList.Length; i0++)
-                    W("objhrc_list" + d + so0[i0] + "=", Data.ObjectHRCList[so0[i0]]);
-                W("objhrc_list.length=", Data.ObjectHRCList.Length);
+                    W("objhrc_list" + d + so0[i0] + "", Data.ObjectHRCList[so0[i0]]);
+                W("objhrc_list.length", Data.ObjectHRCList.Length);
             }
 
-            W("play_control.begin=", Data.PlayControl.Begin);
+            W("play_control.begin", Data.PlayControl.Begin);
             if (Head.Format > Format.AFT && Head.Format < Format.FT)
-                W("play_control.div=", Data.PlayControl.Div);
-            W("play_control.fps=", Data.PlayControl.FPS);
+                W("play_control.div", Data.PlayControl.Div);
+            W("play_control.fps", Data.PlayControl.FPS);
             if (Data.PlayControl.Offset != null)
             { if (Head.Format > Format.AFT && Head.Format < Format.FT)
-              {    W("play_control.offset=", Data.PlayControl.Offset);
-                   W("play_control.size="  , Data.PlayControl.Size  ); }
-              else W("play_control.size="  , Data.PlayControl.Size + Data.PlayControl.Offset);
+              {    W("play_control.offset", Data.PlayControl.Offset);
+                   W("play_control.size"  , Data.PlayControl.Size  ); }
+              else W("play_control.size"  , Data.PlayControl.Size + Data.PlayControl.Offset);
             }
-            else   W("play_control.size="  , Data.PlayControl.Size);
+            else   W("play_control.size"  , Data.PlayControl.Size);
 
             if (Data.PostProcess != null)
             {
@@ -903,10 +904,10 @@ namespace KKdMainLib
 
             if (Data.Point != null)
             {
-                so0 = Data.Point.Length.SortWriter();
+                so0 = Data.Point.Length.SW();
                 for (i0 = 0; i0 < Data.Point.Length; i0++)
                     W(ref Data.Point[so0[i0]], "point" + d + so0[i0] + d);
-                W("point.length=", Data.Point.Length);
+                W("point.length", Data.Point.Length);
             }
 
             _IO.A(0x1, true);
@@ -918,7 +919,7 @@ namespace KKdMainLib
         private ModelTransform RMT(string str)
         {
             ModelTransform mt = new ModelTransform();
-            dict.FindValue(out mt.BinOffset, str + MTBO);
+            dict.FV(out mt.BinOffset, str + MTBO);
 
             mt.Rot        = RV3(str + "rot"        + d);
             mt.Scale      = RV3(str + "scale"      + d);
@@ -940,30 +941,30 @@ namespace KKdMainLib
         private Key RK(string str)
         {
             Key key = new Key();
-            if ( dict.FindValue(out key.BinOffset, str + BO    )) return  key;
-            if (!dict.FindValue(out int type     , str + "type")) return default;
+            if ( dict.FV(out key.BinOffset, str + BO    )) return  key;
+            if (!dict.FV(out int type     , str + "type")) return default;
 
             key.Type = (KeyType)type;
             if (type == 0x0000) return key;
-            if (type == 0x0001) { dict.FindValue(out key.Value, str + "value"); return key; }
+            if (type == 0x0001) { dict.FV(out key.Value, str + "value"); return key; }
 
             int i = 0;
-            if (dict.FindValue(out int EPTypePost, str + "ep_type_post"))
+            if (dict.FV(out int EPTypePost, str + "ep_type_post"))
                 key.EPTypePost = (EPType)EPTypePost;
-            if (dict.FindValue(out int EPTypePre , str + "ep_type_pre" ))
+            if (dict.FV(out int EPTypePre , str + "ep_type_pre" ))
                 key.EPTypePre  = (EPType)EPTypePre ;
-            dict.FindValue(out key.Length, str + "key.length");
-            dict.FindValue(out key.Max   , str + "max"       );
-            if (dict.StartsWith(str + "raw_data"))
-                dict.FindValue(out key.RawData.KeyType, str + "raw_data_key_type");
+            dict.FV(out key.Length, str + "key.length");
+            dict.FV(out key.Max   , str + "max"       );
+            if (dict.SW(str + "raw_data"))
+                dict.FV(out key.RawData.KeyType, str + "raw_data_key_type");
 
             if (key.RawData.KeyType != 0)
             {
                 ref string[] VL = ref key.RawData.ValueList;
-                dict.FindValue(out key.RawData.ValueType, str + "raw_data.value_type");
-                if (dict.FindValue(out value, str + "raw_data.value_list"))
+                dict.FV(out key.RawData.ValueType, str + "raw_data.value_type");
+                if (dict.FV(out value, str + "raw_data.value_list"))
                     VL = value.Split(',');
-                dict.FindValue(out key.RawData.ValueListSize, str + "raw_data.value_list_size");
+                dict.FV(out key.RawData.ValueListSize, str + "raw_data.value_list_size");
                 value = "";
 
                 int ds = key.RawData.KeyType + 1;
@@ -991,7 +992,7 @@ namespace KKdMainLib
                 key.Keys = new KFT3[key.Length];
                 for (i = 0; i < key.Length; i++)
                 {
-                    if (!dict.FindValue(out value, str + "key" + d + i + d + "data")) continue;
+                    if (!dict.FV(out value, str + "key" + d + i + d + "data")) continue;
 
                     dataArray = value.Replace("(", "").Replace(")", "").Split(',');
                     type = dataArray.Length - 1;
@@ -1013,7 +1014,7 @@ namespace KKdMainLib
         private void W(ref ModelTransform mt, string str, byte flags = 0b11111)
         {
             if (a3dc && !mt.Writed && (flags & 0b10000) != 0)
-            { W(str + MTBO + "=", mt.BinOffset); mt.Writed = true; }
+            { W(str + MTBO + "", mt.BinOffset); mt.Writed = true; }
 
             if (!a3dc)
             {
@@ -1028,7 +1029,7 @@ namespace KKdMainLib
         {
             if (rgba.X.Type == null && rgba.Y.Type == null &&
                 rgba.Z.Type == null && rgba.W.Type == null) return;
-            W(str + "=", "true");
+            W(str, "true");
             W(ref rgba.W, str + d + "a" + d);
             W(ref rgba.Z, str + d + "b" + d);
             W(ref rgba.Y, str + d + "g" + d);
@@ -1042,43 +1043,43 @@ namespace KKdMainLib
         { W(ref uv.X, str + "U", true); W(ref uv.Y, str + "V", true); }
 
         private void W(ref Key Key, string Temp, bool setBoolean)
-        { if (Key.Type == null) return; if (setBoolean) W(Temp + "=", "true"); W(ref Key, Temp + d); }
+        { if (Key.Type == null) return; if (setBoolean) W(Temp + "", "true"); W(ref Key, Temp + d); }
 
         private void W(ref Key key, string str)
         {
             if (key.Type == null) return;
 
-            if (a3dc) { W(str + BO + "=", key.BinOffset); return; }
+            if (a3dc) { W(str + BO + "", key.BinOffset); return; }
 
             int i = 0;
             if (key.Keys != null)
                 if (key.Keys.Length == 0)
                 {
-                    W(str + "type=", (int)key.Type);
-                    if (key.Type > 0) W(str + "value=", key.Value);
+                    W(str + "type", (int)key.Type);
+                    if (key.Type > 0) W(str + "value", key.Value);
                     return;
                 }
 
-            if ((int)key.EPTypePost > 0) W(str + "ep_type_post=", (int)key.EPTypePost);
-            if ((int)key.EPTypePre  > 0) W(str + "ep_type_pre=" , (int)key.EPTypePre );
+            if ((int)key.EPTypePost > 0) W(str + "ep_type_post", (int)key.EPTypePost);
+            if ((int)key.EPTypePre  > 0) W(str + "ep_type_pre" , (int)key.EPTypePre );
             if (key.RawData.KeyType == 0 && key.Keys != null)
             {
                 IKF kf;
-                so = key.Keys.Length.SortWriter();
+                so = key.Keys.Length.SW();
                 for (i = 0; i < key.Keys.Length; i++)
                 {
                     soi = so[i];
                     kf = key.Keys[soi].Check();
-                    W(str + "key" + d + soi + d + "data=", kf.ToString());
+                    W(str + "key" + d + soi + d + "data", kf.ToString());
                     int Type = 0;
                          if (kf is KFT0) Type = 0;
                     else if (kf is KFT1) Type = 1;
                     else if (kf is KFT2) Type = 2;
                     else if (kf is KFT3) Type = 3;
-                    W(str + "key" + d + soi + d + "type=", Type);
+                    W(str + "key" + d + soi + d + "type", Type);
                 }
-                W(str + "key.length=", key.Length);
-                if (key.Max != null) W(str + "max=", key.Max);
+                W(str + "key.length", key.Length);
+                if (key.Max != null) W(str + "max", key.Max);
             }
             else if (key.Keys != null)
             {
@@ -1086,7 +1087,7 @@ namespace KKdMainLib
                 ref int keyType = ref key.RawData.KeyType;
                 keyType = 0;
                 IKF kf;
-                if (key.Max != null) W(str + "max=", key.Max);
+                if (key.Max != null) W(str + "max", key.Max);
                 for (i = 0; i < length && keyType < 3; i++)
                 {
                     kf = key.Keys[i].Check();
@@ -1096,7 +1097,7 @@ namespace KKdMainLib
                     else if (kf is KFT3 && keyType < 3) keyType = 3;
                 }
                 key.RawData.ValueListSize = length * keyType + length;
-                _IO.W(str + "raw_data.value_list=");
+                _IO.W(str + "raw_data.value_list");
                      if (keyType == 0) for (i = 0; i < length; i++)
                         _IO.W(key.Keys[i].ToT0().ToString(false) + (i + 1 < length ? "," : ""));
                 else if (keyType == 1) for (i = 0; i < length; i++)
@@ -1107,26 +1108,26 @@ namespace KKdMainLib
                         _IO.W(key.Keys[i]       .ToString(false) + (i + 1 < length ? "," : ""));
                 _IO.P--;
                 _IO.W('\n');
-                W(str + "raw_data.value_list_size=", key.RawData.ValueListSize);
-                W(str + "raw_data.value_type="     , key.RawData.ValueType    );
-                W(str + "raw_data_key_type="       , key.RawData.  KeyType    );
+                W(str + "raw_data.value_list_size", key.RawData.ValueListSize);
+                W(str + "raw_data.value_type"     , key.RawData.ValueType    );
+                W(str + "raw_data_key_type"       , key.RawData.  KeyType    );
             }
-            W(str + "type=", (int)key.Type);
+            W(str + "type", (int)key.Type);
             if (key.RawData.KeyType == 0 && key.Keys == null && key.Type != null &&
                 key.Type.Value != 0 && key.Value != null && key.Value != 0)
-                W(str + "value=", key.Value);
+                W(str + "value", key.Value);
         }
 
         private void W(string Data,   long? val)
         { if (val != null) W(Data, ( long)val   ); }
         private void W(string Data,  float? val)
         { if (val != null) W(Data, (float)val   ); }
-        private void W(string Data,   long  val)         =>
-            W(Data,  val.ToS( ));
-        private void W(string Data,  float  val)         =>
-            W(Data,  val.ToS( ));
+        private void W(string Data,   long  val) =>
+                           W(Data,        val.ToS());
+        private void W(string Data,  float  val) =>
+                           W(Data,        val.ToS());
         private void W(string Data, string  val)
-        { if (val != null) _IO.W((Data + val + "\n").ToUTF8()); }
+        { if (val != null) _IO.W(Data + "=" + val + "\n"); }
 
         private void A3DCReader()
         {
@@ -1259,7 +1260,8 @@ namespace KKdMainLib
         public byte[] A3DCWriter()
         {
             if (a3dcOpt) usedValues = new UsedDict();
-            if (Head.Format < Format.F2LE) Data._.CompressF16 = null;
+            Data._.CompressF16 = Head.Format > Format.AFT && Head.Format < Format.FT ?
+                (Head.Format == Format.MGF ? CompressF16.I16F16F16F16 : CompressF16.I16F16F32F32) : 0;
 
             _IO = File.OpenWriter();
             for (byte i = 0; i < 2; i++)
@@ -1542,12 +1544,11 @@ namespace KKdMainLib
             }
             key.Keys = new KFT3[key.Length];
 
-            int compressF16 = Data._.CompressF16 ?? 0;
-            if (f16 && compressF16 == 2)
+            if (f16 && Data._.CompressF16 == CompressF16.I16F16F16F16)
                 for (int i = 0; i < key.Keys.Length; i++)
                 { ref KFT3 kf = ref key.Keys[i]; kf.F  = _IO.RU16(); kf.V  = _IO.RF16();
                                                  kf.T1 = _IO.RF16(); kf.T2 = _IO.RF16(); }
-            else if (f16 && compressF16 > 0)
+            else if (f16 && Data._.CompressF16 > 0)
                 for (int i = 0; i < key.Keys.Length; i++)
                 { ref KFT3 kf = ref key.Keys[i]; kf.F  = _IO.RU16(); kf.V  = _IO.RF16();
                                                  kf.T1 = _IO.RF32(); kf.T2 = _IO.RF32(); }
@@ -1606,12 +1607,11 @@ namespace KKdMainLib
                 _IO.W((float)key.Max);
                 _IO.W(key.Keys.Length);
 
-                int compressF16 = Data._.CompressF16 ?? 0;
-                if (f16 && compressF16 == 2)
+                if (f16 && Data._.CompressF16 == CompressF16.I16F16F16F16)
                     for (i = 0; i < key.Keys.Length; i++)
                     { ref KFT3 kf = ref key.Keys[i]; _IO.W((ushort)kf.F ); _IO.W((Half)kf.V );
                                                      _IO.W((  Half)kf.T1); _IO.W((Half)kf.T2); }
-                else if (f16 && compressF16 > 0)
+                else if (f16 && Data._.CompressF16 > 0)
                     for (i = 0; i < key.Keys.Length; i++)
                     { ref KFT3 kf = ref key.Keys[i]; _IO.W((ushort)kf.F ); _IO.W((Half)kf.V );
                                                      _IO.W(        kf.T1); _IO.W(      kf.T2); }
@@ -1622,16 +1622,20 @@ namespace KKdMainLib
             }
             else
             {
-                if (!a3dcOpt || !usedValues.ContainsValue(key.Value))
+                if (!a3dcOpt)
                 {
                     key.BinOffset = _IO.P;
                     _IO.W((  int)key.Type );
                     _IO.W((float)key.Value);
-                    if (a3dcOpt) usedValues.Add(key.BinOffset, key.Value);
-                    return;
                 }
-                else if (usedValues.ContainsValue(key.Value))
-                { key.BinOffset = usedValues.GetKey(key.Value); return; }
+                else if (!usedValues.ContainsValue(key.Value))
+                {
+                    key.BinOffset = _IO.P;
+                    _IO.W((  int)key.Type );
+                    _IO.W((float)key.Value);
+                    usedValues.Add(key.BinOffset, key.Value);
+                }
+                else key.BinOffset = usedValues.GK(key.Value);
             }
         }
 
@@ -1866,10 +1870,9 @@ namespace KKdMainLib
             {
                 Data._ = new _
                 {
-                    CompressF16      = temp.RnI32("CompressF16"     ),
-                    ConverterVersion = temp.RS   ("ConverterVersion"),
-                    FileName         = temp.RS   ("FileName"        ),
-                    PropertyVersion  = temp.RS   ("PropertyVersion" ),
+                    ConverterVersion = temp.RS("ConverterVersion"),
+                    FileName         = temp.RS("FileName"        ),
+                    PropertyVersion  = temp.RS("PropertyVersion" ),
                 };
             }
 
@@ -1911,7 +1914,7 @@ namespace KKdMainLib
                     Data.CameraRoot[i].VP = new CameraRoot.ViewPoint
                     {
                         MT              = temp1.RMT(),
-                        Aspect          = temp1.RnF32("Aspect"         ),
+                        Aspect          = temp1. RF32("Aspect"         ),
                         CameraApertureH = temp1.RnF32("CameraApertureH"),
                         CameraApertureW = temp1.RnF32("CameraApertureW"),
                         FOVHorizontal   = temp1.RB   ("FOVHorizontal"  ),
@@ -2167,11 +2170,11 @@ namespace KKdMainLib
             if ((temp = a3d["PlayControl"]).NotNull)
                 Data.PlayControl = new PlayControl
                 {
-                    Begin  = temp.RnI32("Begin" ),
+                    Begin  = temp. RI32("Begin" ),
                     Div    = temp.RnI32("Div"   ),
-                    FPS    = temp.RnI32("FPS"   ),
+                    FPS    = temp. RI32("FPS"   ),
                     Offset = temp.RnI32("Offset"),
-                    Size   = temp.RnI32("Size"  ),
+                    Size   = temp. RI32("Size"  ),
                 };
 
             if ((temp = a3d["Point", true]).NotNull)
@@ -2199,8 +2202,7 @@ namespace KKdMainLib
         private MsgPack MsgPackWriter()
         {
             MsgPack a3d = new MsgPack("A3D")
-                .Add(new MsgPack("_").Add("CompressF16"     , Data._.CompressF16     )
-                                     .Add("ConverterVersion", Data._.ConverterVersion)
+                .Add(new MsgPack("_").Add("ConverterVersion", Data._.ConverterVersion)
                                      .Add("FileName"        , Data._.FileName        )
                                      .Add("PropertyVersion" , Data._.PropertyVersion ));
 
@@ -2234,10 +2236,10 @@ namespace KKdMainLib
                     cameraRoot[i] = MsgPack.New
                         .Add("Interest", ref Data.CameraRoot[i].Interest)
                         .Add(new MsgPack("ViewPoint")
-                        .Add("Aspect"         , Data.CameraRoot[i].VP.Aspect         )
-                        .Add("CameraApertureH", Data.CameraRoot[i].VP.CameraApertureH)
-                        .Add("CameraApertureW", Data.CameraRoot[i].VP.CameraApertureW)
-                        .Add("FOVHorizontal"  , Data.CameraRoot[i].VP.FOVHorizontal  )
+                        .Add("Aspect"         ,     Data.CameraRoot[i].VP.Aspect         )
+                        .Add("CameraApertureH",     Data.CameraRoot[i].VP.CameraApertureH)
+                        .Add("CameraApertureW",     Data.CameraRoot[i].VP.CameraApertureW)
+                        .Add("FOVHorizontal"  ,     Data.CameraRoot[i].VP.FOVHorizontal  )
                         .Add("FocalLength"    , ref Data.CameraRoot[i].VP.FocalLength    )
                         .Add("FOV"            , ref Data.CameraRoot[i].VP.FOV            )
                         .Add("Roll"           , ref Data.CameraRoot[i].VP.Roll           )
@@ -2274,14 +2276,14 @@ namespace KKdMainLib
                 MsgPack @event = new MsgPack(Data.Event.Length, "Events");
                 for (i = 0; i < Data.Event.Length; i++)
                     @event[i] = MsgPack.New.Add("Begin"       , Data.Event[i].Begin       )
-                                          .Add("ClipBegin"   , Data.Event[i].ClipBegin   )
-                                          .Add("ClipEnd"     , Data.Event[i].ClipEnd     )
-                                          .Add("End"         , Data.Event[i].End         )
-                                          .Add("Name"        , Data.Event[i].Name        )
-                                          .Add("Param1"      , Data.Event[i].Param1      )
-                                          .Add("Ref"         , Data.Event[i].Ref         )
-                                          .Add("TimeRefScale", Data.Event[i].TimeRefScale)
-                                          .Add("Type"        , Data.Event[i].Type        );
+                                           .Add("ClipBegin"   , Data.Event[i].ClipBegin   )
+                                           .Add("ClipEnd"     , Data.Event[i].ClipEnd     )
+                                           .Add("End"         , Data.Event[i].End         )
+                                           .Add("Name"        , Data.Event[i].Name        )
+                                           .Add("Param1"      , Data.Event[i].Param1      )
+                                           .Add("Ref"         , Data.Event[i].Ref         )
+                                           .Add("TimeRefScale", Data.Event[i].TimeRefScale)
+                                           .Add("Type"        , Data.Event[i].Type        );
                 a3d.Add(@event);
             }
 
@@ -2499,11 +2501,8 @@ namespace KKdMainLib
         public void Dispose()
         {
             i = i0 = i1 = soi0 = soi1 = 0;
-            so0 = null;
-            so1 = null;
-            name = null;
-            nameView = null;
-            value = null;
+            so0 = so1 = null;
+            name = nameView = value = null;
             dataArray = null;
             usedValues = null;
             dict = null;
diff --git a/KKdMainLib/Aet.cs b/KKdMainLib/Aet.cs
index e29354c..7f30cca 100644
--- a/KKdMainLib/Aet.cs
+++ b/KKdMainLib/Aet.cs
@@ -1,4 +1,4 @@
-//Original: AetSet.bt Version: 4.3 by samyuu
+//Original: AetSet.bt Version: 5.0 by samyuu
 
 using KKdBaseLib;
 using KKdBaseLib.Auth2D;
@@ -24,27 +24,27 @@ namespace KKdMainLib
             while (true) { Pos = _IO.RI32(); if (Pos != 0 && Pos < _IO.L) i++; else break; }
 
             _IO.P = 0;
-            AET.Data = new Pointer<Data>[i];
-            for (i = 0; i < AET.Data.Length; i++) AET.Data[i] = _IO.RP<Data>();
-            for (i = 0; i < AET.Data.Length; i++) AETReader(ref AET.Data[i]);
+            AET.Scenes = new Pointer<Scene>[i];
+            for (i = 0; i < AET.Scenes.Length; i++) AET.Scenes[i] = _IO.RP<Scene>();
+            for (i = 0; i < AET.Scenes.Length; i++) AETReader(ref AET.Scenes[i]);
 
             _IO.C();
         }
 
         public void AETWriter(string file)
         {
-            if (AET.Data == null || AET.Data.Length == 0) return;
+            if (AET.Scenes == null || AET.Scenes.Length == 0) return;
             _IO = File.OpenWriter();
 
-            for (int i = 0; i < AET.Data.Length; i++)
+            for (int i = 0; i < AET.Scenes.Length; i++)
             {
                 _IO.P = _IO.L + 0x20;
-                AETWriter(ref AET.Data[i]);
+                AETWriter(ref AET.Scenes[i]);
             }
 
             _IO.P = 0;
-            for (int i = 0; i < AET.Data.Length; i++)
-                if (AET.Data[i].O > 0) _IO.W(AET.Data[i].O);
+            for (int i = 0; i < AET.Scenes.Length; i++)
+                if (AET.Scenes[i].O > 0) _IO.W(AET.Scenes[i].O);
             byte[] data = _IO.ToArray();
             _IO.Dispose();
 
@@ -53,10 +53,10 @@ namespace KKdMainLib
             data = null;
         }
 
-        private void AETReader(ref Pointer<Data> aetData)
+        private void AETReader(ref Pointer<Scene> aetData)
         {
             _IO.P = aetData.O;
-            ref Data aet = ref aetData.V;
+            ref Scene aet = ref aetData.V;
 
             aet.Name = _IO.RPS();
             aet.StartFrame = _IO.RF32();
@@ -67,8 +67,8 @@ namespace KKdMainLib
             aet.Height     = _IO.RU32();
             aet.Camera       = _IO.RP<Vector2<CountPointer<KFT2>>>();
             aet.Compositions = _IO.ReadCountPointer<Composition>();
-            aet.Surfaces     = _IO.ReadCountPointer<Surface    >();
-            aet.SoundEffects = _IO.ReadCountPointer<AetSoundEffect>();
+            aet.Videos       = _IO.ReadCountPointer<Video      >();
+            aet.Audios       = _IO.ReadCountPointer<Audio      >();
 
             if (aet.Camera.O > 0)
             {
@@ -79,14 +79,14 @@ namespace KKdMainLib
                 RKF(ref aet.Camera.V.Y);
             }
 
-            if (aet.SoundEffects.O > 0)
+            if (aet.Audios.O > 0)
             {
-                _IO.P = aet.SoundEffects.O;
-                for (i = 0; i < aet.SoundEffects.C; i++)
+                _IO.P = aet.Audios.O;
+                for (i = 0; i < aet.Audios.C; i++)
                 {
-                    ref AetSoundEffect aif = ref aet.SoundEffects.E[i];
+                    ref Audio aif = ref aet.Audios.E[i];
                     aif.O = _IO.P;
-                    aif.Unk = _IO.RU32();
+                    aif.SoundID = _IO.RU32();
                 }
             }
 
@@ -99,16 +99,16 @@ namespace KKdMainLib
             for (i = 0; i < aet.Compositions.C - 1; i++)
                 RAL(ref aet.Compositions.E[i]);
 
-            _IO.P = aet.Surfaces.O;
-            for (i = 0; i < aet.Surfaces.C; i++)
-                aet.Surfaces[i] = new Surface { O = _IO.P, Color = _IO.RU32(), Width = _IO.RU16(),
-                    Height = _IO.RU16(), Frames = _IO.RF32(), Sprites = _IO.ReadCountPointer<SpriteIdentifier>() };
+            _IO.P = aet.Videos.O;
+            for (i = 0; i < aet.Videos.C; i++)
+                aet.Videos[i] = new Video { O = _IO.P, Color = _IO.RU32(), Width = _IO.RU16(),
+                    Height = _IO.RU16(), Frames = _IO.RF32(), Sources = _IO.ReadCountPointer<Video.Source>() };
 
-            for (i = 0; i < aet.Surfaces.C; i++)
+            for (i = 0; i < aet.Videos.C; i++)
             {
-                _IO.P = aet.Surfaces[i].Sprites.O;
-                for (i0 = 0; i0 < aet.Surfaces[i].Sprites.C; i0++)
-                    aet.Surfaces.E[i].Sprites[i0] = new SpriteIdentifier { Name = _IO.RPS(), ID = _IO.RU32() };
+                _IO.P = aet.Videos[i].Sources.O;
+                for (i0 = 0; i0 < aet.Videos[i].Sources.C; i0++)
+                    aet.Videos.E[i].Sources[i0] = new Video.Source { Name = _IO.RPS(), ID = _IO.RU32() };
             }
 
             for (i = 0; i < aet.Compositions.C; i++)
@@ -117,15 +117,15 @@ namespace KKdMainLib
                 {
                     ref Layer obj = ref aet.Compositions[i].E[i0];
                     obj.DataID = -1;
-                    int dataOffset = obj.DataOffset;
+                    int dataOffset = obj.VideoItemOffset;
                     if (dataOffset > 0)
-                        if (obj.Type == Layer.AetLayerType.Pic)
-                            for (i1 = 0; i1 < aet.Surfaces.C; i1++)
-                            { if (aet.    Surfaces[i1].O == dataOffset) { obj.DataID = i1; break; } }
-                        else if (obj.Type == Layer.AetLayerType.Aif)
-                            for (i1 = 0; i1 < aet.SoundEffects.C; i1++)
-                            { if (aet.SoundEffects[i1].O == dataOffset) { obj.DataID = i1; break; } }
-                        else if (obj.Type == Layer.AetLayerType.Eff)
+                             if (obj.Type == Layer.AetLayerType.Video      )
+                            for (i1 = 0; i1 < aet.Videos      .C; i1++)
+                            { if (aet.Videos      [i1].O == dataOffset) { obj.DataID = i1; break; } }
+                        else if (obj.Type == Layer.AetLayerType.Audio      )
+                            for (i1 = 0; i1 < aet.Audios      .C; i1++)
+                            { if (aet.Audios      [i1].O == dataOffset) { obj.DataID = i1; break; } }
+                        else if (obj.Type == Layer.AetLayerType.Composition)
                             for (i1 = 0; i1 < aet.Compositions.C; i1++)
                             { if (aet.Compositions[i1].P == dataOffset) { obj.DataID = i1; break; } }
 
@@ -143,30 +143,30 @@ namespace KKdMainLib
             }
         }
 
-        private void AETWriter(ref Pointer<Data> aetData)
+        private void AETWriter(ref Pointer<Scene> aetData)
         {
-            ref Data aet = ref aetData.V;
+            ref Scene aet = ref aetData.V;
 
-            for (i = 0; i < aet.Surfaces.C; i++)
+            for (i = 0; i < aet.Videos.C; i++)
             {
-                ref Surface region = ref aet.Surfaces.E[i];
-                if (region.Sprites.C == 0) { region.Sprites.O = 0; continue; }
-                if (region.Sprites.C > 1) _IO.A(0x20);
-                region.Sprites.O = _IO.P;
-                for (i0 = 0; i0 < region.Sprites.C; i0++) _IO.W(0L);
+                ref Video region = ref aet.Videos.E[i];
+                if (region.Sources.C == 0) { region.Sources.O = 0; continue; }
+                if (region.Sources.C > 1) _IO.A(0x20);
+                region.Sources.O = _IO.P;
+                for (i0 = 0; i0 < region.Sources.C; i0++) _IO.W(0L);
             }
 
             _IO.A(0x20);
-            aet.Surfaces.O = _IO.P;
-            for (i = 0; i < aet.Surfaces.C; i++)
+            aet.Videos.O = _IO.P;
+            for (i = 0; i < aet.Videos.C; i++)
             {
-                ref Surface region = ref aet.Surfaces.E[i];
+                ref Video region = ref aet.Videos.E[i];
                 region.O = _IO.P;
-                _IO.W(region.Color);
-                _IO.W(region.Width);
-                _IO.W(region.Height);
-                _IO.W(region.Frames);
-                _IO.W(region.Sprites);
+                _IO.W(region.Color  );
+                _IO.W(region.Width  );
+                _IO.W(region.Height );
+                _IO.W(region.Frames );
+                _IO.W(region.Sources);
             }
 
             _IO.A(0x20);
@@ -184,69 +184,69 @@ namespace KKdMainLib
                 for (i0 = 0; i0 < aet.Compositions.E[i].C; i0++)
                 {
                     ref Layer obj = ref aet.Compositions.E[i].E[i0];
-                    ref AnimationData data = ref obj.Data.V;
-                    ref AnimationData.Perspective persp = ref data.Persp.V;
-                    ref AudioData extraData = ref obj.ExtraData.V;
-                    if (obj.Marker.C > 0)
+                    ref VideoData data = ref obj.Video.V;
+                    ref VideoData.Video3DData persp = ref data.Video3D.V;
+                    ref AudioData extraData = ref obj.Audio.V;
+                    if (obj.Markers.C > 0)
                     {
-                        if (obj.Marker.C > 3) _IO.A(0x20);
-                        obj.Marker.O = _IO.P;
-                        for (i1 = 0; i1 < obj.Marker.C; i1++)
+                        if (obj.Markers.C > 3) _IO.A(0x20);
+                        obj.Markers.O = _IO.P;
+                        for (i1 = 0; i1 < obj.Markers.C; i1++)
                             _IO.W(0L);
                     }
 
-                    if (obj.Data.V.Persp.O > 0)
+                    if (obj.Video.V.Video3D.O > 0)
                     {
-                        W(ref persp.Unk1      );
-                        W(ref persp.Unk2      );
-                        W(ref persp.RotReturnX);
-                        W(ref persp.RotReturnY);
-                        W(ref persp.RotReturnZ);
+                        W(ref persp.   AnchorZ);
+                        W(ref persp. PositionZ);
+                        W(ref persp.DirectionX);
+                        W(ref persp.DirectionY);
+                        W(ref persp.DirectionZ);
                         W(ref persp. RotationX);
                         W(ref persp. RotationY);
                         W(ref persp.    ScaleZ);
                     }
 
-                    if (obj.Data.O > 0)
+                    if (obj.Video.O > 0)
                     {
-                         W(ref data.  OriginX);
-                         W(ref data.  OriginY);
+                         W(ref data.  AnchorX);
+                         W(ref data.  AnchorY);
                          W(ref data.PositionX);
                          W(ref data.PositionY);
                          W(ref data.Rotation );
                          W(ref data.   ScaleX);
                          W(ref data.   ScaleY);
-                         W(ref data.Opacity  );
+                         W(ref data. Opacity );
                     }
 
-                    if (obj.Data.V.Persp.O > 0)
+                    if (obj.Video.V.Video3D.O > 0)
                     {
                         _IO.A(0x20);
-                        data.Persp.O = _IO.P;
+                        data.Video3D.O = _IO.P;
                         _IO.W(0L); _IO.W(0L); _IO.W(0L); _IO.W(0L);
                         _IO.W(0L); _IO.W(0L); _IO.W(0L); _IO.W(0L);
                     }
 
-                    if (obj.ExtraData.O > 0)
+                    if (obj.Audio.O > 0)
                     {
-                        W(ref extraData.Data0);
-                        W(ref extraData.Data1);
-                        W(ref extraData.Data2);
-                        W(ref extraData.Data3);
+                        W(ref extraData.VolumeL);
+                        W(ref extraData.VolumeR);
+                        W(ref extraData.   PanL);
+                        W(ref extraData.   PanR);
                     }
 
-                    if (obj.Data.O > 0)
+                    if (obj.Video.O > 0)
                     {
                         _IO.A(0x20);
-                        obj.Data.O = _IO.P;
+                        obj.Video.O = _IO.P;
                         _IO.W(0L); _IO.W(0L); _IO.W(0L); _IO.W(0L);
                         _IO.W(0L); _IO.W(0L); _IO.W(0L); _IO.W(0L); _IO.W(0L);
                     }
 
-                    if (obj.ExtraData.O > 0)
+                    if (obj.Audio.O > 0)
                     {
                         _IO.A(0x20);
-                        obj.ExtraData.O = _IO.P;
+                        obj.Audio.O = _IO.P;
                         _IO.W(0L); _IO.W(0L); _IO.W(0L); _IO.W(0L);
                     }
                 }
@@ -287,11 +287,11 @@ namespace KKdMainLib
                 System.Collections.Generic.Dictionary<string, int> usedValues =
                     new System.Collections.Generic.Dictionary<string, int>();
 
-                for (i = 0; i < aet.Surfaces.C; i++)
+                for (i = 0; i < aet.Videos.C; i++)
                 {
-                    ref Surface region = ref aet.Surfaces.E[i];
-                    for (i0 = 0; i0 < region.Sprites.C; i0++)
-                        WPS(ref usedValues, ref region.Sprites.E[i0].Name);
+                    ref Video region = ref aet.Videos.E[i];
+                    for (i0 = 0; i0 < region.Sources.C; i0++)
+                        WPS(ref usedValues, ref region.Sources.E[i0].Name);
                 }
 
                 //_IO.Align(0x4);
@@ -300,8 +300,8 @@ namespace KKdMainLib
                     for (i0 = 0; i0 < aet.Compositions.E[i].C; i0++)
                     {
                         ref Layer obj = ref aet.Compositions.E[i].E[i0];
-                        for (i1 = 0; i1 < obj.Marker.C; i1++)
-                            WPS(ref usedValues, ref obj.Marker.E[i1].Name);
+                        for (i1 = 0; i1 < obj.Markers.C; i1++)
+                            WPS(ref usedValues, ref obj.Markers.E[i1].Name);
                     }
 
                     for (i0 = 0; i0 < aet.Compositions.E[i].C; i0++)
@@ -314,15 +314,15 @@ namespace KKdMainLib
                 _IO.SL(_IO.P);
             }
 
-            aet.SoundEffects.O = 0;
-            if (aet.SoundEffects.C > 0)
+            aet.Audios.O = 0;
+            if (aet.Audios.C > 0)
             {
                 _IO.A(0x10);
-                aet.SoundEffects.O = _IO.P;
-                for (i = 0; i < aet.SoundEffects.C; i++)
+                aet.Audios.O = _IO.P;
+                for (i = 0; i < aet.Audios.C; i++)
                 {
-                    aet.SoundEffects.E[i].O = _IO.P;
-                    _IO.W(aet.SoundEffects[i].Unk);
+                    aet.Audios.E[i].O = _IO.P;
+                    _IO.W(aet.Audios[i].SoundID);
                 }
             }
 
@@ -330,11 +330,11 @@ namespace KKdMainLib
                 for (i0 = 0; i0 < aet.Compositions.E[i].C; i0++)
                 {
                     ref Layer obj = ref aet.Compositions.E[i].E[i0];
-                         if (obj.Type == Layer.AetLayerType.Pic) obj.DataOffset = aet.Surfaces    [obj.DataID].O;
-                    else if (obj.Type == Layer.AetLayerType.Aif) obj.DataOffset = aet.SoundEffects[obj.DataID].O;
-                    else if (obj.Type == Layer.AetLayerType.Eff) obj.DataOffset = aet.Compositions[obj.DataID].O;
-                    else obj.DataOffset = 0;
-                    if (obj.DataOffset == 0)
+                         if (obj.Type == Layer.AetLayerType.Video      ) obj.VideoItemOffset = aet.Videos      [obj.DataID].O;
+                    else if (obj.Type == Layer.AetLayerType.Audio      ) obj.VideoItemOffset = aet.Audios      [obj.DataID].O;
+                    else if (obj.Type == Layer.AetLayerType.Composition) obj.VideoItemOffset = aet.Compositions[obj.DataID].O;
+                    else obj.VideoItemOffset = 0;
+                    if (obj.VideoItemOffset == 0)
                     {
 
                     }
@@ -353,49 +353,49 @@ namespace KKdMainLib
                 for (i0 = 0; i0 < aet.Compositions.E[i].C; i0++)
                 {
                     ref Layer obj = ref aet.Compositions.E[i].E[i0];
-                    ref AnimationData data = ref obj.Data.V;
-                    ref AnimationData.Perspective persp = ref data.Persp.V;
-                    ref AudioData extraData = ref obj.ExtraData.V;
+                    ref VideoData data = ref obj.Video.V;
+                    ref VideoData.Video3DData persp = ref data.Video3D.V;
+                    ref AudioData extraData = ref obj.Audio.V;
 
-                    if (obj.Data.V.Persp.O > 0)
+                    if (obj.Video.V.Video3D.O > 0)
                     {
-                        _IO.P = data.Persp.O;
-                        W(ref _IO, ref persp.Unk1      );
-                        W(ref _IO, ref persp.Unk2      );
-                        W(ref _IO, ref persp.RotReturnX);
-                        W(ref _IO, ref persp.RotReturnY);
-                        W(ref _IO, ref persp.RotReturnZ);
+                        _IO.P = data.Video3D.O;
+                        W(ref _IO, ref persp.   AnchorZ);
+                        W(ref _IO, ref persp. PositionZ);
+                        W(ref _IO, ref persp.DirectionX);
+                        W(ref _IO, ref persp.DirectionY);
+                        W(ref _IO, ref persp.DirectionZ);
                         W(ref _IO, ref persp. RotationX);
                         W(ref _IO, ref persp. RotationY);
                         W(ref _IO, ref persp.    ScaleZ);
                     }
 
-                    if (obj.Data.O > 0)
+                    if (obj.Video.O > 0)
                     {
-                        _IO.P = obj.Data.O;
-                        _IO.W((byte) data.Mode);
-                        _IO.W((byte)0);
-                        _IO.W((byte)(data.UseTextureMask ? 1 : 0));
+                        _IO.P = obj.Video.O;
+                        _IO.W((byte)data.TransferMode.BlendMode );
+                        _IO.W((byte)data.TransferMode.Flags     );
+                        _IO.W((byte)data.TransferMode.TrackMatte);
                         _IO.W((byte)0);
 
-                        W(ref _IO, ref data.  OriginX);
-                        W(ref _IO, ref data.  OriginY);
+                        W(ref _IO, ref data.  AnchorX);
+                        W(ref _IO, ref data.  AnchorY);
                         W(ref _IO, ref data.PositionX);
                         W(ref _IO, ref data.PositionY);
                         W(ref _IO, ref data.Rotation );
                         W(ref _IO, ref data.   ScaleX);
                         W(ref _IO, ref data.   ScaleY);
-                        W(ref _IO, ref data.Opacity  );
-                        _IO.W(data.Persp.O);
+                        W(ref _IO, ref data. Opacity );
+                        _IO.W(data.Video3D.O);
                     }
 
-                    if (obj.ExtraData.O > 0)
+                    if (obj.Audio.O > 0)
                     {
-                        _IO.P = obj.ExtraData.O;
-                        W(ref _IO, ref extraData.Data0);
-                        W(ref _IO, ref extraData.Data1);
-                        W(ref _IO, ref extraData.Data2);
-                        W(ref _IO, ref extraData.Data3);
+                        _IO.P = obj.Audio.O;
+                        W(ref _IO, ref extraData.VolumeL);
+                        W(ref _IO, ref extraData.VolumeR);
+                        W(ref _IO, ref extraData.   PanL);
+                        W(ref _IO, ref extraData.   PanR);
                     }
 
                     void W(ref Stream _IO, ref CountPointer<KFT2> keys)
@@ -423,12 +423,12 @@ namespace KKdMainLib
                     _IO.W(obj.Name.O);
                     _IO.W(obj.StartFrame);
                     _IO.W(obj.EndFrame);
-                    _IO.W(obj.StartOffset);
-                    _IO.W(obj.PlaybackSpeed);
-                    _IO.W((ushort)obj.Flags);
-                    _IO.W(obj.Pad);
-                    _IO.W((byte)obj.Type);
-                    _IO.W(obj.DataOffset);
+                    _IO.W(obj.OffsetFrame);
+                    _IO.W(obj.TimeScale);
+                    _IO.W((ushort)obj.Flags  );
+                    _IO.W((  byte)obj.Quality);
+                    _IO.W((  byte)obj.Type   );
+                    _IO.W(obj.VideoItemOffset);
 
                     if (obj.ParentLayer > -1)
                     {
@@ -440,11 +440,11 @@ namespace KKdMainLib
                         if (!Found) _IO.W(0);
                     }
                     else _IO.W(0);
-                    _IO.W(obj.Marker);
-                    _IO.W(obj.Data.O);
-                    _IO.W(obj.ExtraData.O);
+                    _IO.W(obj.Markers);
+                    _IO.W(obj.Video.O);
+                    _IO.W(obj.Audio.O);
 
-                    ref CountPointer<Marker> Marker = ref obj.Marker;
+                    ref CountPointer<Marker> Marker = ref obj.Markers;
                     _IO.P = Marker.O;
                     for (i1 = 0; i1 < Marker.C; i1++)
                     {
@@ -455,15 +455,15 @@ namespace KKdMainLib
 
             _IO.F();
 
-            for (i = 0; i < aet.Surfaces.C; i++)
+            for (i = 0; i < aet.Videos.C; i++)
             {
-                ref Surface region = ref aet.Surfaces.E[i];
-                if (region.Sprites.C == 0) continue;
-                _IO.P = region.Sprites.O;
-                for (i0 = 0; i0 < region.Sprites.C; i0++)
+                ref Video region = ref aet.Videos.E[i];
+                if (region.Sources.C == 0) continue;
+                _IO.P = region.Sources.O;
+                for (i0 = 0; i0 < region.Sources.C; i0++)
                 {
-                    _IO.W(region.Sprites[i0].Name.O);
-                    _IO.W(region.Sprites[i0].ID);
+                    _IO.W(region.Sources[i0].Name.O);
+                    _IO.W(region.Sources[i0].ID);
                 }
             }
 
@@ -487,9 +487,9 @@ namespace KKdMainLib
             _IO.W(aet.Width);
             _IO.W(aet.Height);
             _IO.W(aet.Camera.O);
-            _IO.W(aet. Compositions);
-            _IO.W(aet.Surfaces);
-            _IO.W(aet. SoundEffects);
+            _IO.W(aet.Compositions);
+            _IO.W(aet.Videos);
+            _IO.W(aet.Audios);
             _IO.W(0L);
         }
 
@@ -503,86 +503,86 @@ namespace KKdMainLib
                 obj.Name = _IO.RPS();
                 obj.StartFrame    = _IO.RF32();
                 obj.  EndFrame    = _IO.RF32();
-                obj.StartOffset   = _IO.RF32();
-                obj.PlaybackSpeed = _IO.RF32();
-                obj.Flags = (Layer.AetLayerFlags)_IO.RU16();
-                obj.Pad   = _IO.RU8();
-                obj.Type  = (Layer.AetLayerType)_IO.RU8();
-                obj.DataOffset  = _IO.RI32();
+                obj.OffsetFrame   = _IO.RF32();
+                obj.TimeScale = _IO.RF32();
+                obj.Flags   = (Layer.AetLayerFlags  )_IO.RU16();
+                obj.Quality = (Layer.AetLayerQuality)_IO.RU8 ();
+                obj.Type    = (Layer.AetLayerType   )_IO.RU8 ();
+                obj.VideoItemOffset  = _IO.RI32();
                 obj.ParentLayer = _IO.RI32();
-                obj.Marker = _IO.ReadCountPointer<Marker>();
-                obj.Data = _IO.RP<AnimationData>();
-                obj.ExtraData = _IO.RP<AudioData>();
+                obj.Markers = _IO.ReadCountPointer<Marker>();
+                obj.Video = _IO.RP<VideoData>();
+                obj.Audio = _IO.RP<AudioData>();
 
-                if (obj.Data.O > 0)
+                if (obj.Video.O > 0)
                 {
-                    ref AnimationData data = ref obj.Data.V;
-                    _IO.P = obj.Data.O;
-                    data.Mode = (AnimationData.BlendMode)_IO.RU8();
-                    _IO.RU8();
-                    data.UseTextureMask = _IO.RBo();
-                    _IO.RU8();
-                    data.  OriginX = _IO.ReadCountPointer<KFT2>();
-                    data.  OriginY = _IO.ReadCountPointer<KFT2>();
+                    ref VideoData data = ref obj.Video.V;
+                    _IO.P = obj.Video.O;
+                    data.TransferMode.BlendMode  = (VideoData.VideoTransferMode.TransferBlendMode )_IO.RU8();
+                    data.TransferMode.Flags      = (VideoData.VideoTransferMode.TransferFlags     )_IO.RU8();
+                    data.TransferMode.TrackMatte = (VideoData.VideoTransferMode.TransferTrackMatte)_IO.RU8();
+                    data.Padding = _IO.RU8();
+                    data.  AnchorX = _IO.ReadCountPointer<KFT2>();
+                    data.  AnchorY = _IO.ReadCountPointer<KFT2>();
                     data.PositionX = _IO.ReadCountPointer<KFT2>();
                     data.PositionY = _IO.ReadCountPointer<KFT2>();
                     data.Rotation  = _IO.ReadCountPointer<KFT2>();
                     data.   ScaleX = _IO.ReadCountPointer<KFT2>();
                     data.   ScaleY = _IO.ReadCountPointer<KFT2>();
                     data.Opacity   = _IO.ReadCountPointer<KFT2>();
-                    data.Persp = _IO.RP<AnimationData.Perspective>();
+                    data.Video3D = _IO.RP<VideoData.Video3DData>();
 
-                    RKF(ref data.  OriginX);
-                    RKF(ref data.  OriginY);
+                    RKF(ref data.  AnchorX);
+                    RKF(ref data.  AnchorY);
                     RKF(ref data.PositionX);
                     RKF(ref data.PositionY);
                     RKF(ref data.Rotation );
                     RKF(ref data.   ScaleX);
                     RKF(ref data.   ScaleY);
-                    RKF(ref data.Opacity  );
+                    RKF(ref data. Opacity );
 
-                    if (data.Persp.O > 0)
+                    if (data.Video3D.O > 0)
                     {
-                        ref AnimationData.Perspective Persp = ref data.Persp.V;
-                        _IO.P = data.Persp.O;
-                        Persp.Unk1       = _IO.ReadCountPointer<KFT2>();
-                        Persp.Unk2       = _IO.ReadCountPointer<KFT2>();
-                        Persp.RotReturnX = _IO.ReadCountPointer<KFT2>();
-                        Persp.RotReturnY = _IO.ReadCountPointer<KFT2>();
-                        Persp.RotReturnZ = _IO.ReadCountPointer<KFT2>();
+                        ref VideoData.Video3DData Persp = ref data.Video3D.V;
+                        _IO.P = data.Video3D.O;
+                        Persp.AnchorZ       = _IO.ReadCountPointer<KFT2>();
+                        Persp.PositionZ       = _IO.ReadCountPointer<KFT2>();
+                        Persp.DirectionX = _IO.ReadCountPointer<KFT2>();
+                        Persp.DirectionY = _IO.ReadCountPointer<KFT2>();
+                        Persp.DirectionZ = _IO.ReadCountPointer<KFT2>();
                         Persp. RotationX = _IO.ReadCountPointer<KFT2>();
                         Persp. RotationY = _IO.ReadCountPointer<KFT2>();
                         Persp.    ScaleZ = _IO.ReadCountPointer<KFT2>();
 
-                        RKF(ref Persp.Unk1      );
-                        RKF(ref Persp.Unk2      );
-                        RKF(ref Persp.RotReturnX);
-                        RKF(ref Persp.RotReturnY);
-                        RKF(ref Persp.RotReturnZ);
+                        RKF(ref Persp.   AnchorZ);
+                        RKF(ref Persp. PositionZ);
+                        RKF(ref Persp.DirectionX);
+                        RKF(ref Persp.DirectionY);
+                        RKF(ref Persp.DirectionZ);
                         RKF(ref Persp. RotationX);
                         RKF(ref Persp. RotationY);
                         RKF(ref Persp.    ScaleZ);
                     }
                 }
 
-                if (obj.ExtraData.O > 0)
+                if (obj.Audio.O > 0)
                 {
-                    ref AudioData extraData = ref obj.ExtraData.V;
-                    _IO.P = obj.ExtraData.O;
-                    extraData.Data0 = _IO.ReadCountPointer<KFT2>();
-                    extraData.Data1 = _IO.ReadCountPointer<KFT2>();
-                    extraData.Data2 = _IO.ReadCountPointer<KFT2>();
-                    extraData.Data3 = _IO.ReadCountPointer<KFT2>();
+                    ref AudioData extraData = ref obj.Audio.V;
+                    _IO.P = obj.Audio.O;
+                    extraData.VolumeL = _IO.ReadCountPointer<KFT2>();
+                    extraData.VolumeR = _IO.ReadCountPointer<KFT2>();
+                    extraData.   PanL = _IO.ReadCountPointer<KFT2>();
+                    extraData.   PanR = _IO.ReadCountPointer<KFT2>();
 
-                    RKF(ref extraData.Data0);
-                    RKF(ref extraData.Data1);
-                    RKF(ref extraData.Data2);
-                    RKF(ref extraData.Data3);
+                    RKF(ref extraData.VolumeL);
+                    RKF(ref extraData.VolumeR);
+                    RKF(ref extraData.   PanL);
+                    RKF(ref extraData.   PanR);
                 }
 
-                _IO.P = obj.Marker.O;
-                for (i2 = 0; i2 < obj.Marker.C; i2++)
-                    obj.Marker[i2] = new Marker() { Frame = _IO.RF32(), Name = _IO.RPSSJIS() };
+                _IO.P = obj.Markers.O;
+                for (i2 = 0; i2 < obj.Markers.C; i2++)
+                    obj.Markers[i2] = new Marker() { Frame = _IO.RF32(), Name = _IO.RPSSJIS() };
             }
         }
 
@@ -631,9 +631,9 @@ namespace KKdMainLib
             if ((aet = msgPack["Aet", true]).NotNull)
                 if (aet.Array != null && aet.Array.Length > 0)
                 {
-                    AET.Data = new Pointer<Data>[aet.Array.Length];
-                    for (int i = 0; i < AET.Data.Length; i++)
-                        MsgPackReader(aet.Array[i], ref AET.Data[i]);
+                    AET.Scenes = new Pointer<Scene>[aet.Array.Length];
+                    for (int i = 0; i < AET.Scenes.Length; i++)
+                        MsgPackReader(aet.Array[i], ref AET.Scenes[i]);
                 }
             aet.Dispose();
             msgPack.Dispose();
@@ -641,19 +641,19 @@ namespace KKdMainLib
 
         public void MsgPackWriter(string file, bool json)
         {
-            if (AET.Data == null || AET.Data.Length == 0) return;
+            if (AET.Scenes == null || AET.Scenes.Length == 0) return;
 
-            MsgPack aet = new MsgPack(AET.Data.Length, "Aet");
-            for (int i = 0; i < AET.Data.Length; i++)
-                aet[i] = MsgPackWriter(ref AET.Data[i]);
+            MsgPack aet = new MsgPack(AET.Scenes.Length, "Aet");
+            for (int i = 0; i < AET.Scenes.Length; i++)
+                aet[i] = MsgPackWriter(ref AET.Scenes[i]);
             aet.WriteAfterAll(true, file, json);
         }
 
-        public void MsgPackReader(MsgPack msgPack, ref Pointer<Data> aetData)
+        public void MsgPackReader(MsgPack msgPack, ref Pointer<Scene> aetData)
         {
             int i, i0;
             aetData = default;
-            ref Data aet = ref aetData.V;
+            ref Scene aet = ref aetData.V;
 
             aet.Name.V     = msgPack.RS  ("Name"      );
             aet.StartFrame = msgPack.RF32("StartFrame");
@@ -673,17 +673,17 @@ namespace KKdMainLib
 
             if ((temp = msgPack["SoundEffect", true]).NotNull)
             {
-                aet.SoundEffects.C = temp.Array.Length;
-                for (i = 0; i < aet.SoundEffects.C; i++)
-                    aet.SoundEffects.E[i] = new AetSoundEffect { Unk = temp[i].RU32("Unk") };
+                aet.Audios.C = temp.Array.Length;
+                for (i = 0; i < aet.Audios.C; i++)
+                    aet.Audios.E[i] = new Audio { SoundID = temp[i].RU32("Unk") };
             }
 
             if ((temp = msgPack["Surface", true]).NotNull)
             {
-                aet.Surfaces.C = temp.Array.Length;
-                for (i = 0; i < aet.Surfaces.C; i++)
+                aet.Videos.C = temp.Array.Length;
+                for (i = 0; i < aet.Videos.C; i++)
                 {
-                    ref Surface region = ref aet.Surfaces.E[i];
+                    ref Video region = ref aet.Videos.E[i];
                     region = default;
                     region.Color  = temp[i].RU32("Color" );
                     region.Width  = temp[i].RU16("Width" );
@@ -693,9 +693,9 @@ namespace KKdMainLib
                     MsgPack sprite;
                     if ((sprite = temp[i]["Sprite", true]).NotNull)
                     {
-                        region.Sprites.C = sprite.Array.Length;
-                        for (i0 = 0; i0 < region.Sprites.C; i0++)
-                            region.Sprites[i0] = new SpriteIdentifier() { Name = new Pointer<string>()
+                        region.Sources.C = sprite.Array.Length;
+                        for (i0 = 0; i0 < region.Sources.C; i0++)
+                            region.Sources[i0] = new Video.Source() { Name = new Pointer<string>()
                                 { V = sprite[i0].RS("Name") }, ID = sprite[i0].RU32("ID") };
                     }
                     sprite.Dispose();
@@ -731,11 +731,11 @@ namespace KKdMainLib
             temp.Dispose();
         }
 
-        public MsgPack MsgPackWriter(ref Pointer<Data> aetData)
+        public MsgPack MsgPackWriter(ref Pointer<Scene> aetData)
         {
             int i, i0;
             if (aetData.O <= 0) return MsgPack.Null;
-            ref Data aet = ref aetData.V;
+            ref Scene aet = ref aetData.V;
 
             MsgPack msgPack = MsgPack.New.Add("Name", aet.Name.V).Add("StartFrame", aet.StartFrame)
                 .Add("EndFrame", aet.EndFrame).Add("FrameRate", aet.FrameRate)
@@ -755,47 +755,47 @@ namespace KKdMainLib
 
             if (aet.Compositions[i].C > 1)
             {
-                MsgPack layers = new MsgPack(aet.Compositions.C - 1, "Composition");
+                MsgPack compositions = new MsgPack(aet.Compositions.C - 1, "Composition");
                 for (i = 0; i < aet.Compositions.C - 1; i++)
                 {
-                    ref Composition layer = ref aet.Compositions.E[i];
-                    MsgPack Object = MsgPack.New.Add("ID", i);
-                    if (layer.C > 0)
+                    ref Composition composition = ref aet.Compositions.E[i];
+                    MsgPack compos = MsgPack.New.Add("ID", i);
+                    if (composition.C > 0)
                     {
-                        MsgPack objects = new MsgPack(layer.C, "Object");
-                        for (i0 = 0; i0 < layer.C; i0++)
-                            objects[i0] = WMP(ref layer.E[i0]);
-                        Object.Add(objects);
+                        MsgPack objects = new MsgPack(composition.C, "Layer");
+                        for (i0 = 0; i0 < composition.C; i0++)
+                            objects[i0] = WMP(ref composition.E[i0]);
+                        compos.Add(objects);
                     }
-                    layers[i] = Object;
+                    compositions[i] = compos;
                 }
-                msgPack.Add(layers);
+                msgPack.Add(compositions);
             }
 
-            MsgPack regions = new MsgPack(aet.Surfaces.C, "Surface");
-            for (i = 0; i < aet.Surfaces.C; i++)
+            MsgPack videos = new MsgPack(aet.Videos.C, "Video");
+            for (i = 0; i < aet.Videos.C; i++)
             {
-                ref Surface region = ref aet.Surfaces.E[i];
-                MsgPack entry = MsgPack.New.Add("ID", i).Add("Width", region.Width)
-                    .Add("Height", region.Height).Add("Color", region.Color);
+                ref Video video = ref aet.Videos.E[i];
+                MsgPack entry = MsgPack.New.Add("ID", i).Add("Width", video.Width)
+                    .Add("Height", video.Height).Add("Color", video.Color);
 
-                if (region.Sprites.C > 0)
+                if (video.Sources.C > 0)
                 {
-                    entry.Add("Frames", region.Frames);
-                    MsgPack sprite = new MsgPack(region.Sprites.C, "Sprite");
-                    for (i0 = 0; i0 < region.Sprites.C; i0++)
-                        sprite[i0] = MsgPack.New.Add("Name", region.Sprites[i0]
-                            .Name.V).Add("ID", region.Sprites[i0].ID);
-                    entry.Add(sprite);
+                    entry.Add("Frames", video.Frames);
+                    MsgPack source = new MsgPack(video.Sources.C, "Source");
+                    for (i0 = 0; i0 < video.Sources.C; i0++)
+                        source[i0] = MsgPack.New.Add("Name", video.Sources[i0]
+                            .Name.V).Add("ID", video.Sources[i0].ID);
+                    entry.Add(source);
                 }
-                regions[i] = entry;
+                videos[i] = entry;
             }
-            msgPack.Add(regions);
+            msgPack.Add(videos);
 
-            MsgPack sounds = new MsgPack(aet.SoundEffects.C, "SoundEffect");
-            for (i = 0; i < aet.SoundEffects.C; i++)
-                sounds[i] = MsgPack.New.Add("ID", i).Add("Unk", aet.SoundEffects[i].Unk);
-            msgPack.Add(sounds);
+            MsgPack audios = new MsgPack(aet.Audios.C, "Audios");
+            for (i = 0; i < aet.Audios.C; i++)
+                audios[i] = MsgPack.New.Add("ID", i).Add("SoundID", aet.Audios[i].SoundID);
+            msgPack.Add(audios);
 
             return msgPack;
         }
@@ -804,70 +804,71 @@ namespace KKdMainLib
         {
             uint i;
             layer = default;
-            layer.ID            = msg.RI32("ID"           );
-            layer.Name.V        = msg.RS  ("Name"         );
-            layer.StartFrame    = msg.RF32("StartFrame"   );
-            layer.  EndFrame    = msg.RF32(  "EndFrame"   );
-            layer.StartOffset   = msg.RF32("StartOffset"  );
-            layer.PlaybackSpeed = msg.RF32("PlaybackSpeed");
+            layer.ID     = msg.RI32("ID"  );
+            layer.Name.V = msg.RS  ("Name");
+            layer. StartFrame = msg.RF32( "StartFrame");
+            layer.   EndFrame = msg.RF32(   "EndFrame");
+            layer.OffsetFrame = msg.RF32("OffsetFrame");
+            layer.  TimeScale = msg.RF32(  "TimeScale");
             layer.Flags = (Layer.AetLayerFlags)msg.RU16("Flags");
-            layer.Pad = msg.RU8("Pad");
-            System.Enum.TryParse(msg.RS("Type"), out layer.Type);
+            System.Enum.TryParse(msg.RS("Quality"), out layer.Quality);
+            System.Enum.TryParse(msg.RS("Type"   ), out layer.Type   );
             layer.DataID      = msg.RnI32("DataID"     ) ?? -1;
             layer.ParentLayer = msg.RnI32("ParentLayer") ?? -1;
 
             MsgPack temp;
             if ((temp = msg["Markers", true]).NotNull)
             {
-                layer.Marker.C = temp.Array.Length;
-                for (i = 0; i < layer.Marker.C; i++)
+                layer.Markers.C = temp.Array.Length;
+                for (i = 0; i < layer.Markers.C; i++)
                 {
-                    layer.Marker.E[i].Frame   = temp[i].RF32("Frame");
-                    layer.Marker.E[i]. Name.V = temp[i].RS  ( "Name");
+                    layer.Markers.E[i].Frame   = temp[i].RF32("Frame");
+                    layer.Markers.E[i]. Name.V = temp[i].RS  ( "Name");
                 }
             }
 
-            if ((temp = msg["AnimationData"]).NotNull)
+            if ((temp = msg["VideoData"]).NotNull)
             {
-                layer.Data.O = 1;
-                ref AnimationData data = ref layer.Data.V;
-                System.Enum.TryParse(temp.RS("BlendMode"), out data.Mode);
-                data.UseTextureMask = temp.RB("UseTextureMask");
+                layer.Video.O = 1;
+                ref VideoData video = ref layer.Video.V;
+                System.Enum.TryParse(temp.RS("BlendMode"), out video.TransferMode.BlendMode);
+                video.TransferMode.Flags = (VideoData.VideoTransferMode.TransferFlags)temp.RU8("Flags");
+                System.Enum.TryParse(temp.RS("TrackMatte"), out video.TransferMode.TrackMatte);
 
-                data.  OriginX = RKF(temp,   "OriginX");
-                data.  OriginY = RKF(temp,   "OriginY");
-                data.PositionX = RKF(temp, "PositionX");
-                data.PositionY = RKF(temp, "PositionY");
-                data.Rotation  = RKF(temp, "Rotation" );
-                data.   ScaleX = RKF(temp,    "ScaleX");
-                data.   ScaleY = RKF(temp,    "ScaleY");
-                data.Opacity   = RKF(temp, "Opacity"  );
+                video.  AnchorX = RKF(temp,   "AnchorX");
+                video.  AnchorY = RKF(temp,   "AnchorY");
+                video.PositionX = RKF(temp, "PositionX");
+                video.PositionY = RKF(temp, "PositionY");
+                video.Rotation  = RKF(temp, "Rotation" );
+                video.   ScaleX = RKF(temp,    "ScaleX");
+                video.   ScaleY = RKF(temp,    "ScaleY");
+                video. Opacity  = RKF(temp,  "Opacity" );
 
-                MsgPack persp;
-                if ((persp = temp["Persp"]).NotNull)
+                MsgPack video3D;
+                if ((video3D = temp["Video3DData"]).NotNull)
                 {
-                    data.Persp.O = 1;
-                    ref AnimationData.Perspective dataPersp = ref data.Persp.V;
-                    dataPersp.Unk1       = RKF(persp, "Unk1"      );
-                    dataPersp.Unk2       = RKF(persp, "Unk2"      );
-                    dataPersp.RotReturnX = RKF(persp, "RotReturnX");
-                    dataPersp.RotReturnY = RKF(persp, "RotReturnY");
-                    dataPersp.RotReturnZ = RKF(persp, "RotReturnZ");
-                    dataPersp. RotationX = RKF(persp,  "RotationX");
-                    dataPersp. RotationY = RKF(persp,  "RotationY");
-                    dataPersp.    ScaleZ = RKF(persp,     "ScaleZ");
+                    video.Video3D.O = 1;
+                    ref VideoData.Video3DData video3DData = ref video.Video3D.V;
+                    video3DData.   AnchorZ = RKF(video3D,    "AnchorZ");
+                    video3DData. PositionZ = RKF(video3D,  "PositionZ");
+                    video3DData.DirectionX = RKF(video3D, "DirectionX");
+                    video3DData.DirectionY = RKF(video3D, "DirectionY");
+                    video3DData.DirectionZ = RKF(video3D, "DirectionZ");
+                    video3DData. RotationX = RKF(video3D,  "RotationX");
+                    video3DData. RotationY = RKF(video3D,  "RotationY");
+                    video3DData.    ScaleZ = RKF(video3D,     "ScaleZ");
                 }
-                persp.Dispose();
+                video3D.Dispose();
             }
 
-            if ((temp = msg["AudioData"]).NotNull)
+            if ((temp = msg["Audio"]).NotNull)
             {
-                layer.ExtraData.O = 1;
-                ref AudioData data = ref layer.ExtraData.V;
-                data.Data0 = RKF(temp, "Data0");
-                data.Data1 = RKF(temp, "Data1");
-                data.Data2 = RKF(temp, "Data2");
-                data.Data3 = RKF(temp, "Data3");
+                layer.Audio.O = 1;
+                ref AudioData data = ref layer.Audio.V;
+                data.VolumeL = RKF(temp, "VolumeL");
+                data.VolumeR = RKF(temp, "VolumeR");
+                data.   PanL = RKF(temp,    "PanL");
+                data.   PanR = RKF(temp,    "PanR");
             }
             temp.Dispose();
             return layer;
@@ -901,64 +902,67 @@ namespace KKdMainLib
         private MsgPack WMP(ref Layer layer, string name = null)
         {
             int i;
-            MsgPack @object = new MsgPack(name).Add("ID", layer.ID).Add("Name", layer.Name.V)
+            MsgPack layerData = new MsgPack(name).Add("ID", layer.ID).Add("Name", layer.Name.V)
                 .Add("StartFrame", layer.StartFrame).Add("EndFrame", layer.EndFrame)
-                .Add("StartOffset", layer.StartOffset).Add("PlaybackSpeed", layer.PlaybackSpeed)
-                .Add("Flags", (ushort)layer.Flags).Add("Pad", layer.Pad).Add("Type", layer.Type.ToString());
+                .Add("OffsetFrame", layer.OffsetFrame).Add("TimeScale", layer.TimeScale)
+                .Add("Flags", (ushort)layer.Flags).Add("Quality", layer.Quality.ToString())
+                .Add("Type", layer.Type.ToString());
 
-            if (layer.DataID      > -1) @object.Add("DataID"     , layer.DataID     );
-            if (layer.ParentLayer > -1) @object.Add("ParentLayer", layer.ParentLayer);
+            if (layer.DataID      > -1) layerData.Add("DataID"     , layer.DataID     );
+            if (layer.ParentLayer > -1) layerData.Add("ParentLayer", layer.ParentLayer);
 
-            if (layer.Marker.C > 0)
+            if (layer.Markers.C > 0)
             {
-                MsgPack markers = new MsgPack(layer.Marker.C, "Markers");
-                for (i = 0; i < layer.Marker.C; i++)
-                    markers[i] = MsgPack.New.Add("Frame", layer.Marker[i].Frame  )
-                                            .Add( "Name", layer.Marker[i]. Name.V);
-                @object.Add(markers);
+                MsgPack markers = new MsgPack(layer.Markers.C, "Markers");
+                for (i = 0; i < layer.Markers.C; i++)
+                    markers[i] = MsgPack.New.Add("Frame", layer.Markers[i].Frame  )
+                                            .Add( "Name", layer.Markers[i]. Name.V);
+                layerData.Add(markers);
             }
 
-            if (layer.Data.O > 0)
+            if (layer.Video.O > 0)
             {
-                ref AnimationData data = ref layer.Data.V;
-                MsgPack animationData = new MsgPack("AnimationData").Add("BlendMode",
-                    data.Mode.ToString()).Add("UseTextureMask", data.UseTextureMask);
+                ref VideoData video = ref layer.Video.V;
+                MsgPack VideoData = new MsgPack("VideoData")
+                    .Add("BlendMode" , video.TransferMode.BlendMode .ToString())
+                    .Add("Flags"     , (byte)video.TransferMode.Flags)
+                    .Add("TrackMatte", video.TransferMode.TrackMatte.ToString());
 
-                animationData.Add(WMP(ref data.OriginX  ,   "OriginX"));
-                animationData.Add(WMP(ref data.OriginY  ,   "OriginY"));
-                animationData.Add(WMP(ref data.PositionX, "PositionX"));
-                animationData.Add(WMP(ref data.PositionY, "PositionY"));
-                animationData.Add(WMP(ref data.Rotation , "Rotation" ));
-                animationData.Add(WMP(ref data.   ScaleX,    "ScaleX"));
-                animationData.Add(WMP(ref data.   ScaleY,    "ScaleY"));
-                animationData.Add(WMP(ref data.Opacity  , "Opacity"  ));
-                if (data.Persp.O > 0)
+                VideoData.Add(WMP(ref video.AnchorX  ,   "OriginX"));
+                VideoData.Add(WMP(ref video.AnchorY  ,   "OriginY"));
+                VideoData.Add(WMP(ref video.PositionX, "PositionX"));
+                VideoData.Add(WMP(ref video.PositionY, "PositionY"));
+                VideoData.Add(WMP(ref video.Rotation , "Rotation" ));
+                VideoData.Add(WMP(ref video.   ScaleX,    "ScaleX"));
+                VideoData.Add(WMP(ref video.   ScaleY,    "ScaleY"));
+                VideoData.Add(WMP(ref video. Opacity ,  "Opacity" ));
+                if (video.Video3D.O > 0)
                 {
-                    ref AnimationData.Perspective dataPersp = ref data.Persp.V;
-                    MsgPack persp = new MsgPack("Persp");
-                    persp.Add(WMP(ref dataPersp.Unk1      , "Unk1"      ));
-                    persp.Add(WMP(ref dataPersp.Unk2      , "Unk2"      ));
-                    persp.Add(WMP(ref dataPersp.RotReturnX, "RotReturnX"));
-                    persp.Add(WMP(ref dataPersp.RotReturnY, "RotReturnY"));
-                    persp.Add(WMP(ref dataPersp.RotReturnZ, "RotReturnZ"));
-                    persp.Add(WMP(ref dataPersp. RotationX,  "RotationX"));
-                    persp.Add(WMP(ref dataPersp. RotationY,  "RotationY"));
-                    persp.Add(WMP(ref dataPersp.    ScaleZ,     "ScaleZ"));
-                    animationData.Add(persp);
+                    ref VideoData.Video3DData video3D = ref video.Video3D.V;
+                    MsgPack video3DData = new MsgPack("Persp");
+                    video3DData.Add(WMP(ref video3D.   AnchorZ,    "AnchorZ"));
+                    video3DData.Add(WMP(ref video3D. PositionZ,  "PositionZ"));
+                    video3DData.Add(WMP(ref video3D.DirectionX, "DirectionX"));
+                    video3DData.Add(WMP(ref video3D.DirectionY, "DirectionY"));
+                    video3DData.Add(WMP(ref video3D.DirectionZ, "DirectionZ"));
+                    video3DData.Add(WMP(ref video3D. RotationX,  "RotationX"));
+                    video3DData.Add(WMP(ref video3D. RotationY,  "RotationY"));
+                    video3DData.Add(WMP(ref video3D.    ScaleZ,     "ScaleZ"));
+                    VideoData.Add(video3DData);
                 }
-                @object.Add(animationData);
+                layerData.Add(VideoData);
             }
-            if (layer.ExtraData.O > 0)
+            if (layer.Audio.O > 0)
             {
-                ref AudioData data = ref layer.ExtraData.V;
-                MsgPack extraData = new MsgPack("AudioData");
-                extraData.Add(WMP(ref data.Data0, "Data0"));
-                extraData.Add(WMP(ref data.Data1, "Data1"));
-                extraData.Add(WMP(ref data.Data2, "Data2"));
-                extraData.Add(WMP(ref data.Data3, "Data3"));
-                @object.Add(extraData);
+                ref AudioData data = ref layer.Audio.V;
+                MsgPack audioData = new MsgPack("AudioData");
+                audioData.Add(WMP(ref data.VolumeL, "VolumeL"));
+                audioData.Add(WMP(ref data.VolumeR, "VolumeR"));
+                audioData.Add(WMP(ref data.   PanL,    "PanL"));
+                audioData.Add(WMP(ref data.   PanR,    "PanR"));
+                layerData.Add(audioData);
             }
-            return @object;
+            return layerData;
         }
 
         private MsgPack WMP(ref CountPointer<KFT2> kfe, string name)
diff --git a/KKdMainLib/DB/Auth.cs b/KKdMainLib/DB/Auth.cs
index 58fbd72..460c395 100644
--- a/KKdMainLib/DB/Auth.cs
+++ b/KKdMainLib/DB/Auth.cs
@@ -28,26 +28,26 @@ namespace KKdMainLib.DB
 
             string[] strData = _IO.RS(_IO.L - _IO.P).Replace("\r\n", "\n").Replace("\r", "\n").Split('\n');
             for (i = 0; i < strData.Length; i++)
-                dict.GetDictionary(strData[i]);
+                dict.GD(strData[i]);
             strData = null;
 
-            if (dict.FindValue(out string value, "category.length"))
+            if (dict.FV(out string value, "category.length"))
             {
                 Category = new string[int.Parse(value)];
                 for (i = 0; i < Category.Length; i++)
-                    if (dict.FindValue(out value, "category." + i + ".value"))
+                    if (dict.FV(out value, $"category.{i}.value"))
                         Category[i] = value;
             }
 
-            if (dict.FindValue(out value, "uid.length"))
+            if (dict.FV(out value, "uid.length"))
             {
                 UIDs = new UID[int.Parse(value)];
                 for (i = 0; i < UIDs.Length; i++)
                 {
-                    dict.FindValue(out UIDs[i].Category, "uid." + i + ".category");
-                    dict.FindValue(out UIDs[i].OrgUid  , "uid." + i + ".org_uid" );
-                    dict.FindValue(out UIDs[i].Size    , "uid." + i + ".size"    );
-                    dict.FindValue(out UIDs[i].Value   , "uid." + i + ".value"   );
+                    dict.FV(out UIDs[i].Category, $"uid.{i}.category");
+                    dict.FV(out UIDs[i].OrgUid  , $"uid.{i}.org_uid" );
+                    dict.FV(out UIDs[i].Size    , $"uid.{i}.size"    );
+                    dict.FV(out UIDs[i].Value   , $"uid.{i}.value"   );
                 }
             }
 
@@ -66,7 +66,7 @@ namespace KKdMainLib.DB
 
             if (Category != null)
             {
-                int[] so = Category.Length.SortWriter();
+                int[] so = Category.Length.SW();
                 for (i = 0; i < Category.Length; i++)
                     _IO.W($"category.{so[i]}.value={ Category[so[i]]}\n");
                 _IO.W($"category.length={Category.Length}\n");
@@ -74,7 +74,7 @@ namespace KKdMainLib.DB
 
             if (UIDs != null)
             {
-                int[] so = UIDs.Length.SortWriter();
+                int[] so = UIDs.Length.SW();
                 for (i = 0; i < UIDs.Length; i++)
                 {
                     if (UIDs[so[i]].Category != null && UIDs[so[i]].Category != "")
diff --git a/KKdMainLib/DEX.cs b/KKdMainLib/DEX.cs
index 8670843..b0a6928 100644
--- a/KKdMainLib/DEX.cs
+++ b/KKdMainLib/DEX.cs
@@ -205,7 +205,7 @@ namespace KKdMainLib
             MsgPack dex = new MsgPack(Dex.Length, "Dex");
             for (i0 = 0; i0 < Dex.Length; i0++)
             {
-                MsgPack exp = MsgPack.New.Add("Name", this.Dex[i0].Name);
+                MsgPack exp = MsgPack.New.Add("Name", Dex[i0].Name);
                 MsgPack main = new MsgPack(Dex[i0].Main.Count, "Main");
                 for (i1 = 0; i1 < Dex[i0].Main.Count; i1++)
                     main[i1] = Dex[i0].Main[i1].Write();
diff --git a/KKdMainLib/DataBank.cs b/KKdMainLib/DataBank.cs
index 0ec9b64..5240efb 100644
--- a/KKdMainLib/DataBank.cs
+++ b/KKdMainLib/DataBank.cs
@@ -58,9 +58,11 @@ namespace KKdMainLib
             else if (file.Contains("PvList"))
             {
                 if (pvList != null && pvList.Length > 0)
-                    for (i = 0; i < pvList.Length; i++)
-                        _IO.W(UrlEncode(pvList[i].ToString() +
-                            (i < pvList.Length ? c : "")));
+                {
+                    for (i = 0; i < pvList.Length - 1; i++)
+                        _IO.W(UrlEncode(pvList[i].ToString() + c));
+                    _IO.W(UrlEncode(pvList[i].ToString()));
+                }
                 else _IO.W("%2A%2A%2A");
             }
 
@@ -175,7 +177,7 @@ namespace KKdMainLib
                      .Add(p2.WriteMP("P2")).Add(p3.WriteMP("P3"));
 
             public override string ToString() =>
-                UrlEncode(p1.ToString() + c + p2.ToString() + c + p3.ToString() + c + PV_ID);
+                UrlEncode($"{p1.ToString()},{p2.ToString()},{p3.ToString()},{PV_ID}");
         }
 
         public struct Player
@@ -240,8 +242,8 @@ namespace KKdMainLib
         public struct PvList
         {
             public int PV_ID;
-            public bool Enable;
-            public bool Extra;
+            public int Version;
+            public int Edition;
             public Date AdvDemoStart;
             public Date AdvDemoEnd;
             public Date StartShow;
@@ -249,9 +251,9 @@ namespace KKdMainLib
 
             public void SetValue(string[] data, int i = 0)
             {
-                PV_ID  = int.Parse(data[i * 7]);
-                Enable = int.Parse(data[i * 7 + 1]) == 1;
-                Extra  = int.Parse(data[i * 7 + 2]) == 1;
+                PV_ID   = int.Parse(data[i * 7]);
+                Version = int.Parse(data[i * 7 + 1]);
+                Edition = int.Parse(data[i * 7 + 2]);
                 AdvDemoStart.SV(data[i * 7 + 3]);
                 AdvDemoEnd  .SV(data[i * 7 + 4]);
                 StartShow   .SV(data[i * 7 + 5]);
@@ -260,16 +262,15 @@ namespace KKdMainLib
 
             public void SetValue(MsgPack msg, bool Compact)
             {
-                Enable =  true;
-                Extra  = false;
+                Version = 1;
+                Edition = 0;
 
                 int? id = msg.RnI32("PV_ID");
-                if (id != null) PV_ID = (int)id;
-                else { id = msg.RnI32("ID"); if (id != null) PV_ID = (int)id; }
-                bool? enable = msg.RnB("Enable");
-                bool? extra  = msg.RnB("Extra");
-                if (enable != null) Enable = (bool)enable;
-                if (extra  != null) Extra  = (bool)extra ;
+                if (id != null) PV_ID = id.Value; else { id = msg.RnI32("ID"); if (id != null) PV_ID = id.Value; }
+                bool? enable = msg.RnB("Enable"); if (enable != null) Version = enable.Value ? 1 : 0;
+                bool? extra  = msg.RnB("Extra" ); if (extra  != null) Edition = extra .Value ? 1 : 0;
+                int? version = msg.RnI32("Version"); if (version != null) Version = version.Value;
+                int? edition = msg.RnI32("Edition"); if (edition != null) Edition = edition.Value;
                 if (Compact)
                 {
                     AdvDemoStart.SV(msg.RnI32("AdvDemoStart"),  true);
@@ -289,21 +290,18 @@ namespace KKdMainLib
 
             public MsgPack WriteMP()
             {
-                MsgPack msgPack = MsgPack.New;
-                msgPack.Add("ID", PV_ID);
-                if (!Enable) msgPack.Add("Enable", Enable);
-                if ( Extra ) msgPack.Add("Extra" , Extra );
-                if (AdvDemoStart.WU) msgPack.Add("AdvDemoStart", AdvDemoStart.WI());
-                if (AdvDemoEnd  .WL) msgPack.Add("AdvDemoEnd"  , AdvDemoEnd  .WI());
-                if (StartShow   .WL) msgPack.Add("StartShow"   , StartShow   .WI());
-                if (  EndShow   .WU) msgPack.Add(  "EndShow"   ,   EndShow   .WI());
+                MsgPack msgPack = MsgPack.New.Add("ID"     , PV_ID  )
+                                             .Add("Version", Version)
+                                             .Add("Edition", Edition);
+                if (AdvDemoStart.WU) msgPack.Add("AdvDemoStart", AdvDemoStart.Int);
+                if (AdvDemoEnd  .WL) msgPack.Add("AdvDemoEnd"  , AdvDemoEnd  .Int);
+                if (StartShow   .WL) msgPack.Add("StartShow"   , StartShow   .Int);
+                if (  EndShow   .WU) msgPack.Add(  "EndShow"   ,   EndShow   .Int);
                 return msgPack;
             }
 
             public override string ToString() =>
-                UrlEncode(PV_ID + c + (Enable ? 1 : 0) + c + (Extra ? 1 : 0) + c +
-                    AdvDemoStart.ToString() + c + AdvDemoEnd.ToString() + c +
-                    StartShow.ToString() + c + EndShow.ToString());
+                UrlEncode($"{PV_ID},{Version},{Edition},{AdvDemoStart},{AdvDemoEnd},{StartShow},{EndShow}");
         }
 
         public struct Date
@@ -359,11 +357,7 @@ namespace KKdMainLib
                 CheckDate();
             }
 
-            public int WI() =>
-                (Year * 100 + Month) * 100 + Day;
-
-            public MsgPack WriteMP(string name) =>
-                new MsgPack(name).Add("Year", Year).Add("Month", Month).Add("Day", Day);
+            public int Int => (Year * 100 + Month) * 100 + Day;
 
             private void CheckDate()
             {
@@ -381,7 +375,7 @@ namespace KKdMainLib
             }
 
             public override string ToString() =>
-                Year.ToString("d4") + "-" + Month.ToString("d2") + "-" + Day.ToString("d2");
+                $"{Year.ToString("d4")}-{Month.ToString("d2")}-{Day.ToString("d2")}";
         }
 
         public enum Difficulty
diff --git a/KKdMainLib/Extensions.cs b/KKdMainLib/Extensions.cs
index fd87939..2077284 100644
--- a/KKdMainLib/Extensions.cs
+++ b/KKdMainLib/Extensions.cs
@@ -193,7 +193,7 @@ namespace KKdMainLib
         public static MsgPack Write(this MsgPack mp, string file, bool json = false)
         {
             if (json) using (JSON _IO = new JSON(File.OpenWriter(file + ".json", true))) _IO.W(mp, "\n", "  ");
-            else      using (  MP _IO = new   MP(File.OpenWriter(file + ".json", true))) _IO.W(mp);
+            else      using (  MP _IO = new   MP(File.OpenWriter(file + ".mp"  , true))) _IO.W(mp);
             return mp;
         }
 
@@ -230,4 +230,13 @@ namespace KKdMainLib
             return   kf;
         }
     }
+
+    public static class LibDeflate
+    {
+        public static void Extract()
+        {
+            if (!File.Exists("libdeflate.dll"))
+                File.WriteAllBytes("libdeflate.dll", Properties.Resources.libdeflate);
+        }
+    }
 }
diff --git a/KKdMainLib/FARC.cs b/KKdMainLib/FARC.cs
index a800175..d147688 100644
--- a/KKdMainLib/FARC.cs
+++ b/KKdMainLib/FARC.cs
@@ -11,10 +11,12 @@ namespace KKdMainLib
     public class FARC : System.IDisposable
     {
         public FARC() => NewFARC();
-        public FARC(string File, bool IsDirectory = false)
-        { if (IsDirectory) DirectoryPath = File; else FilePath = File; NewFARC(); }
+        public FARC(string file, bool isDirectory = false)
+        { if (isDirectory) DirectoryPath = file; else FilePath = file; NewFARC(); }
 
-        private void NewFARC() { Files = KKdList<FARCFile>.New; Signature = Farc.FArC; Format = Format.DT; }
+        private void NewFARC() { if (!MSIO.File.Exists("libdeflate.dll"))
+                File.WriteAllBytes("libdeflate.dll", Properties.Resources.libdeflate);
+            Files = KKdList<FARCFile>.New; Signature = Farc.FArC; Format = Format.DT; }
 
         public KKdList<FARCFile> Files = KKdList<FARCFile>.New;
         public Type FARCType;
@@ -22,6 +24,7 @@ namespace KKdMainLib
         public Format Format = Format.DT;
         public string FilePath, DirectoryPath;
         public bool HasFiles => Files.IsNull ? false : Files.Count > 0;
+        public int CompressionLevel = 12;
 
         private readonly byte[] key = Text.ToASCII("project_diva.bin");
 
@@ -33,7 +36,7 @@ namespace KKdMainLib
                 BlockSize = 128, Mode = isFT ? CipherMode.CBC : CipherMode.ECB,
                 Padding = PaddingMode.Zeros, IV = iv ?? new byte[16] };
 
-        public void UnPack(bool saveToDisk = true)
+        public void Unpack(bool saveToDisk = true)
         { if (HeaderReader()) { FileReader(); if (saveToDisk) SaveToDisk(); } }
 
         public bool HeaderReader()
@@ -153,51 +156,35 @@ namespace KKdMainLib
             }
 
             int FileSize = (FARCType & Type.ECB) != 0 || (file.Type & Type.ECB) != 0 ?
-                file.SizeComp.A(0x10) : file.SizeComp;
-            using (MSIO.FileStream stream = new MSIO.FileStream(FilePath, MSIO.FileMode.Open,
-                MSIO.FileAccess.ReadWrite, MSIO.FileShare.ReadWrite))
+                file.SizeComp.A(0x10) : ((FARCType & Type.GZip) != 0 || (file.Type & Type.GZip) != 0 ? file.SizeComp : file.SizeUnc);
+            using (Stream stream = File.OpenReader(FilePath))
             {
-                stream.Seek(file.Offset, 0);
-                file.Data = new byte[FileSize];
-
-                bool encrypted = false;
-                if ((FARCType & Type.ECB) != 0)
-                {
-                    if (Format == Format.FT && (file.Type & Type.ECB) != 0)
-                    {
-                        using (AesManaged aes = GetAes(true, null))
-                        using (CryptoStream cryptoStream = new CryptoStream(stream,
-                            aes.CreateDecryptor(), CryptoStreamMode.Read))
-                            cryptoStream.Read(file.Data, 0, FileSize);
-                        file.Data = SkipData(file.Data, 0x10);
-                    }
-                    else
-                        using (AesManaged aes = GetAes(false, null))
-                        using (CryptoStream cryptoStream = new CryptoStream(stream,
-                            aes.CreateDecryptor(), CryptoStreamMode.Read))
-                            cryptoStream.Read(file.Data, 0, FileSize);
-                    encrypted = true;
-                }
-
-                bool compressed = false;
-                if (((Format == Format.FT && (file.Type & Type.GZip) != 0) ||
-                    (FARCType & Type.GZip) != 0) && file.SizeUnc > 0)
-                {
-                    GZipStream gZipStream = new GZipStream(encrypted ? new MSIO.MemoryStream(file.Data) :
-                        (MSIO.Stream)stream, CompressionMode.Decompress);
-                    byte[] Temp = new byte[file.SizeUnc];
-                    gZipStream.Read(Temp, 0, file.SizeUnc);
-                    file.Data = Temp;
-                    gZipStream.Dispose();
-                    compressed = true;
-                }
-
-                if (!encrypted && !compressed)
-                {
-                    file.Data = new byte[file.SizeUnc];
-                    stream.Read(file.Data, 0, file.SizeUnc);
-                }
+                stream.S(file.Offset, 0);
+                file.Data = stream.RBy(FileSize);
             }
+
+
+            if ((FARCType & Type.ECB) != 0)
+            {
+                if (Format == Format.FT && (file.Type & Type.ECB) != 0)
+                {
+                    using (AesManaged aes = GetAes(true, null))
+                    using (CryptoStream cryptoStream = new CryptoStream(new MSIO.MemoryStream(file.Data),
+                        aes.CreateDecryptor(), CryptoStreamMode.Read))
+                        cryptoStream.Read(file.Data, 0, FileSize);
+                    file.Data = SkipData(file.Data, 0x10);
+                }
+                else
+                    using (AesManaged aes = GetAes(false, null))
+                    using (CryptoStream cryptoStream = new CryptoStream(new MSIO.MemoryStream(file.Data),
+                        aes.CreateDecryptor(), CryptoStreamMode.Read))
+                        cryptoStream.Read(file.Data, 0, FileSize);
+            }
+            
+            if (((Format == Format.FT && (file.Type & Type.GZip) != 0) ||
+                (FARCType & Type.GZip) != 0) && file.SizeUnc > 0)
+                file.Data = file.Data.InflateGZip(file.SizeUnc);
+
             Files[i] = file;
             return file.Data;
         }
@@ -301,11 +288,7 @@ namespace KKdMainLib
             if (Signature == Farc.FArC || (Signature == Farc.FARC && (FARCType & Type.GZip) != 0))
             {
                 file.Type |= Type.GZip;
-                MSIO.MemoryStream stream = new MSIO.MemoryStream();
-                using (GZipStream gZipStream = new GZipStream(stream, CompressionMode.Compress))
-                    gZipStream.Write(file.Data, 0, file.Data.Length);
-                data = stream.ToArray();
-                stream.Dispose();
+                data = file.Data.DeflateGZip(CompressionLevel);
                 file.SizeComp = data.Length;
             }
 
diff --git a/KKdMainLib/IO/DeflateInflate.cs b/KKdMainLib/IO/DeflateInflate.cs
new file mode 100644
index 0000000..e6123a5
--- /dev/null
+++ b/KKdMainLib/IO/DeflateInflate.cs
@@ -0,0 +1,161 @@
+using System.Runtime.InteropServices;
+
+namespace KKdMainLib.IO
+{
+    public static unsafe class DeflateInflate
+    {
+        private const string libDeflateString = "libdeflate.dll";
+
+        public static byte[] Deflate(this byte[] data, long compressionLevel)
+        {
+            void* c = libdeflate_alloc_compressor((int)compressionLevel);
+            int maxOutBytes = libdeflate_deflate_compress_bound(c, data.Length);
+            byte[] outData = new byte[maxOutBytes];
+            int actualOut = 0;
+            fixed (byte*  inPtr =    data)
+            fixed (byte* outPtr = outData)
+                actualOut = libdeflate_deflate_compress(c, inPtr, data.Length, outPtr, maxOutBytes);
+            libdeflate_free_compressor(c);
+            System.Array.Resize(ref outData, (int)actualOut);
+            return outData;
+        }
+
+        public static byte[] Inflate(this byte[] data, long length)
+        {
+            byte[] outData = new byte[length];
+
+            int actualOut = 0;
+            void* d = libdeflate_alloc_decompressor();
+            fixed (byte*  inPtr =    data)
+            fixed (byte* outPtr = outData)
+                libdeflate_deflate_decompress(d, inPtr, data.Length, outPtr, (int)length, (byte*)&actualOut);
+            libdeflate_free_decompressor(d);
+
+            if (actualOut == 0 || actualOut > length)
+                throw new System.Exception("DeflateInflate Error: specified input length" +
+                    " is less than it should be for current Deflate data");
+            else if (actualOut < length)
+                System.Array.Resize(ref outData, (int)actualOut);
+            return outData;
+        }
+
+        public static byte[] DeflateGZip(this byte[] data, long compressionLevel)
+        {
+            void* c = libdeflate_alloc_compressor((int)compressionLevel);
+            int maxOutBytes = libdeflate_deflate_compress_bound(c, data.Length);
+            byte[] outData = new byte[maxOutBytes];
+            int actualOut = 0;
+            fixed (byte*  inPtr =    data)
+            fixed (byte* outPtr = outData)
+                actualOut = libdeflate_gzip_compress(c, inPtr, data.Length, outPtr, maxOutBytes);
+            libdeflate_free_compressor(c);
+            System.Array.Resize(ref outData, (int)actualOut);
+            return outData;
+        }
+
+        public static byte[] InflateGZip(this byte[] data, long length)
+        {
+            byte[] outData = new byte[length];
+
+            int actualOut = 0;
+            void* d = libdeflate_alloc_decompressor();
+            fixed (byte*  inPtr =    data)
+            fixed (byte* outPtr = outData)
+                libdeflate_gzip_decompress(d, inPtr, data.Length, outPtr, (int)length, (byte*)&actualOut);
+            libdeflate_free_decompressor(d);
+
+            if (actualOut == 0 || actualOut > length)
+                throw new System.Exception("DeflateInflate Error: specified input length" +
+                    " is less than it should be for current Deflate data");
+            else if (actualOut < length)
+                System.Array.Resize(ref outData, (int)actualOut);
+            return outData;
+        }
+
+        public static byte[] DeflateZLib(this byte[] data, long compressionLevel)
+        {
+            void* c = libdeflate_alloc_compressor((int)compressionLevel);
+            int maxOutBytes = libdeflate_deflate_compress_bound(c, data.Length);
+            byte[] outData = new byte[maxOutBytes];
+            int actualOut = 0;
+            fixed (byte*  inPtr =    data)
+            fixed (byte* outPtr = outData)
+                actualOut = libdeflate_zlib_compress(c, inPtr, data.Length, outPtr, maxOutBytes);
+            libdeflate_free_compressor(c);
+            System.Array.Resize(ref outData, (int)actualOut);
+            return outData;
+        }
+
+        public static byte[] InflateZLib(this byte[] data, long length)
+        {
+            byte[] outData = new byte[length];
+
+            int actualOut = 0;
+            void* d = libdeflate_alloc_decompressor();
+            fixed (byte*  inPtr =    data)
+            fixed (byte* outPtr = outData)
+                libdeflate_zlib_decompress(d, inPtr, data.Length, outPtr, (int)length, (byte*)&actualOut);
+            libdeflate_free_decompressor(d);
+
+            if (actualOut == 0 || actualOut > length)
+                throw new System.Exception("DeflateInflate Error: specified input length" +
+                    " is less than it should be for current Deflate data");
+            else if (actualOut < length)
+                System.Array.Resize(ref outData, (int)actualOut);
+            return outData;
+        }
+
+        [DllImport(libDeflateString)]
+        private static extern void* libdeflate_alloc_compressor(int compressionLevel);
+
+        [DllImport(libDeflateString)]
+        private static extern void* libdeflate_alloc_decompressor();
+
+        [DllImport(libDeflateString)]
+        private static extern int libdeflate_deflate_compress_bound(void* c, int length);
+
+        [DllImport(libDeflateString)]
+        private static extern int libdeflate_deflate_compress(void* c, byte* inData, int inBytes,
+            byte* outData, int maxOutBytes);
+
+        [DllImport(libDeflateString)]
+        private static extern void libdeflate_deflate_decompress(void* d, byte* inData, int inBytes,
+            byte* outData, int outBytesAvail, byte* actualOutBytes);
+
+        [DllImport(libDeflateString)]
+        private static extern void libdeflate_deflate_decompress_ex(void* d, byte* inData, int inBytes,
+            byte* outData, int outBytesAvail, byte* actualInBytes, byte* actualOutBytes);
+
+        [DllImport(libDeflateString)]
+        private static extern int libdeflate_gzip_compress_bound(void* c, int length);
+
+        [DllImport(libDeflateString)]
+        private static extern int libdeflate_gzip_compress(void* c, byte* inData, int inBytes,
+            byte* outData, int maxOutBytes);
+
+        [DllImport(libDeflateString)]
+        private static extern void libdeflate_gzip_decompress(void* d, byte* inData, int inBytes,
+            byte* outData, int outBytesAvail, byte* actualOutBytes);
+
+        [DllImport(libDeflateString)]
+        private static extern void libdeflate_gzip_decompress_ex(void* d, byte* inData, int inBytes,
+            byte* outData, int outBytesAvail, byte* actualInBytes, byte* actualOutBytes);
+
+        [DllImport(libDeflateString)]
+        private static extern int libdeflate_zlib_compress_bound(void* c, int length);
+
+        [DllImport(libDeflateString)]
+        private static extern int libdeflate_zlib_compress(void* c, byte* inData, int inBytes,
+            byte* outData, int maxOutBytes);
+
+        [DllImport(libDeflateString)]
+        private static extern void libdeflate_zlib_decompress(void* d, byte* inData, int inBytes,
+            byte* outData, int outBytesAvail, byte* actualOutBytes);
+
+        [DllImport(libDeflateString)]
+        private static extern void libdeflate_free_compressor(void* c);
+
+        [DllImport(libDeflateString)]
+        private static extern void libdeflate_free_decompressor(void* d);
+    }
+}
diff --git a/KKdMainLib/IO/MP.cs b/KKdMainLib/IO/MP.cs
index 222cad2..0f5918c 100644
--- a/KKdMainLib/IO/MP.cs
+++ b/KKdMainLib/IO/MP.cs
@@ -200,28 +200,28 @@ namespace KKdMainLib.IO
             }
         }
 
-        private void W( sbyte val) { if (val < -0x20) _IO.W(0xD0); _IO.W(val); }
-        private void W(  byte val) { if (val >= 0x80) _IO.W(0xCC); _IO.W(val); }
+        private void W( sbyte val) { if (val < -0x20) _IO.W((byte)0xD0); _IO.W(val); }
+        private void W(  byte val) { if (val >= 0x80) _IO.W((byte)0xCC); _IO.W(val); }
         private void W( short val) { if (( sbyte)val == val) W(( sbyte)val);
                                 else if ((  byte)val == val) W((  byte)val);
-                                else { _IO.W(0xD1); _IO.WE(val, true); } }
+                                else { _IO.W((byte)0xD1); _IO.WE(val, true); } }
         private void W(ushort val) { if ((  byte)val == val) W((  byte)val);
-                                else { _IO.W(0xCD); _IO.WE(val, true); } }
+                                else { _IO.W((byte)0xCD); _IO.WE(val, true); } }
         private void W(   int val) { if (( short)val == val) W(( short)val);
                                 else if ((ushort)val == val) W((ushort)val);
-                                else { _IO.W(0xD2); _IO.WE(val, true); } }
+                                else { _IO.W((byte)0xD2); _IO.WE(val, true); } }
         private void W(  uint val) { if ((ushort)val == val) W((ushort)val);
-                                else { _IO.W(0xCE); _IO.WE(val, true); } }
+                                else { _IO.W((byte)0xCE); _IO.WE(val, true); } }
         private void W(  long val) { if ((   int)val == val) W((   int)val);
                                 else if ((  uint)val == val) W((  uint)val);
-                                else { _IO.W(0xD3); _IO.WE(val, true); } }
+                                else { _IO.W((byte)0xD3); _IO.WE(val, true); } }
         private void W( ulong val) { if ((  uint)val == val) W((  uint)val);
-                                else { _IO.W(0xCF); _IO.WE(val, true); } }
+                                else { _IO.W((byte)0xCF); _IO.WE(val, true); } }
         private void W( float val) { if ((  long)val == val) W((  long)val);
-                                else { _IO.W(0xCA); _IO.WE(val, true); } }
+                                else { _IO.W((byte)0xCA); _IO.WE(val, true); } }
         private void W(double val) { if ((  long)val == val) W((  long)val);
                                 else if (( float)val == val) W(( float)val);
-                                else { _IO.W(0xCB); _IO.WE(val, true); } }
+                                else { _IO.W((byte)0xCB); _IO.WE(val, true); } }
 
         private void W(  bool val) =>
             _IO.W((byte)(val ? 0xC3 : 0xC2));
@@ -230,9 +230,9 @@ namespace KKdMainLib.IO
         {
             if (val == null) { WN(); return; }
 
-                 if (val.Length <   0x100) { _IO.W(0xC4); _IO.W ((  byte)val.Length      ); }
-            else if (val.Length < 0x10000) { _IO.W(0xC5); _IO.WE((ushort)val.Length, true); }
-            else                           { _IO.W(0xC6); _IO.WE(        val.Length, true); }
+                 if (val.Length <   0x100) { _IO.W((byte)0xC4); _IO.W ((  byte)val.Length      ); }
+            else if (val.Length < 0x10000) { _IO.W((byte)0xC5); _IO.WE((ushort)val.Length, true); }
+            else                           { _IO.W((byte)0xC6); _IO.WE(        val.Length, true); }
             _IO.W(val);
         }
 
@@ -242,28 +242,28 @@ namespace KKdMainLib.IO
 
             byte[] array = Text.ToUTF8(val);
                  if (array.Length <    0x20)   _IO.W((byte)(0xA0 | (array.Length & 0x1F)));
-            else if (array.Length <   0x100) { _IO.W(0xD9); _IO.W ((  byte)array.Length); }
-            else if (array.Length < 0x10000) { _IO.W(0xDA); _IO.WE((ushort)array.Length, true); }
-            else                             { _IO.W(0xDB); _IO.WE(        array.Length, true); }
+            else if (array.Length <   0x100) { _IO.W((byte)0xD9); _IO.W ((  byte)array.Length); }
+            else if (array.Length < 0x10000) { _IO.W((byte)0xDA); _IO.WE((ushort)array.Length, true); }
+            else                             { _IO.W((byte)0xDB); _IO.WE(        array.Length, true); }
             _IO.W(array);
         }
 
-        private void WN() => _IO.W(0xC0);
+        private void WN() => _IO.W((byte)0xC0);
 
         private void WA(int val)
         {
                  if (val ==      0) { WN(); return; }
             else if (val <    0x10)   _IO.W((byte)(0x90 | (val & 0x0F)));
-            else if (val < 0x10000) { _IO.W(0xDC); _IO.WE((ushort)val, true); }
-            else                    { _IO.W(0xDD); _IO.WE(        val, true); }
+            else if (val < 0x10000) { _IO.W((byte)0xDC); _IO.WE((ushort)val, true); }
+            else                    { _IO.W((byte)0xDD); _IO.WE(        val, true); }
         }
 
         private void WM(int val)
         {
                  if (val ==      0) { WN(); return; }
             else if (val <    0x10)   _IO.W((byte)(0x80 | (val & 0x0F)));
-            else if (val < 0x10000) { _IO.W(0xDE); _IO.WE((ushort)val, true); }
-            else                    { _IO.W(0xDF); _IO.WE(        val, true); }
+            else if (val < 0x10000) { _IO.W((byte)0xDE); _IO.WE((ushort)val, true); }
+            else                    { _IO.W((byte)0xDF); _IO.WE(        val, true); }
         }
 
         private void W(MsgPack.Ext val) => WE(val);
@@ -273,19 +273,19 @@ namespace KKdMainLib.IO
             if (val.Data == null) { WN(); return; }
 
                  if (val.Data.Length <  1 ) { WN(); return; }
-            else if (val.Data.Length == 1 ) _IO.W(0xD4);
-            else if (val.Data.Length == 2 ) _IO.W(0xD5);
-            else if (val.Data.Length == 4 ) _IO.W(0xD6);
-            else if (val.Data.Length == 8 ) _IO.W(0xD7);
-            else if (val.Data.Length == 16) _IO.W(0xD8);
+            else if (val.Data.Length == 1 ) _IO.W((byte)0xD4);
+            else if (val.Data.Length == 2 ) _IO.W((byte)0xD5);
+            else if (val.Data.Length == 4 ) _IO.W((byte)0xD6);
+            else if (val.Data.Length == 8 ) _IO.W((byte)0xD7);
+            else if (val.Data.Length == 16) _IO.W((byte)0xD8);
             else
             {
                      if (val.Data.Length <   0x100)
-                { _IO.W(0xC7); _IO.W  ((  byte)val.Data.Length); }
+                { _IO.W((byte)0xC7); _IO.W ((  byte)val.Data.Length); }
                 else if (val.Data.Length < 0x10000)
-                { _IO.W(0xC8); _IO.WE((ushort)val.Data.Length, true); }
+                { _IO.W((byte)0xC8); _IO.WE((ushort)val.Data.Length, true); }
                 else
-                { _IO.W(0xC9); _IO.WE(        val.Data.Length, true); }
+                { _IO.W((byte)0xC9); _IO.WE(        val.Data.Length, true); }
             }
             _IO.W(val.Type);
             _IO.W(val.Data);
diff --git a/KKdMainLib/IO/Stream.cs b/KKdMainLib/IO/Stream.cs
index 4ed3dfb..db59b71 100644
--- a/KKdMainLib/IO/Stream.cs
+++ b/KKdMainLib/IO/Stream.cs
@@ -7,7 +7,7 @@ namespace KKdMainLib.IO
 {
     public unsafe class Stream : IDisposable
     {
-        private int I, i, BitRead, BitWrite, TempBitRead, TempBitWrite, ValRead, ValWrite;
+        private int i, j, bitRead, bitWrite, tempBitRead, tempBitWrite, valRead, valWrite;
         private byte[] b;
         private MSIO.Stream s;
 
@@ -16,8 +16,8 @@ namespace KKdMainLib.IO
         private Format format = Format.NULL;
 
         public Format Format
-        {   get =>      format;
-            set {       format = value;
+        {   get =>       format;
+            set {        format = value;
                   IsBE = format == Format.F2BE;
                   IsX  = format == Format.X || format == Format.XHD; } }
 
@@ -34,16 +34,13 @@ namespace KKdMainLib.IO
         public uint OU32 { get => (uint)OI64; set => OI64 = value; }
         public long OI64;
 
-        public  int L    { get => ( int)s.Length -    O; set => s.SetLength(value +    O); }
+        public  int L    { get => ( int)s.Length -    O; set => s.SetLength(value + O   ); }
         public uint LU32 { get => (uint)s.Length - OU32; set => s.SetLength(value + OU32); }
         public long LI64 { get =>       s.Length - OI64; set => s.SetLength(value + OI64); }
 
-        public  int P
-        { get => ( int)s.Position -    O; set => s.Position = value +     O; }
-        public uint PU32
-        { get => (uint)s.Position - OU32; set => s.Position = value + OU32; }
-        public long PI64
-        { get =>       s.Position - OI64; set => s.Position = value + OI64; }
+        public  int P    { get => ( int)s.Position -    O; set => s.Position = value + O   ; }
+        public uint PU32 { get => (uint)s.Position - OU32; set => s.Position = value + OU32; }
+        public long PI64 { get =>       s.Position - OI64; set => s.Position = value + OI64; }
 
         public bool CanRead    => s.CanRead;
         public bool CanSeek    => s.CanSeek;
@@ -56,12 +53,12 @@ namespace KKdMainLib.IO
         {
             if (output == null) output = MSIO.Stream.Null;
             OI64 = 0;
-            BitRead = 8;
-            ValRead = ValRead = BitWrite = 0;
+            bitRead = 8;
+            valRead = valRead = bitWrite = 0;
             s = output;
             Format = Format.NULL;
             b = new byte[0x100];
-            this.IsBE = isBE;
+            IsBE = isBE;
         }
 
         public void C() => D(true);
@@ -270,24 +267,24 @@ namespace KKdMainLib.IO
         public void WENRSE(Half val           ) => WENRSE((ushort)val      );
         public void WENRSE(Half val, bool isBE) => WENRSE((ushort)val, isBE);
 
-        public char RC(bool UTF8 = true) => UTF8 ? RCUTF8() : (char)s.ReadByte();
+        public char RC(bool utf8 = true) => utf8 ? RCUTF8() : (char)s.ReadByte();
 
         public char RCUTF8()
         {
             byte t;
             int T;
             int val = 0;
-            for (I = 0, i = 4; I < i; I++)
+            for (j = 0, i = 4; j < i; j++)
             {
                 T = s.ReadByte();
                 if (T == -1) return '\uFFFF';
                 t = (byte)T;
 
-                     if ((t & 0xC0) == 0x80 && I >  0)   val = (val << 6) | (t & 0x3F);
-                else if ((t & 0x80) == 0x00 && I == 0)   return (char)t;
-                else if ((t & 0xE0) == 0xC0 && I == 0) { val = t & 0x1F; i = 2; }
-                else if ((t & 0xF0) == 0xE0 && I == 0) { val = t & 0x0F; i = 3; }
-                else if ((t & 0xF8) == 0xF0 && I == 0) { val = t & 0x07; i = 4; }
+                     if ((t & 0xC0) == 0x80 && j >  0)   val = (val << 6) | (t & 0x3F);
+                else if ((t & 0x80) == 0x00 && j == 0)   return (char)t;
+                else if ((t & 0xE0) == 0xC0 && j == 0) { val = t & 0x1F; i = 2; }
+                else if ((t & 0xF0) == 0xE0 && j == 0) { val = t & 0x0F; i = 3; }
+                else if ((t & 0xF8) == 0xF0 && j == 0) { val = t & 0x07; i = 4; }
                 else return '\uFFFF';
             }
             return (char)val;
@@ -296,68 +293,68 @@ namespace KKdMainLib.IO
         public string RS(long Length, bool UTF8 = true) =>
             UTF8 ? RSUTF8(Length) : RSASCII(Length);
 
-        public string RSUTF8 (long Length) => RBy(Length).ToUTF8 ();
-        public string RSASCII(long Length) => RBy(Length).ToASCII();
+        public string RSUTF8 (long length) => RBy(length).ToUTF8 ();
+        public string RSASCII(long length) => RBy(length).ToASCII();
 
 
-        public string RS(long? Length, bool UTF8 = true) =>
-            UTF8 ? RSUTF8(Length) : RSASCII(Length);
+        public string RS(long? length, bool utf8 = true) =>
+            utf8 ? RSUTF8(length) : RSASCII(length);
 
-        public string RSUTF8 (long? Length) => RBy(Length).ToUTF8 ();
-        public string RSASCII(long? Length) => RBy(Length).ToASCII();
+        public string RSUTF8 (long? length) => RBy(length).ToUTF8 ();
+        public string RSASCII(long? length) => RBy(length).ToASCII();
 
-        public byte[] RBy(long Length, int Offset = -1)
-        { byte[] Buf = new byte[Length]; if (Offset > -1) s.Position = Offset;
-            s.Read(Buf, 0, (int)Length); return Buf; }
+        public byte[] RBy(long length, int offset = -1)
+        { byte[] Buf = new byte[length]; if (offset > -1) s.Position = offset;
+            s.Read(Buf, 0, (int)length); return Buf; }
 
-        public void RBy(long Length, byte[] Buf, long Offset = -1)
-        { if (Offset > -1) s.Position = Offset; s.Read(Buf, 0, (int)Length); }
+        public int RBy(long length, byte[] buf, long offset = -1)
+        { if (offset > -1) s.Position = offset; return s.Read(buf, 0, (int)length); }
 
-        public byte[] RBy(long? Length, int Offset = -1)
-        { if (Length == null) return new byte[0]; else return RBy((long)Length, Offset); }
+        public byte[] RBy(long? length, int offset = -1)
+        { if (length == null) return new byte[0]; else return RBy((long)length, offset); }
 
-        public void RBy(long  Length, byte Bits, byte[] Buf, long Offset = -1)
-        { if (Offset > -1) s.Seek(Offset, 0);
-                 if (Bits > 0 && Bits < 8) for (i = 0; i < Length; i++) Buf[i] = RBi(Bits); CR(); }
+        public void RBy(long length, byte bits, byte[] buf, long offset = -1)
+        { if (offset > -1) s.Seek(offset, 0);
+                 if (bits > 0 && bits < 8) for (i = 0; i < length; i++) buf[i] = RBi(bits); CR(); }
 
-        public byte RBi(byte Bits)
+        public byte RBi(byte bits)
         {
-            BitRead += Bits;
-            TempBitRead = 8 - BitRead;
-            if (TempBitRead < 0)
+            bitRead += bits;
+            tempBitRead = 8 - bitRead;
+            if (tempBitRead < 0)
             {
-                BitRead = (byte)-TempBitRead;
-                TempBitRead = 8 + TempBitRead;
-                ValRead = (ushort)((ValRead << 8) | (byte)s.ReadByte());
+                bitRead = (byte)-tempBitRead;
+                tempBitRead = 8 + tempBitRead;
+                valRead = (ushort)((valRead << 8) | (byte)s.ReadByte());
             }
-            return (byte)((ValRead >> TempBitRead) & ((1 << Bits) - 1));
+            return (byte)((valRead >> tempBitRead) & ((1 << bits) - 1));
         }
 
         public byte RHB() => RBi(4);
 
-        public void W(int val, byte Bits)
+        public void W(int val, byte bits)
         {
-            val &= (1 << Bits) - 1;
-            BitWrite += Bits;
-            TempBitWrite = 8 - BitWrite;
-            if (TempBitWrite < 0)
+            val &= (1 << bits) - 1;
+            bitWrite += bits;
+            tempBitWrite = 8 - bitWrite;
+            if (tempBitWrite < 0)
             {
-                BitWrite = (byte)-TempBitWrite;
-                TempBitWrite = 8 + TempBitWrite;
-                s.WriteByte((byte)(ValWrite | (val >> BitWrite)));
-                ValWrite = 0;
+                bitWrite = (byte)-tempBitWrite;
+                tempBitWrite = 8 + tempBitWrite;
+                s.WriteByte((byte)(valWrite | (val >> bitWrite)));
+                valWrite = 0;
             }
-            ValWrite |= val << TempBitWrite;
-            ValWrite &= 0xFF;
+            valWrite |= val << tempBitWrite;
+            valWrite &= 0xFF;
         }
 
         public void CR() //CheckRead
-        { if (BitRead  > 0)                                ValRead  = 0; BitRead  = 8;   }
+        { if (bitRead  > 0)                                valRead  = 0; bitRead  = 8;   }
         public void CW() //CheckWrite
-        { if (BitWrite > 0) { s.WriteByte((byte)ValWrite); ValWrite = 0; BitWrite = 0; } }
+        { if (bitWrite > 0) { s.WriteByte((byte)valWrite); valWrite = 0; bitWrite = 0; } }
 
-        public byte[] ToArray(bool Close)
-        { byte[] Data = ToArray(); if (Close) Dispose(); return Data; }
+        public byte[] ToArray(bool close)
+        { byte[] Data = ToArray(); if (close) Dispose(); return Data; }
 
         public byte[] ToArray()
         {
diff --git a/KKdMainLib/KKdMainLib.csproj b/KKdMainLib/KKdMainLib.csproj
index fa90389..cd33fe0 100644
--- a/KKdMainLib/KKdMainLib.csproj
+++ b/KKdMainLib/KKdMainLib.csproj
@@ -5,13 +5,13 @@
     <Company></Company>
     <Configuration></Configuration>
     <Copyright>korenkonder © 2018-2020</Copyright>
-    <Description>A simple library for working with Project Diva AC/DT/F/AFT/F2/X/FT files</Description>
-    <FileVersion>0.4.8.2</FileVersion>
+    <Description>A simple library for working with Project Diva AC/DT/F/AFT/F2/X/FT/M39 files</Description>
+    <FileVersion>0.4.9.0</FileVersion>
     <PackageId>KKdMainLib</PackageId>
     <Product>KKdMainLib</Product>
     <TargetFramework>netstandard2.0</TargetFramework>
     <Title>KKdMainLib</Title>
-    <Version>0.4.8.2</Version>
+    <Version>0.4.9.0</Version>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
     <PlatformTarget>AnyCPU</PlatformTarget>
diff --git a/KKdMainLib/Main.cs b/KKdMainLib/Main.cs
index f4b7236..2230932 100644
--- a/KKdMainLib/Main.cs
+++ b/KKdMainLib/Main.cs
@@ -11,7 +11,7 @@ namespace KKdMainLib
     {
         public const string TimeFormatHHmmssfff = "{0:d2}:{1:d2}:{2:d2}.{3:d3}";
 
-        public static void WriteTime(this TimeSpan time, bool writeLine = false)
+        public static void WT(this TimeSpan time, bool writeLine = false)
         {
             if (writeLine) Console.WriteLine(TimeFormatHHmmssfff,
                     time.Hours, time.Minutes, time.Seconds, time.Milliseconds);
@@ -19,15 +19,15 @@ namespace KKdMainLib
                     time.Hours, time.Minutes, time.Seconds, time.Milliseconds);
         }
 
-        public static void WriteTime(this TimeSpan time, string Text, bool writeLine = true)
+        public static void WT(this TimeSpan time, string text, bool writeLine = true)
         {
-            if (writeLine) Console.WriteLine(TimeFormatHHmmssfff + " - " + Text,
+            if (writeLine) Console.WriteLine(TimeFormatHHmmssfff + " - " + text,
                     time.Hours, time.Minutes, time.Seconds, time.Milliseconds);
-            else           Console.Write    (TimeFormatHHmmssfff + " - " + Text,
+            else           Console.Write    (TimeFormatHHmmssfff + " - " + text,
                     time.Hours, time.Minutes, time.Seconds, time.Milliseconds);
         }
 
-        public static string NullTerminated(this string source, ref int i, byte end)
+        public static string NT(this string source, ref int i, byte end)
         {
             string s = "";
             while (true)
@@ -39,10 +39,10 @@ namespace KKdMainLib
             return s;
         }
 
-        public static bool StartsWith(this A3DADict dict, string args, char split = '.') =>
-            dict.StartsWith(args.Split(split));
+        public static bool SW(this A3DADict dict, string args, char split = '.') =>
+            dict.SW(args.Split(split));
 
-        public static bool StartsWith(this A3DADict dict, string[] args)
+        public static bool SW(this A3DADict dict, string[] args)
         {
             if (dict == null || args.Length < 1) return false;
 
@@ -52,63 +52,62 @@ namespace KKdMainLib
                 string[] newArgs = new string[args.Length - 1];
                 for (int i = 0; i < args.Length - 1; i++)
                     newArgs[i] = args[i + 1];
-                return dict.ContainsKey(args[0]) ? StartsWith((A3DADict)dict[args[0]], newArgs) : false;
+                return dict.ContainsKey(args[0]) ? SW((A3DADict)dict[args[0]], newArgs) : false;
             }
             return dict.ContainsKey(args[0]);
         }
 
-        public static bool FindValue(this A3DADict dict, ref   bool value, char split, string args) =>
-            dict.FindValue(out string val, args.Split(split)) ? bool.TryParse(val, out value) : false;
+        public static bool FV(this A3DADict dict, ref   bool value, char split, string args) =>
+              dict.FV(out string val, args.Split(split)) ? bool.TryParse(val, out value) : false;
 
-        public static bool FindValue(this A3DADict dict, ref    int value, char split, string args) =>
-            dict.FindValue(out string val, args.Split(split)) ?  int.TryParse(val, out value) : false;
+        public static bool FV(this A3DADict dict, ref    int value, char split, string args) =>
+              dict.FV(out string val, args.Split(split)) ? int.TryParse(val, out value) : false;
 
-        public static bool FindValue(this A3DADict dict, ref  float value, char split, string args) =>
-            dict.FindValue(out string val, args.Split(split)) ?  val.ToF32(     out value) : false;
+        public static bool FV(this A3DADict dict, ref  float value, char split, string args) =>
+              dict.FV(out string val, args.Split(split)) ? val.ToF32(out value) : false;
 
-        public static bool FindValue(this A3DADict dict, ref double value, char split, string args) =>
-            dict.FindValue(out string val, args.Split(split)) ?  val.ToF64(     out value) : false;
+        public static bool FV(this A3DADict dict, ref double value, char split, string args) =>
+              dict.FV(out string val, args.Split(split)) ? val.ToF64(out value) : false;
 
-        public static bool FindValue(this A3DADict dict, ref string value, char split, string args)
-        { if (dict.FindValue(out string val, args.Split(split)))
+        public static bool FV(this A3DADict dict, ref string value, char split, string args)
+        { if (dict.FV(out string val  , args.Split(split)))
                            { value = val;             return true; } return false; }
 
-        public static bool FindValue(this A3DADict dict, out   bool  value, string   args)
-        { if (dict.FindValue(out string val, args.Split('.'  )))
+        public static bool FV(this A3DADict dict, out   bool  value, string   args)
+        { if (dict.FV(out string val  , args.Split('.'  )))
                 return bool.TryParse(val, out value); value = false; return false; }
 
-        public static bool FindValue(this A3DADict dict, out    int  value, string   args)
-        { if (dict.FindValue(out string val, args.Split('.'  )))
+        public static bool FV(this A3DADict dict, out    int  value, string   args)
+        { if (dict.FV(out string val  , args.Split('.'  )))
                 return  int.TryParse(val, out value); value =     0; return false; }
 
-        public static bool FindValue(this A3DADict dict, out  float  value, string   args)
-        { if (dict.FindValue(out string val, args.Split('.'  )))
-                return       val.ToF32(out value); value =     0; return false; }
+        public static bool FV(this A3DADict dict, out  float  value, string   args)
+        { if (dict.FV(out string val  , args.Split('.'  )))
+                return          val.ToF32(out value); value =     0; return false; }
 
-        public static bool FindValue(this A3DADict dict, out double  value, string   args)
-        { if (dict.FindValue(out string val, args.Split('.'  )))
-                return       val.ToF64(out value); value =     0; return false; }
+        public static bool FV(this A3DADict dict, out double  value, string   args)
+        { if (dict.FV(out string val  , args.Split('.'  )))
+                return          val.ToF64(out value); value =     0; return false; }
 
-        public static bool FindValue(this A3DADict dict, out    int? value, string   args)
-        { if (dict.FindValue(out string val, args.Split('.'  )))
+        public static bool FV(this A3DADict dict, out    int? value, string   args)
+        { if (dict.FV(out string val  , args.Split('.'  )))
             { bool Val =  int.TryParse(val, out int _value);
                 value = _value; return Val; }         value =  null; return false; }
         
-        public static bool FindValue(this A3DADict dict, out  float? value, string   args)
-        { if (dict.FindValue(out string val, args.Split('.'  )))
-                return       val.ToF32(out value); value =  null; return false; }
+        public static bool FV(this A3DADict dict, out  float? value, string   args)
+        { if (dict.FV(out string val  , args.Split('.'  )))
+                return          val.ToF32(out value); value =  null; return false; }
 
-        public static bool FindValue(this A3DADict dict, out double? value, string   args)
-        { if (dict.FindValue(out string val, args.Split('.'  )))
-                return       val.ToF64(out value); value =  null; return false; }
+        public static bool FV(this A3DADict dict, out double? value, string   args)
+        { if (dict.FV(out string val  , args.Split('.'  )))
+                return          val.ToF64(out value); value =  null; return false; }
 
-        public static bool FindValue(this A3DADict dict, out string  value, string   args)
-        { if (dict.FindValue(out string val, args.Split('.'  )))
-              { value = val;           return true; } value =  null; return false; }
+        public static bool FV(this A3DADict dict, out string  value, string   args) =>
+              dict.FV(out        value, args.Split('.'  ));
 
-        public static bool FindValue(this A3DADict dict, out string  value, string[] args)
+        public static bool FV(this A3DADict dict, out string  value, string[] args)
         {
-            value = "";
+            value = null;
             if (dict == null || args.Length < 1) return false;
 
             args[0] = args[0].ToLower();
@@ -117,12 +116,12 @@ namespace KKdMainLib
             {
                 string[] newArgs = new string[args.Length - 1];
                 for (int i = 0; i < args.Length - 1; i++) newArgs[i] = args[i + 1];
-                return ((A3DADict)dict[args[0]]).FindValue(out value, newArgs);
+                return ((A3DADict)dict[args[0]]).FV(out value, newArgs);
             }
             else if (args.Length == 1)
             {
                 if (dict[args[0]].GetType() == dict.GetType())
-                    return ((A3DADict)dict[args[0]]).FindValue(out value, args);
+                    return ((A3DADict)dict[args[0]]).FV(out value, args);
                 else if (dict[args[0]].GetType() != typeof(string)) return false;
             }
 
@@ -130,18 +129,18 @@ namespace KKdMainLib
             return true;
         }
 
-        public static void GetDictionary(this A3DADict dict, string args, char split = '.')
+        public static void GD(this A3DADict dict, string args, char split = '.')
         {
             string[] dataArray = args.Split('=');
             if (dataArray.Length == 2)
-                dict.GetDictionary(dataArray[0].Split(split), dataArray[1]);
+                dict.GD(dataArray[0].Split(split), dataArray[1]);
             dataArray = null;
         }
 
-        public static void GetDictionary(this A3DADict dict, string args, string value, char split = '.') =>
-            dict.GetDictionary(args.Split(split), value);
+        public static void GD(this A3DADict dict, string args, string value, char split = '.') =>
+            dict.GD(args.Split(split), value);
 
-        public static void GetDictionary(this A3DADict dict, string[] args, string value)
+        public static void GD(this A3DADict dict, string[] args, string value)
         {
                  if (dict == null) dict = new A3DADict();
             else if (args.Length < 1) return;
@@ -159,19 +158,19 @@ namespace KKdMainLib
                 }
                 else dict[args[0]] = new A3DADict();
                 A3DADict bufDict = (A3DADict)dict[args[0]];
-                bufDict.GetDictionary(newArgs, value);
+                bufDict.GD(newArgs, value);
                 dict[args[0]] = bufDict;
             }
             else if (!dict.ContainsKey(args[0])) dict.Add(args[0], value);
         }
 
-        public static TKey GetKey<TKey, TVal>(this Dictionary<TKey, TVal> dict, TVal val) =>
+        public static TKey GK<TKey, TVal>(this Dictionary<TKey, TVal> dict, TVal val) =>
             dict.First((System.Collections.Generic.KeyValuePair<TKey, TVal> x) => x.Value.Equals(val)).Key;
 
-        public static string ToTitleCase(this string s)
-        { return CultureInfo.CurrentCulture.TextInfo.ToTitleCase(s); }
+        public static string TTC(this string s) =>
+            CultureInfo.CurrentCulture.TextInfo.ToTitleCase(s);
 
-        public static int[] SortWriter(this int length)
+        public static int[] SW(this int length)
         {
             int i = 0;
             List<string> A = new List<string>();
diff --git a/KKdMainLib/Mot.cs b/KKdMainLib/Mot.cs
index f37487a..cb3d7df 100644
--- a/KKdMainLib/Mot.cs
+++ b/KKdMainLib/Mot.cs
@@ -5,7 +5,7 @@ using KKdMainLib.IO;
 
 namespace KKdMainLib
 {
-    public struct Mot
+    public struct Mot : System.IDisposable
     {
         private int i, i0, i1;
         public MotHeader[] MOT;
@@ -57,7 +57,6 @@ namespace KKdMainLib
                 for (i0 = 0; i0 < mot.KeySet.V.Length; i0++)
                 {
                     if (i0 % 8 == 0) i1 = _IO.RU16();
-
                     mot.KeySet.V[i0] = new KeySet { Type = (KeySetType)((i1 >> (i0 % 8 * 2)) & 0b11) };
                 }
 
@@ -94,7 +93,7 @@ namespace KKdMainLib
         public void MOTWriter(string file)
         {
             if (MOT == null) return;
-            _IO = File.OpenWriter(file + ".bin");
+            _IO = File.OpenWriter(file + ".bin", true);
 
             int MOTCount = MOT.Length;
             _IO.P = (MOTCount + 1) << 4;
@@ -113,8 +112,8 @@ namespace KKdMainLib
                     if (i0 % 8 == 7) { _IO.W((ushort)i1); i1 = 0; }
                 }
                 _IO.W((ushort)i1);
+                if (_IO.P % 4 != 0) _IO.W((ushort)0x00);
 
-                _IO.A(0x4);
                 mot.KeySetOffset = _IO.P;
                 for (i0 = 0; i0 < mot.KeySet.V.Length; i0++)
                 {
@@ -125,8 +124,8 @@ namespace KKdMainLib
                     {
                         _IO.W((ushort)key.Keys.Length);
                         for (i1 = 0; i1 < key.Keys.Length; i1++)
-                            _IO.W(key.Keys[i1].F);
-                        _IO.A(0x4);
+                            _IO.W((ushort)key.Keys[i1].F);
+                        if (_IO.P % 4 != 0) _IO.W((ushort)0x00);
                         for (i1 = 0; i1 < key.Keys.Length; i1++)
                             _IO.W(key.Keys[i1].V);
                     }
@@ -134,19 +133,20 @@ namespace KKdMainLib
                     {
                         _IO.W((ushort)key.Keys.Length);
                         for (i1 = 0; i1 < key.Keys.Length; i1++)
-                          _IO.W(key.Keys[i1].F);
-                        _IO.A(0x4);
+                          _IO.W((ushort)key.Keys[i1].F);
+                        if (_IO.P % 4 != 0) _IO.W((ushort)0x00);
                         for (i1 = 0; i1 < key.Keys.Length; i1++)
                         { _IO.W(key.Keys[i1].V); _IO.W(key.Keys[i1].T); }
                     }
                 }
-                _IO.A(0x4);
+                if (_IO.P % 4 != 0) _IO.W((ushort)0x00);
 
                 mot.BoneInfo.O = _IO.P;
                 for (i0 = 0; i0 < mot.BoneInfo.V.Length; i0++)
                     _IO.W((ushort)mot.BoneInfo.V[i0].Id);
                 _IO.W((ushort)0);
             }
+            if (_IO.P % 4 != 0) _IO.W((ushort)0x00);
             _IO.A(0x4, true);
 
             _IO.P = 0;
@@ -215,9 +215,9 @@ namespace KKdMainLib
                     else if (temp1.Array[0].Array == null)     continue;
                     else if (temp1.Array[0].Array.Length == 0) continue;
                     else if (temp1.Array[0].Array.Length == 1)
-                        keySet.Keys[0] = new KFT2 (temp1.Array[0][0].RF32());
+                        keySet.Keys[0] = new KFT2(temp1.Array[0][0].RF32());
                     else if (temp1.Array[0].Array.Length >  1)
-                        keySet.Keys[0] = new KFT2 (temp1.Array[0][0].RF32(), temp1.Array[1].RF32());
+                        keySet.Keys[0] = new KFT2(temp1.Array[0][0].RF32(), temp1.Array[0][1].RF32());
                 }
                 else if (keySet.Type == KeySetType.Linear)
                 {
@@ -228,9 +228,9 @@ namespace KKdMainLib
                              if (array.Array == null)     continue;
                         else if (array.Array.Length == 0) continue;
                         else if (array.Array.Length == 1)
-                            keySet.Keys[i1] = new KFT2 (array[0].RF32());
+                            keySet.Keys[i1] = new KFT2(array[0].RF32());
                         else if (array.Array.Length == 2)
-                            keySet.Keys[i1] = new KFT2 (array[0].RF32(), array[1].RF32());
+                            keySet.Keys[i1] = new KFT2(array[0].RF32(), array[1].RF32());
                     }
                 }
                 else if (keySet.Type == KeySetType.Interpolated)
@@ -242,11 +242,11 @@ namespace KKdMainLib
                              if (array.Array == null ||
                                  array.Array.Length == 0) continue;
                         else if (array.Array.Length == 1)
-                            keySet.Keys[i1] = new KFT2 (array[0].RF32());
+                            keySet.Keys[i1] = new KFT2(array[0].RF32());
                         else if (array.Array.Length == 2)
-                            keySet.Keys[i1] = new KFT2 (array[0].RF32(), array[1].RF32());
+                            keySet.Keys[i1] = new KFT2(array[0].RF32(), array[1].RF32());
                         else if (array.Array.Length >  2)
-                            keySet.Keys[i1] = new KFT2 (array[0].RF32(),
+                            keySet.Keys[i1] = new KFT2(array[0].RF32(),
                                 array[1].RF32(), temp1.Array[i1][2].RF32());
                     }
                 }
@@ -313,6 +313,12 @@ namespace KKdMainLib
             return mot;
         }
 
+        public void Dispose()
+        {
+            _IO = null;
+            MOT = null;
+        }
+
         public struct MotHeader
         {
             public int      KeySetOffset;
@@ -330,7 +336,7 @@ namespace KKdMainLib
             public KeySetType Type;
 
             public override string ToString() => $"Type: {Type}" + (Type == KeySetType.Static ?
-                $"; Value: {Keys[0].Check()}" : Type > KeySetType.Static ? $"; Keys: {Keys.Length}" : "");
+                $"; Value: {Keys[0].V}" : Type > KeySetType.Static ? $"; Keys: {Keys.Length}" : "");
         }
 
         public enum KeySetType : byte
diff --git a/KKdMainLib/MotHead.cs b/KKdMainLib/MotHead.cs
new file mode 100644
index 0000000..3fcd3d7
--- /dev/null
+++ b/KKdMainLib/MotHead.cs
@@ -0,0 +1,755 @@
+using KKdBaseLib;
+using KKdMainLib.IO;
+
+namespace KKdMainLib
+{
+    public struct MotHead
+    {
+        private int i, i0, i1;
+        private Stream _IO;
+
+        public HeaderData Header;
+
+        public void MotHeadReader(string file)
+        {
+            _IO = File.OpenReader(file + ".bin");
+            _IO.RI32();
+            Header = new HeaderData();
+
+            int offset = _IO.RI32();
+            if (offset < 0x10) goto RETURN;
+            _IO.O = offset;
+            _IO.P = 0;
+
+            Header.  MotionSetID   = _IO.RI32();
+            Header.StartMotionID   = _IO.RI32();
+            Header.  EndMotionID   = _IO.RI32();
+            Header.SubHeaderOffset = _IO.RI32();
+
+            if (Header.SubHeaderOffset < 0x10) goto RETURN;
+            i0 = Header.EndMotionID - Header.StartMotionID;
+            if (i0 < 0) goto RETURN;
+
+            _IO.P = Header.SubHeaderOffset;
+            Header.Data = new HeaderData.Sub[++i0];
+            for (i = 0; i < Header.Data.Length; i++) Header.Data[i].Offset = _IO.RI32();
+            for (i = 0; i < Header.Data.Length; i++)
+            {
+                if (Header.Data[i].Offset < 0x10) continue;
+
+                _IO.P = Header.Data[i].Offset;
+
+                Header.Data[i].MotionID = Header.StartMotionID + i;
+                Header.Data[i].SomeData = _IO.RI32();
+                _IO.RI64();
+                _IO.RI64();
+                Header.Data[i].Offset2 = _IO.RI32();
+                Header.Data[i].DataHeaderOffset = _IO.RI32();
+
+                if (Header.Data[i].DataHeaderOffset < 0x10) goto RETURN;
+                _IO.P = Header.Data[i].DataHeaderOffset;
+                i0 = 0;
+                while (_IO.RI32() != -1) { _IO.RI32(); _IO.RI32(); i0++; }
+                _IO.P = Header.Data[i].DataHeaderOffset;
+
+                Header.Data[i].Array = new HeaderData.Sub.Data[i0];
+                for (i0 = 0; i0 < Header.Data[i].Array.Length; i0++)
+                {
+                    Header.Data[i].Array[i0].Type   = _IO.RI32();
+                    Header.Data[i].Array[i0].Frame  = _IO.RI32();
+                    Header.Data[i].Array[i0].Offset = _IO.RI32();
+                }
+            }
+
+            for (i = 0; i < Header.Data.Length; i++)
+            {
+                if (Header.Data[i].Offset2 > 0x10)
+                {
+                    _IO.P = Header.Data[i].Offset2;
+                    i0 = 0;
+                    while (_IO.RI32() != -1) { _IO.RI32(); i0++; }
+                    _IO.P = Header.Data[i].Offset2;
+
+                    Header.Data[i].Array2 = new HeaderData.Sub.Data2[i0];
+                    for (i0 = 0; i0 < Header.Data[i].Array2.Length; i0++)
+                    {
+                        Header.Data[i].Array2[i0].Frame  = _IO.RI32();
+                        Header.Data[i].Array2[i0].Offset = _IO.RI32();
+                    }
+
+                    for (i0 = 0; i0 < Header.Data[i].Array2.Length; i0++)
+                    {
+                        if (Header.Data[i].Array2[i0].Offset < 0x10) goto RETURN;
+                        _IO.P = Header.Data[i].Array2[i0].Offset;
+                        Header.Data[i].Array2[i0].Array = new int[7];
+                        for (i1 = 0; i1 < Header.Data[i].Array2[i0].Array.Length; i1++)
+                            Header.Data[i].Array2[i0].Array[i1] = _IO.RI32();
+                    }
+                }
+
+                if (Header.Data[i].Array == null || Header.Data[i].Array.Length < 1) continue;
+
+                for (i0 = 0; i0 < Header.Data[i].Array.Length; i0++)
+                {
+                    ref HeaderData.Sub.Data Data = ref Header.Data[i].Array[i0];
+                    if (!GetSize(Data.Type, out i1)) goto RETURN;
+
+                    if (Data.Offset > 0)
+                    {
+                    _IO.P = Data.Offset;
+                             if (i1 == 0x01) Data.Array = new int[] { _IO.RU8 () };
+                        else if (i1 == 0x02) Data.Array = new int[] { _IO.RU16() };
+                        else
+                        {
+                            Data.Array = new int[i1 / 4];
+                            for (i1 = 0; i1 < Data.Array.Length; i1++) Data.Array[i1] = _IO.RI32();
+                        }
+                    }
+                }
+            }
+
+RETURN:
+            _IO.C();
+        }
+
+        public void MotHeadWriter(string file)
+        {
+            if (Header.Data == null || Header.Data.Length < 1) return;
+
+            Header.StartMotionID = 0x7FFFFFFF;
+            Header.EndMotionID   = 0x00000000;
+            for (i = 0; i < Header.Data.Length; i++)
+            {
+                if (Header.Data[i].MotionID < Header.StartMotionID)
+                    Header.StartMotionID = Header.Data[i].MotionID;
+                if (Header.Data[i].MotionID > Header.  EndMotionID)
+                    Header.  EndMotionID = Header.Data[i].MotionID;
+            }
+
+            _IO = File.OpenWriter(file + ".bin");
+            _IO.W(0x01);
+            _IO.W(0x20);
+            _IO.A(0x20, true);
+            _IO.O = 0x20;
+            _IO.P = 0;
+            _IO.W(0);
+            for (int I = Header.EndMotionID - Header.StartMotionID; I > -1; I--)
+                for (i = 0; i < Header.Data.Length; i++)
+                    if (Header.StartMotionID + I == Header.Data[i].MotionID)
+                    {
+                        _IO.A(0x20, true);
+                        Header.Data[i].Offset = _IO.P;
+                        Header.Data[i].DataHeaderOffset = Header.Data[i].Offset + 0x20;
+                        _IO.W(0L);
+                        _IO.W(0L);
+                        _IO.W(0L);
+                        _IO.W(0L);
+
+                        for (i0 = 0; i0 < Header.Data[i].Array.Length; i0++)
+                        { _IO.W( 0); _IO.W( 0); _IO.W(0); }
+                          _IO.W(-1); _IO.W(-1); _IO.W(0);
+
+                        for (i0 = Header.Data[i].Array.Length - 1; i0 > -1; i0--)
+                        {
+                            ref HeaderData.Sub.Data data = ref Header.Data[i].Array[i0];
+                            if (data.Array != null)
+                                if (data.Array.Length > 0 &&
+                                    GetSize(data.Type, out int Size))
+                                {
+                                    if (data.Type == 0x3E) _IO.A(0x20, true);
+                                    data.Offset = _IO.P;
+
+                                         if (Size == 0x01) _IO.W(( byte)data.Array[0]);
+                                    else if (Size == 0x02) _IO.W((short)data.Array[0]);
+                                    else
+                                    {
+                                        if (_IO.P % 0x4 != 0) _IO.A(0x04, true);
+                                        Size /= 4;
+
+                                        data.Offset = _IO.P;
+                                        for (i1 = 0; i1 < data.Array.Length && i1 < Size; i1++)
+                                            _IO.W(data.Array[i1]);
+
+                                        for (; i1 < Size; i1++) _IO.W(0);
+                                    }
+                                }
+                        }
+
+                        if (Header.Data[i].Array2 != null)
+                            if (Header.Data[i].Array2.Length > 0)
+                            {
+                                Header.Data[i].Offset2 = _IO.P;
+
+                                for (i0 = 0; i0 < Header.Data[i].Array2.Length; i0++)
+                                { _IO.W( 0); _IO.W(0); }
+                                  _IO.W(-1); _IO.W(0);
+
+                                for (i0 = Header.Data[i].Array2.Length - 1; i0 > -1; i0--)
+                                {
+                                    Header.Data[i].Array2[i0].Offset = _IO.P;
+                                    for (i1 = 0; i1 < Header.Data[i].Array2[i0].Array.Length && i1 < 7; i1++)
+                                        _IO.W(Header.Data[i].Array2[i0].Array[i1]);
+
+                                    for (; i1 < 7; i1++) _IO.W(0);
+                                }
+                            }
+                        break;
+                    }
+            _IO.A(0x20, true);
+            Header.SubHeaderOffset = _IO.P;
+            i1 = Header.EndMotionID - Header.StartMotionID;
+
+            int offset = 0;
+            for (i = 0, i1++; i < i1; i++)
+            {
+                offset = 0;
+                for (i0 = 0; i0 < Header.Data.Length; i0++)
+                    if (Header.StartMotionID + i == Header.Data[i0].MotionID)
+                    { offset = Header.Data[i0].Offset; break; }
+                _IO.W(offset);
+            }
+            _IO.A(0x20, true);
+
+            for (i = 0; i < Header.Data.Length; i++)
+            {
+                _IO.P = Header.Data[i].Offset;
+                _IO.W(Header.Data[i].SomeData);
+                _IO.W(0);
+                _IO.W(0L);
+                _IO.W(0x040004);
+                _IO.W(Header.Data[i].Offset2);
+                _IO.W(Header.Data[i].DataHeaderOffset);
+                _IO.W(0);
+
+                _IO.P = Header.Data[i].DataHeaderOffset;
+                for (i0 = 0; i0 < Header.Data[i].Array.Length; i0++)
+                {
+                    _IO.W(Header.Data[i].Array[i0].Type  );
+                    _IO.W(Header.Data[i].Array[i0].Frame );
+                    _IO.W(Header.Data[i].Array[i0].Offset);
+                }
+
+                _IO.P = Header.Data[i].Offset2;
+                if (Header.Data[i].Array2 != null)
+                    for (i0 = 0; i0 < Header.Data[i].Array2.Length; i0++)
+                    {
+                        _IO.W(Header.Data[i].Array2[i0].Frame );
+                        _IO.W(Header.Data[i].Array2[i0].Offset);
+                    }
+            }
+
+            _IO.P = 0;
+            _IO.W(Header.MotionSetID    );
+            _IO.W(Header.StartMotionID  );
+            _IO.W(Header.  EndMotionID  );
+            _IO.W(Header.SubHeaderOffset);
+            _IO.C();
+        }
+
+        public void MsgPackReader(string file, bool json)
+        {
+            Header = new HeaderData();
+
+            MsgPack motHead;
+            MsgPack msgPack = file.ReadMPAllAtOnce(json);
+            if ((motHead = msgPack["MotHead"]).IsNull) return;
+            Header.MotionSetID = motHead.RI32("MotionSetID");
+
+            MsgPack temp = MsgPack.New;
+            MsgPack motions, array;
+            if ((motions = motHead["Motions", true]).IsNull) return;
+            Header.Data = new HeaderData.Sub[motions.Array.Length];
+            for (i = 0; i < Header.Data.Length; i++)
+            {
+                Header.Data[i].MotionID = motions[i].RI32("MotionID");
+                Header.Data[i].SomeData = motions[i].RI32("SomeData");
+
+                MsgPack array2;
+                if ((array2 = motions[i]["Array2", true]).NotNull)
+                {
+                    Header.Data[i].Array2 = new HeaderData.Sub.Data2[array2.Array.Length];
+
+                    for (i0 = 0; i0 < Header.Data[i].Array2.Length; i0++)
+                    {
+                        Header.Data[i].Array2[i0].Frame = array2[i0].RI32("Frame");
+
+                        MsgPack arrayArray;
+                        if ((arrayArray = array2[i0]["Array", true]).IsNull) continue;
+
+                        Header.Data[i].Array2[i0].Array = new int[arrayArray.Array.Length];
+                        for (i1 = 0; i1 < Header.Data[i].Array2[i0].Array.Length; i1++)
+                            Header.Data[i].Array2[i0].Array[i1] = arrayArray[i1].RI32();
+                    }
+                }
+
+                if ((array = motions[i]["Array", true]).IsNull) { continue; }
+
+                Header.Data[i].Array = new HeaderData.Sub.Data[array.Array.Length];
+
+                for (i0 = 0; i0 < Header.Data[i].Array.Length; i0++)
+                {
+                    ref HeaderData.Sub.Data data = ref Header.Data[i].Array[i0];
+                    data.Type = array[i0].RI32("Type");
+                    data.Frame = array[i0].RI32("Frame");
+
+                    if ((temp = array[i0]["Type3"]).NotNull)
+                    {
+                        data.Type = 0x03;
+                        data.Array = new int[] { temp.RI32("i0") };
+                    }
+                    else if ((temp = array[i0]["Type53"]).NotNull)
+                    {
+                        data.Type = 0x35;
+                        data.Array = new int[] { temp.RI32("i0"),
+                                                 temp.RF32("f1").ToI32(),
+                                                 temp.RF32("f2").ToI32(),
+                                                 temp.RI32("i3") };
+                    }
+                    else if ((temp = array[i0]["Type54"]).NotNull)
+                    {
+                        data.Type = 0x36;
+                        data.Array = new int[] { temp.RI32("i0"),
+                                                 temp.RF32("f1").ToI32(),
+                                                 temp.RF32("f2").ToI32(),
+                                                 temp.RI32("i3") };
+                    }
+                    else if ((temp = array[i0]["Type55"]).NotNull)
+                    {
+                        data.Type = 0x37;
+                        data.Array = new int[] { temp.RI32("i0"),
+                                                 temp.RF32("f1").ToI32(),
+                                                 temp.RF32("f2").ToI32(),
+                                                 temp.RI32("i3") };
+                    }
+                    else if ((temp = array[i0]["Type56"]).NotNull)
+                    {
+                        data.Type = 0x38;
+                        data.Array = new int[] { temp.RI32("i0"),
+                                                 temp.RF32("f1").ToI32(),
+                                                 temp.RF32("f2").ToI32(),
+                                                 temp.RI32("i3") };
+                    }
+                    else if ((temp = array[i0]["Type57"]).NotNull)
+                    {
+                        data.Type = 0x39;
+                        data.Array = new int[] { temp.RI32("i0"),
+                                                 temp.RF32("f1").ToI32(),
+                                                 temp.RF32("f2").ToI32(),
+                                                 temp.RI32("i3") };
+                    }
+                    else if ((temp = array[i0]["Type60"]).NotNull)
+                    {
+                        data.Type = 0x3C;
+                        data.Array = new int[] { temp.RI32("i0"),
+                                                 temp.RF32("f1").ToI32(),
+                                                 temp.RF32("f2").ToI32(),
+                                                 temp.RF32("f3").ToI32() };
+                    }
+                    else if ((temp = array[i0]["Type61"]).NotNull)
+                    {
+                        data.Type = 0x3D;
+                        data.Array = new int[] { temp.RI32("i0"), temp.RF32("f1").ToI32() };
+                    }
+                    else if ((temp = array[i0]["Type62"]).NotNull)
+                    {
+                        data.Type = 0x3E;
+                        data.Array = new int[0x10];
+                        data.Array[ 0] = temp.RI32("i0");
+                        data.Array[ 1] =
+                            ((byte)temp.RI32("i1_3") << 24) | ((byte)temp.RI32("i1_2") << 16) |
+                            ((byte)temp.RI32("i1_1") <<  8) |  (byte)temp.RI32("i1_0");
+                        data.Array[ 2] = temp.RF32("f2" ).ToI32();
+                        data.Array[ 3] = temp.RF32("f3" ).ToI32();
+                        data.Array[ 4] = temp.RF32("f4" ).ToI32();
+                        data.Array[ 5] = temp.RF32("f5" ).ToI32();
+                        data.Array[ 6] = temp.RF32("f6" ).ToI32();
+                        data.Array[ 7] = temp.RF32("f7" ).ToI32();
+                        data.Array[ 8] = temp.RF32("f8" ).ToI32();
+                        data.Array[ 9] = temp.RF32("f9" ).ToI32();
+                        data.Array[10] = temp.RF32("f10").ToI32();
+                        data.Array[11] = temp.RF32("f11").ToI32();
+                        data.Array[12] = temp.RF32("f12").ToI32();
+                        data.Array[13] = temp.RF32("f13").ToI32();
+                        data.Array[14] = temp.RF32("f14").ToI32();
+                        data.Array[15] = temp.RI32("i15");
+                    }
+                    else if ((temp = array[i0]["Type65"]).NotNull)
+                    {
+                        data.Type = 0x41;
+                        data.Array = new int[] { temp.RI32("i0") };
+                    }
+                    else if ((temp = array[i0]["Type66"]).NotNull)
+                    {
+                        data.Type = 0x42;
+                        data.Array = new int[] { temp.RF32("f0").ToI32() };
+                    }
+                    else if ((temp = array[i0]["Type67"]).NotNull)
+                    {
+                        data.Type = 0x43;
+                        data.Array = new int[] { temp.RI32("i0"), temp.RF32("f1").ToI32() };
+                    }
+                    else if ((temp = array[i0]["Type68"]).NotNull)
+                    {
+                        data.Type = 0x44;
+                        data.Array = new int[] { temp.RI32("i0"), temp.RF32("f1").ToI32() };
+                    }
+                    else if ((temp = array[i0]["Type69"]).NotNull)
+                    {
+                        data.Type = 0x45;
+                        data.Array = new int[] { temp.RI32("i0"), temp.RI32("i1") };
+                    }
+                    else if ((temp = array[i0]["Type70"]).NotNull)
+                    {
+                        data.Type = 0x46;
+                        data.Array = new int[] { temp.RI32("i0") };
+                    }
+                    else if ((temp = array[i0]["Type71"]).NotNull)
+                    {
+                        data.Type = 0x47;
+                        data.Array = new int[] { temp.RI32("i0"), temp.RF32("f1").ToI32() };
+                    }
+                    else if ((temp = array[i0]["Type72"]).NotNull)
+                    {
+                        data.Type = 0x48;
+                        data.Array = new int[] { temp.RI32("i0"), temp.RF32("f1").ToI32() };
+                    }
+                    else if ((temp = array[i0]["Type73"]).NotNull)
+                    {
+                        data.Type = 0x49;
+                        data.Array = new int[] { temp.RI32("i0"),
+                                                 temp.RF32("f1").ToI32(),
+                                                 temp.RI32("i2"),
+                                                 temp.RF32("f3").ToI32() };
+                    }
+                    else if ((temp = array[i0]["Type74"]).NotNull)
+                    {
+                        data.Type = 0x4A;
+                        data.Array = new int[] { temp.RI32("i0") };
+                    }
+                    else if ((temp = array[i0]["Type62"]).NotNull)
+                    {
+                        data.Type = 0x4B;
+                        data.Array = new int[0x0D];
+                        data.Array[ 0] = temp.RI32("i0");
+                        data.Array[ 1] = ((byte)temp.RI32("i1_1") << 8) | (byte)temp.RI32("i1_0");
+                        data.Array[ 2] = temp.RF32("f2" ).ToI32();
+                        data.Array[ 3] = temp.RF32("f3" ).ToI32();
+                        data.Array[ 4] = temp.RF32("f4" ).ToI32();
+                        data.Array[ 5] = temp.RF32("f5" ).ToI32();
+                        data.Array[ 6] = temp.RF32("f6" ).ToI32();
+                        data.Array[ 7] = temp.RF32("f7" ).ToI32();
+                        data.Array[ 8] = temp.RF32("f8" ).ToI32();
+                        data.Array[ 9] = temp.RF32("f9" ).ToI32();
+                        data.Array[10] = temp.RF32("f10").ToI32();
+                        data.Array[11] = temp.RF32("f11").ToI32();
+                        data.Array[12] = temp.RF32("f12").ToI32();
+                    }
+                    else if ((temp = array[i0]["Type76"]).NotNull)
+                    {
+                        data.Type = 0x4C;
+                        data.Array = new int[] { temp.RI32("i0"),
+                                                 temp.RF32("f1").ToI32(),
+                                                 temp.RF32("f2").ToI32(),
+                                                 temp.RI32("i3") };
+                    }
+                    else if ((temp = array[i0]["Type77"]).NotNull)
+                    {
+                        data.Type = 0x4D;
+                        data.Array = new int[] { temp.RI32("i0") };
+                    }
+                    else if ((temp = array[i0]["Type79"]).NotNull)
+                    {
+                        data.Type = 0x4F;
+                        data.Array = new int[] { temp.RI32("i0") };
+                    }
+                    else if ((temp = array[i0]["Type80"]).NotNull)
+                    {
+                        data.Type = 0x50;
+                        data.Array = new int[] { temp.RI32("i0") };
+                    }
+                    else if ((temp = array[i0]["Array", true]).NotNull)
+                    {
+                        data.Array = new int[temp.Array.Length];
+                        for (i1 = 0; i1 < data.Array.Length; i1++)
+                            data.Array[i1] = temp[i1].RI32();
+                    }
+                }
+            }
+
+            msgPack.Dispose();
+        }
+
+        public void MsgPackWriter(string file, bool json)
+        {
+            if (Header.Data == null || Header.Data.Length < 1) return;
+
+            for (i = 0, i1 = 0; i < Header.Data.Length; i++)
+                if (Header.Data[i].Offset >= 0x10) i1++;
+            MsgPack motHead = new MsgPack("MotHead").Add("MotionSetID", Header.MotionSetID);
+            MsgPack motions = new MsgPack(i1, "Motions");
+            for (int I = 0, i = 0; i < Header.Data.Length; i++)
+            {
+                if (Header.Data[i].Offset < 0x10) continue;
+                MsgPack motion = MsgPack.New
+                    .Add("MotionID", Header.Data[i].MotionID)
+                    .Add("SomeData", Header.Data[i].SomeData);
+
+                if (Header.Data[i].Array == null || Header.Data[i].Array.Length < 1) { }
+                else
+                {
+                    MsgPack array = new MsgPack(Header.Data[i].Array.Length, "Array");
+                    for (i0 = 0; i0 < Header.Data[i].Array.Length; i0++)
+                    {
+                        ref HeaderData.Sub.Data data = ref Header.Data[i].Array[i0];
+                        MsgPack arrayEntry = MsgPack.New;
+                        arrayEntry.Add("Frame", data.Frame);
+                        if (data.Array == null || data.Array.Length < 1)
+                            arrayEntry.Add("Type", data.Type);
+                        else if (data.Type == 0x03)
+                            arrayEntry.Add(new MsgPack("Type3")
+                                .Add("i0", data.Array[0]));
+                        else if (data.Type == 0x35)
+                            arrayEntry.Add(new MsgPack("Type53")
+                                .Add("i0", data.Array[0])
+                                .Add("f1", data.Array[1].ToF32())
+                                .Add("f2", data.Array[2].ToF32())
+                                .Add("i3", data.Array[3]));
+                        else if (data.Type == 0x36)
+                            arrayEntry.Add(new MsgPack("Type54")
+                                .Add("i0", data.Array[0])
+                                .Add("f1", data.Array[1].ToF32())
+                                .Add("f2", data.Array[2].ToF32())
+                                .Add("i3", data.Array[3]));
+                        else if (data.Type == 0x37)
+                            arrayEntry.Add(new MsgPack("Type55")
+                                .Add("i0", data.Array[0])
+                                .Add("f1", data.Array[1].ToF32())
+                                .Add("f2", data.Array[2].ToF32())
+                                .Add("i3", data.Array[3]));
+                        else if (data.Type == 0x38)
+                            arrayEntry.Add(new MsgPack("Type56")
+                                .Add("i0", data.Array[0])
+                                .Add("f1", data.Array[1].ToF32())
+                                .Add("f2", data.Array[2].ToF32())
+                                .Add("i3", data.Array[3]));
+                        else if (data.Type == 0x39)
+                            arrayEntry.Add(new MsgPack("Type57")
+                                .Add("i0", data.Array[0])
+                                .Add("f1", data.Array[1].ToF32())
+                                .Add("f2", data.Array[2].ToF32())
+                                .Add("i3", data.Array[3]));
+                        else if (data.Type == 0x3C)
+                            arrayEntry.Add(new MsgPack("Type60")
+                                .Add("i0", data.Array[0])
+                                .Add("f1", data.Array[1].ToF32())
+                                .Add("f2", data.Array[2].ToF32())
+                                .Add("f3", data.Array[3].ToF32()));
+                        else if (data.Type == 0x3D)
+                            arrayEntry.Add(new MsgPack("Type61")
+                                .Add("i0", data.Array[0])
+                                .Add("f1", data.Array[1].ToF32()));
+                        else if (data.Type == 0x3E)
+                            arrayEntry.Add(new MsgPack("Type62")
+                                .Add("i0", data.Array[0])
+                                .Add("i1_0", (byte) data.Array[1])
+                                .Add("i1_1", (byte)(data.Array[1] >>  8))
+                                .Add("i1_2", (byte)(data.Array[1] >> 16))
+                                .Add("i1_3", (byte)(data.Array[1] >> 24))
+                                .Add("f2" , data.Array[ 2].ToF32())
+                                .Add("f3" , data.Array[ 3].ToF32())
+                                .Add("f4" , data.Array[ 4].ToF32())
+                                .Add("f5" , data.Array[ 5].ToF32())
+                                .Add("f6" , data.Array[ 6].ToF32())
+                                .Add("f7" , data.Array[ 7].ToF32())
+                                .Add("f8" , data.Array[ 8].ToF32())
+                                .Add("f9" , data.Array[ 9].ToF32())
+                                .Add("f10", data.Array[10].ToF32())
+                                .Add("f11", data.Array[11].ToF32())
+                                .Add("f12", data.Array[12].ToF32())
+                                .Add("f13", data.Array[13].ToF32())
+                                .Add("f14", data.Array[14].ToF32())
+                                .Add("i15", data.Array[15]));
+                        else if (data.Type == 0x41)
+                            arrayEntry.Add(new MsgPack("Type65")
+                                .Add("i0", data.Array[0]));
+                        else if (data.Type == 0x42)
+                            arrayEntry.Add(new MsgPack("Type66")
+                                .Add("f0", data.Array[0].ToF32()));
+                        else if (data.Type == 0x43)
+                            arrayEntry.Add(new MsgPack("Type67")
+                                .Add("i0", data.Array[0])
+                                .Add("f1", data.Array[1].ToF32()));
+                        else if (data.Type == 0x44)
+                            arrayEntry.Add(new MsgPack("Type68")
+                                .Add("i0", data.Array[0])
+                                .Add("f1", data.Array[1].ToF32()));
+                        else if (data.Type == 0x45)
+                            arrayEntry.Add(new MsgPack("Type69")
+                                .Add("i0", data.Array[0])
+                                .Add("i1", data.Array[1]));
+                        else if (data.Type == 0x46)
+                            arrayEntry.Add(new MsgPack("Type70")
+                                .Add("i0", data.Array[0]));
+                        else if (data.Type == 0x47)
+                            arrayEntry.Add(new MsgPack("Type71")
+                                .Add("i0", data.Array[0])
+                                .Add("f1", data.Array[1].ToF32()));
+                        else if (data.Type == 0x48)
+                            arrayEntry.Add(new MsgPack("Type72")
+                                .Add("i0", data.Array[0])
+                                .Add("f1", data.Array[1].ToF32()));
+                        else if (data.Type == 0x49)
+                            arrayEntry.Add(new MsgPack("Type73")
+                                .Add("i0", data.Array[0])
+                                .Add("f1", data.Array[1].ToF32())
+                                .Add("i2", (short)data.Array[2])
+                                .Add("f3", data.Array[3].ToF32()));
+                        else if (data.Type == 0x4A)
+                            arrayEntry.Add(new MsgPack("Type74")
+                                .Add("i0", data.Array[0]));
+                        else if (data.Type == 0x4B)
+                            arrayEntry.Add(new MsgPack("Type75")
+                                .Add("i0", data.Array[0])
+                                .Add("i1_0", (byte) data.Array[1])
+                                .Add("i1_1", (byte)(data.Array[1] >> 8))
+                                .Add("f2" , data.Array[ 2].ToF32())
+                                .Add("f3" , data.Array[ 3].ToF32())
+                                .Add("f4" , data.Array[ 4].ToF32())
+                                .Add("f5" , data.Array[ 5].ToF32())
+                                .Add("f6" , data.Array[ 6].ToF32())
+                                .Add("f7" , data.Array[ 7].ToF32())
+                                .Add("f8" , data.Array[ 8].ToF32())
+                                .Add("f9" , data.Array[ 9].ToF32())
+                                .Add("f10", data.Array[10].ToF32())
+                                .Add("f11", data.Array[11].ToF32())
+                                .Add("f12", data.Array[12].ToF32()));
+                        else if (data.Type == 0x4C)
+                            arrayEntry.Add(new MsgPack("Type76")
+                                .Add("i0", data.Array[0])
+                                .Add("f1", data.Array[1].ToF32())
+                                .Add("f2", data.Array[2].ToF32())
+                                .Add("i3", data.Array[3]));
+                        else if (data.Type == 0x4D)
+                            arrayEntry.Add(new MsgPack("Type77")
+                                .Add("i0", data.Array[0]));
+                        else if (data.Type == 0x4F)
+                            arrayEntry.Add(new MsgPack("Type79")
+                                .Add("i0", data.Array[0]));
+                        else if (data.Type == 0x50)
+                            arrayEntry.Add(new MsgPack("Type80")
+                                .Add("i0", data.Array[0]));
+                        else
+                        {
+                            arrayEntry.Add("Type", data.Type);
+                            MsgPack arrayArray = new MsgPack(data.Array.Length, "Array");
+                            for (i1 = 0; i1 < data.Array.Length; i1++)
+                                arrayArray[i1] = data.Array[i1];
+                            arrayEntry.Add(arrayArray);
+                        }
+                        array[i0] = arrayEntry;
+                    }
+                    motion.Add(array);
+                }
+
+                if (Header.Data[i].Array2 == null || Header.Data[i].Array2.Length < 1) { }
+                else
+                {
+                    MsgPack array2 = new MsgPack(Header.Data[i].Array2.Length, "Array2");
+                    for (i0 = 0; i0 < Header.Data[i].Array2.Length; i0++)
+                    {
+                        MsgPack arrayEntry = MsgPack.New.Add("Frame", Header.Data[i].Array2[i0].Frame);
+                        if (Header.Data[i].Array2[i0].Array == null || Header.Data[i].Array2[i0].Array.Length < 1) { }
+                        else
+                        {
+                            MsgPack arrayArray = new MsgPack(Header.Data[i].Array2[i0].Array.Length, "Array");
+                            for (i1 = 0; i1 < Header.Data[i].Array2[i0].Array.Length; i1++)
+                                arrayArray[i1] = Header.Data[i].Array2[i0].Array[i1];
+                            arrayEntry.Add(arrayArray);
+                        }
+                        array2[i0] = arrayEntry;
+                    }
+                    motion.Add(array2);
+                }
+
+                motions[I] = motion;
+                I++;
+            }
+            motHead.Add(motions);
+            motHead.WriteAfterAll(true, file, json);
+        }
+
+        private static bool GetSize(int Type, out int Size)
+        {
+            Size = Type switch
+            {
+                0x03 => 0x04,
+                0x35 => 0x14,
+                0x36 => 0x14,
+                0x37 => 0x14,
+                0x38 => 0x14,
+                0x39 => 0x14,
+                0x3C => 0x10,
+                0x3D => 0x08,
+                0x3E => 0x40,
+                0x40 => 0x00,
+                0x41 => 0x04,
+                0x42 => 0x04,
+                0x43 => 0x08,
+                0x44 => 0x08,
+                0x45 => 0x08,
+                0x46 => 0x04,
+                0x47 => 0x08,
+                0x48 => 0x08,
+                0x49 => 0x10,
+                0x4A => 0x02,
+                0x4B => 0x34,
+                0x4C => 0x10,
+                0x4D => 0x04,
+                0x4F => 0x01,
+                0x50 => 0x04,
+                _    => 0x00,
+            };
+            return Size > 0;
+        }
+
+        public struct HeaderData
+        {
+            public int MotionSetID;
+            public int StartMotionID;
+            public int EndMotionID;
+            public int SubHeaderOffset;
+
+            public Sub[] Data;
+
+            public struct Sub
+            {
+                public int Offset;
+                public int MotionID;
+
+                public int SomeData;
+                public int Offset2;
+                public int DataHeaderOffset;
+
+                public Data[] Array;
+                public Data2[] Array2;
+
+                public struct Data
+                {
+                    public int Type;
+                    public int Frame;
+                    public int Offset;
+
+                    public int[] Array;
+                }
+
+                public struct Data2
+                {
+                    public int Offset;
+
+                    public int Frame;
+                    public int[] Array;
+                }
+            }
+        }
+    }
+}
diff --git a/KKdMainLib/Properties/Resources.Designer.cs b/KKdMainLib/Properties/Resources.Designer.cs
new file mode 100644
index 0000000..b1c79bf
--- /dev/null
+++ b/KKdMainLib/Properties/Resources.Designer.cs
@@ -0,0 +1,73 @@
+//------------------------------------------------------------------------------
+// <auto-generated>
+//     This code was generated by a tool.
+//     Runtime Version:4.0.30319.42000
+//
+//     Changes to this file may cause incorrect behavior and will be lost if
+//     the code is regenerated.
+// </auto-generated>
+//------------------------------------------------------------------------------
+
+namespace KKdMainLib.Properties {
+    using System;
+    
+    
+    /// <summary>
+    ///   A strongly-typed resource class, for looking up localized strings, etc.
+    /// </summary>
+    // This class was auto-generated by the StronglyTypedResourceBuilder
+    // class via a tool like ResGen or Visual Studio.
+    // To add or remove a member, edit your .ResX file then rerun ResGen
+    // with the /str option, or rebuild your VS project.
+    [global::System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "16.0.0.0")]
+    [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
+    [global::System.Runtime.CompilerServices.CompilerGeneratedAttribute()]
+    internal class Resources {
+        
+        private static global::System.Resources.ResourceManager resourceMan;
+        
+        private static global::System.Globalization.CultureInfo resourceCulture;
+        
+        [global::System.Diagnostics.CodeAnalysis.SuppressMessageAttribute("Microsoft.Performance", "CA1811:AvoidUncalledPrivateCode")]
+        internal Resources() {
+        }
+        
+        /// <summary>
+        ///   Returns the cached ResourceManager instance used by this class.
+        /// </summary>
+        [global::System.ComponentModel.EditorBrowsableAttribute(global::System.ComponentModel.EditorBrowsableState.Advanced)]
+        internal static global::System.Resources.ResourceManager ResourceManager {
+            get {
+                if (object.ReferenceEquals(resourceMan, null)) {
+                    global::System.Resources.ResourceManager temp = new global::System.Resources.ResourceManager("KKdMainLib.Properties.Resources", typeof(Resources).Assembly);
+                    resourceMan = temp;
+                }
+                return resourceMan;
+            }
+        }
+        
+        /// <summary>
+        ///   Overrides the current thread's CurrentUICulture property for all
+        ///   resource lookups using this strongly typed resource class.
+        /// </summary>
+        [global::System.ComponentModel.EditorBrowsableAttribute(global::System.ComponentModel.EditorBrowsableState.Advanced)]
+        internal static global::System.Globalization.CultureInfo Culture {
+            get {
+                return resourceCulture;
+            }
+            set {
+                resourceCulture = value;
+            }
+        }
+        
+        /// <summary>
+        ///   Looks up a localized resource of type System.Byte[].
+        /// </summary>
+        internal static byte[] libdeflate {
+            get {
+                object obj = ResourceManager.GetObject("libdeflate", resourceCulture);
+                return ((byte[])(obj));
+            }
+        }
+    }
+}
diff --git a/KKdMainLib/Properties/Resources.resx b/KKdMainLib/Properties/Resources.resx
new file mode 100644
index 0000000..fdedeca
--- /dev/null
+++ b/KKdMainLib/Properties/Resources.resx
@@ -0,0 +1,65 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="libdeflate" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\libdeflate.dll;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </data>
+</root>
\ No newline at end of file
diff --git a/KKdMainLib/Tables.cs b/KKdMainLib/Tables.cs
new file mode 100644
index 0000000..d3cc379
--- /dev/null
+++ b/KKdMainLib/Tables.cs
@@ -0,0 +1,959 @@
+using KKdBaseLib;
+using KKdMainLib.IO;
+using TableDict = System.Collections.Generic.Dictionary<string, object>;
+
+namespace KKdMainLib
+{
+    public struct Tables : System.IDisposable
+    {
+        private int i0;
+        private Stream _IO;
+        private TableDict dict;
+
+        public      ButtonSE[]      ButtonSETable;
+        public  ChainSlideSE[]  ChainSlideSETable;
+        public       SlideSE[]       SlideSETable;
+        public SliderTouchSE[] SliderTouchSETable;
+
+        public CollectionCard[] CollectionCardTable;
+        public  CustomizeItem[]  CustomizeItemTable;
+        public         Module[]         ModuleTable;
+        public          Plate[]          PlateTable;
+        public             PV[]             PVList;
+
+        private const string c = ".";
+
+        public Tables(bool def = true)
+        {
+            i0 = 0;
+            _IO = null;
+            dict = null;
+            disposed = false;
+            ButtonSETable = null; ChainSlideSETable = null; SlideSETable = null; SliderTouchSETable = null;
+            CollectionCardTable = null; CustomizeItemTable = null;
+            ModuleTable = null; PlateTable = null; PVList = null;
+        }
+
+        public void BINReader(string file) =>
+            BINReader(File.ReadAllBytes(file + ".bin"));
+
+        public void BINReader(byte[] data)
+        {
+            ButtonSETable = null; ChainSlideSETable = null; SlideSETable = null; SliderTouchSETable = null;
+            CollectionCardTable = null; CustomizeItemTable = null;
+            ModuleTable = null; PlateTable = null; PVList = null;
+
+            dict = new TableDict();
+            string[] strData = data.ToUTF8().Replace("\r\n", "\n").Replace("\r", "\n").Split('\n');
+            for (i0 = 0; i0 < strData.Length; i0++)
+                dict.GD(strData[i0]);
+            strData = null;
+
+            int length;
+            string name;
+            if (dict.FV(out length, "btn_se.data_list.length"))
+            {
+                ButtonSETable = new ButtonSE[length];
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "btn_se" + c + i0 + c;
+
+                    ref ButtonSE btn = ref ButtonSETable[i0];
+                    dict.FV(out btn.    ID   , name +      "id"   );
+                    dict.FV(out btn.    Name , name +      "name" );
+                    dict.FV(out btn.  SEName , name +   "se_name" );
+                    dict.FV(out btn.SortIndex, name + "sort_index");
+
+                    btn.Start = GetStartTableDate(dict, name);
+                    btn.End   =   GetEndTableDate(dict, name);
+                }
+            }
+            else if (dict.FV(out length, "chainslide_se.data_list.length"))
+            {
+                ChainSlideSETable = new ChainSlideSE[length];
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "chainslide_se" + c + i0 + c;
+
+                    ref ChainSlideSE csld = ref ChainSlideSETable[i0];
+                    dict.FV(out csld.         ID   , name +            "id"   );
+                    dict.FV(out csld.         Name , name +            "name" );
+                    dict.FV(out csld.  FirstSEName , name +   "first_se_name" );
+                    dict.FV(out csld.FailureSEName , name + "failure_se_name" );
+                    dict.FV(out csld.     SortIndex, name +       "sort_index");
+                    dict.FV(out csld.    SubSEName , name +     "sub_se_name" );
+                    dict.FV(out csld.SuccessSEName , name + "success_se_name" );
+                    
+                    csld.Start = GetStartTableDate(dict, name);
+                    csld.End   =   GetEndTableDate(dict, name);
+                }
+            }
+            else if (dict.FV(out length, "collection_card.data_list.length"))
+            {
+                CollectionCardTable = new CollectionCard[length];
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "collection_card" + c + i0 + c;
+
+                    ref CollectionCard clcrd = ref CollectionCardTable[i0];
+                    dict.FV(out clcrd.Chara       , name + "chara"        );
+                    dict.FV(out clcrd.DispNum     , name + "disp_num"     );
+                    dict.FV(out clcrd.DivaProParam, name + "divapro_param");
+                    dict.FV(out clcrd.ID          , name + "id"           );
+                    dict.FV(out clcrd.ModuleAuthor, name + "module_author");
+                    dict.FV(out clcrd.Name        , name + "name"         );
+                    dict.FV(out clcrd.NameReading , name + "name_reading" );
+                    dict.FV(out clcrd.NG          , name + "ng"           );
+                    dict.FV(out clcrd.SortIndex   , name + "sort_idx"     );
+                    dict.FV(out clcrd.Type        , name + "type"         );
+                    dict.FV(out clcrd.TypeParam   , name + "type_param"   );
+                    dict.FV(out clcrd.WallParam   , name + "wall_param"   );
+
+                    clcrd.Start = GetStartTableDate(dict, name);
+                    clcrd.End   =   GetEndTableDate(dict, name);
+                }
+            }
+            else if (dict.FV(out length, "cstm_item.data_list.length"))
+            {
+                CustomizeItemTable = new CustomizeItem[length];
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "cstm_item" + c + i0 + c;
+
+                    ref CustomizeItem czitm = ref CustomizeItemTable[i0];
+                    dict.FV(out czitm.Chara    , name + "chara"     );
+                    dict.FV(out czitm.ID       , name + "id"        );
+                    dict.FV(out czitm.Name     , name + "name"      );
+                    dict.FV(out czitm.NG       , name + "ng"        );
+                    dict.FV(out czitm.ObjID    , name + "obj_id"    );
+                    dict.FV(out czitm.Parts    , name + "parts"     );
+                    dict.FV(out czitm.SellType , name + "sell_type" );
+                    dict.FV(out czitm.ShopPrice, name + "shop_price");
+                    dict.FV(out czitm.SortIndex, name + "sort_index");
+                    
+                    czitm.ShopStart = GetStartTableDate(dict, name + "shop_");
+                    czitm.ShopEnd   =   GetEndTableDate(dict, name + "shop_");
+                }
+            }
+            else if (dict.FV(out length, "module.data_list.length"))
+            {
+                ModuleTable = new Module[length];
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "module" + c + i0 + c;
+
+                    ref Module mdl = ref ModuleTable[i0];
+                    dict.FV(out mdl.Attribute, name + "attr"      );
+                    dict.FV(out mdl.Chara    , name + "chara"     );
+                    dict.FV(out mdl.Costume  , name + "cos"       );
+                    dict.FV(out mdl.ID       , name + "id"        );
+                    dict.FV(out mdl.Name     , name + "name"      );
+                    dict.FV(out mdl.NG       , name + "ng"        );
+                    dict.FV(out mdl.ShopPrice, name + "shop_price");
+                    dict.FV(out mdl.SortIndex, name + "sort_index");
+                    
+                    mdl.ShopStart = GetStartTableDate(dict, name + "shop_");
+                    mdl.ShopEnd   =   GetEndTableDate(dict, name + "shop_");
+                }
+            }
+            else if (dict.FV(out length, "plate.data_list.length"))
+            {
+                PlateTable = new Plate[length];
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "plate" + c + i0 + c;
+
+                    ref Plate plt = ref PlateTable[i0];
+                    dict.FV(out plt.Alpha       , name + "alpha"         );
+                    dict.FV(out plt.BaseID      , name + "base_id"       );
+                    dict.FV(out plt.Border      , name + "border"        );
+                    dict.FV(out plt.ColorB      , name + "color_b"       );
+                    dict.FV(out plt.ColorG      , name + "color_g"       );
+                    dict.FV(out plt.ColorR      , name + "color_r"       );
+                    dict.FV(out plt.Font        , name + "font"          );
+                    dict.FV(out plt.ID          , name + "id"            );
+                    dict.FV(out plt.Shadow      , name + "shadow"        );
+                    dict.FV(out plt.ShadowAlpha , name + "shadow_alpha"  );
+                    dict.FV(out plt.ShadowColorB, name + "shadow_color_b");
+                    dict.FV(out plt.ShadowColorG, name + "shadow_color_g");
+                    dict.FV(out plt.ShadowColorR, name + "shadow_color_r");
+                }
+            }
+            else if (dict.FV(out length, "pv_list.data_list.length"))
+            {
+                PVList = new PV[length];
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "pv_list" + c + i0 + c;
+
+                    ref PV pv = ref PVList[i0];
+                    dict.FV(out pv.ID    , name + "id"    );
+                    dict.FV(out pv.Ignore, name + "ignore");
+                    dict.FV(out pv.Name  , name + "name"  );
+                    
+                    pv.AdvStart = GetStartTableDate(dict, name + "adv_demo_");
+                    pv.AdvEnd   =   GetEndTableDate(dict, name + "adv_demo_");
+                    
+                    pv.Easy    = GetDifficulty(dict, name + "easy"    + c);
+                    pv.Encore  = GetDifficulty(dict, name + "encore"  + c);
+                    pv.Extreme = GetDifficulty(dict, name + "extreme" + c);
+                    pv.Hard    = GetDifficulty(dict, name + "hard"    + c);
+                    pv.Normal  = GetDifficulty(dict, name + "normal"  + c);
+                }
+
+                static PV.Difficulty[] GetDifficulty(TableDict dict, string name)
+                {
+                    int len, val;
+                    if (!dict.FV(out len, name + "length") || len < 0) return null;
+
+                    PV.Difficulty[] arr = new PV.Difficulty[len];
+                    for (int i = 0; i < len; i++)
+                    {
+                        if (dict.FV(out val, $"{name}{i}.edition")) arr[i].Edition = val;
+                        if (dict.FV(out val, $"{name}{i}.ver"    )) arr[i].Version = val;
+
+                        arr[i].Start = GetStartTableDate(dict, $"{name}{i}.");
+                        arr[i].End   =   GetEndTableDate(dict, $"{name}{i}.");
+                    }
+                    return arr;
+                }
+            }
+            else if (dict.FV(out length, "slide_se.data_list.length"))
+            {
+                SlideSETable = new SlideSE[length];
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "slide_se" + c + i0 + c;
+
+                    ref SlideSE sld = ref SlideSETable[i0];
+                    dict.FV(out sld.    ID   , name +      "id"   );
+                    dict.FV(out sld.    Name , name +      "name" );
+                    dict.FV(out sld.  SEName , name +   "se_name" );
+                    dict.FV(out sld.SortIndex, name + "sort_index");
+                    
+                    sld.Start = GetStartTableDate(dict, name);
+                    sld.End   =   GetEndTableDate(dict, name);
+                }
+            }
+            else if (dict.FV(out length, "slidertouch_se.data_list.length"))
+            {
+                SliderTouchSETable = new SliderTouchSE[length];
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "slidertouch_se" + c + i0 + c;
+
+                    ref SliderTouchSE stld = ref SliderTouchSETable[i0];
+                    dict.FV(out stld.    ID   , name +      "id"   );
+                    dict.FV(out stld.    Name , name +      "name" );
+                    dict.FV(out stld.  SEName , name +   "se_name" );
+                    dict.FV(out stld.SortIndex, name + "sort_index");
+
+                    stld.Start = GetStartTableDate(dict, name);
+                    stld.End   =   GetEndTableDate(dict, name);
+                }
+            }
+
+            static TableDate GetStartTableDate(TableDict dict, string name)
+            {
+                TableDate date = default; date.SDL(); int val;
+                if (dict.FV(out val, name + "st_day"  )) date.Day   = val;
+                if (dict.FV(out val, name + "st_month")) date.Month = val;
+                if (dict.FV(out val, name + "st_year" )) date.Year  = val;
+                return date;
+            }
+
+            static TableDate GetEndTableDate(TableDict dict, string name)
+            {
+                TableDate date = default; date.SDU(); int val;
+                if (dict.FV(out val, name + "ed_day"  )) date.Day   = val;
+                if (dict.FV(out val, name + "ed_month")) date.Month = val;
+                if (dict.FV(out val, name + "ed_year" )) date.Year  = val;
+                return date;
+            }
+        }
+
+        public void BINWriter(string file)
+        {
+            int[] so;
+            int length;
+            string name;
+
+            if (ButtonSETable != null)
+            {
+                _IO = File.OpenWriter(file + ".bin", true);
+                length = ButtonSETable.Length;
+                so = length.SW();
+                WriteEmptyLines(_IO, length);
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "btn_se" + c + so[i0] + c;
+
+                    ref ButtonSE btn = ref ButtonSETable[so[i0]];
+                    WriteEndTableDate(_IO, name, btn.End);
+                    W(name +      "id"   , btn.    ID   );
+                    W(name +      "name" , btn.    Name );
+                    W(name +   "se_name" , btn.  SEName );
+                    W(name + "sort_index", btn.SortIndex);
+                    WriteStartTableDate(_IO, name, btn.Start);
+                }
+                W("btn_se.data_list.length", length);
+                _IO.W("kind=0\n");
+                _IO.D();
+            }
+            else if (ChainSlideSETable != null)
+            {
+                _IO = File.OpenWriter(file + ".bin", true);
+                length = ChainSlideSETable.Length;
+                so = length.SW();
+                WriteEmptyLines(_IO, length);
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "chainslide_se" + c + so[i0] + c;
+
+                    ref ChainSlideSE csld = ref ChainSlideSETable[so[i0]];
+                    WriteEndTableDate(_IO, name, csld.End);
+                    W(name + "failure_se_name" , csld.FailureSEName );
+                    W(name +   "first_se_name" , csld.  FirstSEName );
+                    W(name +            "id"   , csld.         ID   );
+                    W(name +            "name" , csld.         Name );
+                    W(name +       "sort_index", csld.     SortIndex);
+                    WriteStartTableDate(_IO, name, csld.Start);
+                    W(name +     "sub_se_name" , csld.    SubSEName );
+                    W(name + "success_se_name" , csld.SuccessSEName );
+                }
+                W("chainslide_se.data_list.length", length);
+                _IO.W("kind=2\n");
+                _IO.D();
+            }
+            else if (CollectionCardTable != null)
+            {
+                _IO = File.OpenWriter(file + ".bin", true);
+                length = CollectionCardTable.Length;
+                so = length.SW();
+                WriteEmptyLines(_IO, length);
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "collection_card" + c + so[i0] + c;
+
+                    ref CollectionCard clcrd = ref CollectionCardTable[so[i0]];
+                    W(name + "chara"        , clcrd.Chara       );
+                    W(name + "disp_num"     , clcrd.DispNum     );
+                    W(name + "divapro_param", clcrd.DivaProParam);
+                    WriteEndTableDate(_IO, name, clcrd.End);
+                    W(name + "id"           , clcrd.ID          );
+                    W(name + "module_author", clcrd.ModuleAuthor);
+                    W(name + "name"         , clcrd.Name        );
+                    W(name + "name_reading" , clcrd.NameReading );
+                    W(name + "ng"           , clcrd.NG          );
+                    W(name + "sort_idx"     , clcrd.SortIndex   );
+                    WriteStartTableDate(_IO, name, clcrd.Start);
+                    W(name + "type"         , clcrd.Type        );
+                    W(name + "type_param"   , clcrd.TypeParam   );
+                    W(name + "wall_param"   , clcrd.WallParam   );
+                }
+                W("collection_card.data_list.length", length);
+                _IO.W("patch=0\n");
+                _IO.W("version=0\n");
+                _IO.D();
+            }
+            else if (CustomizeItemTable != null)
+            {
+                _IO = File.OpenWriter(file + ".bin", true);
+                length = CustomizeItemTable.Length;
+                so = length.SW();
+                WriteEmptyLines(_IO, length);
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "cstm_item" + c + so[i0] + c;
+
+                    ref CustomizeItem czitm = ref CustomizeItemTable[so[i0]];
+                    W(name + "chara"     , czitm.Chara    );
+                    W(name + "id"        , czitm.ID       );
+                    W(name + "name"      , czitm.Name     );
+                    W(name + "ng"        , czitm.NG       );
+                    W(name + "obj_id"    , czitm.ObjID    );
+                    W(name + "parts"     , czitm.Parts    );
+                    W(name + "sell_type" , czitm.SellType );
+                    WriteEndTableDate(_IO, name + "shop_", czitm.ShopEnd);
+                    W(name + "shop_price", czitm.ShopPrice);
+                    WriteStartTableDate(_IO, name + "shop_", czitm.ShopStart);
+                    W(name + "sort_index", czitm.SortIndex);
+                }
+                W("cstm_item.data_list.length", length);
+                _IO.W("patch=0\n");
+                _IO.W("version=0\n");
+                _IO.D();
+            }
+            else if (ModuleTable != null)
+            {
+                _IO = File.OpenWriter(file + ".bin", true);
+                length = ModuleTable.Length;
+                so = length.SW();
+                WriteEmptyLines(_IO, length);
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "module" + c + so[i0] + c;
+
+                    ref Module mdl = ref ModuleTable[so[i0]];
+                    W(name + "attr"      , mdl.Attribute);
+                    W(name + "chara"     , mdl.Chara    );
+                    W(name + "cos"       , mdl.Costume  );
+                    W(name + "id"        , mdl.ID       );
+                    W(name + "name"      , mdl.Name     );
+                    W(name + "ng"        , mdl.NG       );
+                    WriteEndTableDate(_IO, name + "shop_", mdl.ShopEnd);
+                    W(name + "shop_price", mdl.ShopPrice);
+                    WriteStartTableDate(_IO, name + "shop_", mdl.ShopStart);
+                    W(name + "sort_index", mdl.SortIndex);
+                }
+                W("module.data_list.length", length);
+                _IO.D();
+            }
+            else if (PlateTable != null)
+            {
+                _IO = File.OpenWriter(file + ".bin", true);
+                length = PlateTable.Length;
+                so = length.SW();
+                WriteEmptyLines(_IO, length);
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "plate" + c + so[i0] + c;
+
+                    ref Plate plt = ref PlateTable[so[i0]];
+                    W(name + "alpha"         , plt.Alpha       );
+                    W(name + "base_id"       , plt.BaseID      );
+                    W(name + "border"        , plt.Border      );
+                    W(name + "color_b"       , plt.ColorB      );
+                    W(name + "color_g"       , plt.ColorG      );
+                    W(name + "color_r"       , plt.ColorR      );
+                    W(name + "font"          , plt.Font        );
+                    W(name + "id"            , plt.ID          );
+                    W(name + "shadow"        , plt.Shadow      );
+                    W(name + "shadow_alpha"  , plt.ShadowAlpha );
+                    W(name + "shadow_color_b", plt.ShadowColorB);
+                    W(name + "shadow_color_g", plt.ShadowColorG);
+                    W(name + "shadow_color_r", plt.ShadowColorR);
+                }
+                W("plate.data_list.length", length);
+                _IO.D();
+            }
+            else if (PVList != null)
+            {
+                _IO = File.OpenWriter(file + ".bin", true);
+                length = PVList.Length;
+                so = length.SW();
+                WriteEmptyLines(_IO, length);
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "pv_list" + c + so[i0] + c;
+
+                    ref PV pv = ref PVList[so[i0]];
+                      WriteEndTableDate(_IO, name + "adv_demo_", pv.AdvEnd  );
+                    WriteStartTableDate(_IO, name + "adv_demo_", pv.AdvStart);
+
+                    WriteDifficulty(_IO, name +    "easy.", pv.Easy   );
+                    WriteDifficulty(_IO, name +  "encore.", pv.Encore );
+                    WriteDifficulty(_IO, name + "extreme.", pv.Extreme);
+                    WriteDifficulty(_IO, name +    "hard.", pv.Hard   );
+                    W(name + "id"    , pv.ID    );
+                    W(name + "ignore", pv.Ignore);
+                    W(name + "name"  , pv.Name  );
+                    WriteDifficulty(_IO, name + "extreme.", pv.Normal );
+                }
+                W("pv_list.data_list.length", length);
+                _IO.D();
+
+                static void WriteDifficulty(Stream _IO, string name, PV.Difficulty[] arr)
+                {
+                    if (arr == null) { _IO.W($"{name}.length=0\n"); return; }
+
+                    int length = arr.Length;
+                    int[] so = length.SW();
+                    for (int i = 0; i < length; i++)
+                    {
+                        ref PV.Difficulty diff = ref arr[so[i]];
+                    
+                        WriteStartTableDate(_IO, $"{name}{i}.", diff.Start);
+                        _IO.W($"{name}{i}.edition" + $"={diff.Edition}\n");
+                          WriteEndTableDate(_IO, $"{name}{i}.", diff.End  );
+                        _IO.W($"{name}{i}.ver"     + $"={diff.Version}\n");
+                    }
+                    _IO.W($"{name}.length={length}\n");
+                }
+            }
+            else if (SlideSETable != null)
+            {
+                _IO = File.OpenWriter(file + ".bin", true);
+                length = SlideSETable.Length;
+                so = length.SW();
+                WriteEmptyLines(_IO, length);
+                _IO.W("kind=1\n");
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "slide_se" + c + so[i0] + c;
+
+                    ref SlideSE sld = ref SlideSETable[so[i0]];
+                    WriteEndTableDate(_IO, name, sld.End);
+                    W(name +      "id"   , sld.    ID   );
+                    W(name +      "name" , sld.    Name );
+                    W(name +   "se_name" , sld.  SEName );
+                    W(name + "sort_index", sld.SortIndex);
+                    WriteStartTableDate(_IO, name, sld.Start);
+                }
+                W("slide_se.data_list.length", length);
+                _IO.D();
+            }
+            else if (SliderTouchSETable != null)
+            {
+                _IO = File.OpenWriter(file + ".bin", true);
+                length = SliderTouchSETable.Length;
+                so = length.SW();
+                WriteEmptyLines(_IO, length);
+                _IO.W("kind=3\n");
+                for (i0 = 0; i0 < length; i0++)
+                {
+                    name = "slidertouch_se" + c + so[i0] + c;
+
+                    ref SliderTouchSE sldt = ref SliderTouchSETable[so[i0]];
+                    WriteEndTableDate(_IO, name, sldt.End);
+                    W(name +      "id"   , sldt.    ID   );
+                    W(name +      "name" , sldt.    Name );
+                    W(name +   "se_name" , sldt.  SEName );
+                    W(name + "sort_index", sldt.SortIndex);
+                    WriteStartTableDate(_IO, name, sldt.Start);
+                }
+                W("slidertouch_se.data_list.length", length);
+                _IO.D();
+            }
+
+            static void WriteEmptyLines(Stream _IO, int count)
+            { for (int i = 0; i < count; i++) _IO.W("#---------------------------------------------\n"); }
+            
+            static void WriteStartTableDate(Stream _IO, string name, TableDate date)
+            {
+                _IO.W(name + "st_day"   + "=" + date.Day   + "\n");
+                _IO.W(name + "st_month" + "=" + date.Month + "\n");
+                _IO.W(name + "st_year"  + "=" + date.Year  + "\n");
+            }
+            
+            static void WriteEndTableDate(Stream _IO, string name, TableDate date)
+            {
+                _IO.W(name + "ed_day"   + "=" + date.Day   + "\n");
+                _IO.W(name + "ed_month" + "=" + date.Month + "\n");
+                _IO.W(name + "ed_year"  + "=" + date.Year  + "\n");
+            }
+        }
+
+        private void W(string Data,   long  val) =>
+                           _IO.W(Data + "=" + val + "\n");
+        private void W(string Data, string  val)
+        { if (val != null) _IO.W(Data + "=" + val + "\n"); }
+
+        public void MsgPackReader(string file, bool json)
+        {
+            ButtonSETable = null; ChainSlideSETable = null; SlideSETable = null; SliderTouchSETable = null;
+            CollectionCardTable = null; CustomizeItemTable = null;
+            ModuleTable = null; PlateTable = null; PVList = null;
+
+            MsgPack msgPack = file.ReadMPAllAtOnce(json);
+            MsgPack temp;
+            if ((temp = msgPack["ButtonSETable", true]).NotNull)
+            {
+                ButtonSETable = new ButtonSE[temp.Array.Length];
+                for (i0 = 0; i0 < ButtonSETable.Length; i0++)
+                {
+                    MsgPack btnMP = temp[i0];
+                    ref ButtonSE btn = ref ButtonSETable[i0];
+                    btn.End  .SV(btnMP.RnI32("End"  ),  true);
+                    btn.Start.SV(btnMP.RnI32("Start"), false);
+
+                    btnMP.R(    "ID"   , out btn.    ID   );
+                    btnMP.R(    "Name" , out btn.    Name );
+                    btnMP.R(  "SEName" , out btn.  SEName );
+                    btnMP.R("SortIndex", out btn.SortIndex);
+                }
+            }
+            else if ((temp = msgPack["ChainSlideSETable", true]).NotNull)
+            {
+                ChainSlideSETable = new ChainSlideSE[temp.Array.Length];
+                for (i0 = 0; i0 < ChainSlideSETable.Length; i0++)
+                {
+                    MsgPack csldMP = temp[i0];
+                    ref ChainSlideSE csld = ref ChainSlideSETable[i0];
+                    csld.End  .SV(csldMP.RnI32("End"  ),  true);
+                    csld.Start.SV(csldMP.RnI32("Start"), false);
+                    
+                    csldMP.R("FailureSEName" , out csld.FailureSEName );
+                    csldMP.R(  "FirstSEName" , out csld.  FirstSEName );
+                    csldMP.R(         "ID"   , out csld.         ID   );
+                    csldMP.R(         "Name" , out csld.         Name );
+                    csldMP.R(     "SortIndex", out csld.     SortIndex);
+                    csldMP.R(    "SubSEName" , out csld.    SubSEName );
+                    csldMP.R("SuccessSEName" , out csld.SuccessSEName );
+                }
+            }
+            else if ((temp = msgPack["CollectionCardTable", true]).NotNull)
+            {
+                CollectionCardTable = new CollectionCard[temp.Array.Length];
+                for (i0 = 0; i0 < CollectionCardTable.Length; i0++)
+                {
+                    MsgPack clcrdMP = temp[i0];
+                    ref CollectionCard clcrd = ref CollectionCardTable[i0];
+                    clcrd.End  .SV(clcrdMP.RnI32("End"  ),  true);
+                    clcrd.Start.SV(clcrdMP.RnI32("Start"), false);
+                    
+                    clcrdMP.R("Chara"       , out clcrd.Chara       );
+                    clcrdMP.R("DispNum"     , out clcrd.DispNum     );
+                    clcrdMP.R("DivaProParam", out clcrd.DivaProParam);
+                    clcrdMP.R("ID"          , out clcrd.ID          );
+                    clcrdMP.R("ModuleAuthor", out clcrd.ModuleAuthor);
+                    clcrdMP.R("Name"        , out clcrd.Name        );
+                    clcrdMP.R("NameReading" , out clcrd.NameReading );
+                    clcrdMP.R("NG"          , out clcrd.NG          );
+                    clcrdMP.R("SortIndex"   , out clcrd.SortIndex   );
+                    clcrdMP.R("Type"        , out clcrd.Type        );
+                    clcrdMP.R("TypeParam"   , out clcrd.TypeParam   );
+                    clcrdMP.R("WallParam"   , out clcrd.WallParam   );
+                }
+            }
+            else if ((temp = msgPack["CustomizeItemTable", true]).NotNull)
+            {
+                CustomizeItemTable = new CustomizeItem[temp.Array.Length];
+                for (i0 = 0; i0 < CustomizeItemTable.Length; i0++)
+                {
+                    MsgPack czitmMP = temp[i0];
+                    ref CustomizeItem czitm = ref CustomizeItemTable[i0];
+                    czitm.ShopEnd  .SV(czitmMP.RnI32("ShopEnd"  ),  true);
+                    czitm.ShopStart.SV(czitmMP.RnI32("ShopStart"), false);
+
+                    czitmMP.R("Chara"    , out czitm.Chara    );
+                    czitmMP.R("ID"       , out czitm.ID       );
+                    czitmMP.R("Name"     , out czitm.Name     );
+                    czitmMP.R("NG"       , out czitm.NG       );
+                    czitmMP.R("ObjID"    , out czitm.ObjID    );
+                    czitmMP.R("Parts"    , out czitm.Parts    );
+                    czitmMP.R("SellType" , out czitm.SellType );
+                    czitmMP.R("ShopPrice", out czitm.ShopPrice);
+                    czitmMP.R("SortIndex", out czitm.SortIndex);
+                }
+            }
+            else if ((temp = msgPack["ModuleTable", true]).NotNull)
+            {
+                ModuleTable = new Module[temp.Array.Length];
+                for (i0 = 0; i0 < ModuleTable.Length; i0++)
+                {
+                    MsgPack mdlMP = temp[i0];
+                    ref Module mdl = ref ModuleTable[i0];
+                    mdl.ShopEnd  .SV(mdlMP.RnI32("ShopEnd"  ),  true);
+                    mdl.ShopStart.SV(mdlMP.RnI32("ShopStart"), false);
+                    
+                    mdlMP.R("Attribute", out mdl.Attribute);
+                    mdlMP.R("Costume"  , out mdl.Costume  );
+                    mdlMP.R("Chara"    , out mdl.Chara    );
+                    mdlMP.R("ID"       , out mdl.ID       );
+                    mdlMP.R("Name"     , out mdl.Name     );
+                    mdlMP.R("NG"       , out mdl.NG       );
+                    mdlMP.R("ShopPrice", out mdl.ShopPrice);
+                    mdlMP.R("SortIndex", out mdl.SortIndex);
+                }
+            }
+            else if ((temp = msgPack["PlateTable", true]).NotNull)
+            {
+                PlateTable = new Plate[temp.Array.Length];
+                for (i0 = 0; i0 < PlateTable.Length; i0++)
+                {
+                    MsgPack pltMP = temp[i0];
+                    ref Plate plt = ref PlateTable[i0];
+                    pltMP.R("Alpha"       , out plt.Alpha       );
+                    pltMP.R("BaseID"      , out plt.BaseID      );
+                    pltMP.R("Border"      , out plt.Border      );
+                    pltMP.R("ColorB"      , out plt.ColorB      );
+                    pltMP.R("ColorG"      , out plt.ColorG      );
+                    pltMP.R("ColorR"      , out plt.ColorR      );
+                    pltMP.R("Font"        , out plt.Font        );
+                    pltMP.R("ID"          , out plt.ID          );
+                    pltMP.R("Shadow"      , out plt.Shadow      );
+                    pltMP.R("ShadowAlpha" , out plt.ShadowAlpha );
+                    pltMP.R("ShadowColorB", out plt.ShadowColorB);
+                    pltMP.R("ShadowColorG", out plt.ShadowColorG);
+                    pltMP.R("ShadowColorR", out plt.ShadowColorR);
+                }
+            }
+            else if ((temp = msgPack["PV", true]).NotNull)
+            {
+                PVList = new PV[temp.Array.Length];
+                for (i0 = 0; i0 < PVList.Length; i0++)
+                {
+                    MsgPack pvMP = temp[i0];
+                    ref PV pv = ref PVList[i0];
+                    pv.AdvEnd  .SV(pvMP.RnI32("AdvEnd"  ),  true);
+                    pv.AdvStart.SV(pvMP.RnI32("AdvStart"), false);
+                    
+                    pvMP.R("ID"    , out pv.ID    );
+                    pvMP.R("Ignore", out pv.Ignore);
+                    pvMP.R("Name"  , out pv.Name  );
+
+                    pv.Easy    = GetDifficulty(pvMP, "Easy"   );
+                    pv.Normal  = GetDifficulty(pvMP, "Normal" );
+                    pv.Hard    = GetDifficulty(pvMP, "Hard"   );
+                    pv.Extreme = GetDifficulty(pvMP, "Extreme");
+                    pv.Encore  = GetDifficulty(pvMP, "Encore" );
+                }
+
+                static PV.Difficulty[] GetDifficulty(MsgPack mp, string name)
+                {
+                    MsgPack t;
+                    if ((t = mp[name, true]).IsNull) return null;
+                    
+                    PV.Difficulty[] arr = new PV.Difficulty[t.Array.Length];
+                    for (int i = 0; i < arr.Length; i++)
+                    {
+                        MsgPack pvMP = t[i];
+                        ref PV.Difficulty diff = ref arr[i];
+                        diff.End  .SV(pvMP.RnI32("End"  ),  true);
+                        diff.Start.SV(pvMP.RnI32("Start"), false);
+                    
+                        pvMP.R("Edition", out diff.Edition);
+                        pvMP.R("Version", out diff.Version);
+                    }
+                    return arr;
+                }
+            }
+            else if ((temp = msgPack["SlideSETable", true]).NotNull)
+            {
+                SlideSETable = new SlideSE[temp.Array.Length];
+                for (i0 = 0; i0 < SlideSETable.Length; i0++)
+                {
+                    MsgPack sldMP = temp[i0];
+                    ref SlideSE sld = ref SlideSETable[i0];
+                    sld.End  .SV(sldMP.RnI32("End"  ),  true);
+                    sld.Start.SV(sldMP.RnI32("Start"), false);
+                    
+                    sldMP.R(    "ID"   , out sld.    ID   );
+                    sldMP.R(    "Name" , out sld.    Name );
+                    sldMP.R(  "SEName" , out sld.  SEName );
+                    sldMP.R("SortIndex", out sld.SortIndex);
+                }
+            }
+            else if ((temp = msgPack["SliderTouchSETable", true]).NotNull)
+            {
+                SliderTouchSETable = new SliderTouchSE[temp.Array.Length];
+                for (i0 = 0; i0 < SliderTouchSETable.Length; i0++)
+                {
+                    MsgPack TEMP = temp[i0];
+                    ref SliderTouchSE sldt = ref SliderTouchSETable[i0];
+                    sldt.End  .SV(TEMP.RnI32("End"  ),  true);
+                    sldt.Start.SV(TEMP.RnI32("Start"), false);
+                    
+                    TEMP.R(    "ID"   , out sldt.    ID   );
+                    TEMP.R(    "Name" , out sldt.    Name );
+                    TEMP.R(  "SEName" , out sldt.  SEName );
+                    TEMP.R("SortIndex", out sldt.SortIndex);
+                }
+            }
+            temp.Dispose();
+            msgPack.Dispose();
+        }
+
+        public void MsgPackWriter(string file, bool json)
+        {
+            MsgPack msgPack = MsgPack.New;
+            if (ButtonSETable != null)
+            {
+                MsgPack buttonSETable = new MsgPack(ButtonSETable.Length, "ButtonSETable");
+                for (i0 = 0; i0 < ButtonSETable.Length; i0++)
+                {
+                    ref ButtonSE btn = ref ButtonSETable[i0];
+                    buttonSETable[i0] = MsgPack.New.Add(    "End"  , btn.End.Int  )
+                                                   .Add(    "ID"   , btn.    ID   )
+                                                   .Add(    "Name" , btn.    Name )
+                                                   .Add(  "SEName" , btn.  SEName )
+                                                   .Add("SortIndex", btn.SortIndex)
+                                                   .Add(    "Start", btn.Start.Int);
+                }
+                msgPack.Add(buttonSETable);
+            }
+            else if (ChainSlideSETable != null)
+            {
+                MsgPack chainSlideSETable = new MsgPack(ChainSlideSETable.Length, "ChainSlideSETable");
+                for (i0 = 0; i0 < ChainSlideSETable.Length; i0++)
+                {
+                    ref ChainSlideSE csld = ref ChainSlideSETable[i0];
+                    chainSlideSETable[i0] = MsgPack.New.Add(         "End"  , csld.     End.Int  )
+                                                       .Add("FailureSEName" , csld.FailureSEName )
+                                                       .Add(  "FirstSEName" , csld.  FirstSEName )
+                                                       .Add(         "ID"   , csld.         ID   )
+                                                       .Add(         "Name" , csld.         Name )
+                                                       .Add(    "SubSEName" , csld.    SubSEName )
+                                                       .Add("SuccessSEName" , csld.SuccessSEName )
+                                                       .Add(     "SortIndex", csld.     SortIndex)
+                                                       .Add(         "Start", csld.     Start.Int);
+                }
+                msgPack.Add(chainSlideSETable);
+            }
+            else if (CollectionCardTable != null)
+            {
+                MsgPack collectionCardTable = new MsgPack(CollectionCardTable.Length, "CollectionCardTable");
+                for (i0 = 0; i0 < CollectionCardTable.Length; i0++)
+                {
+                    ref CollectionCard clcrd = ref CollectionCardTable[i0];
+                    collectionCardTable[i0] = MsgPack.New.Add("Chara"       , clcrd.Chara       )
+                                                         .Add("DispNum"     , clcrd.DispNum     )
+                                                         .Add("DivaProParam", clcrd.DivaProParam)
+                                                         .Add("End"         , clcrd.End.Int     )
+                                                         .Add("ID"          , clcrd.ID          )
+                                                         .Add("ModuleAuthor", clcrd.ModuleAuthor)
+                                                         .Add("Name"        , clcrd.Name        )
+                                                         .Add("NameReading" , clcrd.NameReading )
+                                                         .Add("NG"          , clcrd.NG          )
+                                                         .Add("SortIndex"   , clcrd.SortIndex   )
+                                                         .Add("Start"       , clcrd.Start.Int   )
+                                                         .Add("Type"        , clcrd.Type        )
+                                                         .Add("TypeParam"   , clcrd.TypeParam   )
+                                                         .Add("WallParam"   , clcrd.WallParam   );
+                }
+                msgPack.Add(collectionCardTable);
+            }
+            else if (CustomizeItemTable != null)
+            {
+                MsgPack customizeItemTable = new MsgPack(CustomizeItemTable.Length, "CustomizeItemTable");
+                for (i0 = 0; i0 < CustomizeItemTable.Length; i0++)
+                {
+                    ref CustomizeItem czitm = ref CustomizeItemTable[i0];
+                    customizeItemTable[i0] = MsgPack.New.Add("Chara"    , czitm.Chara        )
+                                                        .Add("ID"       , czitm.ID           )
+                                                        .Add("Name"     , czitm.Name         )
+                                                        .Add("NG"       , czitm.NG           )
+                                                        .Add("ObjID"    , czitm.ObjID        )
+                                                        .Add("Parts"    , czitm.Parts        )
+                                                        .Add("SellType" , czitm.SellType     )
+                                                        .Add("ShopEnd"  , czitm.ShopEnd  .Int)
+                                                        .Add("ShopPrice", czitm.ShopPrice    )
+                                                        .Add("ShopStart", czitm.ShopStart.Int)
+                                                        .Add("SortIndex", czitm.SortIndex    );
+                }
+                msgPack.Add(customizeItemTable);
+            }
+            else if (ModuleTable != null)
+            {
+                MsgPack moduleTable = new MsgPack(ModuleTable.Length, "ModuleTable");
+                for (i0 = 0; i0 < ModuleTable.Length; i0++)
+                {
+                    ref Module mdl = ref ModuleTable[i0];
+                    moduleTable[i0] = MsgPack.New.Add("Attribute", mdl.Attribute    )
+                                                 .Add("Chara"    , mdl.Chara        )
+                                                 .Add("Costume"  , mdl.Costume      )
+                                                 .Add("ID"       , mdl.ID           )
+                                                 .Add("Name"     , mdl.Name         )
+                                                 .Add("NG"       , mdl.NG           )
+                                                 .Add("ShopEnd"  , mdl.ShopEnd  .Int)
+                                                 .Add("ShopPrice", mdl.ShopPrice    )
+                                                 .Add("ShopStart", mdl.ShopStart.Int)
+                                                 .Add("SortIndex", mdl.SortIndex    );
+                }
+                msgPack.Add(moduleTable);
+            }
+            else if (PlateTable != null)
+            {
+                MsgPack plateTable = new MsgPack(PlateTable.Length, "PlateTable");
+                for (i0 = 0; i0 < PlateTable.Length; i0++)
+                {
+                    ref Plate plt = ref PlateTable[i0];
+                    plateTable[i0] = MsgPack.New.Add("Alpha"       , plt.Alpha       )
+                                                .Add("BaseID"      , plt.BaseID      )
+                                                .Add("Border"      , plt.Border      )
+                                                .Add("ColorB"      , plt.ColorB      )
+                                                .Add("ColorG"      , plt.ColorG      )
+                                                .Add("ColorR"      , plt.ColorR      )
+                                                .Add("Font"        , plt.Font        )
+                                                .Add("ID"          , plt.ID          )
+                                                .Add("Shadow"      , plt.Shadow      )
+                                                .Add("ShadowAlpha" , plt.ShadowAlpha )
+                                                .Add("ShadowColorB", plt.ShadowColorB)
+                                                .Add("ShadowColorG", plt.ShadowColorG)
+                                                .Add("ShadowColorR", plt.ShadowColorR);
+                }
+                msgPack.Add(plateTable);
+            }
+            else if (PVList != null)
+            {
+                MsgPack pvList = new MsgPack(PVList.Length, "PVList");
+                for (i0 = 0; i0 < PVList.Length; i0++)
+                {
+                    ref PV pv = ref PVList[i0];
+                    MsgPack mp = MsgPack.New.Add("AdvEnd"  , pv.AdvEnd  .Int)
+                                            .Add("AdvStart", pv.AdvStart.Int);
+
+                    mp = mp.Add("ID"    , pv.ID    )
+                           .Add("Name"  , pv.Name  )
+                           .Add("Ignore", pv.Ignore);
+
+                    mp.Add(WriteDifficulty("Easy"   , pv.Easy   ));
+                    mp.Add(WriteDifficulty("Normal" , pv.Normal ));
+                    mp.Add(WriteDifficulty("Hard"   , pv.Hard   ));
+                    mp.Add(WriteDifficulty("Extreme", pv.Extreme));
+                    mp.Add(WriteDifficulty("Encore" , pv.Encore ));
+                    pvList[i0] = mp;
+                }
+                msgPack.Add(pvList);
+
+                static MsgPack WriteDifficulty(string name, PV.Difficulty[] arr)
+                {
+                    if (arr == null) return default;
+                    MsgPack mp = new MsgPack(arr.Length, name);
+                    for (int i = 0; i < arr.Length; i++)
+                    {
+                        ref PV.Difficulty diff = ref arr[i];
+                        mp[i] = MsgPack.New.Add("Edition", diff.Edition  )
+                                           .Add("End"    , diff.End.Int  )
+                                           .Add("Start"  , diff.Start.Int)
+                                           .Add("Version", diff.Version  );
+                    }
+                    return mp;
+                }
+            }
+            else if (SlideSETable != null)
+            {
+                MsgPack slideSETable = new MsgPack(SlideSETable.Length, "SlideSETable");
+                for (i0 = 0; i0 < SlideSETable.Length; i0++)
+                {
+                    ref SlideSE sld = ref SlideSETable[i0];
+                    slideSETable[i0] = MsgPack.New.Add(    "End"  , sld.End.Int  )
+                                                  .Add(    "ID"   , sld.    ID   )
+                                                  .Add(    "Name" , sld.    Name )
+                                                  .Add(  "SEName" , sld.  SEName )
+                                                  .Add("SortIndex", sld.SortIndex)
+                                                  .Add(    "Start", sld.Start.Int);
+                }
+                msgPack.Add(slideSETable);
+            }
+            else if (SliderTouchSETable != null)
+            {
+                MsgPack sliderTouchSETable = new MsgPack(SliderTouchSETable.Length, "SliderTouchSETable");
+                for (i0 = 0; i0 < SliderTouchSETable.Length; i0++)
+                {
+                    ref SliderTouchSE sldt = ref SliderTouchSETable[i0];
+                    sliderTouchSETable[i0] = MsgPack.New.Add(    "End"  , sldt.End.Int  )
+                                                        .Add(    "ID"   , sldt.    ID   )
+                                                        .Add(    "Name" , sldt.    Name )
+                                                        .Add(  "SEName" , sldt.  SEName )
+                                                        .Add("SortIndex", sldt.SortIndex)
+                                                        .Add(    "Start", sldt.Start.Int);
+                }
+                msgPack.Add(sliderTouchSETable);
+            }
+            if (msgPack.List.Count == 1) msgPack.Write(file, json);
+        }
+
+        private bool disposed;
+        public void Dispose()
+        {
+            if (disposed) return;
+            if (_IO != null) { _IO.D(); _IO = null; }
+            if (dict != null) { dict.Clear(); dict = null; }
+            ButtonSETable = null; ChainSlideSETable = null; SlideSETable = null; SliderTouchSETable = null;
+            CollectionCardTable = null; CustomizeItemTable = null;
+            ModuleTable = null; PlateTable = null; PVList = null;
+        }
+    }
+}
diff --git a/KKdMainLib/libdeflate.dll b/KKdMainLib/libdeflate.dll
new file mode 100644
index 0000000..8fa172c
Binary files /dev/null and b/KKdMainLib/libdeflate.dll differ
diff --git a/KKdSoundLib/DIVA.cs b/KKdSoundLib/DIVA.cs
index e8ee4c4..70a5646 100644
--- a/KKdSoundLib/DIVA.cs
+++ b/KKdSoundLib/DIVA.cs
@@ -20,9 +20,9 @@ namespace KKdSoundLib
             if (reader.RS(0x04) != "DIVA") { reader.C(); return; }
 
             reader.RI32();
-            Data.Size = reader.RU32();
-            Data.SampleRate = reader.RU32();
-            Data.SamplesCount = reader.RU32();
+            Data.Size = reader.RI32();
+            Data.SampleRate = reader.RI32();
+            Data.SamplesCount = reader.RI32();
             reader.RI64();
             Data.Channels = reader.RU16();
             reader.RU16();
@@ -195,9 +195,9 @@ namespace KKdSoundLib
 
         public struct DIVAFile
         {
-            public uint Size;
-            public uint SampleRate;
-            public uint SamplesCount;
+            public int Size;
+            public int SampleRate;
+            public int SamplesCount;
             public string Name;
             public ushort Channels;
             public byte[] Data;
diff --git a/KKdSoundLib/Extensions.cs b/KKdSoundLib/Extensions.cs
index 3910764..9ae3316 100644
--- a/KKdSoundLib/Extensions.cs
+++ b/KKdSoundLib/Extensions.cs
@@ -34,7 +34,7 @@ namespace KKdSoundLib
             if (Header.Format == 0x01 || Header.Format == 0x03 || Header.Format == 0xFFFE)
             {
                 Header.Channels = _IO.RU16();
-                Header.SampleRate = _IO.RU32();
+                Header.SampleRate = _IO.RI32();
                 _IO.RI32(); _IO.RI16();
                 Header.Bytes = _IO.RU16();
                 if (Header.Bytes % 8 != 0) return Header;
@@ -51,8 +51,8 @@ namespace KKdSoundLib
                 if (Header.Bytes == 8 && Header.Format == 1) return Header;
                 _IO.S(Offset + 0x14, 0);
                 if (_IO.RS(4) != "data") return Header;
-                Header.Size = _IO.RU32();
-                Header.HeaderSize = _IO.PU32;
+                Header.Size = _IO.RI32();
+                Header.HeaderSize = _IO.P;
                 Header.IsSupported = true;
                 return Header;
             }
diff --git a/KKdSoundLib/KKdSoundLib.csproj b/KKdSoundLib/KKdSoundLib.csproj
index c2ae048..8c67763 100644
--- a/KKdSoundLib/KKdSoundLib.csproj
+++ b/KKdSoundLib/KKdSoundLib.csproj
@@ -6,12 +6,12 @@
     <Configuration></Configuration>
     <Copyright>korenkonder © 2019-2020</Copyright>
     <Description>A simple library for working with Project Diva F/AFT/F2/X/FT audio files</Description>
-    <FileVersion>0.1.1.1</FileVersion>
+    <FileVersion>0.1.2.0</FileVersion>
     <PackageId>KKdSoundLib</PackageId>
     <Product>KKdSoundLib</Product>
     <TargetFramework>netstandard2.0</TargetFramework>
     <Title>KKdSoundLib</Title>
-    <Version>0.1.1.1</Version>
+    <Version>0.1.2.0</Version>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
     <PlatformTarget>AnyCPU</PlatformTarget>
diff --git a/KKdSoundLib/VAG.cs b/KKdSoundLib/VAG.cs
index 27c4efd..5f9e6c7 100644
--- a/KKdSoundLib/VAG.cs
+++ b/KKdSoundLib/VAG.cs
@@ -3,18 +3,17 @@ using KKdMainLib.IO;
 
 namespace KKdSoundLib
 {
-    public unsafe class VAG : System.IDisposable
+    public unsafe struct VAG : System.IDisposable
     {
         private int c, d0, d1, e, g, i, i1, i2, j, s, PrNR, ShF, PrNRCount;
-        private uint VBS;
+        private bool h;
+        private int VBS;
         private float f;
         private ushort ch;
-        private const uint BS = 28; //VAGBlockSize
-        private bool Success = false;
+        private const int BS = 28; //VAGBlockSize
+        private bool Success;
 
-        public VAGFile VAGData = new VAGFile();
-
-        public VAG() { VAGData = new VAGFile(); }
+        public VAGFile VAGData;
 
         public void VAGReader(string file)
         {
@@ -28,107 +27,71 @@ namespace KKdSoundLib
 
             VAGData.Version = reader.RU32E(true);
             reader.RU32();
-            VAGData.Size = reader.RU32E(true);
-            VAGData.SampleRate = reader.RU32E(true);
+            VAGData.Size = reader.RI32E(true);
+            VAGData.SampleRate = reader.RI32E(true);
             reader.RU32();
             reader.RU32();
             reader.RU16();
             VAGData.Channels = reader.RU16();
             if (VAGData.Channels < 2) VAGData.Channels = 1;
-            VAGData.Name = reader.RS(0x10);
+            byte[] name = reader.RBy(0x10);
+            for (i = 0; i < 0x10; i++)
+                VAGData.Name[i] = name[i];
+            name = null;
 
             bool HEVAG = VAGData.Version == 0x00020001 || VAGData.Version == 0x00030000;
             if (!HEVAG) VAGData.Channels = 1;
             ch = VAGData.Channels;
             VBS = BS * ch;
 
-            four_bit    = new int[BS]; temp_buffer = new int[BS];
-
-            S1 = new int[VAGData.Channels]; S2 = new int[VAGData.Channels];
-            S3 = new int[VAGData.Channels]; S4 = new int[VAGData.Channels];
-            if (VAGData.Size + 0x30 > reader.LI64) VAGData.Size = reader.LU32 - 0x30;
+            int[] samp = new int[ch * 4];
+            if (VAGData.Size + 0x30 > reader.LI64) VAGData.Size = reader.L - 0x30;
             VAGData.Size = (VAGData.Size / VAGData.Channels) >> 4;
             VAGData.Flags = new byte [VAGData.Size];
             VAGData.Data = new int[VAGData.Size * VBS];
-            fixed (int* four_bitPtr = four_bit)
-            fixed (int* temp_bufferPtr = temp_buffer)
-            fixed (int* S1Ptr = S1)
-            fixed (int* S2Ptr = S2)
-            fixed (int* S3Ptr = S3)
-            fixed (int* S4Ptr = S4)
-            fixed (int* HEVAG1Ptr = HEVAG1)
-            fixed (int* HEVAG2Ptr = HEVAG2)
-            fixed (int* HEVAG3Ptr = HEVAG3)
-            fixed (int* HEVAG4Ptr = HEVAG4)
+            fixed (int* sampPtr = samp)
+            fixed (int* shF = ShiftFactor)
+            fixed (int* HEVAG1 = VAG.HEVAG1)
+            fixed (int* HEVAG2 = VAG.HEVAG2)
+            fixed (int* HEVAG3 = VAG.HEVAG3)
+            fixed (int* HEVAG4 = VAG.HEVAG4)
             fixed (int* dataPtr = VAGData.Data)
             {
+                int* v1 = sampPtr;
+                int* v2 = sampPtr + ch;
+                int* v3 = sampPtr + ch * 2;
+                int* v4 = sampPtr + ch * 3;
                 int* localDataPtr = dataPtr;
-                if (HEVAG)
-                    for (i1 = 0; i1 < VAGData.Size; i1++, localDataPtr += VBS)
-                        for (c = 0; c < ch; c++)
-                        {
-                            s = reader.RU8();
-                            PrNR = (s & 0xF0) >> 4;
-                            ShF  =  s & 0x0F;
-                            s = reader.RU8();
-                            PrNR = (s & 0xF0) | PrNR;
-                            VAGData.Flags[i1] = (byte)(s & 0xF);
-
-                            for (i = 0, i2 = 1; i < BS; i += 2, i2 += 2)
-                            {
-                                s = reader.RU8();
-                                four_bitPtr[i ] = s & 0x0F;
-                                four_bitPtr[i2] = s & 0xF0;
-                                four_bitPtr[i2] >>= 4;
-                            }
-
-                            HEVAG_1 = HEVAG1Ptr[PrNR]; HEVAG_2 = HEVAG2Ptr[PrNR];
-                            HEVAG_3 = HEVAG3Ptr[PrNR]; HEVAG_4 = HEVAG4Ptr[PrNR];
-                            tS1 = S1Ptr[c]; tS2 = S2Ptr[c]; tS3 = S3Ptr[c]; tS4 = S4Ptr[c];
-                            ShFf = 20 - ShF;
-                            for (i = 0; i < BS; i++)
-                            {
-                                d0 = four_bitPtr[i];
-                                d0 = (d0 > 7 ? d0 - 16 : d0) << ShFf;
-
-                                g = ((tS1 * HEVAG_1 + tS2 * HEVAG_2 +
-                                      tS3 * HEVAG_3 + tS4 * HEVAG_4) >> 5) + d0;
-                                tS4 = tS3; tS3 = tS2; tS2 = tS1; tS1 = g >> 8;
-                                localDataPtr[i * ch + c] = g;
-                            }
-                            S1Ptr[c] = tS1; S2Ptr[c] = tS2; S3Ptr[c] = tS3; S4Ptr[c] = tS4;
-                        }
-                else
-                    for (i1 = 0; i1 < VAGData.Size; i1++, localDataPtr += VBS)
+                for (i1 = 0; i1 < VAGData.Size; i1++, localDataPtr += VBS)
+                    for (c = 0; c < ch; c++)
                     {
                         s = reader.RU8();
                         PrNR = (s & 0xF0) >> 4;
                         ShF  =  s & 0x0F;
                         s = reader.RU8();
+                        PrNR = (s & 0xF0) | PrNR;
                         VAGData.Flags[i1] = (byte)(s & 0xF);
 
                         for (i = 0, i2 = 1; i < BS; i += 2, i2 += 2)
                         {
                             s = reader.RU8();
-                            four_bitPtr[i ] = s & 0x0F;
-                            four_bitPtr[i2] = s & 0xF0;
-                            four_bitPtr[i2] >>= 4;
+                            fourBit[i ] =  s & 0x0F;
+                            fourBit[i2] = (s & 0xF0) >> 4;
                         }
 
-                        HEVAG_1 = HEVAG1Ptr[PrNR]; HEVAG_2 = HEVAG2Ptr[PrNR];
-                        tS1 = S1Ptr[c]; tS2 = S2Ptr[c];
+                        HEVAG_1 = HEVAG1[PrNR]; HEVAG_2 = HEVAG2[PrNR];
+                        HEVAG_3 = HEVAG3[PrNR]; HEVAG_4 = HEVAG4[PrNR];
+                        s1 = v1[c]; s2 = v2[c]; s3 = v3[c]; s4 = v4[c];
                         ShFf = 20 - ShF;
-                        i = 0;
                         for (i = 0; i < BS; i++)
                         {
-                            d0 = four_bitPtr[i];
-                            d0 = (d0 > 7 ? d0 - 16 : d0) << ShFf;
+                            d0 = shF[fourBit[i]] << ShFf;
 
-                            g = ((tS1 * HEVAG_1 + tS2 * HEVAG_2) >> 5) + d0;
-                            tS2 = tS1; tS1 = g >> 8;
+                            g = ((s1 * HEVAG_1 + s2 * HEVAG_2 + s3 * HEVAG_3 + s4 * HEVAG_4) >> 5) + d0;
+                            s4 = s3; s3 = s2; s2 = s1; s1 = g >> 8;
                             localDataPtr[i * ch + c] = g;
                         }
-                        S1Ptr[c] = tS1; S2Ptr[c] = tS2;
+                        v1[c] = s1; v2[c] = s2; v3[c] = s3; v4[c] = s4;
                     }
             }
 
@@ -136,134 +99,351 @@ namespace KKdSoundLib
             Success = true;
         }
 
-        public void WAVWriterStraight(string file, bool IgnoreEndFlags = false)
+        public void VAGWriter(string file, string choose)
         {
+            bool HEVAG = choose != "1";
             if (!Success) return;
-            byte Flag = VAGData.Flags[0];
-            if (Flag == 7) return;
-            WAV.Header Header = new WAV.Header();
-            Stream writer = File.OpenWriter(file + ".wav", true);
-            writer.PI64 = 0x2C;
+            Stream writer = File.OpenWriter(file + ".vag", true);
+            byte[] name = Path.GetFileName(file).ToASCII();
+            System.Array.Resize(ref name, 0x10);
+            for (i = 0; i < 0x10; i++)
+                VAGData.Name[i] = name[i];
+            PrNRCount = choose == "1" ? 5 : choose == "2" ? 5 : choose == "3" ? 32
+                : choose == "4" ? 32 : choose == "5" ? 64 : choose == "6" ? 96 : 128;
 
+            writer.W(0x70474156);
+            writer.WE(HEVAG ? 0x00020001 : 0x00000020, true);
+            writer.W(0);
+            writer.WE(((VAGData.Size + 1) * (HEVAG ? ch : 1)) << 4, true);
+            writer.WE(VAGData.SampleRate, true);
+            writer.W(0);
+            writer.W(0);
+            writer.W((ushort)0);
+            writer.W((ushort)(HEVAG ? VAGData.Channels : 0x1));
+            writer.W(name, 0x10);
+            writer.P = 0x30;
+            
+            int[] samp = new int[HEVAG ? ch * (PrNRCount > 29 ? 8 : 4) : 4];
+            fixed (int* sampPtr = samp)
+            fixed (int* HEVAG1 = VAG.HEVAG1)
+            fixed (int* HEVAG2 = VAG.HEVAG2)
+            fixed (int* HEVAG3 = VAG.HEVAG3)
+            fixed (int* HEVAG4 = VAG.HEVAG4)
             fixed (int* dataPtr = VAGData.Data)
             {
-                int* localDataPtr = dataPtr;
-                if (Flag < 8)
-                    for (i = 0; i < BS; i++)
+                c = HEVAG ? ch : 1;
+                int*  v1 = sampPtr;
+                int*  v2 = sampPtr + c;
+                int* tV1 = sampPtr + c * 2;
+                int* tV2 = sampPtr + c * 3;
+
+                for (i1 = 0; i1 < c; i1++)
+                {
+                     v1[i1] = 0;
+                     v2[i1] = 0;
+                    tV1[i1] = 0;
+                    tV2[i1] = 0;
+                }
+
+                if (HEVAG && PrNRCount > 29)
+                {
+                    int*  v3 = sampPtr + c * 4;
+                    int*  v4 = sampPtr + c * 5;
+                    int* tV3 = sampPtr + c * 6;
+                    int* tV4 = sampPtr + c * 7;
+
+                    for (i1 = 0; i1 < c; i1++)
+                    {
+                         v3[i1] = 0;
+                         v4[i1] = 0;
+                        tV3[i1] = 0;
+                        tV4[i1] = 0;
+                    }
+
+                    for (i1 = 0; i1 < VAGData.Size; i1++)
                         for (c = 0; c < ch; c++)
                         {
-                            f = (float)(localDataPtr[i * ch + c] / 8388608.0);
-                            writer.W(f);
+                            for (i = 0, h = false; i < BS; i++)
+                            {
+                                dataBuf[i] = dataPtr[i1 * BS * ch + i * ch + c];
+                                if (dataBuf[i] != 0) h = true;
+                            }
+
+                            if (h)
+                            { 
+                                Calc4BitsHEVAG(HEVAG1, HEVAG2, HEVAG3, HEVAG4, v1 + c, v2 + c,
+                                    v3 + c, v4 + c, tV1 + c, tV2 + c, tV3 + c, tV4 + c);
+
+                                s = ((PrNR & 0xF) << 4) | (ShF & 0xF);
+                                writer.W((byte)s);
+                                s = (PrNR & 0xF0) | (VAGData.Flags[i1] & 0xF);
+                                writer.W((byte)s);
+                                for (i = 0, i2 = 1; i < BS; i += 2, i2 += 2)
+                                {
+                                    s = ((fourBit[i2] & 0xF) << 4) | (fourBit[i] & 0xF);
+                                    writer.W((byte)s);
+                                }
+                            }
+                            else
+                            {
+                                 v1[c] = 0;  v2[c] = 0;  v3[c] = 0;  v4[c] = 0;
+                                tV1[c] = 0; tV2[c] = 0; tV3[c] = 0; tV4[c] = 0;
+                                s = (VAGData.Flags[i1] & 0xF) << 8;
+                                writer.W(s);
+                                writer.W(0);
+                                writer.W(0);
+                                writer.W(0);
+                            }
+                        }
+                }
+                else if (HEVAG)
+                    for (i1 = 0; i1 < VAGData.Size; i1++)
+                        for (c = 0; c < ch; c++)
+                        {
+                            for (i = 0, h = false; i < BS; i++)
+                            {
+                                dataBuf[i] = dataPtr[i1 * BS * ch + i * ch + c];
+                                if (dataBuf[i] != 0) h = true;
+                            }
+
+                            if (h)
+                            { 
+                                Calc4BitsVAG(HEVAG1, HEVAG2, v1 + c, v2 + c, tV1 + c, tV2 + c);
+
+                                s = ((PrNR & 0xF) << 4) | (ShF & 0xF);
+                                writer.W((byte)s);
+                                s = (PrNR & 0xF0) | (VAGData.Flags[i1] & 0xF);
+                                writer.W((byte)s);
+                                for (i = 0, i2 = 1; i < BS; i += 2, i2 += 2)
+                                {
+                                    s = ((fourBit[i2] & 0xF) << 4) | (fourBit[i] & 0xF);
+                                    writer.W((byte)s);
+                                }
+                            }
+                            else
+                            {
+                                 v1[c] = 0;  v2[c] = 0;
+                                tV1[c] = 0; tV2[c] = 0;
+                                s = (VAGData.Flags[i1] & 0xF) << 8;
+                                writer.W(s);
+                                writer.W(0);
+                                writer.W(0);
+                                writer.W(0);
+                            }
                         }
                 else
-                    for (i = 0; i < BS; i++)
-                        for (c = 0; c < ch; c++)
-                            writer.W(0f);
+                    for (i1 = 0; i1 < VAGData.Size; i1++)
+                    {
+                        for (i = 0, h = false; i < BS; i++)
+                        {
+                            for (c = 0, s = 0, dataBuf[i] = 0; c < ch; c++)
+                                dataBuf[i] += dataPtr[i1 * BS * ch + i * ch + c];
+                            dataBuf[i] /= ch;
+                            if (dataBuf[i] != 0) h = true;
+                        }
+                        
+                        if (h)
+                        { 
+                            Calc4BitsVAG(HEVAG1, HEVAG2, v1, v2, tV1, tV2);
 
-                for (i1 = 0, i2 = 0; i1 < VAGData.Size; i1++, localDataPtr += VBS)
-                {
-                    Flag = VAGData.Flags[i1];
-                    if (!IgnoreEndFlags && (Flag == 5 || Flag == 7)) break;
-                    if (Flag < 8)
-                        for (i = 0; i < BS; i++)
-                            for (c = 0; c < ch; c++)
+                            s = ((PrNR & 0xF) << 4) | (ShF & 0xF);
+                            writer.W((byte)s);
+                            s = VAGData.Flags[i1] & 0xF;
+                            writer.W((byte)s);
+                            for (i = 0, i2 = 1; i < BS; i += 2, i2 += 2)
                             {
-                                f = (float)(localDataPtr[i * ch + c] / 8388608.0);
-                                writer.W(f);
+                                s = ((fourBit[i2] & 0xF) << 4) | (fourBit[i] & 0xF);
+                                writer.W((byte)s);
                             }
-                    else
-                        for (i = 0; i < BS; i++)
-                            for (c = 0; c < ch; c++)
-                                writer.W(0f);
-
-                    if (!IgnoreEndFlags && Flag == 1) break;
-                }
+                        }
+                        else
+                        {
+                            * v1 = 0; * v2 = 0;
+                            *tV1 = 0; *tV2 = 0;
+                            s = (VAGData.Flags[i1] & 0xF) << 8;
+                            writer.W(s);
+                            writer.W(0);
+                            writer.W(0);
+                            writer.W(0);
+                        }
+                    }
             }
 
-            Header = new WAV.Header { Bytes = 4, Channels = ch, Format = 3, SampleRate =
-                VAGData.SampleRate, Size = writer.PU32 - 0x2C };
-            writer.W(Header, 0);
+            if (!HEVAG) ch = 1;
+            for (c = 0; c < ch; c++)
+            {
+                writer.W(0x77770700);
+                writer.W(0x77777777);
+                writer.W(0x77777777);
+                writer.W(0x77777777);
+            }
+
+            if (writer.P % 0x20 > 0)
+            {
+                writer.W(0x10101010);
+                writer.W(0x10101010);
+                writer.W(0x10101010);
+                writer.W(0x10101010);
+            }
             writer.C();
         }
+        
+        private fixed int dataBuf[(int)BS];
+        private fixed int fourBit[(int)BS];
+        private fixed int tempBuf[(int)BS];
+        private int err, max, min, ShM, s1, s2, s3, s4, tS1, tS2, tS3, tS4, PrNRf, ShFf;
+        private int HEVAG_1, HEVAG_2, HEVAG_3, HEVAG_4;
 
-        public void WAVWriter(string file, bool IgnoreEndFlags = false)
+        private void Calc4BitsVAG(int* HEVAG1, int* HEVAG2, int* v1, int* v2, int* tV1, int* tV2)
         {
-            if (!Success) return;
-            byte Flag = VAGData.Flags[0];
-            if (Flag == 7) return;
-            WAV.Header Header = new WAV.Header();
-            Stream writer;
-            if (!IgnoreEndFlags && Flag == 6) writer = File.OpenWriter(file + ".loop.0.wav", true);
-            else                              writer = File.OpenWriter(file +      ".0.wav", true);
-            writer.PI64 = 0x2C;
-
-            fixed (int* dataPtr = VAGData.Data)
+            min = 0x7FFFFFFF;
+            PrNRf = 0;
+            for (j = 0; j < PrNRCount; j++)
             {
-                int* localDataPtr = dataPtr;
-                if (Flag < 8)
-                    for (i = 0; i < BS; i++)
-                        for (c = 0; c < ch; c++)
-                        {
-                            f = (float)(localDataPtr[i * ch + c] / 8388608.0);
-                            writer.W(f);
-                        }
-                else
-                    for (i = 0; i < BS; i++)
-                        for (c = 0; c < ch; c++)
-                            writer.W(0f);
+                PrNR = j;
+                
+                Calc4Bits_VAG(HEVAG1, HEVAG2, v1, v2, tV1, tV2);
 
-                localDataPtr += VBS;
-
-                for (i1 = 1, i2 = 0; i1 < VAGData.Size; i1++, localDataPtr += VBS)
+                s1 = *v1; s2 = *v2;
+                err = 0;
+                for (i = 0; i < BS; i++)
                 {
-                    Flag = VAGData.Flags[i1];
-                    if (!IgnoreEndFlags && (Flag == 5 || Flag == 7)) break;
-                    else if (!IgnoreEndFlags && Flag == 6)
-                    {
-                        Header = new WAV.Header { Bytes = 4, Channels = ch, Format = 3, SampleRate =
-                            VAGData.SampleRate, Size = writer.PU32 - 0x2C };
-                        writer.W(Header, 0);
-                        writer.C();
-                        i2++;
+                    d0 = fourBit[i] << ShFf;
 
-                        writer = File.OpenWriter(file + "." + i2 + ".loop.wav", true);
-                        writer.PI64 = 0x2C;
-                    }
-
-                    if (!IgnoreEndFlags && Flag < 8)
-                        for (i = 0; i < BS; i++)
-                            for (c = 0; c < ch; c++)
-                            {
-                                f = (float)(localDataPtr[i * ch + c] / 8388608.0);
-                                writer.W(f);
-                            }
-                    else
-                        for (i = 0; i < BS; i++)
-                            for (c = 0; c < ch; c++)
-                                writer.W(0f);
-
-                         if (!IgnoreEndFlags && Flag == 1) break;
-                    else if (!IgnoreEndFlags && Flag == 3)
-                    {
-                        Header = new WAV.Header { Bytes = 4, Channels = ch, Format = 3, SampleRate =
-                            VAGData.SampleRate, Size = writer.PU32 - 0x2C };
-                        writer.W(Header, 0);
-                        writer.C();
-                        i2++;
-
-                        if (VAGData.Size == i1 + 1)
-                            writer = File.OpenWriter();
-                        else
-                            writer = File.OpenWriter(file + "." + i2 + ".wav", true);
-                        writer.PI64 = 0x2C;
-                    }
+                    g = ((s1 * HEVAG_1 + s2 * HEVAG_2) >> 5) + d0;
+                    s2 = s1; s1 = g >> 8;
+                    e = dataBuf[i] - g;
+                    g = e >> 31;
+                    err += (e + g) ^ g;
                 }
+
+                if (err < min) { PrNRf = j; min = err; }
+            }
+            PrNR = PrNRf;
+            
+            Calc4Bits_VAG(HEVAG1, HEVAG2, v1, v2, tV1, tV2);
+            * v1 =  s1; * v2 =  s2;
+            *tV1 = tS1; *tV2 = tS2;
+        }
+
+        private void Calc4Bits_VAG(int* HEVAG1, int* HEVAG2, int* v1, int* v2, int* tV1, int* tV2)
+        {
+            s1 = *v1; s2 = *v2;
+            HEVAG_1 = HEVAG1[PrNR]; HEVAG_2 = HEVAG2[PrNR];
+
+            for (i = 0, max = 0; i < BS; i++)
+            {
+                g = dataBuf[i];
+                e = (s1 * HEVAG_1 + s2 * HEVAG_2) >> 5;
+                e = g - e;
+                s2 = s1; s1 = g >> 8;
+                     if (e >  0x77FFFF) e =  0x77FFFF;
+                else if (e < -0x780000) e = -0x780000;
+                tempBuf[i] = e;
+                g = e >> 31;
+                e = (e + g) ^ g;
+                if (e > max) max = e;
+            }
+            
+            for (ShF = 12, ShM = 0x400000; ShF > 0; ShF--, ShM >>= 1)
+                if ((ShM & (max + (ShM >> 4))) == ShM) break;
+            ShFf = 8 + ShF;
+            ShF = 12 - ShF;
+            
+            tS1 = *tV1; tS2 = *tV2;
+            for (i = 0; i < BS; i++)
+            {
+                g = tempBuf[i];
+                e = (tS1 * HEVAG_1 + tS2 * HEVAG_2) >> 5;
+                e = g - e;
+
+                d1 = e << ShF;
+                d0 = (d1 + 0x80000) >> 20;
+                     if (d0 >  7) d0 =  7;
+                else if (d0 < -8) d0 = -8;
+                fourBit[i] = d0;
+                d0 <<= ShFf;
+
+                tS2 = tS1; tS1 = (d0 - e) >> 8;
+            }
+        }
+
+        private void Calc4BitsHEVAG(int* HEVAG1, int* HEVAG2, int* HEVAG3, int* HEVAG4,
+            int* v1, int* v2, int* v3, int* v4, int* tV1, int* tV2, int* tV3, int* tV4)
+        {
+            min = 0x7FFFFFFF;
+            PrNRf = 0;
+            for (j = 0; j < PrNRCount; j++)
+            {
+                PrNR = j;
+                
+                Calc4Bits_HEVAG(HEVAG1, HEVAG2, HEVAG3, HEVAG4, v1, v2, v3, v4, tV1, tV2, tV3, tV4);
+
+                s1 = *v1; s2 = *v2; s3 = *v3; s4 = *v4;
+                err = 0;
+                for (i = 0; i < BS; i++)
+                {
+                    d0 = fourBit[i] << ShFf;
+
+                    g = ((s1 * HEVAG_1 + s2 * HEVAG_2 + s3 * HEVAG_3 + s4 * HEVAG_4) >> 5) + d0;
+                    s4 = s3; s3 = s2; s2 = s1; s1 = g >> 8;
+                    e = dataBuf[i] - g;
+                    g = e >> 31;
+                    err += (e + g) ^ g;
+                }
+
+                if (err < min) { PrNRf = j; min = err; }
+            }
+            PrNR = PrNRf;
+            
+            Calc4Bits_HEVAG(HEVAG1, HEVAG2, HEVAG3, HEVAG4, v1, v2, v3, v4, tV1, tV2, tV3, tV4);
+            * v1 =  s1; * v2 =  s2; * v3 =  s3; * v4 =  s4;
+            *tV1 = tS1; *tV2 = tS2; *tV3 = tS3; *tV4 = tS4;
+        }
+
+        private void Calc4Bits_HEVAG(int* HEVAG1, int* HEVAG2, int* HEVAG3, int* HEVAG4,
+            int* v1, int* v2, int* v3, int* v4, int* tV1, int* tV2, int* tV3, int* tV4)
+        {
+            s1 = *v1; s2 = *v2; s3 = *v3; s4 = *v4;
+            HEVAG_1 = HEVAG1[PrNR]; HEVAG_2 = HEVAG2[PrNR];
+            HEVAG_3 = HEVAG3[PrNR]; HEVAG_4 = HEVAG4[PrNR];
+
+            for (i = 0, max = 0; i < BS; i++)
+            {
+                g = dataBuf[i];
+                e = (s1 * HEVAG_1 + s2 * HEVAG_2 + s3 * HEVAG_3 + s4 * HEVAG_4) >> 5;
+                e = g - e;
+                s4 = s3; s3 = s2; s2 = s1; s1 = g >> 8;
+
+                     if (e >  0x77FFFF) e =  0x77FFFF;
+                else if (e < -0x780000) e = -0x780000;
+                tempBuf[i] = e;
+                g = e >> 31;
+                e = (e + g) ^ g;
+                if (e > max) max = e;
             }
 
-            Header = new WAV.Header { Bytes = 4, Channels = ch, Format = 3, SampleRate =
-                VAGData.SampleRate, Size = writer.PU32 - 0x2C };
-            writer.W(Header, 0);
-            writer.C();
+            for (ShF = 12, ShM = 0x400000; ShF > 0; ShF--, ShM >>= 1)
+                if ((ShM & (max + (ShM >> 4))) == ShM) break;
+            ShFf = 8 + ShF;
+            ShF = 12 - ShF;
+            
+            tS1 = *tV1; tS2 = *tV2; tS3 = *tV3; tS4 = *tV4;
+            for (i = 0; i < BS; i++)
+            {
+                g = tempBuf[i];
+                e = (tS1 * HEVAG_1 + tS2 * HEVAG_2 + tS3 * HEVAG_3 + tS4 * HEVAG_4) >> 5;
+                e = g - e;
+
+                d1 = e << ShF;
+                d0 = (d1 + 0x80000) >> 20;
+                     if (d0 >  7) d0 =  7;
+                else if (d0 < -8) d0 = -8;
+                fourBit[i] = d0;
+                d0 <<= ShFf;
+
+                tS4 = tS3; tS3 = tS2; tS2 = tS1; tS1 = (d0 - e) >> 8;
+            }
         }
 
         public int WAVReaderStraight(string file, bool ExtendedFlagging = false)
@@ -340,9 +520,9 @@ namespace KKdSoundLib
                 Loop  = loop .ToArray();
             }
 
-            uint[] Sizes = new uint[Files.Length];
+            int[] Sizes = new int[Files.Length];
             ushort Channels = 0;
-            uint AlignVAG, Size = 0, SampleRate = 0;
+            int AlignVAG, Size = 0, SampleRate = 0;
 
             VAGData = new VAGFile();
             Stream reader;
@@ -372,7 +552,7 @@ namespace KKdSoundLib
                     VAGData.Flags[i] = 0x2;
 
             i2 = 0;
-            uint Start = 0, End = 0;
+            int Start = 0, End = 0;
             fixed (int* dataPtr = VAGData.Data)
             {
                 int* localDataPtr = dataPtr;
@@ -421,301 +601,151 @@ namespace KKdSoundLib
             return 0;
         }
 
-        public void VAGWriter(string file, string choose)
+        public void WAVWriterStraight(string file, bool IgnoreEndFlags = false)
         {
-            bool HEVAG = choose != "1";
             if (!Success) return;
-            byte[] data = new byte[0x30 + ((HEVAG ? (VAGData.Size * ch + ch) : (VAGData.Size + 1)) << 4)];
-            Stream writer = File.OpenWriter(data);
-            VAGData.Name = Path.GetFileName(file);
-            S1 = new int[ch]; S2 = new int[ch];
-            S3 = new int[ch]; S4 = new int[ch];
-            S_1 = new int[ch]; S_2 = new int[ch];
-            S_3 = new int[ch]; S_4 = new int[ch];
-            PrNRCount = choose == "1" ? 5 : choose == "2" ? 8 : choose == "3" ? 32 :
-                choose == "4" ? 64 : choose == "5" ? 96 : 128;
-            error = new int[PrNRCount]; four_bit = new int[BS];
-            data_buffer = new int[BS]; temp_buffer = new int[BS];
+            byte Flag = VAGData.Flags[0];
+            if (Flag == 7) return;
+            WAV.Header Header = new WAV.Header();
+            Stream writer = File.OpenWriter(file + ".wav", true);
+            writer.PI64 = 0x2C;
 
-            writer.W(0x70474156);
-            writer.WE(HEVAG ? 0x00020001 : 0x00000020, true);
-            writer.W(0);
-            writer.WE((HEVAG ? (VAGData.Size * ch + ch) : (VAGData.Size + 1)) << 4, true);
-            writer.WE(VAGData.SampleRate, true);
-            writer.W(0);
-            writer.W(0);
-            writer.W((ushort)0);
-            writer.W((ushort)(HEVAG ? VAGData.Channels : 0x1));
-            writer.W(VAGData.Name);
-            writer.LI64 = 0x30;
-            writer.PI64 = 0x30;
-
-            fixed (int* errorPtr = error)
-            fixed (int* four_bitPtr = four_bit)
-            fixed (int* data_bufferPtr = data_buffer)
-            fixed (int* temp_bufferPtr = temp_buffer)
-            fixed (int* S1Ptr = S1)
-            fixed (int* S2Ptr = S2)
-            fixed (int* S3Ptr = S3)
-            fixed (int* S4Ptr = S4)
-            fixed (int* S_1Ptr = S_1)
-            fixed (int* S_2Ptr = S_2)
-            fixed (int* S_3Ptr = S_3)
-            fixed (int* S_4Ptr = S_4)
-            fixed (int* HEVAG1Ptr = HEVAG1)
-            fixed (int* HEVAG2Ptr = HEVAG2)
-            fixed (int* HEVAG3Ptr = HEVAG3)
-            fixed (int* HEVAG4Ptr = HEVAG4)
             fixed (int* dataPtr = VAGData.Data)
             {
-                this.data_bufferPtr = data_bufferPtr;
-                this.errorPtr = errorPtr;
-                this.four_bitPtr = four_bitPtr;
-                this.temp_bufferPtr = temp_bufferPtr;
-                this.S_1Ptr = S_1Ptr;
-                this.S_2Ptr = S_2Ptr;
-                this.S_3Ptr = S_3Ptr;
-                this.S_4Ptr = S_4Ptr;
-                this.S1Ptr = S1Ptr;
-                this.S2Ptr = S2Ptr;
-                this.S3Ptr = S3Ptr;
-                this.S4Ptr = S4Ptr;
-                this.HEVAG1Ptr = HEVAG1Ptr;
-                this.HEVAG2Ptr = HEVAG2Ptr;
-                this.HEVAG3Ptr = HEVAG3Ptr;
-                this.HEVAG4Ptr = HEVAG4Ptr;
-
-                if (HEVAG)
-                    for (i1 = 0; i1 < VAGData.Size; i1++)
+                int* localDataPtr = dataPtr;
+                if (Flag < 8)
+                    for (i = 0; i < BS; i++)
                         for (c = 0; c < ch; c++)
                         {
-                            for (i = 0, s = 0; i < BS; i++)
-                                data_bufferPtr[i] = dataPtr[i1 * BS * ch + i * ch + c];
-
-                            Calc4BitsHEVAG();
-
-                            s = ((PrNR & 0xF) << 4) | (ShF & 0xF);
-                            writer.W((byte)s);
-                            s = (PrNR & 0xF0) | (VAGData.Flags[i1] & 0xF);
-                            writer.W((byte)s);
-                            for (i = 0, i2 = 1; i < BS; i += 2, i2 += 2)
-                            {
-                                s = ((four_bitPtr[i2] & 0xF) << 4) | (four_bitPtr[i] & 0xF);
-                                writer.W((byte)s);
-                            }
+                            f = (float)(localDataPtr[i * ch + c] / 8388608.0);
+                            writer.W(f);
                         }
                 else
-                    for (i1 = 0; i1 < VAGData.Size; i1++)
-                    {
+                    for (i = 0; i < BS; i++)
+                        for (c = 0; c < ch; c++)
+                            writer.W(0f);
+
+                for (i1 = 0, i2 = 0; i1 < VAGData.Size; i1++, localDataPtr += VBS)
+                {
+                    Flag = VAGData.Flags[i1];
+                    if (!IgnoreEndFlags && (Flag == 5 || Flag == 7)) break;
+                    if (Flag < 8)
                         for (i = 0; i < BS; i++)
-                        {
-                            for (c = 0, s = 0, data_bufferPtr[i] = 0; c < ch; c++)
-                                data_bufferPtr[i] += dataPtr[i1 * BS * ch + i * ch + c];
-                            data_bufferPtr[i] /= ch;
-                        }
+                            for (c = 0; c < ch; c++)
+                            {
+                                f = (float)(localDataPtr[i * ch + c] / 8388608.0);
+                                writer.W(f);
+                            }
+                    else
+                        for (i = 0; i < BS; i++)
+                            for (c = 0; c < ch; c++)
+                                writer.W(0f);
 
-                        Calc4BitsVAG();
-
-                        s = ((PrNR & 0xF) << 4) | (ShF & 0xF);
-                        writer.W((byte)s);
-                        s = VAGData.Flags[i1] & 0xF;
-                        writer.W((byte)s);
-                        for (i = 0, i2 = 1; i < BS; i += 2, i2 += 2)
-                        {
-                            s = ((four_bitPtr[i2] & 0xF) << 4) | (four_bitPtr[i] & 0xF);
-                            writer.W((byte)s);
-                        }
-                    }
+                    if (!IgnoreEndFlags && Flag == 1) break;
+                }
             }
 
-            if (!HEVAG) ch = 1;
-            for (c = 0; c < ch; c++)
-            {
-                writer.W(0x77770700);
-                writer.W(0x77777777);
-                writer.W(0x77777777);
-                writer.W(0x77777777);
-            }
+            Header = new WAV.Header { Bytes = 4, Channels = ch, Format = 3,
+                SampleRate = VAGData.SampleRate, Size = writer.P - 0x2C };
+            writer.W(Header, 0);
             writer.C();
-            File.WriteAllBytes(file + ".vag", data);
         }
 
-        private int max, min, ShM, s1, s2, s3, s4, tS1, tS2, tS3, tS4, PrNRf, ShFf;
-        private int HEVAG_1, HEVAG_2, HEVAG_3, HEVAG_4;
-        private int[] data_buffer, error, four_bit, temp_buffer;
-        private int[] S_1, S_2, S_3, S_4, S1, S2, S3, S4;
-        private int* data_bufferPtr, errorPtr, four_bitPtr, temp_bufferPtr;
-        private int* S_1Ptr, S_2Ptr, S_3Ptr, S_4Ptr, S1Ptr, S2Ptr, S3Ptr, S4Ptr;
-
-        private void Calc4BitsVAG()
+        public void WAVWriter(string file, bool IgnoreEndFlags = false)
         {
-            min = 0x7FFFFFFF;
-            PrNRf = 0;
-            for (j = 0; j < PrNRCount; j++)
+            if (!Success) return;
+            byte Flag = VAGData.Flags[0];
+            if (Flag == 7) return;
+            WAV.Header Header = new WAV.Header();
+            Stream writer;
+            if (!IgnoreEndFlags && Flag == 6) writer = File.OpenWriter(file + ".loop.0.wav", true);
+            else                              writer = File.OpenWriter(file +      ".0.wav", true);
+            writer.PI64 = 0x2C;
+
+            fixed (int* dataPtr = VAGData.Data)
             {
-                PrNR = j;
+                int* localDataPtr = dataPtr;
+                if (Flag < 8)
+                    for (i = 0; i < BS; i++)
+                        for (c = 0; c < ch; c++)
+                        {
+                            f = (float)(localDataPtr[i * ch + c] / 8388608.0);
+                            writer.W(f);
+                        }
+                else
+                    for (i = 0; i < BS; i++)
+                        for (c = 0; c < ch; c++)
+                            writer.W(0f);
 
-                Calc4Bits_VAG();
+                localDataPtr += VBS;
 
-                tS1 = S1Ptr[c]; tS2 = S2Ptr[c];
-                errorPtr[j] = 0;
-                for (i = 0; i < BS; i++)
+                for (i1 = 1, i2 = 0; i1 < VAGData.Size; i1++, localDataPtr += VBS)
                 {
-                    d0 = four_bitPtr[i];
-                    d0 = (d0 > 7 ? d0 - 16 : d0) << ShFf;
+                    Flag = VAGData.Flags[i1];
+                    if (!IgnoreEndFlags && (Flag == 5 || Flag == 7)) break;
+                    else if (!IgnoreEndFlags && Flag == 6)
+                    {
+                        Header = new WAV.Header { Bytes = 4, Channels = ch, Format = 3,
+                            SampleRate = VAGData.SampleRate, Size = writer.P - 0x2C };
+                        writer.W(Header, 0);
+                        writer.C();
+                        i2++;
 
-                    g = ((tS1 * HEVAG_1 + tS2 * HEVAG_2) >> 5) + d0;
-                    tS2 = tS1; tS1 = g >> 8;
-                    e = data_bufferPtr[i] - g;
-                    if (e < 0) errorPtr[j] -= e;
-                    else       errorPtr[j] += e;
+                        writer = File.OpenWriter(file + "." + i2 + ".loop.wav", true);
+                        writer.PI64 = 0x2C;
+                    }
+
+                    if (!IgnoreEndFlags && Flag < 8)
+                        for (i = 0; i < BS; i++)
+                            for (c = 0; c < ch; c++)
+                            {
+                                f = (float)(localDataPtr[i * ch + c] / 8388608.0);
+                                writer.W(f);
+                            }
+                    else
+                        for (i = 0; i < BS; i++)
+                            for (c = 0; c < ch; c++)
+                                writer.W(0f);
+
+                         if (!IgnoreEndFlags && Flag == 1) break;
+                    else if (!IgnoreEndFlags && Flag == 3)
+                    {
+                        Header = new WAV.Header { Bytes = 4, Channels = ch, Format = 3,
+                            SampleRate = VAGData.SampleRate, Size = writer.P - 0x2C };
+                        writer.W(Header, 0);
+                        writer.C();
+                        i2++;
+
+                        writer = VAGData.Size == i1 + 1 ? File.OpenWriter()
+                            : File.OpenWriter(file + "." + i2 + ".wav", true);
+                        writer.PI64 = 0x2C;
+                    }
                 }
-
-                if (errorPtr[j] < min) { PrNRf = j; min = errorPtr[j]; }
             }
-            PrNR = PrNRf;
 
-            Calc4Bits_VAG();
-             S1Ptr[c] =  s1;  S2Ptr[c] =  s2;
-            S_1Ptr[c] = tS1; S_2Ptr[c] = tS2;
+            Header = new WAV.Header { Bytes = 4, Channels = ch, Format = 3,
+                SampleRate = VAGData.SampleRate, Size = writer.P - 0x2C };
+            writer.W(Header, 0);
+            writer.C();
         }
 
-        private void Calc4Bits_VAG()
-        {
-            s1 = S1Ptr[c]; s2 = S2Ptr[c]; s3 = S3Ptr[c]; s4 = S4Ptr[c];
-            HEVAG_1 = HEVAG1Ptr[PrNR]; HEVAG_2 = HEVAG2Ptr[PrNR];
-
-            for (i = 0, max = 0; i < BS; i++)
-            {
-                g = data_bufferPtr[i];
-                e = (s1 * HEVAG_1 + s2 * HEVAG_2) >> 5;
-                e = g - e;
-                     if (e >  0x77FFFF) e =  0x77FFFF;
-                else if (e < -0x780000) e = -0x780000;
-                temp_bufferPtr[i] = e;
-                     if ( e > max) max =  e;
-                else if (-e > max) max = -e;
-                s4 = s3; s3 = s2; s2 = s1; s1 = g >> 8;
-            }
-
-            for (ShF = 0, ShM = 0x400000; ShF < 15; ShF++, ShM >>= 1)
-            { e = max + (ShM >> 3); if ((ShM & e) == ShM) break; }
-            ShFf = 20 - ShF;
-
-            tS1 = S_1Ptr[c]; tS2 = S_2Ptr[c];
-            for (i = 0; i < BS; i++)
-            {
-                g = temp_bufferPtr[i];
-                e = (tS1 * HEVAG_1 + tS2 * HEVAG_2) >> 5;
-                e = g - e;
-
-                d1 = e << ShF;
-                d0 = (d1 + 0x80000) >> 20;
-                     if (d0 >  7) d0 =  7;
-                else if (d0 < -8) d0 = -8;
-                four_bitPtr[i] = d0;
-                d0 <<= ShFf;
-
-                tS2 = tS1; tS1 = (d0 - e) >> 8;
-            }
-        }
-
-        private void Calc4BitsHEVAG()
-        {
-            min = 0x7FFFFFFF;
-            PrNRf = 0;
-            for (j = 0; j < PrNRCount; j++)
-            {
-                PrNR = j;
-
-                Calc4Bits_HEVAG();
-
-                tS1 = S1Ptr[c]; tS2 = S2Ptr[c]; tS3 = S3Ptr[c]; tS4 = S4Ptr[c];
-                errorPtr[j] = 0;
-                for (i = 0; i < BS; i++)
-                {
-                    d0 = four_bitPtr[i];
-                    d0 = (d0 > 7 ? d0 - 16 : d0) << ShFf;
-
-                    g = ((tS1 * HEVAG_1 + tS2 * HEVAG_2 +
-                          tS3 * HEVAG_3 + tS4 * HEVAG_4) >> 5) + d0;
-                    tS4 = tS3; tS3 = tS2; tS2 = tS1; tS1 = g >> 8;
-                    e = data_bufferPtr[i] - g;
-                    if (e < 0) errorPtr[j] -= e;
-                    else       errorPtr[j] += e;
-                }
-
-                if (errorPtr[j] < min) { PrNRf = j; min = errorPtr[j]; }
-            }
-            PrNR = PrNRf;
-
-            Calc4Bits_HEVAG();
-             S1Ptr[c] =  s1;  S2Ptr[c] =  s2;  S3Ptr[c] =  s3;  S4Ptr[c] =  s4;
-            S_1Ptr[c] = tS1; S_2Ptr[c] = tS2; S_3Ptr[c] = tS3; S_4Ptr[c] = tS4;
-        }
-
-        private void Calc4Bits_HEVAG()
-        {
-            s1 = S1Ptr[c]; s2 = S2Ptr[c]; s3 = S3Ptr[c]; s4 = S4Ptr[c];
-            HEVAG_1 = HEVAG1Ptr[PrNR]; HEVAG_2 = HEVAG2Ptr[PrNR];
-            HEVAG_3 = HEVAG3Ptr[PrNR]; HEVAG_4 = HEVAG4Ptr[PrNR];
-
-            for (i = 0, max = 0; i < BS; i++)
-            {
-                g = data_bufferPtr[i];
-                e = (s1 * HEVAG_1 + s2 * HEVAG_2 +
-                     s3 * HEVAG_3 + s4 * HEVAG_4) >> 5;
-                e = g - e;
-                     if (e >  0x77FFFF) e =  0x77FFFF;
-                else if (e < -0x780000) e = -0x780000;
-                temp_bufferPtr[i] = e;
-                     if ( e > max) max =  e;
-                else if (-e > max) max = -e;
-                s4 = s3; s3 = s2; s2 = s1; s1 = g >> 8;
-            }
-
-            for (ShF = 0, ShM = 0x400000; ShF < 15; ShF++, ShM >>= 1)
-            { e = max + (ShM >> 4); if ((ShM & e) == ShM) break; }
-            ShFf = 20 - ShF;
-
-            tS1 = S_1Ptr[c]; tS2 = S_2Ptr[c]; tS3 = S_3Ptr[c]; tS4 = S_4Ptr[c];
-            for (i = 0; i < BS; i++)
-            {
-                g = temp_bufferPtr[i];
-                e = (tS1 * HEVAG_1 + tS2 * HEVAG_2 +
-                     tS3 * HEVAG_3 + tS4 * HEVAG_4) >> 5;
-                e = g - e;
-
-                d1 = e << ShF;
-                d0 = (d1 + 0x80000) >> 20;
-                     if (d0 >  7) d0 =  7;
-                else if (d0 < -8) d0 = -8;
-                four_bitPtr[i] = d0;
-                d0 <<= ShFf;
-
-                tS4 = tS3; tS3 = tS2; tS2 = tS1; tS1 = (d0 - e) >> 8;
-            }
-        }
-
-        public void Dispose()
-        { data_buffer = null; error = null; four_bit = null; temp_buffer = null;
-            S_1 = null; S_2 = null; S_3 = null; S_4 = null;
-            S1 = null; S2 = null; S3 = null; S4 = null; }
+        public void Dispose() { VAGData = default; }
 
         public struct VAGFile
         {
-            public uint Size;
+            public int Size;
             public uint Version;
-            public uint SampleRate;
+            public int SampleRate;
             public ushort Channels;
-            public string Name;
+            public fixed byte Name[10];
             public byte[] Flags;
             public int[] Data;
         }
+        
+        private static readonly int[] ShiftFactor =
+        { 0, 1, 2, 3, 4, 5, 6, 7, -8, -7, -6, -5, -4, -3, -2, -1 };
 
-        private int* HEVAG1Ptr, HEVAG2Ptr, HEVAG3Ptr, HEVAG4Ptr;
-
-        private readonly int[] HEVAG1 = new int[]
+        private static readonly int[] HEVAG1 =
         {
                  0,   7680,  14720,  12544,  15616,  14731,  14507,  13920,
              13133,  12028,  10764,   9359,   7832,   6201,   4488,   2717,
@@ -735,7 +765,7 @@ namespace KKdSoundLib
              10214,   8390,   7201,    -88,   6193,  12325,  13064,   5333,
         };
 
-        private readonly int[] HEVAG2 = new int[]
+        private static readonly int[] HEVAG2 =
         {
                 0,     0, -6656, -7040, -7680, -7059, -7366, -7522,
             -7680, -7680, -7680, -7680, -7680, -7680, -7680, -7680,
@@ -755,7 +785,7 @@ namespace KKdSoundLib
             -2791,  3248,  3316, -7809, -5189, -1290, -4075,  2999,
         };
 
-        private readonly int[] HEVAG3 = new int[]
+        private static readonly int[] HEVAG3 = new int[]
         {
                 0,     0,     0,     0,     0,     0,     0,     0,
                 0,     0,     0,     0,     0,     0,     0,     0,
@@ -775,7 +805,7 @@ namespace KKdSoundLib
               368,  -758,    46,  -538,  2760, -3284, -2824,   775,
         };
 
-        private readonly int[] HEVAG4 = new int[]
+        private static readonly int[] HEVAG4 = new int[]
         {
                 0,     0,     0,     0,     0,     0,     0,     0,
                 0,     0,     0,     0,     0,     0,     0,     0,
diff --git a/KKdSoundLib/WAV.cs b/KKdSoundLib/WAV.cs
index 8c7ea86..b2c586c 100644
--- a/KKdSoundLib/WAV.cs
+++ b/KKdSoundLib/WAV.cs
@@ -4,9 +4,9 @@
     {
         public struct Header
         {
-            public uint Size;
-            public uint SampleRate;
-            public uint HeaderSize;
+            public int Size;
+            public int SampleRate;
+            public int HeaderSize;
             public uint ChannelMask;
             public bool IsSupported;
             public ushort Bytes;
diff --git a/PD_Tool/PD_Tool.csproj b/PD_Tool/PD_Tool.csproj
index 124a54e..ac157ce 100644
--- a/PD_Tool/PD_Tool.csproj
+++ b/PD_Tool/PD_Tool.csproj
@@ -1,85 +1,87 @@
-<?xml version="1.0" encoding="utf-8"?>
-<Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
-  <Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
-  <PropertyGroup>
-    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
-    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
-    <ProjectGuid>{7B5D5A3A-A6F8-4813-C97D-ACFC98F7397E}</ProjectGuid>
-    <OutputType>Exe</OutputType>
-    <RootNamespace>PD_Tool</RootNamespace>
-    <AssemblyName>PD_Tool</AssemblyName>
-    <TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
-    <FileAlignment>512</FileAlignment>
-    <AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
-    <RunPostBuildEvent>Always</RunPostBuildEvent>
-  </PropertyGroup>
-  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
-    <PlatformTarget>AnyCPU</PlatformTarget>
-    <DebugSymbols>true</DebugSymbols>
-    <DebugType>full</DebugType>
-    <Optimize>false</Optimize>
-    <OutputPath>..\build\</OutputPath>
-    <DefineConstants>DEBUG;TRACE</DefineConstants>
-    <ErrorReport>prompt</ErrorReport>
-    <WarningLevel>4</WarningLevel>
-    <AllowUnsafeBlocks>true</AllowUnsafeBlocks>
-    <LangVersion>8.0</LangVersion>
-    <NoWarn>IDE0004, IDE0044, IDE0045, IDE0046, IDE0055, IDE0059, IDE0069, IDE1006</NoWarn>
-  </PropertyGroup>
-  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
-    <PlatformTarget>AnyCPU</PlatformTarget>
-    <DebugType>embedded</DebugType>
-    <Optimize>true</Optimize>
-    <OutputPath>..\build\</OutputPath>
-    <DefineConstants>TRACE</DefineConstants>
-    <ErrorReport>prompt</ErrorReport>
-    <WarningLevel>4</WarningLevel>
-    <DebugSymbols>true</DebugSymbols>
-    <AllowUnsafeBlocks>true</AllowUnsafeBlocks>
-    <LangVersion>8.0</LangVersion>
-    <NoWarn>IDE0004, IDE0044, IDE0045, IDE0046, IDE0055, IDE0059, IDE0069, IDE1006</NoWarn>
-  </PropertyGroup>
-  <ItemGroup>
-    <Compile Include="classes\A3D.cs" />
-    <Compile Include="classes\AET.cs" />
-    <Compile Include="classes\BLT.cs" />
-    <Compile Include="classes\CCT.cs" />
-    <Compile Include="classes\DataBase.cs" />
-    <Compile Include="classes\DB.cs" />
-    <Compile Include="classes\DEX.cs" />
-    <Compile Include="classes\DFT.cs" />
-    <Compile Include="classes\DIV.cs" />
-    <Compile Include="classes\DIVAFILE.cs" />
-    <Compile Include="classes\FARC.cs" />
-    <Compile Include="classes\LIT.cs" />
-    <Compile Include="classes\MOT.cs" />
-    <Compile Include="classes\STR.cs" />
-    <Compile Include="classes\VAG.cs" />
-    <Compile Include="Program.cs" />
-    <Compile Include="Properties\AssemblyInfo.cs" />
-  </ItemGroup>
-  <ItemGroup>
-    <Reference Include="System" />
-    <Reference Include="System.Drawing" />
-    <Reference Include="System.Numerics" />
-    <Reference Include="System.Windows.Forms" />
-  </ItemGroup>
-  <ItemGroup>
-    <ProjectReference Include="..\KKdBaseLib\KKdBaseLib.csproj">
-      <Project>{437f63f1-8c23-429e-ab14-38b85c9edb16}</Project>
-      <Name>KKdBaseLib</Name>
-    </ProjectReference>
-    <ProjectReference Include="..\KKdMainLib\KKdMainLib.csproj">
-      <Project>{2ba7efc6-91d1-8bbc-c487-06c7f36cc789}</Project>
-      <Name>KKdMainLib</Name>
-    </ProjectReference>
-    <ProjectReference Include="..\KKdSoundLib\KKdSoundLib.csproj">
-      <Project>{d8a3f2d7-10cc-5723-ec9a-45d3b9c2df77}</Project>
-      <Name>KKdSoundLib</Name>
-    </ProjectReference>
-  </ItemGroup>
-  <Import Project="$(MSBuildToolsPath)\Microsoft.CSharp.targets" />
-  <PropertyGroup>
+<?xml version="1.0" encoding="utf-8"?>
+<Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
+  <PropertyGroup>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <ProjectGuid>{7B5D5A3A-A6F8-4813-C97D-ACFC98F7397E}</ProjectGuid>
+    <OutputType>Exe</OutputType>
+    <RootNamespace>PD_Tool</RootNamespace>
+    <AssemblyName>PD_Tool</AssemblyName>
+    <TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
+    <FileAlignment>512</FileAlignment>
+    <AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
+    <RunPostBuildEvent>Always</RunPostBuildEvent>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <PlatformTarget>AnyCPU</PlatformTarget>
+    <DebugSymbols>true</DebugSymbols>
+    <DebugType>full</DebugType>
+    <Optimize>false</Optimize>
+    <OutputPath>..\build\</OutputPath>
+    <DefineConstants>DEBUG;TRACE</DefineConstants>
+    <ErrorReport>prompt</ErrorReport>
+    <WarningLevel>4</WarningLevel>
+    <AllowUnsafeBlocks>true</AllowUnsafeBlocks>
+    <LangVersion>8.0</LangVersion>
+    <NoWarn>IDE0004, IDE0044, IDE0045, IDE0046, IDE0055, IDE0059, IDE0069, IDE1006</NoWarn>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <PlatformTarget>AnyCPU</PlatformTarget>
+    <DebugType>embedded</DebugType>
+    <Optimize>true</Optimize>
+    <OutputPath>..\build\</OutputPath>
+    <DefineConstants>TRACE</DefineConstants>
+    <ErrorReport>prompt</ErrorReport>
+    <WarningLevel>4</WarningLevel>
+    <DebugSymbols>true</DebugSymbols>
+    <AllowUnsafeBlocks>true</AllowUnsafeBlocks>
+    <LangVersion>8.0</LangVersion>
+    <NoWarn>IDE0004, IDE0044, IDE0045, IDE0046, IDE0055, IDE0059, IDE0069, IDE1006</NoWarn>
+  </PropertyGroup>
+  <ItemGroup>
+    <Compile Include="classes\A3D.cs" />
+    <Compile Include="classes\AET.cs" />
+    <Compile Include="classes\BLT.cs" />
+    <Compile Include="classes\CCT.cs" />
+    <Compile Include="classes\DataBase.cs" />
+    <Compile Include="classes\DB.cs" />
+    <Compile Include="classes\DEX.cs" />
+    <Compile Include="classes\DFT.cs" />
+    <Compile Include="classes\DIV.cs" />
+    <Compile Include="classes\DIVAFILE.cs" />
+    <Compile Include="classes\FARC.cs" />
+    <Compile Include="classes\LIT.cs" />
+    <Compile Include="classes\MHD.cs" />
+    <Compile Include="classes\MOT.cs" />
+    <Compile Include="classes\STR.cs" />
+    <Compile Include="classes\TBL.cs" />
+    <Compile Include="classes\VAG.cs" />
+    <Compile Include="Program.cs" />
+    <Compile Include="Properties\AssemblyInfo.cs" />
+  </ItemGroup>
+  <ItemGroup>
+    <Reference Include="System" />
+    <Reference Include="System.Drawing" />
+    <Reference Include="System.Numerics" />
+    <Reference Include="System.Windows.Forms" />
+  </ItemGroup>
+  <ItemGroup>
+    <ProjectReference Include="..\KKdBaseLib\KKdBaseLib.csproj">
+      <Project>{437f63f1-8c23-429e-ab14-38b85c9edb16}</Project>
+      <Name>KKdBaseLib</Name>
+    </ProjectReference>
+    <ProjectReference Include="..\KKdMainLib\KKdMainLib.csproj">
+      <Project>{2ba7efc6-91d1-8bbc-c487-06c7f36cc789}</Project>
+      <Name>KKdMainLib</Name>
+    </ProjectReference>
+    <ProjectReference Include="..\KKdSoundLib\KKdSoundLib.csproj">
+      <Project>{d8a3f2d7-10cc-5723-ec9a-45d3b9c2df77}</Project>
+      <Name>KKdSoundLib</Name>
+    </ProjectReference>
+  </ItemGroup>
+  <Import Project="$(MSBuildToolsPath)\Microsoft.CSharp.targets" />
+  <PropertyGroup>
     <PostBuildEvent>del Microsoft.Win32.Primitives.dll
 del netstandard.dll
 del PD_Tool.exe.config
@@ -176,6 +178,6 @@ del System.Xml.XDocument.dll
 del System.Xml.XmlDocument.dll
 del System.Xml.XmlSerializer.dll
 del System.Xml.XPath.dll
-del System.Xml.XPath.XDocument.dll</PostBuildEvent>
-  </PropertyGroup>
+del System.Xml.XPath.XDocument.dll</PostBuildEvent>
+  </PropertyGroup>
 </Project>
\ No newline at end of file
diff --git a/PD_Tool/Program.cs b/PD_Tool/Program.cs
index 63a3187..353377f 100644
--- a/PD_Tool/Program.cs
+++ b/PD_Tool/Program.cs
@@ -28,7 +28,7 @@ namespace PD_Tool
                 GC.Collect();
                      if (Directory.Exists(arg)) using (KKdFARC FARC = new KKdFARC(arg, true)) FARC.Pack();
                 else if (File.Exists(arg) && Path.GetExtension(arg) == ".farc")
-                    using (KKdFARC farc = new KKdFARC(arg)) farc.UnPack(true);
+                    using (KKdFARC farc = new KKdFARC(arg)) farc.Unpack(true);
                 else if (File.Exists(arg))
                 {
                     using (reader = File.OpenReader(arg))
@@ -96,21 +96,25 @@ namespace PD_Tool
                 ConsoleDesign("3. DataBank");
                 ConsoleDesign("4. DEX"     );
                 ConsoleDesign("5. DIVA"    );
-                ConsoleDesign("6. MOT"     );
-                ConsoleDesign("7. STR"     );
+                ConsoleDesign("6. MotHead" );
+                ConsoleDesign("7. MOT"     );
+                ConsoleDesign("8. Table"   );
+                ConsoleDesign("9. STR"     );
                 ConsoleDesign(false);
                 ConsoleDesign("R. Return to Main Menu");
                 ConsoleDesign(false);
                 ConsoleDesign(true);
                 Console.WriteLine();
-                string localChoose = Console.ReadLine();
+                string localChoose = Console.ReadLine().ToUpper();
                      if (localChoose == "1") A3D.Processor(json);
                 else if (localChoose == "2") AET.Processor(json);
                 else if (localChoose == "3") DB .Processor(json);
                 else if (localChoose == "4") DEX.Processor(json);
                 else if (localChoose == "5") DIV.Processor();
+                else if (localChoose == "6") MHD.Processor(json);
                 else if (localChoose == "7") MOT.Processor(json);
-                else if (localChoose == "8") STR.Processor(json);
+                else if (localChoose == "8") TBL.Processor(json);
+                else if (localChoose == "9") STR.Processor(json);
                 else choose = localChoose;
             }
             else if (choose == "7")
@@ -133,7 +137,7 @@ namespace PD_Tool
                 ConsoleDesign(false);
                 ConsoleDesign(true);
                 Console.WriteLine();
-                string localChoose = Console.ReadLine();
+                string localChoose = Console.ReadLine().ToUpper();
                      if (localChoose == "1") A3D.Processor(json);
                 else if (localChoose == "2") BLT.Processor();
                 else if (localChoose == "3") CCT.Processor();
@@ -159,7 +163,7 @@ namespace PD_Tool
                 ConsoleDesign(false);
                 ConsoleDesign(true);
                 Console.WriteLine();
-                string localChoose = Console.ReadLine();
+                string localChoose = Console.ReadLine().ToUpper();
                      if (localChoose == "1") A3D.Processor(json);
                 else if (localChoose == "2") DEX.Processor(json);
                 else if (localChoose == "3") VAG.Processor();
@@ -245,12 +249,14 @@ namespace PD_Tool
                 else if (filetype == "dft" ) Filter = GetArgs("DFT" , "dft");
                 else if (filetype == "diva") Filter = GetArgs("DIVA", "diva", "wav") +
                         GetArgs("DIVA", true, "diva") + wav;
-                else if (filetype == "farc") Filter = "FARC Archives (*.farc)|*.farc";
+                else if (filetype == "farc") Filter = GetArgs("FARC", "farc");
                 else if (filetype == "json") Filter = GetArgs("JSON", "json");
                 else if (filetype == "mp"  ) Filter = GetArgs("MessagePack", "mp");
                 else if (filetype == "lit")  Filter = GetArgs("LIT" , "lit");
                 else if (filetype == "str" ) Filter = GetArgs("STR" , "str", "bin", "json", "mp") +
                         GetArgs("STR", true, "str") + bin + json + mp;
+                else if (filetype == "tbl" ) Filter = GetArgs("Table" , "bin", "farc", "json", "mp") +
+                        bin + GetArgs("FARC Archives", true, "farc") + json + mp;
                 else if (filetype == "vag" ) Filter = GetArgs("VAG" , "vag", "wav") +
                         GetArgs("VAG", true, "vag") + wav;
                 
diff --git a/PD_Tool/Properties/AssemblyInfo.cs b/PD_Tool/Properties/AssemblyInfo.cs
index 3fab87f..42690f7 100644
--- a/PD_Tool/Properties/AssemblyInfo.cs
+++ b/PD_Tool/Properties/AssemblyInfo.cs
@@ -2,7 +2,7 @@
 using System.Runtime.InteropServices;
 
 [assembly: AssemblyTitle("PD_Tool")]
-[assembly: AssemblyDescription("A simple tool for working with Project Diva AC/DT/F/AFT/F2/X/FT files")]
+[assembly: AssemblyDescription("A simple tool for working with Project Diva AC/DT/F/AFT/F2/X/FT/M39 files")]
 [assembly: AssemblyConfiguration("")]
 [assembly: AssemblyCompany("")]
 [assembly: AssemblyProduct("PD_Tool")]
@@ -11,5 +11,5 @@ using System.Runtime.InteropServices;
 [assembly: AssemblyCulture("")]
 [assembly: ComVisible(false)]
 [assembly: Guid("7B5D5A3A-A6F8-4813-C97D-ACFC98F7397E")]
-[assembly: AssemblyVersion("0.4.8.2")]
-[assembly: AssemblyFileVersion("0.4.8.2")]
+[assembly: AssemblyVersion("0.4.9.0")]
+[assembly: AssemblyFileVersion("0.4.9.0")]
diff --git a/PD_Tool/classes/A3D.cs b/PD_Tool/classes/A3D.cs
index 8d00b42..28ff3c0 100644
--- a/PD_Tool/classes/A3D.cs
+++ b/PD_Tool/classes/A3D.cs
@@ -36,7 +36,7 @@ namespace PD_Tool
                 Program.ConsoleDesign(false);
                 Program.ConsoleDesign(true);
                 Console.WriteLine();
-                choose = Console.ReadLine();
+                choose = Console.ReadLine().ToUpper();
                      if (choose == "1") format = Format.DT  ;
                 else if (choose == "2") format = Format.F   ;
                 else if (choose == "3") format = Format.AFT ;
@@ -70,8 +70,6 @@ namespace PD_Tool
                     using (a3da = new KKdA3DA(true))
                     {
                         a3da.MsgPackReader(filepath, ext == ".json");
-                        a3da.Data._.CompressF16 = format > Format.AFT && format <
-                            Format.FT ? format == Format.MGF ? 2 : 1 : 0;
                         a3da.Head.Format = format;
 
                         File.WriteAllBytes(filepath + ".a3da", (choose != "1" &&
@@ -113,8 +111,6 @@ namespace PD_Tool
                         if (state == 1)
                         {
                             KKdFARC.FARCFile file = farc.Files[i];
-                            a3da.Data._.CompressF16 = format > Format.AFT && format <
-                                Format.FT ? format == Format.MGF ? 2 : 1 : 0;
                             a3da.Head.Format = format;
                             file.Data = (choose != "1" && choose != "3") ? a3da.A3DCWriter() : a3da.A3DAWriter();
                             farc.Files[i] = file;
@@ -162,8 +158,6 @@ namespace PD_Tool
             {
                 KKdFARC.FARCFile file = default;
                 file.Name = list[i];
-                a3daArray[i].Data._.CompressF16 = format > Format.AFT && format <
-                    Format.FT ? format == Format.MGF ? 2 : 1 : 0;
                 a3daArray[i].Head.Format = format;
                 file.Data = (choose != "1" && choose != "3") ? a3daArray[i].A3DCWriter() : a3daArray[i].A3DAWriter();
                 farc.Files.Add(file);
diff --git a/PD_Tool/classes/AET.cs b/PD_Tool/classes/AET.cs
index e24429c..77ce927 100644
--- a/PD_Tool/classes/AET.cs
+++ b/PD_Tool/classes/AET.cs
@@ -1,6 +1,6 @@
 using System;
+using KKdMainLib;
 using KKdMainLib.IO;
-using KKdAet = KKdMainLib.Aet;
 
 namespace PD_Tool
 {
@@ -13,9 +13,9 @@ namespace PD_Tool
             if (fileNames.Length < 1) return;
 
             string filepath, ext;
-            KKdAet aet;
+            Aet aet;
             foreach (string file in fileNames)
-                using (aet = new KKdAet())
+                using (aet = new Aet())
                 {
                     ext = Path.GetExtension(file);
                     filepath = file.Replace(ext, "");
diff --git a/PD_Tool/classes/BLT.cs b/PD_Tool/classes/BLT.cs
index bae91b9..eeeb5b7 100644
--- a/PD_Tool/classes/BLT.cs
+++ b/PD_Tool/classes/BLT.cs
@@ -22,7 +22,8 @@ namespace PD_Tool
                     ext = ext.ToLower();
 
                     Console.Title = "Bloom Converter: " + Path.GetFileNameWithoutExtension(file);
-                    if (ext == ".blt") { blt.BLTReader(filepath); blt.TXTWriter(filepath); }
+                         if (ext == ".blt") { blt.BLTReader(filepath); blt.TXTWriter(filepath); }
+                    //else if (ext == ".txt") { blt.TXTReader(filepath); blt.BLTWriter(filepath); }
                 }
         }
     }
diff --git a/PD_Tool/classes/CCT.cs b/PD_Tool/classes/CCT.cs
index ea0e530..14228b4 100644
--- a/PD_Tool/classes/CCT.cs
+++ b/PD_Tool/classes/CCT.cs
@@ -22,7 +22,8 @@ namespace PD_Tool
                     ext = ext.ToLower();
 
                     Console.Title = "Color Correction Converter: " + Path.GetFileNameWithoutExtension(file);
-                    if (ext == ".cct") { cct.CCTReader(filepath); cct.TXTWriter(filepath); }
+                         if (ext == ".cct") { cct.CCTReader(filepath); cct.TXTWriter(filepath); }
+                    //else if (ext == ".txt") { cct.TXTReader(filepath); cct.BLTWriter(filepath); }
                 }
         }
     }
diff --git a/PD_Tool/classes/DB.cs b/PD_Tool/classes/DB.cs
index 3ffd92e..8a772e3 100644
--- a/PD_Tool/classes/DB.cs
+++ b/PD_Tool/classes/DB.cs
@@ -35,9 +35,16 @@ namespace PD_Tool
                         filepath = file.Replace(filename + ".dat", "");
                         Console.Title = "DataBank Converter: " + filename;
                         db.     DBReader(file);
-                        db.MsgPackWriter(filepath + file_split[0] + "_" + 
+                        db.MsgPackWriter(filepath + file_split[0] + "_" +
                             file_split[1] + "_" + file_split[2], json);
                     }
+                    else if (ext == ".bin" && mp)
+                    {
+                        filepath = file.Replace(".bin", "");
+                        Console.Title = "DataBank Converter: " + filename;
+                        db.     DBReader(file);
+                        db.MsgPackWriter(filepath, json);
+                    }
                     else if ((ext == ".mp" || ext == ".json") && !mp)
                     {
                         Console.Title = "DataBank Converter: " + filename;
diff --git a/PD_Tool/classes/DEX.cs b/PD_Tool/classes/DEX.cs
index 963045d..88da20f 100644
--- a/PD_Tool/classes/DEX.cs
+++ b/PD_Tool/classes/DEX.cs
@@ -12,7 +12,7 @@ namespace PD_Tool
             Console.Title = "DEX Converter";
             Program.Choose(1, "dex", out string[] fileNames);
             if (fileNames.Length < 1) return;
-            
+
             bool  mp   = true;
             bool _json = true;
             foreach (string file in fileNames)
@@ -32,8 +32,8 @@ namespace PD_Tool
             Program.ConsoleDesign(false);
             Program.ConsoleDesign(true);
             Console.WriteLine();
-            choose = Console.ReadLine();
-            
+            choose = Console.ReadLine().ToUpper();
+
             Format format = Format.NULL;
                  if (choose == "1") format = Format.F   ;
             else if (choose == "2") format = Format.F2LE;
@@ -49,11 +49,11 @@ namespace PD_Tool
                     ext      = Path.GetExtension(file);
                     filepath = file.Replace(ext, "");
                     ext = ext.ToLower();
-                
+
                     Console.Title = "DEX Converter: " + Path.GetFileNameWithoutExtension(file);
                     if (ext == ".bin" || ext == ".dex") DEX.    DEXReader(filepath, ext );
                     else                                DEX.MsgPackReader(filepath, json);
-                    
+
                     if (format > Format.NULL) DEX.    DEXWriter(filepath, format);
                     else                      DEX.MsgPackWriter(filepath, json);
                 }
diff --git a/PD_Tool/classes/DFT.cs b/PD_Tool/classes/DFT.cs
index 2cd45a7..49e961c 100644
--- a/PD_Tool/classes/DFT.cs
+++ b/PD_Tool/classes/DFT.cs
@@ -22,7 +22,8 @@ namespace PD_Tool
                     ext = ext.ToLower();
 
                     Console.Title = "DOF Converter: " + Path.GetFileNameWithoutExtension(file);
-                    if (ext == ".dft") { dft.DFTReader(filepath); dft.TXTWriter(filepath); }
+                         if (ext == ".dft") { dft.DFTReader(filepath); dft.TXTWriter(filepath); }
+                    //else if (ext == ".txt") { dft.TXTReader(filepath); dft.DFTWriter(filepath); }
                 }
         }
     }
diff --git a/PD_Tool/classes/DIV.cs b/PD_Tool/classes/DIV.cs
index 31f4309..2aa3f3c 100644
--- a/PD_Tool/classes/DIV.cs
+++ b/PD_Tool/classes/DIV.cs
@@ -28,4 +28,4 @@ namespace PD_Tool
             }
         }
     }
-}
\ No newline at end of file
+}
diff --git a/PD_Tool/classes/DIVAFILE.cs b/PD_Tool/classes/DIVAFILE.cs
index 51632a5..0f55e58 100644
--- a/PD_Tool/classes/DIVAFILE.cs
+++ b/PD_Tool/classes/DIVAFILE.cs
@@ -8,9 +8,10 @@ namespace PD_Tool
         public static void Decrypt(string file)
         {
             Stream reader = File.OpenReader(file);
-            if (reader.RI64() != 0x454C494641564944) { reader.C(); return; }
+            ulong head = reader.RU64();
             reader.C();
 
+            if (head != 0x454C494641564944) return;
             System.Console.Title = "DIVAFILE Decrypt: " + Path.GetFileName(file);
             file.Decrypt();
         }
@@ -18,9 +19,10 @@ namespace PD_Tool
         public static void Encrypt(string file)
         {
             Stream reader = File.OpenReader(file);
-            if (reader.RI64() == 0x454C494641564944) { reader.C(); return; }
+            ulong head = reader.RU64();
             reader.C();
 
+            if (head == 0x454C494641564944) return;
             System.Console.Title = "DIVAFILE Encrypt: " + Path.GetFileName(file);
             file.Encrypt();
         }
diff --git a/PD_Tool/classes/DataBase.cs b/PD_Tool/classes/DataBase.cs
index a0805ac..2d0fea0 100644
--- a/PD_Tool/classes/DataBase.cs
+++ b/PD_Tool/classes/DataBase.cs
@@ -23,7 +23,7 @@ namespace PD_Tool
             Program.ConsoleDesign(false);
             Program.ConsoleDesign(true);
             Console.WriteLine();
-            string format = Console.ReadLine();
+            string format = Console.ReadLine().ToUpper();
             if (format == "1") AuthDBProcessor(json);
             if (format == "2")  AETDBProcessor(json);
             if (format == "3")  SPRDBProcessor(json);
diff --git a/PD_Tool/classes/FARC.cs b/PD_Tool/classes/FARC.cs
index 8f999df..e5c07b4 100644
--- a/PD_Tool/classes/FARC.cs
+++ b/PD_Tool/classes/FARC.cs
@@ -18,7 +18,7 @@ namespace PD_Tool
                     {
                         Console.Title = "FARC Extractor: " + Path.GetFileNameWithoutExtension(fileExtract);
                         using (KKdFARC farc = new KKdFARC(fileExtract))
-                            farc.UnPack();
+                            farc.Unpack();
                     }
                 return;
             }
@@ -35,8 +35,8 @@ namespace PD_Tool
                 Program.ConsoleDesign(true);
                 Program.ConsoleDesign("         Choose type of created FARC:");
                 Program.ConsoleDesign(false);
-                Program.ConsoleDesign("1. FArc [DT/DT2/DTex/F/F2/X]");
-                Program.ConsoleDesign("2. FArC [DT/DT2/DTex/F/F2/X] (Compressed)");
+                Program.ConsoleDesign("1. FArc (Uncompressed)");
+                Program.ConsoleDesign("2. FArC (Compressed)");
                 Program.ConsoleDesign("3. FARC [F/F2/X]");
                 Program.ConsoleDesign(false);
                 Program.ConsoleDesign("R. Return to Main Menu");
@@ -62,7 +62,7 @@ namespace PD_Tool
                     Program.ConsoleDesign(false);
                     Program.ConsoleDesign(true);
                     Console.WriteLine();
-                    choose = Console.ReadLine();
+                    choose = Console.ReadLine().ToUpper();
                     if (choose == "2" || choose == "4") farc.FARCType |= KKdFARC.Type.GZip;
                     if (choose == "3" || choose == "4") farc.FARCType |= KKdFARC.Type.ECB ;
                 }
diff --git a/PD_Tool/classes/LIT.cs b/PD_Tool/classes/LIT.cs
index 4c6f377..779571e 100644
--- a/PD_Tool/classes/LIT.cs
+++ b/PD_Tool/classes/LIT.cs
@@ -22,7 +22,8 @@ namespace PD_Tool
                     ext = ext.ToLower();
 
                     Console.Title = "Light Converter: " + Path.GetFileNameWithoutExtension(file);
-                    if (ext == ".lit") { lit.LITReader(filepath); lit.TXTWriter(filepath); }
+                         if (ext == ".lit") { lit.LITReader(filepath); lit.TXTWriter(filepath); }
+                    //else if (ext == ".txt") { lit.TXTReader(filepath); lit.LITWriter(filepath); }
                 }
         }
     }
diff --git a/PD_Tool/classes/MHD.cs b/PD_Tool/classes/MHD.cs
new file mode 100644
index 0000000..a566ffa
--- /dev/null
+++ b/PD_Tool/classes/MHD.cs
@@ -0,0 +1,39 @@
+using System;
+using KKdMainLib;
+using KKdMainLib.IO;
+
+namespace PD_Tool
+{
+    public class MHD
+    {
+        public static void Processor(bool json)
+        {
+            Console.Title = "MotHead Converter";
+            Program.Choose(1, "bin", out string[] fileNames);
+            if (fileNames.Length < 1) return;
+
+            string filepath, ext;
+            MotHead mhd;
+            foreach (string file in fileNames)
+            {
+                mhd = new MotHead();
+                ext = Path.GetExtension(file);
+                filepath = file.Replace(ext, "");
+                ext = ext.ToLower();
+
+                Console.Title = "MotHead Converter: " + Path.GetFileNameWithoutExtension(file);
+                if (ext == ".bin")
+                {
+                    mhd.MotHeadReader(filepath);
+                    mhd.MsgPackWriter(filepath, json);
+                }
+                else if (ext == ".mp" || ext == ".json")
+                {
+                    mhd.MsgPackReader(filepath, ext == ".json");
+                    mhd.MotHeadWriter(filepath);
+                }
+                mhd = new MotHead();
+            }
+        }
+    }
+}
diff --git a/PD_Tool/classes/MOT.cs b/PD_Tool/classes/MOT.cs
index fd10ffd..da556aa 100644
--- a/PD_Tool/classes/MOT.cs
+++ b/PD_Tool/classes/MOT.cs
@@ -11,29 +11,28 @@ namespace PD_Tool
             Console.Title = "MOT Converter";
             Program.Choose(1, "bin", out string[] fileNames);
             if (fileNames.Length < 1) return;
-            
+
             string filepath, ext;
             Mot mot;
             foreach (string file in fileNames)
-            {
-                mot = new Mot();
-                ext = Path.GetExtension(file);
-                filepath = file.Replace(ext, "");
-                ext = ext.ToLower();
+                using (mot = new Mot())
+                {
+                    ext = Path.GetExtension(file);
+                    filepath = file.Replace(ext, "");
+                    ext = ext.ToLower();
 
-                Console.Title = "MOT Converter: " + Path.GetFileNameWithoutExtension(file);
-                if (ext == ".bin")
-                {
-                    mot.    MOTReader(filepath);
-                    mot.MsgPackWriter(filepath, json);
+                    Console.Title = "MOT Converter: " + Path.GetFileNameWithoutExtension(file);
+                    if (ext == ".bin")
+                    {
+                        mot.    MOTReader(filepath);
+                        mot.MsgPackWriter(filepath, json);
+                    }
+                    else if (ext == ".mp" || ext == ".json")
+                    {
+                        mot.MsgPackReader(filepath, ext == ".json");
+                        mot.    MOTWriter(filepath);
+                    }
                 }
-                else if (ext == ".mp" || ext == ".json")
-                {
-                    mot.MsgPackReader(filepath, ext == ".json");
-                    mot.    MOTWriter(filepath);
-                }
-                mot = new Mot();
-            }
         }
     }
 }
diff --git a/PD_Tool/classes/STR.cs b/PD_Tool/classes/STR.cs
index fe8afa1..62bf5e2 100644
--- a/PD_Tool/classes/STR.cs
+++ b/PD_Tool/classes/STR.cs
@@ -20,8 +20,7 @@ namespace PD_Tool
                     filepath = file.Replace(ext, "");
                     ext      = ext.ToLower();
 
-                    Console.Title = "PD_Tool: Converter Tools: STR Reader: " +
-                        Path.GetFileNameWithoutExtension(file);
+                    Console.Title = "STR Converter: " + Path.GetFileNameWithoutExtension(file);
                     if (ext == ".str" || ext == ".bin")
                     {
                         str.STRReader    (filepath, ext);
diff --git a/PD_Tool/classes/TBL.cs b/PD_Tool/classes/TBL.cs
new file mode 100644
index 0000000..f9ea69a
--- /dev/null
+++ b/PD_Tool/classes/TBL.cs
@@ -0,0 +1,60 @@
+using System;
+using System.IO;
+using KKdBaseLib;
+using KKdMainLib;
+using KKdFARC = KKdMainLib.FARC;
+
+namespace PD_Tool
+{
+    public class TBL
+    {
+        public static void Processor(bool json)
+        {
+            Console.Title = "Table Converter";
+            Program.Choose(1, "tbl", out string[] fileNames);
+            if (fileNames.Length < 1) return;
+
+            string filepath, ext;
+            Tables tbl;
+            foreach (string file in fileNames)
+                using (tbl = new Tables())
+                {
+                    ext      = Path.GetExtension(file);
+                    filepath = file.Replace(ext, "");
+                    ext      = ext.ToLower();
+
+                    Console.Title = "Table Converter: " + Path.GetFileNameWithoutExtension(file);
+                    if (ext == ".bin")
+                    {
+                        tbl.BINReader    (filepath);
+                        tbl.MsgPackWriter(filepath, json);
+                    }
+                    else if (ext == ".farc")
+                        using (KKdFARC farc = new KKdFARC(file))
+                            FARCProcessor(ref tbl, farc, filepath, json);
+                    else if (ext == ".json" || ext == ".mp")
+                    {
+                        tbl.MsgPackReader(filepath, ext == ".json");
+                        tbl.BINWriter    (filepath);
+                    }
+                }
+        }
+
+        private static void FARCProcessor(ref Tables tbl, KKdFARC farc, string filepath, bool json)
+        {
+            if (!farc.HeaderReader()) return;
+            if (!farc.HasFiles) return;
+
+            int file = -1;
+            KKdList<string> list = KKdList<string>.New;
+            for (int i = 0; i < farc.Files.Count; i++)
+                if (farc.Files[i].Name.ToLower().EndsWith(".bin")) { file = i; break; }
+            if (file == -1) return;
+
+            farc.Unpack(false);
+            tbl.BINReader    (farc.Files[file].Data);
+            tbl.MsgPackWriter(filepath.Replace(Path.GetFileName(filepath),
+                Path.GetFileNameWithoutExtension(farc.Files[file].Name)), json);
+        }
+    }
+}
diff --git a/PD_Tool/classes/VAG.cs b/PD_Tool/classes/VAG.cs
index 330cb2b..4dd8cb6 100644
--- a/PD_Tool/classes/VAG.cs
+++ b/PD_Tool/classes/VAG.cs
@@ -25,15 +25,16 @@ namespace PD_Tool
                 Program.ConsoleDesign("          Choose type of format to export:");
                 Program.ConsoleDesign(false);
                 Program.ConsoleDesign("1. VAG (Downmix to 1 ch)");
-                Program.ConsoleDesign("2. HEVAG [Fastest]");
+                Program.ConsoleDesign("2. HEVAG [Fastest] (Multichannel VAG)");
                 Program.ConsoleDesign("3. HEVAG [Fast]");
                 Program.ConsoleDesign("4. HEVAG [Medium]");
                 Program.ConsoleDesign("5. HEVAG [Slow]");
                 Program.ConsoleDesign("6. HEVAG [Slowest]");
+                Program.ConsoleDesign("7. HEVAG [Slow as hell] (Full HEVAG)");
                 Program.ConsoleDesign(false);
                 Program.ConsoleDesign(true);
                 Console.WriteLine();
-                choose = Console.ReadLine();
+                choose = Console.ReadLine().ToUpper();
             }
 
             string filepath, ext;
@@ -51,4 +52,4 @@ namespace PD_Tool
                 }
         }
     }
-}
\ No newline at end of file
+}