Luận văn: Nghiên cứu lập trình tính biến dạng xoay trong một tam giác địa động lực

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

L I M ĐÂU

Ờ Ở

̀

ớ ự ̀ ́ ̉ ̉ ̣ ̣ ̀ ̣ ́ ̣ ̀ ̣ ̀ ̀ ́ ̃ ̣ ̣ ́ ̣ ườ ̀ ́ ̣ ̀ ̀ ́ ́ ̀ ờ ớ ứ ̣ ̣ ́ ́ ̣ ̉ ̣ ̉ ư ̣ ̀ ́ ̉ ̉ ̣ ̀ ̣ ́ ̃ ự ượ ́ ̣ ̀ ̣ ̉ ̣ ̉ ́ ̣ ̀ ̉ ́ ̀ ́ ̣ ́ ́ ̣ ́ ̣ ̀ ̣ ́ ̉ ̀ ̣ ́ ́ ữ ̣ ư l ữ ượ ̉ ̣ ̣ ́ ́ ́ ́ ̉ ̣ ́ ̣ ̣ ̀ ̀ ̣ ́ ́ ̀ ́ ́ ́ ươ ̉ ử ườ ự t trôi so v i cac ph ớ ̣ ́ ́ ̉ ̉ ̀ ́ ́ ́ ữ ̣ ̣ ̣ ́ ̃ ̃ ́ ́ ̀ ̣ ́ ́ ơ ̣ ự ữ ́ ́ ́ ́ ́ ́ ́ ̀ ̉ ́ ớ ́ ̣ ̣ ̣ ́ ̣ ̣ ̀ ̀ ̣ ự ượ ữ ̣ ̃ ̣ ̀ ̀ ̣ ̉ ́ ̃ ́ ́ ̀ ng trinh phân mêm đ ượ ứ ̀ ̀ ̀ ̣ ̣ ́ ̀ ự ữ ́ ́ ̣ ̣ ̉ ́ ̣ ̃ ́ ữ ữ ̀ ̀ ̀ ̀ ̉ ́ ̀ ̣ ̣ ̣ ̀ ̣ ́ ̃ ̃ ̣ ̣ ́ ử ứ ̣ ̣ ́ ́ ́ ̣ ̀ ̀ ̉ ữ ứ ườ ờ ́ ̀ ̀ ̣ ̉ ̀ ́ ́ ̉ ̣ ̀ Đia Đông L c – Viên Đia Chât ́ , môt đ n vi tr c thuôc cua ̣ ự ự ̀ ̀ ̣ ̣ ̣ ̣ ̣ ̣ , tr ưở ̣ ̀ ̣ ̣ ̀ ̣ ̣ ̃ ́ ̣ ̣ ́ ̀ ̣ ́ ̣ ̀ ̀ ̀ ̀ Đia Đông L c ứ ́ ́ ̀ ̀ ̣ ̣ ́ ̣ ̀ ư ́ ử ̀ ́ ̉ ̀ ́ ̀ ̀ ́ ử ̣ ̀ ́ ̀ ̀ ́ ́ ̣ ̣ ̉ ̉ ́ ́ ́ ̣ ̣ ̀ Ngay nay v i s phat triên cua khoa hoc công nghê thi công nghê thông tin c ap dung vao moi nganh nghê trong đ i sông – xa hôi. Viêc ap dung công nghê ̣ đ ờ ượ ờ i đông th i thông tin vao cac moi nganh nghê giup tôi u hoa th i gian cho con ng ́ ư mang lai đô chinh xac cao trong công viêc, giam b t s c lao đông cua con ng i. ườ Song hanh v i s phat triên cua công nghê thông tin nh vây, nganh đia chât cung ớ ự ̀ xac đinh đ c tâm quan trong cua công nghê thông tin đê ap dung vao xây d ng va giai cac bai toan trong đia chât. Vi du nh viêc ap dung thanh lâp cac ban đô đia chât, ng khoang san..v..v... Viêc ap dung công quan ly d liêu đia chât, tinh toan tr nghê thông tin vao nganh đia chât mang lai s nhanh chong va chinh xac, mang tinh ̣ ự v i tr c tiêp phai x ly. Ap ng phap cô điên ma con ng ượ dung công nghê thông tin trong đia chât cung dân đên cac nha đia chât co nh ng phan đoan chinh xac h n trong viêc d đoan, phân tich trong nh ng vân đê cua đia ̣ ́ i viêc ap dung công nghê thông tin vao nganh đia chât chât hoc. Hiên nay, trên thê gi hoc đa mang lai nhiêu thanh t u cho s v t bâc cua no. Đa co rât nhiêu nh ng ự ̣ c xây d ng phuc vu trong công tac nghiên c u vê đia ch ươ c công bô mang lai nh ng hiêu qua rât cao trong công viêc, dân đên chât đa đ ̃ ượ ng trinh nay la nh ng phân không thê thiêu va quan trong trong nghiên nh ng ch ươ Viêt Nam hiên nay, trong nganh đia chât cung đa coi trong viêc ap c u..v..v... Ở ứ dung công nghê thông tin trong nh ng x ly tinh toan ph c tap ma đoi hoi con ̣ i mât nhiêu th i gian va công s c. Môt điên hinh cho xu thê phat triên hiên đai ng ̉ Viêṇ nay la tai phong ̣ ơ ̀ PGS.TS Phan Trong Trinh Khoa Hoc Va Công Nghê Viêt Nam ng phong la ng mang tinh hiên đai hoa băng viêc ap dung nhiêu phân mêm trong đa co nh ng h ướ ́ ữ viêc x ly nh ng vân đê ma phong ự nghiên c u, vi du nh cac phân ữ ̣ ử ́ ư Arc Gis, Surfer, MapInfo... cac phân mêm s ly sô mêm x ly trong ban đô nh ử ư Bernese, Gamit,Fonda,Gipsy,Globk... va cac phân mêm x ly sô liêu liêu GPS nh dich chuyên đê tinh toan biên dang trong bô phân mêm ̀ QOCA (Quasi-Observation Combination Analysis)...

SV: Trân Văn Phong

c bô môn Tin Hoc Đia Chât ́ ̀ ̣ ́ ̣ ̣ ̣ ̣ ́ c th c tâp tai phong ượ ̃ ượ ự , tai đây em đa đ ượ ̀ Đia Đông L c ̀ ̣ ̣ ̣ ̣ ̣ ̣ ́ ́ ử ̣ ̣ ̀ ̀ ̉ ́ ́ ̣ ́ ̣ ̉ ́ ́ ữ ́ ̀ ̣ ̀ ̣ ̣ ̣ ̀ ̣ ̣ ̣ Hê Điêu Hanh ứ ̣ ̀ ̀ ̣ ̀ ̉ ̣ ̀ ̀ ̀ ươ ̀ ̉ ́ ̣ ̣ ̀ ̣ ̀ ̀ ̃ ́ ữ ữ ̣ ̣ ̣ ́ ̀ ̀ ̀ ́ ̀ ̣ ̣ ̃ PGS.TS Phan Trong Trinh ̀ ́ ̀ ̀ ́ ̀ ̣ ̣ ươ ́ ̣ ̀ ́ ́ ̣ ́ ̣ ̉ ́ ́ ng hiêu cua Viêt Nam, dê s dung, phu h p v i ng ̃ ử ớ ̣ ̉ ̣ ̣ ̀ ̉ ̣ ́ ̉ PGS.TS Phan Trong Trinh ươ ̣ ự ́ ́ ̃ ́ ̉ ̉ ̣ ̣ taọ c tiêp ̀ QOCA dung đê tinh biên dang kiên tao trong vo Trai Đât, ̀ Đia Đông L c ự ) Linux ́ ng đôi kho c nh ng vân đê nay va nh ng vân đê đăt ra Viêt Nam cung mong ử ̣ ng trinh tinh biên dang kiên tao vo Trai Đât mang môt i dung cua Viêt Nam. Đap ườ , em xin ng trinh tinh biên dang kiên tao cua vo Trai Đât trong ự ̣ ̣ ̣ ̀ ́ ́ ̣ ́ ̣ ̉ ̉ ́ ́ Trong qua trinh th c tâp tôt nghiêp, em đ ự điêu kiên cho em đ ự xuc s dung bô phân mêm đo la môt trong nh ng phân nhiêm vu quan trong ma tai phong nghiên c u. Tuy nhiên bô phân mêm chay trên nên cua HĐH( la HĐH không phô biên tai Viêt Nam va bô phân mêm QOCA vân con t s dung. Nhân đinh đ ượ ử cân co nh ng phân mêm x ly cho riêng minh, ữ muôn xây d ng môt ch ự th ̀ ợ lai s mong muôn đo va s dân dăt chi bao cua ̀ ự manh dan xây d ng môt ch đô an tôt nghiêp cua minh v i đê tai: ươ ớ ̀ ́ ́ ̣ ̉ ̀ ̀ ̀

1

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

ự ̣ ̀ ́ ́ ̣ ̣ ́ ̣ ̣ ượ ứ ươ ự ử ̀ ̀ ̣ ̉ ̀ ̀ ́ ̉ ng trinh đ ữ c xây d ng la môt tool cua phân mêm x ly ban đô ươ ̀ MapBasic 9.5. Ch ̣ ̀ ̀ ̀ ̣ ̀ ́ ́ ́ ̣ ́ ̀ ́ ́ ̣ ̣ ́ ̣ c bô cuc nh sau : ng va đ ̀ ượ ươ ự ư ̣ ̀ ́ ̀ ́ ̣ “Nghiên c u lâp trinh tinh biên dang xoay trong môt tam giac Đia đông l c” ̀ Mapinfo Ch ́ 11 v i ngôn ng lâp trinh la ng trinh nay co ch c năng x ly ử ́ ứ ớ môt phân trong tinh toan biên dang đo la tinh biên dang xoay cho môt tam giac đia đông l c. Đô an gôm 4 ch ề ng trinh ươ ự ́ ́ ̀ ̀ ươ ̣ ̣ ̀ 1: C s ly thuyêt cho xây d ng ch ơ ở ng trinh 2: Xây d ng ch ươ ự 3: Giao diên va s dung ch ̀ ử 4: Đanh gia va phân tich kêt qua ch ng trinh đat đ c ng trinh ̉ ươ ̣ ượ ́ ́ ̀ ́ ́ ̀ ̀ ́ ̣ Nhin chung ch Đ t v n đ ặ ấ ng Ch ươ ng Ch ươ ng Ch ươ Ch ng ươ ậ va kiên nghi K t lu n ế ươ ̀ ̀ ̃ ̣ ́ ̀ ́ ứ ̀ ̣ ́ ̃ ̀ ̀ ̀ ̉ ̀ ́ c muc đich đê ra, tuy nhiên do kiên ượ ứ ng trinh nay đoi hoi nhiêu kiên th c ng trinh không thê tranh con ng trinh đa đap ng đ ươ ự ứ ươ ̀ ̣ ̣ ̀ ̉ ́ ̀ ́ ứ th c con han chê cung nh xây d ng ch ư chuyên sâu va han hep vê th i gian nghiên c u nên ch ̀ ờ nhiêu thiêu sot. ̀ ́ ́ ng trinh nay em xin chân thanh cam n s giup đ ự ượ ̉ ̀ ̀ ̀ ́ ́ ơ ự i đa h , la ng ữ ̃ ướ ườ ̀ ́ ́ ́ ́ ̣ ̣ ̀ ̃ ́ ́ ̀ ̣ ́ ̀ ̀ ̀ ́ ́ ̣ ̀ ̀ ́ i s giup đ cua cac thây cac cô trong bô môn Tin Hoc Đia Chât ́ ơ ớ ự ̃ ́ ̉ ́ ̀ ́ ̣ ̣ ̣ ỡ c ch Đê xây d ng đ ươ va nh ng y kiên quy bau cua ng dân ̉ PGS.TS Phan Trong Trinh xuyên suôt trong qua trinh th c tâp đên hoan thanh đô an tôt nghiêp nay, cung đo em ự cung cam n t ́ đã giup đ em hoan thanh đ ỡ ỡ c đô an tôt nghiêp. ượ ́ ̀ ̀ ̀ ́ ́ ̣ Em xin chân thanh cam n! ́ ơ ̀

ĐĂT VÂN ĐÊ

̣ ́ ̀

̣ Ự

́ ́ ̣ ̀ ̀ ́ ớ ớ ự ̣ ̀ ̣ ̀ ́ ̉ ̣ ̃ ̀ ́ ̣ ́ ̉ ̣ ̀ ̣ ́ ̣ ̣ ̀ ̉ ́ ̀ ́ ̣ ớ ự ̣ ́ ̣ ̀ ̣ ̀ ́ ́ ̀ ̉ ̣ ̣ ̣ ̀ ̣ ̣ ̣ ̀ ̀ ̀ ̣ ́ ̣ ự ̀ ̀ ́ ̣ ̉ ́ ́ ́ ̣ ̣ ̉ ̉ ́ ́ ̀ ́ ư ử ̣ ̀ ̉ ̣ ̣ ́ ̣ ́ ̀ ̀ ́ ́ ́ ̣ ự ̀ ́ ́ ́ ̀ ́ ̀ ́ ́ ̀ ́ ́ ́ c ap dung trên thê gi ̃ ượ ́ ớ ự ́ ́ ̣ ̣ ̣ ̀ ́ ́ ̣ ̀ ̣ ờ ̣ ử i va Viêt Nam. ̀ ự ̀ Đia Đông L c – Viên Đia Chât ự ̣ ̣ ̣ ̣ ̣ ́ ̉ ́ ́ ̀ ̣ ́ ̣ ̀ ̀ ́ ́ ́ ́ ̣ ́ ́ ̣ ́ ượ ự ́ ượ ư ̉ ừ ̉ ̉ ́ ̀ ̀ ́ ́ ̉ ́ ́ đo co thê đanh gia đ ự ́ ̣ ̉ ́ ́ ́ ́ ̣ ́ ́ ̀ ̣ ̣ c u tiên hang đâu. Đê t ́ ự ng an đôi pho thiên tai cân thiêt. ́ ữ ́ ́ ́ ̀ ́

̣ ́ ̀ ̣ ́ ́ ừ ́ ̀ ̉ ́ ̀ ̣ ̣ ́ ̀ ữ ự i thiêt kê s dung ngôn ng lâp trinh nh ng nhu câu cua th c tê va thu thâp d liêu trong qua trinh ̀ Mapbasic đê thanh ữ ữ ườ ́ ử ự ̣ ́ ̣ ́ ̣ ̣ ̉ ̀

TINH TH C TÊ TRONG VIÊC L A CHON ĐÊ TAI Ự Hiên nay, trên thê gi i va Viêt Nam cung v i s phat triên manh me va mang tinh đôt pha cua công nghê thi viêc ap dung công nghê thông tin vao giai cac bai toan ́ trong Đia chât hoc đang la môt nhu câu tât yêu va chu đao. Đăc biêt v i s đôt pha ́ vê công nghê đinh vi toan câu GPS (Global Positioning System) thi viêc ap dung cac phân mêm theo sô liêu GPS đê tinh toan biên dang đông l c cua vo Trai Đât la quan ́ trong va chu đao. Viêc ap dung cac phân mêm tinh toan giup tôi u th i gian x ly va mang lai s chinh xac rât cao va no đang la yêu tô cân thiêt cho viêc x ly đanh gia biên dang đia đông l c ma no đa đ ̉ ́ chuyên nghiên c u vê s biên đôi Tai phong ứ trong vo Trai Đât thi viêc ap dung phân mêm tinh toan cac sô liêu cho tinh biên dang ̉ cua vo Trai Đât đ c s biên đôi kiên tao vo Trai Đât, đanh gia d bao đông đât,song thân tai khu v c Viêt Nam đê ̉ co nh ng ph ươ MUC ĐICH, YÊU CÂU MUC ĐICH Xuât phat t th c tâp tôt nghiêp ng SV: Trân Văn Phong

2

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

ng trinh la môt tool cua phân mêm ng dung công nghê GIS la ̣ ̀ ̀ ̣ ̉ ̀ ̣ ̣ ̣ ứ ̀ ̀ ̀ ̣ ́ ́ ́ ̣ ̣ ̉ ̉ ̉ ́ ́ ượ ̀ Mapinfo. ̀ ứ ươ ng trinh nay la môt công cu x ly cac sô liêu dich chuyên cua vo Trai Đât đê ̉ ̣ c thông sô biên dang la biên dang xoay trong môt tam giac đia ́ ́ ́ ́ ̣ ̀ ́ ̣ ̣ ́ ự ̣ ̀ ́ ̉ ́

̉ ự ươ ̀ ̃ ̉ ̀ ̣ ng trinh phai tr c quan,dê hiêu va dê s dung ự ̃ ử ứ ̣ ̣ ̀ ̣ ̣ ́ ́ ́ ̀ ̣ ̉ lâp ch Ch ươ tinh toan đ a ra đ ư đông l c va sai sô cua no. YÊU CÂÙ - Ch - Gon nhe va đa dang trong l a chon cac ch c năng - Chinh xac cao va hiêu qua - Thich h p v i hê điêu hanh cua Window, v i cac loai phân c ng phô biên ̀ ứ ́ ở ớ ớ ́ ̣ ̀ ̀ ̉ ́ ̣ ̉ ợ Viêt Nam. ̣

CH

ƯƠ

C S LY THUYÊT CHO XÂY D NG CH

NG TRINH

NG I : Ự

Ơ Ở

ƯƠ

́ ́ ̀

́ ́ ́ ̣

́ ̣ ̣ ̀

ệ ạ ộ ộ ộ ự ừ ầ ướ ấ ầ ứ ng x t ị ề ể

ụ ể ả ử ị ể ủ ộ ị ụ ự ể ầ ọ ể ẽ ị ị ẽ ị ể ơ ớ ễ ượ ủ ể c bi u di n là (Hình1.1). t:

1.1 LY THUYÊT BIÊN DANG 1.1.1 BIÊN DANG MÔT CHIÊU Gi s có thanh v t li u c ng trong h to đ m t chi u Hình 1.1). Trên đó ề ậ ệ ứ ả ử đ u mút có hai đi m r t g n nhau và Khi tác d ng m t l c P theo h ụ ể ể c a thanh c ng, thanh này s b kéo dài và các đi m cũng đ u d ch chuy n ẽ ị ủ (displace). s d ch chuy n này là vô cùng bé, biên đ d ch chuy n s ph thu c Gi ộ ể vào v trí c a đi m d c theo thanh: càng g n đi m tác d ng l c P,thì d ch chuy n ị càng l n. Do đó,đi m B s b d ch chuy n nhi u h n so v i đi m A.D ch chuy n ể ề ị ớ ể i đi m A đ t c bi u di n là và c a đi m B đ ượ ể ễ ể ạ Do d ch chuy n dx vô cùng bé nên có th vi ể ế ị

ể ể ể

= (1.1) va : ̀ = + – = + (1.2)

̀ ̣ ́ ̣ ̣ ̀

SV: Trân Văn Phong

ạ Minh hoa biên dang môt chiêu ủ c đ nh nghĩa là t s c a s thay đ i chi u dài c a ỉ ố ủ ự ề ổ Hinh 1.1: Bi n d ng ( strain) đ ượ ị ế v t th so v i chi u dài ban đ u c a nó. Do đó: ầ ủ ậ ể ề ớ

3

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

ư ậ ủ ị ế ạ trên đ bi n d ng pháp tuy n (normal strain) ả ạ ế ế ượ c g i là ọ ề ạ ấ ề ế ế ạ ễ ẽ ượ ế ườ ế ạ ả c mô t

́ ̣ ̀ ứ ̣ ́ ̣ ̉ ̣ ̉ ̉ ̉ ́ ́ ̀ ̣ ́ ̉ ́ ́ ́ ̣ ̉ ̣ ̀ ̉ ̉ ́ ́

́ ̣ ụ ề ặ ẳ ng ch h ắ ị ề ng ch h ỉ ướ ộ ể ủ ể ụ ể ị ị s trong không gian Đ -các hai chi u,trên m t ph ng xy theo tr c x ả ử ng b c), d ch chuy n c a ch t ấ ỉ ướ ể ủ ấ t d ng đông) và tr c y ( d ỏ ậ ố i d ng: c vi

= = = = (1.3) Nh v y bi n d ng vô cùng bé là gradient không gian c a d ch chuy n. Lo i ạ ể , cũng có bi n d ng mô t ế ạ c khái quát hoá trong không gian hai hay ba chi u.Tuy nhiên trong không th đ ể ượ ế gian hai hay ba chi u, s xu t hi n d ng bi n d ng khác, g i là bi n d ng ti p ế ạ ệ ọ , bi u di n bi n d ng bóp méo theo góc, tuy n hay bi n d ng tr t (shear strain) ạ ạ ể ế không ph i bi n d ng căng giãn.Tr ề ng h p bi n d ng trong không gian hai chi u ế ợ ạ sau đây. s đ ả ẽ ượ 1.1.2 BIÊN DANG HAI CHIÊU Do viêc xac đinh chuyên dich thăng đ ng cua vo Trai Đât con han chê nên ta chi xet cac biên dang do chuyên dich năm ngang cua vo Trai Đât trong không gian 2 chiêu.̀ 1.1.2.1 Khai niêm Gi ( d ươ ươ đi m là r t nh .V n t c chuy n d ch u là m t hàm theo v trí c a đi m có th ể đ ượ

ế ướ ạ

ng c a tr c x và y có th vi Hai thành ph n v n t c theo ph ầ ậ ố ể ế t nh sau: ư ) = + (1.4) ụ ươ

ủ (1.5)

ầ ủ ự ổ ướ c i 0. ể ầ ớ ể Trong đó , là các v n t c thành ph n c a s thay đ i vô cùng bé kích th v t th và b n thân kích th ả ậ Do đó (1.4) có th vi ậ ố c v t th d n t ướ ậ t là: ể ế

) = + g (1.6)

v i :ớ

c g i là ượ ọ ườ ạ g= (1.7) ể ả ế ậ ố ộ ộ ố ứ ấ ồ t thành: . tensor gradient v n t c d ch chuy n ngang g đ ậ ố ị ế ng bao hàm c bi n d ng nén ép/căng giãn và bi n Do gradient v n t c th d ng xoay, nên g là m t tensor b t đ i x ng. Theo lý thuy t v tensor, m t tensor ấ ố ứ ạ b c hai b t kỳ có th phân tách thành hai tensor, bao g m m t tensor đ i x ng và ậ m t tensor b ộ ế ề ộ t đ i x ng [Malvern, 1969]. Do đó (1.7) có th vi ể ế ể ấ ố ứ g= [g + gT] + [g - gT] (1.8)

g = + (1.9) N u đ t: ế ặ (1.10)

Ta s có:ẽ

 đ

Trong đo cac ky hiêu ̣ ở ́ ́ ́ ̉

c g i là ọ g= + = + (1.11) biêu th c (1.11) : ứ tensor v n t c bi n d ng ậ ố ế ạ (strain rate tensor) hay tensor đ iố ượ x ngứ

 là tensor v n t c xoay

SV: Trân Văn Phong

(rotation rate tensor) hay tensor ph n đ i x ng. ậ ố ố ứ ả

4

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

 va ̀

ẳ ặ ế ế ạ

ọ ụ ượ ậ ố tr c x và tr c y.Chúng đ ụ ng và v n t c nén ép khi có giá tr âm. giá tr d

ị ươ ậ ố là v n t c bi n d ng pháp tuy n (nornal strain) trên m t ph ng xy theo c g i là v n t c giãn n (hay căng giãn) khi có ậ ố ở ị ượ (shear strain) không kèm theo s xoay. ự

ự ị t ạ ụ ộ ế ạ ế ủ ệ ạ ậ ố ng không đáng k vào phép xoay to đ : tensor v n t c xoay ậ ố ạ ộ ụ ị i ta th ậ ố ể ế

các thành ph n c a nó, bao g m ầ ủ ư ố ừ ườ ạ ồ ,, đ mô t ể ng ườ ả ế bi n

1.1.2.2 Trinh t

 Đâu tiên ta co cac d liêu đo vân tôc chuyên dich trên bê măt Trai Đât (đ

ậ ố  là v n t c bi n d ng tr Tensor v n t c bi n d ng không ph thu c vào s t nh ti n c a h to ế đ và nh h ưở ể ả ộ không ph thu c vào phép t nh ti n h to đ . ộ ệ ạ ộ ế Do nh ng u đi m trên c a tensor v n t c bi n d ng ng ủ ữ s d ng các tham s tính t ử ụ d ng b m t v trái đ t. ấ ề ặ ỏ ạ ự ̀ ́ ́ ̣

̀ ́ ̣ ̣ ́ ̉ ̣ ̀ ̣ ́ ́ ̣ ướ ướ

tinh biên dang ́ ữ ượ

 T vân tôc chuyên dich đo đ

̀ ̉ ̣ ́ ̉ ́ ̉ c thê hiên trong môt l ườ ̀ ̀ ́ ́ ̀ ́ ̉ ́ ượ c i cac điêm i cac điêm đo. Chia l ́ ng la tam giac) sao cho khoang cach trong cac ng đôi băng nhau. T đo ta se tinh cac gia tri biên dang ừ ̣ ̉ ́ ̀ ́ ̃ ́ ́ ́ ̣ ́ ̣ đo băng GPS) đ đo nay thanh cac đa giac (th canh cua đa giac t ́ ươ trong môt đa giac nay. ̣ ́ ̀ c trong đa giac ta tinh đ c tensor gradient ừ ượ ượ ̣ ́ ̉ ̣ ́ ́ chuyên dich ngang. ̉ ̣

 T tensor gradient v n t c chuy n d ch ngang,có th phân tách thành tensor ừ ị v n t c bi n d ng (tensor đ i x ng) và tensor v n t c xoay (tensor ph n ả ậ ố đ i x ng). ố ứ

 Tensor v n t c bi n d ng đ ậ ố

ậ ố ể ố ứ ể ậ ố ế ạ

ượ ể ậ ố ế ạ c bi n di n theo các v n t c bi n d ng chính ụ

ế ạ ễ trong trong h to đ c a các tr c chính. ệ ạ ộ ủ ế ạ ồ ỗ ấ c bi u di n t c tính trung bình trong m i đa giác và đ ể ượ ị ậ ố đ nh r ng bi n d ng là đ ng nh t trong m i đa giác,các giá tr v n t c i tâm ễ ạ ỗ

́ ̣

́ ̣ ̀ ̀ ng đ ̀ ườ ́ ứ ̀ ́ ̣ ̀ ̣ ̉ ̉ ử ́ ̣ ̀ ́ ̣ ̉ ̀ ̣ ̉ ̉ ́ ́ ́ ́ c h ượ ướ ̉ ̣ ̉ ̉ ̀ ̀ ̃ ́ ̣ ̣ ̉ ̉ ̉ ư ́ ́ ́ ́ ̣ ̉ ́ ́ ̉ ̀ ̃ ̣ ́ ̀ ớ ́ ̀ ̀ ́ ̀ ́ ̀ ̉ ̣ ̣ ́ ́ ̣

 Gi ả ị ằ bi n d ng đ ượ ạ ế c a đa giác đó. ủ 1.1.3 BIÊN DANG XOAY 1.1.3.1 Biên dang xoay la gi? c Theo (1.11) thi biên dang xoay la môt tensor phan đôi x ng va th ượ ̣ ky hiêu la . Gia s ta co môt điêm đo trên bê măt cua vo trai đât, khi biêt tôc đô ́ chuyên dich cua điêm nay thi ta se xac đinh đ ng dich chuyên cua điêm đo, nh ng do cac yêu tô biên dang trong vo Trai đât điêm nay se xoay đi môt goc nao đo ́ so v i môc ban đâu va goc nay chinh la thê hiên vân tôc biên dang xoay. 1.1.3.2 Minh hoa thê hiên biên dang xoay

̣ ̉ ̣ ́ ̣

Hinh 1.2: Minh hoa biên dang xoay ̀ ̣ ́ ̣

̀ ̀ ̀ ̉ ̣ ̉ ̣ ́ ̃ ̀ ̉ ̣ ̣ ̀ ươ ̀ ̉ ̀ ̉ ̃ ̃ ̉ ̣ ̣ ̉ ̉ ̉ ̀ ̀ ̃ ̉ ̣ ́ ̣ ̉ ̉ ng t ự ư ượ ư ̣ ̣ ́ ̀ ̀ ̣ ̀ ̀ ́ ̣ ́ ̣ ̉ ̣ ̉ ̀ Ự ́ ̣ ̣

́ Trong hinh 1.2 thi hinh (a) thê hiên điêm A tai gôc mui tên la điêm tai vi tri ban đâu trong không gian, điêm B la điêm sau khi đo, mui tên se la đ ng thê hiên ng dich chuyên cua điêm A, va chiiêu mui tên thê hiên biên dang xoay cua điêm h ướ tai vi tri A. hinh (b) t ̀ c lai. Hinh (c) va (d) la nh (a) nh ng chiêu xoay ng ươ ky hiêu biên dang xoay thê hiên trên ban đô. 1.1.4 TAM GIAC ĐIA ĐÔNG L C 1.1.4.1 Tam giac đia đông l c la gi?

ự

SV: Trân Văn Phong

́ ̣ ̣ ̀ ̀

5

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

̉ ử ́ ̣ ̣ ́ ̉ ́ ́ ̣ ̣ ̉ ̀ ̣ ượ ́ ớ ́ ́ ̉ ̀ ́ ́ ́ ̉ ́ ̀ ng đôi v i nhau tuy theo l ươ c bô tri cac điêm đo nay thi ng ̀ ớ c bô tri cac khoang cach t ượ ̉ ̉ ́ ́ ̣ ̀ ́ ́ ́ ̉ ̀ ́ ́ ̣ ́ ̣ ̀ ́ ̀ ̀ ̣ ́ c ng ườ ườ ượ ườ ̉ ̣ ̣ ̀ ̣ ́ ́ ̀ ́ ̣ ượ ̣ ́ ́ ̀ ́ ̣ ́ ́ Gia s ta co môt loat cac điêm khac nhau đo tôc đô dich chuyên bê măt trai i đo đât, cac điêm nay đ ướ la l n hay nho. Đê tinh biên dang cho vung đ i ta ̀ ườ ̀ ng la môt tam giac (t c la tinh biên dang trong t ng đa giac môt, va đa giac nay th ứ ừ i xac đinh 3 điêm đo môt tao thanh môt tam giac) Tam giac nay th ng đ l a chon theo nguyên tăc tam giac Delaunay. Va biên dang tinh đ ́ c trong tam giac ự thê hiên va qui vê trong tâm cua tam giac đo. ̉ ̣ ̀ ̀ ̣ ̉ ́ ́

Hinh 1.3: Minh hoa biên dang xoay trong tam giac đia đông l c ự ̀ ̣ ́ ̣ ́ ̣ ̣ ̀ ̉ ̣ ̣ ́ ̣ ̣ ́ ̉ ̣ ̀ ́ ̀ ̉ ́ ́ ̀ ̣ ́ ́ ́ ̃ ̀ ̉ ̉ ̣ ượ ́ ́ ̣ ̣ ̉ ́ ̣ ́ ̣ ̉ ̣ ̣

ự

́ ́ ̣ ̣ ́ ̣ ̣ ̀ ̉ ̣ ́ ̣ ̣ ̣ ̀ ̣ ̀ ượ ́ ̣ ̉ ̉ ̉ ̉ ̣ ̀ ̣ ̀ ̉ ̀ ượ ứ ớ ́ ̉ ̉ ̉ ̣ ̀ ̣ ̀ ̉ Trong hinh 1.3 thê hiên môt tam giac đia đông l c trong đo thê hiên 3 đâu cua ự c bô tri trên bê măt trai đât. cac mui tên mau đo thê hiên tam giac la 3 điêm đo đ ượ cac tôc đô dich chuyên, ky hiêu biên dang xoay đ ̉ c thê hiên trên trong tâm G cua tam giac.́ 1.1.4.2 Tinh biên dang xoay trong môt tam giac đia đông l c. Trong không gian Decac 2 chiêu cua môt tam giac đia đông l c.Goi , la vân ự t theo truc va . Goi , la khoang tôc dich chuyên cua điêm th t i điêm th lân l ứ ớ ứ cach cua điêm th t ơ t theo trucva . , co đ n vi la m/năm, , đ n i điêm th lân l ́ ơ ứ vi la met. Theo đo ta se co: ̣ ̀ ́ ̃ ́ , (1.12) ứ ́

̀ ̣ ́ ̣ ̉ ̀ ̣ ̉ ́ ư ̀ ̣ ́ ́ (1.13) ừ ươ ́ ̀ ̣ ̣ ̉ ̣ ́ ̣ ̉ Ta co công th c Trong đo:́ la vector vân tôc dich chuyên. la ma trân khoang cach. la gradient vector vân tôc( ch a biêt). T công th c (1.12) ứ Trong đo la ma trân hiêp ph Tinh đ c ta co thê tinh đ ượ ượ ng sai cua vân tôc dich chuyên. c biên dang xoay theo công th c : ứ ́ ́ ̉ ́ ́ ̣ (1.14)

ượ ứ ̉ ́ ̣ ̀ ̉ ̣ ́ ̀ ́ ́ ́ ̣ ́ ̀ ́ ̣ ́ ̀ ̣ ̃ ứ ư ứ ́ ̣ ̉ ́ ứ Tuy nhiên đê tinh đ c ma trân theo công th c (1.13) đoi hoi môt kiên th c chuyên sâu vê xac xuât thông kê, đia thông kê va trăc đia cao câp. Do trinh đô cung nh th i gian nghiên c u co han nên em ch a thê tinh theo công th c (1.13). Nh ng theo đai sô tuyên tinh ta co thê tinh theo công th c ma trân nghich đao đo la : ư ờ ư ứ ̣ ́ ́ ́ ́ ̉ ́ ̣ ̣ ̉ ́ ̀

ng phap nay cung se dân t ̃ ớ ̣ ́ ́ ̀ ̃ ̃ ́ ́ ́ ́ ờ i kêt qua t ̉ ươ ứ ̀ ́ ̉ ́ ́ ̃ ́ ̣ ứ ́ ́ ̣ ̣ ̣ ̀ ́ ̉ ̀ ̀ ́ ́ ́ ̉ ́ ̣ ̣ ́ ̣ ́

̣ ́ ̣

̣ ̃ ̣ ̣ ̃ ́ ng đôi chinh xac Viêc tinh theo ph ươ ̉ va co thê châp nhân đ c. Tuy nhiên nêu co th i gian nghiên c u em se xac đinh đê ̣ ượ tinh biên dang xoay theo công th c (1.13). Hiên tai trong đô an em chi trinh bay tinh toan kêt qua biên dang xoay thông qua viêc tinh Gradien vector vân tôc theo công (1.15). th c ứ 1.2 MA TRÂN 1.2.1 KHAI NIÊM 1.2.1.1 Đinh nghia ma trân Đinh nghia 1.1: Môt bang sô co hang va côt đ c ky hiêu : ̣ ̉ ́ ́ ̀ ̀ ́ ̣

thuôc hang th côt ̣ ỡ ớ ̀ ử ứ ̣ ̀ ̣ ̀ ̣ ̀ ̣

6

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̣ ượ = (1.16) Đ c goi la môt ma trân c v i la phân t ượ SV: Trân Văn Phong ̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

c goi la ma trân nguyên. , thi đ c goi la ma trân ph c. Nêu ̀ ượ ứ ̀ ượ ̣ ̀ ̣ ̣ ̀ ̣ ́ ̉ ̃ ̀ ̣ ̀ ̣ c viêt tăt d i dang : Khi , thi đ không chi ro thi goi la tâp sô th c. Môt ma trân A co c ̉ ượ ́ ự ́ ỡ co thê đ ̣ ̣ ́ ́ ̣ ́ ướ = hay = (1.17)

́ ̀ ̣ ́ ̣ c ky hiêu la . ượ ̣ ỡ ́ ̉ ́ ́ ̣ ̀

́ ̣ ̣ ỡ ̣ ̀ ̣ ̣ ̀ ̣ ̣ ́ ́ ́ ́ ̣

́ ̣ ượ c b i 2 ma trân cung c . Tông hai ma trân co ỡ ́ ́ ̣ ̣ ̣ ̀ ̉ ̣

Khi ta noi la ma trân vuông câp hoăc . Tâp h p tât ca cac ma trân c đ ̣ ợ 1.2.1.2 Vi du: Ma trân la môt ma trân c 2 3 Ma trân la môt ma trân vuông câp 2 1.2.2 CAC PHEP TOAN TRONG MA TRÂN 1.2.2.1 Phep công Phep công chi th c hiên đ cung c ̀ ̀ ̀ ̣ ̣ ̀ ̣ ̃

c đinh nghia : , . (1.18) ở ̉ ự ỡ = va = la môt ma trân cung c đ ỡ ượ = , = + , v i moi ớ ̣

́ ̣

̣ ớ

1. 2. Ma trân co cac phân t

3. 4. 5. 6. 7. 8.

́ ̣ ́ ́ ự = c ỡ , va sô th c . Ta đinh nghia va ky hiêu phep nhân ma trân ̀ ̣ ̃ ̀ ́ ̣ ́ ̣ Vi du 1.1: + = 1.2.2.2 Phep nhân ma trân v i môt sô Cho ma trâṇ v i môt sô nh sau : ớ ́ ư ̣ = (1.19) = ́ ̣ Vi du 1.2: Tinh chât 1.1: Cac tinh chât sau đung v i ma trân cung c : ỡ ớ ́ ́ ́ ́ ́ ́ ̣ ̀ ; đêu băng 0 goi la ma trân không va ky hiêu 0. ̀ ử ̣ ́ ́ ̀ ̀ ̣ ̀ ̣ ̀ ́ ̣ ́

́ ̣ Tich hai ma trân c ky hiêu va đinh ̣ va la ma trân c ̣ ỡ đ ượ ̣ ̃ ́ ̀ ̀ ́ ̣ ̀ ̣ Khi đo : ; , trong đó ; ; ; ; ; ; 1.2.2.3 Phep nhân ma trân Đinh nghia 1.1: , trong đo ́ nghia b i ̃ ở

SV: Trân Văn Phong

̀ ử ̣ , . (1.20) ứ ̀ ử ̣ ̉ ̉ ̀ ̣ ̉ ̀ ̉ ̉ ́ ́ t = v i moi ớ cua hang th côt th cua băng tông cua tich cac phân t ứ ng ng cua côt th cua . ớ ̀ ử ươ ứ ứ ̉ ̀ ̉ ́ ̉ ̣ ̉ ́ ̣ ̀ ượ ́ ̀ ́ ̉ ̣ ̣ ̃ ́ ̣ ̉ ̀ c đinh nghia khi sô côt cua băng sô ́ ̉ c nêu sô côt cua ượ ư ̀ ̉ ̀ ̣ ́ ̉ ̣ ̃ ̣ ̃ ́ ́ ̣ ̀ ́ ̀ ̉ ờ ̀ ̣ ̀ ́ ̀ ́ ̀ ̀ ̣ ̀ ̣ ứ ́ ́ ̉ ́ ́ ́ ́ ̉ ̣ ́ ́ ́ Vây tông phân t cua hang th cua v i cac phân t ứ Vi du 1.3: Ta thây răng tich cua hai ma trân va đ hang cua .Vi vây co thê đinh nghia nh ng không đinh nghia đ không băng sô hang cua . ư Khi la hai ma trân vuông cung câp thi ta co đông th i va . Măc du vây ch a chăc co đăng th c , hay noi cach khac tich cua ma trân không co tinh giao hoan. Chăng han, xet: ̉ ̣ ́

7

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ệ

ồ

Đ án t ố ngh thông tin ệ

Gia s la cac ma trân v i sô côt sô hang thich h p đê cac phep ̉ ử ợ ớ ́ ́ ̀ ́ ̣ ́ ̣ ́ ̀ ́ ̉ ́ ́ ứ ́ ́ ̣ ̀ ́ ̉ ́ ợ ́ ́ ́ ́ ́ ̣ ́ ̣ c xac đinh thi ta co đăng th c : tinh kêt h p. tinh phân phôi bên trai phep nhân ma trân v i phep công. tinh phân phôi bên phai phep nhân ma trân v i phep công. ớ ớ ́ ́ ̉ ́ ̣ ́ ̣ ̣ ́ ự ươ ̀ ử ̣ ́ ̣ ́ ́ ́ Tinh chât 1.2: toan sau đ ượ 1. 2. 3. 4. V i moi ớ 5. V i moi sô t ớ trên đ nhiên d ng cheo băng 1 va cac vi tri khac đêu băng 0. ườ ng n ta xet ma trân vuông câp co cac phân t ̀ ở ́ ̀ ́ ̣ ́ ́ ̀ ̀ =

ỡ ́ ̣ ́ Khi đo ma trân c ta co Ma trân đ c goi la ma trân đ n vi câp ̣ ượ ơ ̣ ̀ ̣ ̣ ́

̣ ̉ ̣ Cho ma trân ̣ ̃ ́ ̉ ́ ̀ ̉ ̣ ̀ ́ ̣ c ỡ ,nêu ta đôi cac hang cua ma trân thanh cac c ma trân m i c , goi la ma trân chuyên ớ ỡ ượ ̣ ́ ́ ̣ ̀ ́ ̀ ̀ ̣ ̣ ̀ ̣ ̉

1.2.2.4 Ma trân chuyên vi Đinh nghia 1.2: côt (do đo cac côt thanh cac hang)thi ta đ vi cua ma trân trên ky hiêu

̣ ̉ ̣ ́ ̣ ; , . (1.21)

Vi du 1.4: ; . ́ ̣

́ ́

1. Nêu thi đ ́ ứ

2. Nêu thi đ

Tinh chât 1.3: 1. 2. 3. . . Đinh nghia 1.3: ̣ ̃ c goi la ma trân đôi x ng (la ma trân vuông co cac phân t ̀ ử ́ ̣ ̀ ̣ ̀ ̣ ́ ́ ng cheo th nhât). ườ ́ ứ ứ ́ ́ ́ ứ ́ ̣ ̀ ̉ ̣ ̀ ̣ ́ ứ ng cheo th nhât, cac phân t đôi x ng va trai dâu qua đ c goi la phan đôi x ng (hay đôi x ng lêch) (la ma trân vuông ̀ ử ườ ứ ̀ ử ́ ́ ̀ ́ ́ ́ ́ ́ ng cheo th nhât băng 0). ́ ứ ứ ́ ́ ̀ ̣

̣ ̃ ế ng trình tuy n tính ta tính các đ nh th c ứ ị

̀ ượ đôi x ng nhau qua đ ̀ ượ co cac phân t trên đ ườ 1.2.3 ĐINH TH C Ứ 1.2.3.1 Đinh nghia Khi gi i h ph ả ệ ươ , Nh v y đ nh th c c a ma tr n vuông câp 2 la : ứ ủ ư ậ ậ ị ́ ̀ . Đ nh th c c a ma tr n vuông đ c ky hiêu la hay va đinh ứ ủ ậ ị ượ ̣ ̃ ́ ̣ ̀ ̀ ̣ Đinh nghia 1.4: nghia b i biêu th c : ̃ ở ứ ̉

SV: Trân Văn Phong

t c các tích g m ph n t ị ứ ủ ầ ử ấ ả ớ ặ (1.22) ậ ủ ồ trên c t khác nhau c a ma tr n và nhân v i +1 ho c -1. Tinh đinh th c cua môt ma trân bâc 3 co dang ứ ́ ̣ ́ ̣ ̉ ̣ ̣ ̣ ́ ̣ Nh v y đ nh th c c a ma tr n vuông là t ng t ư ậ ổ trên hàng mà ậ ộ ở Vi du 1.5: ́ .Vâỵ Co dâu ́ = =

8

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

́ ́ ̉ ̣

1.2.3.2 Tinh chât cua đinh th c ứ Tinh chât 1.4:

1. Nêu đôi chô hai hang cua ma trân thi đinh th c đôi dâu:

́ ́ ứ ́ ̉ ̃ ̀ ̉ ̣ ̀ ̣ ̉ ́

2. Đ nh th c có tính ch t tuy n tính đ i v i m i hàng: Cho hai ma tr n ậ , va ma trân co hang th là t ổ ợ th c a và . Nghia la v i moi Thi .

3. T 1. và 2. suy ra r ng trong m t ma tr n có hai hàng t

4. N u ta c ng vào m t hàng m t t

, , thi .̀ ị ấ ế ứ ố ớ ỗ h p tuy n tính c a hàng ứ ủ ế ̀ ̣ ́ ̀ ứ ủ ̀ ớ ̃ ̣ ̀ ậ ằ ộ l ỷ ệ ứ thì đ nh th c ị

5. Đ nh th c c a ma tr n chuy n v b ng đ nh th c c a ma tr n đó:

h p tuy n tính các hàng khác thì đ nh ộ ổ ợ ế ị ổ ể ị ằ ứ ủ ậ ị ừ b ng 0. ằ ế ứ ị ộ ộ th c không thay đ i. ậ ứ ủ ̉ ử , ,

Gia s thi ̀ ừ ớ ằ ứ ị ấ ủ ậ i.Vì v y ta ch c n ch ng minh các đ nh lý v ứ ộ ẳ ị ỉ ầ ừ ị ạ ộ 6. T 5. suy ra r ng các tính ch t c a đ nh th c đúng v i hàng thì cũng ề 4. suy ra n u ta c ng vào m t ộ ổ h p tuy n tính các c t khác thì đ nh th c không thay đ i. ph thu c tuy n tính đ u b ng 0. ộ ơ ế ụ ế ứ ề ằ

́ ́ ̣ ̣ ́ ị ậ ượ ủ c b ng cách xoá hàng i c t j c a (1.23) ấ ằ ộ ̣ ̣ ̣ ̉

̣ ̃ ̣ ̣ ̉ c g i là kh ngh ch n u t n t ậ i ma tr n ế ồ ạ ả ậ ị ̣ ̃ ượ ọ ơ ấ ́ ̀ ̣ ̣ đ nh nghĩa trên n u t n t ế ồ ạ i ậ ệ ậ ị

ậ

ề ả

cua ma trân , trong đo ́ la phân bu đai sô cua phân t ̀ ử ̣ ̃ ̀ ̀ ̀ ̣ ́ ̉ ̉ ̣ Ma trân ̣ ̣ ợ ̣ ̀ ̣ ̉ (đi u ki n đ ) N u thì kh ngh ch và đúng v i c t và ng c l ớ ộ ượ ạ đ nh th c đúng v i hàng.Ch ng h n, t ứ ớ ị c t m t t ế ộ ổ ợ ộ Đ nh th c c a m i h véct ọ ệ ứ ủ ị 1.2.3.3 Cach tinh đinh th c ứ Đinh ly 1.1: Trong đó là đ nh th c c a ma tr n c p có đ ứ ủ ma trân . 1.2.4 MA TRÂN NGHICH ĐAO 1.2.4.1 Đinh nghia ma trân nghich đao Đinh nghia 1.5: Ma tr n vuông đ vuông cùng c p sao cho Trong đo la ma trân đ n vi. Phép nhân ma tr n có tính k t h p nên ma tr n ế ợ ậ ở ị thì duy nh t, ta g i ma tr n này là ma tr n ngh ch đ o c a , ký hi u. ả ủ ọ ấ ậ i ma tr n ngh ch đ o 1.2.4.2 Đi u ki n c n và đ đ t n t ủ ể ồ ạ ề ả ị ệ ầ ậ (đi u ki n c n) N u kh ngh ch thì (lúc đó ta nói ma tr n Đ nh lý 1.2 : ị ế ầ ệ ị không suy bi n)ế Đinh nghia 1.6: đ ượ Đ nh lý 1.3 : ị c goi la ma trân phu h p cua . ệ ủ ề ả ị ế (1.24)

ớ ̣ ợ ̀ ̣ ̉

ứ

́ ̣ ́ ̣ ̣ ̉ Ma trân co ́ ̣ ̣ ́

9

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

V i la ma trân phu h p cua . 1.2.4.3 Vi du tinh ma trân nghich đao theo công th c (1.24) Vi du 1.6: , , , , , , SV: Trân Văn Phong ̀

t nghi p Khoa: Công

ệ

ồ

Đ án t ố ngh thông tin ệ

, , , Vây : ̣ . NG TRINH TUYÊN TINH BĂNG MA TRÂN NGHICH ̣ ƯƠ ̉ ̀ ́ ́ ̀ ̣ ̣ ̉

̀ ́ ́ 1.2.5 GIAI HÊ PH ĐAO 1.2.5.1 Hê ph H ph

̣ ươ ươ

ệ

ng trinh tuyên tinh ng trình tuy n tính n có d ng t ng quát: ẩ ế

ạ ổ

(1.25)

́ ̀ ̉ ̀ ̣ ́ ̉ ̉ ̀ ̀ ́ ̉ ̉ ̀ ứ ươ ng trinh đ c goi la thuân nhât. ng trinh ươ ng trinh th ứ ượ ́ ́ ̉ ̀ ̀ ̣ ̀ ̀ ́

̉ ̀ ́ ́ ̀ ̣ ̣ ̉ ng trinh tuyên tinh : Hay Trong đo : ,,..., la ân la hê sô cua ân th trong ph la vê phai cua ph Khi cac vê phai thi hê ph ̣ ươ 1.2.5.2 Giai hê ph ng trinh tuyên tinh băng ma trân nghich đao ̣ ươ T công th c (1.25) ta co dang ma trân cua hê ph ứ ừ ̣ ươ ́ ̣ ̣ ̉ ̀ ́ ́

= , , (1.26) ậ c g i là ma tr n h s , ma tr n v sau và ma tr n ệ ố ậ ậ ́ t l n. Khi đó h ph t đ ̀ ượ ượ ọ ng trình (1.25) đ ế i d ng ma tr n: ậ i d ế ạ ướ ạ Trong đo lân l ẩ ệ ươ c vi ượ (1.27) ng phap ma trân nghich đao ta co công ươ ươ ̉ ̀ ́ ̣ ̣ ̉ ́ ứ

- Sai s tuy t đ i: Gi

́ ̣ s là s g n đúng c a ( : s đúng), ả ử ủ ố ự ự ủ ọ c nên ta xét đ n 2 lo i sai s đo la sai sô tuyêt đôi va ượ ị ế ạ ố ̀ ́ ̀ ́ ̣ ́ ́ ươ ́ ệ ố ả ử ́ s đu be sao cho . Khi đo goi la sai sô tuyêt đôi ̉ ́ ́ ̣ ̀ ́ ̣ ̉ c đinh nghia va ky hiêu b i công th c: ng trinh (1.27) theo ph Giai ph th c : (1.28) 1.3 SAI SỐ 1.3.1 KHAI NIÊM Gi ố ố ầ Khi đó g i là sai s th c s c a . Vì không xác đ nh đ ng đôi : sai sô t ố cua x. - Sai s t ng đ i :đ ố ố ươ ượ ứ ở ̣ ̃ ̀ ́ ̣ (1.29)

́ ̣ ́ ́ ố t: xu t hi n do vi c gi ạ thi t bài toán đ t đ c m t s 1.3.2 CAC LOAI SAI SÔ D a vào nguyên nhân gây sai s , ta có các lo i sai sô sau: ấ ạ ượ ộ ố ệ ự - Sai s gi thi ố ả đi u ki n lý t ệ ề ệ ả - Sai s do s li u ban đ u: xu t hi n do vi c đo đ c và cung c p giá tr ệ ả ế ng nh m làm gi m đ ph c t p c a bài toán. ộ ứ ạ ủ ạ ệ ấ ấ ố ị

- Sai s tính toán : xu t hi n do làm tròn s trong quá trình tính toán, quá

ng pháp : xu t hi n do vi c gi i bài toán b ng ph ng pháp ố ươ ệ ệ ả ằ ươ

SV: Trân Văn Phong

ế ằ ưở ầ ố ệ đ u vào không chính xác. ầ - Sai s ph ấ g n đúng. ầ ố ấ ệ ố trình tính càng nhi u thì sai s tích lu càng l n. ề ố ớ ỹ ́ ́ ́ 1.3.3 SAI SÔ TINH TOAN Gi s dùng s g n đúng đ tính đ i l ng , ố ầ ả ử ạ ượ ể

10

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

ớ ́ ̀ ̀ ̉ ̣ ́ ́ ́ ̉ ́ ́ ứ ́ ̣

ố ố ươ ng h p cua ham nh sau : ư ợ ́ ́ ́ ̉ ̀ ng h p có d ng t ng: ̉ V i . Trong đo la ham kha vi liên tuc theo cac đôi sô cua . Khi đo sai sô cua c xac đinh theo công th c sau : đ ượ Sai s tuy t đ i: (1.30) ệ ố ng đ i: (1.31) Sai s t ố Ta tinh sai sô cho cac tr ườ - Tr ợ ườ ạ ổ

suy ra (1.32)

- Tr

ng h p co dang tich : ườ ợ ́ ̣ ́

Vây: (1.33) ̣

- Tr

ng h p co dang luy th a : ườ ừ ợ ́ ̣ ̃ . Ta co : ́

Suy ra (1.34) Vi du 1.7: Tinh sai sô cua: ́ ̣ ́ ́ ̉ ; Giai: ̉

NG 2 : XÂY D NG CH

NG TRINH

ƯƠ

Ự

ƯƠ

̀

̣ ̀ ̉ ̀ ́ ́ ̣ ̣ ́ ̣ ̣ ươ ự ươ ự ̣ ̀ ̀ ̀ ̣ ̣ ̣ ̉ ̀ c dung phô biên va rông rai trên thê gi ̀ Mapinfo. Đây la phân mêm GIS đ ng trinh tinh biên dang xoay trong môt tam giac đia đông ng trinh la thanh lâp môt tool (công cu) cua phân ́ ớ i ượ ̀ ̀ ̀ ̀ ̉ ́ ̀ ̣ ̃

CH 2.1 NGÔN NG LÂP TRINH Ữ Đê xây d ng ch ự l c, em l a chon xây d ng ch ự mêm SV: Trân Văn Phong

11

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

ở ữ ̀ ̣ ̀ ̀ ̣ ̀ ̣ ̀ ̣ ̉ ́ ử ươ ượ ̣ ̉ ̀ ̀ ̀ ̀ ́ ̀ ̣ ớ ̉ ́ ̣ ̉ ̀ ̀ ̀ ử ̀ ̣ ̀ ̀ ̀ ́ ́ ́ ̉ ̀ ́ ̃ ử ứ ́ ̣ ́ ́ ̉ ̀ ̀ ̣ ướ ớ ự ̣ ̉ ̀ ̉ ̀ ̣ ̉ ́ ̉ i đêu co thê lam đ ượ ̣ ử ữ ̣ ̣ ̀ ̣ ̀ ́ ̉ ̀ ́ ́ ườ ư ̀ ở ứ ự ̉ ̉ ̀ ̣ ́ ̣ ́ ́ ̣ ̣ ̣ ̀ ̀ ̣ ̀ ̀ ́ ̣ ́ ̀ ́ ̉ ứ ́ ̀ ̉ ́ ̀ ̣ ̣ ̣ ng thêm nh kha năng liên kêt đ c v i cac hê c c tăng c ̣ ơ ở ữ ́ ượ ớ ́ ử ́ ở ờ ̀ ượ ườ ́ ̀ ̉ ́ ử ̣ ̣ ́ ̉ c nhiêu vân đê th c tê môt cach nhanh chong va chinh xac. ̀ ự ̉ ̀ ́ ́ ̣ ́ ́ ̀ ́ ́ ̣ ̉ ̀ ̀ ̀ ̀ ̉ ̀ ̀ ̀ ̣ ̀ ữ ̀ ̣

- Điêm :

- Đ ng: ườ ườ

- Vung :

̀ ̣ ̉ ượ ̀ ữ ̀ ̀ ̣ ̉ ̣ ̉ ̣ ̀ ̀ ́ ̣ ượ ư ̉ ư ́ ́ ̀ ́ ́ ̉ ́ ́ ̀ ̀ ̉ ̣ ̉ ̉ ̀ ̣ ́ ́ ̣ ́ ̣ ̉ ̉ ̃ ượ ử ́ ́ ̉ ̀ ́ ̉ ́ ̣ ́ ̣ ́ ̣ ̉ ́ va Viêt Nam, va thanh lâp tool nay d a trên ngôn ng lâp trinh m rông cua no, đo ự ng trinh đ la ̀ MapBasic. Cu thê trong ch c trinh bay trong đô an nay em s dung MapBasic 9.5 va ̀ Mapinfo 11.0 la nh ng phiên ban m i nhât hiên nay. ̀ ữ 2.1.1 TÔNG QUAN VÊ PHÂN MÊM MAPINFO ư ́ MapInfo la môt phân mêm nhăm giup chung ta x ly ban đô sô cung nh cac thông tin liên quan đên đia ly. Tr c đây x ly ban đô la môt ch c năng chuyên nghiêp cua nganh ban đô hoc. V i s ra đ i cua Mapinfo, viêc x ly ban đô tr nên ờ c. Không nh ng co cac ch c năng môt công viêc ma moi ng cua ban đô thông dung nh cung câp thông tin đia ly, giup đinh vi trong th c đia,... Mapinfo con la môt phân mêm rât manh giup x ly va phân tich thông tin trên ban đô ̀ ́ sô. Ch c năng nay cua Mapinfo khiên cho no tr thanh môt hê c s d liêu đia ly. ̣ ơ Tinh năng nay con đ s d liêu nh Microsoft Access, SQL Sever, Oracle,... S dung Mapinfo co thê hô ̃ ư ở ữ tr giai quyêt đ ́ ượ ợ Môt ban đô trong Mapinfo bao gôm hai phân : phân ban đô (hay phân đô hoa) va phân d liêu (hay thông tin). 2.1.1.1 Đô hoa trong Mapinfo c biêu hiên trên man hinh may Phân đô hoa cua Mapinfo la nh ng vât thê đ tinh giông nh ban đô giây nh ng co ban chât khac. Phân đô hoa đ c hiên thi trong c a sô ban đô (Map Window). Mapinfo s dung cac khai nêm toan hoc đê biêu diên ử ử c s dung đê xây cac chi tiêt trên ban đô. Co 3 kiêu khai niêm toan hoc chinh đ d ng ban đô trên Mapinfo (Hinh 2.1) : ự ̉ ̀ ̀ la môt vât thê toan hoc không co kich th ướ ̉ ̀ ̣ ̣ ̉ ́ ̣ ́ ́ ́ ̀ ̀ ườ ́ ̣ ̣ ̣ ̣ ̣ ̣ ̣ ̀ ́ ̣ ̣ ̉ ̉ ̣ ̣ ̀ ́ ̣ ̣ ̣ ̉ ư ̀ ̣ ́ ́ ̣ ̀ ̣ ườ ̉ ử ̉ ̉ ́ ̣ ́ ̀ ̀ ́ ̣ ̣ ̉ c, không co chiêu dai, chi ̉ i ta s dung vât thê điêm đê ử ượ c ng hoc,... Điêm đ ̣ ườ ng tr ng băng môt châm trong toan hoc. Trong Mapinfo,tuy theo nôi dung i ta co thê s dung môt trong ng khac nhau đê minh hoa môt điêm. Vi vây điêm trong ̀ ́ ̉ ̣ ̣ ̉ ̀ ̣ ̉ ng (symbol). c goi la biêu t ̉ ượ ̣ ̀ ̀ ̣ ̣ ̉ ̀ ̣ ́ ̀ ̣ ́ ̀ ̀ ư ̉ ượ ̀ ́ ̀ ̀ ̣ ̀ ̣ ̣ ̀ ̣ ̀ ́ ́ ̉ ́ ̀ ng.Đ ng đ ườ ượ ử ́ ̉ ̣ ̉ ̣ ̣ ữ ử ́ ườ ng giao thông,....

SV: Trân Văn Phong

̀ ̀ ̣ ̣ ̉ ́ ̣ ́ ̀ ̃ ̀ ́ ̀ ̀ ̉ ư ̣ ̀ ́ ̉ ́ ̣ ̀ ̀ ̣ ́ ̀ ̣ ng ranh gi ườ ớ ̣ ́ ́ ̀ ̀ ́ ́ ́ ̣ i han ranh gi ng gi ̀ ườ ớ ́ ̀ ́ ̣ ̉ ̀ ́ ̀ ̀ ̣ ̀ ́ ̀ ̣ ̉ ̣ ̣ ̣ co toa đô (trong môt hê truc toa đô nao đo). Ng minh hoa cho môt thanh phô,môt tram xăng,môt tr t ượ cua điêm đo (minh hoa cho cai gi) ma ng nhiêu biêu t ̉ ượ Mapinfo đ ượ la môt vât thê hinh hoc không co chiêu rông nh ng co chiêu dai. c goi la đoan Đ ng trong Mapinfo bao gôm cac thanh phân nho đ (segment). Gi a hai đoan liên nhau goi la nôt (node). Cac điêm nôt nay cho phep ta chinh s a cac đ c s dung đê minh hoa cho môt con sông, môt đ ̣ ườ ̀ la môt vât thê co diên tich.Vung cung bao gôm cac thanh phân nho la đoan va cac điêm nôt nh ng đoan đâu tiên va đoan cuôi cung găp nhau nên i đo co diên tao ra môt đ ng khep kin va phân phia trong đ ̣ ườ ́ i cua vung đo. Vung th c chât tich. Vung co chu vi la đ ự ớ la môt hinh đa giac.Vung đ ̣ c s dung đê minh hoa cho môt quân, môt ượ ử tinh,môt cai ao,... ̉ ̣ ́

12

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

Hinh 2.1: Minh hoa cac kiêu đô hoa chinh trong Mapinfo ̀ ̣ ́ ̉ ̀ ̣ ́ ng (object). c goi la cac đôi t ượ ́ ượ ́ ̀ ̣ ̣ ̀ ́ i lam ban đô sô cân phai biêt cach sô hoa nh ng thông tin đia ly t ữ ́ ừ ườ ̀ ̉ ̀ ́ ̀ ̉ ́ ́ ́ ́ ̣ ̉ ư ̀ ́ ̀ ̉ ̀ ́ ́ ́ ́ ̣ ́ ́ ̣ ́ ́ c băng măt th ứ ́ ượ ̀ ́ ̀ ̀ ́ ̉ ̀ ́ ̀ ̣ ̉ ́ ư ̣ ̉ ̣ ̀ ́ ̀ ́ ́ ́ ̀ ̣ ̀ ̀ ̣ ̉ ̀ ̉ ượ ́ ̉ ̀ ̣ ̀ ́ ̀ ̣ ́ ́ ̣ ̀ ng trên môt ban đô ti lê nho thi đ ươ ườ ̀ ượ ̉ ̣ ̣ ̉ ̀ ̉ ̣ ̉ ̣ ̣ ớ ườ nh vây,môt con đ ự ư ̣ ng, nh ng trên môt ban đô ti lê l n thi con đ ư ̀ ̉ ̣ ̉ ̀ ̉ ̀ ̃ ́ ̀ ̣ ng băng đôi t ́ ượ ́ ́ ̣ ̀ ́ ̀ ̣ ́ ́ ̣ ̀ ̣ ̉ ̀ ớ ượ ̀ ̀ ̣ ̉ ́ ́ ̃ ̀ ́ ư ̣ ́ ́ ̣ ̉ ̀ ̉ ̣ ̀ ́ ớ ́ ứ ́ ớ ́ ượ ườ ờ ́ ̣ ̣ ́ ̉ ̀ ữ ̀ ́ ̉ ̉ ̣ ́ ́ ̣ ̀ ̉ ứ ử ớ ́ ́ ̉ ̉ ̀ ́ ̣ ́ ớ ở ̉ ̀ ́ ̉ ̀ ̣ ̀ ̣ ̣ ́ ̣ ́ ̀ ́ ̉ ̉ ư ̀ ̣ ờ ̣ ̀ ́ ̉ ̀ ̉ ̀ ́ ́ ̀ ờ ́ ̀ ̃ ̀ ̉ ̀ ́ ́ ́ ̀ trên d ứ ự ́ ớ ướ ̣ ̣ ́ ̀ ́ ̀ ̉ ́ ́ d ̣ ớ ở ̃ ́ ̀ ̀ ́ ̣ ớ ượ ̀ ̉ ́ ̣ ̣ ̣ c m luôn luôn co môt l p măc đinh đ ư ̣ ớ ớ ̀ ́ ́ ́ ̉ ́ ́ ử ư ̉ ̀ ̀ ́ ̣ ̉ ̀ ̣ ̀ ́ ̉ ̉ ượ ̀ ớ ́ ̉ ̀ ̣ ̃ ̉ c l u d ̀ ớ ng đên cac l p ban đô khac ́ ớ ̉ ượ ư ớ d ́ ở ướ i dang đ ượ ữ ở ̣ ớ ̀ ̀ ́ ̣ ̀ ̉ ̀ ướ ượ ử ̀ ̣ ̣ ̀ ̀ ̉ ̀ ́ ́ ̣ ̣ ư c s dung trong viêc trinh bay ban đô khi in ân, vi du nh ng trong l p nay không co phân d ́ ượ ớ ́ ́ ̉ ̀ ̀ ̉ ̀ ́ ̀ ́

Cac thông tin đô hoa trên Mapinfo đ ban Ng đô giây vao ban đô sô sao cho đung cach.Vi du nh khi noi đên môt cai ao co thê ̉ “nhin” thây (t c la thây đ ng trên ban đô giây hinh dang cua cai ao ườ ̣ môt ti lê nao đo) thi ta sô hoa no thanh môt vung, nh ng khi lam môt ban đô ti lê ở ̣ c minh hoa thanh môt rât nho thi ta lai không nhin thây hinh dang cai ao đo nên đ ng t điêm.T c minh hoa ng se co chiêu rông, băng kiêu đ ườ luc đo ta minh hoa con đ ng co chiêu rông,luc đo ta minh hoa con ườ đ ng kiêu vung... ng băng môt đôi t ́ ượ ườ c quan ly theo l p (layer), co nghia la cac Phân đô hoa trong Mapinfo đ c tô ch c theo t ng nhom,vi du nh trên ban đô cua môt thanh thông tin đia ly đ ừ phô, ta co l p đ ng xa, l p quân, l p đia danh, l p sông suôi... Nh kha năng nay ớ ớ ma ta co thê hiên thi thông tin theo y muôn.Khi muôn s dung nh ng thông tin nao ta ́ ử co thê m nh ng l p thông tin đo ra. C a sô ban đô co thê ch a môt hay nhiêu l p ̀ ớ ữ ̉ ở c m . Nêu cac l p ban đô thuôc cung môt vi tri đia ly thi co thê hiên ban đô đang đ ượ giây kinh thi chông lên nhau. Ta co thê hinh dung môi l p ban đô nh la môt t ̃ ớ ̉ giây kinh chông lên nhau đê (transparency) co hinh ve va ban đô giông nh nhiêu t ư ́ c săp xêp theo th t tao ra môt cai nhin cuôi cung. Cac l p ban đô đ i, co ̀ ượ trên che khuât nh ng phân chung.Ngoai ra phia trên i bi l p nghia la l p ữ ̀ ớ ở ướ cung cac l p ban đô đ c goi la l p ̀ ớ ở ̀ ượ ́ ớ Cosmetic (Cosmetic Layer).L p nay giông nh môt l p nhap, ta co thê đanh dâu chinh s a vao l p nay va thêm b t cac vât thê đô hoa vao no nh ng không anh i. Nh ng vât thê đ h c ve thêm vao l p ban ưở c m hoăc l u thanh môt l p ban đô riêng. đô nay co thê đ ư L p ớ Cosmetic con đ thêm cac chi tiêt đê trinh bay ban đô. Cac đôi t ̀ ữ liêu.̣ 2.1.1.2 D liêu trong Mapinfo

ữ

SV: Trân Văn Phong

̣

13

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

ng đô hoa,ban đô sô trong Mapinfo con co d liêu đ ̀ ̀ ̀ ̣ ̉ ̀ ́ ̀ ̣ ử ̀ ử ̉ ữ ̣ ử ̉ ượ ̉ ̣ ̣ ̉ ̣ ̣ c hiên thi trên môt bang va chung đ ữ ượ ượ ̉ ̣ ̣ ̉ ̀ ́ ́ ́ ư ́ ữ ữ c câu truc theo d liêu t ̣ ươ ̉ ở ́ ̣ ́ ̀ ̃ ́ ̀ ử ̉ ở ̣ ́ ́ ̣ ̣ ́ ́ ườ ư ữ ̉ ̣ ̀ ̉ ̣ ớ ̃ ử ̣ ́ ̉ ̉ ̣ ̉ ̉ ̀ ̣ ̀ ữ ̉ ữ ̀ ử ̉ ̉ ̉ ̀ ̀ ́ ́ ́ c goi la tr ̣ ớ c xêp theo chiêu doc đ ượ ́ ̀ ̣ ̣ ̃ ̣ ̉ ́ ớ ́ ượ ̣ ̣ ̣ ̣ ́ ̉ ̉ ̀ ́ ́ ̣ ̉ ̀ ́ ̉ ̉ ̣ ̉ ̣ ́ ̉ ́ ́ ̣ ̉ ̣ ́ ̉ ̉ ́ ̃ ̣ ̣ ́ ̣ ̣ ̣ ́ ̀ ̣ ̣ ́ ư ườ ứ ng. Tên tr ườ ̉ ̃ ̉ ̣ ̣ ́ ng ta không đ ng cung nh thay đôi đinh dang cac tr c nên khi tao tr ượ ườ ̉ ̣ ́ ̣ ̃ ́ ́ ̣ ̀ ng. Trên cung c a sô d liêu co tiêu đê côt (in đâm), t c tên tr ứ ườ ườ ̀ ̣ ́ ̀ ̣ ̣ ́ ̀ ử ̉ ữ ̣ ̀ ̉ ́ ̃ ̀ ́ ̣ ̣ ̣ ̣ ́ ̉ ́ ̣ ́ ̉ ̣ ̉ ̣ ́ ̀ ̀ ̃ ̣ ̉ ̣ ử ́ ượ ử ̉ ̀ ̣ ̉ ̉ ̀ ́ ́ ́ ̃ ̀ ̣ ng đô hoa va d ̉ ữ ử ̉ ̀ ́ ̀ ̣ ̀ ̣ ̀ ̣ ở ử ̣ ̀ ̀ ̀ ́ ́ ̉ ̣ ̉ ̀ ́ ́ ̣ ớ ̉ ữ ̀ ử ử ̀ ̣ ̣ ̉ ̉ ̀ ̀ ́ ̀ ̣ ̣ ̣ ử ́ ̉ ́ ̣ ̣ ̣ ̣ ̉ ̀ ̣ ̉ ̉ ̀ ̣ ̉ ữ ươ ử ứ ử ̉ ̉ ̣ ̀ ̉ ̣ ng trên c a sô ban đô đ c chon va ng ̀ ượ ượ ̃ ̣ ̣ ́ ượ ́ ớ ́ ̣ ̉ ̀ ́ ̀ ̣ ̣ ̀ ̉ ̣ ̉ ̉ ̀ ́ ̣ ̉ ̀ ́ ́ ượ ̣ ớ ̣ ̀ ́ ̀ ̣ ̉ ̀ ̀ ̣ ̣ ̣ ng đô hoa trên môt l p ban đô la môt “côt” đ object column hay obj column),vi côt đo không hiên thi đ ng” ( ̀ ử ư ̀ ượ ̣ ượ ̣ ̀ ̣ ́ ̉ ượ ̣ ̉ ̣ ̉ ̉ ̀ ̀ ̣ ng trong c a sô ban đô đ ư ̉ ̀ ́ ̣ ́ ̉ ̉ ̀ ượ ử ượ ư ̣ ̣ ̣ ̉ ̀ ̃ ̣ ̀ ̣ ̉ ̣ c goi la môt bang ( ́ ượ ữ ̣ ̀ ̉ ̉ ̣ ̃ ̀ ̣ ̣ ̣ ̉ ̀ ̣ ̉ ̉ ́ ̉ ́ ̣ ́ ́ ́ ̀ ̀

SV: Trân Văn Phong

ườ ư ́ ̣ ̀ ̉ ̣ ̉ ̉ ữ ̣ ơ ̀ c goi la c trong c hiên thi riêng trong c a sô ban đô. Vi Mapinfo quan niêm c coi ử table). Mapinfo s dung ́ ng) trong môt ban đô sô. ng. Luc đo chung hoan toan ng, kiêu d liêu cua Excel hay Access. C a ử ́ native) hay d liêu cua cac ữ ̉ ữ ̣ ́ ̉ ̣ ̉ ̉ ̣ ̉ c đăng ky vao Mapinfo. ̀ ữ ư ượ ư ̣ ̣ ́ ́ ̀ ́ ượ ử ử ́ ́ ́ ̀ ̣ ̉ ̉ ̀ ́ ữ ữ ̉ ̀ ́ ̣ ́ ̣ ́ ̣ ̉ c x ly trong cac tr ̉ ử ̀ ữ ườ ữ ́ ́ ̣ ̣ ̀ ̉ ượ ư ̉ ̀ ̀ ̣ ́ ̣ ́ ̉ ̣ ̀ ̃ ̉ ̀ ư ̀ ̀ ̉ ̀ ̉ ̣ ́ ̀ ́ ̣ ̣ ̀ ườ ̀ ́ ̉ ́ ̃ ́ ̉ ́ ̉ ̉ ̀ ượ c Ngoai phân đôi t ́ ượ c goi la c a sô Brower(c a sô d liêu). D liêu trong hiên thi trong môt c a sô đ ng t Mapinfo đ ự ́ ữ cac kiêu d liêu khac nh Excel,Access,.... Ngoai ra Mapinfo cung co thê m cac d ̉ ữ liêu khac. Ta co thê m môt tâp tin Excel hay Access trong Mapinfo va x ly chung nh nh ng bang d liêu binh th ng cua Mapinfo. Môi c a sô d liêu co thê hiên thi thông tin cua môt l p ban đô hay môt phân ́ cua môt l p ban đô. C a sô nay bao gôm cac ô giông nhau nh bang tinh Excel. Cac ư ̉ ô đ ng(field) hay côt (column). Môi côt hiên ̀ ườ ̣ ượ thi môt loai thuôc tinh cua đôi t ng trên ban đô sô, vi du đôi v i ban đô cac tinh cua Viêt Nam chăng han, ta co thê co cac côt tên tinh,diên tich tinh,chu vi tinh,dân sô,... ́ Môi môt côt co môt đinh dang khac nhau tuy theo nôi dung ch a trong côt đo. Ta co thê thêm hay b t tr ng không ớ ườ c go dâu tiêng Viêt vao tên hiên thi tiêng Viêt đ ̣ ượ tr ng. Cac hang ̉ ữ ử c goi la ban ghi (record). Bên trai môi hang co môt ô vuông. trong c a sô d liêu đ ̣ ượ Khi s dung công cu chon, ta co thê nhăp chuôt lên ô vuông đo đê chon ban ghi đo. ́ ử ̣ c chon ô vuông biên thanh mau đen. Môi môt ban ghi liên kêt v i môt vât Khi đ ́ ớ ượ ng đô hoa trên c a sô thê đô hoa trên c a sô ban đô,hay noi cach khac môi đôi t ̉ ̀ ữ ban đô co thông tin năm trên môt hang trong c a sô d liêu. Đôi t ́ ượ ̉ liêu la hai thanh phân thông nhât cua môt ban đô sô trong Mapinfo. Nêu m c a sô đô hoa va c a sô d liêu cua môt l p ban đô cung luc thi khi s dung công cu chon, ́ ta co thê nhăp chuôt lên chon môt vât thê đô hoa trên c a sô ban đô. Khi môt dôi ng ng trong c a sô d liêu c chon thi ban ghi t t ̀ ượ ượ cung đ c lai. Nêu ta quan niêm ban đô sô nh la cac l p đôi t ng đô hoa thi c a sô d ư ̀ liêu la thông tin cua vât thê trên ban đô. Nêu ta quan niêm ban đô sô nh la môt c s d liêu thi cac đôi t ở ữ “côt đôi t ́ ượ c a sô d liêu nên đ ử ̉ ữ ử ban đô sô nh môt c s d liêu v i cac đôi t ́ ượ ớ ̣ ơ ở ữ nh môt “ côt” nên môt ban đô cung đ thuât ng nay đê chi ca d liêu lân đô hoa(“côt” đôi t ̉ ữ Môt bang cua Mapinfo co thê không co “côt” đôi t ́ ượ giông nh môt c s d liêu binh th ữ ̣ ơ ở ữ sô d liêu co thê la d liêu nguyên thuy cua Mapinfo ( đinh dang khac (nh Excel, Access,...) nh ng đ ̉ c x ly trong c a sô Nh ng tinh chât liên quan đên đô hoa cua ban đô sô đ ban đô. Nh ng thông tin liên quan đên d liêu (tên,dân sô,thuôc tinh,đăc điêm,...) ữ ng cua c a sô d liêu. Nh ng thông tin vê d liêu nay co đ ́ ̉ ữ ượ ử ́ c đ a lên ban đô băng môt sô lênh khac nhau đê minh hoa lam ro ban đô luc thê đ trinh bay ban đô đê in hoăc tiên hanh phân tich nh môt hê c s d liêu binh ̣ ơ ở ữ ượ c phan anh trên c a sô ban đô. Ng th c ử ̉ ượ c câp nhât vao d liêu băng môt sô lênh. lai môt sô thông tin trên ban đô co thê đ ng va kêt qua phân tich cung co thê đ ̉ ượ ̀ ữ ̣ ̣ ́ ̉ ̀ ́ ̣ ̣ ̣ ̀ ̣ ́ ̣

14

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

i dung co thê m c a sô ban đô hay c a sô d liêu hoăc m ườ ̉ ở ử ̉ ữ ở ̀ ̀ ̉ ̀ ́ ̉ ̉ ̀ ̣ ̣ ́ ữ ̉ ̀ ̀ ̣ ́ ̉

- Menu chinh́

̣ Tuy nhu câu cua ng ử ca hai. Ngoai ra con môt sô loai c a sô khac n a trong Mapinfo. ̣ ử 2.1.1.3 Giao diên Mapinfo Khi kh i đông Mapinfo trên man hinh co cac thanh phân chinh sau: ở ̣ ̀ ̀ ́ ́ ̀ ̀ ́ : gôm cac menu lênh chinh cua Mapinfo la ̀ ́ ̣ ́ ̉ ̣ ́ ̀ c kich hoat), ượ ̣ Window, Help. ̉ ̀ ́ : Co 3 thanh công cu chinh la ̀ ử - Thanh công cụ ́ ̣ ́ ng đ ườ ̀ Standard, Main, Drawing c s dung trên ượ ử ̀ ́ ̣ ̣ ́ ́ ̀ ́ ̣ ́ ́ ̀ ư ̣ ử ́ ̉ ̣ ̉ ̀ ́ ̣ ̉ ́ ̣ ̉ ̉ ́ ớ ̉ ̀ ̀ ̣ ̉ ̃ ̀ ́ ́ ̣ ́ ̣ ử ̀ ̉ ̀ ̀ ̣ ̉ ̉ ̀ ̀ ́ ̀ ́ ̀ ̣ ̣ DBMS.Đây la thanh công cu cho ư ̣ ữ ữ ́ ́ ̀ ́ ̣ ̉ ́ ̣ ́

ướ ử ̀ ̉ ̀ ̣ ́ Status Bar). Thanh c kich ̉ ử ư ̀ ượ ̀ ́ ̃ ̣ ̉ ́ ̀ File,Edit,Tool, Object, Query, Table, Options,Map/Browse (hay môt menu khac, tuy vao c a sô nao đang đ Thanh công cu ̣ Standard gôm cac lênh th cac menu chinh. ̀ Thanh công cu ̣ Main gôm 23 nut lênh liên quan đên cac thanh phân chinh cua môt ban đô sô nh lênh chon, chinh thiêt lâp c a sô ban đô, ̀ biêu đô/đô thi, kiêm soat l p,... Thanh công cu ̣ Drawing bao gôm cac nut lênh liên quan đên viêc ve va chinh s a phân đô hoa cua ban đô. Ngoai ra nêu con co thanh công cu phep liên kêt va thao tac d liêu cua cac hê d liêu khac nhau nh Access, SQL Server,... D i cung c a sô Mapinfo la thanh trang thai ( nay cho biêt thông tin cung nh tinh trang cua c a sô đang đ hoat.̣

- Kh i đông Mapinfo, c a sô - Chon

Hinh 2.2: Giao diên Mapinfo ̀ ̣ ở ở ̣ ̉ ̀ ̀ ̉ ̀ ̣ ̉ ̀ ́ ̀ ́ Ta m môt ban đô la ban đô Viêt Nam. Bang nay co tên la vietnam. Cach m nh sau : ư ử ̣ ̣ ớ ̣ Open a Table > Open, vao th muc ch a tâp tin ̉ Quick Start hiên ra. ứ ư vietnam.tab rôì ̀ ̣ ̣ ̣ ́ ̀ ́ ở ̉ ữ ̀ ượ ̃ ́ ̉ ̉ ̉ ́ ̣ ̣ ử ̉ ữ c m ra. Đê thây c a sô d liêu ta chon ử ̀ vietnam ̣ ̉ ̉ ̣ Open. chon no va tiêp chon Ta se thây c a sô ban đô đ ử Window > New Browser Window, c a sô d liêu cua ban đô đ ượ ̀ ̀ ử ́ ̉ ́ ̀ ̣ ́ c kich hoat. C a sô đ ờ ̉ ượ ̉ ượ ̣ ử ử ̀ ̣ ̉ ̉ ́ ́ ̣ ́ ̣ ̉ ̀ ̀ ̀ ̣ ̣ ̀ ̀ ́ ̉ ́ ̀ ́ ̣ ̀ ượ ữ ử ̉ ́ ̣ ́ ̀ ́ ́ ̣ ̉ ử ̉ ừ ̉ ̉ ̀ ̀ ́ ́ ̣ ̀ ̀ ́ ̣ ữ ử ự ử ̉ ́ ̣ ̉ ́ ̣ ̉ ̀ c kich hoat. C a sô kich hoat luôn năm trên cung. ượ ́ ̣ ̉ ́ ̣ ̀ ̀ ̣ ̀

c m ra (Hinh 2.2). ở Ta co thê m nhiêu c a sô khac nhau cung môt luc trong Mapinfo. Tuy nhiên ̉ ở ̀ ử vao môt th i điêm chi co môt c a sô đ c kich hoat la c a sô mau xanh trên thanh tiêu đê (mau măc đinh, mau nay co thê khac tuy thiêt lâp mau ̣ ử c kich hoat co mau xam. Ta kich hoat môt c a trên HĐH), nh ng c a sô không đ sô ban đô băng cach nhăp chuôt vao thanh tiêu đê cua c a sô t menu chinh chon Window > . Nh ng thao tac ta th c hiên chi tac đông lên c a sô nao đo ́ đang đ ử 2.1.2 NGÔN NG LÂP TRINH MAPBASIC Ữ 2.1.2.1 T ng quan vê Mapbasic

ổ

̀

SV: Trân Văn Phong

MapBasic là ngôn ng l p trình trong môi tr ữ ậ ườ ứ ủ ạ tăng thêm s c m nh c a MapInfo lên nhi u l n. Nó làm cho t MapInfo và làm cho các h th ng GIS làm b ng MapInfo tr nên th ề ầ ằ ệ ố ng MapInfo. MapBasic làm ượ c ng m i hóa. ạ đ ng hóa đ ự ộ ươ ở

15

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

ằ ể ổ ớ ề ọ ộ ộ ớ ệ ể ạ MapBasic đ B ng MapBasic, chúng ta có th làm thay đ i hay làm m i hoàn toàn các thanh menu, các h p h i th ai c a MapInfo. Đi u này có nghĩa là, v i MapBasic, ủ chúng ta có th t o ra các giao di n h t s c thu n ti n cho MapInfo. ệ ế ứ ở ặ ắ ủ Basic chu n, và nó r t g n gũi c phát tri n t ậ c đánh giá cao b i các tính năng đ c s c c a nó, nh : ể ừ ượ • MapBaic d h c, vì nó đ ễ ọ ư ấ ầ ượ ẩ

ằ ế ề ể ậ đ ng các thao tác. Trong th c t ể ự ế ệ ề ệ ổ ế ư ộ ủ ồ ộ ạ ụ ơ ấ ự ợ ể ể ệ ượ ệ ủ ặ ằ ố ườ ề ờ ớ ố ng nh con đ ư ộ ố ượ ỉ

• MapBasic là công c h u hi u đ truy v n d li u. Ch ng h n, các m nh ệ ữ đ Select c a MapBasic không nh ng v n gi ủ ề ng ti n truy SQL mà còn đ c phát tri n thêm v i các đ i t ệ v n c a MapBasic cho phép chúng ta l c, s p x p, t ng h p d li u b n đ theo ồ ả ấ ủ các yêu c u c a chúng ta. ầ ủ

ẽ ụ ữ v i Visual Basic. ớ • Kh năng t đ ng hóa MapInfo: N u thao tác MapInfo b ng "tay" chúng ta ự ộ ả ề t n nhi u công s c h n là khi dùng MapBasic đ l p trình cho MapBasic đi u ơ ứ ố khi n MapInfo th c hi n t , nhi u công vi c làm ệ ự ộ ự trên MapInfo không th th c hi n n i n u nh không có s tr giúp c a MapBasic. ể ự c v t c a m t lu ng khói khi M t ví d đ n gi n, chúng ta không th th hi n đ ả t l p trình b ng MapBasic ho c chúng ta t n khá nó ch m đ t, n u không bi ế ế ậ ng, sông su i.... V i MapBasic nhi u th i gian đ v m t đ i t ể ẽ ộ ố ượ ng nh th . ch trong nháy m t b n đã v xong m t đ i t ư ế ắ ạ ẳ ấ ữ ệ nguyên s c m nh c a ngôn ng ạ ể ẫ ạ ủ ươ ệ ữ ớ ượ ể ứ ng b n đ . Các ph ồ ữ ệ ợ ữ ố ượ ế ắ ả ổ ọ

• MapBasic là m t ngôn ng l p trình m . MapBasic có kh năng liên k t ế ả d ng DDE (Dynamic Data v i các ph ớ Exchange). Chúng ta cũng có th s d ng OLE Automation cùng v i MapBasic. ng trình MapBasic có th g i và s d ng các file th vi n liên k t đ ng Các ch ế ộ ử ụ ạ ng m i c a Windows (các file.DLL). Các file.DLL này có th đ ủ b i Windows hay do chúng ta hay ai đó vi t trên các ngôn ng khác nh C, Delphi, ở Visual Basic.

ộ ữ ậ ng ti n l p trình khác, có th s ậ ệ ươ ở ể ử ụ ớ ể ử ụ ể ọ ư ệ ươ ể ượ ươ ấ c cung c p th ư ữ ế

• MapBasic cho phép chúng ta tích h p thi Basic hay C.delphi v i các ch c năng c a MapInfo.

t k b n đ v i s liên k t Visual ợ ế ế ả ồ ớ ự ế ủ ớ

• Cũng nh các ngôn ng m nh khác ch y trên n n Windows, MapBasic cho ng trình ng d ng khác khi nó đang ch y. Và sau khi ch y ạ ủ c đó c a ả ạ ứ

ư ề ạ ươ ự ụ ứ ữ ạ ứ ng trình ng d ng này thì nó hòan tr l ng tr ạ i môi tr ườ ướ ụ ươ phép th c thi các ch xong các ch MapInfo. i, n u ch bi ỉ ế ạ ế t MapBasic sau khi đã bi t MapInfo thôi thì ch a đ . ư ủ ầ ế ữ t MapInfo là yêu c u không th thi u v i nh ng ế ể ớ

Tóm l Bi ế ai làm v GIS. ề 2.1.2.2 N i Dung ộ

ộ a. Biên t p m t ch ậ ng trình ậ ng trình MapBasic ươ ấ t các dòng l nh MapBasic ệ ế ng trình, MapBasic s t đ ng thêm ươ ẽ ự ộ ể ph n m r ng cho tên file là.mb ươ Nh p New đ m c a s biên t p ch ể ở ử ổ Vi Chon m c File -> Save đ ghi file ch ầ Ch n m c Project -> Compile đ d ch ch ng trình. Ch ng trình đã đ c d ch ể ị ươ ươ ượ ị

SV: Trân Văn Phong

ọ có ph n m r ng cho tên file là.mbx ầ ng trình MapBasic: b. Ch y ch ạ ụ ở ộ ụ ở ộ ươ

16

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

ộ ử ổ ộ ụ ọ ẽ Trong Mapinfo, ch n m c Run MapBasic Program. M t c a s h i thoai s ệ ươ ể ạ ng trình. c 2, n u b n Compile ngay ch ng trình thì MapBasic s ế ươ c đ t tên tr ầ ế ặ ạ ồ ng trình. N u đã đ ượ ng trình, r i nó m i compile cho b n. ớ ươ ọ ự ộ đ ng ụ ạ ẽ c đó thì ướ ạ c Save, n u b n ch n m c Project -> Run thì MapInfo t ế ng trình MapBasic. ở Víd : t dòng l nh MapBasic sau đây: ế xu t hi n đ b n ch n file mbx đ ch y ch ể ạ ấ ọ Chú ý: (1)- Sau b ạ ướ yêu c u b n đ t tên cho file ch ươ ặ ạ MapBasic s yêu c u b n Save file ch ầ ẽ (2)- Sau b ướ m ra đ ch y ch ươ ể ạ c 2, b n vi b ệ ạ ụ ở ướ Note "Welcome to MapBasic!"

c d ch s có file WELCOME.MBX ẽ ạ Và ghi vào file v i tên: WELCOME.MB ớ Thì sau khi file WELCOME.mb đ ượ ị Và b n ch n file.mbx đ Run là WELCOME.MBX ể c. Liên k t các modun đ có m t ch ể ọ ế ươ ạ ộ Các file modun là các file MapBasic ch ch a m t ph n c a ch ầ ủ ươ ộ ng trình, ví d ư ủ ụ ủ ộ ng trình MapBasic d ng.mbx: ụ ỉ ứ trong n i dung c a nó có Declare Sub m t th t c nào đó có tên là A, nh ng trong ộ n i dung c a nó b n ch a m th t c A là ộ ở ủ ụ ư ạ

c d ch không chuy n đ c thành file mbx mà thàmh file mbo.

ấ ể ượ ươ ng trình ng trìng sau: t đo n ch ạ ậ ươ ế ủ Sub A() ... End Sub File này khi đ ượ ị Nh p New đ m c a s biên t p ch ể ở ử ổ Trong c a s Edit vi ử ổ [LINK]

Application=textbox.mbx Modulee=textbox.mbo Modulee=auto_lib.mbo s b n đã có trên đĩa 3 file textbox.mbx và textbox.mbo và auto_lib.mbo)

ớ ầ

ể ọ ể ị ủ ể (Gi ả ử ạ Ch n File > Save. V i ph n m r ng là.mbP (MapBasic Project) ở ộ ọ Ch n File > Close ọ Ch n Project > Select Project File đ ch n file.mbP ọ Ch n Project > Link Current Project đ d ch file MBP này thành.mbX ọ e. Tên file và ki u file c a MapBasic: Có các l ai t p tin sau đây: ậ i c a t p tin ậ ỗ ủ ậ

SV: Trân Văn Phong

ạ ng Basic ườ ứ ị ẩ ẩ ớ ọ erros.doc là t p tin text, nó listing các mã l mapbasic.exe là t p tin ch y môi tr ậ mapbasic.def là t p tin include, nó ch a các mã đ nh nghĩa chu n. ậ Menu.def là t p tin include, nó ch a các mã chu n liên quan v i menu. ứ Icons.def là t p tin include, nó ch a các mã chu n liên quan v i con tr ứ ậ ậ ẩ ớ ỏ chu t. ộ ậ i nó. ỡ ự ộ t ự ớ ng t Mapbasic.hlp là t p tin help on-line (giúp đ tr c tuy n) ế Mapbasic.h là t p tin header c a C/C++, có n i dung t ng t ơ ủ ủ mapbasic.def trên, nh ng dùng cú pháp c a Mapbasic.def t p tin t ư ự ậ ậ ươ C/C++ Mapbasic.bas là t p tin header c a Visual Basic, có n i dung t ng t i nó. ủ ậ ộ ươ t ự ớ

17

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ệ

ồ

Đ án t ố ngh thông tin ệ

Mapbasic.def t p tin t ng t ậ ơ ự ủ mapbasic.def trên, nh ng dùng cú pháp c a ư Visual Basic

ậ Mapbasic65.isu t p tin c n cho uninstall MapBasic ầ ộ Mbres650.DLL là t p tin th vi n đ ng ch a tài nguyên g m chu i và h p ứ ệ ậ ỗ ồ ộ tho iạ c ệ ượ ầ ủ ứ Milib650.DLL là ph n c a software, ch a các mã th c hi n đ ề Papersize.def là t p tin include c a MB, ch a các l nh liên quan đ n đi u ự ệ ứ ủ ế ậ khi n in c a MapBasic ủ ể ậ ỗ ủ ủ ng trình ví d c a các file.mb và.mbp ươ i c a MapBasic Errors.doc t p tin text listing các mã l Usrinfrnb.log ch a nh t ký c a quá trình cài đ t ặ ậ ứ Samples là th m c ch a các ch ụ ủ ứ ư ụ f. C a s MapBasic trong màn hình MapInfo ử ổ Khi b n nh p Choose Options > Show MapBasic Window thì m t c a s ộ ử ổ

i màn hình MapInfo. ỏ ề ể ọ ấ ở ữ ạ ư ứ ớ ớ ạ ự ng trình MapBasic đ ươ ằ ơ

ệ t ch ế ạ ệ ạ ủ ạ ấ ạ MapBasic xu t hi n bên d ướ ệ ấ i d ng c a s này đ h c h i v MapBasic r t nhanh. B i vì h u ầ B n có th l ử ổ ể ợ ụ ệ nh nh ng thao tác c a b n v i MapInfo đ u t ng ng v i các dòng l nh ề ươ ạ ủ MapBasic hi n ra ngay sau khi b n th c hi n nh ng thao tác đó. Đó cũng là cách ữ ệ c nhanh h n (b ng cách copy và paste đ b n vi ượ ể ạ nh ng đo n l nh MapBasic hi n ra trong c a s này vào ch ng trình MapBasic ươ ử ổ ệ ữ đang so n c a b n). C a s này còn có m t vài công d ng khác s đ c trình bày ph n sau. ẽ ượ ở ầ ử ổ ụ ộ

ng trình ậ ươ i cú pháp thì khi compile ch ng trình, Mapbasic ng trình b n có l ỗ ươ i khi biên t p ch ạ ươ

i: g. Tìm l ế s báo l ẽ Ví d đo n mã l nh sau đây có l ệ ỗ N u ch i. ỗ ụ ạ ỗ

note str$(x)

Dim x as string For x=1 to 10 next End Sub ng trình v i tên: first.mb. Thì khi compile ch ng trình, b n s ớ ạ ươ ạ ẽ ươ

ỏ ẽ ở

ấ ế ể ề ấ ả

ể ế ể ồ ị

và b n ghi file ch i: b báo l ỗ ị first.mb: 4: Loop control variable not numeric ạ dòng For và báo cho b n N u b n nh p đúp vào first.mb: 4 thì con tr s nháy ế ạ bi i là bi n đi u khi n không ph i ki u numeric. B n cũng có th nh p vào t l ể ạ ế ỗ Search > Goto line, r i gõ giá tr 4 trong h p Goto line number đ tìm đ n dòng có ộ iỗ l

SV: Trân Văn Phong

h. M t vài l nh c b n ệ ơ ả ộ

18

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

1. L nh v đi m Create Point

Nhìn chung ngôn ng MapBasic t ữ ể ớ ố ố ng đ i gi ng v i Visual Basic, đ có th ộ ệ c, chúng ta có th tham kh o qua tài ể ể ả ế ượ ệ ố ị i thi u m t s l nh v c b n đã đ c a tác gi ủ ẽ ơ ả ộ ố ệ ỉ ớ ầ ệ ể ươ trình bày các hàm, các câu l nh trong MapBasic thì trong m t bài báo cáo không li u ệ L p trình th trình bày h t đ ậ ả GS. TSKH MapBasic cho H th ng thông tin đ a lý GIS MapInfo ắ Chúng em ch gi Tr n Văn Đ c. ượ ứ c ng d ng trong đ t th c t p. S ợ ụ ệ ự ậ ẽ ể

Create Point (x, y)

[ Symbol... ]

ọ ộ ể ệ ủ ể

c c a ký hi u. ướ ủ ệ ệ ệ Trong đó (x, y) là t a đ đi m c n v , [Symbol... ] là ký hi u c a đi m ầ ẽ Ví d : ụ Create Point (1000000, 3000000) Symbol MakeSymbol (34, Reb, 18) 34 là ki u ký hi u, Red là màu ký hi u, 18 là kích th ể ng CreateLine 2. L nh v đ ẽ ườ ệ Create Line (x1, y1) (x2, y2)

ố ủ ể ạ ạ ng, màu đ ng. ọ ộ ể ườ ể ườ ườ [ Pen... ] Trong đó (x1, y1) là t a đ đi m đ u đo n, (x2, y2) là đi m cu i c a đo n. ầ [Pen] là ki u đ ng, đ r ng đ ộ ộ Ví d : ụ Create Line (73. 5, 42.6) (73. 67, 42.9)

Create Region, v cung tròn ẽ ệ ể Create ẽ . ả phân Help cua MapBasic ̀ ̉

Ự

̀ NG TRINH ƯƠ

NG TRINH Ự

̉ ̀ ̀ ự ươ ̉ ̀ ́ ́ ̣ ̣ ́ ̣ ̣ đây d c tiên ta cân xac đinh cac d liêu đâu vao va d liêu đâu ra. ̀ ữ ́ ữ ̀ ̀ ́ ̣ ̣ ̀ ̀ ̣ ̀ ươ ́ ứ Ở ́ ữ ̣ ̀ ̀ ̉ ̀ ̀ ́ ̣ ̀ ̣ ̣ ́ ứ ́ ̉ ́ ̣ ̣ ̉ ́ ̣ ̃ ̉ ́ ́ ̣ ươ ̣ ́ ̣ ̉ ́ ̀ ́ ̣ ́ ̣ ̉ ̀ ứ ữ ̀ ̣ ̀ ̀ ̀ ̣ ̣ ́ ̀ ữ ự ̣ ́ ̀ ̣ ̣ ̉ ́ ́ ̣ ́ ̣ ́ ́ ̀ ̀ ̣ ́ ̣ ̀ ́ ̣ ̀ ̀ ̉ ́ ́ ̣ ̀ ̣ ừ ́ ́ ̉ ̣ ́ ̉ ̣ ̣ ́ ̉ ́ ̉ ́ ́ ̣ ̀ ̣ ̣ ́ ̃ ́ ̣ ́ Ự ̣ ̣ ̣ ̉ ̣ ́ ̣ ̣ Nguyên Văn H ng taị Phong ướ ứ ̉ ̉ ̃ ̣ ̣ ự ̣ ̣ ́ ự ̀ ̀ ̣ ́ ̣ ̣ ́ ́ ̣ ̀ ng đo la tên tam giac (tên nay se đ ̃ ượ ườ ̀ ́ ́ ̀ ́ ̀ ̉ ̣ ̣ ̣ ̉ ̃ ườ ườ ́ ̀ ̀ ́ ́ ̣ ̉ ̉ ́ ̀ ̣ ́ ̣ ng la sô ky hiêu cua 3 đinh tam giac, môi tr c chon. Ky hiêu nay la sô th t ́ ứ ự ́ ượ ̣ ̉ ̉ ̣ ́ ̣ ̀ ̀ ̉

19

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

Pen MakePen(1, 2, BLACK) Ngoài ra còn có các l nh v đa giác Arc, Create Object… chúng ta có th tham kh o 2.2 XÂY D NG CH ƯƠ 2.2.1 TÔNG QUAN VÊ XÂY D NG CH ng trinh tinh biên dang xoay trong môt tam giac đia đông Đê xây d ng ch ữ l c nay tr ướ ự liêu đâu vao cua ch ̀ ng trinh la file sô liêu la môt file Excel co ch a cac d liêu vê ̣ cac điêm đo tôc đô dich chuyên trong đo tai môi điêm co ch a cac thông sô toa đô, ng Băc va Đông, sai sô vân tôc dich chuyên (Hinh vân tôc dich chuyên theo ph 3.3). Va thêm môt file đâu vao n a la file Excel ch a d liêu chon tam giac (Hinh ữ chon đê tinh biên dang cho nh ng i s dung t 3.4), file chon tam giac nay do ng ườ ử tam giac trong l i đo môt cach tr c quan nhât. ự ướ Trong hinh 3.3 la môt vi du vê file sô liêu đâu vao đê tinh biên dang, file nay bang “ Vân tôc chuyên dich tuyêt đôi cua cac điêm đo GPS trong khu lây sô liêu t v c nghiên c u tinh biên dang trong tai liêu luân văn tiên si “BIÊN DANG KIÊN ứ ự TAO HIÊN ĐAI KHU V C BIÊN ĐÔNG VIÊT NAM THEO SÔ LIÊU DICH CHUYÊN GPS” cua nghiên c u sinh ̀ Đia Đông L c – Viên Đia Chât. Trong hinh 3.4 la file chon tam giac đia đông l c cho tinh biên dang, File nay c thê hiên tai trong tâm cua tam gôm cac tr ng la môt ky hiêu cho giac) va 3 tr môt điêm cua tam giac đ trong file Excel cua file SV: Trân Văn Phong ̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

ng nay la không đ 3 tr ̣ ở ườ ̀ ̀ ́ ́ ́ ̣ ́ ́ ́ ̀ ̀ ư ̣ ̀ ́ ̣ ̣ ́ ́ ́ ̃ ̀ ̉ ́ ̣ ̀ ̀ ̣ ̀ ̀ ́ ̣ ng cua file chon tam giac la sô th t cua 3 điêm ́ ứ ự ườ ̉ ̣ ́ ̀ ̉ ượ c đâu vao cho tinh toan biên dang. Cac con sô ky hiêu TG_01 se la 3 điêm trung nhau.Vi du nh tai file chon tam giac, tam giac co tên BLV1, DOHO,KUNM trong file sô liêu đâu vao tao thanh. 2,4,7 la ky hiêu trong 3 ̉ BLV1, DOHO, KUNM trong tr file sô liêu đâu vao. ́ ̣ ̀ ̀

Hinh 2.3: File đâu vao theo sô liêu GPS Biên Đông ̀ ̀ ̀ ́ ̣ ̉

Hinh 2.4: ̀ ̣ ́ ̣ ̣ ứ ̉ ́ ́ ̣ ̣ ́ ̣ ̣ ư ̀ ự ự ̀ ̉ ̀ ̣ cac b ng trinh thi đâu tiên ch c nh trong muc 1.1.2.2(Ch ng trinh cân phai đoc hiêu đ ươ ́ ướ ươ ̀ ̀ ̀ ̀ ̀ ̉ ̣ ̣ ̀ ̀ ̀ ̀ ́ ̉ ̀ ̀ ̣ ́ ̉ ́ ̣ ́ ̣ ̀ ́ ̉ ́ ́ ́ ̉ ̀ ̣ ́ ̣ ̀ ượ muc 2.2.2 (Ch ̃ ở ử ̣ ́ ̣ ́ ̉ ̣ ̀ ́ ̣ .txt “. Cac thuât toan se đ ng trinh đ ươ ̃ ượ ượ ̀ ̣ ̉ ̀ ̉ ̃ ̣ ̉ ̀ ́ ng 3 cua đô an. NG TRINH c chi ro c chi ro tai ch Ự ƯƠ ̣ ́ ̀ ươ ự ử ̀ ̣ ́ ́ ̣ ̣ File chon tam giac đia đông l c ự Đê tinh biên dang xoay trong môt tam giac đia đông l c theo công th c (1.14) ự ng 1). Trong xây d ng thi ta phai lam tuân t ươ c d liêu trong file đâu ch ̉ ượ ữ c gia tri biên dang vao (Hinh 2.3) va kêt qua đâu ra la môt file kêt qua cho ta biêt đ ́ ượ c ghi vao môt file co đinh xoay va sai sô cua no trong t ng tam giac. Kêt qua nay đ ừ dang “ ng 2) va cach s dung ươ va giao diên cua ch ươ 2.2.2 THUÂT TOAN TRONG XÂY D NG CH Ch ượ c th c hiên băng thuât toan tông h p nh sau (Hinh 2.5) : giac đia đông l c đ c xây d ng s dung cho tinh biên dang xoay trong môt tam ự ng trinh đ ự ượ ư ợ ́ ̣ ̣ ̣ ̀ ̣ ́ ̉ ̀

̀ ̣ ̣ ́ ̀ Minh hoa thuât toan ch D i đây la nh ng thuât toan chi tiêt trong ch ng trinh ng trinh : Hinh 2.5: ̀ ữ ướ ươ ươ ̣ ́ ́ ̀

i đo

̣ ́ ̣ ̀ ̉ ̣ c tiên ta co môt khai bao môt biên ̣ ́ ̀ ́ ̉ ́ ̣ ́ ̣ ́ ̀ Diem co cach khai bao nh sau: ư ́ ́ ́ ̣ ́ ́ ́ ́ ́

2.2.2.1 Thuât toan lây d liêu va hiên thi điêm l ̉ ướ ́ ữ Thuât toan nay co thê mô ta nh sau : Tr ướ ̉ ư ́ DI() co dang câu truc tên la co câu truc Type Diem

tendiem as string x as float y as float vx as float vy as float svx as float svy as float

́ x,y,vx,vy,svx,svy co nghia lân l ̀ ́ ́ ̃ ̀ ́ ướ ̣ ̃ ̣ ̣ ́ ̣ ̉ ̣ ́ ̉ ̣ ng Băc ban đô, sai sô vân tôc dich chuyên theo h ́ ̉ ̀ ́ ̣ ́ ̣ ̉ ́ ̉ ̀ ̀ ́ ̣ ̀ i t ̣ ừ ̀ ượ ́ ư t la cac biên l u ̀ ượ ng Đông, vân tôc chuyên dich theo ́ ng Đông, Băc ban đô.Biên ướ file Excel sô liêu co ch a nh ng thông tin trên (Hinh 2.3), ư ng ng la sô hang l u trên t theo hang va ươ ́ ứ ̀ DI(i) v i ớ ứ ư ̣ ́ ̀ ̀ ́ ̀ ̃ ư ữ c lây lân l i khi kêt thuc file sô liêu thi thôi: ượ ớ ́ ́ ́ ̣ ̀

End Type Global DI() as Diem Trong nay co ch a cac biên ́ ứ kinh đô, vi đô, vân tôc dich chuyên theo h h ướ DI() nay se l u d liêu t d liêu đ ữ DI() cho t Sub HienDiem

Filename=FileOpenDlg("","","XLS","Hay nhap file so lieu cho tinh bien

dang")

Register Table Filename Type "XLS" SV: Trân Văn Phong

20

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ệ

ồ

Đ án t ố ngh thông tin ệ

Into "C:\BienDang.Tab"

Dim awin as integer Dim tenlop as String awin=frontwindow() tenlop=LayerInfo(awin,1,LAYER_INFO_NAME) if tenlop<>"Cosmetic1" then

Set Coordsys table tenlop Set Map Layer 1 Editable on

else

tenlop=LayerInfo(1,2,LAYER_INFO_NAME) Set Coordsys table tenlop Set Map Layer 2 Editable on

End if

Dim i as integer i=1 Redim DI(i) Open table "C:\BienDang.Tab" Fetch First From BienDang

DI(i).tendiem = BienDang.col1 DI(i).x= BienDang.col2 DI(i).y= BienDang.col3 DI(i).vx= BienDang.col4 DI(i).vy= BienDang.col5 DI(i).svx= BienDang.col6 DI(i).svy= BienDang.col7

Do while not EOT(BienDang)

DI(i).tendiem = BienDang.col1 DI(i).x= BienDang.col2 DI(i).y= BienDang.col3 DI(i).vx= BienDang.col4 DI(i).vy= BienDang.col5 DI(i).svx= BienDang.col6 DI(i).svy= BienDang.col7 i=i + 1 Redim DI(i) Fetch Next From BienDang

Loop

Call Thehiendiem(DI()) Close Table BienDang Alter Menu Item BienDang Enable Alter Menu Item HienDiem Disable

End Sub ́ ̀ Hienthi trong ham nay co Phia trên la dong code khai bao cua ham co tên la ́ ̀ Thehiendiem(D()). Ham nay co tac ̣ Call co tac dung goi môt ham con la dong lênh file Excel (Hinh 2.3) đê ̉ dung lây d liêu t ́ D() v a đa đ ừ c lây la vi tri cua hiên thi ra ban đô cua Mapinfo nh ng thông sô cua d liêu đ ̉ ̉ điêm, tên điêm,va khi chay hêt ham Hienthi se cho ra ban đô Mapinfo thông tin cua l ướ Sub Thehiendiem(DI() as Diem)

Dim i as integer Dim tl as float

SV: Trân Văn Phong

́ ̀ ̀ ́ ̉ ̀ ́ ̀ ̀ ̀ ́ ́ ̣ ̣ ̣ ̀ ̀ ̀ ́ biên c ch a d liêu t ứ ữ ̃ ượ ̣ ừ ữ ̣ ́ ̀ ̣ ừ ữ ượ ữ ̉ ̣ ̉ ̀ ̉ ́ ̉ ̣ ́ ̀ ̣ ́ ̉ ̉ ̀ ̣ ́ ̀ ̃ ̉ ̀ i cac điêm nh vây : ư ̣ ́ ̉

21

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

Dim hoi as logical tl=5/50 Dim ten as string For i=1 to (ubound(DI)-1)

Create Point (DI(i).x,DI(i).y) Symbol (34,Black,5) ten = DI(i).tendiem Create text ten (DI(i).x, DI(i).y) (DI(i).x + 0.2,DI(i).y + 0.2)

Font MakeFont ("Helvetica",1,12,BLUE,WHITE)

Next Hoi = Ask(" Ban co muon the hien toc do dich chuyen","Co","Khong") If Hoi = True then

For i=1 to (ubound(DI)-1) Call Tocdodichchuyen(DI(i).x, DI(i).y,DI(i).vx,

DI(i).vy,DI(i).svx, DI(i).svy,tl)

Next

End If

̣ ́ ̉ ̣ ́ ̣ ̣ ̉ ̀ Thehiendiem(DI() as Diem) co lênh goi t ̣ ớ ̀ ̣ ́ ̣ ̀ ̀ ́ ứ ̣ ̀ ̉ ̣ ́ ̣ ̉ ̣ ̉ ̣ ̣ ̉ ́ ́ ̣ y, vân tôc chuyên dich theo h ướ ̃ ̣ ́ ̉ ̣ ́ ng Đông, Băc la ng Đông, Băc la ̀ tl : ̀ svx,svy, ty lê ban đô ướ ́ ̣ ́ ̉ ̣ ́ ̉ ̣ ̉

End Sub 2.2.2.2 Thuât toan hiên thi tôc đô dich chuyên i ham Trong phân trên tai ham Tocdodichchuyen(DI(i).x, DI(i).y,DI(i).vx, DI(i).vy,DI(i).svx, DI(i).svy,tl) thi đây la ̀ môt ham thê hiên tôc đô chuyên dich cua tai môt điêm đo co ch a cac thông sô vê ̀ thông tin kinh đô ̣ x, vy đô ̀ vx,vy và sai sô vân tôc chuyên dich theo h Sub Tocdodichchuyen(x as float,y as float,vx as float, vy as float, svx as float, svy as float,tle as float)

Dim x1,y1,x2,y2,x3,y3 as float x1= x + tle*vx y1= y + tle*vy x2= x1 + svx*tle*3 y2= y1 - svy*tle*3 x3= x1 - svx*tle*3 y3= y1 + svy*tle*3 Create Ellipse

(x2,y2) (x3,y3) Pen MakePen(1,2,GREEN) Brush MakeBrush(01,Black,Black) Create Line (x,y) (x1,y1) Pen MakePen(1,59,Black)

́ ữ

̣ ướ

End Sub i tam giac 2.2.2.3 Thuât toan lây d liêu chon tam giac va hiên thi l Sau khi ta co phân hiên thi va lây d liêu cua l i điêm đo thi công viêc tiêp ́ ữ theo se la viêc chon tam giac đia đông l c. Qua phân hiên thi điêm ta co cach nhin ự đo chon cac tam giac vao file Excel nh hinh 2.4. D liêu tam giac nay tr c quan t ự se đ ̀ Tamgiac: ̃ ượ ư Type Tamgiac

Tendiem as string d1 as integer d2 as integer d3 as integer

End Type SV: Trân Văn Phong

̣ ́ ̣ ̣ ́ ̀ ̉ ́ ̉ ướ ́ ̀ ̉ ̣ ̀ ̣ ̉ ̀ ̣ ́ ̃ ̀ ̣ ̣ ́ ̣ ̣ ̀ ̉ ̣ ̉ ́ ́ ̀ ư ̀ ừ ữ ́ ̣ ́ ́ ̀ ̣ ́ ̀ c l u vao môt biên co câu truc tên la ̀ ̣ ́ ́ ́ ́

22

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

Filename=FileOpenDlg("","","XLS","Hay nhap file so lieu cho chon tam

giac")

Register Table Filename Type "XLS" Into "C:\Chontamgiac.Tab" Dim i as integer i=1 Redim TGD(i) Open table "C:\Chontamgiac.Tab" Fetch First From Chontamgiac

TGD(i).Tendiem = Chontamgiac.col1 TGD(i).d1 = Chontamgiac.col2 TGD(i).d2 = Chontamgiac.col3 TGD(i).d3 = Chontamgiac.col4

Do while not EOT(Chontamgiac)

TGD(i).Tendiem = Chontamgiac.col1 TGD(i).d1 = Chontamgiac.col2 TGD(i).d2 = Chontamgiac.col3 TGD(i).d3 = Chontamgiac.col4

i=i + 1 Redim TGD(i)

Fetch Next From Chontamgiac

Loop Close Table Chontamgiac

̃ ư ́ ́ ̀ ̉ ̉ ́ ̣ ng ng 3 điêm trên môt tam giac đ ̀ ̉ ̣ ̣ ́ ư ươ ứ ́ ữ ́ ượ ữ ̉ ̀ ́ ́ ̣ ̣ ́ ̣ ̣ ́ c chon, Trong đo biên Tendiem la kiêu chuôi l u tên cua tam giac đ ượ d1,d2,d3 la 3 biên l u t ̀ c chon. D i đây la ướ code cua ham co tac dung lây d liêu tam giac trong file d liêu chon tam giac: Sub Laydulieutamgiac(TGD() as Tamgiac)

End Sub 2.2.2.4 Thuât toan nhân ma trân bâc 4 Do Mapbasic không hô tr mang hai chiêu do đo han chê trong viêc tinh toan trong ma trân.Trong ch ̣ ng trinh nay ta chi cân tinh toan đôi v i cac ma trân bâc 4.Do đăc điêm nay ma ta se khai bao môt kiêu câu truc ma trân bâc 4 nh sau : Type Matranb4

h1 as float h2 as float h3 as float h4 as float

̣ ́ ̣ ̣ ̃ ợ ̉ ̀ ́ ̣ ̉ ̣ ́ ́ ́ ớ ươ ̣ ̀ ̀ ̉ ̀ ́ ́ ́ ̣ ư ̣ ̉ ̀ ̀ ̃ ́ ̣ ̉ ́ ́ ̣ ̣

ư ́ ́ ́ ̀ ̉ ̣ ́ ̣ ́ ượ ́ ượ ̃ ̃ ̣ ́ ̣ ̣ ̀ ̀ ̀ ̣ ̀ ́ c vi nh cac hang cua ma trân, khai bao môt biên c môt biên d liêu ma trân 4 hang va nhiêu côt. ữ NhanMT(MT1() as Matranb4, MT2() as Matranb4, MTKQ() as ̀ MT1(), MT2() va cho ra ́ ́ ̣ ̣ ̣ ̀ ̀ ̀ ̀ MTKQ(). Code cua ham nay nh sau : ư ̣ ́ ̉ ̉ ̀ ̀

End Type Trong đo h1,h2,h3,h4 đ chuôi kiêu ̉ Matranb4 ta se co đ Ham co tên Matranb4) co tac dung nhân 2 ma trân bâc 4 đâu vao la môt kêt qua la Sub NhanMT(MT11() as Matranb4, MT22() as Matranb4, MTN() as Matranb4)

Dim k1,k2,k3,k4 as float Dim i,s as integer s = ubound(MT22) Redim MTN(s)

SV: Trân Văn Phong

23

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

For i = 1 to ubound(MT22)

k1 = MT11(1).h1 * MT22(i).h1 k2 = MT11(2).h1 * MT22(i).h2 k3 = MT11(3).h1 * MT22(i).h3 k4 = MT11(4).h1 * MT22(i).h4 MTN(i).h1 = k1+k2+k3+k4

Next

For i = 1 to ubound(MT22)

k1 = MT11(1).h2 * MT22(i).h1 k2 = MT11(2).h2 * MT22(i).h2 k3 = MT11(3).h2 * MT22(i).h3 k4 = MT11(4).h2 * MT22(i).h4 MTN(i).h2 = k1+k2+k3+k4

Next

For i = 1 to ubound(MT22)

k1 = MT11(1).h3 * MT22(i).h1 k2 = MT11(2).h3 * MT22(i).h2 k3 = MT11(3).h3 * MT22(i).h3 k4 = MT11(4).h3 * MT22(i).h4 MTN(i).h3 = k1+k2+k3+k4

Next

For i = 1 to ubound(MT22)

k1 = MT11(1).h4 * MT22(i).h1 k2 = MT11(2).h4 * MT22(i).h2 k3 = MT11(3).h4 * MT22(i).h3 k4 = MT11(4).h4 * MT22(i).h4 MTN(i).h4 = k1+k2+k3+k4

Next

̣ ́ ̉ ̣ ̣ ̣ ớ ̀ ̣ ̀ ́ ́ ̣ ̀ ̀ ̀ ̣ ̣ ̣ ̃ ̉ ̀ ̣ ̉ ̣ ̉ ́ ́ ̣ ̣ ̣ ́ ̉ ̉ ̣ ch ượ ươ ̣ ở ̉ ̀ ̣ ̉ ̣ ̀ ̀ ́ ́

́ ́ ̉ ́ ̀ ̣ ̀ ̀ ̀ ́ ̉ ̉ ̉ c l u vao biên ượ ư ̀ ̀ ̣ ̀ ́ ́ ̀ ́

End Sub 2.2.2.5 Thuât toan chuyên vi ma trân bâc 4 ́ Đây la môt ham co tac dung v i đâu vao la môt ma trân bâc 4 se cho ra kêt qua la ma trân chuyên vi cua no co dang ma trân bâc 4 theo phep chuyên đôi ma trân chuyên vi c khai bao co tên ng 2 phân ma trân chuyên vi. Ham nay đ Chuyenvi(MTBD() as Matranb4, MTCV() as Matranb4) Trong đo ́ MTBD() là ̣ ́ Matranb4 la ma trân d liêu đâu vao, va kêt qua cua chuyên vi biên co kiêu câu truc ̣ ữ nay la ma trân d liêu đ ̀ ́ Matranb4. Ham nay ́ MTCV() co câu truc ̣ ữ co code nh sau : ư Sub Chuyenvi(MTBD() as Matranb4, MTCV() as Matranb4)

Dim a1,a2,a3,a4 as float Dim i as integer Redim MTCV(4) For i = 1 to 4

a1=MTBD(i).h1 a2=MTBD(i).h2 a3=MTBD(i).h3 a4=MTBD(i).h4 If i=1 then MTCV(1).h1 = a1 MTCV(2).h1 = a2 MTCV(3).h1 = a3 MTCV(4).h1 = a4 ElseIf i=2 then

SV: Trân Văn Phong

24

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

MTCV(1).h2 = a1 MTCV(2).h2 = a2 MTCV(3).h2 = a3 MTCV(4).h2 = a4 ElseIf i=3 then MTCV(1).h3 = a1 MTCV(2).h3 = a2 MTCV(3).h3 = a3 MTCV(4).h3 = a4 ElseIf i=4 then MTCV(1).h4 = a1 MTCV(2).h4 = a2 MTCV(3).h4 = a3 MTCV(4).h4 = a4 End If

Next

̣ ́ ́ ̣ ̣ ̣ ướ ứ ứ ̉ ́ ̣ ̉ ̣ ̣ ̣ ứ ứ ư ̣ ̀ ́ ̣ ̣ ̀ ́ ̣ ̣ ̀ ̀ ̀ c khai bao co tên nh sau: ượ ứ ư ̣ ̀ ́ ̣ ̣ ́ ́

ứ ̀ ̀ ̉ ́ ́ ̣ ̣ ̣ ́ c khai bao la

End Sub 2.2.2.6 Thuât toan tinh đinh th c ma trân bâc 4 ứ c tiên ta tao Đê tinh đinh th c cua ma trân bâc 4 theo công th c (1.22) tr môt ham tinh đinh th c bâc 3 rôi tinh đinh th c bâc 4 theo nh phân trinh bay tai ̣ Det44(MT4() as muc 1.2.3. Ham tinh đinh th c bâc 4 đ Matranb4,det as float) va ham con cua no tinh đinh th c cho ma trân bâc 3 co tên đ ượ

Sub Det44(MT4() as Matranb4,det as float)

Dim MT33() as Matranb4 Dim dt,b1,b2,b3,k1,k2,k3,k4 as float Dim i as integer Redim MT33(3) For i=1 to 3

b1 = MT4(i+1).h2 b2 = MT4(i+1).h3 b3 = MT4(i+1).h4

MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3

Next Call Det33(MT33(),dt) k1 = dt*

MT4(1).h1

For i=1 to 4

If i = 1 then b1 = MT4(i).h2 b2 = MT4(i).h3 b3 = MT4(i).h4

MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3 ElseIf i>2 then b1 = MT4(i).h2 b2 = MT4(i).h3 b3 = MT4(i).h4

SV: Trân Văn Phong

̀ Det33(MT3() as Matranb4,det as float). ́

25

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

MT33(i-1).h1 = b1 MT33(i-1).h2 = b2 MT33(i-1).h3 = b3 End If

Next Call Det33(MT33(),dt) k2 = dt*

MT4(2).h1

For i=1 to 4

If i=1 or i=2 then b1 = MT4(i).h2 b2 = MT4(i).h3 b3 = MT4(i).h4

MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3 ElseIf i>3 then b1 = MT4(i).h2 b2 = MT4(i).h3 b3 = MT4(i).h4

MT33(i-1).h1 = b1 MT33(i-1).h2 = b2 MT33(i-1).h3 = b3 End If

Next Call Det33(MT33(),dt) k3 = dt*

MT4(3).h1

For i=1 to 3

b1 = MT4(i).h2 b2 = MT4(i).h3 b3 = MT4(i).h4

MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3

Next Call Det33(MT33(),dt) k4 = dt*

MT4(4).h1

det = k1 - k2 + k3 -k4

End Sub '....................................................................... Sub Det33(MT3() as Matranb4,det as float)

Dim a1,a2,a3,a4,a5,a6 as float a1= MT3(1).h1 * MT3(2).h2 * MT3(3).h3 a2= MT3(1).h1 * MT3(3).h2 * MT3(2).h3 a3= MT3(2).h1 * MT3(1).h2 * MT3(3).h3 a4= MT3(2).h1 * MT3(3).h2 * MT3(1).h3 a5= MT3(3).h1 * MT3(1).h2 * MT3(2).h3 a6= MT3(3).h1 * MT3(2).h2 * MT3(1).h3

det = a1 - a2 - a3 + a4 + a5 -a6

End Sub

SV: Trân Văn Phong

26

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

ử ứ ̀ Det33 x ly tinh đinh th c ma trân đâu vao la ́ ́ ́ ̣ ̣ ̀ ̀ ứ ̀ det. Ham ̀ MT3() cho kêt́ ̀ Det44 se tinh đinh th c cho ma trân đâu ̉ ̣ ̉ ̣ ̀ ̃ ́ ̣ ̣ ̀ ̀ ́ ̉

Dim MT33(),ND() as Matranb4 Dim k,dt,b1,b2,b3 as float Dim i as integer Redim MT33(3) Redim MT4(4) Redim ND(4) Redim MTND(4)

'1111111111111111111111111111111111111111111111

For i=1 to 3

b1 = MT4(i+1).h2 b2 = MT4(i+1).h3 b3 = MT4(i+1).h4 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3

Next Call Det33(MT33(),dt) k = dt ND(1).h1 = k

For i=1 to 4

If i = 1 then b1 = MT4(i).h2 b2 = MT4(i).h3 b3 = MT4(i).h4 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3 ElseIf i>2 then b1 = MT4(i).h2 b2 = MT4(i).h3 b3 = MT4(i).h4 MT33(i-1).h1 = b1 MT33(i-1).h2 = b2 MT33(i-1).h3 = b3 End If

Next Call Det33(MT33(),dt) k = dt ND(2).h1 = -k

For i=1 to 4

If i=1 or i=2 then b1 = MT4(i).h2

SV: Trân Văn Phong

̣ ́ ́ ̣ ̣ ̉ ̣ ̃ ợ ̣ ̉ ̀ ̣ ̣ ́ ̣ ̣ ng đôi dai dong. Ham co tên đ c khai bao la ượ ươ ̉ ́ ̀ ̀ ̀ ́ ́ ́ ́ ̣ ́ ̣ ̣ ̉ ̉ ̣ MT4() va kêt qua cua no đ c l u tai biên tên ́ ượ ư ượ ư ̀ ̀ ̣ ́ ̀ ́ ̉ ̉ ̣ c l u tai biên ứ ̉ ́ ̀ ̀ ́ ̣ ́ ́ ́ ́ ́ ́ ướ ̀ ́ ́ ́ ̣ ̣ ̉ ̣ ̀ ̉ ̀ ́ ̣ ̣ ̉ ̣ Trong đo ham qua đinh th c cua ma trân nay la ứ vao ̀ MT4() va kêt qua la ̀ det. 2.2.2.7 Thuât toan tinh ma trân nghich đao bâc 4 Do viêc Mapbasic không hô tr mang 2 chiêu do vây viêc tinh ma trân nghich ̀ Ngichdao(MT4() as đao t Matranb4, MTND() as Matranb4) co tac dung tinh ma trân nghich đao cua ma trân ́ MTND(), đâu vao đ ̉ Matranb4. Cach th c tinh toan theo ca hai biên nay đêu co dang biên câu truc cua phân ly thuyêt tinh ma trân nghich đao tai ch ng 1. D i đây la code cua ham tinh ươ ma trân nghich đao bâc 4 : Sub Ngichdao(MT4() as Matranb4, MTND() as Matranb4)

27

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

b2 = MT4(i).h3 b3 = MT4(i).h4 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3 ElseIf i>3 then b1 = MT4(i).h2 b2 = MT4(i).h3 b3 = MT4(i).h4 MT33(i-1).h1 = b1 MT33(i-1).h2 = b2 MT33(i-1).h3 = b3 End If

Next Call Det33(MT33(),dt) k = dt ND(3).h1 = k

For i=1 to 3

b1 = MT4(i).h2 b2 = MT4(i).h3 b3 = MT4(i).h4 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3

Next Call Det33(MT33(),dt) k = dt ND(4).h1= -k

'222222222222222222222222222222222222222222

For i=1 to 3

b1 = MT4(i+1).h1 b2 = MT4(i+1).h3 b3 = MT4(i+1).h4 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3

Next Call Det33(MT33(),dt) k = dt ND(1).h2 = -k

For i=1 to 4

If i = 1 then b1 = MT4(i).h1 b2 = MT4(i).h3 b3 = MT4(i).h4 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3 ElseIf i>2 then b1 = MT4(i).h1 b2 = MT4(i).h3 b3 = MT4(i).h4 MT33(i-1).h1 = b1 MT33(i-1).h2 = b2 MT33(i-1).h3 = b3

SV: Trân Văn Phong

28

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

End If

Next Call Det33(MT33(),dt) k = dt ND(2).h2 = k

For i=1 to 4

If i=1 or i=2 then b1 = MT4(i).h1 b2 = MT4(i).h3 b3 = MT4(i).h4 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3 ElseIf i>3 then b1 = MT4(i).h1 b2 = MT4(i).h3 b3 = MT4(i).h4 MT33(i-1).h1 = b1 MT33(i-1).h2 = b2 MT33(i-1).h3 = b3 End If

Next Call Det33(MT33(),dt) k = dt ND(3).h2 = -k

For i=1 to 3

b1 = MT4(i).h1 b2 = MT4(i).h3 b3 = MT4(i).h4 MT33(i).h1 = b1 MT33(i).h2 = b2

MT33(i).h3 = b3

Next Call Det33(MT33(),dt) k = dt ND(4).h2= k

'33333333333333333333333333333333333333

For i=1 to 3

b1 = MT4(i+1).h1 b2 = MT4(i+1).h2 b3 = MT4(i+1).h4 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3

Next Call Det33(MT33(),dt) k = dt ND(1).h3 = k

For i=1 to 4

If i = 1 then b1 = MT4(i).h1 b2 = MT4(i).h2

SV: Trân Văn Phong

29

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

b3 = MT4(i).h4 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3 ElseIf i>2 then b1 = MT4(i).h1 b2 = MT4(i).h2 b3 = MT4(i).h4 MT33(i-1).h1 = b1 MT33(i-1).h2 = b2 MT33(i-1).h3 = b3 End If

Next Call Det33(MT33(),dt) k = dt ND(2).h3 = -k

For i=1 to 4

If i=1 or i=2 then b1 = MT4(i).h1 b2 = MT4(i).h2 b3 = MT4(i).h4 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3 ElseIf i>3 then b1 = MT4(i).h1 b2 = MT4(i).h2 b3 = MT4(i).h4 MT33(i-1).h1 = b1 MT33(i-1).h2 = b2 MT33(i-1).h3 = b3 End If

Next Call Det33(MT33(),dt) k = dt ND(3).h3 = k

For i=1 to 3

b1 = MT4(i).h1 b2 = MT4(i).h2 b3 = MT4(i).h4 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3

Next Call Det33(MT33(),dt) k = dt ND(4).h3= -k

'4444444444444444444444444444444444444444444

For i=1 to 3

b1 = MT4(i+1).h1 b2 = MT4(i+1).h2 b3 = MT4(i+1).h3 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3

SV: Trân Văn Phong

30

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

Next Call Det33(MT33(),dt)

k = dt ND(1).h4 = -k

For i=1 to 4

If i = 1 then b1 = MT4(i).h1 b2 = MT4(i).h2 b3 = MT4(i).h3 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3 ElseIf i>2 then b1 = MT4(i).h1 b2 = MT4(i).h2 b3 = MT4(i).h3 MT33(i-1).h1 = b1 MT33(i-1).h2 = b2 MT33(i-1).h3 = b3 End If

Next Call Det33(MT33(),dt) k = dt ND(2).h4 = k

For i=1 to 4

If i=1 or i=2 then b1 = MT4(i).h1 b2 = MT4(i).h2 b3 = MT4(i).h3 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3 ElseIf i>3 then b1 = MT4(i).h1 b2 = MT4(i).h2 b3 = MT4(i).h3 MT33(i-1).h1 = b1 MT33(i-1).h2 = b2 MT33(i-1).h3 = b3 End If

Next Call Det33(MT33(),dt) k = dt ND(3).h4 = -k

For i=1 to 3

b1 = MT4(i).h1 b2 = MT4(i).h2 b3 = MT4(i).h3 MT33(i).h1 = b1 MT33(i).h2 = b2 MT33(i).h3 = b3

Next Call Det33(MT33(),dt) k = dt ND(4).h4= k

SV: Trân Văn Phong

31

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

Dim ND2() as Matranb4 Dim det as float Call Det44(MT4(),det) Call Chuyenvi(ND(),ND2())

For i= 1 to 4

MTND(i).h1 = ND2(i).h1/det MTND(i).h2 = ND2(i).h2/det MTND(i).h3 = ND2(i).h3/det MTND(i).h4 = ND2(i).h4/det

Next End Sub

̣ ́ ́ ̀ ̉ ̣ ́ ̣ ̀ ́ ợ ̀ ở ̀ ̣ ́ ̀ ̉ ̉ ́ ̣ ́ ̀ ượ ̣ ́ ́ ́ ̉ ̀ ́ ̣ ̉ ́ ̣ ̣ i tam giac đa đ đo tinh cho tât ca cac tam giac trong l ự ướ ́ ̣ ̣ ́ ́ ́ ̉ ́ ́ ́ ̣ ́ ̀ ̉ ́ ́ ̣ ́ ̣ ̣ ́ ̀ ̀ file sô liêu đâu vao, sô liêu nay đ ượ ư ̣ ̀ ́ ́ ̣ ̀ ̀ ́ ̣ ̀ ̀ ư c l u vao biên ́ ữ ̣ ̣ ̀ ́ ̣ ̀ ̀ ́ ̉ ̣ ́ ́ ̣ ̀ ̀ ̣ ́ ́ ́ ̣ ̀ ́ ́ ̣ ̉ ữ ượ ư ́ ̣ ̀ ̉ ̣ ̉ ́ ̉ ́ ̣ ừ ứ ̀ ̣ ̀ ̀ ̣ ̀ ̀ ̣ ̀ ̣ ̉ ́ ượ ̀ ̣ ́ ̣ ̣ ́ ̀ ́ ̉ ́ ́ ́ ̣ ̀ muc 1.1.5.2, ma trân cac gia tri khoang cach se đ ứ ̃ ượ ̀ ở ̣ ̣ ́ ́ ̣ ̉ ́ ́ ̀ ̀ ́ ̃ ượ ̉ ́ ̀ ̣ ́ ́ ̣ ̉ ̣ ̀ ̣ ̀ ́ ́ ́ ́ ̀ ̀ ̃ ứ ữ ̣ ̀ ̀ ̀ ̀ ́ ́ ̀ ̀ , A() la biên l u gia tri cua ma trân , ́ ̣ ̉ ̣ ̀ ́ ̣ ̉ ̀ ́ ̣ ượ ́ ́ ̣ ́ ̣ ̉ ̀ ̀ ̣ ̃ ng trinh nh sau : ́ ư c tinh cho sai sô vân tôc dich chuyên.Ham nay đ ươ ư ̉ ̀

2.2.2.8 Thuât toan tinh va hiên thi biên dang xoay va sai sô Đây la thuât toan đoi hoi s tông h p cua cac thuât toan trinh bay trên trong ̉ ự c kêt qua la gia tri cua biên dang xoay trong môt tam viêc tinh toan đê đ a ra đ ̉ ư c giac đia đông l c, t ̃ ượ ừ c gia tri biên dang xoay trong môt tam giac thi đâu tiên phai chon.Đo la đê tinh đ ̉ ượ s dung ham lây d liêu t ́ DI() ̣ ừ ữ ử nh môt ma trân l u d liêu. Đây la sô liêu thô ban đâu gôm tât ca cac d liêu liên ữ ̣ ư quan đên sô liêu đâu vao cho viêc tinh toan biên dang va sai sô cho biên dang xoay. c ma trân nh theo công T sô liêu thô nay ta phai chuyên d liêu đê co thê tinh đ ̀ th c (1.15) la , ma trân va la 2 ma trân cân tim, ma trân la ma trân khoang cach, va c theo công th c tinh biên dang trinh la ma trân gia tri vân tôc đêu co thê tinh đ c tinh băng ham tinh bay ự c th c khoang cach trong Mapbasic. Va viêc tinh gia tri cua 2 ma trân nay se đ ChuyenDuLieuMatran(MTDL() as Diem,VIJ() as hiên theo ham co tên Matranb4,A() as Matranb4,MS() as Matranb4) Trong đo co biên đâu vao la ̀ ̀ VIJ() la biên l u MTDL() se ch a d liêu đâu vao ban đâu, va cac biên đâu ra la : ́ ư ̣ MS() la ma trân l u gia tri sai gia tri cua ma trân ̣ ư sô đ c đinh nghia trong code ̉ ượ cua ch Sub ChuyenDuLieuMatran(MTDL() as Diem,VIJ() as Matranb4,A() as Matranb4,MS() as Matranb4)

Redim MS(1) Redim VIJ(1) Redim A(4) VIJ(1).h1=(MTDL(1).vx - MTDL(2).vx)/1000 VIJ(1).h2=(MTDL(1).vy - MTDL(2).vy)/1000 VIJ(1).h3=(MTDL(1).vx - MTDL(3).vx)/1000 VIJ(1).h4=(MTDL(1).vy - MTDL(3).vy)/1000

MS(1).h1=abs((MTDL(1).svx - MTDL(2).svx)/1000) MS(1).h2=abs((MTDL(1).svy - MTDL(2).svy)/1000) MS(1).h3=abs((MTDL(1).svx - MTDL(3).svx)/1000) MS(1).h4=abs((MTDL(1).svy - MTDL(3).svy)/1000)

Dim kx12,ky12,kx13,ky13 as float

kx12 = distance(MTDL(1).x,MTDL(1).y,MTDL(2).x,MTDL(1).y,"m") ky12 = distance(MTDL(1).x,MTDL(1).y,MTDL(1).x,MTDL(2).y,"m")

SV: Trân Văn Phong

32

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

kx13 = distance(MTDL(1).x,MTDL(1).y,MTDL(3).x,MTDL(1).y,"m") ky13 = distance(MTDL(1).x,MTDL(1).y,MTDL(1).x,MTDL(3).y,"m")

If MTDL(2).x > MTDL(1).x then

kx12 = -kx12

End If If MTDL(2).y > MTDL(1).y then

ky12 = -ky12

End If

If MTDL(3).x > MTDL(1).x then

kx13 = -kx13

End If If MTDL(3).y > MTDL(1).y then

ky13 = -ky13

End If

A(1).h1 = kx12 A(2).h1 = ky12 A(3).h2 = kx12 A(4).h2 = ky12

A(1).h3 = kx13 A(2).h3 = ky13 A(3).h4 = kx13 A(4).h4 = ky13

End Sub Sau khi tim đ c ma trân va phuc vu cho viêc tim ma trân thi ta se ap dung thuât toan tinh nghich đao cua ma trân va thuât toan nhân 2 ma trân đê tinh theo c biên dang xoay theo công công th c (1.15). Tim đ c ma trân t ̣ c cac gia tri th c (1.14) la , S dung ham lây d liêu chon tam giac ta se tinh đ ượ trong cac tam giac trong l trong ̣ t ng tam giac môt kem theo cach tinh sai sô cua trong t ng tam giac, Tinh cac gia tri ừ i tam giac ra ban đô cua Mapinfo băng ham biên dang xoay rôi ra cung se thê hiên l ng trinh co tên ươ ̣ y, gia tri biên dang Ham nay co tac dung nhân cac biên đâu vao la kinh đô xoay w đê thê hiên biên dang xoay ra ban đô mapinfo giông trong hinh 1.2((c),(d)). c chiêu Ham nay se xet cac điêu kiên gia tri biên dang xoay ượ hay cung chiêu kim đông hô ma co nh ng goc xoay hay kiêu xoay khac nhau đ c ữ thê hiên trên ban đô Mapinfo theo ti lê cua ban đô.Ham nay đ c đinh nghia trong code cua ch Sub Biendangxoay(x as float, y as float, w as float)

Dim tle,sw as float tle = 500 sw = w*(10^9) Dim y1,x2,y2 as float y1=y + 1 Dim o,ob,ob1,ob2,ob3,oo as object o = CreatePoint(x,y) ob1 = CreateLine(x,y,x,y1) ob2 = RotateAtPoint(ob1,-5,Centroid(o)) x2 = ObjectGeography(ob2, OBJ_GEO_LINEENDX) y2 = ObjectGeography(ob2, OBJ_GEO_LINEENDY)

SV: Trân Văn Phong

ượ ̀ ̣ ̀ ̣ ̣ ̣ ̀ ̣ ̀ ̃ ́ ̣ ̣ ́ ́ ̣ ̉ ̉ ̣ ̀ ̣ ́ ̣ ̉ ́ đo ta tinh đ ừ ứ ượ ượ ̀ ̣ ́ ́ ́ ̣ ử ứ ̀ ̣ ̀ ́ ̣ ̣ ́ ̃ ́ ́ ́ ữ c chon. Viêc nay đ c th c hiên tuân t i đ ướ ượ ̀ ự ự ́ ́ ̣ ̣ ̀ ̣ ượ ừ ́ ̣ ̀ ́ ́ ́ ̉ ́ ́ ́ ́ ̣ ướ ́ ̣ ̀ ̃ ̃ ̉ ́ ̉ ̀ ̉ ̀ ̀ Biendangxoay(x as float, y as float, w as float) trong code cua ch ́ ̉ ̀ ̣ x, vy đô ̀ ̀ ́ ́ ̣ ̣ ́ ́ ̀ ̀ ̀ ̃ ́ ̣ ́ ̣ ̉ ̉ ̣ ́ ̣ ̉ ̀ ́ ̀ w la l n hay be, ng ượ ̀ ớ ̀ ̀ ̃ ́ ́ ̀ ̣ ́ ̣ ́ ̣ ́ ̀ ̀ ̀ ̀ ̀ ̀ ́ ́ ̉ ́ ượ ̉ ̣ ̉ ̀ ̉ ̣ ̉ ̉ ̀ ̀ ̀ ̣ ̃ ng trinh nh sau : ươ ư ̉ ̀

33

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

ob3 = CreateLine(x,y1,x2,y2) ob = combine(ob1,ob2) ob = combine(ob,ob3) oo= RotateAtPoint(ob,-5,Centroid(o)) If sw>0 then

If sw <= 1 then Insert Into Lonlat(obj) values (ob) ElseIf sw >1 and sw <=3 then

oo= combine(ob,oo) Insert Into Lonlat(obj) values (oo) ElseIf sw>3 and sw <=5 then oo = combine (ob,oo) ob1 = RotateAtPoint(ob,-10,Centroid(o)) oo = combine (ob,oo) Insert Into Lonlat(obj) values (oo) Else oo = combine (ob,oo) ob1 = RotateAtPoint(ob,-30,Centroid(o)) oo = combine (ob,oo) Insert Into Lonlat(obj) values (oo) End If

Else

oo= RotateAtPoint(ob,5,Centroid(o)) If sw >= -1 then Insert Into Lonlat(obj) values (oo) ElseIf sw >1 and sw <=3 then oo= combine(ob,oo) Insert Into Lonlat(obj) values (oo) ElseIf sw<-3 and sw >=-5 then oo = combine (ob,oo) ob1 = RotateAtPoint(ob,10,Centroid(o)) oo = combine (ob,oo) Insert Into Lonlat(obj) values (oo) Else oo = combine (ob,oo) ob1 = RotateAtPoint(ob,30,Centroid(o)) oo = combine (ob1,oo) Insert Into Lonlat(obj) values (oo) End If

End if

ữ ́ ̃ ̀ ̀ ̣ ́ ̀ ̀ ữ c ghi tuân t ượ ̀ ̣ ̀ ̃ ́ ̣ ́ ̣ ̀ ̀ ự c tinh trong môt tam giac.File nay se đ c l u vao đ ̃ ượ ư ườ ̣ Print File trong ́ khi môi gia tri biên dang xoay va sai sô ng dân ch a file chon ứ ́ ̣ ́ ̀ ̀ ̃ ̣

End Sub Tiêp theo se la phân ghi d liêu đo la ham ghi file d liêu Mapbasic va viêc nay se đ đ ượ tam giac.́ Công viêc tinh toan gia tri biên dang xoay cua l nghiên c u, viêc in file kêt qua, xuât hiên thi ra ban đô se đ tên BienDang trong code cua ch Sub BienDang

Dim x,y,vx,vy,svx,svy,ex,ey,exy,e1,e2,w,g as float Dim i as integer Call Laydulieutamgiac(TG()) Dim DDI() as Diem ReDim DDI(3)

SV: Trân Văn Phong

̉ ướ ̣ ́ ́ ́ ̣ ́ ̣ ́ ̀ ứ ́ ̣ ́ ̉ ́ ̉ ̣ ̉ ̀ ́ ̀ ̀ ng trinh. Ham nay đ ̃ ượ ử c đinh nghia nh sau: ̀ ượ ươ i tam giac trong vung c x ly băng ham co ư ̉ ̀ ̀ ̣ ̃

34

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

Dim d as integer Dim tle as float tle = tile/10 Dim se1,se2,sw,sg,sex,sey,sexy,xg,yg as float Dim V(),A(),NA(),MTN(),MS(),MTN1() as Matranb4 Dim st2,st3,st4,st6,st7,st8 as string*15 Dim st,st1,st5,st9 as string*8 Open File "ketqua.txt" for Output as #1 Print #1, "TenDagiac"+" "+" LON "+" " + " LAT "+" " +

"BienDangXoay_W"+" "+ " SaiSo_W "

Print #1, " Name "+" "+ " (Đô) "+" " + " (Đô) "+" " + "

(Radian/Năm) "+" "+ " (Radian/Năm) "

For i=1 to (ubound(TG)-1)

d = TG(i).d1

DDI(1).tendiem = DI(d).tendiem DDI(1).x=DI(d).x DDI(1).y=DI(d).y DDI(1).vx=DI(d).vx DDI(1).vy=DI(d).vy DDI(1).svx=DI(d).svx DDI(1).svy=DI(d).svy

d = TG(i).d2

DDI(2).tendiem = DI(d).tendiem DDI(2).x=DI(d).x DDI(2).y=DI(d).y DDI(2).vx=DI(d).vx DDI(2).vy=DI(d).vy DDI(2).svx=DI(d).svx DDI(2).svy=DI(d).svy

d = TG(i).d3

DDI(3).tendiem = DI(d).tendiem DDI(3).x=DI(d).x DDI(3).y=DI(d).y DDI(3).vx=DI(d).vx DDI(3).vy=DI(d).vy DDI(3).svx=DI(d).svx DDI(3).svy=DI(d).svy

Call Trongtam(DDI(),xg,yg) Create text

TG(i).tendiem (xg, yg) (xg + 0.2,yg + 0.2)

Font MakeFont ("Helvetica",1,12,Black,Green)

Call ChuyenDuLieuMatran(DDI(), V(),A(),MS()) Call Ngichdao(A(),NA()) Call NhanMT(NA(),V(), MTN()) Call NhanMT(NA(),MS(),MTN1())

ex=MTN(1).h1 ey=MTN(1).h4 exy = (MTN(1).h2 + MTN(1).h3)/2 e1= (ex+ey)/2 + sqr(exy^2 + ((ex-ey)/2)^2)

SV: Trân Văn Phong

̣ ̣

35

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

e2= (ex+ey)/2 - sqr(exy^2 + ((ex-ey)/2)^2) w= (MTN(1).h2 - MTN(1).h3)/2 g=atn(2*exy/(ey-ex))/2 g=g*(180/3.141)

sex=abs(MTN1(1).h1) sey=abs(MTN1(1).h4) sexy = (abs(MTN1(1).h2) + abs(MTN1(1).h3))/2 se1= (sex+sey)/2 + sqr(sexy^2 + ((sex+sey)/2)^2) se2= abs((sex+sey)/2 - sqr(sexy^2 + (abs(sex-sey)/2)^2)) sw= abs(abs(MTN1(1).h2) - abs(MTN1(1).h3))/2 sg=atn(2*sexy/abs(sey-sex))/2 sg=sg*(180/3.141) st= Str$(xg) st1= Str$(yg) st2= Str$(e1) st3= Str$(e2) st4= Str$(w) st5= Str$(g) st6= Str$(se1) st7= Str$(se2) st8= Str$(sw) st9= Str$(sg) Print #1, TG(i).Tendiem + " "+ st + " " + st1 + " " +"

" + st4 +" " + st8

'

g = -g Call Vemuiten(xg,yg,e1,e2,g,tle) Call Biendangxoay(xg,yg,w)

Next

Close File #1

Alter Menu Item BienDang Disable Alter Menu Item HienDiem Enable

c trinh bay ượ ̀ ̀ ̣ ́ ̀ ̉ ́ ̣ ̣ ́ ̀ ́ ̀ ̀ trên. Cac ham nay đ c chi ro trong code cua ch ̀ ượ ́ ̀ ̉ ̃ ̉ ̀ NG TRINH ng trinh. ƯƠ ́ ́ ̀ ̣ ́ ̀ ̃ ợ ̃ ̉ ̀ ́ ̣ ́ ̀ ́ ̀ ữ ư ̣ ́ ́ ̣ ̉ ́ ́ ́ ̣ ̀ ́ ợ ̀ ử ̉ ̀ ̣ ́ ̣ ̣ ́ ́ ́ ̣ ̣ ̣ ớ ̣ ́ ́ ̀ ̣ ́ ́ ̣ ̉ ̣ ữ ừ ́ ̣ ̣ ́ ̀ ̣ ́ ̀ ́ ứ ữ ́ ̉ ̀ ̀ ̀ ́ ̃ ̀ ̀ ̉ ́ ́ ̉ ̣ ́ ́ ̣ ́ ̣ ́ ̣ ̣ ̉ ự ườ ứ ử ̣ ́ ́ ̀ ́ ́ ̀ ́ ̣ ̀

End Sub Ngoai ra con môt sô ham nho khac phuc vu cho cac ham chinh đ ở ươ 2.2.2 ĐANH GIA VÊ THUÂT TOAN TRONG CH ̀ Cung do Mapbasic không hô tr mang 2 chiêu do đo thuât toan con kha dai va ̃ han chê tinh đa dang cua no trong tinh toan (nh trong ngôn ng lâp trinh C co hô tr mang 2 chiêu nên viêc tinh ma trân trong thuât toan rât ngăn gon ma s dung cho ́ đây chi han chê viêc tinh cho cac ma trân l n nhiêu bâc khac nhau rât linh hoat ma ̀ ở ́ trong tinh ma trân bâc 4). T đo ma nh ng thuât toan trong ch ng đôi ng trinh t ươ ươ kho hiêu va dai dong. Tuy nhiên no cung đap ng đ c nh ng yêu câu đê ra đê tinh ượ i tam giac đia đông l c cua khu toan thê hiên cac sô liêu biên dang xoay trong l ướ v c nghiên c u. Viêc phân tach cac ham x ly cho t ng vân đê giup ng i lâp trinh ừ ự dê dang trong viêc s a ch a va nâng câp.

̣ ử ữ ̃ ̀ ̀ ́

ƯƠ

NG 3 : GIAO DIÊN VA S DUNG CH

NG TRINH

CH ̀ Ử

ƯƠ

SV: Trân Văn Phong

̣ ̣ ̀

36

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

ng trinh em se minh hoa ch ử ươ ̉ ̣ ́ ̣ ̀ ̃ ̣ ̀ ự ́ ́ ̣ ̣ ́ ̣ ̣ ́ ̣ ̣ ́ Ự ̃ ́ ̣ ́ ̣ ̣ ̣ ̉ ̣ ướ ứ ́ ̣ ̣ ̉ ̉ ̃ ̀ Đia Đông ̀ ử ự ̣ ̣ ̣ ̣ ̀ ̣ ̣ ̉ ́ ́ ́ ̣

NG TRINH

ƯƠ

̣ ̀ ng trinh co giao diên trong khung đo hinh 3.1 ̃ ng trinh se Đê minh hoa cho cach s dung ch ươ tinh biên dang xoay trong môt tam giac đia đông l c theo sô liêu trong luân văn tiên si “BIÊN DANG KIÊN TAO HIÊN ĐAI KHU V C BIÊN ĐÔNG VIÊT NAM Nguyên Văn H ng THEO SÔ LIÊU DICH CHUYÊN GPS” cua nghiên c u sinh taị Phong ́ ma trong luân văn nay s dung đê tinh L c – Viên Đia Chât toan biên dang. 3.1 GIAO DIÊN CH Ch ươ ̉ ở ̀ ́ ̣ ̀

ng trinh Hinh 3.1: ̀ ̣ ̉ ̀ ng trinh khi chay lên Mapinfo năm ươ Giao diên cua ch ̀ ở ̀ ̣ ̀ ̀ ̉ ́ ́ ̀ ̣ ̀ ̀ ́ ̃ ̉ ́ ̀ ự ươ ̣ ̣ ̣ ̣ ̀ ́ ́ ̣ ự ̣ ́ ̉ ̣ ̣ ́ ́ Tinh (Hinh 3.1) thi ̉ ử ự đây co 2 l a chon nho đo la ̀ ở ̣ ̀ ́ ̣ ̉ ́ ử ́ ̣ ̣ ̉ ̣ ́ ̉ ́ ̣ ̉ ̣ ̉ ̉ ữ ự ̣ ̣ ́ ́ ̣ ̣

ử ̣ ướ ̉ ̉ ́ ̀ ́ ̣ ́ ̉ ̉ ̀

ƯƠ

̣ ̀ ử

NG TRINH ươ

̉ ̣ ̣ ̣ ̀ ̉ ̣ ̀ ̣ ̣ ự ́ ̣ ́ ̀ ́ ́ ̣ ̉ ́ ̣ ̀ ́ ̣ ́ ̣ ̣ ̣ ̉ ̣ Ự ứ ướ ́ ̣ ̣ ̉ ̉ ̃ ự ̀ Đia Đông ữ ̣ ̣ ̣ ̣ ̉ ̣ ̀ ̀ ̀ ́ ́ ̣ ư

SVn

SVe

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

̣

ươ ngoai cung cua menu chinh, co tên Ch la ̀ Tinh Bien Dang (Hinh 3.1), khi click chuôt vao tool nay no se sô xuông la cac l a ́ ự Ket Thuc C.trinh ng trinh cho tinh biên dang, chon : Tinh th c hiên viêc chay ch ̉ ̀ Thoat th c hiên viêc thoat tât ca c a sô th c hiên thoat tool khoi Mapinfo va ̀ Hien Mapinfo. Khi l a chon menu ự ự Thi Diem co nhiêm vu hiên thi cac điêm hay tôc đô chuyên dich ra c a sô ban đô ̀ Mapinfo va ̀ Tinh Bien Dang th c hiên viêc tinh biên dang xoay, in file d liêu kêt ́ ̉ i tam giac va biên dang xoay trong tam giac ra c a sô ban đô cua qua, hiên thi l Mapinfo. 3.2 S DUNG CH Ử ̣ ng trinh ta kiêm đinh băng viêc chay th môt Đê minh hoa cho viêc chay ch ̀ vi du. Đo la tinh biên dang xoay cho khu v c biên Đông theo ssô liêu GPS trong đê tai “BIÊN DANG KIÊN TAO HIÊN ĐAI KHU V C BIÊN ĐÔNG VIÊT NAM Nguyên Văn H ng THEO SÔ LIÊU DICH CHUYÊN GPS” cua nghiên c u sinh taị Phong ́ . Bang d liêu đâu vao gôm cac sô liêu L c – Viên Đia Chât nh sau : STT Tên điêm̉ STT1 BLV1 CDA1 DOHO HOCM NTUS KUNM PIMO TNML TNSM BRG1 BTS3 S102 S23R LNI1 JB21 XIAM YONG

Kinh độ Vy đỗ 114,331 107,723 106,652 106,616 106,560 103,680 102,797 121,078 120,987 116,725 120,601 121,963 121,558 120,606 106,539 110,306 118,082 112,335

11,429 20,128 8,692 17,507 10,849 1,346 25,030 14,636 24,798 20,702 18,520 20,438 22,037 22,645 11,822 25,186 24,449 16,834

Vn -10,57 -12,46 -9,84 -9,48 -13,75 -7,05 -17,77 4,70 -9,62 -12,90 9,80 27,90 39,30 -10,60 -13,47 -13,49 -14,40 -11,60

Ve 23,40 30,12 21,76 26,63 22,00 27,41 30,63 -29,00 28,66 29,70 -48,50 -38,50 -38,80 -22,90 25,83 33,01 32,10 30,10

1,34 1,29 1,32 1,31 1,36 0,85 0,79 0,90 0,80 0,10 0,40 0,60 0,30 0,10 2,19 0,15 0,10 0,10

1,44 1,36 1,39 1,37 1,47 0,87 0,80 0,90 0,80 0,20 0,40 0,90 0,30 0,10 2,50 0,07 0,10 0,10

SV: Trân Văn Phong

37

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

19 20 21

108,891 115,031 118,851

0,863 4,966 10,086

-9,20 -10,65 -13,60

0,95 2,10 1,00

1,26 3,30 0,70

TABA BRUN PUER Bang 3.1:

29,83 28,66 32,00 Sô liêu tôc đô chuyên dich theo sô liêu GPS khu v c biên Đông

ự ̉ ́ ̣ ́ ̣ ̉ ̣ ́ ̣ ̉ t la gia tri tôc đô chuyên dich theo h ướ ́ ̀ ́ ̣ ́ ̣ ̉ ̣ ̀ ượ ̀ mm/năm. SVe va SVn lân l ̀ ng Đông va ̀ t cac sai sô cua Ve va Vn,đ n vi la ̀ ượ ơ ́ ̣ ̀ ́ ́ ̉ ̀ ̣

̀ ữ ́ ữ ̀ ̉ ́ ̣ ̀ ̣ ̀ ́ ̀ ̣ ̉ ̀ ́ ̣ ử ̣ ̀ ự ̀ ̉ ̉ ̀ ̀ ̉ ̉ ̉ Trong đo Ve,Vn lân l Băc, đ n vi la ơ mm/năm. Ngoai bang sô liêu ta con co d liêu đâu vao n a đo la môt anh mô hinh sô đô cao DEM (Hinh 3.2) cho khu v c Biên Đông đê lam nên cho hiên thi c a sô ban đô trong Mapinfo.

Mô hinh sô đô cao DEM khu v c Biên Đông ự ̀ ̀ ́ ̣ ̉ Hinh 3.2: c khi s dung ch ử ướ ̣ ̀ ̀ ̣ ̣ ́ ̣ ̀ ̣ ở ư ́ ̉ ́ ̣ ̣ ̉ ươ ư ữ ở ̣ ̣ ̀ ̀ ̣ ̣ ̀ ́ ̃ ́ ̣ ̣ ̣ ̣ ̣ ng dân t ượ ư ̃ ớ ươ ươ ̀ ̀ ̣ ̀ ́ ng trinh đâu tiên ta tao môt file sô liêu Excel (Hinh Tr ́ bang 3.1 (L u y: file Excel l u đinh dang cua Excel 97 -2003 co 2.3) theo sô liêu đuôi.XLS) Sau khi tao file d liêu đâu vao xong ta kh i đông Mapinfo. Chon Tool\Run MapBasic Program (Hinh 3.3). Sau đo se xuât hiên hôp thoai chon file chay ch c l u co tên biendang.MBX rôi chon ng trinh (Hinh 3.4). Ta chon đ ượ i ch ng trinh đ ườ c giao diên nh trong hinh 3.5. ư ̣ Open.Ta đ ̀ ̣ ̀

Hinh 3.3: Giao diên chay ch ng trinh MapBasic ươ ̀ ̣ ̣ ̀

Hinh 3.4: Hôp thoai chon ch ng trinh chay ươ ̀ ̣ ̣ ̣ ̀ ̣

ng trinh khi kh i đông ươ ̀ ̣ ̀ ̣ ng trinh ta tao môt ban đô m i co hê toa toa đia ly Giao diên ch ươ ́ ở ̀ ớ ̣ ̀ ̣ ̣ ̉ ́ ̣ ̣ ̣ ̣ Tr (Lon/Lat) đ Hinh 3.5: c khi chay ch c minh hoa băng cac hinh d i đây: ướ ượ ướ ̣ ̀ ́ ̀

Hinh 3.6: Giao diên l a chon tao môt ban đô m i ̀ ớ ̣ ự ̀ ̣ ̣ ̣ ̉ ̣ ự ̣ File\New Table... đê tao môt ban đô m i.Se xuât hiên hôp thoai l a ̀ ớ ̉ ̣ ̣ ̉ ̃ ́ ̣ ̣ Ta chon chon tao môt Table m i (Hinh 3.7): ớ ̣ ̣ ̣ ̀

Hinh 3.7: Hôp thoai tao môt Table m i ớ ̀ ̣ ̣ ̣ ̣ ớ ̣ ̣ ́ ̣ ̉ ̣ ̣ ̃ ́ ̣ ̣ Create đê tao môt Table m i.Se xuât hiên ng ban đô, Click ̣ Add Field đê tao môt tr ̣ ườ ̣ ự ̣ ̣ ̀ ̉ ̣ ̉ ̀ Hôp thoai xuât hiên ta click chon hôp thoai l a chon (Hinh 3.8). Ta chon chon Projection đê chon hê qui chiêu va hê toa đô cho Table. ̣ ̉ ̣ ̣ ́ ̀ ̣ ̣ ̣ ̉

Hinh 3.8: Hôp thoai l a chon tao Table m i ớ ̣ ự ̀ ̣ ̣ ̣

̣ ự ̀ ̣ ̣ ̣ ̣ ̣ đây ̣ ̣ ́ ̀ ̣ ̣ ̣ ̣ ̀ ự ̀ ̣ ̣ ̣ ̣ Ok se xuât hiên hôp thoai chon đ Hôp thoai l a chon hê toa đô cho Table Hinh 3.9: muc ̣ Category ta chon hê qui chiêu la hê toa đô đia ly ́ Longitude ở ̣ Longitude ̣ Category Member la l a chon hê toa đô ta chon ng dân va l u tên Table ̀ ư ườ ́ ̃ ́ ̣ ̣ ̣ ̣ ̃ Ở /Latitude Va muc /Latitude.Sau đo ta click (Hinh 3.10). ̀

SV: Trân Văn Phong

Hinh 3.10: Chon đ ̣ ườ ng dân va l u tên Table m i ớ ̀ ư ̀ ̃

38

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

c chon se đ ̀ ở ̃ ượ ̣ Save luc nay trong th muc đ ư ́ ̣ ̣ ́ ̣ ượ ữ ̀ ̣ ́ ̣ ̉ ̀ ́ ̉ ́ ́ ̀ ̉ ̉ ̀ ươ ̃ ́ ̣ ̣ ̀ ̣ Tinh Bien Dang\Tinh\Hien Thi Diem. Luc nay ch ươ ̀ ́ ̀ ̀ ̃ ́ ̣ i file sô liêu đâu vao tinh biên dang, file nay đ ng dân t ườ ̣ ̣ ̣ ̣ ́ ̣ ̀ ̀ ́ ́ ̣ ̀ ̃ ớ xls. Khi chon đ ̣ ượ ữ ̣ ́ ̣ ̣ ̣ ̀ ̀ ́ ́ ́ ̣ ̣ Open (Hinh 3.12), Khi đo se xuât hiên môt hôp thoai hoi “ ̀ ́ ̃ ́ ̣ ̣ ̣ ̣ ̉ Co” đê hiên thi tôc đô chuyên dich, Chon “ ̣ ̉ ̣ ̣ ́ ̣ ̉ ̣ ̣ i điêm (Hinh 3.13). c tao cac file Ta click chon Lonlat.DAT,Lonlat.ID,Lonlat.Map, va ̀ Lonlat.TAB la nh ng têp liên quan đên table, Lonlat.Luc nay c a sô ban đô trong d liêu, ban đô, liên kêt cua Table co tên ử ữ Tinh Bien Dang Mapinfo se xuât hiên nh hinh 3.11. Ta kh i chay ch ng trinh ở ư ̀ ng trinh se xuât hiên băng chon ượ môt hôp thoai chon đ c c file d liêu đâu vao cho tinh toan biên dang ta chon co đinh dang. Ban co muon the chon hien toc do dich chuyen” Chon “ Khong” đê chi hiên thi l ̣ ướ ̉ ̉ ̉ ̉ ̀

Hinh 3.11: Giao diên sau khi tao Table m i tên Lonlat ớ ̀ ̣ ̣

Hinh 3.12: Hôp thoai chon file sô liêu đâu vao ̀ ̣ ̣ ̣ ́ ̣ ̀ ̀

̣ ự ̀ ̣ ̣ ́ ̉ ̣ ́ ̣ ̣ ̉ Hôp thoai l a chon co thê hiên tôc đô dich chuyên hay không ̣ Khong” thi ch ̀ ươ ́ ̀ ̣ ̃ ̉ ̣ ̀ ̣ ́ ̉ ̉ ̉ ̀ ̉ ̀ ̀ ́ ̣ ̉ ̉ ̀ ̣ ́ Hinh 3.13: ng trinh chay se hiên thi toan bô cac điêm đo ra Nêu ta chon “ c a sô ban đô cua Mapinfo (Hinh 3.14) gôm ky hiêu điêm, tên điêm đo va vi tri cua ̉ ử no trên c a sô ban đô, khi phong to hinh ta nhin ro h n (Hinh 3.15). ̃ ơ ử ́ ̉ ̉ ̀ ́ ̀ ̀ ̀

Hinh 3.14: L i điêm đo khi chay ch ng trinh ướ ươ ̀ ̉ ̣ ̀ ̃ ơ ử ́ ́ ̣ ́ ̉ ̉ ̀ ̀ ́ ̉ ̀ Khi phong to môt goc trên c a sô ban đô nay ta thây ro h n tên điêm va ky hiêu cua điêm đo trong c a sô ban đô nay (Hinh 3.15). ử ̣ ̉ ̉ ̉ ̉ ̀ ̀ ̀

Hinh 3.15: ̀ ́ ̣ ́ ̀ Phong to môt goc hinh 3.14 c 4 điêm đo đo la ́ ượ ̀ ̉ ́ ượ ữ ̀ ̉ ́ ̣ ̀ ̀ ́ ̣ ̉ ̣ ́ ̀ LNI1, HOCM, CDA1,STT1 ̀ c ky hiêu điêm b i môt châm đen va ở ̣ Co” thi trên ́ ̀ ̀ ́ ̣ ̣ ̉ ̀ ́ ̀ ng dich chuyên trong l i đo (Hinh 3.16). Trong hinh 3.15 ta quan sat đ la 4 điêm đo co trong d liêu file đâu vao, đ ch co mau xanh,nên trăng.Trên hôp thoai hoi (Hinh 3.13) nêu ta chon “ ữ c a sô ban đô se xuât hiên cac đ ử ́ ườ ướ ̉ ̀ ̀ ̃ ́ ̣ ̣ ̉ ̀

Hinh 3.16: L i tôc đô chuyên dich ướ ̀ ́ ̣ ̉ ̣ ̣ ướ ́ i dich chuyên ta se quan sat ́ ̣ ́ ̉ ̉ ̀ ̉ ̣ ̉ ̃ c ro h n hinh dang mui tên thê hiên tôc đô chuyên dich (Hinh 3.17). Khi phong to môt goc cua ban đô thê hiên l đ ượ ̃ ơ ̀ ́ ̃ ̉ ̣ ́ ̣ ̉ ̣ ̀

Hinh 3.17: Phong to môt goc hinh 3.16 ̀ ́ ̣ ́ ̀ ̣ ườ ̀ ́ ́ ̣ ̣ ́ ́ ̉ ́ ̃ đâu mui tên. ̣ ở Ở ̀ ̀ ̀ ́ ̣ ́ ̀ ̃ ́ ̉ ́ ng thê hiên tôc đô chuyên dich tai vi tri điêm đo đ ượ ̀ ̃ ́ ̉ ̣ ́ ̣ ̉ ̣ ̣ ̣ ́ ̉ ̀ ướ ̣ ̉ ̉ ̃ ́ ̣ ̉ ̉ ̣ ́ ̉ ̀ ̀ ̀ ̣ ̉ ̣ ́ ́ ̣ ̣ ̉ ̣ ̣ ́ ̉ ́ ng mui tên đêu đ ̀ ườ ượ ̃ ̀ ́ ̣ ̀ ̣ ̉ ̣ ́ ̣ ̀ ̣ ̉ ́ ́ ̉ ̣ ̉ ̀ ̀ ́ ̣ ̉ ́ ̉ c).

39

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

Trên hinh 3.17 ta quan sat thây tai vi tri cac điêm đo co môt đ ng mui tên mau đen va hinh elip mau xanh luc xuât hiên đây ta co thê thây ̉ hinh mui tên chinh la đ c thê ̀ ườ ng dich chuyên cua vi tri điêm đo, hiên trên ban đô. H ng cua mui tên chinh la h ̀ ướ con hinh elip mau xanh luc thê hiên sai sô tôc đô dich chuyên tai vi tri điêm đây. Elip c phong đai theo cung môt ty lê nhât đinh (vi thông sô va đ ́ ́ dich chuyên rât be nên khi hiên thi trên ban đô cân phong đai đê co thê quan sat đ ượ SV: Trân Văn Phong ̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

̣ ướ ̉ ượ ự ̉ ̣ ́ ́ ̉ ̣ ̉ ̀ ́ ̣ ̉ ̉ ̉ ̀ ̃ ̀ ̣ ́ ̀ ́ ̉ ̀ ̀ ́ ̣ ̀ ̀ ̀ c trinh bay phia d i. c quan sat th c tê ta cho thê hiên thêm ban Đê minh hoa l ự đô sô đô cao DEM cua khu v c Biên Đông lên ban đô se cho ta nhin môt cach tr c quan h n (Hinh 3.18). Cach th c thêm ban đô mô hinh sô đô cao vao lam nên minh ơ hoa se đ ̃ ượ i dich chuyên đ ự ứ ́ ướ ̀ ở ̣ ̀

Hinh 3.18: L i tôc đô dich chuyên trên nên ban đô đô cao khu v c biên Đông ướ ự ̀ ́ ̣ ̣ ̉ ̀ ̉ ̀ ̣ ̉ ̣ ̀ ̣ ́ ̀ ng trinh trong l a chon menu ự ươ c kich hoat đâm mau va menu ́ ̣ ̣ ̀ ̀ ̣ ̣ ̀ ờ ữ ứ ̀ ̉ ́ ̣ ̣ ̣ ̣ ̣ ́ ̉ ̀ ̉ ́ ́ ̣ ̀ ̣ Tinh Bien Dang đê tiêp tuc chay ch Hien Thi Diem, luc nay menu ́ Hien Thi Diem bi vô hiêu hoa Tinh Bien Dang ta tao file d liêu i điêm đo hinh 3.14) đê co tiêp tuc (Hinh 2.4).Sau khi tao ươ ng ữ ̣ ̣ ́ ̣ ̉ ́ ̣ ̣ Sau khi chay ch Tinh Bien Dang se đ ̃ ượ va m đi (Hinh 3.19).Đê tiêp tuc chay ch c năng chon tam giac (Quan sat l ́ ướ file d liêu chon tam giac ta chon menu trinh (Hinh 3.18). ̀ ̀

Hinh 3.19: Menu cua ch ng trinh ươ ̀ ̉ ̀ ̣ Tinh Bien Dang trong Menu Tinh (Hinh 2.19) Ch ươ ̣ ̀ ̀ ng dân t ng trinh se ̃ ớ i file d liêu chon tam giac v a m i ữ ừ ườ ̃ ớ ́ ̣ ̣ ̣ ̣ ̣ ̣ ̣ ́ c tao (Hinh 3.20). Khi chay chon xuât hiên môt hôp thoai chon đ đ ượ ̣ ̀

Hinh 3.20: Hôp thoai chon m file d liêu chon tam giac ữ ở ̀ ̣ ̣ ̣ ̣ ̣ ́ File chon tam giac.xls” Rôi click chon ̃ ̣ ́ ̀ ở ươ ̣ ̀ ̉ ̉ ̀ ́ ̀ ̉ ̣ ́ ̉ ̀ i tam giac co cac canh mau đo đ i tam giac nay đ ̉ ượ ướ ́ ́ ́ ̣ ̀ ́ ̀ ườ ̃ ư ̣ ̀ ̀ ́ ̣ ̣ ́ ̀ ̀ ̣ ̃ ́ ̣ ̣ ́ ̣ ̀ ́ ̣ ̉ ́ ̣ ́ ̣ ̀ ̀ c thê hiên khac nhau. ̣ ̀ ́ ̣ ̉ ́ ̣ ̉ ̣ ́ ̃ ơ ́ ̣ ́ ̉ ̀ ̃ ́ ́ ̉ ̣ ́ ̣ ̣ Open (Hinh̀ Ta se chon file co tên “ ̣ ng trinh c a sô ban đô luc nay hiên thi kêt qua la môt 3.20). Sau khi kh i chay ch ử ượ c c liên kêt v i nhau (L l ́ ớ ướ chon theo ng i dung đa l u vao file sô liêu chon tam giac(Hinh 2.4)) (Hinh 3.21). Tai môi tam giac tai vi tri trong tâm la ky hiêu cua biên dang xoay, ky hiêu nay tuy thuôc vao gia tri cua biên dang xoay ma đ ̀ ượ Khi phong to môt goc ban đô ta se quan sat ro h n cach thê hiên biên dang xoay trong môt tam giac (Hinh 3.23). ̣ ́ ̀

Hinh 3.21: L i tam giac thê hiên biên dang xoay ướ ̀ ́ ̉ ̣ ́ ̣ ́ ́ ́ ̣ ̉ ́ ̣ ̀ ́ ́ ̃ ̀ Trong đo cac ky hiêu cua biên dang xoay trong hinh 3.21 co y nghia sau (Hinh 3.22):

Hinh 3.22: Ky hiêu biên dang xoay ̀ ́ ̣ ́ ̣

SV: Trân Văn Phong

Hinh 3.23: Phong to môt goc ban đô cua hinh 3.21 ̀ ́ ̣ ́ ̉ ̀ ̉ ̀ ử ̀ ̉ ̣ ́ ̉ ̉ ̣ ̉ ̉ ̀ ̉ ̀ i tam giac va thê hiên tôc đô xoay.Cung đo ch ̣ ướ ́ ươ ̉ ̉ ̉ ́ ̀ ̉ ̣ ́ ̣ ̀ ̀ ̃ ữ ́ ̣ ̣ ́ ̉ ̉ ́ ́ ́ ̣ ́ ̣ ̀ ́ ̉ ́ c l u vao đ ̀ ketqua.txt” đ ườ ̀ ́ ̣ ̣ ̀ ̃ ́ ̣ ́ Hinh 3.21 thê hiên kêt qua hiên thi trên c a sô ban đô cua Mapinfo băng kêt ng trinh cung qua cua hiên thi l xuât môt file d liêu kêt qua cua tinh toan tôc đô biên dang xoay va sai sô cua no, file ng dân co ch a file d liêu nay co tên măc đinh la “ ữ ứ ượ ư c chon, đâu vao. File d liêu kêt qua nay cho ta biêt cac thông sô vê tên tam giac đ ́ ượ ữ ̀ ̀ ̣ ́ ̉ ̀ ́ ́ ́ ̀ ̣

40

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

̣ ̃ ̣ ̣ ̉ ́ ́ ́ ̣ ́ ̣ ̀ ́ ̉ ́ c minh hoa hinh 3.24 : kinh đô,vi đô trong tâm cua tam giac đo, gia tri biên dang xoay va sai sô cua no trong tam giac đ ̉ ượ c tinh. File d liêu kêt qua đ ữ ́ ượ ̣ ở ́ ̣ ́ ̀

File kêt qua tinh biên dang xoay va sai sô ̀ ́ ̉ ́ ́ ̣ ̀ ́ Hinh 3.24: hinh 3.21 thê hiên l Ở ̣ ướ ̀ ̉ ́ ̀ ́ ̣ ̉ ̣ ́ ̣ ́ ̣ ự ̉ ́ ́ ́ ̀ ̣ ̀ ̀ ̣ ̀ ̉ ́ ̉ ự ươ ̀ ̀ ̃ ́ ̣ ̀ ̀ ̀ ự ự ́ ̣ ̉ ́ ̀ ̣ ̉ ̉ ̀ ̣ ờ ̣ ̣ ̉ ̉ ̀ ̀ ́ ̉ ng trinh.D i đây la trinh t ử cac b c th c hiên: ́ ướ ự ̣ ̀ ̀ ̀ ̣ ươ ử ̣ ̀ ̃ ́ ́ ̉ ̣ ̉ ̉ ́ ̣ ̉ ́ ̀ ̣ ̃ ở ừ ́ ̀ ́ ̉ thanh menu chinh cua Mapinfo ta chon ng dân t i file Table co ch a d ̃ ớ ườ ̀ ̣ ̣ ̣ ̃ ́ ̣ ̣ ́ ̣ ̉ ̀ ̀ ́ ̣ ̀ ́ ̉ ̉ ̀ ̀ c hiên thi trên c a sô ban đô ̃ ượ c ̣ File\Open ữ ứ ̣ Open (Hinh 3.26) luc nay c a sô ban đô hiên ̣ ̀ ử i tam giac trong đo (Hinh 3.27). i tam giac cung ky hiêu thê hiên tôc đô biên dang ̣ xoay cua khu v c tinh toan, vân đê đăt ra la chen môt nên ban đô th c tê đê minh hoa ̀ ự cho khu v c nghiên c u.Trong phân đâu ch ng 3 đa co mô ta d liêu đâu vao gôm ̉ ữ ứ co môt anh sô mô hinh đô cao (DEM) cua khu v c Biên Đông va khu v c lân cân. la đ a file anh lên c a sô Mapinfo lam nên cho kêt qua sau viêc Nhiêm vu bây gi ̣ ̀ ư chay ch ự ướ ươ ng trinh đa co kêt qua đ Sau khi chay ch ̉ ượ trong Mapinfo, tiêp theo ta se m môt Table co ch a anh sô mô hinh đô cao đa đ ́ ứ Register (đăng ky). Đâu tiên t (Hinh 3.25) môt hôp thoai se xuât hiên chon đ liêu ban đô mô hinh sô đô cao, ta chon thi ban đô mô hinh sô đô cao cung l ướ ̣ ̉ ̀ ̀ ́ ̣ ̀ ́ ́ ̀

Hinh 3.25: Menu m môt Table trong Mapinfo ở ̀ ̣

Hinh 3.26: Hôp thoai chon đ ng dân t i Table cân m ̣ ườ ̃ ớ ở ̀ ̣ ̣ ̀

Hinh 3.27: L i tam giac trên ban đô mô hinh sô đô cao ướ ̀ ́ ̉ ̀ ̀ ́ ̣ ̀ ớ ̃ ́ ̣ ́ ̉ ́ ̀ ̀ ̃ ̉ ̉ ̣ ữ ̀ ự ữ ́ ̀ ̀ ̉ ́ ́ ̉ ́ ̀ ̣ ̣ Khi đa co môt kêt qua cuôi cung trên hinh 3.27 ta se in ban đô v i nh ng ty lê khac nhau va tuy trên nh ng ban giây co khô in khac nhau tuy thuôc vao l a chon cua ng i dung, nh ng công cu nay co hô tr săn trên Mapinfo. ̃ ợ ườ ữ ̉ ̀ ̣ ̀ ́ ̃

CH

NG 4:

ƯƠ

ĐANH GIA VA PHÂN TICH KÊT QUA CH

NG TRINH

ƯƠ

́ ́ ̀ ́ ́ ̉ ̀

ĐAT Đ

C ̣ ƯỢ NG TRINH ƯƠ

̉ ̀ ̣ ́ ̉ ̀

Ư Ư

̉ ng trinh chay nhanh va ôn đinh trên nên cua phân mêm Mapinfo

4.1 U ĐIÊM VA HAN CHÊ CUA CH 4.1.1 U ĐIÊM ươ

- Ch - Giao diên dê nhin, phân mêm t ̣ - Kêt qua tinh toan biên dang xoay co đô chinh xac cao (phu h p v i muc

- Cac sô liêu đâu ra mang tinh th c tê cao (v a xuât luôn ra c a sô d liêu

SV: Trân Văn Phong

̀ ̣ ̀ ̉ ̣ ̀ ̉ ̀ ̀ ́ ớ ̃ ử ườ ươ ̣ ̃ ̀ ̀ ̀ ́ ̣ ̀ ng đôi dê s dung đôi v i ng ̀ ợ i dung ớ ́ ̉ ́ ́ ́ ̣ ́ ̣ ́ ́ tiêu tinh toan đê ra) ́ ́ ̀ ̉ ữ ừ ự ử ́ ́ ̣ ̀ ́ ́ ́ ̣ kiêu ban đô va file d liêu kêt qua) ữ ̉ ̉ ̀ ̀ ̣ ́ ̉ 4.1.2 HAN CHÊ ̣ ́

41

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

- Ch tr c tiêp trên nên Window (do vây cân phai cai đăt Mapinfo tr ự dung)

- Vân ch a băt đ - Ch

ươ ự ̀ ̃ ̣ ̀ ̣ ̉ ̣ c khi s ng trinh vân chay d a trên la môt tool cua Mapinfo, không chay ử ướ ́ ̀ ̣ ̀ ̉ ̀ ̣ ̣ ̀ ữ ư ̃ ́ ượ ̃ ́ ́ ̃ ̣ ̃ ̉ ̣ ơ ̉ ự ươ ́ ữ ̀ ̃ ̀ ̣ ̣ ̣ thuôc tinh trong viêc nhâp cung nh xuât d liêu ư ̣ ́ ̣ ̣ ̃ ̣ c hêt cac lôi vê d liêu cung nh lôi hiên thi ư ng trinh vân con dang s khai, ch a co nh ng công cu đê l a chon ư ́ ữ - Kêt qua tinh sai sô vân con ch a chuân xac. ́ ̉ ́ ́ ̃ ̀ ̉ ́ ̀ ữ ̣ ́ ̀ ̣ ́ ̀ ̀ ́ ờ ứ ̣ ̣ ̃ ́ ́ ́ ̣ ̀ ư ng răng trong t ng lai gân se khăc phuc đ ̀ ờ ưở ượ ươ ữ ̀ ̀ ̀ ̃ ́ ̣ ̣ ́

C

́ ́ ́ ́ ̉ c cua ch ̣ ượ ươ ̉ ́ ́ ́ ̉ ̉ ̀ ́ ́ ̉

̣ ƯỢ ̉ ng trinh, ta so sanh kêt qua cua c v i kêt qua tinh cua bô phân mêm QOCA, kêt qua so sanh

ng trinh tinh đ ớ ̀ ́ ́ ̉ ́ ̉ ̣ ̀ ̀ ́ ̉ ́ ̉ ̣ ̉

ư ng trinh, tuy nhiên nh ng han chê nay la do Trên la nh ng han chê trong ch ữ ươ han hep vê th i gian cung nh kiên th c, nêu co th i gian tiêp tuc nghiên c u đê tai ̀ ứ nay em tin t ́ c nh ng han chê noi trên. 4.2 PHÂN TICH ĐANH GIA KÊT QUA ĐAT Đ Đê đanh gia kêt qua đat đ ch ươ nay đ ̀ ượ STT ́ ̣ ́ ̣ ̣ ̣ ́ ́ Kinh độ trong tâm (degere) Vy đỗ ̣ trong tâm (degere) Biên dang xoay tinh theo QOCA (radian/năm) ượ c thê hiên trong bang 4.1 : Tên tam giać Biên dang xoay tinh theo ươ ̀

ng trinh ch (radian/năm) 4.53437e-009 TG_01 105.712 20.8883 4.53e-09 1

2 TG_02 106.942 23.448 -9.18381e-010 -1.01e-09

3 TG_03 110.121 20.716 1.7459e-009 1.77 e-09

4 TG_04 113.122 20.9073 1.60446e-009 1.61 e-09

5 TG_05 115.038 23.4457 3.71338e-009 3.71 e-09

6 TG_06 108.891 18.1563 6.90789e-009 6.88 e-09

7 TG_07 111.094 15.2567 8.76603e-009 8.97 e-09

SV: Trân Văn Phong

8 TG_08 114.464 16.3217 4.53523e-009 5.55 e-09

42

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

9 TG_09 109.162 13.586 -1.21725e-009 -1.18 e-09

10 TG_10 109.174 10.6477 4.36526e-009 1.23 e-09

11 TG_11 108.221 7.15567 -4.71115e-009 -4.81 e-09

12 TG_12 108.967 4.546 -1.77868e-009 -1.81 e-09

13 TG_13 112.751 5.75267 -2.45351e-009 -2.49 e-09

14 TG_14 116.071 8.827 3.363e-010 2.83 e-10

15 TG_15 118.087 12.0503 -5.83877e-008 -5.85 e-08

16 TG_16 117.378 15.589 1.29965e-009 1.53 e-09

17 TG_17 119.468 17.9527 -6.91522e-008 -7.18 e-08

18 TG_18 119.628 20.4197 -1.19375e-008 -

19 TG_19 119.757 22.5123 2.00909e-008 -

20 TG_20 118.598 23.3163 -3.48413e-009 -

SV: Trân Văn Phong

Bang 4.1: Bang so sanh kêt qua biên dang xoay v i phân mêm QOCA ớ ̉ ̉ ́ ́ ̉ ́ ̣ ̀ ̀ ươ ̀ ̀ ̉ ́ ́ ̉ ́ ́ ̣ ̀ ́ t ́ ứ ự ừ ự ́ ́ ́ ̀ ̣ ̀ ́ ̣ ̣ ̀ ́ ́ ự ự ượ ữ ̉ ́ ́ ̉ ́ ́ ̀ ́ ̉ ́ ̀ ̀ ̉ ̣ ̀ ́ ̃ ́ ̣ ́ ượ Ự ̣ ̣ ̣ ̉ ̣ ́ ̣ ̣ ướ ứ ̉ ̉ ̃ ng trinh ta thây Nhin vao bang so sanh kêt qua tinh biên dang xoay trong ch 1-17 la co s l a chon vê tam giac đia đông l c la giông cac tam giac co sô th t c trong nh ng tam giac nay. Kêt qua tinh nhau nên ta chi so sanh kêt qua tinh đ theo phân mêm QOCA đ c thê hiên trong chuyên đê tiên si : “BIÊN DANG KIÊN TAO HIÊN ĐAI KHU V C BIÊN ĐÔNG VIÊT NAM THEO SÔ LIÊU DICH .Theo PGS.TS Phan CHUYÊN GPS” cua nghiên c u sinh Nguyên Văn H ng ́ thi cac kêt qua nay năm trong s chênh lêch e-10 nên Trong Trinh-Viên Đia Chât ự ̣ ̣ ̣ ̣ ̀ ́ ́ ̉ ̀ ̀ ̣

43

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

ng trinh. Va kêt qua mang đô chinh xac t ươ ́ ớ ́ ươ ́ ̉ ́ ̣ ̀ ̀ ́ ̉ ̣ ́ ́ ừ ́ ớ ̀ ươ ng đôi cao. ́ ng đôi l n (3.12e-09) tuy vây kêt ̉ ́ ̀ ̣ ̣ ̣ c b i vân năm trong pham vi sai sô. ̣ ượ ở ̉ ̀ ̃ ́ ̉ ̣ ̃ ̀ ̣ ́ ươ ̀ ́ ́ ́ ́ ̉ ́ ́ ̉ ̀ ̀ ́ ̣ ư ́ ̉ ́ ̀ ̀ ̣ ̀ ́ ̣ ̀ ươ ư ̀ ́ ́ ́ ̀ ́ ̣ ̣ ̣ ̉ ̀ ̀ ̀ ́ ́ ́ ̀ ng trinh đa đat đ ̀ ươ ̣ ượ ́ ́ ̀ ̃ ̣ ̀ ̀ ́ ́ ̣ c muc tiêu đê ra la tinh biên dang ̀ ử ̉ ư ự ̣ ́ ̣ ̣ ̀ ́ ̉ ́ ́ ̉ ́ ́ co thê châp nhân đôi v i ch Tr điêm tam giac TG_10 thi đô chênh lêch la t qua nay vân co thê châp nhân đ ng trinh con khac biêt kha l n Vê đanh gia sai sô, do kêt qua tinh toan cua ch ́ ớ v i kêt qua tinh trên phân mêm QOCA do vây em không đ a vao so sanh, tuy vây ớ phân tinh toan sai sô la phân t ng đôi ph c tap nên hiên tai em ch a thê hoan thanh ứ phân tinh toan sai sô nay. Đanh gia chung thi ch xoay trong môt tam giac đia đông l c, va kêt qua tinh toan cua no co thê đ a vao s dung trong th c tê. ự ̣ ́

́ ̣ ̀ ́ ̣ ng trinh theo nhân đinh chung đa đap ng đ ươ ́ ứ ̀ ̣ ̣ ̃ ̀ ́ ́ ̣ ng trinh t ự ̀ ́ ̉ ́ ̣ ́ ̣ ̣ ̀ ́ ườ ́ ớ ̣ ̀ ̃ ̉ ̀ ́ ̉ ̉ ́ ̣ ́ ́ ̀ ̣ ứ ư ̣ ́ ̃ ́ ̀ ̣ ̣ ́ ̉ ̀ c hiêu chinh tuy nhiên no cung đap ng đ ượ ư ượ ̃ ̣ ̉ ́ ̃ ̣ ́ ̉ ́ ́ ự ́ ứ ươ ̣ ̣ ́ ̣ ̣ ̀ ̃ ̣ ̀ ự ̣ ́ ̣ ̣ ̣ ̀ ̃ i lâp trinh viên). ́ ̣ ̣ ̣ ́ ̉ ̣ ̀ ườ ̃ ừ ̣ ̀ ́ ́ ̣ ̣ ́ c đôi v i cac đa giac l n h n (t ứ ư ượ ́ ớ ́ ́ ́ ̃ ́ ̀ ̣ ̣ đông chon đ ng trinh vân d ng lai ̣ ở ơ ư ự ́ ̉ ́ ́ ̉ ̣ ̣ ́ ̀ ́ ́ ̣ ̀ ́ ̀ ̣ ́ ̀ ̣ ́ ̀ ́ ́ ̣ ́ ứ tinh biên dang xoay cho môt tam giac, giac, ngu giac...) va viêc chon tam i tam giac.Va tinh ̉ i tinh biên dang co thê môi trong tâm tam ̉ ở ́ ̣ ́ ̣ ̉ ́ ̣ ̉ ̃ ̣ ượ ượ ́ ́ ̀ ữ ươ ́ ́ ́ ̀ ̣ ́ ̉ ̀ c l ượ ướ ướ c gia tri cua biên dang xoay ch không phai chi c. ̉ ữ ượ ứ ́ ̣ ́ ̀ ́ ̀ ̣ ̀ ứ ơ ̣ ̀ ̀ ́ ̀ ́ ̣ ̣ ́ ̣ ươ ờ ́ ̣ ̀ ̀ ̣ ́ ̀ ̉ ̣ ̣ ̉ ́ ́ ̣ ự ữ ̀ ờ ư ̉ ̀ ̣ ̣ ̉ ́ ̉ ̣

́ ữ ướ ờ ́ ̀ ́ ̣ ̀ ̀ ̀ ̀ ươ ư ự ̉ ̀ ̀ ̣ ̀ ̉ ̣ ng trinh nh sau: Xây d ng ch ự ̉ ̣ ́ ̀ ̣ ̣ ̀ ́ ̀ ̀ ứ ̀ ̀ ̀ ̉ ̣ ́ ́ ̣ ̀ ́ ́ ̀ ̉ ư ̣ ự ữ ̀ ̉ ̣ ̀ ́ ̉ ́ ̉ ̀ ́ ́ ̀ ̣ ̣ ̣ ́ ́ ̀ ̀ ̣ ươ ̀ ư ự ́ ̃ ̀ ́ ̉ ̉ ́ ̀ ứ ́ ̀ ́ ̣ ́ ̣ ́ ̣ ̉ ́ ́ ứ ứ ượ ư ́ ̣ ́ ̣ ́ ́ ̣ ̀ ́ ́ ̀ ứ ứ ̣ ̣ ́ ́ ̉ ̣ ́ ̉ ự ự ́ ̉ ́ ̣ ́ ́ ̣ ́ ̣ ̣ ́

KÊT LUÂN VA KIÊN NGHI c yêu câu tinh biên dang Ch ượ ̃ xoay va sai sô cua no trong môt tam giac đia đông l c. Ch ng đôi dê ươ ươ i dung. Kêt qua cua no mang đô chinh xac va tin cây s dung va dê hiêu đôi v i ng ử cao. Tuy nhiên han chê vê th i gian cung nh kiên th c con han hep nên kêt qua nay ̀ ờ vân ch a đ c muc đich cua tinh biên ng trinh vân ch a đa dang trong dang xoay trong môt tam giac đia đông l c. Ch ư ̉ phân l a chon cac công cu (nh viêc chon mau ch , c ch , đ ng, font... vân đê ữ ỡ ữ ườ ư chê đô măc đinh khach quan cua ng Tuy vây ch ươ ch a tinh đ ́ ớ giac phai mang tinh chât thu công, ch a t biên dang con thiêu phân nôi suy, đo la tai bât ky đâu trong l xac đinh đ giac tinh đ ̉ ng trinh, tuy nhiên đê Tât ca nh ng yêu tô trên đêu la nh ng han chê cua ch khăc phuc đ c no cân nh ng kiên th c chuyên sâu vê ngôn ng lâp trinh ữ ữ Mapbasic, s dung phân mêm Mapinfo, kiên th c vê trăc đia, đia thông kê,c hoc, ử ng đôi dai đê thuc hiên. Do s hiêu biêt co han toan hoc...va cân môt th i gian t cua minh va th i gian han hep nên em ch a thê khăc phuc đ ́ c nh ng điêm han chê ̣ ượ nay.̀ ́ ng phat Nêu con th i gian tiêp tuc nghiên c u vê đê tai nay em co nh ng h ứ ng trinh trên môt nên tang riêng biêt co triên ch ́ ươ ́ thê chay tr c tiêp trên Window ma không phu thuôc vao cac phân mêm khac (Mapinfo). Điêu nay đoi hoi môt kiên th c trăc đia thâm sâu vi nêu tinh trên nên tang ́ riêng nh vây đoi hoi phai t xây d ng môt ham tinh khoang cach gi a 2 điêm bât ̉ ự ky trên trai đât va trên nh ng hê toa đô chiêu khac nhau (Điêu nay th c hiên trên ự ữ ̃ ng trinh xây d ng se Mapinfo rât dê dang, đây chinh la u điêm cua no). Ch ̉ nghiên c u tinh nhiêu gia tri biên dang kiên tao trong vo Trai Đât ch không phai t,... va nghiên c u tinh biên biên dang xoay, nh biên dang chinh, biên dang tr ̣ dang trong môt đa giac bât ky ch không phai trong môt tam giac. Nghiên c u thuât toan Delaunay đê co thê l a chon cac đa giac môt cach t ́ đông mang đô chinh xac SV: Trân Văn Phong

44

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀

t nghi p Khoa: Công

ồ

ệ

Đ án t ố ngh thông tin ệ

SV: Trân Văn Phong

ự ươ ̣ ́ ́ ́ ̣ ́ ̣ ̉ ́ ̉ ́ ́ ̣ ̣ ́ ̀ ̣ ́ ̀ ́ ́ ̣ ̀ ự ươ ́ ́ ̣ ́ ̉ ́ ̣ ́ ̀ ̣ ́ ợ ̀ ữ ̣ ́ ́ ̣ ́ ̀ ́ ̀ ̣ ̉ ́ ̣ ̣ ̉ ́ ̣ ̣ ̉ ̀ ̀ ̀ ̀ ́ ̣ ́ ́ ̣ ự ượ ự ̣ ́ ̣ ̣ ̀ ̀ ̣ ̣ ng phong i đa h ̃ ướ ́ , ng ưở ̣ ̣ ̣ ̣ ̃ ̉ ̉ ̣ ̀ ́ ̀ ̀ ̀ ̀ ́ ̣ ̉ ̀ ̣ ́ ́ ́ ̀ ́ ́ ơ ̃ ́ ̀ ́ ̣ ̣ ̣ ̃ ̣ ̀ Tin Hoc Đia Chât ̀ ữ ̀ ̀ ́ ̀ ́ ́ ̣ ̉ ̀ ̣ ̀ ́ ng phap nôi suy Kringing cao trong l a chon tinh toan biên dang. Nghiên c u ph ứ đê co thê tinh biên dang tai bât ky vi tri nao trong l i tinh biên dang. Va nghiên c u ứ ướ ng phap nôi suy khac đê ap dung cho t ng khu v c co điêu kiên khac nhau cac ph ừ ̉ môt cach h p ly. Môt vân đê n a cân nghiên c u đo la hiêu chinh biên dang theo ty ứ lê cua tam giac đia đông l c,.... Đê hoan thanh đ c đê tai tôt nghiêp “ Nghiên c u tinh biên dang xoay trong ứ , ́ ơ PGS Phan Trong Trinh môt tam giac đia đông l c” nay em xin chân thanh cam n ng dân chi bao tân ̀ Đia Đông L c – Viên Đia Chât tr ườ ự tinh giup em hoan thanh đê tai tôt nghiêp cua minh môt cach tôt nhât. Cung đo em ̣ cung xin cam n cac thây cac cô trong bô môn ́ đa tao điêu kiên cho em hoan thanh tôt đô an tôt nghiêp cua minh, môt lân n a em xin chân thanh cam n!ơ

45

2

L p: Tin h c đ a ch t K5 ọ ị

ấ

ớ

̀