Thắc Mắc Đoạn Lips Không Hiểu Cách Sử Dụng Và Nội Dung

[ThanhDattdk 3]

Em xin chào các anh/chị. em có một số đoạn lips ko hiểu về cách hoạt động và nội dung. Mong anh/chị giúp đỡ em với

đoạn1:

(setq olderr *error*)

(defun *error* (msg)

(princ "\nError: ")

(princ msg)

(princ)

)

đoạn 2:

(progn (close f_in)

(setq KKK (load_dialog "TTUC.DCL"))

(new_dialog "ttuc" KKK)

(setq RES (start_dialog))

(unload_dialog KKK)

(cond

((= RES 0) (princ))

((= RES 1) 

(setq xk (- -100 L))

(setq pk (list xk -60))

(command "_.MOVE" "all" "" "0,-60" pk)

(TDoccong)

)

 

[Danh Cong 422]

 

Em xin chào các anh/chị. em có một số đoạn lips ko hiểu về cách hoạt động và nội dung. Mong anh/chị giúp đỡ em với

đoạn1:

(setq olderr *error*)

(defun *error* (msg)

(princ "\nError: ")

(princ msg)

(princ)

)

 

 

đoạn 2:

(progn (close f_in)

(setq KKK (load_dialog "TTUC.DCL"))

(new_dialog "ttuc" KKK)

(setq RES (start_dialog))

(unload_dialog KKK)

(cond

((= RES 0) (princ))

((= RES 1) 

(setq xk (- -100 L))

(setq pk (list xk -60))

(command "_.MOVE" "all" "" "0,-60" pk)

(TDoccong)

)

 

 

Đoạn 1: Đây là hàm *Error*. Thông thường dùng  bẫy lỗi, để nếu có lỗi sảy thì lisp sẽ chạy theo hàm *error* tự tạo.

đọc thêm phần này để hiểu chi tiết, do khá loằng ngoằng.    . http://www.cadviet.com/forum/topic/5124-hoi-ve-ham-error/

 

Đoạn 2: Lisp viết theo nghĩa Thông-Dịch: Đọc đến đâu- dịch đến đó: Nếu bạn ko đọc được gì giải thích có nghĩa lí gì ????  :(  :(

[ThanhDattdk 3]

Đoạn 1: Đây là hàm *Error*. Thông thường dùng  bẫy lỗi, để nếu có lỗi sảy thì lisp sẽ chạy theo hàm *error* tự tạo.

đọc thêm phần này để hiểu chi tiết, do khá loằng ngoằng.    . http://www.cadviet.com/forum/topic/5124-hoi-ve-ham-error/

 

Đoạn 2: Lisp viết theo nghĩa Thông-Dịch: Đọc đến đâu- dịch đến đó: Nếu bạn ko đọc được gì giải thích có nghĩa lí gì ????  :(  :(

Em xin cảm ơn anh đã giải đáp những thắc mắc của em. Em mới tìm hiểu chỉ được vài cái nên chưa hiểu được nhiều. Anh Danh Cong cho em hỏi về đoạn lips thứ 2 đó thưa anh.Em tìm thấy nó trong 1 đoạn LIPS nhưng không hiểu được ý nghĩa của đoạn LIPS này. Theo em có đọc qua mấy hàm load_dialog, start_dialog, unload_dialog nhưng mục đích của đoạn này để tạo hộp thoại hả thưa anh và biến RES đó thưa anh, nó có thể bằng 0 hoặc bằng 1 khi nào vậy ạ. Mong a chỉ giáo giúp em với ạ. em xin cảm ơn anh