找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
首页论坛EAHub 外汇论坛
查看: 27|回复: 0

实现效果的脚本文件部分

[复制链接]

4万

主题

54

回帖

4万

积分

管理员

积分
45954
发表于 2026-8-27 12:29:00 | 显示全部楼层 |阅读模式
void OnStart()
  {
if(InpDate<0 || InpDate>100 || InpPrice<0 || InpPrice>100)
     {
return;
     }
int bars=(int)ChartGetInteger(0,CHART_VISIBLE_BARS);
int accuracy=1000;
datetime date[];
   double   price[];
ArrayResize(date,bars);
   ArrayResize(price,accuracy);
ResetLastError();
   if(CopyTime(Symbol(),Period(),0,bars,date)==-1)
     {
return;
     }
double max_price=ChartGetDouble(0,CHART_PRICE_MAX);
   double min_price=ChartGetDouble(0,CHART_PRICE_MIN);
double step=(max_price-min_price)/accuracy;
   for(int i=0;i<accuracy;i++)
      price=min_price+i*step;
int d=InpDate*(bars-1)/100;
   int p=InpPrice*(accuracy-1)/100;
if(!ArrowLeftPriceCreate(0,InpName,0,date[d],price[p],InpColor,
      InpStyle,InpWidth,InpBack,InpSelection,InpHidden,InpZOrder))
     {
      return;
     }
ChartRedraw();
   Sleep(1000);
int v_steps=accuracy*4/5;
for(int i=0;i<v_steps;i++)
     {
if(p<accuracy-1)
         p+=1;
if(!ArrowLeftPriceMove(0,InpName,date[d],price[p]))
         return;
if(IsStopped())
         return;
ChartRedraw();
     }
Sleep(1000);
ArrowLeftPriceDelete(0,InpName);
   ChartRedraw();
Sleep(1000);
}复制代码
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|EAHub外汇论坛

GMT+8, 2026-10-10 04:16 , Processed in 0.104280 second(s), 19 queries .

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表