Đề tài mô phỏng tính toán thiết kế hệ thống CDMA 2000

Báo cáo tập lớn môn thông tin di động đề tài : Mô tính toán thiết kế hệ thống cdma 2000 I Giới thiệu chung hệ thống CDMA 2000 : Cỏc c im chung v k thut : H thng CDMA 2000 1x cú th nõng cp lờn CDMA 2000 1x EV DO Trong tng lai cú kh nng h tr CDMA 1x EV DV Hot ng di tn 800-1800 Mhz Cung cp dch v thoi, d liu kờnh lờn ti 14,4 Kb/s, d liu gúi ti 153,6/kb/s H tr c ch iu khin QoS cõn bng yờu cu v QoS ca nhiu dch v ng thi Phự hp chun IS-2000 Cu trỳc phự hp vi chun 3GPP2 Lp vt lý CS0002-A-1 Lp liờn kt, lp MAC CS003-A-1 Lp liờn kt, lp LAC CS004-A-1 Cỏc lp cao CS005-A-1  Cu hỡnh d phũng 1+1 (cho ngun): N+1 cho cỏc thit b BTS, BSC v MSC Chuyn giao mm gia cỏc sector, cỏc BTS, cỏc BTS ca BSC ny vi cỏc BTS ca BSC khỏc, cuc gi c iu khin cht lng liờn tc Cỏc khuụn kh kin trỳc mng Mng RF CDMA 2000 1X h tr truy cp thoi v d liu tớch hp ti BTS H thng phi hot ng bng A di 450 MHz, on bng t 800-1800MHz rng bng thu phỏt l > 10Mhz Cỏc phn t mng phi h tr cỏc giao din vụ tuyn v giao din bỏo hiu, kt ni tng thớch vi mng PSTN quc gia, mng bỏo hiu SS7 ca Vit nam BSC cú chc nng qun lý di ng truyn thng kt ni vi MSC qua giao din A, IOS V4.0 hoc cao hn, ng thi kt ni vi cỏc phn t ca mng d liu gúi (IWF, PDSN) v cỏc dch v d liu hoc Internet, cỏc node cung cp dch v khỏc Mng chuyn mch phi cú kh nng giao din vi IS-41 rev D da trờn cỏc mng SS7/R2 v cỏc mng chuyn mch PSTN thụng thng thụng qua cỏc cng ni thụng dng MSC cng phi h tr cỏc yờu cu ca giao din kt ni vi mng chuyn mch kờnh (mng PABX dựng riờng) ca ngnh in, phự hp vi cỏc c im ca ISUP PSTN quc gia MSC sn sng cho kt ni vi sau ny m rng thờm cỏc node MSC Giao din truyn dn phi l giao din nộn d liu (cú kim soỏt QoS) nhm tit kim dung lng truyn dn ng di Cỏc ng dng 3G Nhn v gi E-mail, tin nhn MMS, Fax Download games, nhc, video clip Truy cp Web (Mobile Web Access) Kim tra ti khon cỏ nhõn, t giỏ c phiu Cp nht tin tc, thi tit, giỏ cỏ Thụng tin giao thụng, du lch, gii trớ t vộ trc, mua sm (Mobile Shopping) Dch v mng Dch v qun lý khỏch hng trung Dch v qun lý cc trung, x lý v in phõn tỏn Dch v qun lý mng trung Dch v cung cp thụng tin khỏch hng Quỏ trỡnh kim tra cỏc dch v trờn s bao gm, nhng khụng gii hn cỏc sau: Thi gian kt ni mng Thi gian truy cp dch v Thi gian truyn (hoc thụng lng d liu) Thi gian download Kh nng kt cui cỏc dch v Kh nng kt cui cu hỡnh v kh nng thit lp Cỏc dch gia tng khỏc Th thoi (Voice mail): Chc nng voice mail chun, h tr a ngụn ng, quay s trc tip t PSTN i vi mng phc hi (retrieval), thụng bỏo th thoi qua SMS SMS (MO, MT, thụng bỏo th thoi cho c cỏc thuờ bao 1x v 1xEV-DO) Cỏc dch v thụng tin SMS Cỏc dch v WAP Push (CS hoc PS chuyn mch kờnh hoc chuyn mch gúi) Cỏc dch v nh v c s (Location based), SMS gateway FTP downloads Ring tones v logo downloads Kt ni Internet/Intranet H tng truyn dn cho cỏc h thng o lng iu khin cú yờu cu bo mt v tin cy cao (nh cỏc lnh vc in, iu khin giao thụng, nc, cỏc dch v cụng cng khỏc ) Cỏc mụ hỡnh c bn : Mụ Hỡnh 4/12 B1 b2 B3 C1 B1 C1 B1 C1 D3 C2 D1 B3 B1 D3 b2 A1 C3 C1 Đ2 A1 A2 D3 Đ2 D1 b2 B3 Đ2 D1 B1 D3 A3 C2 C3 A2 D1 b2 C1 A2 D3 B1 A1 A3 C2 B3 Đ2 A1 C1 C3 A2 A3 C2 C3 A2 A3 C1 A1 D1 b2 B3 Đ2 A1 B1 b2 B3 Đ2 A3 C2 C3 D3 D1 b2 C1 A2 D1 b2 B3 A1 B1 B3 Đ2 A3 C2 C3 D3 B1 C2 C3 A2 D1 b2 B3 A1 A3 C2 C3 C3 C1 A1 A2 A3 C2 D3 Mụ hỡnh 3/9 A1 A2 A3 B1 C1 A1 B1 C1 C1 A3 A2 B1 A2 C1 B1 b2 C1 C2 C3 b2 C1 A1 A2 A3 C2 A1 A3 B1 B3 A2 C3 b2 B3 A1 B3 A2 A3 C2 A3 C2 A3 C2 A1 C1 A1 C1 C3 b2 C3 b2 C3 b2 B3 B1 B1 B3 A2 B3 A2 A3 A1 A1 A2 A3 C2 A3 C2 C3 C1 C3 b2 B3 A2 A1 B1 b2 B3 A2 C1 II Cỏc v suy hao ng truyn : Là trình mà tín hiệu thu giảm dần khoảng cách trạm phát trạm thu ngày tăng Với Angten cho trớc cổng suất phát suy hao đờng truyền tỷ lệ với bình phơng dxf với d khoảng cách f tần số Trong địa hình thành phố suy hao tỷlệ với d Trong môi trờng khong gian tự tính suy hao đờng truyền nh sau: PL= 20 log(42.dKmfMHz) dB = 32,5 + 20 log fMHz + 20 log dKm dB Với dKm khoảng cách tính Km fMHz tần số tính MHz PL suy hao đờng truyển tính dB MS BT S Past Loss (free grace) dkm Nh ta biết có yếu tố làm ảnh hởng đến suy hao đờng truyền khoảng cách tăng (nh nói ỏ trên) chịu ảnh hởng Phadinh chuẩn Lôgo Pla đinh nhiều tia (Rayleigh) Công thức tính suy hao đờng truyền có tính đến ảnh hởng hai loại Pla đinh đợc đa báo cáo CCITT 1982: PL = 69,55 + 26,16 log f MHz - 13,28 log h1 - a(h1) + (44,9 - 6,55 log h 1) ì log dKm Với : PL : Suy hao đờng truyền tính dB fMHz : tần số tính Mhz h1 Chiều cao Angten BTS tính mét h2 Chiều cao Angten MS tính mét a(h2) = (1,1 log P - 0,2) ì h2 - (1,56 log f - 0,8) dKm Khoảng cách tính Km MS * Công thức Okumuza-Hata : Năm 1980 Hata kỹ s điện tử nhật dựa đồ thị vủa Okumuza đa số công thức tính toán suy hao đờng truyền nh sau: + Trong điều kiện thành phố bình thờng L(thành phố)=69,55+26,16*log f -13,82 * log h + (44,9-6,55 log h1) * logd Trong đó: f : tần số [Mhz] h1 : độ cao Angten BTS[m] d : khoảng cách [m] + Trong điều kiện ngoại ô dùng công thức: L(ngoại ô)=L(thành phố)-[2*(log(f/28))2 +5,4] + Trong điều kiện quang đãng, không cao, không nhà cao tầng dùng công thức: L(bằng phẳng)=L(thành phố)-[4,78*(log f)2-18,83* log f +40,94] Các công thức hiệu chỉnh cho sát với điều kiện thực tế nhò sử dụng yếu tố hiệu chỉnh thức đồ thị Okumuza trình bày III Chơng trình phần mềm mô : Lu đồ thuật toán : Bt u Form Menu S For m1 S For m2 Chng Trỡnh S For m3 Chng Trỡnh Chng Trỡnh Kt Thỳc Mă nguồn chơng trình : Chng trỡnh tớnh toỏn thit k da vo cụng sut : Private Sub cmdquaylai_Click() nam.Show nam1.Hide End Sub Private Sub cmdthoat_Click() End End Sub Sub cmdtinhnl_Click() txtshdtcd.Text = txtcsp - txtshcp + txttiatp - txtdnt - txtshct + txttiatt + txtticgm - txtshlcc - txtqn - txtqx - txtqct Dim a, b, c Dim X, Y, Z Dim i, j, k If opthata.Value = True Then If optnoithanh.Value = True Then a = Round((txtshdtcd - 69.55 - 26.16 * Log(txttslv) / Log(10) + 13.82 * Log(txtccattg) / Log(10)) / (44.9 - 6.55 * Log(txtccattg) / Log(10)), 4) txtbkc.Text = Round(Exp(a * Log(10)), 4) txtslccsd.Text = Round((txtdtvps / (3.14 * txtbkc * txtbkc)), 4) End If If optngoaithanh.Value = True Then b = Round((txtshdtcd - 69.55 - 26.16 * Log(txttslv) / Log(10) + 13.82 * Log(txtccattg) / Log(10) + * (Log(txttslv / 28) / Log(10) * Log(txttslv / 28) / Log(10)) + 5.4) / (44.9 - 6.55 * Log(txtccattg) / Log(10)), 4) txtbkc.Text = Round(Exp(b * Log(10)), 4) txtslccsd.Text = Round((txtdtvps / (3.14 * txtbkc * txtbkc)), 4) End If If optvungmo.Value = True Then c = Round((txtshdtcd - 69.55 - 26.16 * Log(txttslv) / Log(10) + 13.82 * Log(txtccattg) / Log(10) + 4.87 * ((Log(txttslv) / Log(10)) * (Log(txttslv) / Log(10))) - 18.33 * Log(txttslv) / Log(10) + 40.94) / (44.9 - 6.55 * Log(txtccattg) / Log(10)), 4) txtbkc.Text = Round(Exp(c * Log(10)), 4) txtslccsd.Text = Round((txtdtvps / (3.14 * txtbkc * txtbkc)), 4) End If End If If opttkgtd.Value = True Then If optnoithanh.Value = True Then X = Round((txtshdtcd - 32.4 - (20 * Log(txttslv) / Log(10))) / 20, 4) txtbkc.Text = Round(Exp(Log(10) * X), 4) txtslccsd.Text = Round((txtdtvps / (3.14 * txtbkc * txtbkc)), 4) End If If optngoaithanh.Value = True Then Y = Round((txtshdtcd - 32.4 - 20 * Log(txttslv) / Log(10)) / 20, 4) txtbkc.Text = Round(Exp(Log(10) * Y), 4) txtslccsd.Text = Round((txtdtvps / (3.14 * txtbkc * txtbkc)), 4) End If If optvungmo.Value = True Then Z = Round((txtshdtcd - 32.4 - 20 * Log(txttslv) / Log(10)) / 20, 4) txtbkc.Text = Round(Exp(Log(10) * Z), 4) txtslccsd.Text = Round((txtdtvps / (3.14 * txtbkc * txtbkc)), 4) End If End If If optcost.Value = True Then If optnoithanh.Value = True Then i = Round((txtshdtcd - 46.33 - 33.9 * Log(txttslv) / Log(10) + 13.82 * Log(txtccattg) / Log(10)) / (44.9 - 6.55 * Log(txtccattg) / Log(10)), 4) txtbkc.Text = Round(Exp(i * Log(10)), 4) txtslccsd.Text = Round((txtdtvps / (3 * txtbkc * txtbkc)), 4) End If If optngoaithanh.Value = True Then j = Round((txtshdtcd - 46.33 - 33.9 * Log(txttslv) / Log(10) + 13.82 * Log(txtccattg) / Log(10) + * Log(txttslv / 28) / Log(10) * Log(txttslv / 28) / Log(10) + 5.4) / (44.9 - 6.55 * Log(txtccattg) / Log(10)), 4) txtbkc.Text = Round(Exp(j * Log(10)), 4) txtslccsd.Text = Round((txtdtvps / (3.14 * txtbkc * txtbkc)), 4) End If If optvungmo.Value = True Then k = Round((txtshdtcd - 46.33 - 33.9 * Log(txttslv) / Log(10) + 13.82 * Log(txtccattg) / Log(10) + 4.87 * Log(txttslv) / Log(10) * Log(txttslv) / Log(10) - 18.33 * Log(txttslv) / Log(10) + 40.94) / (44.9 - 6.55 * Log(txtccattg) / Log(10)), 4) txtbkc.Text = Round(Exp(k * Log(10)), 4) txtslccsd.Text = Round((txtdtvps / (3.14 * txtbkc * txtbkc)), 4) End If End If End Sub Private Sub Form_Load() nam2.Hide End Sub Chng trỡnh thit k da vo dung lng : Option Explicit Private Sub cmdketthuc_Click() End End Sub Private Sub cmdquaylai_Click() nam.Show nam2.Hide End Sub Function soluongthuebao(X As Integer, Y As Integer) Dim Z As Integer Z = (X * Y) / 100 soluongthuebao = Z End Function Private Sub cmdtinhdl_Click() txtsltb1.Text = (txtsltbtm * txtpbtb1) / 100 txtsltb2.Text = (txtsltbtm * txtpbtb2) / 100 txtsltb3.Text = (txtsltbtm * txtpbtb3) / 100 txtdl1.Text = Round((txtbhca1 * txtsltb1 * 65) / 3600, 2) txtdl2.Text = Round((txtbhca2 * txtsltb2 * 65) / 3600, 2) txtdl3.Text = Round((txtbhca3 * txtsltb3 * 65) / 3600, 2) txtscc1.Text = Round((txtdl1 / txtnoithanh), 2) txtscc2.Text = Round((txtdl2 / txtngoaithanh), 2) txtscc3.Text = Round((txtdl3 / txtvungmo), 2) End Sub Form Menu : Option Explicit Private Sub Help_Click() nam1.Hide nam2.Hide Nam3.Hide nam5.Show End Sub Private Sub MDIForm_Load() nam2.Hide nam1.Hide Nam3.Hide nam.Show End Sub Private Sub Menu_Click() nam.Show nam1.Hide nam2.Hide Nam3.Hide End Sub Private Sub mnuabout_Click() nam1.Hide nam2.Hide Nam3.Show End Sub III Kt lun : Trong bi mụ phng ny em cha trỡnh by ht cỏc thụng s ca cỏc mụ hỡnh HATA , COST 231 v khụg gian t nh l cỏc thụng s v chiu cao an ten MS (1-10m) v mt s thụng s khỏc Tuy nhiờn kt qu thu c cng tng i chớnh xỏc Do vy chng trỡnh ny ch dng li mc mụ phng [...]... mnuabout_Click() nam1.Hide nam2.Hide Nam3.Show End Sub III Kết luận : Trong bài mô phỏng này em chưa trình bày hết các thông số của các mô hình HATA , COST 231 và trong khôg gian tự do như là các thông số về chiều cao an ten MS (1-10m) và một số thông số khác Tuy nhiên kết quả thu được cũng tương đối chính xác Do vậy chương trình này chỉ dừng lại ở mức mô phỏng ... Log(10)), 4) txtbkc.Text = Round(Exp(k * Log(10)), 4) txtslccsd.Text = Round((txtdtvps / (3.14 * txtbkc * txtbkc)), 4) End If End If End Sub Private Sub Form_Load() nam2.Hide End Sub • Chương trình thiết kế dựa vào dung lượng : Option Explicit Private Sub cmdketthuc_Click() End End Sub Private Sub cmdquaylai_Click() nam.Show nam2.Hide End Sub Function soluongthuebao(X As Integer, Y As Integer) Dim Z