📄 test.input
字号:
(say (advice (200 (or (playm bko) (playm ko_our) (playm ag_opp)) (do our {3} (pos (pt -12 12))) (do our {4} (pos (pt -1 -4)))) (200 (and (or (playm bko) (playm ko_our) (playm ag_opp)) (not "SPpos")) (do our {7} (pos (pt -2.82843 2.82843 (pt -0.2 0))))) (200 (and (or (playm bko) (playm ko_our) (playm ag_opp)) "SPpos") (do our {7} (pos (pt -0.2 0)))) (260 (and "SPpos" (ppos our {7} 1 1 (arc (pt 0 0) 0 4 0 360))) (do our {7} (bto {3}))) (260 (and (ppos our {3} 1 1 (arc (pt -12 12) 0 4 0 360))) (do our {3} (bto (pt 30 -4) {c})))))(say (advice (200 (playm gc_opp) (do our {7} (pos (pt 34.5 -8))) (do our {9} (pos (pt 34.5 22))) (do our {10} (pos (pt 34.5 8))) (do our {11} (pos (pt 34.5 -22))))))(say (advice (200 (or (playm bko) (playm ko_opp) (playm ag_our)) (do our {2} (pos (pt -11.3027 0.486097))) (do our {4} (pos (pt -10.15 0))) (do our {5} (pos (pt -8.12 -6.09))) (do our {6} (pos (pt -1 25))) (do our {8} (pos (pt -1 -25))))))(say (advice (200 (playm ki_opp) (do our {8} (pos (pt -4.12448 -28.8069))) (do our {11} (pos (pt 2.10191 -24.1613))))))(say (define (definec "SPpos" (and (ppos our {2} 1 1 (arc (pt -38 -6) 0 4 0 360)) (ppos our {3} 1 1 (arc (pt -27 19) 0 4 0 360)) (ppos our {4} 1 1 (arc (pt -38 6) 0 4 0 360)) (ppos our {6} 1 1 (arc (pt 0.345534 20) 0 4 0 360))))))(say (advice (200 (playm gc_our) (do our {2} (pos (pt -38 -6))) (do our {3} (pos (pt -27 19))) (do our {4} (pos (pt -38 6))) (do our {6} (pos (pt 0.345534 20)))) (200 (and (playm gc_our) "SPpos") (do our {1} (pos (pt -47 9)))) (274 (and "SPpos" (ppos our {1} 1 1 (arc (pt -47 9) 0 4 0 360))) (do our {1} (bto {3}))) (274 (and (ppos our {3} 1 1 (arc (pt -27 19) 0 4 0 360))) (do our {3} (bto (pt 26 20) {c})))))(say (define (definer "PLINCL0" (reg (quad (pt 24.6 9.966) (pt 24.6 -9.634) (pt 29.2592 -4.734) (pt 29.2592 5.066)) (quad (pt 24.6 9.966) (pt 24.6 -9.634) (pt 19.9408 -4.734) (pt 19.9408 5.066)))) (definer "PLINCL1" (reg (quad (pt 20.32 17.3) (pt -13.08 17.3) (pt -4.73 24.055) (pt 11.97 24.055)) (quad (pt 20.32 17.3) (pt -13.08 17.3) (pt -4.73 10.545) (pt 11.97 10.545)))) (definer "PLINCL2" (reg (quad (pt 34 -3) (pt 34 -24) (pt 42.8335 -18.75) (pt 42.8335 -8.25)) (quad (pt 34 -3) (pt 34 -24) (pt 25.1665 -18.75) (pt 25.1665 -8.25)))) (definer "PLINCL3" (reg (quad (pt 3.81 -18.9) (pt -18.19 -18.9) (pt -12.69 -15.6091) (pt -1.69 -15.6091)) (quad (pt 3.81 -18.9) (pt -18.19 -18.9) (pt -12.69 -22.1909) (pt -1.69 -22.1909)))) (definer "PLINCL4" (reg (quad (pt 5.2 -7.42) (pt -27.2 -7.42) (pt -19.1 -2.58758) (pt -2.9 -2.58758)) (quad (pt 5.2 -7.42) (pt -27.2 -7.42) (pt -19.1 -12.2524) (pt -2.9 -12.2524)))) (definer "PLINCL5" (reg (quad (pt -6.74 -0.271) (pt -15.66 -0.271) (pt -13.43 -0.0051302) (pt -8.97 -0.0051302)) (quad (pt -6.74 -0.271) (pt -15.66 -0.271) (pt -13.43 -0.53687) (pt -8.97 -0.53687)))) (definer "PLINCL6" (reg (quad (pt 11.8 -5.7) (pt 11.8 -28.3) (pt 12.718 -22.65) (pt 12.718 -11.35)) (quad (pt 11.8 -5.7) (pt 11.8 -28.3) (pt 10.882 -22.65) (pt 10.882 -11.35)))) (definer "PLINCL7" (reg (quad (pt 18.27 -27.9) (pt 7.33 -27.9) (pt 10.065 -27.5458) (pt 15.535 -27.5458)) (quad (pt 18.27 -27.9) (pt 7.33 -27.9) (pt 10.065 -28.2542) (pt 15.535 -28.2542)))) (definer "PLINCL8" (reg (quad (pt -9.53 -9.67) (pt -14.07 -9.67) (pt -12.935 -9.29934) (pt -10.665 -9.29934)) (quad (pt -9.53 -9.67) (pt -14.07 -9.67) (pt -12.935 -10.0407) (pt -10.665 -10.0407)))) (definer "PLINCL9" (reg (quad (pt 52.7 -1.92954) (pt 52.7 -1.93046) (pt 52.7004 -1.93023) (pt 52.7004 -1.92977)) (quad (pt 52.7 -1.92954) (pt 52.7 -1.93046) (pt 52.6996 -1.93023) (pt 52.6996 -1.92977)))) (definer "PLINCL10" (reg (quad (pt -41.2 20.63) (pt -41.2 13.57) (pt -38.7058 15.335) (pt -38.7058 18.865)) (quad (pt -41.2 20.63) (pt -41.2 13.57) (pt -43.6942 15.335) (pt -43.6942 18.865)))) (definer "PLOUTCL0" (reg (quad (pt 25.5 14.02) (pt 25.5 -7.18) (pt 31.8739 -1.88) (pt 31.8739 8.72)) (quad (pt 25.5 14.02) (pt 25.5 -7.18) (pt 19.1261 -1.88) (pt 19.1261 8.72)))) (definer "PLOUTCL1" (reg (quad (pt 30.6 -18.3) (pt 1.4 -18.3) (pt 8.7 -12.2638) (pt 23.3 -12.2638)) (quad (pt 30.6 -18.3) (pt 1.4 -18.3) (pt 8.7 -24.3362) (pt 23.3 -24.3362)))) (definer "PLOUTCL2" (reg (quad (pt -12.8 2.1) (pt -12.8 -19.1) (pt -7.12753 -13.8) (pt -7.12753 -3.2)) (quad (pt -12.8 2.1) (pt -12.8 -19.1) (pt -18.4725 -13.8) (pt -18.4725 -3.2)))) (definer "PLOUTCL3" (reg (quad (pt 12.818 20.7) (pt -10.982 20.7) (pt -5.032 27.7408) (pt 6.868 27.7408)) (quad (pt 12.818 20.7) (pt -10.982 20.7) (pt -5.032 13.6592) (pt 6.868 13.6592)))) (definer "PLOUTCL4" (reg (quad (pt -48.7 11.65) (pt -48.7 5.67) (pt -47.1498 7.165) (pt -47.1498 10.155)) (quad (pt -48.7 11.65) (pt -48.7 5.67) (pt -50.2502 7.165) (pt -50.2502 10.155)))) (definer "DINCL0" (reg (quad (pt -26.4 10.23) (pt -26.4 -14.37) (pt -17.9822 -8.22) (pt -17.9822 4.08)) (quad (pt -26.4 10.23) (pt -26.4 -14.37) (pt -34.8178 -8.22) (pt -34.8178 4.08)))) (definer "DINCL1" (reg (quad (pt -12.1 11.4) (pt -37.5 11.4) (pt -31.15 13.1147) (pt -18.45 13.1147)) (quad (pt -12.1 11.4) (pt -37.5 11.4) (pt -31.15 9.68527) (pt -18.45 9.68527)))) (definer "DOUTCL0" (reg (quad (pt -14.7 -8.72) (pt -14.7 -19.68) (pt -13.2451 -16.94) (pt -13.2451 -11.46)) (quad (pt -14.7 -8.72) (pt -14.7 -19.68) (pt -16.1549 -16.94) (pt -16.1549 -11.46)))) (definer "DOUTCL1" (reg (quad (pt -18.6 15.02) (pt -18.6 -3.22) (pt -12.5205 1.34) (pt -12.5205 10.46)) (quad (pt -18.6 15.02) (pt -18.6 -3.22) (pt -24.6795 1.34) (pt -24.6795 10.46)))) (definer "DOUTCL2" (reg (quad (pt -8.49 14.4004) (pt -8.49 14.3996) (pt -8.48961 14.3998) (pt -8.48961 14.4002)) (quad (pt -8.49 14.4004) (pt -8.49 14.3996) (pt -8.49039 14.3998) (pt -8.49039 14.4002)))) (definer "DOUTCL3" (reg (quad (pt -22.7 4.43) (pt -22.7 1.07) (pt -22.2592 1.91) (pt -22.2592 3.59)) (quad (pt -22.7 4.43) (pt -22.7 1.07) (pt -23.1408 1.91) (pt -23.1408 3.59)))) (definer "DOUTCL4" (reg (quad (pt -4.63 13.0004) (pt -4.63 12.9996) (pt -4.62963 12.9998) (pt -4.62963 13.0002)) (quad (pt -4.63 13.0004) (pt -4.63 12.9996) (pt -4.63037 12.9998) (pt -4.63037 13.0002)))) (definer "DOUTCL5" (reg (quad (pt -26.2 10.1004) (pt -26.2 10.0996) (pt -26.1996 10.0998) (pt -26.1996 10.1002)) (quad (pt -26.2 10.1004) (pt -26.2 10.0996) (pt -26.2004 10.0998) (pt -26.2004 10.1002)))) (definer "DOUTCL6" (reg (quad (pt -22.4 -9.29957) (pt -22.4 -9.30043) (pt -22.3996 -9.30022) (pt -22.3996 -9.29978)) (quad (pt -22.4 -9.29957) (pt -22.4 -9.30043) (pt -22.4004 -9.30022) (pt -22.4004 -9.29978)))) (definer "DOUTCL7" (reg (quad (pt -31.53 9.74) (pt -36.47 9.74) (pt -35.235 10.0648) (pt -32.765 10.0648)) (quad (pt -31.53 9.74) (pt -36.47 9.74) (pt -35.235 9.41524) (pt -32.765 9.41524)))) (definer "DOUTCL8" (reg (quad (pt -12.842 15) (pt -13.758 15) (pt -13.529 15.2537) (pt -13.071 15.2537)) (quad (pt -12.842 15) (pt -13.758 15) (pt -13.529 14.7463) (pt -13.071 14.7463))))))(say (advice (99999 (true) (do our {1} (home (quad (pt -49.231 -2.86688) (pt -46.4098 -2.86688) (pt -46.4098 3.11136) (pt -49.231 3.11136))))) (99999 (true) (do our {2} (home (quad (pt -34.668 -11.0673) (pt -10.2375 -11.0673) (pt -10.2375 9.22446) (pt -34.668 9.22446))))) (99999 (true) (do our {3} (home (quad (pt -30.9977 -2.38411) (pt -1.26998 -2.38411) (pt -1.26998 24.1794) (pt -30.9977 24.1794))))) (99999 (true) (do our {4} (home (quad (pt -30.8804 -12.5226) (pt 1.92236 -12.5226) (pt 1.92236 9.79119) (pt -30.8804 9.79119))))) (99999 (true) (do our {5} (home (quad (pt -30.2972 -30.6962) (pt -0.941629 -30.6962) (pt -0.941629 2.07327) (pt -30.2972 2.07327))))) (99999 (true) (do our {6} (home (quad (pt -14.6113 0.770212) (pt 16.1206 0.770212) (pt 16.1206 31.3806) (pt -14.6113 31.3806))))) (99999 (true) (do our {7} (home (quad (pt -11.1691 -12.8489) (pt 18.496 -12.8489) (pt 18.496 8.62082) (pt -11.1691 8.62082))))) (99999 (true) (do our {8} (home (quad (pt -12.4345 -34.5995) (pt 19.1884 -34.5995) (pt 19.1884 -3.45948) (pt -12.4345 -3.45948))))) (99999 (true) (do our {9} (home (quad (pt 0.916556 -2.7235) (pt 32.7643 -2.7235) (pt 32.7643 30.095) (pt 0.916556 30.095))))) (99999 (true) (do our {10} (home (quad (pt 2.43172 -10.6154) (pt 31.8422 -10.6154) (pt 31.8422 9.26478) (pt 2.43172 9.26478))))) (99999 (true) (do our {11} (home (quad (pt 2.35614 -30.6912) (pt 33.0612 -30.6912) (pt 33.0612 0.29731) (pt 2.35614 0.29731))))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos our {2} 1 1 (arc (pt ball) 0 1000 -180 262.558)) (ppos our {5} 1 1 (arc (pt ball) 0 1000 -180 278.247)) (ppos our {10} 1 1 (arc (pt ball) 0 55.8159 -180 360)) (ppos opp {2} 1 1 (arc (pt ball) 28.6245 1000 -180 360)) (ppos opp {4} 1 1 (arc (pt ball) 27.1887 1000 -180 360)) (ppos opp {11} 1 1 (arc (pt ball) 0 1000 -180 163.783)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL3" {p})) (do our {6} (pos "PLOUTCL3"))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos our {5} 1 1 (arc (pt ball) 0 1000 -180 278.247)) (ppos our {7} 1 1 (arc (pt ball) 0 1000 -180 117.046)) (ppos our {10} 1 1 (arc (pt ball) 0 55.8159 -180 360)) (ppos opp {2} 1 1 (arc (pt ball) 28.6245 1000 -180 360)) (ppos opp {4} 1 1 (arc (pt ball) 27.1887 1000 -180 360)) (ppos opp {11} 1 1 (arc (pt ball) 0 1000 -180 163.783)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL3" {p})) (do our {6} (pos "PLOUTCL3"))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos our {7} 1 1 (arc (pt ball) 0 1000 -180 196.607)) (ppos opp {4} 1 1 (arc (pt ball) 27.1887 1000 -180 360)) (ppos opp {7} 1 1 (arc (pt ball) 0 1000 33.1742 146.826)) (ppos opp {11} 1 1 (arc (pt ball) 0 1000 -16.2169 196.217)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL2" {p})) (do our {4} (pos "PLOUTCL2"))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos our {4} 1 1 (arc (pt ball) 0.704597 1000 -180 360)) (ppos opp {1} 1 1 (arc (pt ball) 55.6985 1000 -180 360)) (ppos opp {6} 1 1 (arc (pt ball) 0 1000 -13.1741 193.174)) (ppos opp {10} 1 1 (arc (pt ball) 10.4455 1000 -180 360)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL2" {p})) (do our {4} (pos "PLOUTCL2"))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos our {2} 1 1 (arc (pt ball) 52.6017 1000 -180 360)) (ppos opp {4} 1 1 (arc (pt ball) 27.1887 1000 -180 360)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL2" {p})) (do our {4} (pos "PLOUTCL2"))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos our {2} 1 1 (arc (pt ball) 0 1000 82.5576 97.4424)) (ppos our {7} 1 1 (arc (pt ball) 0 1000 -62.9545 242.954)) (ppos opp {2} 1 1 (arc (pt ball) 28.6245 1000 -180 360)) (ppos opp {11} 1 1 (arc (pt ball) 0 1000 -180 163.783)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL2" {p})) (do our {4} (pos "PLOUTCL2"))) (99999 (and (playm play_on) (bowner our {0}) (ppos our {10} 1 1 (arc (pt ball) 55.8159 1000 -180 360))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL4" {p})) (do our {2} (pos "PLOUTCL4"))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos opp {1} 1 1 (arc (pt ball) 0 1000 12.8895 167.111)) (ppos opp {2} 1 1 (arc (pt ball) 30.6841 1000 -180 360)) (ppos opp {4} 1 1 (arc (pt ball) 0 27.1887 -180 360)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL1" {p})) (do our {11} (pos "PLOUTCL1"))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos our {7} 1 1 (arc (pt ball) 0 1000 16.6068 163.393)) (ppos opp {1} 1 1 (arc (pt ball) 0 55.6985 -180 360)) (ppos opp {4} 1 1 (arc (pt ball) 27.1887 1000 -180 360)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL1" {p})) (do our {11} (pos "PLOUTCL1"))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos opp {1} 1 1 (arc (pt ball) 0 1000 6.34524 173.655)) (ppos opp {4} 1 1 (arc (pt ball) 11.1426 27.1887 -180 360)) (ppos opp {5} 1 1 (arc (pt ball) 0 1000 98.2807 81.7193)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL1" {p})) (do our {11} (pos "PLOUTCL1"))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos our {7} 1 1 (arc (pt ball) 0 1000 16.6068 163.393)) (ppos opp {4} 1 1 (arc (pt ball) 27.1887 1000 -180 360)) (ppos opp {10} 1 1 (arc (pt ball) 0 10.4455 -180 360)) (ppos opp {11} 1 1 (arc (pt ball) 0 1000 -16.2169 196.217)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL1" {p})) (do our {11} (pos "PLOUTCL1"))) (99999 (and (playm play_on) (bowner our {0}) (and (bpos "PLINCL0") (ppos our {6} 1 1 (arc (pt ball) 23.4029 1000 -180 360)) (ppos opp {10} 1 1 (arc (pt ball) 0 1000 150.989 29.011)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL1" {p})) (do our {11} (pos "PLOUTCL1"))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos our {4} 1 1 (arc (pt ball) 0 0.704597 -180 360)) (ppos our {7} 1 1 (arc (pt ball) 0 1000 16.6068 163.393)) (ppos opp {1} 1 1 (arc (pt ball) 55.6985 1000 -180 360)) (ppos opp {6} 1 1 (arc (pt ball) 0 30.3935 -180 360)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL1" {p})) (do our {11} (pos "PLOUTCL1"))) (99999 (and (playm play_on) (bowner our {0}) (and (bpos "PLINCL0") (ppos opp {10} 1 1 (arc (pt ball) 0 1000 176.853 3.147)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL1" {p})) (do our {11} (pos "PLOUTCL1"))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos our {2} 1 1 (arc (pt ball) 0 52.6017 -180 360)) (ppos opp {2} 1 1 (arc (pt ball) 0 28.6245 -180 360)) (ppos opp {11} 1 1 (arc (pt ball) 0 1000 -180 163.783)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL0" {p})) (do our {10} (pos "PLOUTCL0"))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos opp {1} 1 1 (arc (pt ball) 0 1000 -180 192.889)) (ppos opp {4} 1 1 (arc (pt ball) 0 27.1887 -180 360)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL0" {p})) (do our {10} (pos "PLOUTCL0"))) (99999 (and (playm play_on) (bowner our {0}) (and (ppos opp {2} 1 1 (arc (pt ball) 0 30.6841 -180 360)) (ppos opp {4} 1 1 (arc (pt ball) 0 27.1887 -180 360)))) (do our {2 3 4 5 6 7 8 9 10 11} (bto "PLOUTCL0" {p})) (do our {10} (pos "PLOUTCL0"))) (99999 (and (playm play_on) (bowner opp {0}) (and (ppos our {7} 1 1 (arc (pt ball) 0 1000 20.8389 159.161)) (ppos our {9} 1 1 (arc (pt ball) 5.01062 1000 -147.55 327.55)))) (do our {5} (markl "DOUTCL0"))) (99999 (and (playm play_on) (bowner opp {0}) (and (ppos opp {5} 1 1 (arc (pt ball) 24.1494 1000 -180 360)) (ppos opp {9} 1 1 (arc (pt ball) 26.055 1000 -180 360)) (ppos our {10} 1 1 (arc (pt ball) 0 13.4806 -180 360)))) (do our {3} (markl "DOUTCL5"))) (99999 (and (playm play_on) (bowner opp {0}) (ppos our {9} 1 1 (arc (pt ball) 0 5.01062 -180 360))) (do our {2} (markl "DOUTCL6"))) (99999 (and (playm play_on) (bowner opp {0}) (and (ppos opp {5} 1 1 (arc (pt ball) 0 24.1494 -180 360)) (ppos opp {9} 1 1 (arc (pt ball) 26.055 1000 -180 360)) (ppos opp {11} 1 1 (arc (pt ball) 0 1000 -180 173.384)))) (do our {2} (markl "DOUTCL7"))) (99999 (and (playm play_on) (bowner opp {0}) (and (ppos opp {9} 1 1 (arc (pt ball) 0 26.055 -180 360)) (ppos our {4} 1 1 (arc (pt ball) 0 1000 -180 197.856)) (ppos our {10} 1 1 (arc (pt ball) 0 21.9535 -180 360)))) (do our {3} (markl "DOUTCL8"))) (99999 (and (playm play_on) (bowner opp {0}) (and (ppos opp {9} 1 1 (arc (pt ball) 0 1000 -180 107.485)) (ppos our {7} 1 1 (arc (pt ball) 0 1000 20.8389 159.161)))) (do our {3} (markl "DOUTCL2")))))(say (advice (99999 (and (playm play_on) (bowner opp {0}) (and (ppos opp {11} 1 1 (arc (pt ball) 0 1000 -6.61617 186.616)) (ppos our {7} 1 1 (arc (pt ball) 0 1000 -180 200.839)))) (do our {2} (markl "DOUTCL3"))) (99999 (and (playm play_on) (bowner opp {0}) (and (ppos our {7} 1 1 (arc (pt ball) 0 1000 -180 200.839)) (ppos our {10} 1 1 (arc (pt ball) 21.9535 1000 -180 360)))) (do our {6} (markl "DOUTCL4")))))(say (define (definec "FMarkCond2" (not (ppos our {1 3 4 5 6 7 8 9 10 11} 1 11 (arc (pt opp 9) 0 5 0 360)))) (defined "FMarkDir2" (do our {2} (mark {9}))) (definec "FMarkCond3" (not (ppos our {1 2 4 5 6 7 8 9 10 11} 1 11 (arc (pt opp 7) 0 5 0 360)))) (defined "FMarkDir3" (do our {3} (mark {7}))) (definec "FMarkCond4" (not (ppos our {1 2 3 5 6 7 8 9 10 11} 1 11 (arc (pt opp 8) 0 5 0 360)))) (defined "FMarkDir4" (do our {4} (mark {8}))) (definec "FMarkCond5" (not (ppos our {1 2 3 4 6 7 8 9 10 11} 1 11 (arc (pt opp 10) 0 5 0 360)))) (defined "FMarkDir5" (do our {5} (mark {10})))))(say (advice (99999 (and (playm play_on) "FMarkCond2") "FMarkDir2") (99999 (and (playm play_on) "FMarkCond3") "FMarkDir3") (99999 (and (playm play_on) "FMarkCond4") "FMarkDir4") (99999 (and (playm play_on) "FMarkCond5") "FMarkDir5")))(say (define (definec "SPpos" (and (ppos our {5} 1 1 (arc (pt -10 -15) 0 4 0 360)) (ppos our {8} 1 1 (arc (pt -1 -30) 0 4 0 360)) (ppos our {11} 1 1 (arc (pt -1 -30) 0 4 0 360))))))(say (advice (200 (or (playm bko) (playm ko_our) (playm ag_opp)) (do our {5} (pos (pt -10 -15))) (do our {8} (pos (pt -1 -30))) (do our {11} (pos (pt -1 -30)))) (200 (and (or (playm bko) (playm ko_our) (playm ag_opp)) (not "SPpos")) (do our {7} (pos (pt -2.2188 -3.3282 (pt -0.2 0))))) (200 (and (or (playm bko) (playm ko_our) (playm ag_opp)) "SPpos") (do our {7} (pos (pt -0.2 0)))) (277 (and "SPpos" (ppos our {7} 1 1 (arc (pt 0 0) 0 4 0 360))) (do our {7} (bto {5}))) (277 (and (ppos our {5} 1 1 (arc (pt -10 -15) 0 4 0 360))) (do our {5} (bto {8}))) (277 (and (bowner our {5}) (ppos our {5} 1 1 (arc (pt -10 -15) 0 4 0 360)) (playm play_on)) (do our {8} (pos (pt 0 -30)))) (277 (and (ppos our {8} 1 1 (arc (pt 0 -30) 0 4 0 360))) (do our {8} (bto (pt 40 -30) {c})))))(say (define (definec "SPpos" (and (ppos our {2} 1 1 (arc (pt -38 -6) 0 4 0 360)) (ppos our {3} 1 1 (arc (pt -42 29) 0 4 0 360)) (ppos our {4} 1 1 (arc (pt -38 6) 0 4 0 360)) (ppos our {6} 1 1 (arc (pt 11 30) 0 4 0 360))))))(say (advice (200 (playm gc_our) (do our {2} (pos (pt -38 -6))) (do our {3} (pos (pt -42 29))) (do our {4} (pos (pt -38 6))) (do our {6} (pos (pt 11 30)))) (200 (and (playm gc_our) "SPpos") (do our {1} (pos (pt -47 9)))) (268 (and "SPpos" (ppos our {1} 1 1 (arc (pt -47 9) 0 4 0 360))) (do our {1} (bto {3}))) (268 (and (ppos our {3} 1 1 (arc (pt -42 29) 0 4 0 360))) (do our {3} (bto (pt 11 30) {c})))))(say (advice (200 (playm ck_opp) (do our {2} (pos (pt -44 9.16))) (do our {3} (pos (pt -49.2315 23.1067))) (do our {4} (pos (pt -34.5 0))) (do our {5} (pos (pt -30 24))) (do our {6} (pos (pt -36.5 20))))))(say (define (definec "SPpos" (and (ppos our {3} 1 1 (arc (pt -9 16) 0 4 0 360)) (ppos our {6} 1 1 (arc (pt -1 31) 0 4 0 360)) (ppos our {9} 1 1 (arc (pt -1 31) 0 4 0 360))))))(say (advice (200 (or (playm bko) (playm ko_our) (playm ag_opp)) (do our {3} (pos (pt -9 16))) (do our {6} (pos (pt -1 31))) (do our {9} (pos (pt -1 31)))) (200 (and (or (playm bko) (playm ko_our) (playm ag_opp)) (not "SPpos")) (do our {7} (pos (pt -1.96105 3.4863 (pt -0.2 0))))) (200 (and (or (playm bko) (playm ko_our) (playm ag_opp)) "SPpos") (do our {7} (pos (pt -0.2 0)))) (277 (and "SPpos" (ppos our {7} 1 1 (arc (pt 0 0) 0 4 0 360))) (do our {7} (bto {3}))) (277 (and (ppos our {3} 1 1 (arc (pt -9 16) 0 4 0 360))) (do our {3} (bto {6}))) (277 (and (bowner our {3}) (ppos our {3} 1 1 (arc (pt -9 16) 0 4 0 360)) (playm play_on)) (do our {6} (pos (pt 1 31)))) (277 (and (ppos our {6} 1 1 (arc (pt 1 31) 0 4 0 360))) (do our {6} (bto (pt 41 31) {c})))))(say (define (definec "SPpos" (and (ppos our {2} 1 1 (arc (pt -38 -6) 0 4 0 360)) (ppos our {3} 1 1 (arc (pt -38 6) 0 4 0 360)) (ppos our {5} 1 1 (arc (pt -42 -29) 0 4 0 360)) (ppos our {8} 1 1 (arc (pt 4.13871 -30) 0 4 0 360))))))(say (advice (200 (playm gc_our) (do our {2} (pos (pt -38 -6))) (do our {3} (pos (pt -38 6))) (do our {5} (pos (pt -42 -29))) (do our {8} (pos (pt 4.13871 -30)))) (200 (and (playm gc_our) "SPpos") (do our {1} (pos (pt -47 -9)))) (268 (and "SPpos" (ppos our {1} 1 1 (arc (pt -47 -9) 0 4 0 360))) (do our {1} (bto {5}))) (268 (and (ppos our {5} 1 1 (arc (pt -42 -29) 0 4 0 360))) (do our {5} (bto (pt 11 -30) {c})))))(say (define (definec "SPpos" (and (ppos our {2} 1 1 (arc (pt -37.8219 -29) 0 4 0 360)) (ppos our {8} 1 1 (arc (pt -17.8219 -24) 0 4 0 360))))))(say (advice (200 (playm ki_our) (do our {2} (pos (pt -37.8219 -29))) (do our {8} (pos (pt -17.8219 -24)))) (200 (and (playm ki_our) (not "SPpos")) (do our {5} (pos (pt 3.69231 1.53846 (pt ball))))) (200 (and (playm ki_our) "SPpos") (do our {5} (pos (pt ball)))) (268 (and "SPpos" (ppos our {5} 1 1 (arc (pt -49.8219 -34) 0 4 0 360))) (do our {5} (bto {2}))) (268 (and (ppos our {2} 1 1 (arc (pt -37.8219 -29) 0 4 0 360))) (do our {2} (bto {8}))) (268 (and (bowner our {2}) (ppos our {2} 1 1 (arc (pt -37.8219 -29) 0 4 0 360)) (playm play_on)) (do our {8} (pos (pt -17.8219 -24))))))(say (advice (200 (playm ki_opp) (do our {2} (pos (pt -43.2318 -26.2818))) (do our {3} (pos (pt -51.5 -9))) (do our {4} (pos (pt -51.5 -19))) (do our {5} (pos (pt -50.6201 -23.8813))))))(say (define (definec "SPpos" (and (ppos our {2} 1 1 (arc (pt -38.6033 -29) 0 4 0 360)) (ppos our {8} 1 1 (arc (pt -18.6033 -24) 0 4 0 360))))))(say (advice (200 (playm ki_our) (do our {2} (pos (pt -38.6033 -29))) (do our {8} (pos (pt -18.6033 -24)))) (200 (and (playm ki_our) (not "SPpos")) (do our {5} (pos (pt 3.69231 1.53846 (pt ball))))) (200 (and (playm ki_our) "SPpos") (do our {5} (pos (pt ball)))) (268 (and "SPpos" (ppos our {5} 1 1 (arc (pt -50.6033 -34) 0 4 0 360))) (do our {5} (bto {2}))) (268 (and (ppos our {2} 1 1 (arc (pt -38.6033 -29) 0 4 0 360))) (do our {2} (bto {8}))) (268 (and (bowner our {2}) (ppos our {2} 1 1 (arc (pt -38.6033 -29) 0 4 0 360)) (playm play_on)) (do our {8} (pos (pt -18.6033 -24))))))(say (advice (200 (playm ki_opp) (do our {2} (pos (pt -51.1424 -23.8664))) (do our {3} (pos (pt -51.5 -9))) (do our {4} (pos (pt -51.5 -19))) (do our {5} (pos (pt -43.808 -26.4268))))))(say (define (definec "SPpos" (and (ppos our {2} 1 1 (arc (pt -32.3778 -30) 0 4 0 360))))))(say (advice (200 (playm ki_our) (do our {2} (pos (pt -32.3778 -30)))) (200 (and (playm ki_our) (not "SPpos")) (do our {5} (pos (pt 3.9142 0.824042 (pt ball))))) (200 (and (playm ki_our) "SPpos") (do our {5} (pos (pt ball)))) (250 (and "SPpos" (ppos our {5} 1 1 (arc (pt -51.3778 -34) 0 4 0 360))) (do our {5} (bto {2})))))(say (define (definec "SPpos" (and (ppos our {2} 1 1 (arc (pt -38 -6) 0 4 0 360)) (ppos our {3} 1 1 (arc (pt -42 29) 0 4 0 360)) (ppos our {4} 1 1 (arc (pt -38 6) 0 4 0 360)) (ppos our {6} 1 1 (arc (pt 4.11042 30) 0 4 0 360))))))(say (advice (200 (playm gc_our) (do our {2} (pos (pt -38 -6))) (do our {3} (pos (pt -42 29))) (do our {4} (pos (pt -38 6))) (do our {6} (pos (pt 4.11042 30)))) (200 (and (playm gc_our) "SPpos") (do our {1} (pos (pt -47 9)))) (268 (and "SPpos" (ppos our {1} 1 1 (arc (pt -47 9) 0 4 0 360))) (do our {1} (bto {3}))) (268 (and (ppos our {3} 1 1 (arc (pt -42 29) 0 4 0 360))) (do our {3} (bto (pt 11 30) {c})))))(say (define (definec "SPpos" (and (ppos our {2} 1 1 (arc (pt -37.0767 29) 0 4 0 360)) (ppos our {6} 1 1 (arc (pt -17.0767 24) 0 4 0 360))))))(say (advice (200 (playm ki_our) (do our {2} (pos (pt -37.0767 29))) (do our {6} (pos (pt -17.0767 24)))) (200 (and (playm ki_our) (not "SPpos")) (do our {3} (pos (pt 3.69231 -1.53846 (pt ball))))) (200 (and (playm ki_our) "SPpos") (do our {3} (pos (pt ball)))) (268 (and "SPpos" (ppos our {3} 1 1 (arc (pt -49.0767 34) 0 4 0 360))) (do our {3} (bto {2}))) (268 (and (ppos our {2} 1 1 (arc (pt -37.0767 29) 0 4 0 360))) (do our {2} (bto {6}))) (268 (and (bowner our {2}) (ppos our {2} 1 1 (arc (pt -37.0767 29) 0 4 0 360)) (playm play_on)) (do our {6} (pos (pt -17.0767 24))))))(say (define (definec "SPpos" (and (ppos our {2} 1 1 (arc (pt -38 -6) 0 4 0 360)) (ppos our {3} 1 1 (arc (pt -38 6) 0 4 0 360)) (ppos our {5} 1 1 (arc (pt -27 -19) 0 4 0 360)) (ppos our {8} 1 1 (arc (pt 3.53879 -20) 0 4 0 360))))))(say (advice (200 (playm gc_our) (do our {2} (pos (pt -38 -6))) (do our {3} (pos (pt -38 6))) (do our {5} (pos (pt -27 -19))) (do our {8} (pos (pt 3.53879 -20)))) (200 (and (playm gc_our) "SPpos") (do our {1} (pos (pt -47 -9)))) (274 (and "SPpos" (ppos our {1} 1 1 (arc (pt -47 -9) 0 4 0 360))) (do our {1} (bto {5}))) (274 (and (ppos our {5} 1 1 (arc (pt -27 -19) 0 4 0 360))) (do our {5} (bto (pt 26 -20) {c})))))(say (define (definec "SPpos" (and (ppos our {5} 1 1 (arc (pt -12 -12) 0 4 0 360)) (ppos our {6} 1 1 (arc (pt -1 5) 0 4 0 360))))))(say (advice (200 (or (playm bko) (playm ko_our) (playm ag_opp)) (do our {5} (pos (pt -12 -12))) (do our {6} (pos (pt -1 5)))) (200 (and (or (playm bko) (playm ko_our) (playm ag_opp)) (not "SPpos")) (do our {7} (pos (pt -2.82843 -2.82843 (pt -0.2 0))))) (200 (and (or (playm bko) (playm ko_our) (playm ag_opp)) "SPpos") (do our {7} (pos (pt -0.2 0)))) (260 (and "SPpos" (ppos our {7} 1 1 (arc (pt 0 0) 0 4 0 360))) (do our {7} (bto {5}))) (260 (and (ppos our {5} 1 1 (arc (pt -12 -12) 0 4 0 360))) (do our {5} (bto (pt 29 5) {c})))))(say (advice (200 (or (playm bko) (playm ko_opp) (playm ag_our)) (do our {3} (pos (pt -8.12 6.09))) (do our {4} (pos (pt -10.15 0))) (do our {5} (pos (pt -8.12 -6.09))) (do our {6} (pos (pt -1 25))) (do our {8} (pos (pt -1 -25))))))(say (define (definec "SPpos" (and (ppos our {2} 1 1 (arc (pt -38 -6) 0 4 0 360)) (ppos our {3} 1 1 (arc (pt -38 6) 0
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -