Chia sẻ lisp in trong AutoCAD hoàn toàn miễn phí, mã nguồn mở, bằng đuôi lsp

[Nguyễn Hà Huy 54]

Chào mọi người, thấy dạo này diễn đàn sôi nổi cái tool in plot quá lên mình rảnh háng cáo chồn nhờ con Claude AI x500 Max của mình viết cái tool in cho AutoCAD, nay vứt lên đây cho mọi người nghịch, có cần cải tiến gì thì cứ viết văn giải thích cho nó, mình vứt cho con Claude AI này nó làm hộ cho.kkkkk

PlotMulti.lsp

[cuongtk2 496]

Dùng một python script dưới dạng string để nối file pdf đang in vào 1 file đã in là có full option đấy. 

(defun bp:python-merge-script-string ()
  (strcat
    "import os\n"
    "import sys\n"
    "try:\n"
    "    from pypdf import PdfMerger\n"
    "except ImportError:\n"
    "    import subprocess\n"
    "    subprocess.check_call([sys.executable, '-m', 'pip', 'install', 'pypdf'])\n"
    "    from pypdf import PdfMerger\n"
    "\n"
    "def append_pdf(target_pdf, new_pdf):\n"
    "    if not os.path.exists(target_pdf):\n"
    "        # Nếu file đích chưa tồn tại, copy file mới thành file đích luôn\n"
    "        import shutil\n"
    "        shutil.copy(new_pdf, target_pdf)\n"
    "    else:\n"
    "        # Nếu đã có, mở merger và append thêm trang mới vào cuối\n"
    "        merger = PdfMerger()\n"
    "        merger.append(target_pdf)\n"
    "        merger.append(new_pdf)\n"
    "        merger.write(target_pdf)\n"
    "        merger.close()\n"
    "\n"
    "if __name__ == '__main__':\n"
    "    if len(sys.argv) > 2:\n"
    "        append_pdf(sys.argv[1], sys.argv[2])\n"
  )
)

(defun bp:write-python-temp-file ( / pyfile f)
  (setq pyfile (vl-filename-mktemp "plotmulti_append" nil ".py"))
  (setq f (open pyfile "w"))
  (write-line (bp:python-merge-script-string) f)
  (close f)
  pyfile
)

 

[VoTuanKiet 2]

hình như k thấy khổ giấy A1, với lại có thiết lập nào in nhiều file 1 lúc thay vì từng file không ạ

[CamDuy 17]

quá tuyệt vời