|
AutoLisp : Status vo DWG mit Lisp erkennen
CADwiesel am 27.11.2002 um 07:57 Uhr (0)
Setvar writestat könnte was für Dich sein ------------------ Gruß CADwiesel
|
In das Form AutoLisp wechseln |
|
AutoLisp : ddpmode in lisp verwenden
CADwiesel am 28.11.2002 um 10:57 Uhr (0)
Hai wie kann? ich die Dialogbox ddptype in lisp aufrufen? mit (initdia) und (command "_ddptype") geht s nicht. ------------------ Gruß CADwiesel
|
In das Form AutoLisp wechseln |
|
AutoLisp : ddpmode in lisp verwenden
CADwiesel am 28.11.2002 um 11:02 Uhr (0)
Ist doch n lisp ------------------ Gruß CADwiesel
|
In das Form AutoLisp wechseln |
|
AutoLisp : Anfänger braucht Hilfe
CADwiesel am 02.01.2003 um 08:30 Uhr (0)
Hai Willkommen im Forum .. und n schönes neues Jahr. Wolln wir uns mal Deinen Code ansehen... oops (defun lbox () ;;(setq dcl_id (load_dialog "coe_layer_new.dcl")) ;;(if (not (new_dialog "coe_layer_new" dcl_id)) (exit)) (if ( (setq dcl_id (load_dialog "coe_layer_new.dcl"))0) (exit) ) (new_dialog "coe_layer_new" dcl_id) (action_tile "accept" "(done_dialog 1)") (action_tile "cancel" "(done_dialog 0)") (strtlist) ;;bnum2 (get_tile "radio_cluster" );;da fehlt einiges (setq bnum2 (get_tile "radio_cluster") ...
|
In das Form AutoLisp wechseln |
|
AutoLisp : Ostern anzeigen
CADwiesel am 03.02.2003 um 16:19 Uhr (0)
Prima! Aber da stellt sich mir die Frage: Wer zum Kuckuck gibt einen Aftrag aus Acad Ostern ermitteln zu wollen???? Entweder haben die Leute zu viel Zeit oder zuviel Geld. Mir fallen doch jetzt ganz spontan keine Gründe ein, wofür ich in Acad dieses Lisp brauchen könnte - schade eigentlich, mal sehen ob ich s nicht als goodie in ein s meiner nächsten Lisp s einbaue. ------------------ Gruß CADwiesel
|
In das Form AutoLisp wechseln |
|
AutoLisp : Ostern anzeigen
Theodor Schoenwald am 03.02.2003 um 16:41 Uhr (0)
Hallo Cadwiesel, deine Frage habe ich mir auch gestellt und keine Antwort gefunden. Zuerst habe es als ABM betrachtet. Aber dann habe ich es anders gesehen. In der heutigen Zeit kommt bei fast jeder Arbeit die Frage: "Was kommt dabei raus". Nun hier ist etwas wo mal nichts dabei raus kommt - einfach so -. Da du es in deine Sammlung einbinden willst, bin nicht nur ich ... Viele Grüße Theodor Schönwald
|
In das Form AutoLisp wechseln |
|
AutoLisp : Ostern anzeigen
CADwiesel am 04.02.2003 um 08:01 Uhr (0)
Ich habe auch noch ein Weltraumspiel in lisp. Das ist dazu da um strategische Intergalaktische Planungen der Irdischen Weltraumflotte im Falle einer Verteidigungssituation des Planeten zu simuliern. Dazi ist Acad natürlich besonders gut geeignet, da man auf dieser Software sehr gut die Tatsächlichen Entfernungen und Größen des Weltalls darsetllen kann ------------------ Gruß CADwiesel
|
In das Form AutoLisp wechseln |
|
AutoLisp : Ostern anzeigen
CADwiesel am 04.02.2003 um 13:42 Uhr (0)
Mensch, dass Du jetzt noch unter die Strategen gehen willst! Na gut... und zur Entspannung hab ich noch eine Slot-maschine beigepackt. ------------------ Gruß CADwiesel
|
In das Form AutoLisp wechseln |
|
AutoLisp : Highlight zurücknehmen
CADwiesel am 12.02.2003 um 12:38 Uhr (0)
Klar geht s so. Du musst es aber erst mal ausleuchten (setq zumleuchten (ssget)) (setq c 0) (repeat (sslength zumleuchten) (redraw (ssname zumleuchten c) 3) (setq c (1+ c)) ); (setq c 0) (repeat (sslength zumleuchten) (redraw (ssname zumleuchten c) 4) (setq c (1+ c)) ) ------------------ Gruß CADwiesel
|
In das Form AutoLisp wechseln |
|
AutoLisp : Highlight zurücknehmen
CADwiesel am 13.02.2003 um 11:55 Uhr (0)
Was hältst du davon??? (setq zumleuchten (ssget)) (setq c 0) (repeat (sslength zumleuchten) (redraw (ssname zumleuchten c) 3) (setq c (1+ c)) ) (while (setq as (car (entsel))) (setq c 0) (repeat (sslength zumleuchten) (if(eq as (ssname zumleuchten c)) (progn (redraw as 4) (setq zumleuchten (ssdel as zumleuchten)) ) ) (setq c (1+ c)) ) ) ------------------ Gruß CADwiesel [Diese Nachricht wurde von CADwiesel am 13. Februar 2003 editiert.]
|
In das Form AutoLisp wechseln |
|
AutoLisp : Zahl Hochzählen
CADwiesel am 17.02.2003 um 14:19 Uhr (0)
Hat ne Klammer gefehlt. Ausserdem würde ich auf alle Fälle die Layernamensgeschichte Wasserdicht machen. Du musst sichergehen, dass der Layer auch existiert. (defun c:num (/ nr ipt ant th tlay prefix) (setq prefix (getstring "
Textprefix: ") nr (if (setq ant (getint "
Startnummer 0 ")) (1- ant) 0 ) ;_ end of if th (getreal "
Texthöhe:") tlay (getstring "
Ziellayer:") ) ;_ end of setq (while (setq ipt ...
|
In das Form AutoLisp wechseln |
|
AutoLisp : Zahl Hochzählen
Brischke am 17.02.2003 um 14:29 Uhr (0)
...Klammer gefehlt... Das kommt davon, wenn man das direkt in die Antwort schreibt, und keinen Editor nutzt. CADwiesel hat natürlich recht, was den Layer angeht. Da kann man dann noch ein Listenfenster mit der Auflistung aller Layer aufgehen lassen. Da wählt man den Layer aus, dann ist s eindeutig. Ich schau mal, dass ich das heute Abend mit hinbekomme. Bis dahin ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Wieder 2 neue Tool s im FreeDownload Wissen wie es gemacht ...
|
In das Form AutoLisp wechseln |
|
AutoLisp : lisp-editor
CADwiesel am 26.11.2002 um 17:31 Uhr (0)
Ja ist in acad ab 2000 integriert (_vlide) für R14 schick mir ne Mail ------------------ Gruß CADwiesel
|
In das Form AutoLisp wechseln |