帮忙改成金字塔的

代人发帖

请教：帮忙改成金字塔的
N:=CURRBARSCOUNT;
B:=C<REF(C,4);
T1:= BARSLASTCOUNT(B);
A_B1:=(T1>9) AND MOD(T1,9)=1;
A_B2:=(T1>9) AND MOD(T1,9)=2;
A_B8:=(T1>9) AND MOD(T1,9)=8;
A_B9:=(T1>9) AND MOD(T1,9)=0;
B1:=(N=6 AND REFXV(COUNT(B,6),5)=6) OR (N=7 AND REFXV(COUNT(B,7),6)=7) OR (N=8 AND REFXV(COUNT(B,8),7)=8) OR (N>=9 AND REFXV(COUNT(B,9),8)=9);
DRAWNUMBER(B1 AND (REF(B,1)=0 OR A_B1),L,1),COLORMAGENTA;
B2:=(N=5 AND REFXV(COUNT(B,6),4)=6) OR (N=6 AND REFXV(COUNT(B,7),5)=7) OR (N=7 AND REFXV(COUNT(B,8),6)=8) OR (N>=8 AND REFXV(COUNT(B,9),7)=9);
DRAWNUMBER(B2 AND(REF(B,2)=0 OR A_B2),L,2),COLORMAGENTA;
B8:=(N=1 AND COUNT(B,8)=8) OR (N>=2 AND REFXV(COUNT(B,9),1)=9);
DRAWNUMBER(B8 AND (REF(B,8)=0 OR A_B8),L,8),COLORMAGENTA;
B9:=(N>=1 AND COUNT(B,9)=9);
DRAWNUMBER(B9 AND (REF(B,9)=0 OR A_B9),L,9),COLORBROWN;
S:=C>REF(C,4);
T2:= BARSLASTCOUNT(S);
A_S1:=(T2>9) AND MOD(T2,9)=1;
A_S2:=(T2>9) AND MOD(T2,9)=2;
A_S8:=(T2>9) AND MOD(T2,9)=8;
A_S9:=(T2>9) AND MOD(T2,9)=0;
S1:=(N=6 AND REFXV(COUNT(S,6),5)=6) OR (N=7 AND REFXV(COUNT(S,7),6)=7) OR (N=8 AND REFXV(COUNT(S,8),7)=8) OR (N>=9 AND REFXV(COUNT(S,9),8)=9);
DRAWNUMBER(S1 AND (REF(S,1)=0 OR A_S1),H,1),COLORMAGENTA,DRAWABOVE;
S2:=(N=5 AND REFXV(COUNT(S,6),4)=6) OR (N=6 AND REFXV(COUNT(S,7),5)=7) OR (N=7 AND REFXV(COUNT(S,8),6)=8) OR (N>=8 AND REFXV(COUNT(S,9),7)=9);
DRAWNUMBER(S2 AND (REF(S,2)=0 OR A_S2),H,2),COLORMAGENTA,DRAWABOVE;
S8:=(N=1 AND COUNT(S,8)=8) OR (N>=2 AND REFXV(COUNT(S,9),1)=9);
DRAWNUMBER(S8 AND (REF(S,8)=0 OR A_S8),H,8),COLORMAGENTA,DRAWABOVE;
S9:=(N>=1 AND COUNT(S,9)=9);
DRAWNUMBER(S9 AND (REF(S,9)=0 OR A_S9),H,9),COLORGREEN,DRAWABOVE;

技术009

[PEL] 复制代码

N:=CURRBARSCOUNT;
B:=C<REF(C,4);
T1:= BARSLAST(not(B));
A_B1:=(T1>9) AND MOD(T1,9)=1;
A_B2:=(T1>9) AND MOD(T1,9)=2;
A_B8:=(T1>9) AND MOD(T1,9)=8;
A_B9:=(T1>9) AND MOD(T1,9)=0;
B1:=(N=6 AND REFX(COUNT(B,6),5)=6) OR (N=7 AND REFX(COUNT(B,7),6)=7) OR (N=8 AND REFX(COUNT(B,8),7)=8) OR (N>=9 AND REFX(COUNT(B,9),8)=9);
DRAWNUMBER(B1 AND (REF(B,1)=0 OR A_B1),L,1,7,COLORMAGENTA);
B2:=(N=5 AND REFX(COUNT(B,6),4)=6) OR (N=6 AND REFX(COUNT(B,7),5)=7) OR (N=7 AND REFX(COUNT(B,8),6)=8) OR (N>=8 AND REFX(COUNT(B,9),7)=9);
DRAWNUMBER(B2 AND(REF(B,2)=0 OR A_B2),L,2,7,COLORMAGENTA);
B8:=(N=1 AND COUNT(B,8)=8) OR (N>=2 AND REFX(COUNT(B,9),1)=9);
DRAWNUMBER(B8 AND (REF(B,8)=0 OR A_B8),L,8,7,COLORMAGENTA);
B9:=(N>=1 AND COUNT(B,9)=9);
DRAWNUMBER(B9 AND (REF(B,9)=0 OR A_B9),L,9,7,COLORBROWN);
S:=C>REF(C,4);
T2:= BARSLAST(not(S));
A_S1:=(T2>9) AND MOD(T2,9)=1;
A_S2:=(T2>9) AND MOD(T2,9)=2;
A_S8:=(T2>9) AND MOD(T2,9)=8;
A_S9:=(T2>9) AND MOD(T2,9)=0;
S1:=(N=6 AND REFX(COUNT(S,6),5)=6) OR (N=7 AND REFX(COUNT(S,7),6)=7) OR (N=8 AND REFX(COUNT(S,8),7)=8) OR (N>=9 AND REFX(COUNT(S,9),8)=9);
DRAWNUMBER(S1 AND (REF(S,1)=0 OR A_S1),H,1,7,COLORMAGENTA);
S2:=(N=5 AND REFX(COUNT(S,6),4)=6) OR (N=6 AND REFX(COUNT(S,7),5)=7) OR (N=7 AND REFX(COUNT(S,8),6)=8) OR (N>=8 AND REFX(COUNT(S,9),7)=9);
DRAWNUMBER(S2 AND (REF(S,2)=0 OR A_S2),H,2,7,COLORMAGENTA);
S8:=(N=1 AND COUNT(S,8)=8) OR (N>=2 AND REFX(COUNT(S,9),1)=9);
DRAWNUMBER(S8 AND (REF(S,8)=0 OR A_S8),H,8,7,COLORMAGENTA);
S9:=(N>=1 AND COUNT(S,9)=9);
DRAWNUMBER(S9 AND (REF(S,9)=0 OR A_S9),H,9,7,COLORGREEN);

仅供参考