Реферат: Арканоид на Паскале

8. a – èçìåí¸ííûé ìàññèâ êîîðäèíàò êóáèêîâ;

9. kol_kub – èçìåí¸ííîå êîëè÷åñòâî êóáèêîâ;

6. procedure bok_bok(var dx:t_dx_dy;x,y:t_kubik;var a:t_arr;var kol_kub:kol_kubik);

Íàçíà÷åíèå: îïðåäåëÿåò êîñíóëñÿ ëè øàðèê êóáèêà î ëåâóþ èëè ïðàâóþ ãðàíü;

Âõîäíûå äàííûå:

10. dx – íàïðàâëåíèå äâèæåíèÿ øàðèêà ïî îñè X;

11. x,y – òåêóùèå êîîðäèíàòû öåíòðà øàðèêà;

12. a – ìàññèâ êîîðäèíàò êóáèêîâ;

13. kol_kub – êîëè÷åñòâî êóáèêîâ íà äàííûé ìîìåíò;

Âûõîäíûå äàííûå:

14. dx – èçìåí¸ííîå íàïðàâëåíèå äâèæåíèÿ øàðèêà ïî îñè X;

15. a – èçìåí¸ííûé ìàññèâ êîîðäèíàò êóáèêîâ;

16. kol_kub – èçìåí¸ííîå êîëè÷åñòâî êóáèêîâ;

7. procedure death;

Íàçíà÷åíèå: âûäà¸ò çâóêîâîé ñèãíàë, ñîîòâåòñòâóþùèé ïðîèãðûøó îäíîé æèçíè;

Âõîäíûå äàííûå: íåò;

Âûõîäíûå äàííûå: íåò;

8. procedure ugolki(var dx,dy:t_dx_dy;x,y:t_kubik;var a:t_arr;var kol_kub:kol_kubik);

Íàçíà÷åíèå: îïðåäåëÿåò êîñíóëñÿ ëè øàðèê êóáèêà îá óãëû;

Âõîäíûå äàííûå:

17. dx,dy – íàïðàâëåíèå äâèæåíèÿ øàðèêà ïî îñÿì X è Y;

18. x,y – òåêóùèå êîîðäèíàòû öåíòðà øàðèêà;

19. a – ìàññèâ êîîðäèíàò êóáèêîâ;

20. kol_kub – êîëè÷åñòâî êóáèêîâ íà äàííûé ìîìåíò;

Âûõîäíûå äàííûå:

21. dx,dy – èçìåí¸ííîå íàïðàâëåíèå äâèæåíèÿ øàðèêà ïî îñÿì X è Y;

22. a – èçìåí¸ííûé ìàññèâ êîîðäèíàò êóáèêîâ;

23. kol_kub – èçìåí¸ííîå êîëè÷åñòâî êóáèêîâ;

9. procedure pausing(var pause:word);