OSDN Git Service

svn rev.329より移動。
[chnosproject/CHNOSProject.git] / CHNOSProject / chnos / tolset_chn_000 / chnos_008 / lines / lines.c
diff --git a/CHNOSProject/chnos/tolset_chn_000/chnos_008/lines/lines.c b/CHNOSProject/chnos/tolset_chn_000/chnos_008/lines/lines.c
new file mode 100644 (file)
index 0000000..00880ee
--- /dev/null
@@ -0,0 +1,23 @@
+#include <apilib.h>\r
+\r
+void CHNMain(void)\r
+{\r
+       uchar *buf;\r
+       uint winID;\r
+       int i;\r
+\r
+       api_initmalloc();\r
+       buf = api_malloc(160 * 100);\r
+       winID = api_openwin(buf, 160, 100, -1, "lines");\r
+       for(i = 0; i < 8; i++){\r
+               api_linewin(winID + 1, 8, 26, 77, i * 9 + 26, i);\r
+               api_linewin(winID + 1, 88, 26, i * 9 + 88, 89, i);\r
+       }\r
+       api_refreshwin(winID, 6, 26, 154, 90);\r
+       for(;;){\r
+               if(api_getkey(true) == 0x0a) break;\r
+       }\r
+       api_closewin(winID);\r
+       api_end();\r
+}\r
+\r