CẢNH BÁO và TẨY CHAY WEB filethietke ĂN CẮP files (trên DIỄN ĐÀN XD360) rồi xóa logo, xóa tác giảđăng lên web bán với giá cao. Đừng để bị mất tiền oan bởi hành vi ăn cắp của web filethietke bạn nhé!
8 J7 ~2 c. d" P0 ]7 a8 ^- P1 D3 i( S# i# P1 R4 |
Sau một thời gian dài, cuối cùng Minh cũng sưu tầm xong bộ lisp của mình ^_^ . Bộ lisp này rất hữu ích cho những ai sử dụng acad, nó làm cho công việc trở nên nhanh chóng một cách lạ thường (đặc biệt là dân thiết kế giao thông, vì Minh là dân giao thông mà, nhưng những ngành khác cũng xài bộ lisp này được đấy) , M8 d4 \. c5 S `& `/ ` S; y( [# ~' q1 S/ z
Cảm ơn các anh chị em trong diễn đàn đã giúp đỡ lẫn nhau rất nhiệt tình1 b! C) W8 P+ d$ b9 D6 u! i# G: h" Q
Cảm ơn bác nào đã sáng lập ra diễn đàn rất hữu ích này ( Y7 M/ Q0 E1 `0 _! {' H6 E# k+ ^ Q' W6 k! X% |% \- ]
Download: http://www.mediafire.com/?x6xq01snfsgh63c/- H1 J! ^$ c& A
Cách load bộ lisp :* I% A( k2 W7 c/ |) X: R
, ]& w& ~6 n% Q3 S! q- Load thư mục "Tong bo Lisp": trong acad bạn gõ "op" -> chọn thẻ Files -> click đúp vào Support File Search Path -> bấm nút Add -> Browse -> chọn đường dẫn đến thư mục "Tong bo Lisp" -> ok : X, _' `) l9 B/ d1 q7 [" L* YQua bên thẻ System -> click vào mục Load acad.lsp with every drawing trong mục General Options -> tắt acad và bật lên lại là xong& x1 d6 W" K9 a
- Load những thứ còn lại: trong acad gõ lệnh "ap" -> click nút Contents trong mục Startup suite (có ký hiệu hình chiếc cặp) -> Add tất cả những lisp còn lại vào -> close* I4 v v5 c" k1 w( `3 y0 F3 X
. k+ p Z9 x, ?) L
Lưu ý: một số lệnh sau bị trùng lệnh, các bạn sửa lại lệnh bằng cách: trong acad chọn menu Tools -> Customize -> Edit Program Parameters (acad.pgp) rồi chỉnh lại các lệnh tắt của acad -> tắt acad và bật lại " @! t* P6 |1 I) l' x# m# M3 vcác lệnh trùng: - ^1 B" v! \7 Y4 c q" I1 m! Flệnh trim lúc này là "t" nên bạn phải sửa lại lệnh viết text "t" -> ví dụ "t1"/ U4 H0 D2 r8 {7 M* E, N
"b" tạo block -> sửa lại ví dụ "bl" 2 z$ ~# [. y- d' r"h" tạo hatch -> sửa lại ví dụ "bh" hay "h1"... 2 j1 i& W7 t; \2 T& E; Q+ B 2 C) x/ j& u) R7 p# N$ HDanh sách các lisp trong bộ lisp này (khá dài):3 |6 g+ k0 V. |5 _
1. Bộ lisp phục vụ cho công tác giải phóng mặt bằng: ! ?0 E/ O+ M! }, M' HChèn cọc GPMB và MLG : CG-chen block theo giao diem.Lsp / y, _& j- r& d+ u- j6 ZXoay cọc GPMB và MLG theo hướng tuyến: LISP QUAY HOGA THEO HUONG DUONG CONG HOAC THANG.lsp; A2 H$ F" E+ a3 ]0 i
Điền tên cọc GPMB và MLG (layer TEXT GPMB): mabl.lsp , x+ {) e8 r1 O$ L8 _Vẽ đường ranh GPMB và MLG: mabl.lsp : m! r+ c, T& }+ i" w1 L6 W9 i EXuất tọa độ các cọc GPMB và MLG ra bảng (tạo layer riêng để sau này xóa số của lisp): vc.lsp 5 n. N8 S+ r) C& a9 V. lChỉnh sửa bảng tọa độ: themtext-bottext.lsp 4 V& Z2 @ O7 C" `! K2. Cộng trừ nhân chia số trong text: cong_tru_nhan_chia.lsp2 ~. O9 a$ j( I! v! m
3. Copy nội dung text này dán sang text khác y chang: mat.lsp% n5 a$ i, J6 z( n. w/ O* L
4. Đánh số thứ tự bằng tay: num.lsp$ Y: _ r' D4 n9 H1 d
5. Đánh số thứ tự tự động: dsbv_1.vlx . e% b) w" q0 _7 \2 O) t9 M6. Diệt virus acad.lsp: gõ “ap” sau đó add lisp cvav_1_04.lsp vào mục content 8 @0 `* ]/ n4 A8 H1 M' _+ j7. Hiển thị tọa độ có mũi tên: XTD.lsp, td.lsp) j8 t6 V2 V" K
8. Rải đối tượng theo đường dẫn: raidtok.lsp 3 M/ z1 \! i0 A. o9. In tự động trong chế độ Model và Layout: INTUDONG folder $ g9 t7 `; F3 I5 h2 `$ O# @10. Lấy lại diện tích từ trắc ngang bị lỗi: Lay dien tich tu Trac ngang folder; V) A, k: w/ ~( {9 ~3 {+ [
11. Copy, xóa hay move tất cả đối tượng thuộc 1 layer: xoa,copy,move all doi tg thuoc 1 layer.lsp# H7 j9 R6 v8 q& T& f* V
12. Tính diện tích và điền số (dùng để sửa khối lượng trắc ngang và tính diện tích GPMB): TINH DIEN TICH VA GHI SO.lsp (lệnh ss)/ o' k$ l, y) u' D' O9 g. ]4 K) ?
13. Scale đối tượng theo 1 chiều: Scale 1 chieu.lsp / l$ N9 M- t( E5 j7 c9 Z6 D( l14. Nối các line rời rạc khép kín thành 1 polyline kín: NOI CAC LINE ROI RAC THANH 1 POLYLINE – NN.lsp- S$ |! ^2 {" @$ l1 @. b
15. Đổi điểm chèn của block: DOI DIEM CHEN BLOCK – DBL.lsp (các block được copy ra cũng thay đổi theo) + H! F$ h- c! r( Q3 n16. Tổng cả bộ lisp:+ S" M+ A( {1 y, ]- e9 }
Đổi chữ hoa, chữ thường: lệnh: ca" _) u% F# I5 B" z4 o! K$ k
Chọn số chữ số lẻ của kích thước: acc 5 T9 e; M0 P. n. j( c* TĐo kích thước theo phương ngang: h ( V9 Y1 _1 n) F4 S/ fCanh vị trí dim ngang: h1# m+ k2 x6 y0 {" I
Canh vị trí đường dóng ngang (cắt dim): h2 - i+ M9 D" D2 {6 q' HĐo kích thước theo phương đứng: v 1 i" }/ U |) N5 v6 Z9 S' l% Q6 DCanh vị trí dim đứng: v1 / J5 a, r K7 ?9 E# B, S \Canh vị trí đường dóng đứng (cắt dim): v2 2 }% i( }9 J# G7 jĐặt tỉ lệ cho dim: tl4 W# ^$ U2 P. N8 o" y; R
Cập nhật tỉ lệ cho dim: up7 L1 v/ ~* L3 {
Chuyển các dim về layer 2: d2: T6 _- f* W) w- t
Chuyển các dim về layer tự đặt: dl ' y' |3 Y% N H* b. h+ qQuay text của dim 180 độ: md: w; N6 ?# g; f0 M% w
Quay về như cũ: umd4 ]5 s0 u- C# {+ q) R6 ^9 a4 e
Vẽ ký hiệu cắt: cut# G3 U/ c! i" Q4 n! d" S
Vẽ cốt thép với số lượng biết trước: st1 ' _% c. V1 ^; \Vẽ cốt thép với khoảng cách giữa 2 thanh cho trước (gần đúng): st. D+ m- I- K" b/ W7 v
Vẽ thép móc tròn: hk 5 P- ^- u7 D) ~; R* J# ~Copy siêu tốc: cc- k, F1 x" `+ \! s. p
Thêm ký hiệu ± vào trước một số: da1 }+ X7 m8 Y6 k3 J. v. [ N
Quay nhiều text cùng 1 góc: rot $ Y' {, J5 V/ D% V0 ~Sắp xếp text rất pro: arr4 F, p$ a2 `" G& A% N
Tính chiều dài các đường thẳng: cl $ c4 W1 P( N" [8 h: R$ yVẽ ký hiệu đầu cờ tim đường: dx ( J2 e' W. [/ n5 vDọn rác bản vẽ: pu. g( o6 c( b7 `- G* V
Quay đối tượng kiểu pro: r - z: H& r; U: H+ x& R& o; NTách riêng 1 layer: ly . ^* T2 ^1 b7 f$ Z' c4 g* w. E! `Tắt 1 layer: lf! ^4 ^& ]$ I/ M4 m0 T
Bật tất cả layer: lo( q; t5 C; R2 A# t, B
Tính độ dốc: dd0 ~3 A- P2 p" ~0 F# X- C, f
Chạy lại bộ lisp này: acad ) O6 }* }3 X- `Chuyển font TCVN sang VNI: t2v → ct2 (font phải là vn_vni.shx) 2 y/ f3 Q) X" x4 \3 r17. Trim linh hoạt: trim dạng fence (hàng rào): c1 @% e5 @3 n! D* A1 ?% @
18. Xuất tọa độ hố ga trong acad 2007 - {/ F6 D) f1 C t, q19. Copy các block attribute với số thự tự tăng dần (dùng vẽ các hố ga): od_oc_oca.lsp & U4 J3 K$ O" _20. Sửa các block attribute với số thự tự tăng dần (dùng sửa các hố ga): chatt.lsp ' A1 T) ~1 K: I' a. U( h9 G21. Làm to các biểu tượng trong cad" S) @! E* p) O3 W: e; K- S+ o
22. Lệnh tắt thay thế và tìm kiếm: Alt+e+f4 B# T i9 c8 g
23. Các mẫu hatch siêu đẹp cho cad/ v' q/ y8 c1 o* l: }! u1 M
24. Các linetype cho cad: LINETYPE.dwg l6 U; b0 [; G5 r7 N- \
25. Tạo các linetype cho riêng mình: xem file hướng dẫn; e: _- t( _/ N# L N
26. Font kỹ thuật theo đúng TCVN 7284: copy 2 font vào C:\windows\fonts\2 h" @8 s( p4 j9 ]) R7 F. t" r
27. Phần mềm đổi đơn vị ! F5 i, }: n6 _; d* J28. Phần mềm nội suy 1 và 2 chiều3 o2 j% z6 M9 T2 Z
29. Phá password excel 7 ~; y- \) ]) y7 c6 ?9 C30. Khắc phục dim nhảy lung tung: gõ “dimassoc” cho = 2 9 z+ @! ^$ @2 o6 E4 n5 r3 c31. Cách gõ các ký tự đặc biệt trong cad - H% Q2 M4 ^/ c8 O32. Chỉnh màn hình khởi động cad2007 dạng 3d thành 2d classic như cad2005: Options... Chọn thẻ Files, đến mục Template Settings nhấn vào mũi tên màu trắng cho nó xổ xuống, Chọn mục Default Template File Name for QNEW cho nó xổ xuống. Nhấn chọn dòng này nhấn Remove. Khởi động lại acad. D0 i6 Z8 I$ x3 S: J33. Chuyển bảng tính excel sang đối tượng acad: VBA project 1! D; \8 W2 J0 y. T
34. Chuyển text acad sang đối tượng excel: TEXT ACAD SANG TEXT EXCEL - C2E.lsp( a; S8 `5 E; N
35. Phần mềm thống kê cốt thép: TipSetupUniCode + [) T7 D3 m5 |1 H4 P) h6 Q3 L% Z : r. ]+ x& [2 \ p+ I2 hHy vọng những công cụ này đem lại hữu ích cho các anh chị em thiết kế.% j& B+ K; a; I( a* ]+ r% w/ R
Chúc các anh chị em thiết kế nhà ta gặt hái được( k! [" B3 K5 o+ v) ]
nhiều thành công trong công việc và hạnh phúc trong gia đình.5 o, u+ g- `" }# ]2 v
0 r- Z7 |1 x( |" W5 J4 U9 r4 ]3 aThân chào. # q% y, w6 t# O) v# k$ {! est 2 ^$ ~8 ^3 k' C/ _ z( a
Sau một thời gian dài, cuối cùng Minh cũng sưu tầm xong bộ lisp của mình ^_^ . Bộ lisp này rất hữu ích cho những ai sử dụng acad, nó làm cho công việc trở nên nhanh chóng một cách lạ thường (đặc biệt là dân thiết kế giao thông, vì Minh là dân giao thông mà, nhưng những ngành khác cũng xài bộ lisp này được đấy)# _# z' h6 g1 }' z
7 Q! a3 q8 h9 v! g
Cảm ơn các anh chị em trong diễn đàn đã giúp đỡ lẫn nhau rất nhiệt tình 6 ]+ b: U: c M% t. V& DCảm ơn bác nào đã sáng lập ra diễn đàn rất hữu ích này 6 s M/ _4 b9 Y( u ( }, t& }2 r, lDownload: http://www.mediafire.com/?x6xq01snfsgh63c/& S9 L7 X" p1 `. L, w8 j- S3 M, S
Cách load bộ lisp : {+ m- ?2 @0 j* O1 L( T
/ ~8 G+ ?8 I8 L- Load thư mục "Tong bo Lisp": trong acad bạn gõ "op" -> chọn thẻ Files -> click đúp vào Support File Search Path -> bấm nút Add -> Browse -> chọn đường dẫn đến thư mục "Tong bo Lisp" -> ok # k# o6 T6 e# k/ | jQua bên thẻ System -> click vào mục Load acad.lsp with every drawing trong mục General Options -> tắt acad và bật lên lại là xong 9 Y. |2 e, X* A4 ^* o/ t7 D- Load những thứ còn lại: trong acad gõ lệnh "ap" -> click nút Contents trong mục Startup suite (có ký hiệu hình chiếc cặp) -> Add tất cả những lisp còn lại vào -> close" `' @/ t: \, w% T+ S
" ^3 ?; D6 v$ nLưu ý: một số lệnh sau bị trùng lệnh, các bạn sửa lại lệnh bằng cách: trong acad chọn menu Tools -> Customize -> Edit Program Parameters (acad.pgp) rồi chỉnh lại các lệnh tắt của acad -> tắt acad và bật lại2 g4 x7 s$ X3 X1 v
các lệnh trùng: 4 e; m0 ~( |- w0 W. }) ?lệnh trim lúc này là "t" nên bạn phải sửa lại lệnh viết text "t" -> ví dụ "t1"1 L" g% j% N3 ?* j; E# _
"b" tạo block -> sửa lại ví dụ "bl"! \# Q2 j" ]- Y! ]0 p
"h" tạo hatch -> sửa lại ví dụ "bh" hay "h1"... # r1 z9 ^ K/ w4 e( n6 p9 @9 l6 V: x1 b( k: Y
Danh sách các lisp trong bộ lisp này (khá dài):& h. y' J M x
1. Bộ lisp phục vụ cho công tác giải phóng mặt bằng: 2 F6 U7 T: B2 e P1 |1 P: xChèn cọc GPMB và MLG : CG-chen block theo giao diem.Lsp4 D/ _$ e0 S; T4 R
Xoay cọc GPMB và MLG theo hướng tuyến: LISP QUAY HOGA THEO HUONG DUONG CONG HOAC THANG.lsp 8 S7 n7 k4 E# ~$ e$ J/ N1 Z3 `, YĐiền tên cọc GPMB và MLG (layer TEXT GPMB): mabl.lsp5 _ K) D( W7 l* b7 d/ V
Vẽ đường ranh GPMB và MLG: mabl.lsp& K9 p+ W& U0 S$ T$ u
Xuất tọa độ các cọc GPMB và MLG ra bảng (tạo layer riêng để sau này xóa số của lisp): vc.lsp 9 q* S# F# ?$ C* O+ [% HChỉnh sửa bảng tọa độ: themtext-bottext.lsp3 I, W' C' J) ?' o: w; P
2. Cộng trừ nhân chia số trong text: cong_tru_nhan_chia.lsp ; `" F5 f6 F/ O2 c1 o3. Copy nội dung text này dán sang text khác y chang: mat.lsp+ x j( g0 ?% A* R% R' v) p
4. Đánh số thứ tự bằng tay: num.lsp' q) u9 j3 H! N6 x' x
5. Đánh số thứ tự tự động: dsbv_1.vlx 9 {7 e8 {6 T9 `# X5 w; ?4 q6. Diệt virus acad.lsp: gõ “ap” sau đó add lisp cvav_1_04.lsp vào mục content1 B. n, C/ b& x. P) ], Y3 G
7. Hiển thị tọa độ có mũi tên: XTD.lsp, td.lsp 7 |" O7 i2 P- v8. Rải đối tượng theo đường dẫn: raidtok.lsp , a" b" d; H- o8 {' w7 H0 z9. In tự động trong chế độ Model và Layout: INTUDONG folder - g' Z' m0 }' W7 Y/ g10. Lấy lại diện tích từ trắc ngang bị lỗi: Lay dien tich tu Trac ngang folder8 [% g( P0 g- [8 R. t( V
11. Copy, xóa hay move tất cả đối tượng thuộc 1 layer: xoa,copy,move all doi tg thuoc 1 layer.lsp , Z2 D# U! t6 o0 B# C- S12. Tính diện tích và điền số (dùng để sửa khối lượng trắc ngang và tính diện tích GPMB): TINH DIEN TICH VA GHI SO.lsp (lệnh ss) 9 K/ ^, F! D) g: Q0 L" y- v. m13. Scale đối tượng theo 1 chiều: Scale 1 chieu.lsp 9 ?) \, x2 e9 h2 Z14. Nối các line rời rạc khép kín thành 1 polyline kín: NOI CAC LINE ROI RAC THANH 1 POLYLINE – NN.lsp : @) ]. g4 a/ a$ H5 n: u% ^15. Đổi điểm chèn của block: DOI DIEM CHEN BLOCK – DBL.lsp (các block được copy ra cũng thay đổi theo) m" n" [" U# A6 g/ {" L
16. Tổng cả bộ lisp: / F+ l$ y$ z9 I2 l J7 i l% c kĐổi chữ hoa, chữ thường: lệnh: ca3 y0 ~% r$ f7 E
Chọn số chữ số lẻ của kích thước: acc2 P8 ]; O- r8 u$ b( s P" l) |% u
Đo kích thước theo phương ngang: h d3 ~$ Z3 S4 h& tCanh vị trí dim ngang: h18 F9 ^! I% G* A: ~0 V
Canh vị trí đường dóng ngang (cắt dim): h2 4 L* a0 z9 c' v' D9 ~4 v3 H5 t# oĐo kích thước theo phương đứng: v+ O4 T: o E- ]1 _
Canh vị trí dim đứng: v1: g$ x! z1 s, b% L0 T. o# e
Canh vị trí đường dóng đứng (cắt dim): v2 / k1 G* \$ s7 d4 L9 Z/ zĐặt tỉ lệ cho dim: tl5 p! B7 q; x# g$ U* N. H9 R* O2 T( ~- Y
Cập nhật tỉ lệ cho dim: up( j6 A9 D# k& V1 J" M- W2 s$ x8 R
Chuyển các dim về layer 2: d2. [7 R7 A4 d H
Chuyển các dim về layer tự đặt: dl# C' X, a) R3 s" O
Quay text của dim 180 độ: md' l _. W# Z5 E. g9 L6 O8 z8 x
Quay về như cũ: umd % ]* I+ t5 z' N2 y/ V6 ZVẽ ký hiệu cắt: cut : O# N3 J- U! S$ R" @7 bVẽ cốt thép với số lượng biết trước: st12 d1 R" ?/ V6 h
Vẽ cốt thép với khoảng cách giữa 2 thanh cho trước (gần đúng): st - w, y: H0 C) W* @/ ^% F' y/ mVẽ thép móc tròn: hk $ U7 e2 j& C3 R* g" r- pCopy siêu tốc: cc* L; ?4 a! A# c
Thêm ký hiệu ± vào trước một số: da ' d! c) }# F9 b0 I% UQuay nhiều text cùng 1 góc: rot 8 Q: ?- N) c% B1 W0 CSắp xếp text rất pro: arr' d" Z- @8 `# { ~! u3 J# g+ ?4 D. h
Tính chiều dài các đường thẳng: cl- s$ u5 _ l5 [
Vẽ ký hiệu đầu cờ tim đường: dx " U( k/ f" Q: XDọn rác bản vẽ: pu % Q4 i M* G, TQuay đối tượng kiểu pro: r 8 g+ V0 ^* p6 E! ?! |: _+ K- FTách riêng 1 layer: ly7 ^# s1 i; X+ h- w9 z
Tắt 1 layer: lf1 F0 k# m; P! `) m! t
Bật tất cả layer: lo+ Y' `$ c4 k' s6 T' @
Tính độ dốc: dd & c+ ?6 V: K' e2 b' ~Chạy lại bộ lisp này: acad- {/ f5 x: g5 F# u4 X
Chuyển font TCVN sang VNI: t2v → ct2 (font phải là vn_vni.shx) 1 S7 @9 e; ]. a" U) l17. Trim linh hoạt: trim dạng fence (hàng rào)# L9 r; [) F3 Z8 R+ C( }
18. Xuất tọa độ hố ga trong acad 20077 U# [# R' B/ Y5 {
19. Copy các block attribute với số thự tự tăng dần (dùng vẽ các hố ga): od_oc_oca.lsp # X* m: D' K3 f* P20. Sửa các block attribute với số thự tự tăng dần (dùng sửa các hố ga): chatt.lsp J+ r% \+ i8 p: X( e( y21. Làm to các biểu tượng trong cad- h8 s, L/ h. T1 }, H
22. Lệnh tắt thay thế và tìm kiếm: Alt+e+f # \ W" X* Y w$ i' j- e23. Các mẫu hatch siêu đẹp cho cad. w0 `3 |' F' q7 @/ _
24. Các linetype cho cad: LINETYPE.dwg* f; j3 q" Z/ _# x7 P
25. Tạo các linetype cho riêng mình: xem file hướng dẫn( U7 o, ~2 [- |7 s
26. Font kỹ thuật theo đúng TCVN 7284: copy 2 font vào C:\windows\fonts\ 2 Y( Y. m! U* h0 v# f27. Phần mềm đổi đơn vị 6 U* r! ^/ @( }: j! K& }28. Phần mềm nội suy 1 và 2 chiều4 T4 _: m7 Q% Y2 g z5 N) g
29. Phá password excel X. A8 K7 z' G! Z- ~
30. Khắc phục dim nhảy lung tung: gõ “dimassoc” cho = 2" G2 F1 V) t0 N# I! S. [2 E ]! R6 e& J
31. Cách gõ các ký tự đặc biệt trong cad5 N/ K" R. g$ a# Z# r: A
32. Chỉnh màn hình khởi động cad2007 dạng 3d thành 2d classic như cad2005: Options... Chọn thẻ Files, đến mục Template Settings nhấn vào mũi tên màu trắng cho nó xổ xuống, Chọn mục Default Template File Name for QNEW cho nó xổ xuống. Nhấn chọn dòng này nhấn Remove. Khởi động lại acad. # \* D1 A, Y. o33. Chuyển bảng tính excel sang đối tượng acad: VBA project 1; u k9 D/ I* h5 X! Y
34. Chuyển text acad sang đối tượng excel: TEXT ACAD SANG TEXT EXCEL - C2E.lsp 3 ^ g; e8 p4 c. ], J35. Phần mềm thống kê cốt thép: TipSetupUniCode4 l& R: J1 U$ p& b- N5 w" H
t9 K' d8 b4 R
Hy vọng những công cụ này đem lại hữu ích cho các anh chị em thiết kế.; T8 A- l% ?8 |! t' S* v: Q
Chúc các anh chị em thiết kế nhà ta gặt hái được; e/ P2 X: T0 R& V! m3 [, C
nhiều thành công trong công việc và hạnh phúc trong gia đình. 4 W$ O. e$ M/ ?$ m+ f* p* B0 ?' p# d! E% Y1 L
Thân chào.' I3 K' `. i2 p j& ^" J; O
Minh. 7 Z: }) Z- U+ ~# z% [- e* F1 p# D0 Z+ B9 L! v
Đăng lúc 3/4/2013 06:28:59
Yêu thích
Chia sẻ
Bộ sưu tập
Hay
Dở
Thẻ làm mới
Thẻ Đính
Thẻ im lặng
Thẻ mở
Thẻ cầu vòng
Thẻ xem người ẩn danh
Tác giả