① 求助老師編寫一個虎拓主圖的通達信指標
主圖用的內容過多,這里無法通過。用文檔給你發了。
流通:=AMOUNT/VOL;
PJJ:=DMA((HIGH+LOW+CLOSE*2)/4,0.9);
JJ:=REF(EMA(PJJ,3),1);
QJJ:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
XVL:=(IF(CLOSE>OPEN,QJJ*(HIGH-LOW),IF(CLOSE<OPEN,QJJ*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF(CLOSE>OPEN,0-QJJ*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-QJJ*(HIGH-LOW),0-VOL/2)));
ZLL:=VOL/CAPITAL;
HSL1:=IF(ZLL>10,10,ZLL);
HSL:=(XVL/20)/1.15;
攻擊流量:((HSL*0.55+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.22)),NODRAW;
STICKLINE(HSL*0.4>=0,HSL*0.4*1.5,0,1.5,0),COLOR0000FF;
STICKLINE(HSL*0.4<0,HSL*0.4*1.5,0,1.5,0),COLORAAAAAA;
GJJ:=EMA(攻擊流量,8);
LLJX:=EMA(攻擊流量,3);
資金流量:LLJX,LINETHICK0,COLOR0000FF;
STICKLINE(資金流量>0,資金流量,0,1.5,0),COLOR00CCFF;
STICKLINE(資金流量<0,資金流量,0,1.5,0),COLORFFDD33;
流量基線:GJJ,COLOR009999;
ZJLL:=REF(LLJX,1);
QZJJ:=((LLJX-ZJLL)/ZJLL)*100;
流量增幅:IF(LLJX>0 AND ZJLL<0,ABS(QZJJ),IF(LLJX<0 AND ZJLL<0 AND LLJX<ZJLL,-QZJJ,QZJJ)),NODRAW;
力度:HSL/1000,NODRAW;
周流量:SUM(LLJX,5),NODRAW;
BB:=REF(周流量,1);
ZQZJJ:=((周流量-BB)/BB)*100;
周增幅:IF(周流量>0 AND BB<0,ABS(ZQZJJ),IF(周流量<0 AND BB<0 AND 周流量<BB,-ZQZJJ,ZQZJJ)),NODRAW;
② 請高手幫忙把通達信攻擊主圖中買入線和決策線(60日)改成金叉選股指標,先感謝,主圖的指標就請網上搜索
你這就是5日下穿10日賣,上穿10日買。不需要專門搞什麼金叉選股。這個指標就是騙人的,其實就是MA均線。綠色的60日均線上方強勢、做多。
③ 數據結構實現圖的基本操作
對鄰接表存儲的圖進行深度優先搜索演算法:
#include "stdio.h"
#define MAXVER 10 /* 最多頂點數 */
typedef char ElemType; /* 頂點元素類型 */
typedef struct node
{ int num;
struct node *next;
}slink; /* 邊或弧的結點類型 */
typedef struct
{ struct
{ ElemType vertex;
slink *first;
}ve[MAXVER]; /* 頂點信息結構 */
int vex,edge,tag; /* 存放頂點數、邊數和圖的類型 */
}adjlist; /* 鄰接表存儲結構類型名 */
/* 建立圖的鄰接表存儲表示。 */
void cregraph(adjlist *G,int n,int m) /* 建立鄰接表. n為頂點數,m為圖的類型 */
{ int i,e=0;slink *p,*q,*s;char x,y;
G->vex=n; G->tag=m;
for(i=0;i<n;i++)
{ G->ve[i].vertex=i+'A'; G->ve[i].first=NULL;} /* 初始化鄰接表 */
printf("Input edges(x-->y):"); /* 用大寫字母表示頂點 */
scanf("%c%c",&x,&y);
while(x!=' '&&y!=' ') /* 輸入邊或弧,遇空格符結束 */
{ e++; /* 統計邊或弧和數目 */
s=(slink *)malloc(sizeof(slink));
s->num=y-'A'; /* 生成結點插入 */
if(G->ve[x-'A'].first==NULL)
{ G->ve[x-'A'].first=s;
s->next=NULL;
}
else
{ p=G->ve[x-'A'].first;q=p->next;
while(q!=NULL&&s->num>q->num) {p=q;q=q->next;}
p->next=s;s->next=q;
}
if(!G->tag) /* m=0表示建立無向圖的鄰接表 */
{ s=(slink *)malloc(sizeof(slink));
s->num=x-'A';
if(G->ve[y-'A'].first==NULL)
{ G->ve[y-'A'].first=s;s->next=NULL;}
else
{ p=G->ve[y-'A'].first;q=p->next;
while(q!=NULL&&s->num>q->num) { p=q;q=q->next;}
p->next=s;s->next=q;
}
}
scanf("%c%c",&x,&y);
}
G->edge=e;
}
/* 輸出用鄰接表存儲表示的圖 */
void list(adjlist *G) /* 輸出鄰接表 */
{ int i; slink *p;
for(i=0;i<G->vex;i++)
{ printf("%d:%c--->",i,G->ve[i].vertex);
p=G->ve[i].first;
while(p)
{ printf("%3d",p->num);
p=p->next;
}
printf("\n");
}
}
/* 對鄰接表存儲的圖進行深度優先搜索演算法 */
int visited[MAXVER+1]; /* 頂點的訪問標記數組 */
dfs(adjlist *G,int v) /* v是訪問的起始點的下標 */
{ slink *p;
visited[v]=1;
printf("%3c",G->ve[v].vertex);
p=G->ve[v].first;
while(p)
{ if(visited[p->num]==0) /* 從V的未訪問過的鄰接點出發 */
dfs(G,p->num);
p=p->next; /* 找V的下一個鄰接點 */
}
}
void dfsgraph(adjlist *G)
{ int i;
for(i=0;i<G->vex;i++) if(!visited[i]) dfs(G,i);
}
main()
{ adjlist g;
int n=8;
cregraph(&g,n,0);
dfsgraph(&g);
}
對一個採用鄰接表作存儲結構的圖進行廣度優先遍歷:
/*鄰接表結構*/
#include "stdio.h"
#define MAXVER 10 /* 最多頂點數 */
typedef char ElemType; /* 頂點元素類型 */
typedef struct node
{ int num;
struct node *next;
}slink; /* 邊或弧的結點類型 */
typedef struct
{ struct
{ ElemType vertex;
slink *first;
}ve[MAXVER]; /* 頂點信息結構 */
int vex,edge,tag; /* 存放頂點數、邊數和圖的類型 */
}adjlist; /* 鄰接表存儲結構類型名 */
/*建立鄰接表*/
void cregraph(adjlist *G,int n,int m) /* n為頂點數,m為圖的類型 */
{ int i,e=0;slink *p,*q,*s;char x,y;
G->vex=n; G->tag=m;
for(i=0;i<n;i++)
{ G->ve[i].vertex=i+'A'; G->ve[i].first=NULL;} /* 初始化鄰接表 */
printf("Input edges(x-->y):"); /* 用大寫字母表示頂點 */
scanf("%c%c",&x,&y);
while(x!=' '&&y!=' ') /* 輸入邊或弧,遇空格符結束 */
{ e++; /* 統計邊或弧和數目 */
s=(slink *)malloc(sizeof(slink));
s->num=y-'A'; /* 生成結點插入 */
if(G->ve[x-'A'].first==NULL)
{ G->ve[x-'A'].first=s;
s->next=NULL;
}
else
{ p=G->ve[x-'A'].first;q=p->next;
while(q!=NULL&&s->num>q->num) {p=q;q=q->next;}
p->next=s;s->next=q;
}
if(!G->tag) /* m=0表示建立無向圖的鄰接表 */
{ s=(slink *)malloc(sizeof(slink));
s->num=x-'A';
if(G->ve[y-'A'].first==NULL)
{ G->ve[y-'A'].first=s;s->next=NULL;}
else
{ p=G->ve[y-'A'].first;q=p->next;
while(q!=NULL&&s->num>q->num) { p=q;q=q->next;}
p->next=s;s->next=q;
}
}
scanf("%c%c",&x,&y);
}
G->edge=e;
}
/* 輸出鄰接表 */
void list(adjlist *G) /* 輸出用鄰接表表示的圖 */
{ int i; slink *p;
for(i=0;i<G->vex;i++)
{ printf("%d:%c--->",i,G->ve[i].vertex);
p=G->ve[i].first;
while(p)
{ printf("%3d",p->num);
p=p->next;
}
printf("\n");
}
}
/* 對一個採用鄰接表作存儲結構的圖進行廣度優先遍歷 */
int visited[MAXVER];
void bfs(adjlist *G,int v)
{ int queue[MAXVER],front,rear,i;/* 定義一個分離隊列 */
slink *p;
front=rear=0; /* 隊列初始化為空 */
queue[rear++]=v; /* 初始頂點入隊列 */
while(front!=rear) /* 隊列不空 */
{ v=queue[front++]; /* 出隊列訪問 */
printf("%c->",G->ve[v].vertex);
visited[v]=1; /* 入訪問表 */
p=G->ve[v].first;
while(p!=NULL)
{ for(i=0;i<rear;i++)
if(p->num==queue[i]) break;
if(i>=rear)
queue[rear++]=p->num; /* 該鄰接點即沒被訪問過,也不在隊列中,則入隊列 */
p=p->next; /* 找V的下一個鄰接點 */
}
}
}
void bfsgraph(adjlist *G) /* 若還有不連通的部分,則跳過去訪問之 */
{ int i;
for(i=0;i<G->vex;i++)
if(!visited[i]) bfs(G,i);
}
main()
{ adjlist G;
cregraph(&G,8,0);
bfsgraph(&G);
}
最小生成樹的演算法:
/*求最小生成樹的Kruskal演算法描述*/
#define MAXE 10
struct edges
{ int bv,tv,w;}; /* 邊集類型,存儲一條邊的起始點bv終止頂點tv和權w */
typedef struct edges edgeset[MAXE+1];
int seeks(int set[],int v)
{ int i=v;
while(set[i]>0)
i=set[i];
return i;
}
kruskal(edgeset ge,int n,int e) /* ge表示的圖是按權值從小到大排列的 */
{ int set[MAXE],v1,v2,i,j;
for(i=1;i<=n;i++)
set[i]=0; /* 給set中的每個元素賦初值 */
i=1; /* i表示待獲取的生成樹中的邊數,初值為1 */
j=1; /* j表示ge中的下標,初值為1 */
while(j<n &&i<=e) /* 按邊權遞增順序,逐邊檢查該邊是否應加入到生成樹中 */
{ v1=seeks(set,ge[i].bv); /* 確定頂點v所在的邊通集 */
v2=seeks(set,ge[i].tv);
if(v1!=v2) /* 當v1,v2不在同一頂點集合,確定該邊應當選入生成樹 */
{ printf(" (%d,%d) ",ge[i].bv,ge[i].tv);
set[v1]=v2;
j++;
}
i++;
}
}
main()
{ edgeset e={{0,0,0},{4,5,2},{3,5,3},{1,4,5},{1,2,6},{2,4,7},{2,5,8},{1,3,9},{3,4,9},{1,5,13},{2,3,14}};
kruskal(e,5,10);
}
最短路徑的演算法:
#define Max 10 /* 預設最多頂點數 */
#define INFINITY 1000 /* 最大值 */
typedef struct
{ int vexnum,arcnum; /* 頂點數及邊或弧的數目 */
char vex[Max]; /* 存頂點信息的一維數組 */
int arc[Max][Max]; /* 存邊信息的二維數組 */
}AdjMatrix;
/* 建立有向圖的鄰接矩陣表示 */
void Creadjm(AdjMatrix *G)
{ int i,j,k,w;
printf("Input vex&arc:");
scanf("%d%d%*c",&G->vexnum,&G->arcnum);/*輸入頂點數和邊數,並讀掉回車符*/
printf("Input Vexinfo:");
for(k=0;k<G->vexnum;k++)
scanf("%c",&G->vex[k]); /* 輸入代表頂點的字元 */
for(i=0;i<G->vexnum;i++)
for(j=0;j<G->vexnum;j++)
G->arc[i][j]=INFINITY; /* 初始化鄰接矩陣 */
printf("Input %d edges:\n",G->arcnum);
for(k=0;k<G->arcnum;k++)
{ scanf("%d%d%d",&i,&j,&w); /* 輸入邊或弧 */
G->arc[i][j]=w;
}
}
/* 輸出用鄰接矩陣表示的有向圖 */
void list(AdjMatrix *G)
{ int i,j;
for(i=0;i<G->vexnum;i++)
{ printf("%6c----",G->vex[i]); /* 先輸出頂點信息 */
for(j=0;j<G->vexnum;j++)
printf("%4d",G->arc[i][j]); /* 再輸出與該頂點有關聯的邊或弧的信息 */
printf("\n");
}
}
/* 計算從頂點v0到其餘各點最短路徑演算法 */
void dijkstra(AdjMatrix *G,int n,int v0,int d[]) /* d數組存放各頂點最短路徑 */
{ int s[Max] ; /* s數組存放頂點是否找到最短路徑 */
int i,j,u,mindis;
for(i=0;i<n;i++)
{ d[i]=G->arc[v0][i];s[i]=0;}
s[v0]=1;
for(i=1;i<n;i++)
{ mindis=INFINITY;
for(j=0;j<n;j++)
if(s[j]==0 && d[j]<mindis) { u=j; mindis=d[j];}
s[u]=1; /* 頂點u已找到最短路徑 */
for(j=1;j<=n;j++) /* 修改j的最短路徑 */
if(s[j]==0&&d[j]>d[u]+G->arc[u][j]) d[j]=d[u]+G->arc[u][j];
}
}
main()
{ AdjMatrix G;
int d[Max],i;
Creadjm(&G);
list(&G);
dijkstra(&G,6,0,d);
for(i=0;i<G.vexnum;i++)
printf("%4d",d[i]);
}
④ 通達信主圖多個輸出,使用不同的坐標如何實現疊加指標可以實現,但卻要每次手動疊加,太麻煩了。
通過編寫指標公式後可以實現這樣的效果。任何比例不同的指標都可以疊加顯示在一起。
例如下圖中
macd指標,kdj指標,cci指標都可以顯示在主圖上。
但這種編寫相當復雜。
⑤ ps圖片各個指標是多少
電腦圖:RGB色72解析度 按照像素尺寸作圖 比如1024*1080
印刷圖:CMYK色 300解析度 按照實際尺寸cm或者mm作圖 比如內21*29.7cm是A4紙的尺寸21*28.5是大容十六開印刷尺寸,需要注意的,比如印刷色黑色需要用單黑,不能用四色黑,也就是CMYK四色色值分別為 0 0 0 100
註:寫真噴繪圖的黑色可以用 10 10 10 100,大圖的解析度可以適當降低至150 或者72 甚至噴繪的大圖可以用到40都可以
廣告常用尺寸 門型展架、x展架畫面 80*180cm 易拉寶80*200cm
冷板常用尺寸 40*60 60*90 80*120 90*140 120*240cm
⑥ 求助如何設置怪物的攻擊圖像和攻擊類型代碼
盛大就那麼點大,你想要的什麼攻擊代碼,你可以刷一隻有這個攻擊代碼的怪物出來,然後看他的怪物資料庫的圖像和代碼。
⑦ 求高手修改通達信操盤提醒副圖指標的圖形
STICKLINE(C>=MA(C,10),VAR4,REF(VAR4,1),2,0),COLORRED;
STICKLINE(C<MA(C,10),VAR4,REF(VAR4,1),2,0),COLORGREEN;
把12改成2就行了
⑧ matlab 對網路節點攻擊的程序 按節點度數從大到小進行攻擊,請問這個程序為什麼出不來圖啊
A=adj; %% adj存儲在juzheng.xlsx 中,A=xlsread('juzhen.xlsx');
N=length(A(:,1));
n=1:N;
%%%%% nq作為for循環條件不能是個向量,是一個值,向量長度length
nq=length(n);
ss=0;
B=zeros(1,nq); %定義一個初始矩陣,用來存儲
F=[];
for i=1:nq;
for j=1:nq;
B(i)=B(i)+A(i,j);
end
end
for u=max(B):-1:1
[cols]=find(B==u);
l=length(cols);
ss=ss+l;
nq=N-ss;
E=zeros(1,l);
for y=l:-1:1;
E(1,y)=cols(1,y);
A(E(1,y),:)=[];
A(:,E(1,y))=[];
B=zeros(1,nq); %定義一個初始矩陣,用來存儲
for i=1:nq;
for j=1:nq;
B(i)=B(i)+A(i,j); %度的變化
end
end
D=A;
C=A;
C(C~=0 & A~=inf)=1; %原先直接相連的邊記為1
D(D~=0 & D~=inf)=1;
D((D==0))=inf; %將鄰接矩陣變為鄰接距離矩陣,兩點無邊相連時賦值為無窮大,自身到自身的距離為0
for k=1:nq; %Floyd演算法求解任意兩點的最短路徑長度
for i=1:nq;
for j=1:nq;
if D(i,j)>D(i,k)+D(k,j);
D(i,j)=D(i,k)+D(k,j); %更新ij間距離
C(i,j)=C(i,k)*C(k,j); %更新最短路徑條數
elseif D(i,j)==D(i,k)+D(k,j);
if k~=i&&k~=j;
C(i,j)=C(i,j)+1; %更新與最短距離相同的路徑數
end
end
end
end
end
D((D==inf))=0;
s=0;
for i=1:nq;
for j=1:nq;
s=s+D(i,j);
end
end
aver_D=s/(N*(N-1));
F(1,u)=aver_D;
end
end
F(F==0)=[];
plot(F,'r-o')
⑨ 魔獸WE編輯器如何使單位攻擊超過500000防禦超過1000攻擊速度超快(就是遠程攻擊圖像成一條線的那種)
按住shift鍵再修改,值可以改的更大,攻擊速度也可以這么改,但要把攻擊前搖後搖改為0,就是單位里的動畫回復點。
⑩ 通達信超贊的主圖指標公式是怎樣的
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0,0.03,0,EXTERNSTR(0,3)),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0,0.06,0,EXTERNSTR(0,6)),COLORLIBLUE;
DRAWTEXT_FIX(ISLASTBAR,0,0.09,0,EXTERNSTR(0,12)),COLORLIGREEN;{老王}
DRAWTEXT_FIX(ISLASTBAR,0,0.15,0,FGBLOCK),COLORLIMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0,0.12,0,EXTERNSTR(0,1)),COLORYELLOW;{融勝}
主力成本線:EMA(COST(9),250),COLORBROWN,DOTLINE;
{牛馬線買點公式升級版}
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛線:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;
馬線:MA(牛線,8),COLORWHITE;
DRAWICON( FILTER(CROSS(牛線,馬線),20),馬線-0.002 ,1);
DRAWTEXT(CROSS(牛線,馬線),LOW*0.984,'買'),COLORRED,LINETHICK2;
止損價:H*0.95,LINETHICK0.5,COLORRED;
莊家:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+
16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+
13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+
10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+
7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+
4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;
IF(莊家>=REF(莊家,1),莊家,DRAWNULL),COLORRED,LINETHICK4;
IF(莊家<=REF(莊家,1),莊家,DRAWNULL),COLORGREEN,LINETHICK2;
DRAWBAND(牛線,RGB(255,87,22),馬線,RGB(0,30,255));
MA60:MA(CLOSE,60),COLORGRAY;
N1:=10;
TK:=CONST(HHVBARS(V,10)),COLOR0000FF,LINETHICK1;
量能平台:IF(CURRBARSCOUNT<=N1+3,CONST(IF(TK=0,C,REF(C,TK))),DRAWNULL),COLORGRAY,LINETHICK1;
NOTEXT_新量能點:IF(CURRBARSCOUNT=TK+1,量能平台,DRAWNULL),CIRCLEDOT,COLORFFFFFF,LINETHICK9;
DRAWTEXT(ISLASTBAR,量能平台,'量能平台'),COLORGRAY;
{穩漲}
紅軌道:=MA(MA(CLOSE,3),1),LINETHICK1,COLORYELLOW;
軌道:MA(MA(CLOSE,3),3),COLOR32CD32,LINETHICK2;
NOTEXT_升:IF(紅軌道>=軌道,軌道,DRAWNULL),COLORMAGENTA,LINETHICK2;
機構:(L2_VOL(0,0) - L2_VOL(0,1))*10000/FINANCE(7),NODRAW,COLORRED;
大戶:(L2_VOL(1,0) - L2_VOL(1,1))*10000/FINANCE(7),NODRAW,COLORMAGENTA;
主力:機構+大戶,NODRAW,COLORYELLOW;
STICKLINE(主力>0,O,C,1.5,1),COLORRED;
STICKLINE(主力<0,O,C,1.5,1),COLORCYAN;
STICKLINE(大戶>0,O,C,1,0),COLORMAGENTA;
STICKLINE(大戶<0,O,C,1,0),COLORGREEN;
STICKLINE(機構>0 AND 大戶>0,O,(O+C)/2,1,0),COLORRED;
STICKLINE(機構<0 AND 大戶>0,C,(O+C)/2,1,0),COLORCYAN;
STICKLINE(機構>0 AND 大戶<0,O,(O+C)/2,1,0)COLORMAGENTA;
STICKLINE(機構<0 AND 大戶<0,C,O,1,0)COLORLICYAN;
累計:=SUM(主力,30),COLORMAGENTA;
均值:=EMA(累計,MIN(10,30)),COLORWHITE;
{紅}
STICKLINE(CROSS(累計,均值),H,L,0,0),COLORRED,LINETHICK1;
STICKLINE(CROSS(累計,均值),CLOSE,OPEN,1.4,0),COLOR000088;
STICKLINE(CROSS(累計,均值),CLOSE,OPEN,1,0),COLOR0000BB;
STICKLINE(CROSS(累計,均值),CLOSE,OPEN,0.6,0),COLOR0000DD;
STICKLINE(CROSS(累計,均值),CLOSE,OPEN,0,0),COLOR0000FF;
{藍}
STICKLINE(CROSS(均值,累計),H,L,0,0),COLORFF8800,LINETHICK1;
STICKLINE(CROSS(均值,累計),CLOSE,OPEN,1.4,0),COLORBB4400;
STICKLINE(CROSS(均值,累計),CLOSE,OPEN,1,0),COLORCC5500;
STICKLINE(CROSS(均值,累計),CLOSE,OPEN,0.6,0),COLORDD6600;
STICKLINE(CROSS(均值,累計),CLOSE,OPEN,0,0),COLOREE7700;
{高低點定位}
G0:=(XMA(XMA(H,30),30)-XMA(XMA(L,30),30))+XMA(XMA(H,30),30);
D0:=XMA(XMA(L,30),30)-(XMA(XMA(H,30),30)-XMA(XMA(L,30),30));
G01:=(XMA(XMA(H,30),30)-XMA(XMA(L,30),30))*0.5+XMA(XMA(H,30),30);
D01:=XMA(XMA(L,30),30)-(XMA(XMA(H,30),30)-XMA(XMA(L,30),30))*0.5;
GO0:=(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3+XMA(XMA(H,60),60);
DO0:=XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3;
STICKLINE(CURRBARSCOUNT=1,G0,G0,100,5),COLORGREEN;
STICKLINE(CURRBARSCOUNT=1,D0,D0,100,5),COLORMAGENTA;
STICKLINE(CURRBARSCOUNT=1,GO0,GO0,100,5),COLORLIBLUE;
STICKLINE(CURRBARSCOUNT=1,DO0,DO0,100,5),COLORRED;
DRAWTEXT(ISLASTBAR,G0,'賣'),COLORGREEN;
DRAWTEXT(ISLASTBAR,D0,'買'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,GO0,'頂'),COLORLIBLUE;
DRAWTEXT(ISLASTBAR,DO0,'底'),COLORRED;
由於公式字元過多,這里限制數量無法發出,