(define (definerule XEmpty direc ((false) (do our {1} (pos (pt 0 0))))) (definer "XVOForwardBall" (reg (rec ((pt ball) + (pt 5 0)) (pt 53 -33)) (rec ((pt ball) + (pt 5 0)) (pt 53 33)))) (definer "XVOOffMid" (rec (pt 0 -33) (pt 30 33))) (definec "XVOAdvCond" (and (bpos "XVOOffMid") (ppos opp {0} 0 11 "XVOForwardBall"))) (definerule XVOAdv5 direc ("XVOAdvCond" (do our {5} (pos ((pt ball) + (pt -15 -15)))))) (definerule XVOAdv6 direc ("XVOAdvCond" (do our {6} (pos ((pt ball) + (pt -15 15)))))) (definerule XVOAdv7 direc ("XVOAdvCond" (do our {7} (pos ((pt ball) + (pt -5 12)))))) (definerule XVOAdv8 direc ("XVOAdvCond" (do our {8} (pos ((pt ball) + (pt -7 0)))))) (definerule XVOAdv9 direc ("XVOAdvCond" (do our {9} (pos ((pt ball) + (pt -5 -12)))))) (definerule XVOAdv direc (XVOAdv5 XVOAdv6 XVOAdv7 XVOAdv8 XVOAdv9)) (definerule XVeryO direc ((playm play_on) XVOAdv)) (definerule FORM_cmloki532_perm direc ((true) ((true) (do our {2} (home (rec (pt -34.9465 13.2305) (pt -7.18606 21.775))))) ((true) (do our {3} (home (rec (pt -38.1271 -3.26846) (pt -13.2647 12.2252))))) ((true) (do our {4} (home (rec (pt -33.5312 -3.94926) (pt -7.5883 3.42184))))) ((true) (do our {5} (home (rec (pt -37.8559 -13.3497) (pt -12.168 2.09555))))) ((true) (do our {6} (home (rec (pt -34.7693 -22.0682) (pt -7.78124 -13.3183))))) ((true) (do our {7} (home (rec (pt -21.3349 -21.3101) (pt 10.1006 -8.70392))))) ((true) (do our {8} (home (rec (pt -15.1775 -9.97588) (pt 14.5448 7.19788))))) ((true) (do our {9} (home (rec (pt -21.4055 7.4836) (pt 10.0367 19.8297))))) ((true) (do our {10} (home (rec (pt -3.37954 4.58753) (pt 23.499 16.8646))))) ((true) (do our {11} (home (rec (pt -2.91385 -19.8605) (pt 24.1045 -7.56147))))))))
(define (definerule FORM_cmloki532_perm direc ((true) ((true) (do our {2} (home (rec (pt -34.9465 13.2305) (pt -7.18606 21.775))))) ((true) (do our {3} (home (rec (pt -38.1271 -3.26846) (pt -13.2647 12.2252))))) ((true) (do our {4} (home (rec (pt -33.5312 -3.94926) (pt -7.5883 3.42184))))) ((true) (do our {5} (home (rec (pt -37.8559 -13.3497) (pt -12.168 2.09555))))) ((true) (do our {6} (home (rec (pt -34.7693 -22.0682) (pt -7.78124 -13.3183))))) ((true) (do our {7} (home (rec (pt -21.3349 -21.3101) (pt 10.1006 -8.70392))))) ((true) (do our {8} (home (rec (pt -15.1775 -9.97588) (pt 14.5448 7.19788))))) ((true) (do our {9} (home (rec (pt -21.4055 7.4836) (pt 10.0367 19.8297))))) ((true) (do our {10} (home (rec (pt -3.37954 4.58753) (pt 23.499 16.8646))))) ((true) (do our {11} (home (rec (pt -2.91385 -19.8605) (pt 24.1045 -7.56147))))))) (definerule FORM_cmloki433_perm direc ((true) ((true) (do our {2} (home (rec (pt -36.7044 11.762) (pt -10.3862 23.0775))))) ((true) (do our {3} (home (rec (pt -36.2256 0.654722) (pt -11.2271 11.1229))))) ((true) (do our {4} (home (rec (pt -36.727 -11.2201) (pt -11.1903 -0.0938443))))) ((true) (do our {5} (home (rec (pt -36.7652 -22.5855) (pt -10.5747 -11.8255))))) ((true) (do our {6} (home (rec (pt -22.3072 -21.9822) (pt 9.06364 -8.21958))))) ((true) (do our {7} (home (rec (pt -25.3699 -6.83098) (pt 4.97462 8.47865))))) ((true) (do our {8} (home (rec (pt -24.0478 7.10208) (pt 9.71087 24.0852))))) ((true) (do our {9} (home (rec (pt -2.24337 10.9717) (pt 22.8691 23.3161))))) ((true) (do our {10} (home (rec (pt -6.57904 -7.28086) (pt 19.9448 8.15502))))) ((true) (do our {11} (home (rec (pt -1.73763 -22.227) (pt 22.6054 -11.3371))))))))
