//--- 画布的宽和高(用于绘制)
#define IMG_WIDTH 200
#define IMG_HEIGHT 200
//--- 启动脚本前显示参数窗口
#property script_show_inputs
//--- 启用设置颜色格式
input ENUM_COLOR_FORMAT clr_format=COLOR_FORMAT_XRGB_NOALPHA;
//--- 绘制数组(缓冲区)
uint ExtImg[IMG_WIDTH*IMG_HEIGHT];
//+------------------------------------------------------------------+
//| 脚本程序起始函数 |
//+------------------------------------------------------------------+
void OnStart()
{
//--- 创建用于绘制的OBJ_BITMAP_LABEL物件
ObjectCreate(0,"CLOCK",OBJ_BITMAP_LABEL,0,0,0);
//--- 指定用于在CLOCK物件编写的图形资源的名称
ObjectSetString(0,"CLOCK",OBJPROP_BMPFILE,"::IMG");
//--- 辅助变量
double a; // 箭头计数器
uint nm=2700; // 分钟计数器
uint nh=2700*12; // 小时计数器
uint w,h; // 接收文本字符串大小的变量
int x,y; // 计算文本字符串定位点当前坐标的变量
//--- 无限循环旋转时针,直至脚本停止
while(!IsStopped())
{
//--- 清空绘制缓冲区数组的时钟
ArrayFill(ExtImg,0,IMG_WIDTH*IMG_HEIGHT,0);
//--- 为钟面设置绘制数字的字体
TextSetFont("Arial",-200,FW_EXTRABOLD,0);
//--- 绘制钟面
for(int i=1;i<=12;i++)
{
//--- 接收钟面上当前小时的大小
TextGetSize(string(i),w,h);
//--- 计算钟面上当前小时的坐标
a=-((i*300)%3600*M_PI)/1800.0;
x=IMG_WIDTH/2-int(sin(a)*80+0.5+w/2);
y=IMG_HEIGHT/2-int(cos(a)*80+0.5+h/2);
//--- 输出钟面上的小时到ExtImg[]缓冲区
TextOut(string(i),x,y,TA_LEFT|TA_TOP,ExtImg,IMG_WIDTH,IMG_HEIGHT,0xFFFFFFFF,clr_format);
}
//--- 现在,指定绘制分针的字体
TextSetFont("Arial",-200,FW_EXTRABOLD,-int(nm%3600));
//--- 接收分针的大小
TextGetSize("----->",w,h);
//--- 计算钟面上分针的坐标
a=-(nm%3600*M_PI)/1800.0;
x=IMG_WIDTH/2-int(sin(a)*h/2+0.5);
y=IMG_HEIGHT/2-int(cos(a)*h/2+0.5);
//--- 在ExtImg[]缓冲区输出分针到钟面
TextOut("----->",x,y,TA_LEFT|TA_TOP,ExtImg,IMG_WIDTH,IMG_HEIGHT,0xFFFFFFFF,clr_format);
//--- 现在,设置绘制分针的字体
TextSetFont("Arial",-200,FW_EXTRABOLD,-int(nh/12%3600));
TextGetSize("==>",w,h);
//--- 计算钟面上时针的坐标
a=-(nh/12%3600*M_PI)/1800.0;
x=IMG_WIDTH/2-int(sin(a)*h/2+0.5);
y=IMG_HEIGHT/2-int(cos(a)*h/2+0.5);
//--- 在ExtImg[]缓冲区输出时针到钟面
TextOut("==>",x,y,TA_LEFT|TA_TOP,ExtImg,IMG_WIDTH,IMG_HEIGHT,0xFFFFFFFF,clr_format);
//--- 更新图形资源
ResourceCreate("::IMG",ExtImg,IMG_WIDTH,IMG_HEIGHT,0,0,IMG_WIDTH,clr_format);
//--- 强制图表更新
ChartRedraw();
//--- 增加小时和分钟计数器
nm+=60;
nh+=60;
//--- 框架之间保持短暂停顿
Sleep(10);
}
//--- 完成脚本操作时删除 CLOCK 物件
ObjectDelete(0,"CLOCK");
//---
}
|