易语言js引擎源码 改自mujs
.版本 2
.程序集 程序集1
.子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
' 源码 git://git.ghostscript.com/mujs.git 最后一次 拉取时间: 2016.6.2 17:52
_临时子程序 () ' 在初始化代码执行完毕后调用测试代码
返回 (0) ' 可以根据您的需要返回任意数值
.子程序 _临时子程序
.局部变量 J, 整数型
' 本名称子程序用作测试程序用,仅在开发及调试环境中有效,编译发布程序前将被系统自动清空,请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
J = js_newstate (0, 0, #JS_STRICT)
js_newcfunction (J, 到整数 (&jsB_load), “load”, 1) ' 绑定函数
js_setglobal (J, “load”) ' 设置为全局
js_dostring (J, #require_js)
js_newcfunction (J, 到整数 (&jsB_print), “print”, 0)
js_setglobal (J, “print”)
js_dostring (J, #jstest)
js_dofile (J, “randomColor.js”)
js_freestate (J)
.子程序 jsB_print, , , static void JS_API jsB_print(js_State *J)
.参数 J, 整数型
.局部变量 i, 整数型
.局部变量 top, 整数型
top = js_gettop (J)
i = 1
.判断循环首 (i < top)
输出调试文本 (js_tostring (J, i))
i = i + 1
.判断循环尾 ()
js_pushundefined (J)
.子程序 jsB_load, , , static void JS_API jsB_load(js_State *J)
.参数 J, 整数型
.局部变量 filename, 文本型
.局部变量 rv, 整数型
filename = js_tostring (J, 1)
rv = js_dofile (J, filename)
js_pushboolean (J, 选择 (rv ≠ 0, 1, 0))
易语言js引擎
易语言+js引擎