• Если что-то работает — то не трогай это, иначе есть очень большая вероятность, что работать оно перестанет.

Простейшее управление черепашкой

Данная программа рисует на экране два квадрата с помощью черепашки. Первая пара команд готовит черепашку к работе. Затем, последовательно повторяя команды мы рисуем линии одинаковой длины и выполняем повороты на 90 градусов так, чтобы получился квадрат со стороной 200 точек. Затем разворачиваем черепашку и уводим её в сторону от готового квадрата. Теперь, повторяя ту же последовательность команд, что и в первой части, рисуем квадрат меньшего размера.

Вы можете скопировать указанный ниже код программы в IDE MS Small Basic и запустить:

Turtle.Show() ' показываем черепашку на экране
Turtle.PenDown() ' опускаем перо для включения режима рисования


' рисуем большой квадрат

Turtle.Move(200) ' идем вперед на 200 точек
Turtle.TurnRight() ' поворачиваем направо на 90 градусов
Turtle.Move(200) ' идем вперед на 200 точек
Turtle.TurnRight() ' поворачиваем направо на 90 градусов
Turtle.Move(200) ' идем вперед на 200 точек
Turtle.TurnRight() ' поворачиваем направо на 90 градусов
Turtle.Move(200)


Turtle.Hide() ' скрываем черепашку
Turtle.PenUp() ' поднимаем перо - выключаем режим рисования


' разворачиваемся

Turtle.TurnRight() ' поворачиваем направо на 90 градусов
Turtle.TurnRight() ' поворачиваем направо на 90 градусов - в итоге разворачиваем черепашку на 180 градусов


' уходим в сторону от нарисованного квадрата

Turtle.Move(400) ' идем вперед на 400 точек
Turtle.TurnLeft() ' поворачиваем налеаво на 90 градусов


Turtle.Show() ' показываем черепашку на экране
Turtle.PenDown() ' опускаем перо для включения режима рисования


' рисуем малый квадрат

Turtle.Move(100) ' идем вперед на 100 точек
Turtle.TurnRight() ' поворачиваем направо на 90 градусов
Turtle.Move(100) ' идем вперед на 100 точек
Turtle.TurnRight() ' поворачиваем направо на 90 градусов
Turtle.Move(100) ' идем вперед на 100 точек
Turtle.TurnRight() ' поворачиваем направо на 90 градусов
Turtle.Move(100) ' идем вперед на 100 точек


Turtle.Hide() ' скрываем черепашку



Поделиться: