Commit: 18fb6aed65ab2664bc2ee430f71121755a799083 - kmbasic2 (git)

BASIC compiler/interpreter for PIC32MX/MZ-80K

Commit MetaInfo

• Révision: 18fb6aed65ab2664bc2ee430f71121755a799083 (tree)
• l'heure: 2019-05-22 06:03:19
• Auteur: Katsumi <kmorimatsu@sour...>
• Commiter: Katsumi

Message de Log

CLIB: Enable using 5th and 6th parameters to call MachiKania functions.

Change Summary

• modified: mips/clib/clib.c
• modified: mips/clib/clib.h
• modified: mips/clib/example.c
• modified: mips/clib/nbproject/Makefile-genesis.properties
• modified: mips/clib/nbproject/private/private.xml

Modification

--- a/mips/clib/clib.c
+++ b/mips/clib/clib.c
@@ -47,127 +47,172 @@ void* CLIBINIT clib_init(void*** data){
 	return (void*)&clibdata[0];
 }
 
-// call lib_calloc_memory() function
-void* __attribute__((section("clib_calloc"))) clib_calloc(int size, void*** g_data){
-	asm volatile("lw $v1,0($a1)"); // g_data[0]
-	asm volatile("lw $v0,4($a1)"); // g_data[1]
-	asm volatile("lw $v0,0($v0)"); // g_data[1][0]
-	asm volatile("lw $gp,0($v1)"); // g_data[0][0]
-	asm volatile("jr $v0");
-}
-
-// call lib_delete() function
-void __attribute__((section("clib_free"))) clib_free(void* addr, void*** g_data){
-	asm volatile("lw $v1,0($a1)"); // g_data[0]
-	asm volatile("lw $v0,4($a1)"); // g_data[1]
-	asm volatile("lw $v0,4($v0)"); // g_data[1][1]
-	asm volatile("lw $gp,0($v1)"); // g_data[0][0]
-	asm volatile("jr $v0");
-}
-
 // Function to get g_data in $v0
 void*** __attribute__((section("clib_g_data"))) clib_g_data(){ return g_data; }
 
-// Video functions below use following macro
-// $v0=g_data;
-// lw $v1,0($v0)   // g_data[0]
-// lw $v0,12($v0)  // g_data[3]
-// lw $v0,"x"($v0) // g_data[3][x/4]
-// lw $gp,0($v1)   // g_data[0][0]
-// jalr $v0
-#define machikania_video(x) \
-	clib_g_data();\
-	asm volatile("lw $v1,0($v0)");\
-	asm volatile("lw $v0,12($v0)");\
-	asm volatile("lw $v0,"x"($v0)");\
-	asm volatile("lw $gp,0($v1)");\
-	asm volatile("jalr $v0")
-
-void __attribute__((section("start_composite"))) start_composite(void)
-{ machikania_video("0"); }
-void __attribute__((section("stop_composite"))) stop_composite(void)
-{ machikania_video("4"); }
-void __attribute__((section("printchar"))) printchar(unsigned char n)
-{ machikania_video("8"); }
-void __attribute__((section("printstr"))) printstr(unsigned char *s)
-{ machikania_video("12"); }
-void __attribute__((section("printnum"))) printnum(unsigned int n)
-{ machikania_video("16"); }
-void __attribute__((section("printnum2"))) printnum2(unsigned int n,unsigned char e)
-{ machikania_video("20"); }
-void __attribute__((section("cls"))) cls(void)
-{ machikania_video("24"); }
-void __attribute__((section("vramscroll"))) vramscroll(void)
-{ machikania_video("28"); }
-void __attribute__((section("setcursorcolor"))) setcursorcolor(unsigned char c)
-{ machikania_video("32"); }
-void __attribute__((section("setcursor"))) setcursor(unsigned char x,unsigned char y,unsigned char c)
-{ machikania_video("36"); }
-void __attribute__((section("set_palette"))) set_palette(unsigned char n,unsigned char b,unsigned char r,unsigned char g)
-{ machikania_video("40"); }
-void __attribute__((section("set_bgcolor"))) set_bgcolor(unsigned char b,unsigned char r,unsigned char g)
-{ machikania_video("44"); }
-
-// Graphic functions below use following macro
-// $v0=g_data;
-// lw $v1,0($v0)   // g_data[0]
-// lw $v0,16($v0)  // g_data[4]
-// lw $v0,"x"($v0) // g_data[4][x/4]
-// lw $gp,0($v1)   // g_data[0][0]
-// jalr $v0
-#define machikania_graphic(x) \
-	clib_g_data();\
-	asm volatile("lw $v1,0($v0)");\
-	asm volatile("lw $v0,16($v0)");\
-	asm volatile("lw $v0,"x"($v0)");\
+/*
+	Macros for functions.
+	Example for calloc:
+		asm volatile("lw $v1,0($a1)"); // g_data[0]
+		asm volatile("lw $v0,4($a1)"); // g_data[1]
+		asm volatile("lw $v0,0($v0)"); // g_data[1][0]
+		asm volatile("lw $gp,0($v1)"); // g_data[0][0]
+		asm volatile("jr $v0");
+	Exmaple for free:
+		asm volatile("lw $v1,0($a1)"); // g_data[0]
+		asm volatile("lw $v0,4($a1)"); // g_data[1]
+		asm volatile("lw $v0,4($v0)"); // g_data[1][1]
+		asm volatile("lw $gp,0($v1)"); // g_data[0][0]
+		asm volatile("jr $v0");
+	Example for start_composite:
+		asm volatile("lw $v1,0($a0)"); // g_data[0]
+		asm volatile("lw $v0,12($a0)");// g_data[3]
+		asm volatile("lw $v0,0($v0)"); // g_data[3][0]
+		asm volatile("lw $gp,0($v1)"); // g_data[0][0]
+		asm volatile("jr $v0");
+	Example for g_printnum2
+		asm volatile("lw $t0,24($sp)");// g_data
+		asm volatile("lw $v1,0($t0)"); // g_data[0]
+		asm volatile("lw $v0,12($t0)");// g_data[3]
+		asm volatile("lw $v0,44($v0)");// g_data[3][11]
+		asm volatile("lw $gp,0($v1)"); // g_data[0][0]
+		asm volatile("jr $v0");
+*/
+
+// The general function macro; x:"$a0","$a1" etc, y:"0","4" etc, z: "0","4" etc
+#define machikania_function(x,y,z)\
+	asm volatile("lw $v1,0(" x ")");\
+	asm volatile("lw $v0," y "(" x ")");\
+	asm volatile("lw $v0," z "($v0)");\
 	asm volatile("lw $gp,0($v1)");\
-	asm volatile("jalr $v0")
-
-void __attribute__((section("g_pset"))) g_pset(int x,int y,unsigned int c)
-{ machikania_graphic("0"); }
-void __attribute__((section("g_putbmpmn"))) g_putbmpmn(int x,int y,char m,char n,const unsigned char bmp[])
-{ machikania_graphic("4"); }
-void __attribute__((section("g_clrbmpmn"))) g_clrbmpmn(int x,int y,char m,char n)
-{ machikania_graphic("8"); }
-void __attribute__((section("g_gline"))) g_gline(int x1,int y1,int x2,int y2,unsigned int c)
-{ machikania_graphic("12"); }
-void __attribute__((section("g_hline"))) g_hline(int x1,int x2,int y,unsigned int c)
-{ machikania_graphic("16"); }
-void __attribute__((section("g_circle"))) g_circle(int x0,int y0,unsigned int r,unsigned int c)
-{ machikania_graphic("20"); }
-void __attribute__((section("g_circlefill"))) g_circlefill(int x0,int y0,unsigned int r,unsigned int c)
-{ machikania_graphic("24"); }
-void __attribute__((section("g_boxfill"))) g_boxfill(int x1,int y1,int x2,int y2,unsigned int c)
-{ machikania_graphic("28"); }
-void __attribute__((section("g_putfont"))) g_putfont(int x,int y,unsigned int c,int bc,unsigned char n)
-{ machikania_graphic("32"); }
-void __attribute__((section("g_printstr"))) g_printstr(int x,int y,unsigned int c,int bc,unsigned char *s)
-{ machikania_graphic("36"); }
-void __attribute__((section("g_printnum"))) g_printnum(int x,int y,unsigned char c,int bc,unsigned int n)
-{ machikania_graphic("40"); }
-void __attribute__((section("g_printnum2"))) g_printnum2(int x,int y,unsigned char c,int bc,unsigned int n,unsigned char e)
-{ machikania_graphic("44"); }
-unsigned int __attribute__((section("g_color"))) g_color(int x,int y)
-{ machikania_graphic("48"); }
-
-// Keyboard functions below use following macro
-// $v0=g_data;
-// lw $v1,0($v0)   // g_data[0]
-// lw $v0,20($v0)  // g_data[5]
-// lw $v0,"x"($v0) // g_data[5][x/4]
-// lw $gp,0($v1)   // g_data[0][0]
-// jalr $v0
-#define machikania_keyboard(x) \
-	clib_g_data();\
-	asm volatile("lw $v1,0($v0)");\
-	asm volatile("lw $v0,20($v0)");\
-	asm volatile("lw $v0,"x"($v0)");\
+	asm volatile("jr $v0")
+
+// The function macro using stack; x:"16","20" etc, y:"0","4" etc, z: "0","4" etc
+#define machikania_function_sp(x,y,z)\
+	asm volatile("lw $t0," x "($sp)");\
+	asm volatile("lw $v1,0($t0)");\
+	asm volatile("lw $v0," y "($t0)");\
+	asm volatile("lw $v0," z "($v0)");\
 	asm volatile("lw $gp,0($v1)");\
-	asm volatile("jalr $v0")
+	asm volatile("jr $v0")
+
+// call lib_calloc_memory() function
+void* __attribute__((section("clib_calloc"))) 
+clib_calloc(int size, void*** g_data)
+{ machikania_function("$a1","4","0"); }
+
+// call lib_delete() function
+void __attribute__((section("clib_free"))) 
+clib_free(void* addr, void*** g_data)
+{ machikania_function("$a1","4","4"); }
+
+// Video functions
+void __attribute__((section("start_composite"))) 
+clib_start_composite(void*** data)
+{ machikania_function("$a0","12","0"); }
+
+void __attribute__((section("stop_composite"))) 
+clib_stop_composite(void*** data)
+{ machikania_function("$a0","12","4"); }
+
+void __attribute__((section("printchar"))) 
+clib_printchar(unsigned char n,void*** data)
+{ machikania_function("$a1","12","8"); }
+
+void __attribute__((section("printstr"))) 
+clib_printstr(unsigned char *s,void*** data)
+{ machikania_function("$a1","12","12"); }
+
+void __attribute__((section("printnum"))) 
+clib_printnum(unsigned int n,void*** data)
+{ machikania_function("$a1","12","16"); }
+
+void __attribute__((section("printnum2"))) 
+clib_printnum2(unsigned int n,unsigned char e,void*** data)
+{ machikania_function("$a2","12","20"); }
+
+void __attribute__((section("cls"))) 
+clib_cls(void*** data)
+{ machikania_function("$a0","12","24"); }
+
+void __attribute__((section("vramscroll"))) 
+clib_vramscroll(void*** data)
+{ machikania_function("$a0","12","28"); }
+
+void __attribute__((section("setcursorcolor"))) 
+clib_setcursorcolor(unsigned char c,void*** data)
+{ machikania_function("$a1","12","32"); }
+
+void __attribute__((section("setcursor"))) 
+clib_setcursor(unsigned char x,unsigned char y,unsigned char c,void*** data)
+{ machikania_function("$a3","12","36"); }
+
+void __attribute__((section("set_palette"))) 
+clib_set_palette(unsigned char n,unsigned char b,unsigned char r,unsigned char g,void*** data)
+{ machikania_function_sp("16","12","40"); }
+
+void __attribute__((section("set_bgcolor"))) 
+clib_set_bgcolor(unsigned char b,unsigned char r,unsigned char g,void*** data)
+{ machikania_function("$a3","12","44"); }
+
+// Graphic functions
+void __attribute__((section("g_pset"))) 
+clib_g_pset(int x,int y,unsigned int c,void*** data)
+{ machikania_function("$a3","16","0"); }
+
+void __attribute__((section("g_putbmpmn"))) 
+clib_g_putbmpmn(int x,int y,char m,char n,const unsigned char bmp[],void*** data)
+{ machikania_function_sp("20","16","4"); }
+
+void __attribute__((section("g_clrbmpmn"))) 
+clib_g_clrbmpmn(int x,int y,char m,char n,void*** data)
+{ machikania_function_sp("16","16","8"); }
+
+void __attribute__((section("g_gline"))) 
+clib_g_gline(int x1,int y1,int x2,int y2,unsigned int c,void*** data)
+{ machikania_function_sp("20","16","12"); }
+
+void __attribute__((section("g_hline"))) 
+clib_g_hline(int x1,int x2,int y,unsigned int c,void*** data)
+{ machikania_function_sp("16","16","16"); }
+
+void __attribute__((section("g_circle"))) 
+clib_g_circle(int x0,int y0,unsigned int r,unsigned int c,void*** data)
+{ machikania_function_sp("16","16","20"); }
+
+void __attribute__((section("g_circlefill"))) 
+clib_g_circlefill(int x0,int y0,unsigned int r,unsigned int c,void*** data)
+{ machikania_function_sp("16","16","24"); }
+
+void __attribute__((section("g_boxfill"))) 
+clib_g_boxfill(int x1,int y1,int x2,int y2,unsigned int c,void*** data)
+{ machikania_function_sp("20","16","28"); }
+
+void __attribute__((section("g_putfont"))) 
+clib_g_putfont(int x,int y,unsigned int c,int bc,unsigned char n,void*** data)
+{ machikania_function_sp("20","16","32"); }
+
+void __attribute__((section("g_printstr"))) 
+clib_g_printstr(int x,int y,unsigned int c,int bc,unsigned char *s,void*** data)
+{ machikania_function_sp("20","16","36"); }
+
+void __attribute__((section("g_printnum"))) 
+clib_g_printnum(int x,int y,unsigned char c,int bc,unsigned int n,void*** data)
+{ machikania_function_sp("20","16","40"); }
+
+void __attribute__((section("g_printnum2"))) 
+clib_g_printnum2(int x,int y,unsigned char c,int bc,unsigned int n,unsigned char e,void*** data)
+{ machikania_function_sp("24","16","44"); }
+
+unsigned int __attribute__((section("g_color"))) 
+clib_g_color(int x,int y,void*** data)
+{ machikania_function("$a2","16","48"); }
 
-unsigned char __attribute__((section("shiftkeys"))) shiftkeys()
-{ machikania_keyboard("0"); }
-unsigned char __attribute__((section("ps2readkey"))) ps2readkey()
-{ machikania_keyboard("4"); }
+// Keyboard functions
+unsigned char __attribute__((section("shiftkeys"))) 
+clib_shiftkeys(void*** data)
+{ machikania_function("$a0","20","0"); }
 
-//*/
\ No newline at end of file
+unsigned char __attribute__((section("ps2readkey"))) 
+clib_ps2readkey(void*** data)
+{ machikania_function("$a0","20","4"); }

--- a/mips/clib/clib.h
+++ b/mips/clib/clib.h
@@ -32,7 +32,7 @@ extern void*** g_data;
  * The structure of g_data[] is the same as g_data_clib[] below.
  * 
 const void* const g_data_clib_var[]={
-	&g_gp,// g_data[0][0],"0"
+	0, // will be g_gp, g_data[0][0],"0"
 };
 
 const void* const g_data_clib_core[]={
@@ -153,81 +153,217 @@ void clib_free(void* addr, void*** g_data);
  *   FSrename
  */
 
+
 /*
  * MachiKanika video functions
  */
 
-void start_composite(void); 
-//カラーコンポジット出力開始
-void stop_composite(void); 
-//カラーコンポジット出力停止
-void printchar(unsigned char n); 
-//カーソル位置にテキストコードnを1文字表示し、カーソルを1文字進める
-void printstr(unsigned char *s); 
-//カーソル位置に文字列sを表示
-void printnum(unsigned int n); 
-//カーソル位置に符号なし整数nを10進数表示
-void printnum2(unsigned int n,unsigned char e); 
-//カーソル位置に符号なし整数nをe桁の10進数表示（前の空き桁部分はスペースで埋める）
-void cls(void); 
-//テキスト画面を0でクリアし、カーソルを画面先頭に移動
-void vramscroll(void); 
-//1行スクロール
-void setcursorcolor(unsigned char c); 
-//カーソル位置そのままでカラー番号をcに設定
-void setcursor(unsigned char x,unsigned char y,unsigned char c); 
-//カーソル位置とカラーを設定
-void set_palette(unsigned char n,unsigned char b,unsigned char r,unsigned char g); 
-//テキストパレット設定
-void set_bgcolor(unsigned char b,unsigned char r,unsigned char g); 
-//バックグランドカラー設定
+/*
+	void start_composite(void);
+	//カラーコンポジット出力開始
+*/
+#define start_composite() clib_start_composite(g_data)
+void clib_start_composite(void*** data);
+
+/*
+	void stop_composite(void);
+	//カラーコンポジット出力停止
+*/
+#define stop_composite() clib_stop_composite(g_data)
+void clib_stop_composite(void*** data);
+
+/*
+	void printchar(unsigned char n);
+	//カーソル位置にテキストコードnを1文字表示し、カーソルを1文字進める
+*/
+#define printchar(a) clib_printchar(a,g_data)
+void clib_printchar(unsigned char n,void*** data);
+
+/*
+	void printstr(unsigned char *s);
+	//カーソル位置に文字列sを表示
+*/
+#define printstr(a) clib_printstr(a,g_data)
+void clib_printstr(unsigned char *s,void*** data);
+
+/*
+	void printnum(unsigned int n);
+	//カーソル位置に符号なし整数nを10進数表示
+*/
+#define printnum(a) clib_printnum(a,g_data)
+void clib_printnum(unsigned int n,void*** data);
+
+/*
+	void printnum2(unsigned int n,unsigned char e);
+	//カーソル位置に符号なし整数nをe桁の10進数表示（前の空き桁部分はスペースで埋める）
+*/
+#define printnum2(a,b) clib_printnum2(a,b,g_data)
+void clib_printnum2(unsigned int n,unsigned char e,void*** data);
+
+/*
+	void cls(void);
+	//テキスト画面を0でクリアし、カーソルを画面先頭に移動
+*/
+#define cls() clib_cls(g_data)
+void clib_cls(void*** data);
+
+/*
+	void vramscroll(void);
+	//1行スクロール
+*/
+#define vramscroll() clib_vramscroll(g_data)
+void clib_vramscroll(void*** data);
+
+/*
+	void setcursorcolor(unsigned char c);
+	//カーソル位置そのままでカラー番号をcに設定
+*/
+#define setcursorcolor(a) clib_setcursorcolor(a,g_data)
+void clib_setcursorcolor(unsigned char c,void*** data);
+
+/*
+	void setcursor(unsigned char x,unsigned char y,unsigned char c);
+	//カーソル位置とカラーを設定
+*/
+#define setcursor(a,b,c) clib_setcursor(a,b,c,g_data)
+void clib_setcursor(unsigned char x,unsigned char y,unsigned char c,void*** data);
+
+/*
+	void set_palette(unsigned char n,unsigned char b,unsigned char r,unsigned char g);
+	//テキストパレット設定
+*/
+#define set_palette(a,b,c,d) clib_set_palette(a,b,c,d,g_data)
+void clib_set_palette(unsigned char n,unsigned char b,unsigned char r,unsigned char g,void*** data);
+
+/*
+	void set_bgcolor(unsigned char b,unsigned char r,unsigned char g);
+	//バックグランドカラー設定
+*/
+#define set_bgcolor(a,b,c) clib_set_bgcolor(a,b,c,g_data)
+void clib_set_bgcolor(unsigned char b,unsigned char r,unsigned char g,void*** data);
+
 
 /*
  * MachiKanika graphic functions
  */
 
-void g_pset(int x,int y,unsigned int c);
-// (x,y)の位置にカラーcで点を描画
-void g_putbmpmn(int x,int y,char m,char n,const unsigned char bmp[]);
-// 横m*縦nドットのキャラクターを座標x,yに表示
-// unsigned char bmp[m*n]配列に、単純にカラー番号を並べる
-// カラー番号が0の部分は透明色として扱う
-void g_clrbmpmn(int x,int y,char m,char n);
-// 縦m*横nドットのキャラクター消去
-// カラー0で塗りつぶし
-void g_gline(int x1,int y1,int x2,int y2,unsigned int c);
-// (x1,y1)-(x2,y2)にカラーcで線分を描画
-void g_hline(int x1,int x2,int y,unsigned int c);
-// (x1,y)-(x2,y)への水平ラインを高速描画
-void g_circle(int x0,int y0,unsigned int r,unsigned int c);
-// (x0,y0)を中心に、半径r、カラーcの円を描画
-void g_circlefill(int x0,int y0,unsigned int r,unsigned int c);
-// (x0,y0)を中心に、半径r、カラーcで塗られた円を描画
-void g_boxfill(int x1,int y1,int x2,int y2,unsigned int c);
-// (x1,y1),(x2,y2)を対角線とするカラーcで塗られた長方形を描画
-void g_putfont(int x,int y,unsigned int c,int bc,unsigned char n);
-//8*8ドットのアルファベットフォント表示
-//座標（x,y)、カラー番号c
-//bc:バックグランドカラー、負数の場合無視
-//n:文字番号
-void g_printstr(int x,int y,unsigned int c,int bc,unsigned char *s);
-//座標(x,y)からカラー番号cで文字列sを表示、bc:バックグランドカラー
-void g_printnum(int x,int y,unsigned char c,int bc,unsigned int n);
-//座標(x,y)にカラー番号cで数値nを表示、bc:バックグランドカラー
-void g_printnum2(int x,int y,unsigned char c,int bc,unsigned int n,unsigned char e);
-//座標(x,y)にカラー番号cで数値nを表示、bc:バックグランドカラー、e桁で表示
-unsigned int g_color(int x,int y);
-//座標(x,y)のVRAM上の現在のパレット番号を返す、画面外は0を返す
+/*
+	void g_pset(int x,int y,unsigned int c);
+	// (x,y)の位置にカラーcで点を描画
+*/
+#define g_pset(a,b,c) clib_g_pset(a,b,c,g_data)
+void clib_g_pset(int x,int y,unsigned int c,void*** data);
+
+/*
+	void g_putbmpmn(int x,int y,char m,char n,const unsigned char bmp[]);
+	// 横m*縦nドットのキャラクターを座標x,yに表示
+	// unsigned char bmp[m*n]配列に、単純にカラー番号を並べる
+	// カラー番号が0の部分は透明色として扱う
+*/
+#define g_putbmpmn(a,b,c,d,e) clib_g_putbmpmn(a,b,c,d,e,g_data)
+void clib_g_putbmpmn(int x,int y,char m,char n,const unsigned char bmp[],void*** data);
+
+/*
+	void g_clrbmpmn(int x,int y,char m,char n);
+	// 縦m*横nドットのキャラクター消去
+	// カラー0で塗りつぶし
+*/
+#define g_clrbmpmn(a,b,c,d) clib_g_clrbmpmn(a,b,c,d,g_data)
+void clib_g_clrbmpmn(int x,int y,char m,char n,void*** data);
+
+/*
+	void g_gline(int x1,int y1,int x2,int y2,unsigned int c);
+	// (x1,y1)-(x2,y2)にカラーcで線分を描画
+*/
+#define g_gline(a,b,c,d,e) clib_g_gline(a,b,c,d,e,g_data)
+void clib_g_gline(int x1,int y1,int x2,int y2,unsigned int c,void*** data);
+
+/*
+	void g_hline(int x1,int x2,int y,unsigned int c);
+	// (x1,y)-(x2,y)への水平ラインを高速描画
+*/
+#define g_hline(a,b,c,d) clib_g_hline(a,b,c,d,g_data)
+void clib_g_hline(int x1,int x2,int y,unsigned int c,void*** data);
+
+/*
+	void g_circle(int x0,int y0,unsigned int r,unsigned int c);
+	// (x0,y0)を中心に、半径r、カラーcの円を描画
+*/
+#define g_circle(a,b,c,d) clib_g_circle(a,b,c,d,g_data)
+void clib_g_circle(int x0,int y0,unsigned int r,unsigned int c,void*** data);
+
+/*
+	void g_circlefill(int x0,int y0,unsigned int r,unsigned int c);
+	// (x0,y0)を中心に、半径r、カラーcで塗られた円を描画
+*/
+#define g_circlefill(a,b,c,d) clib_g_circlefill(a,b,c,d,g_data)
+void clib_g_circlefill(int x0,int y0,unsigned int r,unsigned int c,void*** data);
+
+/*
+	void g_boxfill(int x1,int y1,int x2,int y2,unsigned int c);
+	// (x1,y1),(x2,y2)を対角線とするカラーcで塗られた長方形を描画
+*/
+#define g_boxfill(a,b,c,d,e) clib_g_boxfill(a,b,c,d,e,g_data)
+void clib_g_boxfill(int x1,int y1,int x2,int y2,unsigned int c,void*** data);
+
+/*
+	void g_putfont(int x,int y,unsigned int c,int bc,unsigned char n);
+	//8*8ドットのアルファベットフォント表示
+	//座標（x,y)、カラー番号c
+	//bc:バックグランドカラー、負数の場合無視
+	//n:文字番号
+*/
+#define g_putfont(a,b,c,d,e) clib_g_putfont(a,b,c,d,e,g_data)
+void clib_g_putfont(int x,int y,unsigned int c,int bc,unsigned char n,void*** data);
+
+/*
+	void g_printstr(int x,int y,unsigned int c,int bc,unsigned char *s);
+	//座標(x,y)からカラー番号cで文字列sを表示、bc:バックグランドカラー
+*/
+#define g_printstr(a,b,c,d,e) clib_g_printstr(a,b,c,d,e,g_data)
+void clib_g_printstr(int x,int y,unsigned int c,int bc,unsigned char *s,void*** data);
+
+/*
+	void g_printnum(int x,int y,unsigned char c,int bc,unsigned int n);
+	//座標(x,y)にカラー番号cで数値nを表示、bc:バックグランドカラー
+*/
+#define g_printnum(a,b,c,d,e) clib_g_printnum(a,b,c,d,e,g_data)
+void clib_g_printnum(int x,int y,unsigned char c,int bc,unsigned int n,void*** data);
+
+/*
+	void g_printnum2(int x,int y,unsigned char c,int bc,unsigned int n,unsigned char e);
+	//座標(x,y)にカラー番号cで数値nを表示、bc:バックグランドカラー、e桁で表示
+*/
+#define g_printnum2(a,b,c,d,e,f) clib_g_printnum2(a,b,c,d,e,f,g_data)
+void clib_g_printnum2(int x,int y,unsigned char c,int bc,unsigned int n,unsigned char e,void*** data);
+
+/*
+	unsigned int g_color(int x,int y);
+	//座標(x,y)のVRAM上の現在のパレット番号を返す、画面外は0を返す
+*/
+#define g_color(a,b) clib_g_color(a,b,g_data)
+unsigned int clib_g_color(int x,int y,void*** data);
+
 
 /*
  * MachiKanika keyboard functions
  */
 
-unsigned char shiftkeys(); 
-// SHIFT関連キーの押下状態を返す
-unsigned char ps2readkey();
-// 入力された1つのキーのキーコードをグローバル変数vkeyに格納（押されていなければ0を返す）
-// 下位8ビット：キーコード
-// 上位8ビット：シフト状態（押下：1）、上位から<0><CAPSLK><NUMLK><SCRLK><Win><ALT><CTRL><SHIFT>
-// 英数・記号文字の場合、戻り値としてASCIIコード（それ以外は0を返す）
+/*
+	unsigned char shiftkeys();
+	// SHIFT関連キーの押下状態を返す
+*/
+#define shiftkeys() clib_shiftkeys(g_data)
+unsigned char clib_shiftkeys(void*** data);
+
+/*
+	unsigned char ps2readkey();
+	// 入力された1つのキーのキーコードをグローバル変数vkeyに格納（押されていなければ0を返す）
+	// 下位8ビット：キーコード
+	// 上位8ビット：シフト状態（押下：1）、上位から<0><CAPSLK><NUMLK><SCRLK><Win><ALT><CTRL><SHIFT>
+	// 英数・記号文字の場合、戻り値としてASCIIコード（それ以外は0を返す）
+*/
+#define ps2readkey() clib_ps2readkey(g_data)
+unsigned char clib_ps2readkey(void*** data);
+
 

--- a/mips/clib/example.c
+++ b/mips/clib/example.c
@@ -15,8 +15,12 @@ void init(void){
 
 // Example of functions.
 // Maximum number of parameter(s) is 4 for public function.
+// Do not initialize static variables in the function.
+// It will be always initialize with 0 value.
 // 関数の実装例。
 // パブリック関数では、引数は最大４つまで。
+// 関数中で、スタティック変数の初期化を行なわない事。
+// スタティック変数は、常に値０で初期化される。
 char* test_private(int param1){
 	switch(param1){
 		case 0:

--- a/mips/clib/nbproject/Makefile-genesis.properties
+++ b/mips/clib/nbproject/Makefile-genesis.properties
@@ -1,5 +1,5 @@
 #
-#Wed May 15 15:38:15 PDT 2019
+#Tue May 21 13:54:07 PDT 2019
 default.com-microchip-mplab-nbide-toolchainXC32-XC32LanguageToolchain.md5=f2639e8ffe4e3a80ef2cdaeba61da340
 default.languagetoolchain.dir=C\:\\Program Files\\Microchip\\xc32\\v1.42\\bin
 configurations-xml=2f3193434ad25f263dc0e914df895fd6

--- a/mips/clib/nbproject/private/private.xml
+++ b/mips/clib/nbproject/private/private.xml
@@ -5,7 +5,7 @@
         <group>
             <file>file:/C:/Users/kmorimatsu/Documents/At%20Home/PIC/PIC32/PIC32MX370F512H/clib/clib.X/clib.h</file>
             <file>file:/C:/Users/kmorimatsu/Documents/At%20Home/PIC/PIC32/PIC32MX370F512H/clib/clib.X/clib.c</file>
-            <file>file:/C:/Users/kmorimatsu/Documents/At%20Home/PIC/PIC32/PIC32MX370F512H/clib/clib.X/clib_p32MX370F512H.ld</file>
+            <file>file:/C:/Users/kmorimatsu/Documents/At%20Home/PIC/PIC32/PIC32MX370F512H/clib/clib.X/sdfsio370f.c</file>
             <file>file:/C:/Users/kmorimatsu/Documents/At%20Home/PIC/PIC32/PIC32MX370F512H/clib/clib.X/example.c</file>
         </group>
     </open-files>