测试矩阵取坐标源码
.版本 2.支持库 eAPI
.程序集 调用
.子程序 Call, 整数型
.参数 地址, 整数型
.参数 参数一, 整数型, 可空
.参数 参数二, 整数型, 可空
.参数 参数三, 整数型, 可空
.参数 参数四, 整数型, 可空
.参数 参数五, 整数型, 可空
.参数 参数六, 整数型, 可空
.参数 参数七, 整数型, 可空
.参数 参数八, 整数型, 可空
.参数 参数九, 整数型, 可空
.参数 参数十, 整数型, 可空
返回 (_Call (地址, 参数一, 参数二, 参数三, 参数四, 参数五, 参数六, 参数七, 参数八, 参数九, 参数十))
.子程序 _Call, 整数型
.参数 函数指针, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.参数 参数三, 整数型
.参数 参数四, 整数型
.参数 参数五, 整数型
.参数 参数六, 整数型
.参数 参数七, 整数型
.参数 参数八, 整数型
.参数 参数九, 整数型
.参数 参数十, 整数型
置入代码 ({ 201, 88, 135, 4, 36, 255, 224 })
返回 (0)
.子程序 memcpy, 整数型
.参数 目标地址, 整数型
.参数 原始地址, 整数型
.参数 字节数, 整数型
置入代码 ({ 93, 86, 139, 116, 36, 16, 133, 246, 126, 21, 139, 68, 36, 8, 139, 76, 36, 12, 43, 200, 138, 20, 1, 136, 16, 64, 131, 238, 1, 117, 245, 184, 1, 0, 0, 0, 94, 194, 12, 0 })
返回 (0)
.子程序 FillRGB
.参数 x, 整数型
.参数 y, 整数型
.参数 w, 整数型
.参数 h, 整数型
.参数 color, 整数型
.局部变量 pRect, 矩形数据
pRect.左边 ＝ x
pRect.顶边 ＝ y
pRect.右边 ＝ x ＋ w
pRect.底边 ＝ y ＋ h
Call (设备.Clear, 设备.Device, 1, 汇编取变量_整数型 (pRect.左边), 1, color, 0, 0)
.子程序 矩形绘制
.参数 x, 整数型
.参数 y, 整数型
.参数 w, 整数型
.参数 h, 整数型
.参数 px, 整数型
.参数 Color, 整数型
FillRGB (x, y, w, px, Color)
FillRGB (x, y ＋ h, w, px, Color)
FillRGB (x, y, px, h, Color)
FillRGB (x ＋ w, y, px, h, Color)
------------具体源码请下载后参考-------------------
测试矩阵取坐标源码
啥意思？
我是新人
页:
[1]