Пример #1
0
        private void Step4_GetDefine()
        {
            dicDefine = new Dictionary <string, MmlDatum2>();

            for (int i = 0; i < asm.Count; i++)
            {
                MmlDatum2 md = asm[i];

                if (md == null || md.args == null || md.args.Count < 2 || !(md.args[0] is int) || (int)md.args[0] != -5)
                {
                    continue;
                }

                if (!(md.args[1] is string))
                {
                    continue;
                }

                string[] wd = ((string)md.args[1]).Trim().ToLower().Replace("\t", " ").Split(new string[] { " " }, StringSplitOptions.RemoveEmptyEntries);
                if (wd[1] != "equ")
                {
                    continue;
                }

                string defineLabel = wd[0];
                md = new MmlDatum2(wd[2], -5, "");
                dicDefine.Add(defineLabel, md);
            }
        }
Пример #2
0
        private void asmDbRefDefine(MmlDatum2 asm, ref int ptr)
        {
            if (assembleBlockLatest)
            {
                ptr += 2; return;
            }

            List <object> args = asm.args;

            if (args[ptr + 1] is string)
            {
                string define  = ((string)args[ptr + 1]).ToLower();
                bool   byteFlg = false;
                if (define.IndexOf("b:") >= 0)
                {
                    byteFlg = true;
                    define  = define.Substring(2);
                }
                int n = GetInt(dicDefine[define].code);

                ptr += 2;
                Poke(currentBank, currentAddress++, (byte)n, asm);
                if (!byteFlg)
                {
                    Poke(currentBank, currentAddress++, (byte)(n >> 8), asm);
                }
            }
            else
            {
                Log.WriteLine(LogLevel.ERROR, "Db ref degine error.");
                ptr++;
            }
        }
Пример #3
0
        private void asmLabel(MmlDatum2 asm, ref int ptr)
        {
            if (assembleBlockLatest)
            {
                ptr += 2; return;
            }

            List <object> args = asm.args;

            if (args[ptr + 1] is string)
            {
                string label = ((string)args[ptr + 1]).ToLower();

                if (dicLabel.ContainsKey(label))
                {
                    MmlDatum2 md = dicLabel[label];
                    ;
                    md.args.Add(currentBank);
                    md.args.Add(currentAddress);
                    ptr += 2;
                }

                ptr += 2;
            }
            else
            {
                Log.WriteLine(LogLevel.ERROR, "Db Label error.");
                ptr++;
            }
        }
Пример #4
0
        private void Step2_GetMacro()
        {
            dicMacroBlock = new Dictionary <string, List <MmlDatum2> >();

            for (int i = 0; i < asm.Count; i++)
            {
                MmlDatum2 md = asm[i];

                if (md == null || md.args == null || md.args.Count < 2 || !(md.args[0] is int) || (int)md.args[0] != -4)
                {
                    continue;
                }

                if (!(md.args[1] is string))
                {
                    continue;
                }

                string wd = ((string)md.args[1]).Trim().ToLower();
                if (wd.IndexOf(".macro") < 0)
                {
                    continue;
                }

                string macroLabel = wd.Substring(0, wd.IndexOf('.')).Trim();
                asm.RemoveAt(i);
                List <MmlDatum2> mb = new List <MmlDatum2>();

                while (i < asm.Count)
                {
                    md = asm[i];
                    if (md == null || md.args == null || md.args.Count < 2 || !(md.args[0] is int) || (int)md.args[0] != -4)
                    {
                        mb.Add(md);
                        asm.RemoveAt(i);
                        continue;
                    }

                    if (!(md.args[1] is string))
                    {
                        mb.Add(md);
                        asm.RemoveAt(i);
                        continue;
                    }

                    wd = ((string)md.args[1]).Trim().ToLower();
                    if (wd.IndexOf(".endm") < 0)
                    {
                        mb.Add(md);
                        asm.RemoveAt(i);
                        continue;
                    }

                    asm.RemoveAt(i);
                    dicMacroBlock.Add(macroLabel, mb);
                    i--;
                    break;
                }
            }
        }
Пример #5
0
        private void asmMacro(MmlDatum2 asm, ref int ptr)
        {
            string tmp = ((string)asm.args[ptr + 1]).Replace("\t", " ");

            string[] macros = tmp.Split(new string[] { " " }, StringSplitOptions.RemoveEmptyEntries);
            int      n;

            switch (macros[ptr])
            {
            case ".bank":
                if (assembleBlockLatest)
                {
                    break;
                }
                n           = AnaFormula(asm.args);
                currentBank = n;
                ptr         = asm.args.Count;
                return;

            case ".org":
                if (assembleBlockLatest)
                {
                    break;
                }
                n = GetInt(macros[ptr + 1]);
                currentAddress = n;
                break;

            case ".code":
                //無視
                break;

            case ".if":
                assembleBlockStack.Push(!anaCondition(macros));    //ブロックするかどうかのフラグなので判定結果を反転させたものがセットされる
                UpdateAssembleBlockLatest();
                break;

            case ".else":
                bool flg = assembleBlockStack.Pop();
                assembleBlockStack.Push(!flg);
                UpdateAssembleBlockLatest();
                break;

            case ".endif":
                assembleBlockStack.Pop();
                UpdateAssembleBlockLatest();
                break;

            default:
                Log.WriteLine(LogLevel.ERROR, "macro error.");
                ptr++;
                return;
            }
            ptr += 2;
        }
Пример #6
0
        private void asmDbRefLabel(MmlDatum2 asm, ref int ptr)
        {
            if (assembleBlockLatest)
            {
                ptr += 2; return;
            }

            List <object> args = asm.args;

            if (args[ptr + 1] is string)
            {
                string label   = ((string)args[ptr + 1]).ToLower();
                object byteFlg = false;
                if (label.IndexOf("b:") >= 0)
                {
                    byteFlg = true;
                    label   = label.Substring(2);
                }

                if (label.IndexOf("bank(") >= 0)
                {
                    byteFlg = -1;
                    label   = label.Substring(label.IndexOf("bank(") + 5, label.LastIndexOf(")") - label.IndexOf("bank(") - 5);
                }

                if (!dicRefLabel.ContainsKey(label))
                {
                    dicRefLabel.Add(label, new List <Tuple <int, int, object> >());// currentBank, currentAddress, byteFlg
                }

                dicRefLabel[label].Add(new Tuple <int, int, object>(currentBank, currentAddress, byteFlg));
                Poke(currentBank, currentAddress++, 0, asm);
                if (byteFlg is bool && !(bool)byteFlg)
                {
                    Poke(currentBank, currentAddress++, 0, asm);
                }

                ptr += 2;
            }
            else
            {
                Log.WriteLine(LogLevel.ERROR, "Db ref Label error.");
                ptr++;
            }
        }
Пример #7
0
        private void SetLabel()
        {
            foreach (string refkey in dicRefLabel.Keys)
            {
                string key = refkey + ":";
                if (!dicLabel.ContainsKey(key))
                {
                    continue;
                }
                MmlDatum2 md   = dicLabel[key];
                byte      bank = (byte)(int)md.args[2];
                int       adr  = (int)md.args[3];

                List <Tuple <int, int, object> > trgs = dicRefLabel[refkey];
                foreach (Tuple <int, int, object> trg in trgs)
                {
                    byte   trgBank    = (byte)trg.Item1;
                    int    trgAdr     = trg.Item2;
                    object trgByteFlg = trg.Item3;

                    MmlDatum2 m;
                    if (trgByteFlg is bool)
                    {
                        m     = new MmlDatum2();
                        m.dat = (byte)adr;
                        dest[trgBank][trgAdr] = m;
                        if (!(bool)trgByteFlg)
                        {
                            m     = new MmlDatum2();
                            m.dat = (byte)(adr >> 8);
                            dest[trgBank][trgAdr + 1] = m;
                        }
                    }
                    else
                    {
                        m     = new MmlDatum2();
                        m.dat = bank;
                        dest[trgBank][trgAdr] = m;
                    }
                }
            }
        }
Пример #8
0
        private void Step5_GetLabel()
        {
            dicLabel = new Dictionary <string, MmlDatum2>();

            for (int i = 0; i < asm.Count; i++)
            {
                MmlDatum2 md = asm[i];

                if (md == null || md.args == null || md.args.Count < 2 || !(md.args[0] is int) || (int)md.args[0] != -2)
                {
                    continue;
                }

                if (!(md.args[1] is string))
                {
                    continue;
                }

                md.dat = i;//行数を入れてみる
                dicLabel.Add((string)md.args[1], md);
            }
        }
Пример #9
0
        private void Step3_ReplaceMacro()
        {
            bool f;

            do
            {
                f = false;
                for (int i = 0; i < asm.Count; i++)
                {
                    MmlDatum2 md = asm[i];

                    if (md == null || md.args == null || md.args.Count < 2 || !(md.args[0] is int) || (int)md.args[0] != -6)
                    {
                        continue;
                    }

                    if (!(md.args[1] is string))
                    {
                        continue;
                    }

                    string wd = ((string)md.args[1]).Trim().ToLower();
                    foreach (string key in dicMacroBlock.Keys)
                    {
                        if (wd != key)
                        {
                            continue;
                        }

                        f = true;
                        asm.RemoveAt(i);
                        foreach (MmlDatum2 val in dicMacroBlock[key])
                        {
                            asm.Insert(i++, val);
                        }
                    }
                }
            } while (f);
        }
Пример #10
0
        private void Poke(int bank, int adr, byte dat, MmlDatum2 src)
        {
            while (dest.Count < bank + 1)
            {
                dest.Add(new List <MmlDatum2>());
            }
            while (dest[bank].Count < adr + 1)
            {
                dest[bank].Add(null);
            }

            dest[bank][adr]         = new MmlDatum2();
            dest[bank][adr].dat     = dat;
            dest[bank][adr].args    = null;
            dest[bank][adr].code    = "";
            dest[bank][adr].linePos = src.linePos;
            dest[bank][adr].type    = src.type;
            if (adr > 0x9b84)
            {
                ;
            }
            Log.WriteLine(LogLevel.TRACE, string.Format("{0:X02}:{1:X04}:{2:X02}", bank, adr, dat));
        }
Пример #11
0
        private void asmDb(MmlDatum2 asm, ref int ptr)
        {
            if (assembleBlockLatest)
            {
                ptr += 2; return;
            }

            List <object> args = asm.args;

            if (args[ptr + 1] is byte)
            {
                byte n = (byte)args[ptr + 1];
                ptr += 2;
                Poke(currentBank, currentAddress++, n, asm);
            }
            else if (args[ptr + 1] is int)
            {
                byte n = (byte)(int)args[ptr + 1];
                ptr += 2;
                Poke(currentBank, currentAddress++, n, asm);//int であってもbyte扱いです
            }
            else if (args[ptr + 1] is char)
            {
                byte n = (byte)(char)args[ptr + 1];
                ptr += 2;
                Poke(currentBank, currentAddress++, n, asm);
            }
            else if (args[ptr + 1] is string)
            {
                //複合型
                string      sen = (string)args[ptr + 1];
                List <byte> wd  = new List <byte>();
                for (int i = 0; i < sen.Length; i++)
                {
                    if (sen[i] == ' ' || sen[i] == '\t')
                    {
                        continue;
                    }
                    if (sen[i] == ',')
                    {
                        continue;
                    }

                    int    j;
                    string x = "";

                    if (sen[i] == '"')
                    {
                        x = "";
                        j = i + 1;
                        for (; j < sen.Length; j++)
                        {
                            if (sen[j] == '"')
                            {
                                break;
                            }
                            x += sen[j];
                        }
                        i = j;

                        Common.myEncoding enc = new Common.myEncoding();
                        byte[]            ary = enc.GetSjisArrayFromString(x);
                        foreach (byte b in ary)
                        {
                            wd.Add(b);
                        }
                        continue;
                    }

                    x = "";
                    j = i;
                    for (; j < sen.Length; j++)
                    {
                        if (sen[i] == ' ' || sen[i] == '\t' || sen[i] == ',')
                        {
                            break;
                        }
                        x += sen[j];
                    }
                    i = j;
                    int n = GetInt(x);
                    wd.Add((byte)n);
                }

                ptr += 2;
                foreach (byte b in wd)
                {
                    Poke(currentBank, currentAddress++, b, asm);
                }
            }
            else
            {
                Log.WriteLine(LogLevel.ERROR, "Db error.");
                ptr++;
            }
        }
Пример #12
0
        // MDRファイル読み出し
        private List <MmlDatum2> packPCMintoMDR(List <MmlDatum2> destBuf, string file, string pcm, ref _mdr m)
        {
            if (string.IsNullOrEmpty(file))
            {
                return(destBuf);
            }
            if (string.IsNullOrEmpty(pcm))
            {
                return(destBuf);
            }

            byte[] bank = new byte[BANK_SIZE];
            Log.WriteLine(LogLevel.INFO, "packing...");

            int start_pos = m.size;

            // パックされている場合はPCM先頭バングから計算する
            if (m.pcm_packed != 0)
            {
                start_pos = m.pcm_startbank * BANK_SIZE;
            }

            byte[] pcmBuf;

            try
            {
                if (File.Exists(pcm))
                {
                    pcmBuf = File.ReadAllBytes(pcm);
                }
                else
                {
                    pcm    = Path.Combine(Path.GetDirectoryName(file), pcm);
                    pcmBuf = File.ReadAllBytes(pcm);
                }
            }
            catch
            {
                Log.WriteLine(LogLevel.ERROR, string.Format("File open error!:{0}", pcm));
                return(null);
            }

            // PCMデータ出力位置
            Log.WriteLine(LogLevel.INFO, string.Format("PCM Start:{0:X08}h", start_pos));
            m.fp = start_pos;

            int block_len  = 0;
            int pcm_blocks = 1;

            int i = 0;

            while (i < pcmBuf.Length)
            {
                MmlDatum2 md = new MmlDatum2("", pcmBuf[i]);
                destBuf.Insert(m.fp + i, md);
                i++;
                block_len++;
                if ((i % BANK_SIZE) == 0)
                {
                    pcm_blocks++;
                    block_len = 0;
                }
            }
            if (pcmBuf.Length > 0 && block_len == 0)
            {
                pcm_blocks--;
            }

            m.pcm_packed    = 1;
            m.pcm_startadrs = 0x20;                         // SRAM開始アドレス
            m.pcm_startbank = (int)(start_pos / BANK_SIZE); // 開始バンク
            m.pcm_banks     = pcm_blocks - 1;               // ブロック数
            m.pcm_lastsize  = (block_len + 0xff) / 0x100;   // 最後のブロックサイズ

            Log.WriteLine(LogLevel.INFO, string.Format("PCM StartAdrs:{0:x02}h", m.pcm_startadrs));
            Log.WriteLine(LogLevel.INFO, string.Format("PCM StartBank:{0:x02}h", m.pcm_startbank));
            Log.WriteLine(LogLevel.INFO, string.Format("PCM Banks:{0:x02}h", m.pcm_banks));
            Log.WriteLine(LogLevel.INFO, string.Format("PCM LastSize:{0:x02}h", m.pcm_lastsize));

            writeMDRHeader(destBuf, m);

            Log.WriteLine(LogLevel.INFO, "ok!");
            return(destBuf);
        }