Слайд 1Білімдерін тексеру
Анимация дегеніміз не ?
Өмірден мысал келтір?
Слайд 3Оқу мақсаты:
Оқушыларға анимация туралы түсінік беру
Слайд 4Бағалау критерийлері:
Барлық оқушылар:
Анимацияға анықтама береді
Анимация Visual Basic 6.0 бағдарламасында
жасаудың жолдарын
айтады
Оқушылардың басым бөлігі:
Сабақта өздерінің деңгейлерінде тапсырмаларды орындай алады.
Кейбір оқушылар:
Бұл тәсілді практикада қолдана алады.
Слайд 5 Анимация – суреттердің қозғалысы немесе өзгеруі.Анимация термині
латынның «anima» - жан сөзінен шыққан, яғни, жандану, тірілу деген мағынаны білдіреді.
Слайд 6Анимация құрудың екі жолы бар:
1) классикалық әдіс
2) кадрлық анимация
Слайд 7 Бірінші дайын суреттерді қолдану арқылы суреттер жасау,
бұл классикалық әдіс депе аталады.Классикалық әдіс файлдары арқылы жасалады.
Екінші жолы компьютерлік ойындарды жасағанда кадрлық анимацияларды ұсынады, мұнда кадрлар экранның кез келген жерінен шығу жолымен іске асады.
Слайд 8Анимацияны уақытсыз қолдану Visual Basic тілінде қозғалатын сурет құрудың алгоритмі:
Алдыңғы суретті
жою;
Жаңа суреттің орналасу координатасын анықтау;
Жаңа сурет салу;
Уақытты бос цикл арқылы орындау;
Слайд 9Сергіту сәті
Әр топтан 1 оқушыны таныстыру үшін сол оқушы туралы кластерлер
құрастыруы керек. Олар парақтың ортасындағы шеңберге өз есімдерін жазып, одан таралатын шеңберлерге өздерінің өмірінде маңызы бар бес негізгі рөлін жазады. Мысалы: Жанұяның еркесі, адал дос т.б
Слайд 10Практикалық жұмыс:
Тапсырма1: Солдан оңға қарай горизонталь бағытта жылжитын дөңгелек қозғалысын құру.
Пішінде бір бұйрықтық батырма (баста) орналасады.
Private Sub Command_Click()
DrawWidth=2
Scale(0,100)-(100,0)
X=2: y=50: R=2
FillStyle=0
FillColor=vbRed
Do
Cls
x=x+1
Circle(x,y),R,vbGreen
For i=1 To 200000: Next I
Loop While x<=90
End Sub
Слайд 12Практикалық жұмыс:
Тапсырма2: Бір көзін қысатын смайлик анимациясын жасау.
Слайд 15Екі суретті бір-біріне беттестіру керек
Слайд 16Private Sub Timer1_Timer()
Image1.Visible = False
Image2.Visible = True
Timer1.Interval = 0
Timer2.Interval = 800
End
Sub
Private Sub Timer2_Timer()
Image2.Visible = False
Image1.Visible = True
Timer2.Interval = 0
Timer1.Interval = 800
End Sub
Слайд 18Жобаны таймер, қаланың фотосы және ұшақ (Gif-сурет) қолдану арқылы құрамыз.
Жаңа жоба
құрамыз (батырмасыз). Форма қасиетінен Picture - ны басып. Жұмыс үстеліндегі Жоба бумасын ашып қаланың фотосын көрсетеміз.
Форманың жоғарғы сол жағына image орналастырамыз . Picture қасиетіне ұшақ суретін көрсетеміз.
Формаға таймерді орнатамыз да Interval ды 100 ге теңестіреміз. Таймерді екі рет шертіп мына кодты жазамыз:
Private Sub Timer1_Timer()
Image1.Left = Image1.Left + 20
End Sub
Бағдарламаны іске қосамыз. Өз еріктерімен екінші самолет қосамыз да оның жылдамдығын өзгертеміз.
Слайд 19Практикалық жұмыс:
Тапсырма3: Қала үстіндегі ұшақ.
Слайд 21Рефлексия
Көңіл-күй кемпірқосағы