Ryo Iizuka / libMiMic

This is Webservice SDK for mbed. LPCXpresso1769/LPC1768/FRDM-K64F/LPC4088

Dependents:   MbedFileServer_1768MiniDK2 RedWireBridge IssueDebug_gcc MiMicRemoteMCU-for-Mbed ... more

libMiMic(MiMic library for mbed)は、WebService機能を提供するSDKです。 mbedでWebAPIに対応したネットワークデバイスを簡単に作ることが出来ます。

libMiMicはMiMic projectで開発しています。MiMic projectについてはこちらをご覧ください。 http://nyatla.jp/mimic/wp/

構成

libMiMicはmbedRTOS上で動作し、ユーザアプリケーションにAPIを提供します。コアAPIはC言語で記述されていますが、使用頻度の高いものについてはmbed向けのC++APIが準備されています。

/media/uploads/nyatla/libmimic-sdk.png

※libMiMicはmbedの標準イーサネットドライバをしようしていません。

標準イーサネットドライバと同時に使用することはできません。

  • MiMicIP - IPv4スタックです。レテンシとメモリ消費量を抑えたuipベースのライブラリです。
  • ARP/ICMP/UDP/TCP - 基礎的なソケットAPIを提供します。APIは独自です。
  • HTTP/1.1 Server - HTTP/1.1に対応したサーバです。マルチセッション・Chunked・持続性接続に対応しています。
  • HTTP Modules - HTTP/1.1の機能モジュールです。以下のモジュールがあります。
    • ROM file provider - ROMに格納したファイルイメージを公開します。
    • File system provider - mbedファイルシステムを公開します。
    • Onchip configuration - プログラムフラッシュを利用して設定を保存します。
    • MiMicVM processor - RPCリクエスト(MiMicVM)を処理します。
    • FileUpload - ファイルアップロードを受け取ります。
    • URL decoder - HTTPリクエストを解析します。
    • UPnP handler -UPnPメッセージを処理します。
    • WebSocket - Websocketサーバです。
  • mDNS - マルチキャストDNSサービスです。
  • UPnP - UPnP/1.0の機能を提供します。UPnP handlerと協調して動作します。(現在はデバイス探索(SSDP)・デスクリプション(Description)のみ実装してあります。)
  • DHCP/APIPA - ゼロコンフィギュレーション用のモジュールです。
  • HTTP/1.1 Client
  • mbed C++ class library - mbed向けのC++CPIです。C言語のものより簡単です。

対応機種

  • mbed(mbed LPC1768)
  • LPCXpresso1769

プログラム

Import programMiMicRemoteMCU-for-Mbed

MiMic RemoteMCU for mbed. This program provides MCU control API over REST API. It can control MCU from Javascript,PHP or any HTTP rest client directly. And, The application has self development environment.

Last commit 30 May 2014 by Ryo Iizuka

Import programMbedFileServer

The program publishes files at local directory and SD filesystem. It is a full-fledged webServer somewhat.

Last commit 15 Sep 2015 by Ryo Iizuka

サンプル

Import programMiMicSimpleHttpd

This is a simplest HTTP server made ​​of libMiMic. It will echo back a request path.

Last commit 15 Sep 2015 by Ryo Iizuka

Import programUPnPBasicDevice

Simplest UPnP basic device example. This program to run UPnP basic device on the mbed.

Last commit 15 Sep 2015 by Ryo Iizuka

Import programWebSocketSample

MiMicSDK Websocket module sample program.

Last commit 15 Sep 2015 by Ryo Iizuka

Import programHttpClientSamlpe

A http client sample program.

Last commit 15 Sep 2015 by Ryo Iizuka

Import programTcpSocketClientSamlpe

MiMicSDK Tcp client socket sample program.

Last commit 15 Sep 2015 by Ryo Iizuka

Import programUdpSocketSamlpe

Udp socket sample program. This program will send back the received packet.

Last commit 15 Sep 2015 by Ryo Iizuka

チュートリアル

English

libMiMic(MiMic library for mbed) is SDK which provides Webservice functions. It can be created networking device easily using mbed.

See more MiMic information, See MiMic project website. http://nyatla.jp/mimic/wp/

Structure

libMiMic run on mbed RTOS and provides networking API to user application. This library has C++ class API for the mbed, and low-level C language API.

/media/uploads/nyatla/libmimic-sdk.png

For WebService general, it can be written in a simple C + + API.

libMiMic does not have the standard Ethernet driver of mbed.　It is not possible that will be used with the standard Ethernet driver.

  • MiMicIP - IPv4 protocol stack. This is based uip which is reduced memory and latency.
  • ARP / ICMP / UDP / TCP - Those are provide basic IP protocols.
  • HTTP/1.1 Server - The Http server compatible HTTP/1.1. It supports multi-session, chunked transport, persistent connection.
  • HTTP Modules - There are addon-module for HTTP server. The following modules.
    • ROM file module - Publish the file images in ROM.
    • File system module - Publish thefiles in mbed file system.
    • Onchip configuration module - To save the network settings to the program flash via REST.
    • MiMicVM module - To handle the (MiMicVM) RPC request.
    • FileUpload module - Accept a file via HTTP POST.
    • URL dedoce module - A versatility URL decoder.
    • UPnP handle module - To handle UPnP messages.
    • UPnP - This provides UPnP/1.0 device functions. It works together with UPnP handler.
    • Websocket - websocket (version13) server
  • mDNS Service - DNS-SD protocol server.
  • UPnP - This provides UPnP/1.0 device functions which works with UPnP handler. (You have been implemented (SSDP) ? description only (Description) device search now.) It is a module zero configuration for - DHCP / APIPA. mbed C + + class library - C of mbed for + + is the CPI. It is simple than that of the C language.
  • DHCP/APIPA - It support zero-cpnfigulation.
  • mbed C++ class library. Almost APIs for Web applications are available.
  • HTTP/1.1 Client

Supported target

  • mbed(mbed LPC1768)
  • LPCXpresso1769

Application

Import programMiMicRemoteMCU-for-Mbed

MiMic RemoteMCU for mbed. This program provides MCU control API over REST API. It can control MCU from Javascript,PHP or any HTTP rest client directly. And, The application has self development environment.

Last commit 30 May 2014 by Ryo Iizuka

Import programMbedFileServer

The program publishes files at local directory and SD filesystem. It is a full-fledged webServer somewhat.

Last commit 15 Sep 2015 by Ryo Iizuka

Sample

Import programMiMicSimpleHttpd

This is a simplest HTTP server made ​​of libMiMic. It will echo back a request path.

Last commit 15 Sep 2015 by Ryo Iizuka

Import programUPnPBasicDevice

Simplest UPnP basic device example. This program to run UPnP basic device on the mbed.

Last commit 15 Sep 2015 by Ryo Iizuka

Import programWebSocketSample

MiMicSDK Websocket module sample program.

Last commit 15 Sep 2015 by Ryo Iizuka

Import programHttpClientSamlpe

A http client sample program.

Last commit 15 Sep 2015 by Ryo Iizuka

Import programTcpSocketClientSamlpe

MiMicSDK Tcp client socket sample program.

Last commit 15 Sep 2015 by Ryo Iizuka

Import programUdpSocketSamlpe

Udp socket sample program. This program will send back the received packet.

Last commit 15 Sep 2015 by Ryo Iizuka

Tutorial

Diff: core/mimicvm/NyLPC_cMiMicVM.c

Revision:
12:efe841863fc8
Parent:
2:b96c1e90d120
diff -r c82a7b2899b0 -r efe841863fc8 core/mimicvm/NyLPC_cMiMicVM.c
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/core/mimicvm/NyLPC_cMiMicVM.c	Sat Apr 20 05:03:57 2013 +0000
@@ -0,0 +1,384 @@
+/*********************************************************************************
+ * PROJECT: MiMic
+ * --------------------------------------------------------------------------------
+ *
+ * This file is part of MiMic
+ * Copyright (C)2011 Ryo Iizuka
+ *
+ * MiMic is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Lesser General Public License as published
+ * by　the Free Software Foundation, either version 3 of the　License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ *
+ * For further information please contact.
+ *  http://nyatla.jp/
+ *  <airmail(at)ebony.plala.or.jp> or <nyatla(at)nyatla.jp>
+ *
+ *********************************************************************************/
+#include <ctype.h>
+#include <stdlib.h>
+#include "NyLPC_cMiMicVM_protected.h"
+
+static NyLPC_TUInt8 process_instruction(NyLPC_TcMiMicVM_t* i_inst,const union NyLPC_TcMiMicVM_TInstruction* ist,NyLPC_TUInt32* o_code);
+
+
+
+void NyLPC_cMiMicVM_initialize(NyLPC_TcMiMicVM_t* i_inst,struct NyLPC_TcMiMicVM_TEvent* i_handler)
+{
+    NyLPC_Assert(i_inst!=NULL);
+    NyLPC_Assert(i_handler!=NULL);
+    NyLPC_Assert(i_handler->get_stream!=NULL);
+    NyLPC_Assert(i_handler->put_stream!=NULL);
+    NyLPC_Assert(i_handler->sleep!=NULL);
+    i_inst->_event_handler=i_handler;
+    return;
+}
+
+
+/**
+ * 固定長命令+固定長データを実行します。
+ * 関数の終了条件は、1.EXIT命令に到達する。2.インストラクションの終端に到達する。3.エラーが発生する。
+ * 
+ */
+NyLPC_TUInt32 NyLPC_cMiMicVM_run(NyLPC_TcMiMicVM_t* i_inst,const NyLPC_TUInt32* i_instruction,const NyLPC_TUInt16 i_size_of_instruction)
+{
+    //データ部をgetstreamと連動させること。
+    NyLPC_TUInt32 retcode=NyLPC_cMiMicVM_RESULT_OK;
+    NyLPC_TUInt16 pc=0;
+    NyLPC_TUInt8 proc_in_byte;
+    if(i_size_of_instruction>0){
+        proc_in_byte=process_instruction(i_inst,(const union NyLPC_TcMiMicVM_TInstruction*)(i_instruction+pc),&retcode);
+        pc+=proc_in_byte;
+        //プログラムの終端に到達するか、0バイト処理の場合にブレーク。
+        while(proc_in_byte>0 && pc<i_size_of_instruction){
+            proc_in_byte=process_instruction(i_inst,(const union NyLPC_TcMiMicVM_TInstruction*)(i_instruction+pc),&retcode);
+            pc+=proc_in_byte;
+        }
+    }
+    return retcode;
+}
+/**
+ * 出力ストリームへ32ビット値を書き出す。
+ */
+NyLPC_TBool NyLPC_cMiMicVM_sput(NyLPC_TcMiMicVM_t* i_inst,NyLPC_TUInt32 i_val)
+{
+    if(!i_inst->_event_handler->put_stream(i_inst->_event_handler,i_val)){
+        return NyLPC_TBool_FALSE;
+    }
+    return NyLPC_TBool_TRUE;
+}
+/**
+ * 入力ストリームから32ビット値を読み出す。
+ */
+NyLPC_TBool NyLPC_cMiMicVM_sget(NyLPC_TcMiMicVM_t* i_inst,NyLPC_TUInt32* o_val)
+{
+    if(!i_inst->_event_handler->get_stream(i_inst->_event_handler,o_val)){
+        return NyLPC_TBool_FALSE;
+    }
+    return NyLPC_TBool_TRUE;
+}
+
+
+
+/**
+ * インストラクションを1個処理し、処理したバイト数を返す。
+ * インストラクションの境界値はチェックされないので、コンパイル時にチェックしておくこと。
+ * @return
+ * 処理したインストラクションのワード数(UInt32単位)。
+ * 終了した場合は0を返す。0を返したときは、ret_codeにMiMicVMの終了コードを返す。
+ */
+static NyLPC_TUInt8 process_instruction(NyLPC_TcMiMicVM_t* i_inst,const union NyLPC_TcMiMicVM_TInstruction* ist,NyLPC_TUInt32* o_code)
+{
+    NyLPC_TUInt32 tret;
+    switch(ist->op.opc){
+    case NyLPC_TcMiMicVM_OP_TYPE_AND:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_WM:
+            i_inst->wm[ist->wmwm_32.wm1]&=i_inst->wm[ist->wmwm_32.wm2];
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_H32:
+            i_inst->wm[ist->wmh32_64.wm]&=ist->wmh32_64.h32;
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_OR:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_WM:
+            i_inst->wm[ist->wmwm_32.wm1]|=i_inst->wm[ist->wmwm_32.wm2];
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_H32:
+            i_inst->wm[ist->wmh32_64.wm]|=ist->wmh32_64.h32;
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_XOR:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_WM:
+            i_inst->wm[ist->wmwm_32.wm1]^=i_inst->wm[ist->wmwm_32.wm2];
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_H32:
+            i_inst->wm[ist->wmh32_64.wm]^=ist->wmh32_64.h32;
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_NOT:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM:
+            i_inst->wm[ist->wm_32.wm]=~i_inst->wm[ist->wm_32.wm];
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_SHL:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_H08:
+            i_inst->wm[ist->wmh08_32.wm]=i_inst->wm[ist->wmh08_32.wm]<<ist->wmh08_32.h8;
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_WM:
+            i_inst->wm[ist->wmwm_32.wm1]=i_inst->wm[ist->wmwm_32.wm1]<<i_inst->wm[ist->wmwm_32.wm2];
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_SHR:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_H08:
+            i_inst->wm[ist->wmh08_32.wm]=i_inst->wm[ist->wmh08_32.wm]>>ist->wmh08_32.h8;
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_WM:
+            i_inst->wm[ist->wmwm_32.wm1]=i_inst->wm[ist->wmwm_32.wm1]>>i_inst->wm[ist->wmwm_32.wm2];
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_ADD:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_WM:
+            i_inst->wm[ist->wmwm_32.wm1]+=i_inst->wm[ist->wmwm_32.wm2];
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_H32:
+            i_inst->wm[ist->wmh32_64.wm]+=ist->wmh32_64.h32;
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_SUB:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_WM:
+            i_inst->wm[ist->wmwm_32.wm1]-=i_inst->wm[ist->wmwm_32.wm2];
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_H32:
+            i_inst->wm[ist->wmh32_64.wm]-=ist->wmh32_64.h32;
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_MUL:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_WM:
+            i_inst->wm[ist->wmwm_32.wm1]*=i_inst->wm[ist->wmwm_32.wm2];
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_H32:
+            i_inst->wm[ist->wmh32_64.wm]*=ist->wmh32_64.h32;
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_MGET:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_H32:
+            i_inst->wm[ist->wmh32_64.wm]=*((NyLPC_TUInt32*)(ist->wmh32_64.h32));
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_WM:
+            i_inst->wm[ist->wmwm_32.wm1]=*((NyLPC_TUInt32*)(i_inst->wm[ist->wmwm_32.wm2]));
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_MPUT:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_H32:
+            *((NyLPC_TUInt32*)(ist->wmh32_64.h32))=i_inst->wm[ist->wmh32_64.wm];
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_WM:
+            *((NyLPC_TUInt32*)(i_inst->wm[ist->wmwm_32.wm2]))=i_inst->wm[ist->wmwm_32.wm1];
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_SGET:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM:
+            if(!i_inst->_event_handler->get_stream(i_inst->_event_handler,&(i_inst->wm[ist->wm_32.wm]))){
+                NyLPC_OnErrorGoto(ERROR);
+            }
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_SPUT:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM:
+            if(!i_inst->_event_handler->put_stream(i_inst->_event_handler,i_inst->wm[ist->wm_32.wm])){
+                NyLPC_OnErrorGoto(ERROR);
+            }
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_H32:
+            if(!i_inst->_event_handler->put_stream(i_inst->_event_handler,ist->h32_64.h32)){
+                NyLPC_OnErrorGoto(ERROR);
+            }
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_LD:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_WM:
+            i_inst->wm[ist->wmwm_32.wm1]=i_inst->wm[ist->wmwm_32.wm2];
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM_H32:
+            i_inst->wm[ist->wmh32_64.wm]=ist->wmh32_64.h32;
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_NOP:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_NONE:
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_H08:
+            i_inst->_event_handler->sleep(i_inst->_event_handler,ist->h8_32.h8);
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    //native call
+    case NyLPC_TcMiMicVM_OP_TYPE_CALL:
+        switch(ist->op.oprtype){
+        case NyLPC_TcMiMicVM_OPR_TYPE_WM:
+            tret=i_inst->_event_handler->native_call(i_inst->_event_handler,i_inst->wm[ist->wm_32.wm],i_inst);
+            if(!NyLPC_cMiMicVM_RESULT_isOK(tret)){
+                *o_code=tret;
+                NyLPC_OnErrorGoto(ERROR_INHERIT);//エラー継承
+            }
+            break;
+        case NyLPC_TcMiMicVM_OPR_TYPE_H32:
+            tret=i_inst->_event_handler->native_call(i_inst->_event_handler,ist->h32_64.h32,i_inst);
+            if(!NyLPC_cMiMicVM_RESULT_isOK(tret)){
+                *o_code=tret;
+                NyLPC_OnErrorGoto(ERROR_INHERIT);//エラー継承
+            }
+            break;
+        default:
+            NyLPC_OnErrorGoto(ERROR);
+        }
+        break;
+    case NyLPC_TcMiMicVM_OP_TYPE_EXIT:
+        *o_code=NyLPC_cMiMicVM_RESULT_OK;//OKに上書き
+        return 0;
+    default:
+        NyLPC_OnErrorGoto(ERROR);
+    }
+    //実行したコードのワード長を返す。
+    switch(ist->op.oprtype){
+    case NyLPC_TcMiMicVM_OPR_TYPE_NONE:
+    case NyLPC_TcMiMicVM_OPR_TYPE_WM_WM:
+    case NyLPC_TcMiMicVM_OPR_TYPE_WM_H08:
+    case NyLPC_TcMiMicVM_OPR_TYPE_WM:
+    case NyLPC_TcMiMicVM_OPR_TYPE_H08:
+    case NyLPC_TcMiMicVM_OPR_TYPE_H16:
+        *o_code=NyLPC_cMiMicVM_RESULT_OK;//OKに上書き
+        return 1;
+    case NyLPC_TcMiMicVM_OPR_TYPE_WM_H16:
+    case NyLPC_TcMiMicVM_OPR_TYPE_WM_H32:
+    case NyLPC_TcMiMicVM_OPR_TYPE_H32:
+        *o_code=NyLPC_cMiMicVM_RESULT_OK;//OKに上書き
+        return 2;
+    }
+ERROR:
+    *o_code=NyLPC_cMiMicVM_RESULT_RUNTIME_NG;//ランタイムNG
+ERROR_INHERIT:
+    return 0;
+}
+
+#define TEST
+#ifndef TEST
+
+#include "NyLPC_cMiMicTxtCompiler.h"
+void main(void)
+{
+    struct NyLPC_TcMiMicVM_TEvent eh;
+    NyLPC_TUInt32 ap;
+    NyLPC_TcMiMicVM_t vm;
+    struct NyLPC_TCharArrayPtr bc;
+    NyLPC_TcMiMicTxtCompiler_t inst;
+    struct NyLPC_TUInt32ArrayPtr bin;
+    char BC[1024];
+    int ist_len;
+
+    NyLPC_TUInt16 l,bl;
+    NyLPC_TUInt32 obuf[1024];
+    NyLPC_cMiMicBcCompiler_initialize(&inst);
+    sprintf(BC,"AA0102AB0100000001AE0203AF0200000003AI0304AJ0300000004AM07BA0505BE0607CA0304CB0300000005CE0304CF0300000005CI0304CJ0300000005ZA.E",&ap,&ap);
+    bc.ptr=(char* )BC;
+    bc.len=strlen(BC);
+    bin.ptr=obuf;
+    bin.len=100;
+    ist_len=0;
+
+    for(;;){
+
+        switch(NyLPC_cMiMicBcCompiler_compileFragment(&inst,&bc,&bin,&bl,&l))
+        {
+        case NyLPC_TcMiMicTxtCompiler_RET_OK:
+            //命令確定。
+            NyLPC_TCharArrayPtr_seek(&bc,l);
+            ist_len+=bl;
+            break;
+        case NyLPC_TcMiMicTxtCompiler_RET_OK_END:
+            //命令終端
+            NyLPC_cMiMicVM_initialize(&vm,&eh);
+            if(!NyLPC_cMiMicVM_run(&vm,obuf,ist_len)){
+                printf("ｴﾝﾀﾞｧ");
+            }
+            printf("OK");
+            break;
+        case NyLPC_TcMiMicTxtCompiler_RET_CONTINUE:
+            //蓄積中。
+            NyLPC_TCharArrayPtr_seek(&bc,l);
+            break;
+        case NyLPC_TcMiMicTxtCompiler_RET_NG:
+            printf("エラー");
+            return;
+        default:
+            break;
+        }
+    }
+}
+#endif