Урок информатики "Движение" в графике (QBasic); 10 класс
Образовательные:
- сформировать понятие об «движение» в графике,
- сформировать умение использовать разные виды «движения» в графике,
- сформировать умение выбирать оптимальное «движение» для сюжета.
- Развивать навыки программирования в графическом режиме,
- развивать умение создавать мультипликации.
- воспитание самостоятельности, аккуратности и внимательности при использовании компьютера,
- воспитание коммуникабельности и взаимопомощи.
Оборудование:
- компьютерный класс с выходом в Интернет;
- мультимедийный проектор и интерактивная доска;
- раздаточный материал (детские книги);
- конспект урока (графические операторы).
Подготовка к уроку:
- подготовить ПО QBasic.
Ход урока:
Повторение. С учащимися повторяем тему «цикл в графике».
1. Постройте 10 квадратов по «снежинке».
SCREEN 12: RANDOMIZE TIMER: PI = 3.14
DEF fns (A, B) = A + (B - A) * RND
DEF fnr (A, B, n, i) = A + (B - A) / n * i
DEF FNP (A, B, n, i) = A + (B - A) * SQR((.25 - (i / n - .5) ^ 2))
DEF FNSN (A, B, n, i, P) = A + (B - A) * (SIN(2 * PI * i / n * PI) + 1) / 2
n = 10
FOR i = 1 TO n
x = 300
y = fnr(10, 400, n, i)
c = fns(1, 5)
LINE (x, y)-STEP(20, 20), c, BF
y = 230
x = fnr(10, 550, n, i)
c = fns(1, 5)
LINE (x, y)-STEP(20, 20), c, BF
y = fnr(10, 400, n, i)
x = fnr(10, 550, n, i)
c = fns(1, 5)
LINE (x, y)-STEP(20, 20), c, BF
y = fnr(10, 400, n, i)
x = fnr(550, 10, n, i)
c = fns(1, 5)
LINE (x, y)-STEP(20, 20), c, BF
NEXT i
Объяснение нового материала.
Сейчас мы с вами скопируе6м ещё раз этот блок и заменим цвет, на цвет фона, т. е. черный (0). Что получилось?
Правильно, вы ничего не увидели на экране. Почему? Потому что закрасили квадраты черным (цветом фона) цветом.
А для того, чтобы мы видели, что нам необходимо? Задержать несколько секунд цветную картинку.
И что у нас получается?
Три блока: 1) рисующий; 2) блок «замедления»; 3) «стирающий».
Это первый вид движения, который состоит из перечисленных блоков.
SCREEN 12: RANDOMIZE TIMER: PI = 3.14
DEF fns (A, B) = A + (B - A) * RND
DEF fnr (A, B, n, i) = A + (B - A) / n * i
DEF FNP (A, B, n, i) = A + (B - A) * SQR((.25 - (i / n - .5) ^ 2))
DEF FNSN (A, B, n, i, P) = A + (B - A) * (SIN(2 * PI * i / n * PI) + 1) / 2
n = 100
FOR i = 1 TO n
x = 300
y = fnr(10, 400, n, i)
c = fns(1, 5)
LINE (x, y)-STEP(20, 20), c, BF
y = 230
x = fnr(10, 550, n, i)
c = fns(1, 5)
LINE (x, y)-STEP(20, 20), c, BF
y = fnr(10, 400, n, i)
x = fnr(10, 550, n, i)
c = fns(1, 5)
LINE (x, y)-STEP(20, 20), c, BF
y = fnr(10, 400, n, i)
x = fnr(550, 10, n, i)
c = fns(1, 5)
LINE (x, y)-STEP(20, 20), c, BF
FOR t = 1 TO 100000: NEXT t
x = 300
y = fnr(10, 400, n, i)
c = 0
LINE (x, y)-STEP(20, 20), c, BF
y = 230
x = fnr(10, 550, n, i)
c = 0
LINE (x, y)-STEP(20, 20), c, BF
y = fnr(10, 400, n, i)
x = fnr(10, 550, n, i)
c = 0
LINE (x, y)-STEP(20, 20), c, BF
y = fnr(10, 400, n, i)
x = fnr(550, 10, n, i)
c = 0
LINE (x, y)-STEP(20, 20), c, BF
NEXT i
Примечание:
1. «Замедляющий блок» зависит от возможностей компьютера.
2. «Стирающей блок» имеет цвет фона, для того чтобы эффект движения был полным.
3. для того, чтобы двигать предмет, который состоит из нескольких фигур, например, девочка то необходимо его рисовать отталкиваясь от одной точки.
Данный вид движения удобный тем, что достаточно нарисовать сам предмет (с учётом примечания) и можно его заставить двигаться.
Недостаток этого вида движения в том, что если предмет «объёмный», то он сильно мерцает.
Второй вид движения «движение цветом».
Повторение.
Вспомните оператор замены.
SWAP X,Y
С помощью данного оператора мы будем менять цвет предмета.
Лучше всего данный вид движения применять для движения одушевлённого предмета.
Составьте программу рисования схематического человечка.
SCREEN 12: pi = 3.14
CIRCLE (200, 200), 20, 7
CIRCLE (200, 200), 5, 7, -.01, -pi
CIRCLE (190, 190), 2, 7
CIRCLE (210, 190), 2, 7
LINE (200, 220)-STEP(0, 70), 7
LINE (200, 230)-STEP(20, 50), 7
LINE (200, 230)-STEP(-20, 50), 7
n = 1000
c1 = 3
c2 = 13
FOR i = 1 TO n
FOR t = 1 TO 10000: NEXT t
CIRCLE (200, 210), 5, 4, pi, 2 * pi, .2
CIRCLE (200, 210), 5, 0, 0, pi, .2
LINE (200, 290)-STEP(20, 50), c1
LINE -STEP(10, 0), c1
LINE (200, 290)-STEP(-20, 50), c2
LINE -STEP(10, 0), c2
FOR t = 1 TO 10000: NEXT t
CIRCLE (200, 210), 5, 0, pi, 2 * pi, .2
CIRCLE (200, 210), 5, 4, 0, pi, .2
SWAP c1, c2
NEXT
Третий вид движения.
SCREEN 12: RANDOMIZE TIMER: PI = 3.14
LINE (10, 200)-STEP(20, 20), 2, BF
FOR i = 10 TO 600
LINE (i, 200)-STEP(0, 20), 0
LINE (i + 21, 200)-STEP(0, 20), 2
FOR t = 1 TO 10000: NEXT t
NEXT i
Такой метод удобен только для прямоугольников и простых геометрических фигур.
Преимущество этого метода в том, что предметы при данном движении не мигают.
Список использованной литературы
1. Бобровский С. Программирование на языке QBasic для школьников и студентов, М. 1999
2. Григорий Зельднер QuickBasic для носорога, М. 1994
На странице приведен фрагмент.
Автор: Власова Татьяна Алексеевна
→ tvutema1 05.05.2013 1 8388 437 |
Спасибо за Вашу оценку. Если хотите, чтобы Ваше имя
стало известно автору, войдите на сайт как пользователь
и нажмите Спасибо еще раз. Ваше имя появится на этой стрнице.