05.06.2015 07:31    

LEYLO
Arkadaşlar bu lisp yeni elime geçti sizinle paylaşmak istedim. Komut için 3 yazıp enter'a basıyoruz. Sonra tekrar enter yapıp komutu çalıştırıyoruz. Kim yazdıysa eline sağlık.



(DEFUN C:3 ()
;;(setq a (dictsearch (namedobjdict) "ACAD_DGNLINESTYLECOMP"))

(alert "File cleanup process starting/Dosya Temizleme islemi calisiyor")
(dictremove (namedobjdict) "ACAD_DGNLINESTYLECOMP")
(command "-purge" "all" "*" "n" )
(command "qsave")
(command "-purge" "all" "*" "n" )
(command "qsave")
(command "-purge" "all" "*" "n" )

(alert "File cleanup process finished/Dosya Temizleme islemi bitti")
)

08.06.2015 14:11    

bud_0782
Purge komutunu bu şekilde lisple kullanmaya gerek var mı gerçekten?:O_o

08.06.2015 14:43    

alumina
Ayni komutu 3 kere calistirinca adi lisp olmus. Bari yazıyorsun asagidaki gibi yaz değil mi?

Kod:

(repeat 3
(command "-purge" "all" "*" "n" )
         "qsave"))

08.06.2015 14:51    

Travaci
Aslına bakarsan var ama 3 kere değil : )
Kod:

(defun c:pu (/) (setvar "cmdecho" 0)
  (dictremove (namedobjdict) "acad_dgnlinestylecomp")
  (command "_.purge" "a" "" "n") (setvar "cmdecho" 1) (princ)
)

Zaman zaman dosyalarımıza yapışan nesnelerden kurtulamadığımız zamanlar oluyor. Hatta Autocad bunun için 2014 de yama 2015 ve sonrasında bunu bütünleşik verdi. Eski versiyonlar için yukarıdaki kod çoğu zaman bu eklenti ihtiyacını karşılıyor. İyi forumlar...

08.06.2015 15:01    

alumina
:))

09.06.2015 05:33    

halilozcakir
aslında kullandığım Autocad eski versiyon olduğundan lisp çok işime yarıyor "ACAD_DGNLINESTYLECOMP" ne ise ! :) ,fazlaca düşüyor dosya MB'ı yani 12mb- 8-9mb oluveriyor.. çizgi tipleri ile alakalı bişey ama bilmiyorum.

halilozcakir (09.06.2015 12:52 GMT)

10.06.2015 06:14    

özkan-wien
ya bu klasik autocadci hastaligi. :-) 3 kere escape e basmak gibi. Itiraf edin hadi 3 kere basmayan varmi? fazlasi cikar eksigi cikmaz. Adam Saglam olsun diye 3 kere yazmis. :-)

11.06.2015 05:33    

bud_0782
Alıntı
özkan-wien :
ya bu klasik autocadci hastaligi. :-) 3 kere escape e basmak gibi. Itiraf edin hadi 3 kere basmayan varmi? fazlasi cikar eksigi cikmaz. Adam Saglam olsun diye 3 kere yazmis. :-)



:yes bu iyiydi :)

> 1 <
Copyright © 2004-2022 SQL: 1.281 saniye - Sorgu: 64 - Ortalama: 0.02002 saniye