global loclist,onlist on startmovie loclist=[] onlist=[] repeat with i= 1 to 18 tlist=[] ttlist=[] repeat with j= 1 to 18 add tlist, point ( 20 *j, 20 *i) add ttlist, 0 end repeat add loclist,tlist add onlist,ttlist end repeat end
property pmousedown,sel,poldloc,moveenable,onlinepos on beginsprite me sel= sprite ( me . spritenum ) --代表自身 poldloc=sel. loc --棋子的原始位置 pmousedown= 0 --是否鼠标按下 moveenable= 1 --是否可以移动 onlinepos=[] --移动的历史记录:记录我移动完成后的位置信息和我的棋子信息(黑棋还是白棋), end