神奇九转很神奇吗？

jdgoal

神奇九转满天飞，看我易得一个公式搞定。~~~

1. A1:=C>=REF(C,4);
   
2. A:=C<REF(C,4);
   
3. AA:=C<REF(C,4) AND REF(A1,1);
   
4. T:=BARSLAST(AA);
   
5. M:=(T=0 AND REFX(T=1 AND NOT(A),1)) OR (REFX(T=2 AND NOT(A),2)) OR (REFX(T=3 AND NOT(A),3)) OR (REFX(T=4 AND NOT(A),4)) OR (REFX(T=5 AND NOT(A),5))
   
6. OR (REFX(T=6 AND NOT(A),6)) OR (REFX(T=7 AND NOT(A),7)) OR (REFX(T=8 AND NOT(A),8));
   
7. M1:=T=1 AND REFX(T=2 AND NOT(A),1) OR (REFX(T=3 AND NOT(A),2)) OR (REFX(T=4 AND NOT(A),3)) OR (REFX(T=5 AND NOT(A),4)) OR (REFX(T=6 AND NOT(A),5))
   
8. OR (REFX(T=7 AND NOT(A),6)) OR (REFX(T=8 AND NOT(A),7));
   
9. M2:=T=2 AND REFX(T=3 AND NOT(A),1) OR (REFX(T=4 AND NOT(A),2)) OR (REFX(T=5 AND NOT(A),3)) OR (REFX(T=6 AND NOT(A),4)) OR (REFX(T=7 AND NOT(A),5)) OR (REFX(T=8 AND NOT(A),6));
   
10. M3:=T=3 AND REFX(T=4 AND NOT(A),1)OR (REFX(T=5 AND NOT(A),2)) OR (REFX(T=6 AND NOT(A),3)) OR (REFX(T=7 AND NOT(A),4)) OR (REFX(T=8 AND NOT(A),5));
    
11. M4:=T=4 AND REFX(T=5 AND NOT(A),1) OR (REFX(T=6 AND NOT(A),2)) OR (REFX(T=7 AND NOT(A),3)) OR (REFX(T=8 AND NOT(A),4));
    
12. M5:=T=5 AND REFX(T=6 AND NOT(A),1) OR (REFX(T=7 AND NOT(A),2)) OR (REFX(T=8 AND NOT(A),3));
    
13. M6:=T=6 AND REFX(T=7 AND NOT(A),1) OR (REFX(T=8 AND NOT(A),2));
    
14. M7:=T=7 AND REFX(T=8 AND NOT(A),1);
    
15. N:=T=1 AND REF(T=0 AND AA,1) AND A;
    
16. N1:=T=2 AND REF(N,1) AND A;
    
17. N2:=T=3 AND REF(N1,1) AND A;
    
18. N3:=T=4 AND REF(N2,1) AND A;
    
19. N4:=T=5 AND REF(N3,1) AND A;
    
20. N5:=T=6 AND REF(N4,1) AND A;
    
21. N6:=T=7 AND REF(N5,1) AND A;
    
22. N7:=T=8 AND REF(N6,1) AND A;
    
23. DRAWTEXT(T=0,H*1.02,'1'),COLORGREEN;
    
24. DRAWTEXT(N,H*1.02,'2'),COLORGREEN;
    
25. DRAWTEXT(N1,H*1.02,'3'),COLORGREEN;
    
26. DRAWTEXT(N2,H*1.02,'4'),COLORGREEN;
    
27. DRAWTEXT(N3,H*1.02,'5'),COLORGREEN;
    
28. DRAWTEXT(N4,H*1.02,'6'),COLORGREEN;
    
29. DRAWTEXT(N5,H*1.02,'7'),COLORGREEN;
    
30. DRAWTEXT(N6,H*1.02,'8'),COLORGREEN;
    
31. DRAWTEXT(N7,H*1.02,'9'),COLORGREEN;
    
32. DRAWICON(N7,H*1.04,1),COLORGREEN;
    
33. DRAWTEXT(M,H*1.02,'1'),COLORBLACK;
    
34. DRAWTEXT(M1,H*1.02,'2'),COLORBLACK;
    
35. DRAWTEXT(M2,H*1.02,'3'),COLORBLACK;
    
36. DRAWTEXT(M3,H*1.02,'4'),COLORBLACK;
    
37. DRAWTEXT(M4,H*1.02,'5'),COLORBLACK;
    
38. DRAWTEXT(M5,H*1.02,'6'),COLORBLACK;
    
39. DRAWTEXT(M6,H*1.02,'7'),COLORBLACK;
    
40. DRAWTEXT(M7,H*1.02,'8'),COLORBLACK;
    
41. B1:=C<=REF(C,4);
    
42. B:=C>REF(C,4);
    
43. BB:=C>REF(C,4) AND REF(B1,1);
    
44. T1:=BARSLAST(BB);
    
45. M111:=(T1=0 AND REFX(T1=1 AND NOT(B),1)) OR (REFX(T1=2 AND NOT(B),2)) OR (REFX(T1=3 AND NOT(B),3)) OR (REFX(T1=4 AND NOT(B),4)) OR (REFX(T1=5 AND NOT(B),5))
    
46. OR (REFX(T1=6 AND NOT(B),6)) OR (REFX(T1=7 AND NOT(B),7)) OR (REFX(T1=8 AND NOT(B),8));
    
47. M11:=T1=1 AND REFX(T1=2 AND NOT(B),1) OR (REFX(T1=3 AND NOT(B),2)) OR (REFX(T1=4 AND NOT(B),3)) OR (REFX(T1=5 AND NOT(B),4)) OR (REFX(T1=6 AND NOT(B),5))
    
48. OR (REFX(T1=7 AND NOT(B),6)) OR (REFX(T1=8 AND NOT(B),7));
    
49. M22:=T1=2 AND REFX(T1=3 AND NOT(B),1) OR (REFX(T1=4 AND NOT(B),2)) OR (REFX(T1=5 AND NOT(B),3)) OR (REFX(T1=6 AND NOT(B),4)) OR (REFX(T1=7 AND NOT(B),5)) OR (REFX(T1=8 AND NOT(B),6));
    
50. M33:=T1=3 AND REFX(T1=4 AND NOT(B),1)OR (REFX(T1=5 AND NOT(B),2)) OR (REFX(T1=6 AND NOT(B),3)) OR (REFX(T1=7 AND NOT(B),4)) OR (REFX(T1=8 AND NOT(B),5));
    
51. M44:=T1=4 AND REFX(T1=5 AND NOT(B),1) OR (REFX(T1=6 AND NOT(B),2)) OR (REFX(T1=7 AND NOT(B),7)) OR (REFX(T1=8 AND NOT(B),4));
    
52. M55:=T1=5 AND REFX(T1=6 AND NOT(B),1) OR (REFX(T1=7 AND NOT(B),2)) OR (REFX(T1=8 AND NOT(B),3));
    
53. M66:=T1=6 AND REFX(T1=7 AND NOT(B),1) OR (REFX(T1=8 AND NOT(B),2));
    
54. M77:=T1=7 AND REFX(T1=8 AND NOT(B),1);
    
55. N111:=T1=1 AND REF(T1=0 AND BB,1) AND B;
    
56. N11:=T1=2 AND REF(N111,1) AND B;
    
57. N22:=T1=3 AND REF(N11,1) AND B;
    
58. N33:=T1=4 AND REF(N22,1) AND B;
    
59. N44:=T1=5 AND REF(N33,1) AND B;
    
60. N55:=T1=6 AND REF(N44,1) AND B;
    
61. N66:=T1=7 AND REF(N55,1) AND B;
    
62. N77:=T1=8 AND REF(N66,1) AND B;
    
63. DRAWTEXT(T1=0,H*1.02,'1'),COLOR9900CC;
    
64. DRAWTEXT(N111,H*1.02,'2'),COLOR9900CC;
    
65. DRAWTEXT(N11,H*1.02,'3'),COLOR9900CC;
    
66. DRAWTEXT(N22,H*1.02,'4'),COLOR9900CC;
    
67. DRAWTEXT(N33,H*1.02,'5'),COLOR9900CC;
    
68. DRAWTEXT(N44,H*1.02,'6'),COLOR9900CC;
    
69. DRAWTEXT(N55,H*1.02,'7'),COLOR9900CC;
    
70. DRAWTEXT(N66,H*1.02,'8'),COLOR9900CC;
    
71. DRAWTEXT(N77,H*1.02,'9'),COLOR9900CC;
    
72. DRAWICON(N77,H*1.04,2);
    
73. DRAWTEXT(M111,H*1.02,'1'),COLORBLACK;
    
74. DRAWTEXT(M11,H*1.02,'2'),COLORBLACK;
    
75. DRAWTEXT(M22,H*1.02,'3'),COLORBLACK;
    
76. DRAWTEXT(M33,H*1.02,'4'),COLORBLACK;
    
77. DRAWTEXT(M44,H*1.02,'5'),COLORBLACK;
    
78. DRAWTEXT(M55,H*1.02,'6'),COLORBLACK;
    
79. DRAWTEXT(M66,H*1.02,'7'),COLORBLACK;
    
80. DRAWTEXT(M77,H*1.02,'8'),COLORBLACK;

复制代码

aiuoker

九转就是忽悠小白的

liugaohui

谢谢分享

输入法

有未来函数

与君期行

神奇1还是可以参考一下的