Bài giảng môn đồ hoạ máy tính

Môn Th i l h a máy tính ng: 60 ti t (lý thuy t + th c hành máy) Tài li u tham kh o: [1] Nh p môn đ h a, L ng Chi Mai, Hu nh Th Thanh Bình, 2000 [2] K thu t đ h a máy tính, Lê T n Hùng, Hu nh Quy t Th ng, 2004 [3] C s đ h a máy tính, Hoàng Ki m, 1999 [4] h a vi tính, Hu nh V n c, Nguy n Qu c C ng, Hoàng cH i [5] Computer Graphic, J.D Foley, A.V Dam ánh giá: - Câu h i l p - Bài ki m tra u ki n - Thi: v n đáp / vi t Ph n m đ u: Gi i thi u v đ h a máy tính Thu t ng “ h a máy tính – Computer Graphics” đ c đ xu t b i m t nhà khoa h c M tên Wiliam Fetter vào n m 1960 ông nghiên c u xây d ng mô hình bu ng lái máy bay cho hãng Boing h a máy tính có th đ c hi u nh t t c nh ng liên quan đ n vi c t o nh (image) b ng máy tính Chúng bao g m: t o, l u tr , thao tác mô hình nh W Fetter d a hình nh ba chi u c a mô hình ng i phi công bu ng lái đ xây d ng nên mô hình t i u cho bu ng lái máy bay Boing T ng quan v m t h đ h a Các thành ph n ph n c ng: • Thi t b hi n th : hình, máy in • Thi t b nh p: bàn phím, chu t C u t o c a hình d ng m (raster – scan display): chùm tia n t đ c quét ngang qua hình m i l n dòng quét tu n t t xu ng d i Vi c b t t t m sáng hình ph thu c vào c ng đ c a tia n t c s cho vi c t o hình nh hình, M i m sáng hình đ c g i pixel Các thông tin v hình nh hình đ c l u tr vùng nh đ m g i b nh hình (refresh buffer) thay đ i hình nh hình, c n làm thay đ i thông tin vùng nh đ m Vùng có th n m Video card hay trích t b nh t o nh en - Tr ng, ch c n l u thông tin c a m i pixel b ng bit( 1/0 = b t/t t m nh) Trong tr ng h p nh nhi u màu, ng i ta c n nhi u bit h n N u ta dùng b bit có th l u tr đ c 2b giá tr màu khác Các công c ph n m m: • Công c ng d ng (application package):đ c thi t k cho ng i s d ng đ t o nh nh ng l nh v c chuyên nghi p mà không c n quan tâm t i thao tác bên ho t đ ng Ví d : AutoCAD, Adobe Photoshop, • Công c l p trình: (programming package): cung c p m t th vi n hàm đ h a đ dùng ngôn ng l p trình c p cao Ví d : GRAPH.TPU (Pascal), Open GL Các ng d ng c a đ h a máy tính (computer graphics) Công c h tr thi t k (CAD/CAM) H tr thi t k đ c xem m t ng d ng c a đ h a máy tính, đ i t ng đ c xây d ng tr c ti p mô hình thi t k Hi n đ h a máy tính đ c ng d ng vi c thi t k • chi ti t c khí • h th ng n • thi t b n t • thi t k thân ô tô • h th ng cáp quang • m ng truy n thông • r t nhi u th khác Các chi ti t s đ c v hình nh công c đ h a ban đ u d i d ng phác th o, sau đ c ch nh s a b ng kinh nghi m c a ng i k s c ng nh kh n ng tr giúp thông minh c a ph n m m thi t k Khác v i b n v gi y, ng i thi t k có th xem mô hình thi t k máy tính t m i góc đ , d dàng thay đ i m i chi ti t quan sát hi u ng c a s hi u ch nh Giao di n Ng i - Máy Ngày h u h t ch ng trình ng d ng PC đ u có giao di n v i ng i dùng d a h th ng t ng tác đ h a: C a s , Bi u t ng, Con tr chu t, Menu Giao di n đ h a th c s mang l i s tho i mái cho ng i s d ng Bi u di n thông tin Các trình ng d ng s d ng công c đ h a đ t o bi u đ , đ th minh h a t ng quan gi a đ i t ng kinh doanh, khoa h c, d li u tài chính, th ng kê Các máy tính, máy ATM, máy bán hàng, máy bán vé tàu n i công c ng đ u s d ng giao di n đ h a đ bi u di n nh ng m c thông tin h ng d n khách hàng Gi i trí, ngh thu t i v i nhà t o m u, ng i ch p nh, nh ng ch ng trình tr giúp thi t k m u hay ch nh s a nh nh PhotoShop, 3DMax, giúp h thi t k hình nh s ng đ ng h a máy tính cung c p ph ng ti n cho nhà làm phim t o nh ng b phim n i ti ng nh Công viên Kh ng long, Xác p Ai c p nh nh ng k x o n nh th c hi n máy tính Giáo d c đào t o h a máy tính c ng góp ph n quan tr ng nghiên c u th c th tr u t ng, mô ph ng c u trúc v t th , ti n trình c a ph n ng hóa h c, h t nhân, ho t đ ng c a h th ng sinh lý Trong đào t o, ng d ng mô ph ng đ c dùng đ ki m tra trình đ ng i lái, hu n luy n phi công, u n giao thông B n đ h c, nghiên c u đ a lý h a máy tính đ c s d ng đ t o s đ đ a lý đ i t ng t nhiên m t cách xác t nh ng s li u đo đ c Ví d nh b n đ đ a lý, b n đ th i ti t, b n đ m t đ dân s , s đ khoan th m dò, bi u đ h i d ng h c Ch ng I: Công c đ h a c a Turbo Pascal (TP) Gi i thi u - Thi t b ph n c ng u n vi c hi n th hình nh lên hình có tên Video Card (chúng ta hay g i “card hình”) - Có nhi u lo i Card hình v i kh n ng m nh y u khác nhau, m i lo i c n driver (trình u n) riêng B ng sau file driver c a TP File driver CGA HERC.BGI EGAVGA.BGI Ki u Video card IBM CGA , ch hi n th đ c màu HERCULES MONOCHROME, màu VGA đ i đa s card hình hi n Có 16 màu phân gi i 640 * 480 Chúng ta s ch dùng lo i m nh nh t Ph i làm đ kh i t o ch đ đ h a ? Chúng ta s l p trình đ h a b ng TP Mu n v y c n ph i: - Có file: EGAVGA.BGI, GRAPH.TPU (th vi n ch a l nh v đ h a) file c b n c a TP t chúng th m c (n u không ph i l p đ ng d n cho GRAPH.TPU t i Option/Directory/Unit directory cho EGAVGA.BGI b ng InitGraph) t l nh kh i t o ch đ đ h a (InitGraph) vào ch ng trình Ví d : Cách đ n gi n hay dùng nh t đ kh i t o đ h a Uses Crt,Graph; Var h ng đ/n gd,gm: integer; s n Begin xâu r ng gd:=detect; InitGraph(gd,gm,”); /* Các l nh đ h a v , xóa */ CloseGraph; /* k t thúc đ h a, quay v ch đ hình v n b n bình th End ng */ Vì l i “đ n gi n hay dùng nh t” ? - Không c n gõ v trí t p BGI - Không c n nh b ng giá tr ch đ hình (có kho ng h n 10 c p giá tr khác t ng ng v i ch đ hình khác nh EGA, HERCULES, VGA ) - Luôn kh i t o đ c ch đ m nh nh t VGA (16 màu, đ phân gi i 640 * 480) Trong ph n ti p theo ta gi thi t r ng ch đ đ h a VGA Ch đ tham kh o: b ng lo i graphics card ch đ đ h a t GraphDriver CGA EGA VGA HercMono có t ng c ng giá tr GraphDriver khác GraphMode CGA0 CGAHi EGALo EGAHi VGALo VGAMed VGAHi HercMonoHi có t ng c ng 30 giá tr GraphMode khác S dòng, c t 320 * 200 640 * 200 640 * 200 640 * 350 640 * 200 640 * 350 640 * 480 720 * 348 ng ng Chúng ta s ch dùng lo i m nh nh t H tr c t a đ hình (0,0) (639,0) (0,479) (639,479) Trong ch đ đ h a, ph i làm vi c v i m t h tr c t a đ khác th ng: 1) Tr c tung Oy quay xu ng d i (h tr c Decac ngh ch) 2) giá tr t a đ ph i s nguyên 3) N u t a đ v t kho ng (0,639) đ i v i hoành đ (0,479) đ i v i tung đ , nh ng ta v s không hi n th hình Gi i thích: 1) Do c u t o c a hình, ta ph i ch p nh n 2) Màn hình chia thành nhi u ô vuông nh (pixel) s p x p theo t ng dòng c t nh hình v 3) Gi s ta v đo n th ng AB, ch có đo n CD n m hình đ c hi n th B D C Màn hình A Chú ý: không c n nh giá tr 640 480 TP có hàm GetMaxX GetMaxY, chúng tr l i giá tr l n nh t c a hoành đ tung đ đ i v i mode đ h a hi n th i: GetMaxX = 639 ; GetMaxY = 479 ; 639,0 0,0 1,0 2,0 0,1 0,2 m i m nh ô vuông 0,479 B ng màu V i mode đ h a VGA, b ng màu g m 16 màu đ c đánh s t đ n 15 nh b ng sau Ta có th dùng s th t ho c tên h ng s ch màu Giá tr s Tên h ng s Black Blue Green Cyan Red Magenta Brown LightGray DarrkGray LightBlue Màu en Xanh da tr i Xanh Xanh c m th ch Tía Nâu Xám nh t Xám đ m Xanh da tr i nh t 10 11 12 13 14 15 LightGreen LightCyan LightRed LightMagenta Yellow White Xanh nh t Xanh c m th ch nh t t i Tía nh t Vàng Tr ng V m PutPixel(x,y,c); /* x,y : integer ; c: word (ki u s nguyên d ng) */ V m nh t i t a đ (x,y) v i màu c, GetPixel(x,y):word Hàm GetPixel tr l i m t s nguyên d ng màu c a m nh t a đ (x,y), nói cách khác cho bi t màu c a pixel(x,y) màu Ví d : Tô toàn hình b ng màu đ Uses Crt,Graph; Var gd,gm: integer; i,j:integer; Begin gd:=detect; InitGraph(gd,gm,”); for i:=0 to GetMaxX for j:=0 to GetMaxY PutPixel(i,j,red) ; Readkey; /* G p readkey ch ng trình s d ng l i đ ta quan sát hình Xem xong ta b m phím b t k đ qua l nh */ CloseGraph; End uNh ng h ng, bi n ch ng trình có th đ c thay b ng nh ng giá tr t ng đ ng mà không làm thay đ i ch ng trình ? uVi t ch ng trình tô m t ph n t hình (phía bên ph i) b ng màu xanh da tr i uCh ng trình l p kín hình b ng cách tô theo dòng hay c t ? Ví d : v l i m nh p nháy uses crt,graph; var gd,gm,i,j:integer; x,y:integer; begin gd:=detect; initgraph(gd,gm,''); randomize; /* kh i t o b sinh s ng u nhiên */ repeat Hàm tr l i s màu x:=random(100); y:=random(100); hi n có (16) if GetPixel(x,y) 0 then Putpixel(x,y,0) else PutPixel(x,y,random(GetmaxColor)); delay(2); Until Keypressed; closegraph; end uHàm GetPixel làm ch c n ng ví d ? uTh thay đ i giá tr tham s c a hàm delay() random() quan sát k t qu Ví d : V b u tr i đ n gi n uses crt,graph; var gd, gm, i : integer; BEGIN gd := 0; initgraph(gd,gm,'C:\TP\BGI'); for i := to 1000 putpixel(random(640),random(480),random(15)+1); readkey; END uHãy ph i h p nh ng k thu t ví d ( hàm random, vòng l p Repeat, l nh GetPixel ) đ t o b u tr i đ p h n Ví d : V đ th hàm s y=sin(x) Uses crt,graph; Var tx,ty,gd,gm,i,j:integer; d,x,y:real; Begin gd:=detect; initgraph(gd,gm,'c:\tp\bgi'); setviewport(getmaxX div 2,getmaxY div 2,getmaxX,getmaxY,clipoff); d:=0.001; x:=0; tx:=20; ty:=40; while x0) then begin Koch(dir, len / 3, n-1); dir := dir + 60; Koch(dir, len / 3, n-1); dir := dir - 120; Koch(dir, len / 3, n-1); dir := dir + 60; Koch(dir, len / 3, n-1); end else linerel(round(len * cos(RADS * dir)), round(len * sin(RADS * dir))); End; Begin gd:=detect; initgraph(gd,gm,''); for i:=1 to begin setcolor(White); rectangle(0, 0, getmaxx, getmaxy); moveto(100,350); Koch(0, 420 , i); setcolor(blue); Koch(-120, 420 , i); setcolor(yellow); Koch(120, 420 , i); readln; cleardevice; end; closegraph; End b ng Hilbert nhà toán h a c l p th n c David Hilbert công b n m 1891 Ln = n − t c đ dài t ng theo hàm m đ i v i n dài c a t i 2n 34 C quy t c (rules) th c ch t ch Quay 900 nh 35 Ch ng trình v đ ng Hilbert {V đ ng Hilbert} Uses Crt,Graph; Var gd,gm,h:integer; Procedure A (i:integer);FORWARD; Procedure B (i:integer);FORWARD; Procedure C (i:integer);FORWARD; Procedure D (i:integer);FORWARD; Procedure A(i:integer); Begin if (i>=0) then Begin D(i-1); linerel(-h, 0); A(i-1); linerel(0, -h); A(i-1); linerel(h, 0); B(i-1); End; End; Procedure B(i:integer); Begin if (i>=0) then Begin C(i-1); linerel(0, h); B(i-1); linerel(h, 0); B(i-1); linerel(0, -h); A(i-1); End; End; Procedure C(i:integer); Begin 36 if (i>=0) then Begin B(i-1); linerel(h, 0); C(i-1); linerel(0, h); C(i-1); linerel(-h, 0); D(i-1); End; End; Procedure D(i:integer); Begin if (i>=0) then Begin A(i-1); linerel(0, -h); D(i-1); linerel(-h, 0); D(i-1); linerel(0, h); C(i-1); End; End; Procedure Hilbert; Var i:integer; Begin for i:=0 to begin h:= 30 - * i; moveto(getmaxx - 130, getmaxy - 50); A(i); readln; cleardevice; end; End; Begin gd:=detect; initgraph(gd,gd,''); setcolor(YELLOW); rectangle(0, 0, getmaxx, getmaxy); Hilbert; closegraph; End 37 Ch ng trình v Nhân s (Sphinx) { V nhân s Sphinx } Uses Crt,Graph; { h s đ i t đ sang radian } Const RADS = 0.017453293; Var curangle,curx, cury:real; gd,gm:integer; Procedure lineforward(angle, length:real); Begin curangle :=curangle+ angle; curx := curx + length*cos(curangle*RADS); cury := cury + length*sin(curangle*RADS); lineto(round(curx), round(cury)); End; Procedure moveforward(angle,length:real); Begin curangle := curangle + angle; curx := curx + length*cos(curangle*RADS); cury := cury + length*sin(curangle*RADS); lineto(round(curx), round(cury)); End; 38 Procedure Sphinx(angle, length: real; level,leftright:integer); Var len4, len2, len1, oldx, oldy, oldangle: real; Begin if (leftright0) then Begin if (level = 0) then begin len1 := length / 3; lineforward(angle, length); lineforward(-120,len1*2); lineforward(-120,len1); lineforward(+60,len1); lineforward(-60,len1); end else begin Sphinx(angle, length, 0, leftright); len4 := length / 4; Sphinx(240, len4, 0, 1); moveforward(240, len4); Sphinx(0, len4, 0, 1); moveforward(240, len4); Sphinx(0, len4, 0, 1); moveforward(240, len4); Sphinx(0, len4, 0, 1); moveforward(240, len4); moveforward(-120, len4*2/3); Sphinx(0, len4, 0, 0); moveforward(240, len4); Sphinx(0, len4, 0, 0); moveforward(-180, len4*2/3); Sphinx(-120, len4, 0, 0); moveforward(240, len4/3); Sphinx(-240, len4, 0, 1); moveforward(240, len4); Sphinx(0, len4, 0, 1); moveforward(240, len4); Sphinx(-60, len4, 0, 0); moveforward(-180, len4*2/3); lineforward(-60, len4); moveforward(60, len4/3); moveforward(-120, len4); Sphinx(-180, len4, 0, 0); end; end else begin 39 if (level = 0) then begin len1 := length / 3; lineforward(angle, length); lineforward(-120,len1); lineforward(-60,len1); lineforward(60,len1); lineforward(-120,len1*2); end else begin Sphinx(angle, length, 0, leftright); len4 := length / 4; end; end; End; Begin curangle := 0.0; gd:=detect; initgraph(gd,gm,''); moveto(10, 470); curx := 10; cury := 470; Sphinx(0, 600, 1, 1); readln; closegraph; End Ch ng trình v Phong c nh (Fractal.exe) Uses crt,graph; Const CLIP_ON = 1; Var n,c,t,mau:integer; hs,go:real; i,gd,gm:integer; ch:char; Function dau:integer; Begin if (random(2) = 0) then dau:= -1 else dau:= 1; End; Procedure cay(x,y:integer; h,g,gw:real; k:integer); 40 Var x1,y1,i,j,d,leaf,c:integer; dg,tt:real; Begin if (k > 0) then for j:= to (random(t) + t) begin x1:= x + round(h * cos(g)); y1:= y + round(h * sin(g)); setcolor(DARKGRAY); for i:= to round((h/35)*(h/35)) begin line(x + i, y, x1 + i, y1); delay(10); {Ve cay cham de quan sat } for d:= to round((h/5)) begin tt:= random(1); putpixel(round((1-tt)*x+tt*x1+i), round((1-tt)*y+tt*y1), LIGHTGRAY); end; end; dg := gw/(2*n+1); for i:= -n to n if (random(1000)*0.001 > 0.5) then cay(x1,y1,h*(0.5+(random(1000)*0.001)/3),g+i*dg,gw*hs,k-1); x := x1; y := y1; g := g + PI/18; end else begin setfillstyle(1,random(15)); setcolor(random(15)); for leaf:= to fillellipse(x+random(8)*dau,y+random(5)*dau,random(5)+2,random(2)+1); for leaf:= to 70 begin case leaf of 20: begin putpixel(x+random(15)*dau,y+random(5)*dau,BLUE); break; end; 21 25: begin putpixel(x+random(15)*dau,y+random(5)*dau,LIGHTBLUE); break; end; 41 26 49: begin putpixel(x+random(15)*dau,y+random(5)*dau,LIGHTGREEN); break; end; End; End; End; End; Procedure cloud(x,y:integer; Rx,Ry:real; k:integer); Var i:integer; Begin if (k > 0) then for i:= to cloud(x+random(round(Rx)),y+random(round(Ry)),Rx*0.8,Ry*0.6,k-1) else for i:= to round(sqrt(Rx*Ry)/3.5) putpixel(x+random(round(Rx)),y+random(round(Ry)),WHITE); End; Procedure phong; Var l,i:integer; Begin l := (getmaxy div 7) * 5; mau:=random(15); setfillstyle(1,mau); bar(0,0,getmaxx,l); setfillstyle(1,LIGHTGRAY); bar(0,l,getmaxx,getmaxy); for i:= to 20000-1 case (random(8)) of 4: begin putpixel(random(getmaxx),l+random(getmaxy-l),GREEN); break; end; 5,6: begin putpixel(random(getmaxx),l+random(getmaxy-l),YELLOW); break; end; 7: begin putpixel(random(getmaxx),l+random(getmaxy-l),LIGHTRED); break; end; 42 end; if (mauRED) then Begin if (mauBLACK) then begin setfillstyle(1,RED); setcolor(RED); end; end else begin setfillstyle(1,YELLOW); setcolor(YELLOW); end; fillellipse(random(getmaxx div 2)+300,100,30,30); for i:= to cloud(random(getmaxx),random(150)+10,random(60)+60,random(40)+20,5); End; BEGIN randomize; gd:=detect; initgraph(gd,gm,''); setviewport(0,0,getmaxx,getmaxy,CLIPON); repeat n := 1; hs := 1.2; go := PI /2.8; t := 2; phong; cay(((getmaxx-100) div 5)+random(60),(getmaxy div 7)*6 +random(30)*dau,getmaxy div 6,-PI/2,go,5); ch:=readkey; until (ch=#27); closegraph; END 43 Ch ng trình v Pytago { Cây Pythagoras } Uses Crt,Graph; Const { / sqrt(2) } FCT = 0.7071067; { he so doi tu sang radian } RADS = 0.017453293; Var gd,gm:integer; Procedure quadrat(x,y,a,angle:real); Var cp,sp:real; Begin setcolor(RED); if (a < 35) then setcolor(2); if (a < 8) then setcolor(7); cp := a * cos(angle); sp := a * sin(angle); line(round(x), 200 - round(y), round(x + cp), 200 - round(y+sp)); line(round(x), 200 - round(y), round(x - cp), 200 - round(y+cp)); line(round(x+cp), 200 - round(y+sp), round(x - sp + cp), 200 - round(y+sp+cp)); line(round(x-sp), 200 - round(y+cp), round(x - sp + cp), 200 - round(y+sp+cp)); if (a > 2) then Begin quadrat(x - sp, y + cp, * a / 5, angle + 0.93); quadrat(x - sp + * a / * cos(angle + 0.93), y + cp + * a / * sin (angle + 0.93), a * / 5, angle - 0.64); 44 End; End; Begin gd:=detect; initgraph(gd,gm,''); setcolor(7); quadrat(250, -120, 70, 0); readln; closegraph; End 45 [...]... s xác đ nh đ c đi m c n tô b c i+1 Làm sao đ tính giá tr c a pi ? ta dùng ph ng pháp “l y ti n” nh sau Ta có: pi+1 –pi = (2xi+1dy – 2yi+1dx +C) - (2xidy – 2yidx +C) = 2dy -2dx(yi+1 – yi) • N u pi0 thì đi m đ c ch n là P, t c là yi+1 = yi+1 ⇒ pi+1 = pi +2dy -2dx Cu i cùng, giá tr p0 đ c tính t đi m nh đ u tiên (x0, y0) theo công th... SetViewPort(320,240,600,400,false); {chuy n g c to đ ra gi a màn hình} SetColor(yellow); SetFillStyle(1,yellow); FillPoly(5,p); {2 l nh này tô hình ngôi sao vàng } FloodFill(0,0,yellow); readkey; END u Vì sao trong công th c tính tung đ đ nh th i c a ngôi sao l i có d u tr ? N u b d u tr này đi thì hi n t ng gì x y ra ? u Vì sao ph i c n 2 l nh m i tô đ c ngôi sao ? N u b l nh FloodFill đi thì k t qu s ra sao ? Ho c n u ch... đ ng tròn tâm (x,y) bán kính r : Circle(x,y,r); /* x,y: integer; r: word */ V cung tròn: Arc(x,y, g1,g2,r); 18 7 x,y: integer - t a đ tâm đ ng tròn g1,g2: word – góc b t đ u và góc cu i c a cung tròn (tính b ng đ ) A B g2 g1 r: word – bán kính O v hình qu t tròn, đ u tiên ta v cung tròn, sau đó g i th t c GetArcCoords(VAR ArcCoords: ArcCoodsType); đ l y t a đ 2 đ u mút (A,B) c a cung.Cu i cùng ta v... đây? uVi t ch ng trình đ các dòng ch chuy n đ ng t hai bên ra gi a / r i t trên xu ng 23 15 C t dán hình l u m t hình vào b nh , ta ph i l u c di n tích hình ch nh t bao nó Memory (x1,y1) (x2,y2) ABC tính toán kích th c vùng nh c n dùng đ ch a hình, ta g i hàm ImageSize(x1,y1,x2,y2) ; {x1,y1,x2,y2: integer } v i (x1,y1,x2,y2) là t a đ hình ch nh t bao quanh hình c n l u tr Chú ý là TP không cho phép... nh t Th nào là gi ng ? - Liên t c (không đ t đo n) - G n v i đo n th ng th c (đo n th ng toán h c) nh t H n n a, còn v n đ t i u t c đ , ngh a là thu t toán ph i tô các pixel trong th i gian nhanh nh t Bài toán: ta ph i v đo n th ng y = m.x +b có h s góc 0 ... a máy tính Thu t ng “ h a máy tính – Computer Graphics” đ c đ xu t b i m t nhà khoa h c M tên Wiliam Fetter vào n m 1960 ông nghiên c u xây d ng mô hình bu ng lái máy bay cho hãng Boing h a máy. .. a đ h a máy tính (computer graphics) Công c h tr thi t k (CAD/CAM) H tr thi t k đ c xem m t ng d ng c a đ h a máy tính, đ i t ng đ c xây d ng tr c ti p mô hình thi t k Hi n đ h a máy tính đ c... ng h a máy tính cung c p ph ng ti n cho nhà làm phim t o nh ng b phim n i ti ng nh Công viên Kh ng long, Xác p Ai c p nh nh ng k x o n nh th c hi n máy tính Giáo d c đào t o h a máy tính c ng