Buscando gran sabiduría para la fórmula del calendario en espiral

La fórmula del calendario en espiral de gran sabiduría:

{Calendario en espiral}

n:=8;

A:=COUNT( C , 0)=1;

B:=BARSLAST(A)/N;

Valor seno: SIN(B);

STICKLINE( SIN( B )gt;=0,99, 0, 1, 10, 0), colorff00ff;

STICKLINE( SIN(B)lt; -0,99, 0, -1, 10, 0), colorff00ff;

e:=COUNT(C,0)=1;

d:=BARSLAST(e)/13

SIN(d);

f:=COUNT(C,0)=1;

g:=BARSLAST(f)/21;

SIN(g);

0 ;

{n 1 999 10};

El comienzo de la primavera: =FILTRO(MES=2 Y (DÍA=3 O DÍA=5), 2);

Lluvia: =FILTRO(MES=2 Y (DÍA=18 O DÍA=20), 2);

Jingzhe: =FILTRO(MES=3 Y (DÍA=5 O DÍA= 7), 2 );

Equinoccio de primavera: =FILTRO(MES=3 Y (DÍA=20 O DÍA=22), 2);

Festival de Qingming: =FILTRO(MES =4 Y (DÍA= 4 O DÍA=6 ), 2);

Gu Yu: =FILTRO(MES=4 Y (DÍA=19 O DÍA=21), 2);

Comienzo del verano: =FILTRO (MES=5 Y (DÍA=6 O DÍA=8 ),

Xiaoman: =FILTRO(MES=5 Y (DÍA=20 O DÍA=); 22), 2);

Gana semillas: =FILTRO(MES=6 Y (DÍA=5 O DÍA=7), 2);

Solsticio de verano: =FILTRO(MES). =6 Y (DÍA=20 O DÍA=22 ), 2);

Calor Pequeño: =FILTRO(MES=7 Y (DÍA=6 O DÍA=8), 2);

Dashu: =FILTRO(MES=7 Y (DÍA=22 O DÍA=24), 2);

Comienzo del otoño: =FILTRO(MES=8 Y (DÍA=7 O DÍA= 9), 2);

Calor de verano: =FILTRO(MES=8 Y (DÍA=22 O DÍA=24), 2);

Bailu: =FILTRO(MES= 9 Y (DÍA=7 O DÍA=9), 2) ;

Equinoccio de Otoño: =FILTRO(MES=9 Y (DÍA=22 O DÍA=24), 2);

Rocío frío: =FILTRO(MES=10 Y (DÍA=7 O DÍA=9), 2);

Escarcha: =FILTRO(MES=10 Y (DÍA=22 O DÍA=24) , 2);

Inicio del Invierno: =FILTRO( MES=11 Y (DÍA=7 O DÍA=9 ), 2)

;

Nieve ligera: =FILTRO(MES=11 Y (DÍA=22 O DÍA=24), 2);

Nieve intensa: =FILTRO(MES=12 Y (DÍA) =6 O DÍA=8 ), 2);

Solsticio de Invierno: =FILTRO(MES=12 Y (DÍA=21 O DÍA=23), 2);

Oscar: =FILTRO( MES=1 Y (DÍA=5 O DÍA=7 ), 2

Dahan: =FILTRO(MES=1 Y (DÍA=19 O DÍA=22 ), <); /p>

VARa2:=DRAWTEXT(Lluvia, 0.5,'Lluvia');

VARa3:=DRAWTEXT(Jingzhe,-0.5,'Jingzhe');

VARa4 :=DRAWTEXT (Equinoccio de primavera, 0.5, 'Equinoccio de primavera');

VARa5:=DRAWTEXT(Qingming,-0.5,'Qingming');

VARa6:=DRAWTEXT(Grano Lluvia, 0.5,'Grain Rain ');

VARa8:=DRAWTEXT(小Man,-0.5,'小Man');

VARa9:=DRAWTEXT(awnzhong, 0.5, 'awnzhong');

VARa10:=DRAWTEXT(solsticio de verano,-0.5,'solsticio de verano');

VARa11:=DRAWTEXT(小热, 0.5,'pequeño verano' );

VARa12:=DRAWTEXT(Dashu, -0.5, 'Dashu');

VARa14:=DRAWTEXT(chushu, 0.5,'chushu');

VARa15:=DRAWTEXT(白鹿,-0.5 ,'Rocío Blanco');

VARa16:=DRAWTEXT(Equinoccio de Otoño, 0.5,'Equinoccio de Otoño');

VARa17 :=DRAWTEXT(Rocío Frío,-0.5,'Rocío Frío');

VARa18:=DRAWTEXT(Frost, 0.5,'Frost');

VARa20:=DRAWTEXT(Claro Nieve,-0.5,'Nieve ligera');

VARa21 :=DRAWTEXT(Nieve intensa, 0.5,'Nieve intensa');

VARa22:=DRAWTEXT(Solsticio de invierno,- 0.5,'Solsticio de Invierno');

VARa23:=DRAWTEXT(Pequeño Frío, 0.5 ,'Pequeño Frío');

VARa24:=DRAWTEXT(Gran Frío, -0.5,' Big Cold');

VARa2, coloramarillo, línea gruesa2;

VARa3, coloramarillo, línea gruesa2;

VARa4, coloramarillo, línea gruesa2;

VARa5, coloramarillo, espesor de línea2;

VARa6, coloramarillo, espesor de línea2;

VARa8, coloramarillo, espesor de línea2;

VARa9, coloramarillo, espesor de línea2;

VARa10, coloramarillo, espesor de línea2;

VARa11, coloramarillo, espesor de línea2;

VARa12, coloramarillo, espesor de línea2;

VARa14, coloramarillo, espesor de línea2;

VARa15, coloramarillo, espesor de línea2;

VARa16, coloramarillo, espesor de línea2;

VARa17, coloramarillo, espesor de línea2;

VARa18, coloramarillo, espesor de línea2;

VARa20, coloramarillo, espesor de línea2;

VARa21, coloramarillo, espesor de línea2;

VARa22, coloramarillo, espesor de línea2;

VARa23, coloramarillo, línea gruesa2;

VARa24, coloramarillo, línea gruesa2;

STICKLINE (lluvia, 0, 0.5, 1, 0), colorrojo;

STICKLINE (Jingzhe, 0, -0.5, 1, 0), de color rojo;

STICKLINE (Equinoccio de primavera, 0, 0.5, 1, 0), de color rojo;

STICKLINE ( Festival Qingming), 0, -0.5, 1, 0), de color rojo;

STICKLINE (Gu Yu, 0, 0.5, 1, 0), de color rojo;

STICKLINE (小Man , 0, -0.5 , 1, 0), de color rojo;

STICKLINE (especie de arista, 0, 0.5, 1, 0), de color rojo;

STICKLINE (solsticio de verano, 0, -0.5, 1, 0), color rojo;

STICKLINE(小热, 0, 0.5, 1, 0), color rojo;

STICKLINE(大书, 0, -0.5, 1, 0), de color rojo;

STICKLINE (End Heat, 0, 0.5, 1, 0), de color rojo;

STICKLINE (Bailu, 0, -0.5, 1, 0) , colorrojo;

STICKLINE (equinoccio de otoño, 0, 0,5, 1, 0), colorrojo;

STICKLINE (rocío frío, 0, -0,5, 1, 0), colorrojo;

STICKLINE (escarcha, 0, 0,5, 1, 0), color rojo;

STICKLINE (nieve ligera, 0, -0,5, 1, 0), color rojo;

STICKLINE (nieve intensa, 0, 0,5, 1, 0), color rojo;

STICKLINE (Solsticio de invierno, 0, -0,5, 1, 0), color rojo; STICKLINE (Xiaohan, 0, 0.5, 1, 0), color rojo

STICKLINE (Big Cold, 0, -0.5, 1, 0), color rojo

DRAWTEXT (Principio de; Primavera, 0, '●principio de primavera'), COLORamarillo;

DRAWTEXT (principio de verano, 0, '●principio de verano'), COLOR0000FF;

DRAWTEXT (principio de otoño, 0, '●principio de otoño'), COLOR00FFFF;

DRAWTEXT(principio de invierno, 0, '●principio de invierno'), COLOR0000FF;

No se puede usar Feihu, debería ser la función CONTAR, no conozco los detalles