|
Lisp : Alle geöffneten Pläne auf Modellansicht
wronzky am 23.04.2008 um 11:17 Uhr (0)
Hi,nur als Nachtrag, für alle, die hier im Lisp-Forum auch Lisp-Fragen haben:Code:(vlax-for i (vla-get-documents (vlax-get-acad-object)) (vla-put-activespace i 1))Grüsse, Henning@Cadmium: einen Einzeiler als vlx... ------------------Henning JesseVoxelManufakturComputer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
| In das Form Lisp wechseln |
|
Lisp : Alle geöffneten Pläne auf Modellansicht
kickdown am 23.04.2008 um 09:51 Uhr (0)
hiich suche ein Lisp welches alle geöffneten Pläne auf die Modellansicht wechselt.Da ich teilweise mit vielen Pläne gleichzeitig arbeite, wäre das ziemlich praktisch.danke kickdown
|
| In das Form Lisp wechseln |
|
Lisp : stolti.lsp
wronzky am 24.04.2008 um 17:18 Uhr (0)
Hi Stolti,die meisten Deiner Befehle setzen ja Systemvariablen. Für den Umgang mit Systemvariablen gibt es in Lisp die Befehle (getvar "...") und (setvar "...").Versuch es also mal mit (setvar "polaraddang" "").Grüsse, Henning------------------Henning JesseVoxelManufakturComputer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
| In das Form Lisp wechseln |
|
Lisp : Hyperlink auslesen
Big Sven am 29.04.2008 um 10:35 Uhr (0)
@ThomasDas mit den ETs ist schon mal ein guter Ansatz, um einen groben Überblick zu gewinnen. Vielen Dank dafür! Eleganter wäre natürlich später eine Ausgabe in Excel, wo man sie schön sortieren könnte!@HenningVielen Dank für Deinen Ansatz. Er funktioniert zwar noch nicht ganz, aber vielleicht bekomme ich das ja nocht in Lisp hingefummelt, wenn ich heute Abend wieder ein wenig Ruhe habe!Gruß Sven
|
| In das Form Lisp wechseln |
|
Lisp : aus String Programmaufruf erstellen
Werner-Maahs.de am 02.05.2008 um 17:59 Uhr (0)
Hallo,ich habe ein recht umfangreiches LISP-Programm, in dem ich über eine Text-(Datenbank-)Dateieinen Text eingeben kann, mit dem ein gleichnamiges Programm gestartet werden kann.Beispiel:Aus DB-Datei lese ist den Text XY heraus (setq Dateiname (read-line ...)).(setq dateinamen (strcat Dateiname ".LSP"))Mit der Funktion (load dateiname) rufe ich das Programm auf.Aus dem aufegrufenen Programm wird dasselbe gestartet.Nun beabsichtige ich mein Hauptprogramm so zu ändern, das ich nicht jedesmal das Unterprogr ...
|
| In das Form Lisp wechseln |
|
Lisp : (nicht) schreibgeschützte DWG mit Script öffnen
Peter2 am 06.05.2008 um 15:39 Uhr (0)
Zitat:Original erstellt von CADmium:...(open "TEST.dwg" "a") Auch danke.Interessant und funktioniert im ersten Schritt auch, aber da verläuft man sich. Das muss man in ein Lisp-IF einbauen, dann m it Lisp auch (command "open"..) machen - und dann reisst das Script ab, weil das programm vom Lispbefehl nicht mehr zum Script zurückfindet.Peter------------------Für jedes Problem gibt es eine einfache Lösung.Die ist aber meistens falsch. ;-)
|
| In das Form Lisp wechseln |
|
Lisp : 2 Plotfiles mit einem Lisp erstellen
Geos am 07.05.2008 um 19:46 Uhr (0)
Code:(defun C:DBLPRNT (/ fmt lot hfmt ncan nhp) ; Die Lisp ist derzeit nur für Querformat, da ich meistens Querformat Plotte (if (= (getvar "limmax") "1189.0 841.0") (setq fmt "A0")) (if (= (getvar "limmax") "841.0 594.5") (setq fmt "A1")) (if (= (getvar "limmax") "594.5 420.0") (setq fmt "A2")) (if (= (getvar "limmax") "420.0 297.0") (setq fmt "A3")) (if (= (getvar "limmax") "297.0 210.0") (setq fmt "A4")) (setq lot (getvar "ctab")) (setq ncan (strcat lot "_for_CW8400PG")) ;--- (setq hfmt (strcat "Übergr ...
|
| In das Form Lisp wechseln |
|
Lisp : 2 Plotfiles mit einem Lisp erstellen
wronzky am 07.05.2008 um 19:52 Uhr (0)
Hi Andreas,hier fehlen die schliessenden Klammern: Code:(setq lot (getvar "ctab")) (setq ncan (strcat lot "_for_CW8400PG")) ;----- (setq hfmt (strcat "Übergröße ISO: " fmt)) ;----- (setq nhp (strcat lot "_for_HP1050C")) ;-----Ob der Plot-Befehl die richtigen Parameter hat, hab ich aber nicht getestet.Grüsse, Henning------------------Henning Jesse[EDIT] Warum bekommt man beim Schreiben eigentlich keine Nachricht, dass das Thema schon erledigt ist [/EDIT]VoxelManufakturComputer-Dienstleistungen für Architek ...
|
| In das Form Lisp wechseln |
|
Lisp : 2 Plotfiles mit einem Lisp erstellen
Obi-Wahn am 08.05.2008 um 18:14 Uhr (0)
Thx Geos und wronzky.Ich könnt mir selbst in den Hintern beissen dass ich den "Anfängerfehler" nicht gefunden hab.Anyway. Ich hab das Lisp jetzt geladen bekommen, aber wenn ich den Befehl dblprnt meiner Lisp aufrufe bekomm ich die Fehlermeldung:"Befehl: Fehlerhafter Argumenttyp: stringp nil"Ich vermute mal dass da die Befehlsargumente was haben, aber wenn ich das manuell nachvollziehen will, gehts einwandfrei.DankeAndreas------------------Garten ist eine Kunstnatur
|
| In das Form Lisp wechseln |
|
Lisp : 2 Plotfiles mit einem Lisp erstellen
wronzky am 08.05.2008 um 19:03 Uhr (0)
Hi Andreas,ich denke, es liegt daran, dass Du fmt nicht immer gesetzt bekommst. Check mal Deine Layouts mit (getvar "limmax") und schau, ob auch Deinen Werte dabei sind. Wenn nicht, dann steht in fmt nil, und strcat liefert "Fehlerhafter Argumenttyp: stringp nil".[EDIT]ich würds so: machen:Code:(setq xmax (car (getvar "limmax"))) (cond ((= xmax 297.0) (setq fmt "A4")) ((= xmax 420.0) (setq fmt "A3")) ((= xmax 594.5) (setq fmt "A2")) ((= xmax 841.0) (setq fmt "A1")) ((= xmax 1189.0) (setq fmt "A0")) ( ...
|
| In das Form Lisp wechseln |
|
Lisp : 2 Plotfiles mit einem Lisp erstellen
Obi-Wahn am 08.05.2008 um 19:35 Uhr (0)
Hi!Ich hab mal versucht das zu überprüfen, indem ich die ZeileCode:(if (= (getvar "limmax") "1189.0 841.0") (setq fmt "A0"))einfach in die Befehlszeile kopiert hab und ausgeführt hab.Als antwort hab ich nur ein nil bekommen.Schaut also so aus, als währs das.Aber wenn ich die ZeileCode:(getvar "limmax")eingebe, bekomm ich das Format (1189.0 841.0) retour.Wo liegt also der Fehler? Is für mich irgendwie unlogisch....Danke für die GeduldAndreas[EDIT]ich habs mal schnell umgesetzt, aber jetzt bekomm ich"Fehlerh ...
|
| In das Form Lisp wechseln |
|
Lisp : 2 Plotfiles mit einem Lisp erstellen
wronzky am 08.05.2008 um 19:43 Uhr (0)
Ich verweise noch mal auf mein EDIT einen Beitrag höher...Grüsse, Henning(PS: Weiss nicht, ob Du PMs liest)------------------Henning JesseVoxelManufakturComputer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
| In das Form Lisp wechseln |
|
Lisp : 2 Plotfiles mit einem Lisp erstellen
Obi-Wahn am 08.05.2008 um 19:49 Uhr (0)
Hi!Danke, ich hab die PMs gerade gesehen. Die Edits von dir hab ich aber schon vorher umgesetzt gehabt.Ich hab das jetzt nach deinem Code abgeändert und mit car kommts zumindest an die Zeile Command.Das Problem ist, dass irgendwas noch immer nicht stimmt.wenn ich jetzt dblprnt eingebe, dann rattert ein jeder Parameter durch und ich bekomm in der Befehlszeile Zeilen à la:"Unbekannter Befehl "CANON W8400 PG". Drücken Sie F1-Taste für Hilfe"Komischerweise ist das aber nicht der erste string der übergeben wird ...
|
| In das Form Lisp wechseln |
