markdown:
TÊN DOANH NGHIỆP:
**CÔNG TY CỔ PHẦN TẬP ĐOÀN VINACONTROL**
TÊN QUỐC TẾ:
** VINACONTROL GROUP CORPORATION**
TÊN VIẾT TẮT:
** VINACONTROL**
TRỤ SỞ CHÍNH:
** Số 54 Trần Nhân Tông, P. Nguyễn Du, Q. Hai Bà Trưng, TP. Hà Nội**
Điện thoại:
** (84-24) 3943.3840 **Fax: **(84-24) 3943.3844**
Email:
**
This email address is being protected from spambots. You need JavaScript enabled to view it.
;
This email address is being protected from spambots. You need JavaScript enabled to view it.
**
Chủ tịch HĐQT:
** Ông Bùi Duy Chinh**
Tổng Giám đốc:
** Ông Mai Tiến Dũng** **Trụ sở chính của Vinacontrol**
Công ty Cổ phần Tập đoàn Vinacontrol, tiền thân là Cục Kiểm nghiệm hàng hóa kiêm Sở Giám định hàng hóa xuất nhập khẩu được thành lập từ 24/10/1957, là tổ chức giám định đầu tiên tại Việt Nam.
Trụ sở chính của Vinacontrol đặt tại Hà nội và 26 Công ty thành viên, đơn vị trực thuộc, trạm, văn phòng đại diện đặt tại các thành phố lớn, cảng biển, trung tâm thương mại và cửa khẩu của Việt Nam, với 1000 cán bộ/ giám định viên/ thẩm định viên thuộc nhiều lĩnh vực và ngành nghề khác nhau.
Hiện nay, Vinacontrol là tổ chức giám định hàng đầu và có uy tín tại thị trường Việt Nam, hoạt động trên phạm vi rộng với năng lực kỹ thuật giám định đa dạng, đội ngũ giám định viên chuyên nghiệp và giàu kinh nghiệm. Trang thiết bị của Vinacontrol thường xuyên được bổ sung, nâng cấp đáp ứng mọi nhu cầu giám định, phân tích và thử nghiệm của khách hàng, với 06 phòng thử nghiệm với trang thiết bị hiện đại đạt tiêu chuẩn quốc gia (VILAS).
Chứng thư giám định do Vinacontrol cấp là chứng cứ khách quan, trung thực giúp khách hàng giải quyết có hiệu quả các vấn đề như khiếu nại, thanh toán, giao nhận, bảo hiểm, mua bán, thế chấp... trong các hoạt động sản xuất, kinh doanh và đầu tư.
Vinacontrol cam kết cung cấp cho khách hàng những dịch vụ đạt chất lượng cao nhất, đáp ứng các yêu cầu chính đáng của khách hàng.
**LĨNH VỰC KINH DOANH: **
|
|
Kiểm tra số lượng thép phôi tại cảng
Giám định tổn thất hàng hóa
Giám sát thiết bị siêu trường siêu trọng trong quá trình vận chuyển nội địa – Dự án Thủy điện Sơn La
Giám định mớn nước tàu biển
Giám định dây chuyền lắp ráp ô tô
Giám định máy móc thiết bị
Nghiệm thu hàng trước khi lắp đặt
Kiểm tra độ phóng xạ phế liệu nhập khẩu
Khử trùng tàu
Phân tích/ thử nghiệm mẫu tại phòng thí nghiệm
|
|
- Giám định về quy cách phẩm chất, tình trạng, số-khối lượng, bao bì, ký mã hiệu đối với mọi loaị hàng hoá (gồm cả máy móc, dây chuyền công nghệ, đá quý, kim loại hiếm)
- Giám sát hàng hóa trong quá trình sản xuất, giao nhận, bảo quản, vận chuyển, xếp dỡ, giám sát quá trình lắp ráp thiết bị dây chuyền công nghệ; thẩm định, tư vấn, giám sát công trình xây dựng
- Giám định các phương tiện vận tải, container, các dịch vụ giám định về hàng hải; giám định an toàn con tàu trước khi xếp hàng, phá dỡ hoặc sửa chữa
- Giám định tổn thất;Đại lý giám định tổn thất, phân bổ tổn thất cho các Công ty bảo hiểm trong và ngoài nước
- Dịch vụ lấy mẫu, phân tích và thử nghiệm
- Dịch vụ kiểm định kỹ thuật an toàn lao động
- Đo lường và lập bảng dung tích các phương tiện thủy
- Hiệu chuẩn và kiểm định các thiết bị đo lường
- Kiểm tra phá hủy, không phá hủy
- Giám định theo yêu cầu của mọi đối tượng để cung cấp chứng từ phục vụ công tác quản lý của Nhà nước thuộc các lĩnh vực như: Xuất xứ hàng hóa; quản lý chất lượng; an toàn, vệ sinh hàng hóa; nghiệm thu, quyết toán công trình đầu tư; bảo vệ môi trường (giám định về vệ sinh công nghiệp; giám định và xử lý nước, nước thải); các dịch vụ phục vụ thông quan
- Các dịch vụ có liên quan : Khử trùng, thẩm định giá; giám định không phá hủy; kiểm tra kết cấu hàn các công trình; kiểm tra thiết bị và thiết bị đo lường; kiểm tra và lập bảng dung tích các loại bồn chứa, sà lan; kiểm đếm; niêm phong-cặp chì; dịch vụ kiểm tra chất lượng hệ thống quản lý theo yêu cầu của khách hàng
- Tư vấn, đánh giá, chứng nhận áp dụng hệ thống quản lý theo các tiêu chuẩn quốc tế; Tư vấn về chất lượng hàng hóa, về pháp lý thương mại
- Chứng nhận sản phẩm
- Kiểm tra chứng nhận sự phù hợp về khả năng chịu lực của công trình; kiểm tra, chứng nhận sự phù hợp về chất lượng công trình xây dựng, máy móc, thiết bị, vật tư, vật liệu công trình (theo quy định của Nhà nước)
- Dịch vụ chuyển giao công nghệ
- Giám sát thi công xây dựng loại công trình dân dụng và công nghiệp, lĩnh vực chuyên môn giám sát: lắp đặt thiết bị, công nghệ điện tự động hoá
- Giám sát công tác lắp đặt thiết bị công trình
- Giám sát công tác lắp đặt thiết bị công nghệ
- Giám sát lắp đặt thiết bị điện - điện tử công trình xây dựng cấp 4
- Giám sát lắp đặt thiết bị, công nghệ cơ khí công trình xây dựng
- Tư vấn, lắp đặt thiết bị
- Tư vấn lập hồ sơ mời thầu và phân tích đánh giá hồ sơ dự thầu: tư vấn, xây lắp, cung cấp, lắp đặt thiết bị
- Thẩm tra hồ sơ dự toán, quyết toán các công trình xây dựng dân dụng, công nghiệp, giao thông, thủy lợi; Tư vấn lập dự án đầu tư xây dựng (Doanh nghiệp chỉ hoạt động khi có đủ điều kiện theo quy định của pháp luật);
- Ủy thác và nhận ủy thác xuất nhập khẩu hàng hóa;
- Dịch vụ khai thuê hải quan;
- Tư vấn thủ tục cổ phần hóa Doanh nghiệp, hợp nhất, mua bán, sáp nhập Doanh nghiệp (không bao gồm tư vấn pháp luật);
- Đào tạo kiến thức, nghiệp vụ thẩm định giá và nghiệp vụ có liên quan khác (chỉ hoạt động sau khi được cơ quan Nhà nước có thẩm quyền cho phép);
- Kinh doanh bất động sản;
- Dịch vụ khách sạn, cho thuê văn phòng (không bao gồm phòng hát Karaoke, quán bar, vũ trường);
- Dịch vụ giám định và dịch vụ khác theo sự ủy thác của mọi tổ chức giám định trong nước và quốc tế.
[Văn phòng tập đoàn](/cong-ty-thanh-vien/218-van-phong-cong-ty.html)
[Vinacontrol Hà Nội](/cong-ty-thanh-vien/217-vinacontrol-ha-noi.html)
[Vinacontrol Quảng Ninh](/cong-ty-thanh-vien/211-vinacontrol-quang-ninh.html)
[Vinacontrol Hải Phòng](/cong-ty-thanh-vien/212-vinacontrol-hai-phong.html)
[Vinacontrol Đà Nẵng](/cong-ty-thanh-vien/207-vinacontrol-da-nang.html)
[Công ty TNHH giám định Vinacontrol TP. HCM](/cong-ty-thanh-vien/204-cong-ty-tnhh-giam-dinh-vinacontrol-tp-ho-chi-minh.html)
[Vinacontrol Lào Cai](/cong-ty-thanh-vien/213-vinacontrol-lao-cai.html)
[Vinacontrol Lạng Sơn](/cong-ty-thanh-vien/214-vinacontrol-lang-son.html)
[Vinacontrol Móng Cái](/cong-ty-thanh-vien/210-vinacontrol-mong-cai.html)
[Vinacontrol Cửa Ông](/cong-ty-thanh-vien/208-vinacontrol-cua-ong.html)
[Vinacontrol Uông Bí](/cong-ty-thanh-vien/209-vinacontrol-uong-bi.html) [Vinacontrol Vinh](/cong-ty-thanh-vien/215-vinacontrol-vinh.html)
[Vinacontrol Quy Nhơn](/cong-ty-thanh-vien/206-vinacontrol-quy-nhon.html)
[Vinacontrol Phú Mỹ](/cong-ty-thanh-vien/201-vinacontrol-phu-my.html)
[Vinacontrol Nha Trang](/cong-ty-thanh-vien/203-vinacontrol-nha-trang.html)
[Vinacontrol Cần Thơ](/cong-ty-thanh-vien/202-vinacontrol-can-tho.html)
[Vinacontrol Dung Quất](/cong-ty-thanh-vien/205-vinacontrol-dung-quat.html)
[Văn phòng đại diện tại Đắc Lắc](/cong-ty-thanh-vien/200-van-phong-dai-dien-tai-dak-lac.html)
[Văn phòng đại diện tại Vũng Áng](/cong-ty-thanh-vien/252-van-phong-dai-dien-tai-vung-ang.html)
[Văn phòng đại diện tại Nghi Sơn](/cong-ty-thanh-vien/275-van-phong-dai-dien-tai-nghi-son.html)
[Văn phòng đại diện tại Quảng Bình](/cong-ty-thanh-vien/253-van-phong-dai-dien-tai-quang-binh.html)
[Công ty Cổ phần thẩm định giá Vinacontrol](/cong-ty-thanh-vien/192-cong-ty-tnhh-tham-dinh-gia-vinacontrol-vinacontrol-pv.html)
[Công ty CP chứng nhận và kiểm định Vinacontrol](/cong-ty-thanh-vien/190-cong-ty-cp-chung-nhan-vinacontrol.html)
[Công ty CP tư vấn & thẩm định môi trường Vinacontrol](/cong-ty-thanh-vien/189-cong-ty-cp-tu-van-va-tham-dinh-moi-truong-vinacontrol-vieca.html) [Hệ thống phòng thí nghiệm của Vinacontrol](/cong-ty-thanh-vien/216-he-thong-phong-thi-nghiem-cua-vinacontrol.html)
** 1. Chứng chỉ ISO 9001: 2008 – Công ty CP Tập đoàn Vinacontrol 2. Chứng chỉ ISO/ IEC 17020: 1998 (VIAS 015) – Công ty CP Tập đoàn Vinacontrol 3. Chứng chỉ ISO/ IEC 17020:2012 (VIAS 015) – Vinacontrol Hà Nội 4. Chứng chỉ ISO/ IEC 17020:2012 (VIAS 015) – Vinacontrol Hồ Chí Minh 5. Chứng chỉ ISO/ IEC 17020:2012 (VIAS 015) – Vinacontrol Hải Phòng 6. Chứng chỉ ISO/ IEC 17020: 2012 (VIAS 015) – Vinacontrol Quảng Ninh 7. Chứng chỉ ISO/ IEC 17020: 2012 (VIAS 015) – Vinacontrol Đà Nẵng 8. Chứng chỉ ISO/ IEC 17025: 2005 (VILAS 202) – Trung tâm phân tích và thử nghiệm 1 Vinacontrol 9. Chứng chỉ ISO/ IEC 17025: 2005 (VILAS 205) – Phòng thử nghiệm Vinacontrol Đà Nẵng 10. Chứng chỉ ISO/ IEC 17025: 2005 (VILAS 381) – Phòng thử nghiệm Vinacontrol Hải Phòng 11. Chứng chỉ ISO/ IEC 17025: 2005 (VILAS 234) – Trung tâm phân tích và thử nghiệm 2 Vinacontrol 12. Chứng chỉ ISO/ IEC 17025: 2005 (VILAS 196) – Phòng thí nghiệm Vinacontrol Vinh 13. Chứng chỉ ISO/ IEC 17025: 2005 (VILAS 268) – Phòng thí nghiệm Vinacontrol Quảng Ninh** **TUYỂN DỤNG NHÂN SỰ** **Thông báo tuyển dụng**
Vinacontrol Hà Nội thông báo tuyển dụng Biên dịch viên làm việc tại Hà Nội. Vinacontrol Cần Thơ thông báo tuyển dụng Chuyên viên kỹ thuật nghiệp vụ và Chuyên viên thị trường làm việc tại Cần Thơ.
**Vinacontrol là thành viên của các hiệp hội:** **HƯỚNG DẪN THỦ TỤC** **Hướng dẫn thủ tục yêu cầu giám định**
Công ty cổ phần Tập đoàn Vinacontrol là tổ chức giám định đầu tiên, lớn nhất, có thương hiệu uy tín hàng đầu ở Việt Nam. Vinacontrol chuyên cung cấp các dịch vụ về giám định và ...

Set-Cookie: eoty_ismobile=deleted; expires=Thu, 01-Jan-1970 00:00:01 GMT; path=/


markdown:
**Hiện nay diễn đàn chỉ chấp nhận thành viên thảo luận về Du Lịch mọi người muốn đăng ký vui lòng liên hệ Facebook:** [Admin](https://www.facebook.com/mrnguyenxuanduc)để được trợ giúp
Đặt
[Khach San Da Lat](http://khachsandalat.net/)giá rẻ [khách sạn đà lạt 3 sao](http://khachsandalat.net/Hotel-3-Sao.html)khuyến mãi [tour đà lạt trong 1 ngày](http://dulichdalat.pro/Danh-Sach-Tour/Tour-Da-Lat-1-ngay.html)và đặt [khách sạn đà lạt gần chợ](http://dulichdalat.pro/Khach-san-Da-Lat.html)tại website [Khachsandalat.pro](http://khachsandalat.pro/)có [Khach sạn đà lạt 3 sao gần chợ](http://khachsandalat.pro/3-sao)đẹp [Khach sạn đà lạt 4 sao](http://khachsandalat.pro/4-sao)tốt [Khách sạn ở gần chợ đà lạt](http://khachsandalat.pro/danh-sach/khach-san-gan-cho-da-lat.html)và [Khách sạn Đà Lạt ở gần hồ xuân hương](http://khachsandalat.pro/danh-sach/khach-san-da-lat-gan-ho-xuan-huong.html)tặng [Tour Đà Lạt trong ngày](http://khachsandalat.pro/du-lich-da-lat/tour-da-lat-1-ngay.html)và các tour [du lịch đà lạt giá rẻ](http://khachsandalat.pro/du-lich-da-lat)nhất mua [sua non alpha lipid lifeline](https://suanonalphalipidlifeline.vn/sua-non-alpha-lipid-lifeline-450g/)tại [suanonalphalipidlifeline.vn](https://suanonalphalipidlifeline.vn)
# hà nội
These are all contents from Diễn Đàn Du Lịch Việt Nam - Forum Du Lich Vndulich.edu.vn tagged hà nội. Contents: 10. Watchers: 0. Views: 1,056.
XenTag by

WARC-Type: response

Content-Type: application/http; msgtype=response

WARC-Identified-Payload-Type: text/html

Server: nginx

Connection: close

X-Frame-Options: SAMEORIGIN

Vary: Accept-Encoding,User-Agent

Content-Type: text/html; charset=UTF-8

Cache-control: private, max-age=0


markdown:
TRUNG TÂM HỖ TRỢ VÀ PHÁT TRIỂN SINH VIÊN VIỆT NAM
Trung tâm hỗ trợ và phát triển sinh viên việt nam
vietnamese students development and support center
Trang chủ
Về vsds
Giới thiệu
Quỹ VSDS
Đối tác
Truyền thông
Hoạt động
Giải Thể thao VUG
Sinh viên với biển, đảo Tổ quốc
Văn hoá Văn nghệ
Học bổng
Học tập và NCKH
Việc làm, Kỹ năng và Tình nguyện
Hỗ trợ đời sống
Thư viện
Thư viện ảnh
Thư viện video
Dữ liệu
Liên hệ
Trang chủ
Về vsds
Giới thiệu
Quỹ VSDS
Đối tác
Truyền thông
Hoạt động
Giải Thể thao VUG
Sinh viên với biển, đảo Tổ quốc
Văn hoá Văn nghệ
Học bổng
Học tập và NCKH
Việc làm, Kỹ năng và Tình nguyện
Hỗ trợ đời sống
Thư viện
Thư viện ảnh
Thư viện video
Dữ liệu
Liên hệ
Sơ đồ website
Đăng ký nhận bản tin
Bản đồ chỉ dẫn
Đóng lại
Đăng ký nhận bản tin
Để nhận được các bản tin mới nhất của VSDS, quý khách vui lòng nhập mail gửi về cho chúng tôi
Gửi
“Sinh viên với biển đảo Tổ quốc 2017” tại đảo Phú Quý, Bình Thuận
Triệu trái tim Sinh viên Việt Nam hướng về biển đảo Tổ quốc
Ra quân Chương trình "Tiếp sức mùa thi" năm 2017
Tổng kết Chương trình "Tiếp sức mùa thi" năm 2017
Nâng cao tính hiệu quả phong trào “Sinh viên 5 tốt”
Hội nghị Ban Chấp hành Trung ương Hội Sinh viên Việt Nam (mở rộng) lần thứ 6, khóa IX
Hội nghị cán bộ Đoàn trường học toàn quốc năm học 2017 - 2018
Sinh viên không thể đứng ngoài cuộc cách mạng 4.0
Giải Thể thao VUG
Tất cả
Đại học Bách khoa Hà Nội giành ngôi vô địch Futsal toàn quốc – VUG 2017
14/05/2017 | 1.982 lượt xem
Hai đại diện TP. Hà Nội "dắt tay nhau" vào trận chung kết toàn quốc
Chung kết và trao giải Giải Thể thao sinh viên Việt Nam năm học 2016 - 2017 khu vực TP. Hồ Chí Minh
Chung kết và trao giải Giải Thể thao sinh viên Việt Nam năm học 2016 - 2017, mùa giải thứ 5 khu vực thành phố Hà Nội
Bế mạc Giải Thể thao sinh viên Việt Nam năm học 2016 – 2017, khu vực thành phố Đà Nẵng
Sinh viên với biển, đảo Tổ quốc
Tất cả
Triệu trái tim Sinh viên Việt Nam hướng về biển đảo Tổ quốc
05/06/2017 | 1.503 lượt xem
“Sinh viên với biển đảo Tổ quốc 2017” tại đảo Phú Quý, Bình Thuận
Hướng dẫn thể lệ thi thiết kế logo du lịch Cô Tô
Trung ương Hội Sinh viên Việt Nam tổ chức Chương trình “Sinh viên với biển, đảo Tổ quốc” năm 2016
Thanh Hóa: Khánh thành bếp ăn tập thể cho học sinh dân tộc miền núi
Văn hoá Văn nghệ
Tất cả
Chương trình “Chào Tân Sinh viên – MobiFone Kết niềm vui, khơi sức trẻ” đã diễn ra thành công.
01/11/2016 | 2.265 lượt xem
Chuỗi chương trình Chào Tân Sinh viên - Mobi Fone Kết niềm vui Khơi sức trẻ
Bùng nổ đêm thi chung kết hành trình bài ca sinh viên 2015
Chung kết toàn quốc “Hành trình bài ca sinh viên 2015” - Hội tụ và Tỏa sáng
Sinh viên Hà Nội cuồng nhiệt hết mình trong đêm chung kết Cụm Hành trình bài ca sinh viên 2015
Học bổng
Tất cả
Lễ trao học bổng cho tân sinh viên "Cùng Osla thắp sáng khát vọng mùa thi" năm 2016
25/10/2016 | 1.802 lượt xem
Thông báo kết quả trao học bổng "Nâng bước thủ khoa" và học bổng cho sinh viên có hoàn cảnh khó khăn năm học 2016 - 2017
Cơ hội dành Học bổng “Canon - Chắp cánh nhân tài” năm học 2016 - 2017
Học tập và NCKH
Tất cả
Hội nghị cán bộ Đoàn trường học toàn quốc năm học 2017 - 2018
04/07/2017 | 797 lượt xem
Sinh viên không thể đứng ngoài cuộc cách mạng 4.0
Hội nghị Ban Chấp hành Trung ương Hội Sinh viên Việt Nam (mở rộng) lần thứ 6, khóa IX
Việc làm, Kỹ năng và Tình nguyện
Tất cả
Tổng kết Chương trình "Tiếp sức mùa thi" năm 2017
Ra quân Chương trình "Tiếp sức mùa thi" năm 2017
Ra quân tình nguyện xây dựng cột cờ Tổ quốc giai đoạn 2 trên đảo Cù Lao Xanh
Ủng hộ Mỳ gói cho đồng bào vùng bị thiên tai tại Quảng Ninh
Lễ ra quân Tiếp sức mùa thi 2014 - Hãy tự tin chúng tôi đi cùng bạn
Kế hoạch Chiến dịch Sinh viên tình nguyện "Mùa hè xanh 2014" - Trung ương Hội Sinh viên Việt Nam
35.000 Thanh niên - Sinh viên tình nguyện tiếp sức mùa thi
Lễ phát động hưởng ứng ngày thế giới phòng chống AIDS
Phối hợp với Trung tâm Hỗ trợ Học sinh, Sinh viên TP. HCM thực hiện tổ chức ngày hội "Phỏng vấn thử - thành công thật" lần thứ 7 năm 2012.
500 sinh viên tham dự Hội trại Nở hoa Độc lập
Hỗ trợ đời sống
Tất cả
Chương trình Hỗ trợ sinh viên về quê ăn Tết 2016
30/01/2016 | 6.125 lượt xem
“Chuyến xe mùa xuân” bắt đầu lăn bánh
Hơn 5000 suất quà tặng và vé xe về quê sẽ được trao tặng trong Chương trình “Hỗ trợ sinh viên về quê ăn Tết năm 2014”
Ấm lòng chuyến xe miễn phí chở 4.000 sinh viên về quê ăn Tết
Đưa sinh viên về quê ăn Tết
Tin tức nhiều người đọc nhất
Tất cả
Sinh viên Hà Nội cuồng nhiệt hết mình trong đêm chung kết Cụm Hành trình bài ca sinh viên 2015
Văn hoá Văn nghệ
25/05/2015 | 8.446 lượt xem
Lễ phát động hưởng ứng ngày thế giới phòng chống AIDS
Việc làm, Kỹ năng và Tình nguyện
25/11/2012 | 7.691 lượt xem
Chương trình Hỗ trợ sinh viên về quê ăn Tết 2016
Hỗ trợ đời sống
30/01/2016 | 6.125 lượt xem
Trao gần 70 suất học bổng cho Thủ khoa và sinh viên có hoàn cảnh khó khăn
Học bổng
30/11/2015 | 5.202 lượt xem
Lễ ra quân Tiếp sức mùa thi 2014 - Hãy tự tin chúng tôi đi cùng bạn
Việc làm, Kỹ năng và Tình nguyện
09/06/2014 | 4.946 lượt xem
Chuỗi chương trình Chào Tân Sinh viên - Mobi Fone Kết niềm vui Khơi sức trẻ
Văn hoá Văn nghệ
06/10/2016 | 4.873 lượt xem
Thông báo kết quả trao học bổng "Nâng bước thủ khoa" và học bổng cho sinh viên có hoàn cảnh khó khăn năm học 2016 - 2017
Học bổng
19/09/2016 | 4.606 lượt xem
Khi VUG không chỉ là một cuộc chơi!
Giải Thể thao VUG
07/04/2017 | 3.858 lượt xem
Đưa sinh viên về quê ăn Tết
Hỗ trợ đời sống
23/01/2014 | 3.617 lượt xem
“Sinh viên với biển đảo Tổ quốc 2017” tại đảo Phú Quý, Bình Thuận
Sinh viên với biển, đảo Tổ quốc
04/06/2017 | 3.315 lượt xem
Tin mới nhất
08:16
04/07/2017
Hội nghị cán bộ Đoàn trường học toàn quốc năm học 2017 - 2018
10:10
04/07/2017
Sinh viên không thể đứng ngoài cuộc cách mạng 4.0
09:43
04/07/2017
Tổng kết Chương trình "Tiếp sức mùa thi" năm 2017
06:04
03/07/2017
Hội nghị Ban Chấp hành Trung ương Hội Sinh viên Việt Nam (mở rộng) lần thứ 6, khóa IX
04:00
03/07/2017
Nâng cao tính hiệu quả phong trào “Sinh viên 5 tốt”
10:30
02/07/2017
Thăm quan Nông trường nông nghiệp công nghệ cao VinEco Long Thành, tỉnh Đồng Nai
02:59
11/06/2017
Ra quân Chương trình "Tiếp sức mùa thi" năm 2017
08:59
05/06/2017
Triệu trái tim Sinh viên Việt Nam hướng về biển đảo Tổ quốc
08:50
04/06/2017
“Sinh viên với biển đảo Tổ quốc 2017” tại đảo Phú Quý, Bình Thuận
07:20
14/05/2017
Đại học Bách khoa Hà Nội giành ngôi vô địch Futsal toàn quốc – VUG 2017
Thư viện video
Giới thiệu Hội thi "Ánh sáng soi đường" lần thứ 2 - Năm 2017
13/04/2017 | 552 lượt xem
Hội thi khoa học sinh viên toàn quốc “Olympic Kinh tế lượng và Ứng dụng” lần thứ II
13/04/2017 | 756 lượt xem
Trực tiếp: TỌA ĐÀM" SINH VIÊN VỚI VẤN ĐỀ KHỞI NGHIỆP".
13/04/2017 | 2.979 lượt xem
Hình ảnh
Album hình ảnh Thanh niên khởi nghiệp
13/04/2017 | 613 lượt xem
Album hình ảnh Sinh viên với Biển Đảo
13/04/2017 | 4.845 lượt xem
Album ảnh cuộc thi ánh sáng soi đường
13/04/2017 | 470 lượt xem
Facebook
Trang chủ
Giới thiệu
Hoạt động
Thư viện
Liên hệ
Trung tâm hỗ trợ và phát triển sinh viên việt nam
vietnamese students development and support center
Số 64 Bà Triệu, Phường Hàng Bài, Quận Hoàn Kiếm, Tp Hà Nội
Tel: (04) 6263 1833 / (04) 6263 1831
Email: vanphongvsds@gmail.com
Đang online:
15
Tổng lượt truy cập:
185.413
Thiết kế website
&
SEO
-
Tất Thành
Đóng lại

WARC-Identified-Payload-Type: application/xhtml+xml

Cache-Control: private

Content-Type: text/html; charset=utf-8

X-Powered-By-Plesk: PleskWin


markdown:
## Thông tin
## Tin tức các hãng xe
## Kết nối
## Kinh doanh
# Thắc mắc mua xe no pp | Hỏi/Đáp - 2banh.vn
Thảo luận trong '
[Xe phân khối lớn](xe-phan-khoi-lon/)' bắt đầu bởi [Phùng Kiến Khoa](members/phung-kien-khoa.33213/), [28 Tháng tư 2016](threads/thac-mac-mua-xe-no-pp.43344/).
[](threads/ban-xe-yamaha-fz1-1000cc.71036/)
[bán xe yamaha fz1 - 1000cc](threads/ban-xe-yamaha-fz1-1000cc.71036/)bởi [Huanbeo](members/), 21 Tháng bảy 2017 lúc 09:34 [](threads/cafe-racer-honda-cbt-125-cc.71026/)
![ cafe racer honda cbt 125 cc](http://s4.cache.2banh.vn/70x70/image/2017/07/cafe-racer-honda-cbt-125-cc-49549-1500600646-597159465a05a.jpg)
[cafe racer honda cbt 125 cc](threads/cafe-racer-honda-cbt-125-cc.71026/)bởi [ledohaitrieu](members/), 21 Tháng bảy 2017 lúc 08:53 [](threads/ban-tu-dung-dung-cu-do-nghe-sua-chua-xe-may-gia-re-uy-tin-chat-luong.71116/)
![ bán tủ đựng dụng cụ, đồ nghề sửa chữa xe máy giá rẻ, uy tín, chất lượng](http://s1.cache.2banh.vn/70x70/?ext=http%3A%2F%2Fwww.trungtamthietbisuachua.vn%2Fpublic%2Fuploads%2Fimages%2Ftu-treo-do-nghe-2-canh-nam-ngan.jpg)
[bán tủ đựng dụng cụ, đồ nghề sửa chữa xe máy giá rẻ, uy tín, chất lượng](threads/ban-tu-dung-dung-cu-do-nghe-sua-chua-xe-may-gia-re-uy-tin-chat-luong.71116/)bởi [thiet bi sua chua123](members/), 22 Tháng bảy 2017 lúc 09:19 [](threads/phu-tung-piaggio-chinh-hang-tai-hoa-da-piaggio-ha-noi.71113/)
![ phụ tùng piaggio chính hãng tại hoa đà piaggio - hà nội](http://s4.cache.2banh.vn/70x70/image/2017/07/phu-tung-piaggio-chinh-hang-tai-hoa-da-piaggio-ha-noi-48155-1500685435-5972a47bcfec7.jpg)
[phụ tùng piaggio chính hãng tại hoa đà piaggio - hà nội](threads/phu-tung-piaggio-chinh-hang-tai-hoa-da-piaggio-ha-noi.71113/)bởi [Cửa hàng HOA ĐÀ PIAGGIO VESPA](members/), 22 Tháng bảy 2017 lúc 08:29
Quan tâm nhiều
[](threads/dam-cuoi-cua-cap-doi-biker-cung-chay-winner.71057/)
![ Đám cưới của cặp đôi biker cùng chạy Winner](http://s4.cache.2banh.vn/70x70/image/2017/07/dam-cuoi-cua-cap-biker-chay-winner-48503-1500608578-597178425515d.jpg)
[Đám cưới của cặp đôi biker cùng chạy Winner](threads/dam-cuoi-cua-cap-doi-biker-cung-chay-winner.71057/)bởi [LanAnhCGB](members/), 21 Tháng bảy 2017 lúc 12:19 [](threads/sung-xiet-bu-long-ingersoll-rand.71059/)
![ SÚNG XIẾT BU LÔNG INGERSOLL RAND](http://s4.cache.2banh.vn/70x70/image/2017/07/sung-xiet-bu-long-ingersoll-rand-47193-1500618299-59719e3b58781.png)
[SÚNG XIẾT BU LÔNG INGERSOLL RAND](threads/sung-xiet-bu-long-ingersoll-rand.71059/)bởi [Đặng Thế Nam](members/), 21 Tháng bảy 2017 lúc 13:48 [](threads/can-than-khi-ban-xe-may-cu-cho-dan-buon.71099/)
![ Cẩn thận khi bán xe máy cũ cho dân buôn](http://congnghe5giay.com/styles/congnghe2014/images/no_image_interested.jpg)
[Cẩn thận khi bán xe máy cũ cho dân buôn](threads/can-than-khi-ban-xe-may-cu-cho-dan-buon.71099/)bởi [nguyenthuha203](members/), 21 Tháng bảy 2017 lúc 21:48 [](threads/thiet-bi-dinh-vi-xe-may-tk115-gia-re-nhat.71101/)
![ Thiết bị định vị xe máy – TK115 giá rẻ nhất](http://s4.cache.2banh.vn/70x70/image/2017/07/thiet-bi-dinh-vi-xe-may-tk115-gia-re-nhat-28594-1500655153-59722e314a501.jpg)
[Thiết bị định vị xe máy – TK115 giá rẻ nhất](threads/thiet-bi-dinh-vi-xe-may-tk115-gia-re-nhat.71101/)bởi [kksitinh14](members/), 21 Tháng bảy 2017 lúc 23:59
Tin công nghệ nổi bật
[](http://congnghe5giay.com/threads/xoa-moi-thong-bao-chi-trong-1-lan-nhan-bang-3d-touch-cua-iphone.74991/)
![ Xoá mọi thông báo chỉ trong 1 lần nhấn bằng 3D touch của iPhone.](http://s1.cache.2banh.vn/75x75/?ext=https%3A%2F%2Fs1.storage.congnghe5giay.com%2Fimage%2F2017%2F07%2Fxoa-moi-thong-bao-chi-trong-1-lan-nhan-bang-3d-touch-cua-iphone-26775-1499488733-596061dd1e4ab.jpeg)
[Xoá mọi thông báo chỉ trong 1 lần nhấn bằng 3D touch của iPhone.](http://congnghe5giay.com/threads/xoa-moi-thong-bao-chi-trong-1-lan-nhan-bang-3d-touch-cua-iphone.74991/)8 Tháng bảy 2017 [](http://congnghe5giay.com/threads/galaxy-note-7-fan-edition-hang-xach-tay-gia-16-trieu-co-xung-dang.74988/)
![ Galaxy Note 7 Fan Edition - Hàng xách tay giá 16 triệu có xứng đáng?](http://s1.cache.2banh.vn/75x75/?ext=http%3A%2F%2Fgenknews.genkcdn.vn%2Fthumb_w%2F660%2F2017%2F19849143-10155526828908466-150318571-n-1499397933959.jpg)
[Galaxy Note 7 Fan Edition - Hàng xách tay giá 16 triệu có xứng đáng?](http://congnghe5giay.com/threads/galaxy-note-7-fan-edition-hang-xach-tay-gia-16-trieu-co-xung-dang.74988/)8 Tháng bảy 2017

Server: Nhat Nguyet Websphere 12.3 build 3.456.234.2600

Set-Cookie: 2b_session=0f7c4f6cf2597f1e797069b306ee7633; path=/; domain=.2banh.vn; httponly

Vary: Accept-Encoding


markdown:
Tiểu vương Muhammad V, sinh ngày 6/10/1969, sẽ chính thức trở thành Nhà Vua của Malaysia kể từ ngày 13/10 với thời gian tại vị 5 năm.
Cũng tại phiên họp, Tiểu vương bang Perak Nazrin Muizzuddin Shah được bầu chọn làm Phó Vương của Malaysia trong khoảng thời gian tương tự.
*Chân dung tân vương Muhammad V của Malaysia. (Nguồn: undomiel84.wordpress.com)*
Vua hiện tại của Malaysia là Tiểu vương bang Kedah Abdul Halim Mu’adzam Shah, 88 tuổi. Ông bắt đầu nhiệm kỳ của mình vào ngày 13/12/2011. Ông là người đầu tiên trong lịch sử Malaysia hai lần lên làm Vua, nhiệm kỳ đầu của ông từ năm 1970-1975.
Việc bầu chọn Nhà Vua Malaysia được tiến hành 5 năm một lần. Tiểu vương 9 bang của Malaysia sẽ lần lượt thay nhau đảm nhận chức vụ này. Trong hệ thống chính trị hiện tại của Malaysia, Nhà Vua không có thực quyền. Tuy nhiên, Nhà Vua luôn được người dân nước này kính trọng và yêu mến.
**TTXVN**

X-Cache: MISS from xCache11-01


markdown:
Giới nhạc Hàn mới đây xuất hiện thông tin nữ ca sĩ Lee Hyori sẽ trở lại ca hát sau 1 năm ở ẩn. Cụ thể, Lee Hyori sẽ góp giọng trong album sắp ra mắt của đàn chị Uhm Jung Hwa. Nguồn tin còn cho biết, nữ ca sĩ 37 tuổi sẽ không tham gia quảng bá trên truyền hình.
Lee Hyori đang có những ngày sống thầm lặng, rời xa giới showbiz ồn ào. Ảnh:
*Nate*
“Gần đây Lee Hyori đã tới buổi thu âm. Cô ấy không thường xuyên tham gia vào các đĩa nhạc hợp tác mà rút lui khỏi làng giải trí được một thời gian nhưng vẫn duy trì mối quan hệ tốt đẹp với Uhm Jung Hwa” – nguồn tin nói.
Trước đó, Lee Hyori từng là khách mời trong bộ phim điện ảnh
*Dancing Queen *của đàn chị. Trong giới Kpop, 2 nữ ca sĩ cùng theo đuổi phong cách sexy, là hình mẫu cho lớp đàn em học hỏi.
Nữ ca sĩ bị đồn góp giọng trong album mới của đàn chị Uhm Jung Hwa. Ảnh:
*SP*
Lee Hyori là một trong những sao Hàn ở ẩn kín nhất hiện nay. Tháng 10/2015, giọng ca gợi cảm tuyên bố tạm thời lui về hậu trường 2 năm để dành thời gian cho bản thân. Cô và ông xã là nhạc sĩ Lee Sang Soon đang tận hưởng cuộc sống đời thường ở đảo Jeju. Sản phẩm âm nhạc gần đây nhất của diva gợi cảm là album thứ năm Monochrome phát hành vào năm 2013 với đĩa đơn chủ đề
*Bad Girls. *Đã có 17.000 bản được bán ra và 2,75 triệu doanh thu nhạc số.
Đầu năm nay, loạt ảnh Lee Hyori làm từ thiện ở Jeju được báo chí tiết lộ.
Về phía Uhm Jung Hwa, album mới đánh dấu sự trở lại của cô kể từ đĩa nhạc
*D.I.S.C.O.* năm 2008. Lần này, giọng ca 47 tuổi hợp tác với công ty giải trí Mystic của nhà sản xuất Jo Young Chul – người đứng sau các album của IU, Brown Eyed Girls và Gain.
Uhm Jung Hwa vào nghề từ năm 1993 và sở hữu hàng loạt hit. Ngoài ca nhạc, cô còn thành công trong lĩnh vực phim ảnh.
Khôi Ngô

X-Cache: MISS from xCache11-02


markdown:
Đông Dương là bộ phim của đạo diễn: Régis Wargnier (Pháp) được công chiếu lần đầu năm 1992 với sự tham gia của các diễn viên: Catherine Deneuve, Vincent Perez, Linh Dan Pham, Jean Yanne.
Bộ phim “Đông Dương” xoay quanh cuộc đời của hai mẹ con Eliane Devries (Catherine Deneuve) và Camille (Phạm Linh Đan). Eliane là một phụ nữ Pháp sống ở Việt Nam, mặc dù có nhiều người theo đuổi nhưng cô vẫn sống vậy và nhận Camille - một cô gái Việt mang dòng dõi vua chúa mồ côi từ nhỏ làm con nuôi.
Hai nhân vật nữ trong phim. Ảnh zing.vn
Hai mẹ con cùng nhau sống bình lặng cho tới khi gặp viên sĩ quan hải quân trẻ tuổi Jean-Baptiste Le Guen. Vô tình và trớ trêu thay, cả Eliane và Camille đều phải lòng viên sĩ quan. Nhận ra tình cảm của con gái, Eliane đã chôn vùi tình cảm cá nhân riêng của mình. Nhưng với Camille, khi đó đã được sắp đặt hôn lễ với một thanh niên quyền quý khác, cô sẵn sàng từ bỏ tất cả để đi theo tiếng gọi của con tim.
Sau này, Jean-Baptiste chết, con trai của Jean-Baptiste và Camille được Eliane nuôi, còn Camille theo cách mạng. Cả hai mẹ con gặp lại nhau tại Hội nghị Geneve 1954.
Bộ phim“Đông Dương” từng dành giải thưởng Oscar dành cho phim nói tiếng nước ngoài hay nhất trong lễ trao giải Oscar lần thứ 65, Catherine Deneuve cũng nhận được một đề cử giải Oscar ở hạng mục vai nữ chính.
**Hà Anh**


markdown:
Twitter đang đứng trước nguy cơ khó có thể tự bán mình
Theo
*Slashgear*, trong một bài phỏng vấn với tờ *Financial Times*, CEO của Salesforce - Marc Benioff chia sẻ: "Twitter không phù hợp với chúng tôi".
Thông tin nói trên được xem là một viễn cảnh rất xấu cho việc "bán mình" của Twitter, bởi hiện nay đã có rất nhiều công ty công nghệ như Verizon, Google và Disney cũng không còn ý định mua lại Twitter.
Twitter ban đầu đã muốn kết thúc đàm phán với một bên mua trước khi báo cáo tình hình kinh doanh trong quý 3 năm nay. Dự kiến, bản bản cáo này sẽ được thực hiện vào ngày 27.10 tới.
Sau khi Salesforce tuyên bố không muốn mua lại Twitter, giá trị cổ phiếu của mạng xã hội này đã giảm 6%.
Cách đây vài tháng, thông tin về việc Twitter có khả năng "bán mình" đã bắt đầu xuất hiện, khi công ty này đã không thể thu hút thêm người sử dụng mới, khiến cho tăng trưởng trong thời gian qua bị chững lại. Dù Twitter nhiều lần tung ra các tính năng mới, nhưng vẫn chưa đủ để thu hút người dùng.
**Thành Luân**

X-Cache: MISS from cache30


markdown:
Với mục đích trao đổi với các cơ quan và đối tác của Việt Nam về các giải pháp sáng tạo và bền vững cũng như khả năng đầu tư của Thụy Điển trong các lĩnh vực đóng vai trò quan trọng cho nền kinh tế Việt Nam, ngày 5/10, Thứ trưởng Bộ Công Thương Đỗ Thắng Hải đã có buổi tiếp bà Ann Linde, Bộ trưởng Thương mại Thụy Điển và đặc trách EU cùng đoàn gồm 18 doanh nghiệp của Thụy Điển trong các lĩnh vực sản xuất và cơ sở hạ tầng.
*Thứ trưởng Bộ Công Thương Đỗ Thắng Hải. Ảnh: Uyên Hương/BNEWS/TTXVN*
Bà Ann Linde, Bộ trưởng Thương mại và Đặc trách EU cho biết, Chính phủ Thụy Điển đã thông qua một chiến lược xuất khẩu đầy tham vọng nhằm gia tăng thương mại và thúc đẩy sự tham gia của các công ty Thụy Điển trong nền kinh tế toàn cầu.
Thương mại song phương và đầu tư trong khu vực Đông Nam Á - đầu tàu tăng trưởng của thế giới, là một phần quan trọng của mục tiêu này.
Theo bà Ann Linde, là nước có tốc độ tăng trưởng nhanh thứ hai thế giới, Việt Nam có vai trò quan trọng trong khu vực.
Với việc triển khai thực thi Hiệp định thương mại tự do EU-Việt Nam, trao đổi thương mại giữa Thụy Điển và Việt Nam cùng với việc đầu tư từ các công ty Thụy Điển đến Việt Nam chắc chắn sẽ được mở rộng và phát triển.
Thứ trưởng Bộ Công Thương Đỗ Thắng Hải nhấn mạnh, Việt Nam là một trong những quốc gia có nền kinh tế phát triển nhanh nhất châu Á, tăng trưởng trung bình đạt 6% trong hai thập kỷ qua.
Với sự tăng trưởng kinh tế, người dân cũng như doanh nghiệp kì vọng các giải pháp giao thông công cộng cho phép con người di chuyển dễ dàng, giảm thiểu tắc nghẽn, nâng cao sức khỏe và chất lượng cuộc sống cũng như các giải pháp năng lượng hiện đại cung cấp nguồn năng lượng chất lượng cao.
Bên cạnh đó, các giải pháp về sản xuất cũng được kỳ vọng sẽ an toàn, hiệu quả hơn, có tuổi thọ lâu và đạt chất lượng các sản phẩm an toàn khi đến người tiêu dùng.
Ngoài ra, ảnh hưởng tiêu cực đến môi trường của những giải pháp này cần được giảm thiểu để đáp ứng nhu cầu toàn cầu và mục tiêu phát triển bền vững.
Đổi mới sáng tạo là một trong những nhân tố quan trọng nhất góp phần cho quá trình phát triển của xã hội hiện đại.
Trong lĩnh vực này, Thụy Điển là quốc gia dẫn đầu thế giới, được xếp hạng là quốc gia đổi mới sáng tạo nhất trong Liên minh châu Âu và xếp vị trí thứ 3 trên toàn thế giới vào năm 2016.
Đổi mới sáng tạo là yếu tố cốt lõi trong chặng đường phát triển của Thụy Điển, từ một trong những quốc gia nghèo nhất của châu Âu ở thế kỷ trước, trở thành một trong những quốc gia phát triển nhất hiện nay.
Các doanh nghiệp Thụy Điển cũng bày tỏ tự hào bởi đây là một trong những quốc gia bền vững nhất thế giới. Nguồn năng lượng tái tạo của Thụy Điển chiếm thị phần cao nhất trong mảng năng lượng của đất nước.
Chính phủ Thụy Điển cũng có tham vọng trở thành một trong những quốc gia đầu tiên trên thế giới không sử dụng nhiên liệu hóa thạch.
Không những thế, Chính phủ Thụy Điển đã dành 400 triệu SEK cho việc nghiên cứu và phát triển công nghệ môi trường./.


markdown: CÔNG TY TRƯỜNG NAM-CHUYÊN CUNG CẤP SỈ ÁO THUN 4 CHIỀU GIÁ RẺ 40k – 0981 656 114 Tags:bo si ao thun,bo si ao somi,bo si ao so mi, bỏ sỉ áo somi,áo sơ mi giá rẻ,bỏ sỉ áo thun, bo si ao thun, bỏ sỉ áo khoác, bo si ao khoac, bo si ao so mi, áo thun korea, áo thun teen, ao thun teen, xưởng may gia công ,xuong may gia cong, chuyên may gia công,chuyen may gia cong,chuyen may quan ao nam,chuyên may quần áo nam, xưởng may, Thun teen giá sỉ,bỏ sỉ áo thun teen , Bỏ sỉ áo thun nam, bo si ao thun nam, Bỏ sỉ áo sơ mi nam, bo si ao so mi nam , Bỏ sỉ áo khoác nam, bo si ao khoac nam, Bỏ sỉ áo thun teen, bo si ao thun teen, Xưởng may áo thun nam, xuong may ao thun nam, Xưởng may áo sơ mi nam, xuong may ao so mi nam, Xưởng may áo thun teen, áo thun teen giá rẻ, Xưởng may áo khoác nam, áo khoác nam giá rẻ, Bán sỉ quần áo nam, Chuyên bỏ sỉ quần áo nam, Bán sỉ thời trang, Bỏ sỉ quần áo nam, Áo Sơ Mi Nam Hàn Quốc, Bán sỉ áo sơ mi, Bán sỉ quần áo nam, Bán sỉ quần áo, Gia công áo khoác, cung cấp sỉ và lẻ áo khoác, thoi trang gia re, sơ mi nam, ao so mi nam, áo sơ mi hàn quốc nam giá rẻ, ao so mi han quoc nam gia re, áo khoác nam giá rẻ, ao khoac nam gia re, may đồng phục học sinh giá rẻ, gia công quần áo, xưởng may gia công, quần kaki nam giá rẻ, quần short nam, Đ/C: 63/4 - 63/12 Đỗ Nhuận, F Sơn Kỳ,Quận Tân Phú, Tp HCM Web: truongnamfashion.com Email: truongnamfashion@gmail.com Tel: 08 3602 3730 Hotline: 0981 656 114 - 0981 656 115 – 0949 977 000 -Chuyên nhận may gia công giá rẻ -Chuyên bỏ sỉ áo THUN nam, somi, khoác… giá rẻ CHỈ CẦN LẤY ĐỦ 10 ÁO BẠN ĐÃ ĐƯỢC TÍNH GIÁ SỈ!^^ Để xem tất cả các mẫu của công ty vui lòng nhấp>>Vào Đâynha các bạn Các bạn có thể vào trang web: truongnamfashion.comđể đặt hàng online hoặc gọi đến số Hotline: ........hoặc ..............để đặt hàng trực tiếp với nhân viên công ty. MUA CÀNG NHIỀU GIÁ CÀNG RẺ!!! Các bạn có thể vào trang web: truongnamfashion.comđể đặt hàng online hoặc gọi đến số Hotline: 0981 656 114 hoặc 0949 977 000 để đặt hàng trực tiếp với nhân viên công ty. Thun 4 chiều: -Giá bỏ sỉ:40k Chuyên bỏ sỉ áo thun trơn 4 chiềuthun teen) Mua càng nhiều giá càng rẻ!!!!! Để xem tất cả sản phẩm vui lòng click>>vào đâynha các bạn!!! Thun 4 chiều:

Server: Apache/2.2.15 (CentOS)


markdown:
[http://www.cadviet.c...nha_chu_hoa.dwg](http://www.cadviet.com/upfiles/2/nha_chu_hoa.dwg)
Thời buổi kinh tế khó khăng , làm tới 2 phương án rồi mà cứ ỏng ẹo ko chiệu ok dùm cái
![ :s_dead:](http://www.cadviet.com/forum/public/style_emoticons/default/wink.gif)
Đã gửi 05 August 2009 - 09:37 PM
Đã gửi 06 August 2009 - 12:55 PM
Chắc tại không có gì nổi bậc cả nên Gia chủ chưa chịu ok thôi
[http://www.cadviet.c...nha_chu_hoa.dwg]
Thời buổi kinh tế khó khăng , làm tới 2 phương án rồi mà cứ ỏng ẹo ko chiệu ok dùm cái
Đã gửi 15 August 2009 - 03:24 PM
Đã gửi 18 April 2012 - 04:37 PM
Đã gửi 18 April 2012 - 05:14 PM
[http://www.cadviet.c...nha_chu_hoa.dwg]
Thời buổi kinh tế khó khăng , làm tới 2 phương án rồi mà cứ ỏng ẹo ko chiệu ok dùm cái
Đã gửi 18 April 2012 - 05:17 PM
Đã gửi 18 April 2012 - 07:46 PM
có thấy đâu ta
mẫu nhà

WARC-Truncated: length

Server: Apache

Set-Cookie: modpids=deleted; expires=Thu, 01-Jan-1970 00:00:01 GMT; path=/


markdown:
[](http://www.cadviet.com/forum/user/99356-khoadkt/)
![ Hình ảnh](http://www.gravatar.com/avatar/5a7748e2a7e6b50fd3b873d9350e13b2?s=100&d=http%3A%2F%2Fwww.cadviet.com%2Fforum%2Fpublic%2Fstyle_images%2Fmaster%2Fprofile%2Fdefault_large.png)
# Hỏi về lỗi fail to get commcntrcontrller
[khoadkt](http://www.cadviet.com/forum/user/99356-khoadkt/), Sep 23 2011 10:01 AM
###
[
#1
](http://www.cadviet.com/forum/topic/54908-hoi-ve-loi-fail-to-get-commcntrcontrller/#entry169940)
![Hỏi về lỗi fail to get commcntrcontrllerLiên kết đến bài viết #1](http://www.cadviet.com/forum/public/style_images/master/icon_share.png)
Đã gửi 23 September 2011 - 10:01 AM
2. em dùng lệnh DI mà vẫn ko thấy được kích thước thì phải làm sao?
Em cảm ơn.
- 0
###
[
#2
](http://www.cadviet.com/forum/topic/54908-hoi-ve-loi-fail-to-get-commcntrcontrller/#entry296882)
![Hỏi về lỗi fail to get commcntrcontrllerLiên kết đến bài viết #2](http://www.cadviet.com/forum/public/style_images/master/icon_share.png)
Đã gửi 06 June 2014 - 07:56 PM
bạn vào computer seach "WSCommCntrAcCon.arx" và xóa nó là ok !!!!!!! cách này là các bác trong diễn đàn này chỉ đấy ! nhưng khi mình xóa nó rồi thì không còn lỗi autocad 2007 nữa , mà có khi mở sap2000 và etab lên thì nó bị lỗi như vầy "error 1308 . source file not foud : D : \ .....| autocad2007\autocad2007\Bin\AcadFEUI\Program File\Root\WSCommCntrAcCon.arx.Veryfi that the file exits and that you can access it" ! rồi mình nhấn Ignore thì sap2000 và etab sử dụng bình thường và autocad thì cũng như vậy nữa hà ! bác nào giúp mình với !
- 0
###
[
#3
](http://www.cadviet.com/forum/topic/54908-hoi-ve-loi-fail-to-get-commcntrcontrller/#entry296883)
![Hỏi về lỗi fail to get commcntrcontrllerLiên kết đến bài viết #3](http://www.cadviet.com/forum/public/style_images/master/icon_share.png)
Đã gửi 06 June 2014 - 08:05 PM
mình nhầm tí ! khi nhấn Ignore thì sap2000 và etab vẫn sử dụng bình thường còn autocad thì ok ! nhưng mỗi lần muốn sử dụng sap và etab thì nó bị nỗi hàng chữ như trên phải nhấn Ignore đó ! có bác nào biết không , xin chỉ mình với ! mình xin cám ơn ak !
- 0


markdown:
[http://www.upanh.com...&id=3vp27v9x2ao](http://www.upanh.com/view/?s=upload&id=3vp27v9x2ao)
Cái bác bảo em sửa ở trên chỉ là cái chữ ở trong khung bang tọa độ thôi.
Em xin cảm ơn bác
Đã gửi 22 July 2013 - 05:08 PM
Đã gửi 23 July 2013 - 09:59 AM
Ý em muốn sửa cái text này nhỏ bớt anh à, anh nhìn hình rồi giúp em phát
[http://www.upanh.com...&id=3vp27v9x2ao]
Cái bác bảo em sửa ở trên chỉ là cái chữ ở trong khung bang tọa độ thôi.
Em xin cảm ơn bác
Sửa dòng này :
(taochu (itoa SBD) "MiaT" 256 pt 1.0 "Aptima")
Giá trị 1.0 màu đỏ là cao chữ .
(Bạn Ctrl+C dòng trên rồi past vào phần Find của trình soạn thảo là tìm đc dòng đó nhanh chóng thôi)
Đã gửi 23 July 2013 - 01:27 PM
Đã gửi 23 July 2013 - 02:29 PM
Cái này chắc cũng dùng tạm đc cho yc của bạn :
Thanks bác em đã làm đc rồi. Tiện đây cho em hỏi có lisp nào chạy cạnh của thửa đất không cho em xin với.
Nó cũng giống như mình chạy tọa độ, chỉ cần pick vào 1 điểm trong vùng kín là nó tự hiện kích thước tất cả các cạnh lên
(defun C:ghicanh (/ ss)
(luuBHT)
(setvar "CMDECHO" 0)
(setvar "OSMODE" 0)
(setq ss (ssget))
(command "UNDO" "BE" "")
(T_ALL ss)
(command "UNDO" "E" "")
(traBHT))
(defun XULY (s1 s2 / goc so canh goc90 pt0 pt)
(setq goc (angle s1 s2) so (distance s1 s2) HSLT 2 )
(setq pt0 (polar s1 goc (/ so 2)))
(setq goc90 (+ goc (/ PI 2)) pt (polar pt0 goc90 0.8))
(setq canh (trtos so HSLT))
(if (or (<= (* (/ goc pi) 180) 90) (>= (* (/ goc pi) 180) 270))
(command "TEXT" "M" pt 0.85 (* (/ goc pi) 180) canh "")
(command "TEXT" "M" pt 0.85 (+ (* (/ goc pi) 180) 180) canh "")))
(defun T_LINE (oldob / s01 s02)
(setq s01 (cdr (assoc 10 oldob)) s02 (cdr (assoc 11 oldob)))
(xuly s01 s02))
(defun T_POLYLINE (oldob / s s1 s2 i)
(setq i 0 s nil s1 nil)
(while (< i (length oldob))
(if (= (car (nth i oldob)) 10)
(progn
(setq s2 (cdr (nth i oldob)))
(if (= s1 nil) (setq s s2) (xuly s1 s2))
(setq s1 s2)))
(setq i (1+ i)))
(if (= (cdr (assoc 70 oldob)) 1)
(xuly s2 s)))
(defun T_BLOCK (oldob / ss1 pt1)
(setq pt1 (cdr (assoc 10 oldob)))
(setq b_name (cdr (assoc 2 oldob)))
(setq tt_name (cdr (assoc -1 oldob)))
(command "EXPLODE" tt_name "")
(setq ss1 (ssget "P"))
(T_ALL ss1)
(command "ERASE" "P" "")
(command "INSERT" b_name pt1 "" "" ""))
(defun T_ALL (ss / c oldob)
(setq c 0)
(if (/= ss nil)
(while (< c (sslength ss))
(setq oldob (entget (ssname ss c)))
(if (= (cdr (assoc 0 oldob)) "LINE")
(T_LINE oldob)
(if (/= (or (= (cdr (assoc 0 oldob)) "POLYLINE") (= (cdr (assoc 0 oldob)) "LWPOLYLINE")) nil)
(T_POLYLINE oldob)
(if (= (cdr (assoc 0 oldob)) "INSERT")
(T_BLOCK oldob))))
(setq c (1+ c)))))
Đã gửi 23 July 2013 - 10:51 PM
Đã gửi 10 December 2013 - 07:13 PM
Nhờ a chỉnh sưa giúp e chạy được thêm đỉnh thửa, cạnh thửa được không ạ.
1 ý nữa là cho chọn điểm đầu để đánh đỉnh thửa, pcik điểm nằm trong thưa, rồi chạy theo chiều thuận kim đồng hồ
E xin chân thành cảm ơn
Đã gửi 04 March 2014 - 02:08 PM
hu hu có sư phụ nào giúp e với không ạ
Đã gửi 04 March 2014 - 11:14 PM
ý bạn chắc là cái này
*Khi chúng ta cùng nhau - Không gì là không thể* [http://ytuonglamgiau.vn](http://ytuonglamgiau.vn/forum.php)
Đã gửi 27 March 2015 - 10:48 AM
em có thể xin file lisp này được không a? em cảm ơn
lisp tạo các diểm theo chiều thuận kim đồng hồ nha a
ý bạn chắc là cái này
Đã gửi 27 March 2015 - 11:07 AM
anh ơi anh có thể sửa lại dùm em file này. chạy theo chiều kim đồng hồ không? ( hoặc anh nào cũng được ạ). em cảm ơn nhiều
Mình đang dùng lsp này. Bạn nào đang làm địa chính vẽ 1/500 in 2=1 thì dùng rất phù hợp. Còn in tỷ lệ khac thì chỉnh lại code lsp là đc
Lệnh như sau :
ghitd (Xuất bảng tọa độ góc ranh theo cách pick điểm tuần tự do ng dùng chỉ định)
laytd (Xuất bảng tọa độ theo cách ng dùng pick chọn 1 điểm trong vùng muốn xuất tọa độ. kết quả xuất ra bảng tọa độ theo nguyên tắc lấy điểm thứ 1 là điểm cao nhất và chạy tọa độ cùng chiều kim đồng hồ )
;Ndaitfunc 2013
;Viet boi : Ndait Nguyen
;;-------------------------------------------------------
;Ghi toa do tu dong theo chieu kim dong ho
(defun c:laytd (/ p bound k lstpt lstx lsty newlst i bien t1 p1 diem x y ymax kmax n c new name ltext diemve pt p1
p2 p3 p4 p5 p6 pt1 pt2 pt3 pt4 pt5 pt6 pt7 pt8 pt9 pt10 pt11 pt12 pt13 pt14 pt15 pt16 pt17)
(luuBHT)
(setq p (getpoint "\nPick point :"))
(setvar "osmode" 0)
(taolop '("vunglaytd" "diemtd" "texttd"))
(setvar "clayer" "vunglaytd")
(command "style" "APTIMA" "vaptimn.ttf" 0 1 0 "" "" "")
(if (/= p nil) (command "-Boundary" p "" ));end if
(setq bound (entget (entlast)))
(setq k (cdr (assoc 90 bound)))
(setq lstpt '() lstx '() lsty '() newlst '())
(setq i 1)
(while (<= i k)
(progn
(setq bien (assoc 10 bound))
(setq t1 (member bien bound))
(setq p1 (car t1))
(setq bound (cdr t1))
(setq diem (cdr p1))
(setq x (car diem) y (cadr diem))
(setq lstx (append lstx (list x)) lsty (append lsty (list y)))
(setq lstpt (append lstpt (list diem)))
(setq i (+ 1 i))));while
(setq ymax (maximum lsty))
(setq kmax (vl-position ymax (reverse lsty)))
(setq lstpt (reverse lstpt))
(setq newlst (member (nth kmax lstpt) lstpt))
(setq n 0)
(repeat kmax (setq newlst (append newlst (list (nth n lstpt)))) (setq n (+ 1 n)))
(setq c 0 new '())
(foreach name newlst (setq new (append new (list (append (list (setq c (1+ c))) name)))))
(setq c 1 new (append new (list (nth 0 new))))
(setq ltext '())
(setq ltext (append ltext (list (nth 0 new))))
(setq newlst (append newlst (list (nth 0 newlst))))
(repeat (- (length new) 1)
(setq ltext (append ltext (list (append (nth c new)
(list (distance (append (nth (- c 1) newlst) '(0.0)) (append (nth c newlst) '(0.0))))))))
(setq c (1+ c)));repeat
(setq n 0)
(setvar "clayer" "diemtd")
(repeat (- (length new) 1)
(ndait_addtext (itoa (car (nth n new))) "texttd" 256 (cdr (nth n new)) 1.0 0.0 "aptima" "BL")
(command "CIRCLE" (cdr (nth n new)) "0.25" "")
(setq n (1+ n)));repeat
(setq diemve (getpoint "\nChon vi tri ve bang toa do : "))
(if (null diemve)
(prompt "\nKhong ve bang ! ")
(progn
(setvar "osmode" 0)
(setvar "orthomode" 0)
(taolop '("Text_Bang" "Line_Bang"))
(setq pt diemve)
(taochu "BAÛNG LIEÄT KEÂ TOÏA ÑOÄ GOÙC RANH" "Text_Bang" 256 (polar (polar pt 0.0 2.5) (* 0.5 Pi) 0.75) 1.0 "Aptima")
(command "layer" "s" "Line_Bang" "")
(setq pt1 pt pt (polar pt (* 1.5 pi) 0.25))
(setq p (polar (polar pt 0.0 0.5) (* 1.5 pi) 2.0))
(setq p1 p
p2 (polar (polar p1 0.0 11.8) (* 0.5 pi) 0.25)
p3 (polar (polar p1 0.0 0.5) (* 1.5 Pi) 2.25)
P4 (polar p3 0.0 7.0)
p5 (polar p4 0.0 9.0)
p6 (polar (polar p5 0.0 7.5) (* 0.5 Pi) 1.5))
(setq pt2 (polar pt1 0.0 5.5)
pt3 (polar pt2 0.0 18.0)
pt4 (polar pt3 0.0 5.5)
pt5 (polar pt2 (* 1.5 Pi) 2.5)
pt6 (polar pt5 0.0 9.0)
pt7 (polar pt6 0.0 9.0)
pt8 (polar pt1 (* 1.5 Pi) 5.0)
pt9 (polar pt8 0.0 5.5)
pt10 (polar pt9 0.0 9.0)
pt11 (polar pt10 0.0 9.0)
pt12 (polar pt11 0.0 5.5))
(taochu "Soá hieäu" "Text_Bang" 256 p1 1.0 "Aptima")
(taochu "Toïa ñoä" "Text_Bang" 256 p2 1.0 "Aptima")
(taochu "ñieåm" "Text_Bang" 256 p3 1.0 "Aptima")
(taochu "X( m )" "Text_Bang" 256 p4 1.0 "aptima")
(taochu "Y( m )" "Text_Bang" 256 p5 1.0 "aptima")
(taochu "Caïnh" "Text_Bang" 256 p6 1.0 "aptima")
(command "layer" "s" "Line_Bang" "")
(command "line" pt1 pt2 pt5 pt6 pt7 pt3 pt4 pt12 pt11 pt10 pt9 pt8 pt1 "")
(command "line" pt2 pt3 "")
(command "line" pt5 pt9 "")
(command "line" pt6 pt10 "")
(command "line" pt7 pt11 "")
(setq pt (polar pt (* 1.5 pi) 6.9))
(setq i 0)
(repeat (length ltext) (ghihang pt (nth i ltext)) (setq i (1+ i)) (setq pt (polar pt (* 1.5 pi) 2.0)))
(setq pt13 (polar pt8 (* 1.5 Pi) (+ (* 2.0 (length ltext)) 0.25)))
(setq pt14 (polar pt13 0.0 5.5)
pt15 (polar pt14 0.0 9.0)
pt16 (polar pt15 0.0 9.0)
pt17 (polar pt16 0.0 5.5))
(command "layer" "s" "Line_Bang" "")
(command "line" pt8 pt13 pt14 pt9 "")
(command "line" pt14 pt15 pt10 "")
(command "line" pt15 pt16 pt11 "")
(command "line" pt16 pt17 pt12 "")
));if
(traBHT)
(princ))
;;----------------------------------------------------------------
;;;Xuat so lieu toa do diem ra file va danh so thu tu
(defun c:ghitd (/ SBD DIEMDAU pt pt0 canh diem text text0 dspt ltext DIEMCUOI Tongdiem diemve i f fl)
(luuBHT)
;(setq TL (getvar "userr1"))
;(if (<= TL 0.0) (tyle))
(setvar "cmdecho" 0) (setvar "cecolor" "256")
(setq dspt '() ltext '() pt0 nil canh nil)
(Setq SBD (getint "\n Nhap so hieu diem bat dau ghi toa do : <Enter=1> "))
(if (null SBD) (setq SBD 1) (setq SBD SBD))
(command "style" "APTIMA" "vaptimn.ttf" 0 1 0 "" "" "")
(taolop '("MiaP" "MiaT"))
(SETQ DIEMDAU SBD)
(while (setq pt (getpoint (strcat "\n Chon diem toa do : <Mia so " (itoa SBD) "> (Enter de ket thuc)")))
(if (not (null pt0)) (setq canh (distance pt0 pt)))
(setq pt0 pt)
(setq diem (strcat (itoa SBD) " " (trtos (car pt) 3) " " (trtos (cadr pt) 3)))
(setq text (list SBD (car pt) (cadr pt) canh))
(command "layer" "s" "MiaP" "")
(command "point" pt "")
(command "CIRCLE" pt "0.25" "")
(taochu (itoa SBD) "MiaT" 256 pt 1.0 "Aptima")
(setq SBD (1+ SBD))
(setq dspt (append dspt (list diem)))
(setq ltext (append ltext (list text)))
);end while
(setq text0 (nth 0 ltext))
(setq canh (distance (list (nth 1 text0) (nth 2 text0) 0) pt0))
(Setq text (list (nth 0 text0) (nth 1 text0) (nth 2 text0) canh))
(setq ltext (append ltext (list text)))
(setq Tongdiem (itoa (- SBD diemdau)))
(SETQ DIEMCUOI (- SBD 1))
(setq diemve (getpoint "\nChon vi tri ve bang toa do : "))
(if (null diemve)
(prompt "\nKhong ve bang ! ")
(progn
(setvar "osmode" 0)
(setvar "orthomode" 0)
(taolop '("Text_Bang" "Line_Bang"))
(setq pt diemve)
(taochu "BAÛNG LIEÄT KEÂ TOÏA ÑOÄ GOÙC RANH"
"Text_Bang" 256 (polar (polar pt 0.0 2.5) (* 0.5 Pi) 0.75) 1.0 "Aptima")
(command "layer" "s" "Line_Bang" "")
(setq pt1 pt pt (polar pt (* 1.5 pi) 0.25))
(setq p (polar (polar pt 0.0 0.5) (* 1.5 pi) 2.0))
(setq p1 p
p2 (polar (polar p1 0.0 11.8) (* 0.5 pi) 0.25)
p3 (polar (polar p1 0.0 0.5) (* 1.5 Pi) 2.25)
P4 (polar p3 0.0 7.0)
p5 (polar p4 0.0 9.0)
p6 (polar (polar p5 0.0 7.5) (* 0.5 Pi) 1.5)) ;_ end of setq
(setq pt2 (polar pt1 0.0 5.5)
pt3 (polar pt2 0.0 18.0)
pt4 (polar pt3 0.0 5.5)
pt5 (polar pt2 (* 1.5 Pi) 2.5)
pt6 (polar pt5 0.0 9.0)
pt7 (polar pt6 0.0 9.0)
pt8 (polar pt1 (* 1.5 Pi) 5.0)
pt9 (polar pt8 0.0 5.5)
pt10 (polar pt9 0.0 9.0)
pt11 (polar pt10 0.0 9.0)
pt12 (polar pt11 0.0 5.5)) ;_ end of setq
(taochu "Soá hieäu" "Text_Bang" 256 p1 1.0 "Aptima")
(taochu "Toïa ñoä" "Text_Bang" 256 p2 1.0 "Aptima")
(taochu "ñieåm" "Text_Bang" 256 p3 1.0 "Aptima")
(taochu "X( m )" "Text_Bang" 256 p4 1.0 "aptima")
(taochu "Y( m )" "Text_Bang" 256 p5 1.0 "aptima")
(taochu "Caïnh" "Text_Bang" 256 p6 1.0 "aptima")
(command "layer" "s" "Line_Bang" "")
(command "line" pt1 pt2 pt5 pt6 pt7 pt3 pt4 pt12 pt11 pt10 pt9 pt8 pt1 "") ;_ end of command
(command "line" pt2 pt3 "")
(command "line" pt5 pt9 "")
(command "line" pt6 pt10 "")
(command "line" pt7 pt11 "")
(setq pt (polar pt (* 1.5 pi) 6.9))
(setq i 0)
(repeat (length ltext) (ghihang pt (nth i ltext)) (setq i (1+ i)) (setq pt (polar pt (* 1.5 pi) 2.0)))
(setq pt13 (polar pt8 (* 1.5 Pi) (+ (* 2.0 (length ltext)) 0.25))
pt14 (polar pt13 0.0 5.5)
pt15 (polar pt14 0.0 9.0)
pt16 (polar pt15 0.0 9.0)
pt17 (polar pt16 0.0 5.5))
(command "layer" "s" "Line_Bang" "")
(command "line" pt8 pt13 pt14 pt9 "")
(command "line" pt14 pt15 pt10 "")
(command "line" pt15 pt16 pt11 "")
(command "line" pt16 pt17 pt12 "")))
(if (/= (setq f (getstring "\n<Ten FILE> luu toa do diem , Go <ENTER> neu khong luu : ")) "")
(progn
(if (findfile f) (setq fl (open f "a")) (setq fl (open f "w")))
(write-line "DANH SACH TOA DO DIEM " fl)
(write-line (strcat "File name : " (getvar "dwgprefix") (getvar "dwgname")) fl)
(write-line (strcat "TONG SO DIEM : " Tongdiem) fl)
(write-line (strcat "DIEM DAU : " (itoa DIEMDAU) " DIEM CUOI : " (itoa DIEMCUOI)) fl)
(setq i 0)
(repeat (length dspt) (write-line (nth i dspt) fl) (setq i (1+ i)))))
(if fl (close fl))
(traBHT)
(princ))
;;Dung cho ham ghitd
(defun ghihang (point hang / p p1 p2 p3 pt pt2 pt3 pt4 pt5 t1 t2 t3 t4)
(setq pt point
p (polar (polar pt 0.0 2.0) (/ pi 2.0) 0.25)
t1 (rtos (car hang) 2 0)
t2 (trtos (cadr hang) 3)
t3 (trtos (cadr (cdr hang)) 3))
(if (not (null (nth 3 hang))) (setq t4 (trtos (nth 3 hang) 2)))
(setq p1 p
p2 (polar p1 0.0 12.0)
p3 (polar p2 0.0 8.5)
p4 (polar (polar p3 0.0 5.5) (* 0.5 Pi) 1.0))
(taochu t1 "Text_Bang" 256 p1 0.9 "aptima")
(Ndait_addtext t3 "Text_Bang" 256 p2 0.9 nil "aptima" "R")
(Ndait_addText t2 "Text_Bang" 256 p3 0.9 nil "aptima" "R")
(if (not (null t4)) (Ndait_addText t4 "Text_Bang" 256 p4 0.9 nil "aptima" "R")));end of defun
;-----------------------------------
;Cac ham dung chung
;;Luu va tra bien he thong
(defun luuBHT ()
(setq
auts (getvar "autosnap")
blip (getvar "blipmode")
ceco (getvar "cecolor")
clay (getvar "clayer")
cmec (getvar "cmdecho")
fdia (getvar "filedia")
osmo (getvar "osmode")
orth (getvar "orthomode")
plwi (getvar "plinewid")
pola (getvar "polarmode")
tsty (getvar "textstyle")) ;_ end of setq
) ;_ end of defun
(defun traBHT ()
(setvar "autosnap" auts)
(setvar "blipmode" blip)
(setvar "cecolor" ceco)
(setvar "clayer" clay)
(setvar "cmdecho" cmec)
(setvar "filedia" fdia)
(setvar "osmode" osmo)
(setvar "orthomode" orth)
(setvar "plinewid" plwi)
(setvar "polarmode" pola)
(setvar "textstyle" tsty)
) ;_ end of defun
;---
;;Tao lop theo danh sach di kem
(defun taolop (dslop)
(mapcar '(lambda (a) (if (null (tblsearch "layer" a)) (command "layer" "N" a ""))) dslop)
)
;-----
;Ham tao text
(defun taochu (noidung lop mau diem caochu kieu / x y)
(setq x (car diem) y (cadr diem))
(entmod (entmake (list (cons 0 "TEXT") (cons 100 "AcDbEntity") (cons 8 lop) (cons 62 mau)
(cons 100 "AcDbText") (list 10 x y 0.0) (cons 40 caochu)
(cons 1 noidung) (cons 7 kieu))))
) ;defun
(defun Ndait_addtext (noidung lop mau diem caochu goc kieu canhchu / x y va ha)
(cond
((= canhchu "L") (setq va 0 ha 0));Left
((= canhchu "C") (setq va 0 ha 1));Center
((= canhchu "R") (setq va 0 ha 2));Right
;((= canhchu "A") (setq va 0 ha 3));Aligned
((= canhchu "M") (setq va 0 ha 4));Middle
;((= canhchu "F") (setq va 0 ha 5));Fit
((= canhchu "TL") (setq va 3 ha 0));Top Left
((= canhchu "TC") (setq va 3 ha 1));Top Center
((= canhchu "TR") (setq va 3 ha 2));Top Right
((= canhchu "ML") (setq va 2 ha 0));Middle Left
((= canhchu "MC") (setq va 2 ha 1));Middle Center
((= canhchu "MR") (setq va 2 ha 2));Middle Right
((= canhchu "BL") (setq va 1 ha 0));Bottom Left
((= canhchu "BC") (setq va 1 ha 1));Bottom Center
((= canhchu "BR") (setq va 1 ha 2));Bottom Right
(T (setq va 0 ha 0));canhchu false -> Left
);cond
(if (null (tblsearch "style" kieu)) (setq kieu (getvar "textstyle")))
(if (null goc) (setq goc 0.0))
(if (null caochu) (setq caochu 1.0))
(if (null diem) (progn (initget 1) (setq diem (getpoint "\npick point :"))))
(if (null mau) (setq mau 256))
(if (null lop) (setq lop (getvar "clayer")))
(setq x (car diem) y (cadr diem))
(entmod (entmake (list (cons 0 "TEXT") (cons 100 "AcDbEntity") (cons 8 lop)
(cons 62 mau) (cons 100 "AcDbText") (list 10 x y 0.0)
(cons 40 caochu) (cons 50 goc)(cons 1 noidung) (cons 7 kieu)
(cons 72 ha) (list 11 x y 0.0) (cons 100 "AcDbText") (cons 73 va))))
);defun
;Tra ve so lon nhat trong danh sach a
(defun maximum (a)
(setq i 0 maxa (max (nth 0 a) (nth 1 a)))
(repeat (length a) (setq maxa (max (nth i a) maxa)) (setq i (1+ i)))
maxa)
;;Doi so thuc sang chuoi (giong rtos)
;;VD (trtos 1.05 3) -> "1.050"
(defun trtos (Num dec / HSLT N0 N1 N2 N3 them0 them1 CHU)
(setq HSLT dec N0 (+ Num 0.000000001) N1 (- N0 (fix N0)) N2 (rtos N1 2 HSLT)
N3 (- (strlen N2) 2) them0 "." them1 "")
(if (>= N3 HSLT)
(setq CHU (rtos N0 2 HSLT))
(if (= N3 -1)
(setq CHU (strcat (rtos N0 2 HSLT)
(if (= HSLT 0)
(setq them0 "") (repeat HSLT (setq them0 (strcat them0 "0"))))))
(setq CHU (strcat (rtos N0 2 HSLT)
(repeat (- HSLT N3) (setq them1 (strcat them1 "0")))))
);if
);if
CHU)
;the end
ps: trên máy người dùng nhất định phải có font Aptima (vaptimn.ttf) nếu không lsp sẽ bị lỗi.
Đã gửi 27 March 2015 - 11:14 AM
anh ơi anh có thể sửa lại dùm em file này. chạy theo chiều kim đồng hồ không? ( hoặc anh nào cũng được ạ). em cảm ơn nhiều
[http://www.cadviet.c...py_of_laytd.lsp](http://www.cadviet.com/upfiles/4/110927_copy_of_laytd.lsp)
file này ạ
Đã gửi 30 March 2015 - 04:33 PM
forum mình không còn ai online hết ah. moi ng ?
Đã gửi 21 November 2015 - 11:37 AM
Hề hề hề,
Muốn cụ thì có cụ :
Xin lỗi bác Duy vì mình chôm ít đồ của bác để xài cho nó lẹ. Có chỉnh sửa chút chút cho nó hợp với mưu đồ của chủ thớt.
[http://www.cadviet.c...dotrichthua.lsp]
(defun c:lbtd (/ oldos en enlst e1 i n dvbd db1 dth dtn) (vl-load-com) (setq oldos (getvar "osmode")) (setvar "osmode" 0) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;Chuyen gia tri goc tu do sang radian ;;;Cu phap su dung (duy:s_do>radian giatri) ;;;giatri la goc tinh theo do, kq la goc tinh theo radian ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defun duy:s_do>radian (gt / gt kq) (setq kq (* (/ pi 180) gt)) kq) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;Tao moi text ;;;Cu phap su dung (duy:t_text diemchen docao gocquay canhle noidung textstyle layer color) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defun duy:t_text (d c g cl nd k la co / d c g cl nd k la co) (cond ((= cl "trai") (setq kcl 0)) ((= cl "phai") (setq kcl 2)) ((= cl "giua") (setq kcl 1)) ) (cond ((= g "") (setq g 0) )) (cond ((= cl "") (setq kcl 0) )) (setq g (duy:s_do>radian g)) (cond ((= k "") (setq k (getvar "TEXTSTYLE")) )) (cond ((= la "") (setq la (getvar "Clayer")) )) (cond ((= co "") (setq co 256) )) (entmake (list (cons 0 "TEXT")(cons 10 d)(cons 11 d)(cons 40 c)(cons 50 g)(cons 72 kcl)(cons 1 nd)(cons 7 k)(cons 8 la) (cons 62 co))) (princ) ) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;Tao moi line ;;;Cu phap su dung (duy:t_line diemdau diemcuoi layer color ltype ltypescale) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defun duy:t_line (a b la co lt slt / a b la co lt slt) (cond ((= la "") (setq la (getvar "Clayer")) )) (cond ((= co "") (setq co 256) )) (cond ((= lt "") (setq lt "bylayer") )) (cond ((= slt "") (setq slt 1) )) (entmake (list (cons 0 "LINE")(cons 10 a)(cons 11 <img src='http://www.cadviet.com/forum/public/style_emoticons/<#EMO_DIR#>/cool.png' class='bbc_emoticon' alt='B)' />(cons 8 la)(cons 62 co)(cons 6 lt)(cons 48 slt) )) (princ) ) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defun vepolyline (/ i) (setq i 0) (command "pline") (while (setq p (getpoint (strcat "\n Chon dinh thu " (rtos (setq i (1+ i)) 2 0) " <Enter de ket thuc>"))) (command p) ) (command "c") ) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (alert "\n Chon lan luot cac dinh cua thua dat can lap bang toa do") (command "undo" "be") (vepolyline) (setq en (entlast) i 0 enlst (acet-geom-vertex-list en) n (length enlst) ) (setq dvbd (getpoint "\nChon diem dat bang: ")) (duy:t_line dvbd (list (+ (car dvbd) 30) (cadr dvbd)) "" "" "" "") (duy:t_line (list (car dvbd) (- (cadr dvbd) 5)) (list (+ (car dvbd) 30) (- (cadr dvbd) 5)) "" "" "" "") (duy:t_line (list (+ (car dvbd) 0) (- (cadr dvbd) 0)) (list (+ (car dvbd) 0) (- (cadr dvbd) 5)) "" "" "" "") (duy:t_line (list (+ (car dvbd) 5) (- (cadr dvbd) 0)) (list (+ (car dvbd) 5) (- (cadr dvbd) 5)) "" "" "" "") (duy:t_line (list (+ (car dvbd) 23) (- (cadr dvbd) 0)) (list (+ (car dvbd) 23) (- (cadr dvbd) 5)) "" "" "" "") (duy:t_line (list (+ (car dvbd) 26.5) (- (cadr dvbd) 0)) (list (+ (car dvbd) 26.5) (- (cadr dvbd) 5)) "" "" "" "") (duy:t_line (list (+ (car dvbd) 30) (- (cadr dvbd) 0)) (list (+ (car dvbd) 30) (- (cadr dvbd) 5)) "" "" "" "") (duy:t_line (list (+ (car dvbd) 5) (- (cadr dvbd) 2.5)) (list (+ (car dvbd) 23) (- (cadr dvbd) 2.5)) "" "" "" "") (duy:t_line (list (+ (car dvbd) 14) (- (cadr dvbd) 2.5)) (list (+ (car dvbd) 14) (- (cadr dvbd) 5)) "" "" "" "") (duy:t_text (list (+ (car dvbd) 2.5) (- (cadr dvbd) 3)) 1 0 "giua" "§Ønh" "" "" "") (duy:t_text (list (+ (car dvbd) 14) (- (cadr dvbd) 1.75)) 1 0 "giua" "Täa §é" "" "" "");;;"Täa §é" (duy:t_text (list (+ (car dvbd) 9.5) (- (cadr dvbd) 4.25)) 1 0 "giua" "X (m)" "" "" "") (duy:t_text (list (+ (car dvbd) 18.5) (- (cadr dvbd) 4.25)) 1 0 "giua" "Y (m)" "" "" "") (duy:t_text (list (+ (car dvbd) 24.75) (- (cadr dvbd) 1.75)) 1 0 "giua" "Tªn" "" "" "") (duy:t_text (list (+ (car dvbd) 28.25) (- (cadr dvbd) 1.75)) 1 0 "giua" "C¹nh" "" "" "") (duy:t_text (list (+ (car dvbd) 24.75) (- (cadr dvbd) 4.25)) 1 0 "giua" "C¹nh" "" "" "") (duy:t_text (list (+ (car dvbd) 28.25) (- (cadr dvbd) 4.25)) 1 0 "giua" "(m)" "" "" "") (setq dvbd (list (car dvbd) (- (cadr dvbd) 5))) (setq db1 dvbd) (while (< i (1- n)) (setq dtn (nth i enlst)) (duy:t_text (list (+ (car dvbd) 2.5) (- (cadr dvbd) 1.5)) 1 0 "giua" (rtos (setq i (1+ i)) 2 0) "" "" "") (duy:t_text dtn 1 0 "giua" (rtos i 2 0) "" "" "") (duy:t_text (list (+ (car dvbd) 9.5) (- (cadr dvbd) 1.5)) 1 0 "giua" (rtos (cadr dtn) 2 3) "" "" "") (duy:t_text (list (+ (car dvbd) 18.5) (- (cadr dvbd) 1.5)) 1 0 "giua" (rtos (car dtn) 2 3) "" "" "") (duy:t_line (list (car dvbd) (- (cadr dvbd) 2)) (list (+ (car dvbd) 23) (- (cadr dvbd) 2)) "" "" "" "") (duy:t_line (list (+ (car dvbd) 23) (- (cadr dvbd) 3)) (list (+ (car dvbd) 30) (- (cadr dvbd) 3)) "" "" "" "") (setq e1 (entlast)) (if (> i 1) (progn (duy:t_text (list (+ (car dvbd) 24.8) (- (cadr dvbd) 0.5)) 1 0 "giua" (strcat (rtos (1- i) 2 0) "-" (rtos i 2 0)) "" "" "") (duy:t_text (list (+ (car dvbd) 28.3) (- (cadr dvbd) 0.5)) 1 0 "giua" (rtos (distance dtn dth) 2 2) "" "" "") ) ) (setq dth dtn) (setq dvbd (list (car dvbd) (- (cadr dvbd) 2))) ) (command "erase" e1 en "") (duy:t_text (list (+ (car dvbd) 2.5) (- (cadr dvbd) 1.5)) 1 0 "giua" "1" "" "" "") (duy:t_text (list (+ (car dvbd) 9.5) (- (cadr dvbd) 1.5)) 1 0 "giua" (rtos (cadr (nth 0 enlst)) 2 3) "" "" "") (duy:t_text (list (+ (car dvbd) 18.5) (- (cadr dvbd) 1.5)) 1 0 "giua" (rtos (car (nth 0 enlst)) 2 3) "" "" "") (duy:t_line (list (car dvbd) (- (cadr dvbd) 2)) (list (+ (car dvbd) 30) (- (cadr dvbd) 2)) "" "" "" "") (duy:t_text (list (+ (car dvbd) 24.8) (- (cadr dvbd) 0.5)) 1 0 "giua" (strcat (rtos i 2 0) "-1" ) "" "" "") (duy:t_text (list (+ (car dvbd) 28.3) (- (cadr dvbd) 0.5)) 1 0 "giua" (rtos (distance (nth 0 enlst) dth) 2 2) "" "" "") (duy:t_line db1 (list (car db1) (- (cadr dvbd) 2)) "" "" "" "") (duy:t_line (list (+ (car db1) 5) (cadr db1) ) (list (+ (car dvbd) 5) (- (cadr dvbd) 2)) "" "" "" "") (duy:t_line (list (+ (car db1) 14) (cadr db1) ) (list (+ (car dvbd) 14) (- (cadr dvbd) 2)) "" "" "" "") (duy:t_line (list (+ (car db1) 23) (cadr db1) ) (list (+ (car dvbd) 23) (- (cadr dvbd) 2)) "" "" "" "") (duy:t_line (list (+ (car db1) 26.5) (cadr db1) ) (list (+ (car dvbd) 26.5) (- (cadr dvbd) 2)) "" "" "" "") (duy:t_line (list (+ (car db1) 30) (cadr db1) ) (list (+ (car dvbd) 30) (- (cadr dvbd) 2)) "" "" "" "") (command "undo" "e") (setvar "osmode" oldos) (princ) )
1. Nhờ anh xem lại lisp dùm em làm nó ra thế này: Chon diem dat bang: ; error: no function definition: DUY:T_LINE
2. Chế độ truy bắt điểm không thực hiện đuợc.
3. Nếu được anh bổ sung thêm phần chọn chiều cao chữ và chế độ số thập phân sau dấu phẩy
4. Phần xuất bảng toạ độ anh thêm dùm 2 lựa chọn ;(cad /Excel)
Câu lệnh như sau khi chèn trên cad xong enter (cad /Excel), xuất trên Excel chỉ cần lây giá trị text .
thế là xong!
Đã gửi 21 November 2015 - 05:12 PM
Mình đang dùng lsp này. Bạn nào đang làm địa chính vẽ 1/500 in 2=1 thì dùng rất phù hợp. Còn in tỷ lệ khac thì chỉnh lại code lsp là đc
Lệnh như sau :
ghitd (Xuất bảng tọa độ góc ranh theo cách pick điểm tuần tự do ng dùng chỉ định)
laytd (Xuất bảng tọa độ theo cách ng dùng pick chọn 1 điểm trong vùng muốn xuất tọa độ. kết quả xuất ra bảng tọa độ theo nguyên tắc lấy điểm thứ 1 là điểm cao nhất và chạy tọa độ cùng chiều kim đồng hồ )
;Ndaitfunc 2013
;Viet boi : Ndait Nguyen
;;-------------------------------------------------------
;Ghi toa do tu dong theo chieu kim dong ho
(defun c:laytd (/ p bound k lstpt lstx lsty newlst i bien t1 p1 diem x y ymax kmax n c new name ltext diemve pt p1
p2 p3 p4 p5 p6 pt1 pt2 pt3 pt4 pt5 pt6 pt7 pt8 pt9 pt10 pt11 pt12 pt13 pt14 pt15 pt16 pt17)
(luuBHT)
(setq p (getpoint "\nPick point :"))
(setvar "osmode" 0)
(taolop '("vunglaytd" "diemtd" "texttd"))
(setvar "clayer" "vunglaytd")
(command "style" "APTIMA" "vaptimn.ttf" 0 1 0 "" "" "")
(if (/= p nil) (command "-Boundary" p "" ));end if
(setq bound (entget (entlast)))
(setq k (cdr (assoc 90 bound)))
(setq lstpt '() lstx '() lsty '() newlst '())
(setq i 1)
(while (<= i k)
(progn
(setq bien (assoc 10 bound))
(setq t1 (member bien bound))
(setq p1 (car t1))
(setq bound (cdr t1))
(setq diem (cdr p1))
(setq x (car diem) y (cadr diem))
(setq lstx (append lstx (list x)) lsty (append lsty (list y)))
(setq lstpt (append lstpt (list diem)))
(setq i (+ 1 i))));while
(setq ymax (maximum lsty))
(setq kmax (vl-position ymax (reverse lsty)))
(setq lstpt (reverse lstpt))
(setq newlst (member (nth kmax lstpt) lstpt))
(setq n 0)
(repeat kmax (setq newlst (append newlst (list (nth n lstpt)))) (setq n (+ 1 n)))
(setq c 0 new '())
(foreach name newlst (setq new (append new (list (append (list (setq c (1+ c))) name)))))
(setq c 1 new (append new (list (nth 0 new))))
(setq ltext '())
(setq ltext (append ltext (list (nth 0 new))))
(setq newlst (append newlst (list (nth 0 newlst))))
(repeat (- (length new) 1)
(setq ltext (append ltext (list (append (nth c new)
(list (distance (append (nth (- c 1) newlst) '(0.0)) (append (nth c newlst) '(0.0))))))))
(setq c (1+ c)));repeat
(setq n 0)
(setvar "clayer" "diemtd")
(repeat (- (length new) 1)
(ndait_addtext (itoa (car (nth n new))) "texttd" 256 (cdr (nth n new)) 1.0 0.0 "aptima" "BL")
(command "CIRCLE" (cdr (nth n new)) "0.25" "")
(setq n (1+ n)));repeat
(setq diemve (getpoint "\nChon vi tri ve bang toa do : "))
(if (null diemve)
(prompt "\nKhong ve bang ! ")
(progn
(setvar "osmode" 0)
(setvar "orthomode" 0)
(taolop '("Text_Bang" "Line_Bang"))
(setq pt diemve)
(taochu "BAÛNG LIEÄT KEÂ TOÏA ÑOÄ GOÙC RANH" "Text_Bang" 256 (polar (polar pt 0.0 2.5) (* 0.5 Pi) 0.75) 1.0 "Aptima")
(command "layer" "s" "Line_Bang" "")
(setq pt1 pt pt (polar pt (* 1.5 pi) 0.25))
(setq p (polar (polar pt 0.0 0.5) (* 1.5 pi) 2.0))
(setq p1 p
p2 (polar (polar p1 0.0 11.8) (* 0.5 pi) 0.25)
p3 (polar (polar p1 0.0 0.5) (* 1.5 Pi) 2.25)
P4 (polar p3 0.0 7.0)
p5 (polar p4 0.0 9.0)
p6 (polar (polar p5 0.0 7.5) (* 0.5 Pi) 1.5))
(setq pt2 (polar pt1 0.0 5.5)
pt3 (polar pt2 0.0 18.0)
pt4 (polar pt3 0.0 5.5)
pt5 (polar pt2 (* 1.5 Pi) 2.5)
pt6 (polar pt5 0.0 9.0)
pt7 (polar pt6 0.0 9.0)
pt8 (polar pt1 (* 1.5 Pi) 5.0)
pt9 (polar pt8 0.0 5.5)
pt10 (polar pt9 0.0 9.0)
pt11 (polar pt10 0.0 9.0)
pt12 (polar pt11 0.0 5.5))
(taochu "Soá hieäu" "Text_Bang" 256 p1 1.0 "Aptima")
(taochu "Toïa ñoä" "Text_Bang" 256 p2 1.0 "Aptima")
(taochu "ñieåm" "Text_Bang" 256 p3 1.0 "Aptima")
(taochu "X( m )" "Text_Bang" 256 p4 1.0 "aptima")
(taochu "Y( m )" "Text_Bang" 256 p5 1.0 "aptima")
(taochu "Caïnh" "Text_Bang" 256 p6 1.0 "aptima")
(command "layer" "s" "Line_Bang" "")
(command "line" pt1 pt2 pt5 pt6 pt7 pt3 pt4 pt12 pt11 pt10 pt9 pt8 pt1 "")
(command "line" pt2 pt3 "")
(command "line" pt5 pt9 "")
(command "line" pt6 pt10 "")
(command "line" pt7 pt11 "")
(setq pt (polar pt (* 1.5 pi) 6.9))
(setq i 0)
(repeat (length ltext) (ghihang pt (nth i ltext)) (setq i (1+ i)) (setq pt (polar pt (* 1.5 pi) 2.0)))
(setq pt13 (polar pt8 (* 1.5 Pi) (+ (* 2.0 (length ltext)) 0.25)))
(setq pt14 (polar pt13 0.0 5.5)
pt15 (polar pt14 0.0 9.0)
pt16 (polar pt15 0.0 9.0)
pt17 (polar pt16 0.0 5.5))
(command "layer" "s" "Line_Bang" "")
(command "line" pt8 pt13 pt14 pt9 "")
(command "line" pt14 pt15 pt10 "")
(command "line" pt15 pt16 pt11 "")
(command "line" pt16 pt17 pt12 "")
));if
(traBHT)
(princ))
;;----------------------------------------------------------------
;;;Xuat so lieu toa do diem ra file va danh so thu tu
(defun c:ghitd (/ SBD DIEMDAU pt pt0 canh diem text text0 dspt ltext DIEMCUOI Tongdiem diemve i f fl)
(luuBHT)
;(setq TL (getvar "userr1"))
;(if (<= TL 0.0) (tyle))
(setvar "cmdecho" 0) (setvar "cecolor" "256")
(setq dspt '() ltext '() pt0 nil canh nil)
(Setq SBD (getint "\n Nhap so hieu diem bat dau ghi toa do : <Enter=1> "))
(if (null SBD) (setq SBD 1) (setq SBD SBD))
(command "style" "APTIMA" "vaptimn.ttf" 0 1 0 "" "" "")
(taolop '("MiaP" "MiaT"))
(SETQ DIEMDAU SBD)
(while (setq pt (getpoint (strcat "\n Chon diem toa do : <Mia so " (itoa SBD) "> (Enter de ket thuc)")))
(if (not (null pt0)) (setq canh (distance pt0 pt)))
(setq pt0 pt)
(setq diem (strcat (itoa SBD) " " (trtos (car pt) 3) " " (trtos (cadr pt) 3)))
(setq text (list SBD (car pt) (cadr pt) canh))
(command "layer" "s" "MiaP" "")
(command "point" pt "")
(command "CIRCLE" pt "0.25" "")
(taochu (itoa SBD) "MiaT" 256 pt 1.0 "Aptima")
(setq SBD (1+ SBD))
(setq dspt (append dspt (list diem)))
(setq ltext (append ltext (list text)))
);end while
(setq text0 (nth 0 ltext))
(setq canh (distance (list (nth 1 text0) (nth 2 text0) 0) pt0))
(Setq text (list (nth 0 text0) (nth 1 text0) (nth 2 text0) canh))
(setq ltext (append ltext (list text)))
(setq Tongdiem (itoa (- SBD diemdau)))
(SETQ DIEMCUOI (- SBD 1))
(setq diemve (getpoint "\nChon vi tri ve bang toa do : "))
(if (null diemve)
(prompt "\nKhong ve bang ! ")
(progn
(setvar "osmode" 0)
(setvar "orthomode" 0)
(taolop '("Text_Bang" "Line_Bang"))
(setq pt diemve)
(taochu "BAÛNG LIEÄT KEÂ TOÏA ÑOÄ GOÙC RANH"
"Text_Bang" 256 (polar (polar pt 0.0 2.5) (* 0.5 Pi) 0.75) 1.0 "Aptima")
(command "layer" "s" "Line_Bang" "")
(setq pt1 pt pt (polar pt (* 1.5 pi) 0.25))
(setq p (polar (polar pt 0.0 0.5) (* 1.5 pi) 2.0))
(setq p1 p
p2 (polar (polar p1 0.0 11.8) (* 0.5 pi) 0.25)
p3 (polar (polar p1 0.0 0.5) (* 1.5 Pi) 2.25)
P4 (polar p3 0.0 7.0)
p5 (polar p4 0.0 9.0)
p6 (polar (polar p5 0.0 7.5) (* 0.5 Pi) 1.5)) ;_ end of setq
(setq pt2 (polar pt1 0.0 5.5)
pt3 (polar pt2 0.0 18.0)
pt4 (polar pt3 0.0 5.5)
pt5 (polar pt2 (* 1.5 Pi) 2.5)
pt6 (polar pt5 0.0 9.0)
pt7 (polar pt6 0.0 9.0)
pt8 (polar pt1 (* 1.5 Pi) 5.0)
pt9 (polar pt8 0.0 5.5)
pt10 (polar pt9 0.0 9.0)
pt11 (polar pt10 0.0 9.0)
pt12 (polar pt11 0.0 5.5)) ;_ end of setq
(taochu "Soá hieäu" "Text_Bang" 256 p1 1.0 "Aptima")
(taochu "Toïa ñoä" "Text_Bang" 256 p2 1.0 "Aptima")
(taochu "ñieåm" "Text_Bang" 256 p3 1.0 "Aptima")
(taochu "X( m )" "Text_Bang" 256 p4 1.0 "aptima")
(taochu "Y( m )" "Text_Bang" 256 p5 1.0 "aptima")
(taochu "Caïnh" "Text_Bang" 256 p6 1.0 "aptima")
(command "layer" "s" "Line_Bang" "")
(command "line" pt1 pt2 pt5 pt6 pt7 pt3 pt4 pt12 pt11 pt10 pt9 pt8 pt1 "") ;_ end of command
(command "line" pt2 pt3 "")
(command "line" pt5 pt9 "")
(command "line" pt6 pt10 "")
(command "line" pt7 pt11 "")
(setq pt (polar pt (* 1.5 pi) 6.9))
(setq i 0)
(repeat (length ltext) (ghihang pt (nth i ltext)) (setq i (1+ i)) (setq pt (polar pt (* 1.5 pi) 2.0)))
(setq pt13 (polar pt8 (* 1.5 Pi) (+ (* 2.0 (length ltext)) 0.25))
pt14 (polar pt13 0.0 5.5)
pt15 (polar pt14 0.0 9.0)
pt16 (polar pt15 0.0 9.0)
pt17 (polar pt16 0.0 5.5))
(command "layer" "s" "Line_Bang" "")
(command "line" pt8 pt13 pt14 pt9 "")
(command "line" pt14 pt15 pt10 "")
(command "line" pt15 pt16 pt11 "")
(command "line" pt16 pt17 pt12 "")))
(if (/= (setq f (getstring "\n<Ten FILE> luu toa do diem , Go <ENTER> neu khong luu : ")) "")
(progn
(if (findfile f) (setq fl (open f "a")) (setq fl (open f "w")))
(write-line "DANH SACH TOA DO DIEM " fl)
(write-line (strcat "File name : " (getvar "dwgprefix") (getvar "dwgname")) fl)
(write-line (strcat "TONG SO DIEM : " Tongdiem) fl)
(write-line (strcat "DIEM DAU : " (itoa DIEMDAU) " DIEM CUOI : " (itoa DIEMCUOI)) fl)
(setq i 0)
(repeat (length dspt) (write-line (nth i dspt) fl) (setq i (1+ i)))))
(if fl (close fl))
(traBHT)
(princ))
;;Dung cho ham ghitd
(defun ghihang (point hang / p p1 p2 p3 pt pt2 pt3 pt4 pt5 t1 t2 t3 t4)
(setq pt point
p (polar (polar pt 0.0 2.0) (/ pi 2.0) 0.25)
t1 (rtos (car hang) 2 0)
t2 (trtos (cadr hang) 3)
t3 (trtos (cadr (cdr hang)) 3))
(if (not (null (nth 3 hang))) (setq t4 (trtos (nth 3 hang) 2)))
(setq p1 p
p2 (polar p1 0.0 12.0)
p3 (polar p2 0.0 8.5)
p4 (polar (polar p3 0.0 5.5) (* 0.5 Pi) 1.0))
(taochu t1 "Text_Bang" 256 p1 0.9 "aptima")
(Ndait_addtext t3 "Text_Bang" 256 p2 0.9 nil "aptima" "R")
(Ndait_addText t2 "Text_Bang" 256 p3 0.9 nil "aptima" "R")
(if (not (null t4)) (Ndait_addText t4 "Text_Bang" 256 p4 0.9 nil "aptima" "R")));end of defun
;-----------------------------------
;Cac ham dung chung
;;Luu va tra bien he thong
(defun luuBHT ()
(setq
auts (getvar "autosnap")
blip (getvar "blipmode")
ceco (getvar "cecolor")
clay (getvar "clayer")
cmec (getvar "cmdecho")
fdia (getvar "filedia")
osmo (getvar "osmode")
orth (getvar "orthomode")
plwi (getvar "plinewid")
pola (getvar "polarmode")
tsty (getvar "textstyle")) ;_ end of setq
) ;_ end of defun
(defun traBHT ()
(setvar "autosnap" auts)
(setvar "blipmode" blip)
(setvar "cecolor" ceco)
(setvar "clayer" clay)
(setvar "cmdecho" cmec)
(setvar "filedia" fdia)
(setvar "osmode" osmo)
(setvar "orthomode" orth)
(setvar "plinewid" plwi)
(setvar "polarmode" pola)
(setvar "textstyle" tsty)
) ;_ end of defun
;---
;;Tao lop theo danh sach di kem
(defun taolop (dslop)
(mapcar '(lambda (a) (if (null (tblsearch "layer" a)) (command "layer" "N" a ""))) dslop)
)
;-----
;Ham tao text
(defun taochu (noidung lop mau diem caochu kieu / x y)
(setq x (car diem) y (cadr diem))
(entmod (entmake (list (cons 0 "TEXT") (cons 100 "AcDbEntity") (cons 8 lop) (cons 62 mau)
(cons 100 "AcDbText") (list 10 x y 0.0) (cons 40 caochu)
(cons 1 noidung) (cons 7 kieu))))
) ;defun
(defun Ndait_addtext (noidung lop mau diem caochu goc kieu canhchu / x y va ha)
(cond
((= canhchu "L") (setq va 0 ha 0));Left
((= canhchu "C") (setq va 0 ha 1));Center
((= canhchu "R") (setq va 0 ha 2));Right
;((= canhchu "A") (setq va 0 ha 3));Aligned
((= canhchu "M") (setq va 0 ha 4));Middle
;((= canhchu "F") (setq va 0 ha 5));Fit
((= canhchu "TL") (setq va 3 ha 0));Top Left
((= canhchu "TC") (setq va 3 ha 1));Top Center
((= canhchu "TR") (setq va 3 ha 2));Top Right
((= canhchu "ML") (setq va 2 ha 0));Middle Left
((= canhchu "MC") (setq va 2 ha 1));Middle Center
((= canhchu "MR") (setq va 2 ha 2));Middle Right
((= canhchu "BL") (setq va 1 ha 0));Bottom Left
((= canhchu "BC") (setq va 1 ha 1));Bottom Center
((= canhchu "BR") (setq va 1 ha 2));Bottom Right
(T (setq va 0 ha 0));canhchu false -> Left
);cond
(if (null (tblsearch "style" kieu)) (setq kieu (getvar "textstyle")))
(if (null goc) (setq goc 0.0))
(if (null caochu) (setq caochu 1.0))
(if (null diem) (progn (initget 1) (setq diem (getpoint "\npick point :"))))
(if (null mau) (setq mau 256))
(if (null lop) (setq lop (getvar "clayer")))
(setq x (car diem) y (cadr diem))
(entmod (entmake (list (cons 0 "TEXT") (cons 100 "AcDbEntity") (cons 8 lop)
(cons 62 mau) (cons 100 "AcDbText") (list 10 x y 0.0)
(cons 40 caochu) (cons 50 goc)(cons 1 noidung) (cons 7 kieu)
(cons 72 ha) (list 11 x y 0.0) (cons 100 "AcDbText") (cons 73 va))))
);defun
;Tra ve so lon nhat trong danh sach a
(defun maximum (a)
(setq i 0 maxa (max (nth 0 a) (nth 1 a)))
(repeat (length a) (setq maxa (max (nth i a) maxa)) (setq i (1+ i)))
maxa)
;;Doi so thuc sang chuoi (giong rtos)
;;VD (trtos 1.05 3) -> "1.050"
(defun trtos (Num dec / HSLT N0 N1 N2 N3 them0 them1 CHU)
(setq HSLT dec N0 (+ Num 0.000000001) N1 (- N0 (fix N0)) N2 (rtos N1 2 HSLT)
N3 (- (strlen N2) 2) them0 "." them1 "")
(if (>= N3 HSLT)
(setq CHU (rtos N0 2 HSLT))
(if (= N3 -1)
(setq CHU (strcat (rtos N0 2 HSLT)
(if (= HSLT 0)
(setq them0 "") (repeat HSLT (setq them0 (strcat them0 "0"))))))
(setq CHU (strcat (rtos N0 2 HSLT)
(repeat (- HSLT N3) (setq them1 (strcat them1 "0")))))
);if
);if
CHU)
;the end
ps: trên máy người dùng nhất định phải có font Aptima (vaptimn.ttf) nếu không lsp sẽ bị lỗi.
Muốn thêm đuờng line ngăn cách giữa các toạ độ thì làm thế nào anh
phần ghitd muốn có hình tròn khi pick điểm và số thứ tự thì làm thế nào
Các pro giúp với. thanks
Đã gửi 22 November 2015 - 08:33 PM
Tọa độ địa chính thì như mình đã nói, không có gì phải bàn cả.
Nếu muốn sửa độ lớn của chữ thì bạn tìm dòng như vầy :
(taochu "Soá hieäu" "Text_Bang" 256 p1 1.0 "Aptima")
sửa giá trị 1.0 đi là đc.
PS: Nếu bạn muốn Trục XY như cũ thì hoặc là sửa code hoặc là move cột X thành Y thôi
À mà mình thấy có lẽ bạn cần cái này để lấy tọa độ diểm phải không ?
(defun c:T_id ()
(luuBHT) (setvar "cmdecho" 0)
(initget 1) (setq point01 (getpoint "\nChon diem 1 : \n"))
(setq x1 (rtos (car point01) 2 3) y1 (rtos (cadr point01) 2 3))
(setvar "osmode" 0)
(initget 1) (setq point02 (getpoint point01 "\nChon diem 2 :\n :"))
(setq Angle12 (angle Point01 Point02) dis12 (distance point01 point02))
(if (and (> Angle12 (/ pi 2)) (< Angle12 (* pi 1.5)))
(progn (setq Angle0 pi) (setq Jus "BR"))
(progn (setq Angle0 0.0) (setq Jus "BL")));end if
(setq Point03 (polar (polar Point01 Angle12 dis12) (/ pi 2) 0.275))
(taolop '("Hientrang")) (command "layer" "s" "Hientrang" "")
(command "style" "APTIMA" "vaptimn.ttf" 0 1 0 "" "" "")
(command "pline" point01 "w" 0.0 0.4 (polar Point01 Angle12 1) "w" 0.0 0.0
(polar Point01 Angle12 dis12)
(polar (polar Point01 Angle12 dis12) Angle0 10.5) "")
(command ".text" Jus Point03 1.0 0.0 (strcat "X = " x1) "")
(command ".text" Jus (polar Point03 (* pi 1.5) 2.5) 1.0 0.0 (strcat "Y = " y1) "")
(traBHT) (princ))
(Không có vòng tròn như bạn vì công việc của mình không cần vòng tròn đó )
Nhờ anh xem dùm em dùng mà nó bị lỗi như sau: Command: T_id , ; error: no function definition: LUUBHT
Đã gửi 23 November 2015 - 10:25 AM
Nhờ anh xem dùm em dùng mà nó bị lỗi như sau: Command: T_id , ; error: no function definition: LUUBHT
Thiếu 2 hàm: LuuBHT và traBHT
Bạn mở file lên xóa 2 hàm đó đi
xóa 2 dong này
(LuuBHT)
(traBHT)
Đã gửi 23 November 2015 - 01:07 PM
Thiếu 2 hàm: LuuBHT và traBHT
Bạn mở file lên xóa 2 hàm đó đi
xóa 2 dong này
(LuuBHT)
(traBHT)
Đã xóa như bạn nói nhưng vẫn lỗi như sau:Command: t_idChon diem 1 :Chon diem 2 ::; error: no function definition: TAOLOP


markdown:
Điều hòa không khí Packaged với khả năng điều khiển nhiệt độ chính xác mang lại sự đảm bảo cho chất lượng sản phẩm.
Chiller giải nhiệt gió Daikin chất lượng cao, hoạt động hiệu quả và tiết kiệm năng lượng.
Chiller giải nhiệt nước Daikin chất lượng cao, hoạt động hiệu quả và tiết kiệm năng lượng.
Thiết bị Air Side của Daikin mang đến nhiều tùy chọn điều hòa cho các không gian nội thất bao gồm kiểm soát nhiệt độ, độ ẩm, khử mùi và lọc không khí.

Content-Type: text/html


markdown: Shares Đất Việt là nơi tự do bày tỏ ý kiến, không có chế độ kiểm duyệt. Rất mong nhận được ý kiến của độc giả.

Server: cloudflare-nginx

Pragma: public

Cache-Control: max-age=1800, public

Cf-Railgun: direct (starting new WAN connection)

X-Powered-By: W3 Total Cache/0.9.5.4


markdown:
![Phiến quân IS thành lập tỉnh ở Nga Phiến quân IS thành lập tỉnh ở Nga](http://www.datviet.com/wp-content/uploads/2015/06/Chien_binh_IS_Kavkaz_IZBG.jpg.ashx_.jpg?x64054)
![](https://ken107.github.io/read-aloud/images/play_round_dark.png)
![](https://ken107.github.io/read-aloud/images/pause_round_dark.png)
Các tay súng IS
Tuyên bố về vấn đề này đã được đưa ra bởi Abu Mohammad al-Adnani, nhân vật số 2 của IS và cũng là nhân vật đảm nhiệm chức trách Thư ký báo chí của thủ lĩnh IS Abu Bakar al-Baghdadi. Tuyên bố cũng cho biết đã bổ nhiệm Abu Muhammad Kadarsky là “Thống đốc” tỉnh mới thành lập tại vùng Bắc Kavkaz.
Diễn biến mới này thực ra chỉ là bước tiếp theo của một diễn biến khác mới xảy ra cách đây ít ngày. Hồi đầu tháng 6 vừa qua, trên Internet đã xuất hiện một video clip cho thấy các thủ lĩnh của tổ chức khủng bố bí mật khu vực Bắc Kavkaz, trong đó có Abu Muhammad Kadarsky, đã thề trung thành với thủ lĩnh IS Abu Bakar al-Baghdadi.
Những diễn biến dồn dập nói trên không khỏi khiến dư luận Nga lo ngại. Bởi lẽ, IS đang có nguy cơ trở thành một mối đe dọa mới cực kỳ nguy hiểm đối với nước Nga. Những diễn biến đó cũng cho thấy sức mạnh lan tỏa của IS. Nhờ những thủ đoạn tuyên truyền hết sức tinh vi, IS đã tạo ra được một sức hấp dẫn đáng kể đối với các lực lượng khủng bố tại nhiều khu vực trên thế giới. Giờ đây, với việc thành lập wilayat khu vực Bắc Kavkaz, IS không chỉ có thêm những nguồn tài nguyên mới và nguồn vũ khí mới mà điều quan trọng hơn – có thêm nguồn nhân lực mới, những tay súng mới, những thế lực ủng hộ mới.
Theo Vzglyad.ru


markdown:
![Sợ quay lại với bạn trai vì tôi đã mất đời con gái Sợ quay lại với bạn trai vì tôi đã mất đời con gái](http://www.datviet.com/wp-content/uploads/2016/09/1-402.jpg?x64054)
![](https://ken107.github.io/read-aloud/images/play_round_dark.png)
![](https://ken107.github.io/read-aloud/images/pause_round_dark.png)
Tôi đang cảm thấy sợ hãi về tương lai, sự việc bắt đầu khi tôi giận anh, người tôi đã yêu 7 năm. Chúng tôi cùng quê nhưng do cả hai vào Sài Gòn đi làm xa nên rất ít khi gặp. Tôi và anh đều là mối tình đầu của nhau, anh luôn trân trọng và coi tôi là thánh nữ. Hai tháng trước do giận hờn nên chúng tôi chia tay. Tôi ở tại công ty luôn nên chỉ có một mình quanh quẩn ở chỗ làm, cảm thấy rất tù túng. Bên cạnh phòng cũng có người ở nhưng họ sống rất ích kỷ, không chia sẻ nhiều. Đang trong lúc chán nản, tôi gặp phải gã Sở Khanh, anh ta hứa hẹn đủ thứ, lại cùng quê, nhà anh ta tính ra cũng gần nhà tôi và tình cũ của tôi (dù thế tôi chưa từng biết anh ta).
Tuy mới quen 2 tháng nhưng anh ta bảo cuối năm nay cưới. Tôi dại khờ tin lời rồi một hôm anh đã lấy đi cái ngàn vàng của tôi. Sau đó anh ta cũng quan tâm nhưng liên lạc với tôi thường vào tối muộn. Mấy lần sau anh đâm ra chán nản, gặp tôi chỉ muốn nói chuyện lên giường, tôi không cho, bảo cưới đã, rồi anh ta không muốn liên lạc với tôi nữa, quên luôn lời hứa cưới xin. Chúng tôi chia tay. Tôi định dọn ra ngoài sống để giao lưu học hỏi với mọi người.
Giờ tôi quay lại với người yêu cũ vì chúng tôi còn yêu nhau, nhưng tôi rất sợ đối diện với anh, sợ anh nhận ra lỗi lầm của tôi vì anh luôn coi tôi là thánh nữ. Tôi khóc rất nhiều, phải làm sao đây?
Theo Vnexpress


markdown:
![](images/icon-24h.jpg)
**Mã SP:** **Bảo hành:** 30 ngày do lỗi dán bong tróc, phù bong bóng (Quý khách đến bảo hành đem theo phiếu)
Đặt mua hàng: (8h30 - 21h30): 7 ngày trong tuần
ĐT : (08) 39977765 - 0938324656 - 0938324659
QUÉT MÃ QR ZALO THÊM ƯU ĐÃI
*là dịch vụ rất được yêu thích của Decalsaigon với đa dạng thể loại. Dán theo ý muốn của khách hàng. Nhằm giúp quý khách có những sản phẩm đặc biệt độc đáo nhất*
*của quý khách bao gồm các chủ đề như: tình yêu, hôn nhân gia đình, thú nuối, trẻ em dễ thương, phong cảnh, chân dung. Rất rất nhiều thể loại. Chỉ cần quý khách có hình mẫu, chúng tôi sẽ thiết kế và dán lên chiếc điên thoại của quý khách ngay lập tức.*
**LỢI ÍCH GÌ KHI SỬ DỤNG DỊCH VỤ TẠI DECALSAIGON.COM ?**
**CHÚNG TÔI GIAO HÀNG TẬN NƠI KHẮP MỌI MIỀN ĐẤT NƯỚC**
+ TP.HỒ CHÍ MINH: Tại Quận 1, Tại Quận 2, Tại Quận 3, Tại Quận 4, Tại Quận 5, Tại Quận 6, Tại Quận 7, Tại Quận 8, Tại Quận 9, Tại Quận 10, Tại Quận 11, Tại Quận 12, Tại Quận Gò Vấp, Tại Quận Tân Bình, Tại Quận Tân Phú, Tại Quận Bình Thạnh, Tại Quận Phú Nhuận, Tại Quận Thủ Đức, Tại Quận Bình Tân, Tại Huyện Củ Chi, Tại Huyện Hóc Môn, Tại Huyện Bình Chánh, Tại Huyện Nhà Bè, Tại Huyện Cần Giờ,
+ NỘI VÙNG: Tại Tỉnh Long An, Tỉnh Tây Ninh, Tỉnh Đồng Nai, Tỉnh Bình Dương, Bình Phước, Bà Rịa-Vũng Tảu, Bạc Liệu, Bến Tre, Ninh Thuận, Bình Thuận, Cà Mau, Cần Thơ, Đồng Tháp, Tiền Giang, Hậu Giang, Kiên Giang, Khánh Hoà, Lâm Đồng, Sóc Trăng, Trà Vinh, Vĩnh Long.
+ CẬN VÙNG: Tỉnh Miền Trung, Bình Định, Đà Nẵng, Gia Lai, Huế, Kon Tum, Phú Yên, Quảng Trị, Quảng Nam, Quảng Ngãi, Đắc Lắc, Đắc Nông.
+ CÁCH VÙNG TỈNH MIỀN BẮC: Bắc Cạn, Bắc Giang, Bắc Ninh, Cao Bằng, Điện Biên, Hà Nội, Hà Giang, Hà Nam, Hà Tỉnh, Hải Dương, Hải Phòng, Hưng Yên, Hoà Bình, Lào Cai, Lai Châu, Lạng Sơn, Nam Định, Nghệ An, Ninh Bình, Phú Thọ, Quảng Ninh, Quảng Bình, Sơn La, Thái Bình, Thái Nguyên, Thanh Hoá, Tuyên Quang, Vĩnh Phúc, Yên Bái.
[Xe đạp bánh to béo bự giá rẻ tại tphcm](xe-dap-banh-to-beo-bu-gia-re-tai-tphcm.html) [Ốp lưng iphone 7 giá rẻ chính hãng cao cấp](op-lung-iphone-7.html) [Bán miếng dán cường lực iphone 7 plus chính hãng](gia-kinh-cuong-luc-iphone-7.html) [Miếng dán màn hình cường lực iphone chính hãng](dan-man-hinh-cuong-luc-,-man-hinh-chong-vat-nhon-6319.html) [Dán cường lực iphone 8 plus giá rẻ cao cấp](dan-cuong-luc-iphone-8-plus-gia-re-cao-cap.html) [Bao da iphone 8 plus đẹp chính hãng](bao-da-iphone-8-plus-dep-chinh-hang.html) [Ốp lưng iphone 8 plus đẹp chính hãng cao cấp](op-lung-iphone-8-plus-dep-chinh-hang-cao-cap.html) [Bao da galaxy S8+ plus đẹp cao cấp](bao-da-galaxy-s8-edge-dep-cao-cap.html) [Bán ốp lưng điện thoại galaxy S8+ Plus cao cấp](ban-op-lung-dien-thoai-galaxy-s8-edge-cao-cap.html)
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Alo báo giá
Mua
Đăng ký nhận thông tin khuyến mãi
(08) 39977765 - 0938324659Đặt mua giao tận nơi (từ 8h30 đến 21h30) hằng ngày
(08) 39977765 - 0938324656Góp ý, khiếu nại (từ 8h30 đến 21h30) hằng ngày
(08) 39977765 - 0903615334Thời gian Mở cửa các Shop
Thứ 2 đến thứ 7 (từ 8h30 đến 21h30) - Chủ Nhật (từ 8h30 đến 20h30)
**© 2014. Công ty TNHH DECALSAIGON - GPĐKKD số 0312788805 do Sở KHĐT Tp.HCM cấp **
https://www.facebook.com/decalsaigon/
QUÉT MÃ QR ZALO THÊM ƯU ĐÃI
Bạn có thể thanh toán với

Pragma: no-cache

Cache-Control: no-store, no-cache, must-revalidate, post-check=0, pre-check=0


markdown:
[David Tice: Vàng và bạc là ‘món hời’ ngay lúc này](http://www.giavang.net/david-tice-vang-va-bac-la-mon-hoi-ngay-luc-nay/) [Sau buổi điều trần đầu tiên của bà Yellen dưới thời Trump, giới chuyên gia nói gì?](http://www.giavang.net/sau-buoi-dieu-tran-dau-tien-cua-ba-yellen-duoi-thoi-trump-gioi-chuyen-gia-noi-gi/) [Ý kiến của một số chuyên gia về xu hướng vàng trong tuần giao dịch tới](http://www.giavang.net/y-kien-cua-mot-so-chuyen-gia-ve-xu-huong-vang-trong-tuan-giao-dich-toi/) [Lắng nghe ý kiến các chuyên gia quốc tế về phân tích giá vàng ngay từ đầu tuần](http://www.giavang.net/lang-nghe-y-kien-cac-chuyen-gia-quoc-te-ve-phan-tich-gia-vang-ngay-tu-dau-tuan/) [Lắng nghe một số ý kiến chuyên gia cao cấp về tuần giao dịch cuối năm tới đây](http://www.giavang.net/lang-nghe-mot-so-y-kien-chuyen-gia-cao-cap-ve-tuan-giao-dich-cuoi-nam-toi-day/)
# DailyForex: PTKT giá vàng ngày 11/5
[Mai Phuong](http://www.giavang.net/author/phuong_chu/)on 11/05/2015
**DailyForex: Vàng dừng chuỗi giảm 4 tuần liên tiếp**
Giá vàng chốt phiên thứ Sáu tuần trước tăng 0,4%, tương đương 4,30 USD mỗi ounce, đứng tại $1188,38/oz do báo cáo thị trường lao động Mỹ phần nào xoa dịu nỗi lo Cục dự trữ Liên bang Mỹ sớm nâng lãi suất. Dữ liệu từ Bộ Lao động cho thấy nền kinh tế Mỹ đã tạo thêm 223.000 việc làm trong tháng Tư và tỷ lệ thất nghiệp giảm xuống mức 5,4%. Các dữ liệu này càng thúc đẩy niềm tin rằng sự suy yếu hồi đầu năm nay chủ yếu là do thời tiết mùa động lạnh chứ không phải cho nội lực nền kinh tế không đủ mạnh. Tuy nhiên, sự sụt giảm đáng kể trong số liệu điều chỉnh cho tháng Ba (xuống mức 85.000 từ 126.000 việc làm) và sự tăng trưởng chậm chạp của tiền lương càng góp phần giúp thị trường gia tăng kì vọng rằng lãi suất sẽ chưa tăng trong tháng Sáu.
Thị trường đã bị mắc kẹt trong vùng giao dịch hẹp liên quan kể từ cuối tháng Ba. Từ thời điểm đó, giá vàng đã tiếp tục duy trì
** và thị trường t ngưỡng cản quan trọng $1225** *tạo nên mức sàn tốt cho giao dịch. Thị trường không có khả năng thâm nhập vào đám mây Ichimoku là một dấu hiệu kĩ thuật yếu, đặc biệt là khi xu hướng điều chỉnh của thị trường vẫn nghiêng về phía giảm. Phân tích kĩ thuật theo đám mây không chỉ là cách nhà đầu tư xác định xu hướng thị trường mà còn giúp họ xác định vùng hỗ trợ và kháng cự.* **hu hút lực mua quanh mức $1174** ![ XAUUSD Week 51115](http://static.dailyforex.com/files/xauusd-11may-2015-1.png)
Vàng (XAU/USD) hàng tuần
Nói cách khác, rủi ro giá giảm vẫn đang tồn tại trên thị trường do vàng giao dịch dưới vùng $1225/2 – được xác định là đỉnh của đám mây trên biểu đồ ngày. Đường Kijun-sen (trung bình 26 phiên, đường màu xanh lá cây) theo tuần cũng đang cư ngụ trên vùng giá đó, vì vậy, việc vàng đột phá vượt lên trên kháng cự này sẽ phát đi tiềm năng tăng giá. Nhưng tất nhiên để đạt được mức giá này, kim loại quý cần xóa sạch các kháng cự gần đó như $1199, $1207 và $1214,50/oz.
Mặt khác, nếu xu hướng giảm thành công trong việc duy trì vị thể trên thị trường và đẩy cặp (XAU/USD) xuống dưới ngưỡng $1174 thì vàng nhiều khả năng sẽ rớt xuống vùng $1166. Đóng cửa dưới mức hỗ trợ này có thể đẩy quý kim vào kịch bản mà mục tiêu là mức thấp $1147/oz.
![ XAUUSD Daily 51115](http://static.dailyforex.com/files/xauusd-11may-2015-2.png)
Vàng (XAU/USD) hàng ngày
Giavang.net
You must be logged in to post a comment Login

Server: GVSRV

Accept-Ranges: bytes

X-Cache-Status: MISS


markdown:
Share
Tweet
0 comments
Theo VnExpress
You must be logged in to post a comment
Login
Thị trường vàng trong nước Theo yết giá của tập...
Vào thứ Năm, giá vàng hưởng lợi từ sự sụt...
Làm thuê, đầu tư hoặc trở thành doanh nhân là...
Chủ tịch Ngân hàng Trung ương Châu Âu Mario Draghi...
Trong phiên giao dịch sáng nay, giá vàng SJC đã...
Theo quan điểm của một chuyên gia phân tích kỹ...
Hôm nay, Ngân hàng Nhà nước công bố tỷ giá...
Thị trường vàng trong nước Theo yết giá của...
Vào thứ Năm, giá vàng hưởng lợi từ sự...
Làm thuê, đầu tư hoặc trở thành doanh nhân...
TS Vũ Đình Ánh cho rằng mức chênh giữa...
Liệu NHNN có thể đưa ra mức giá thấp...
Sáng nay 28/3, Ngân hàng Nhà nước thực hiện...
Giá vàng đang hướng tới mốc 1300$...
Tôi muốn gửi tiền tiết kiệm bằng vàng, xin hỏ...
Dầu khó phục hồi về vùng 100$ như trước đây...
Để kiếm được lợi nhuận trên thị trường, nhà...
Giống như hầu hết mọi thứ trong cuộc sống,...
Giám đốc điều hành Amazon Jeff Bezos khiến nhiều...
Copyright © 2012 Giavang.net - Viet Dragon Online Services VDOS.
You must be logged in to post a comment Login

X-Cache-Status: EXPIRED


markdown:
|
|
Εκμάθηση γλωσσών
|
|βιετναμέζικα
>
|
|
82 [ογδόντα δύο]
|
|Παρελθοντικός χρόνος 2
|
|![]()
|
|
82 [Tám mươi hai]
|
|Quá khứ 2
|
|
Χρειάστηκε να καλέσεις ασθενοφόρο;
|
|
Χρειάστηκε να καλέσεις τον γιατρό;
|
|
Χρειάστηκε να καλέσεις την αστυνομία;
|
|
Έχετε το νούμερο; Μόλις τώρα το είχα.
|
|
Έχετε τη διεύθυνση; Μόλις τώρα την είχα.
|
|
Έχετε τον χάρτη της πόλης? Μόλις τώρα τον είχα.
|
|
Ήρθε στην ώρα του; Δεν μπόρεσε να έρθει στην ώρα του.
|
|
Βρήκε τον δρόμο; Δεν μπόρεσε να βρει τον δρόμο.
|
|
Σε κατάλαβε; Δεν μπόρεσε να με καταλάβει.
|
|
Γιατί δεν μπόρεσες να έρθεις στην ώρα σου;
|
|
Γιατί δεν μπόρεσες να βρεις τον δρόμο;
|
|
Γιατί δεν μπόρεσες να τον καταλάβεις;
|
|
Δεν μπόρεσα να είμαι στην ώρα μου επειδή δεν υπήρχε λεωφορείο.
|
|
Δεν μπόρεσα να βρω το δρόμο επειδή δεν είχα χάρτη.
|
|
Δεν μπόρεσα να τον καταλάβω επειδή η μουσική ήταν πολύ δυνατά.
|
|
Έπρεπε να πάρω ταξί.
|
|
Έπρεπε να αγοράσω χάρτη.
|
|
Έπρεπε να κλείσω το ράδιο.
|
|
Οι ενήλικες δεν μαθαίνουν γλώσσες πλέον τόσο εύκολα όσο τα παιδιά. Η ανάπτυξη του εγκεφάλου τους έχει ολοκληρωθεί. Για αυτό και δυσκολεύεται να φτιάξει καινούρια δίκτυα. Αλλά και ως ενήλικες μπορούμε να μάθουμε πολύ καλά μια γλώσσα! Για αυτό πρέπει να πάμε στην χώρα που ομιλείται αυτή η γλώσσα. Η εκμάθηση μιας ξένης γλώσσας είναι ιδιαίτερα αποτελεσματική στο εξωτερικό. Όσοι έχουν πάει στο εξωτερικό για να μάθουν μια γλώσσα το γνωρίζουν αυτό. Στο φυσικό περιβάλλον η εκμάθηση της νέας γλώσσας γίνεται πιο γρήγορα. Μια νέα μελέτη μόλις κατέληξε σε ένα πολύ ενδιαφέρον συμπέρασμα. Δείχνει ότι στο εξωτερικό μαθαίνουμε την γλώσσα και διαφορετικά. Το μυαλό μπορεί και επεξεργάζεται την ξένη γλώσσα όπως την μητρική. Οι επιστήμονες πιστεύουν εδώ και καιρό ότι υπάρχουν διάφορες διαδικασίες μάθησης. Ένα πείραμα φαίνεται τώρα να το αποδεικνύει αυτό. Μια ομάδα συμμετεχόντων σε έρευνα, έπρεπε να μάθει μια τεχνητή γλώσσα. Μερικοί από τους συμμετέχοντες έκαναν τακτικά μαθήματα. Οι υπόλοιποι μάθαιναν κάνοντας στα ψέμματα πως ήταν στο εξωτερικό. Αυτοί οι συμμετέχοντες έπρεπε να προσαρμοστούν σε ένα ξενόγλωσσο περιβάλλον. Όλοι οι άνθρωποι, με τους οποίους είχαν επαφή, μιλούσαν την νέα γλώσσα. Οι συμμετέχοντες αυτής της ομάδας, επομένως, δεν ήταν κλασικοί μαθητές της γλώσσας. Ανήκαν σε μία ξένη κοινότητα ομιλητών. Έτσι, ήταν υποχρεωμένοι να τα βγάλουν πέρα γρήγορα με την ξένη γλώσσα. Μετά από ένα διάστημα, οι συμμετέχοντες περασαν από τεστ. Και οι δύο ομάδες επέδειξαν εξίσου καλές γνώσεις της νέας γλώσσας. Όμως οι εγκέφαλοί τους επεξεργάζονταν την ξένη γλώσσα διαφορετικά! Αυτοί που έμαθαν την γλώσσα στο “εξωτερικό” είχαν ξεχωριστή εγκεφαλική δραστηριότητα. Ο εγκέφαλός τους επεξεργαζόταν την ξένη γραμματική όπως στην μητρική τους. Ήταν οι ίδιο μηχανισμοί που υπάρχουν και στα άτομα που μιλούν την μητρική τους γλώσσα. Η παραμονή στο εξωτερικό για την εκμάθηση μιας γλώσσας είναι ο ωραιότερος και ο αποτελεσματικότερος τρόπος μάθησης!
Downloads are FREE for private use, public schools and for non-commercial purposes only!
LICENCE

Via: 1.1 varnish (Varnish/5.1)


markdown:
トップページ > ハンドミラー > 割れない いきいきミラー ミラーハンド
安心・安全！割れないミラー。ご高齢の方に安心してお使いいただけます。
商品番号 IK-05
販売価格1,728円(税込)
販売価格
2,160円(税込)
販売価格
4,104円(税込)
販売価格
5,184円(税込)
販売価格
3,240円(税込)
販売価格
1,836円(税込)
販売価格
2,592円(税込)
販売価格
1,080円(税込)
販売価格
1,512円(税込)
販売価格
12,960円(税込)
トップページ ｜ 商品リスト ｜ お買い物ガイド ｜ 買い物カゴを見る
鏡ねっとについて ｜ よくある質問 ｜ 店舗情報 ｜ サイトマップ ｜ 会員様ログイン ｜ お気に入りに追加
(c）Copyright 2010 KAGAMI-NET
安心・安全！割れないミラー。ご高齢の方に安心してお使いいただけます。


markdown:
सेलिब्रिटी खबरें
Login
Signup
Parties & Nightlife
Events
Bars & Pubs Near Me
Pub Finder
Party Guide
Music
Drinks
World Class
Cocktails
Simi
Spirits Appreciation
Johnnie Ginger and F1
Lifestyle
Celebrity News
Wedding
Gifts for Men
Travel
Food & Dining
Fashion
Luxury
Celebrity Parties
Exclusives
Signature Start Up
Johnnie Walker The Journey
We’re Open - Smirnoff Experience
Pause with Black Dog
Live Bold with Royal Challenge
Ciroc Nights
McDowell’s No.1 Celebrating Brotherhood
Vat 69
Gallery
Videos
Photos
Shop
Brand store
सेलिब्रिटी खबरें
Home
>
Drinks
>
World Class
>
World Class Bartenders 2016
>
Chirag Dudeza
Chirag Dudeza
Vote Now
up
29 users have voted.
Twitter feed
Facebook feed
Tweets by @WorldClassSA
Top

Access-Control-Expose-Headers: AMP-Access-Control-Allow-Source-Origin

Access-Control-Allow-Credentials: true

X-Generator: Drupal 7 (http://drupal.org)

Via: 1.1 varnish

Cache-Control: public, max-age=86400

X-Drupal-Cache: MISS

Vary: Cookie,Accept-Encoding

X-Varnish-Cache: MISS

Content-Language: en


markdown:
Thích được đưa đi chơi, ăn bimbim,nhảy Minion
Chúc con ăn nhanh chóng lớn nha
ghét quá đi ta, hay ăn chóng lớn nha con!
Chúc con ăn nhanh chóng lớn nha
ghét quá đi ta, hay ăn chóng lớn nha con!
ghét quá đi ta, hay ăn chóng lớn nha con!

Ringier-Fastcgi-Cache: MISS


markdown:
18+
22
июля
+20
+21
Погода в Тюмени
22.07
58.9325
68.6623
21.07
59.0823
68.0037
Валюта в Тюмени
Вход
Регистрация
Новости
Справочник компаний
Карта
Объявления
Афиша
Еда
Работа
Авто
Консультанты
Фото
Видео
Форум
Блоги
Недвижимость
Отдых
Погода
Пользователи
Проблемы
Спецпроекты НГР
0
рейтинг
сила
0
Artur.Prazdnikov
Прохожий
Профиль
Активность
Конфиг
ЛС
Рейтинг
Дети
Видео
Общая информация
адрес профиля:
artur.prazdnikov.nashgorod.ru
0%
Заполнив полностью данные вашего профиля, вы получите доступ к дополнительным возможностям
Пол:
Не указан
Дата рождения:
01 января 1991 года
Дата регистрации:
29 ноября 2015 года
Был на сайте:
14 апреля 2016 года
Сайт:
перейти
Форум
Темы пользователя
0
Сообщения пользователя
0
Входит в группы:
Зарегистрированные пользователи
Стена Artur.Prazdnikov
0
Оставить сообщение на стене Artur.Prazdnikov
Как
Нашгород
Вконтакте
Facebook
Twitter
Google
Одноклассники
Mail.ru
Яндекс
Реклама:
© 2002—2017, OOO «Наш Город РУ», Тюмень, Все права защищены © При использовании материалов ссылка обязательна.
Свидетельство о регистрации СМИ Эл № ФС 77–20303 от 29 декабря 2004 выдано Федеральной службой по надзору
за соблюдением законодательства в сфере массовых коммуникаций и охране культурного наследия. © Разработка — студия «
Автограф
»
О портале
Контакты
Реклама на сайте
Карта сайта

Server: nginx/1.4.6 (Ubuntu)

Set-Cookie: nashgorod_ru_sid=445b315cc089f907271b90bfd2606d98; expires=Sun, 22-Jul-2018 02:59:20 GMT; path=/; domain=.nashgorod.ru; HttpOnly


markdown:
Thêm bài hát này vào danh sách Playlist
- Hiện chưa có lời bài hát nào cho Gió đông buồn do ca sĩ Đang Cập Nhật trình bày. Bạn có thể click vào đây để đăng lời cho bài hát này.
Astro Bunny
Oceans Ate Alaska
The Great Commission
V.A
Cà Dễ Dãi
xem thêm
rút gọn
Top 100 bài hát
Top 100 Nhạc Hoa Hay Nhất
Top 100 Nhạc Latin Hay Nhất
Top 100 Nhạc Nhật Hay Nhất
Top 100 Blues/Jazz Hay Nhất
Top 100 Nhạc Trịnh Hay Nhất
Đơn vị chủ quản: Công ty Cổ phần NCT
Địa chỉ: Tòa nhà HAGL Safomec, 7/1 Thành Thái, P14, Q10, TP.HCM
Người chịu trách nhiệm nội dung: Ông Nhan Thế Luân - Email: support@nct.vn - Tel: (08) 3868 7979
Giấy phép MXH số 499/GP-BTTTT do Bộ Thông Tin và Truyền thông cấp ngày 28/09/2015
## Bình luận

Server: nginx+

P3P: CP='NOI ADM DEV PSAi COM NAV OUR OTRo STP IND DEM'

Vary: Accept-Encoding, User-Agent


markdown:
Thêm bài hát này vào danh sách Playlist
- Hiện chưa có lời bài hát nào cho Người Thứ Ba Remix do ca sĩ Thanh Thảo trình bày. Bạn có thể click vào đây để đăng lời cho bài hát này.
Phương Thanh, Lam Trường, Mỹ Tâm, Đàm Vĩnh Hưng, Cẩm Ly, Quang Dũng, Thanh Thảo, Hồng Ngọc
Thanh Thảo
V.A
KaTa
Xuân Tiến, Thanh Thảo
Hồng Ngọc, Thanh Thảo
Cà Dễ Dãi
xem thêm
rút gọn
Top 100 bài hát
Top 100 Nhạc Trẻ Hay Nhất
Top 100 Remix Việt Hay Nhất
Top 100 Rap Việt Hay Nhất
Top 100 Nhạc Hoa Hay Nhất
Top 100 Nhạc Trữ Tình Hay Nhất
Đơn vị chủ quản: Công ty Cổ phần NCT
Địa chỉ: Tòa nhà HAGL Safomec, 7/1 Thành Thái, P14, Q10, TP.HCM
Người chịu trách nhiệm nội dung: Ông Nhan Thế Luân - Email: support@nct.vn - Tel: (08) 3868 7979
Giấy phép MXH số 499/GP-BTTTT do Bộ Thông Tin và Truyền thông cấp ngày 28/09/2015
## Bình luận


markdown:
Thêm bài hát này vào danh sách Playlist
Lời đăng bởi: pevippro2912
êu một người nên nhớ một người
Những ngày vui đã qua đi rồi
Giữa đêm lạnh, từng cơn bão vẫn xoay trong hồn
Xa một người nên khóc một người
Dẫu ân ái đến nay không trọn
Mộng trăm năm sẽ cho ta những phút ngỡ ngàng thế thôi
Mộng rơi giữa thềm hoa
Mộng sao vẫn cay đắng xót xa
Rượu cay có mình ta
Uống cho cạn nỗi đau muôn đời
Mộng rơi giữa đời ta
Mộng như những cánh én thướt tha
Chiều nay có mình ta
Với cơn sầu
Yêu một người nên nhớ một người
Suối lệ rơi giữa đêm vô tận
Tiếc chi một vòng tay đã cách xa phương trời
Xa một người nên khóc một người
Câu hẹn xưa chớ nên mong đợi
Tình yêu ơi hãy cho nhau khúc hát lỡ làng thế thôi
Astro Bunny
Oceans Ate Alaska
The Great Commission
V.A
KaTa
xem thêm
rút gọn
Top 100 bài hát
Top 100 Nhạc Tiền Chiến Hay Nhất
Top 100 Nhạc Hàn Hay Nhất
Top 100 Blues/Jazz Hay Nhất
Top 100 R&B/Hip Hop/Rap Hay Nhất
Top 100 Nhạc Trẻ Hay Nhất
Đơn vị chủ quản: Công ty Cổ phần NCT
Địa chỉ: Tòa nhà HAGL Safomec, 7/1 Thành Thái, P14, Q10, TP.HCM
Người chịu trách nhiệm nội dung: Ông Nhan Thế Luân - Email: support@nct.vn - Tel: (08) 3868 7979
Giấy phép MXH số 499/GP-BTTTT do Bộ Thông Tin và Truyền thông cấp ngày 28/09/2015
## Bình luận


markdown:
Ảnh hoa lá thiên nhiên, tĩnh vật nhỏ
Đang có 1 người xem diễn đàn này. (0 thành viên & 1 khách)
Use this control to limit the display of threads to those newer than the specified time frame.
Cho phép bạn chọn dữ liệu mà danh sách chủ đề sẽ được sắp xếp.
Hiện chủ đề theo...
Chú ý: khi sắp xếp bởi ngày, 'thứ tự giảm dần' sẽ hiển thị kết quả mới nhất trên cùng.
Nội quy - Quy định

Pragma: private


markdown:
Google Maps
Sign in
Help
Sign in
Sign in with a Google account
Use a legacy account
Panoramio is closing.
Learn how to back up your data
.
This is how your name and profile photo will appear on Panoramio if you connect this Google+ account. You cannot switch to a different account later.
Learn more
.
Một Loài Nhện Nhỏ.
Show more
Show less
Quy Truong
Photo details
Uploaded on April 11, 2012
© All Rights Reserved
by Quy Truong
Camera: Panasonic DMC-FZ50
Taken on 2012/03/01 08:50:57
Exposure: 0.008s (1/125)
Focal Length: 24.60mm
F/Stop: f/4.500
ISO Speed: ISO100
Exposure Bias: 0.00 EV
No flash
Terms of Service
Privacy Policy
Help

Cache-Control: no-cache, no-store, max-age=0, must-revalidate

X-Panoramio-Threadsafe: true

Server: Google Frontend