Treść książki
Przejdź do opcji czytnikaPrzejdź do nawigacjiPrzejdź do informacjiPrzejdź do stopki
Rys.1.12.FunkcjaWygenerujRuch(pozx,pozy:integer;c:byte),cz.6,treśćproceduryporuszającej
wieżąihetmanem.
Zgodniezdefinicjąruchuwieżyihetmana:
const
wieza:twieza=(
cr:4;cyklruch:((x:0;y:1),(x:0;y:-1),(x:1;y:0),(x:-1;y:0)));
hetman:thetman=(
cr:8;cyklruch:((x:0;y:1),(x:0;y:-1),(x:1;y:0),(x:-1;y:0),
(x:1;y:1),(x:-1;y:-1),(x:1;y:-1),(x:-1;y:1)));
wieżamożewykonywaćcyklicznyruchwpionieipoziomie,przyrostywczterechmożliwych
kierunkachsąnastępującecyklruch:((x:0;y:1),(x:0;y:-1),(x:1;y:0),(x:-1;y:0)))
hetmanmożewykonywaćcyklicznyruchwpionie,wpoziomie,naskoswlewolubprawo,w
sumiewjednymz8kierunków,przyrostywmożliwychośmiukierunkachsąnastępującecyklruch:
((x:0;y:1),(x:0;y:-1),(x:1;y:0),(x:-1;y:0),x:1;y:1),(x:-1;y:-1),(x:1;y:-1),(x:-1;y:1)))
19
