;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\207" [require chess chess-engine] 2) #@89 This function handles responses from the bot's computing engine. (fn EVENT &rest ARGS) (defalias 'chess-link-response-handler #[385 "\301\302\303!\304\"\301\302\303!\305\"\303\306=\203\307\303\310\"\210\311\207\311\312\313#\262)\312\307p=\2032\2023$\210\207" [chess-engine-inhibit-auto-pass chess-game-data chess-engine-game nil first-engine second-engine match chess-engine-command accept t apply chess-engine-default-handler] 10 (#$ . 159)]) #@96 Connect two engines, so that they rely events back and forth. (fn FIRST-ENGINE SECOND-ENGINE) (defalias 'chess-link-connect #[514 "\300\301\"\210\300\301\"\207" [chess-engine-set-response-handler chess-link-response-handler] 5 (#$ . 628)]) #@217 Play out a game between two engines, and watch the progress. If you want to run an engine as a bot, make the transport the first engine, and the computer the second engine. (fn FIRST-ENGINE-TYPE SECOND-ENGINE-TYPE) (defalias 'chess-link #[514 "\301\302P!\262\301\302P!\262\303\304!\305!\306\307\304#\210\211\211\203-r\211q\210\304\211)\266\2022\304\211\266\310!\210\3111x\312!\205v\312!\205v\313\"\313\"\306\314#\210\315\316\"\210\306\317#\210\320\"\210\315\316\"\210\315\321\"\266\322!\210\323!0\207\324!\210\325\326!!\207" [chess-module-leader intern "chess-" chess-create-display t chess-display-game chess-game-set-data my-color chess-display-disable-popup (error) require chess-engine-create first-engine chess-engine-command ready second-engine chess-link-connect pass chess-display-update chess-display-popup chess-module-destroy error error-message-string] 10 (#$ . 878) "sFirst engine: \nsSecond engine: "]) (provide 'chess-link)