|
AutoLisp : Abstand
Schachinger am 13.09.2004 um 08:26 Uhr (0)
hallo RoyCAD. mal sehn ob ich dich richtig verstanden habe: du hast bereits 4 fertige lisproutinen und willst eine übergeordnete lisp damit du auswählen kannst welche davon angewendet wird? dann guck dir mal das an: Code: (defun xx1 () (princ 1tes Unterpr. ) ) (defun xx2 () (princ 2tes Unterpr. ) ) (defun c:xx () (initget A B ) (setq xy (getkword Teil wählen (A/B): )) (cond ((= xy A ) (xx1)) ((= xy B ) (xx2)) (t nil) ) (princ) ) ist nur mal ein beispielcode damit ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Text Kopieren und ändern
Schachinger am 20.10.2004 um 07:42 Uhr (0)
servus habs grad probiert - das lisp behandelt bereits texte und mtexte.... (0. * TEXT ) ------------------ mfg Siegfried Schachinger http://www.tbschatz.at
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Text Kopieren und ändern
Schachinger am 20.10.2004 um 08:36 Uhr (0)
ah... darauf hatte ich nicht geachtet - ich dachte das du meinst das das lisp überhaupt abbricht. guckst du hier: Code: (defun C:KOTA (/ OBJEKT) (while (setq OBJEKT (ssget _:S ((0 . *TEXT )))) (setq OBJEKT (ssname OBJEKT 0)) (command _.copy OBJEKT (if (= (cdr (assoc 0 (entget OBJEKT))) MTEXT ) (cdr (assoc 10 (entget OBJEKT))) (cdr (assoc (if ( 0 (cdr (assoc 72 (entget OBJEKT)))) ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Hilfe mit Wenn das, dann dorthin...
Schachinger am 02.12.2004 um 10:00 Uhr (0)
servus! also ganz hab ichs nicht verstanden aber ich denke mal das dir ein (cond [(test result ...) ...]) weiterhilft.... guck mal in der hilfe dazu nach. p.s.: hier bekommt man mal nen guten überblick was man mit lisp so alles anstellen kann... ------------------ mfg Siegfried Schachinger http://www.tbschatz.at [Diese Nachricht wurde von Schachinger am 02. Dez. 2004 editiert.]
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Zeichnug schreibgeschützt öffnen
Schachinger am 21.12.2004 um 17:23 Uhr (0)
hallo jeo! einfachste lösung: in der befehlszeile: teilöffnen (oder halt dann auf einen eigenen button) dann ein ~ damit die dialogbox für die auswahl der dwg kommt. leider lässt sich das "~" nicht mit in ein script/macro/lisp packen - "teilöffnen" mag das nicht oder ich habs nicht nicht gecheckt warums nicht geht aber dürfte ein anfang sein bzw. die richtigen profis wissen dazu jetzt eventuell mehr? ..... ------------------ mfg Siegfried Schachinger http://www.tbschatz.at ...
|
| In das Form AutoLisp wechseln |
|
Lisp : entmod und ändern des x-ref-pfades?
Schachinger am 21.09.2004 um 15:44 Uhr (0)
hallo lispprofis!ich versuche gerade mir ein lisp zu schreiben mit dem ich automatisch alle xref-pfade bearbeiten kann. mittels "projectname" und eingetragenen "suchpfaden für projektdateien" kann man die x-refpade ja relativ eintragen. bei einem suchpfad mit "c: emp" wird dann aus "c: empzeichnung1.dwg" "zeichnung1.dwg". bisher hab ich das immer händisch im xref-manager erledigt.zuerst hab ich versucht das ganze über die befehlszeile von _-xref zu machen - nur leider egal wie ichs drehe und wende wird dor ...
|
| In das Form Lisp wechseln |
|
AutoLisp : in lisp variablen-felder erzeugen?!
Schachinger am 16.02.2004 um 07:40 Uhr (0)
Zitat: Original erstellt von Brischke: ...Vielleicht denkst du etwas zu kompliziert... ups.... wieder mal vor lauter bäumen den wald nicht gesehen.. muss mich wohl wieder mal beim arzt durchcheckn lassen ... danke holger! ------------------ mfg Siegfried Schachinger http://www.tbschatz.at
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Zoom-Befehl per Lisp mit Faktor XP ?
Schachinger am 23.02.2004 um 08:54 Uhr (0)
hy jürgen (setq fx 2xp ) (command zoom faktor fx) oder wenn du die das als benutzereingabe haben willst z.b.: (setq fx (strcat (rtos (getreal faktor eingeben: )) xp )) oder hab ich dich falsch verstanden?... ------------------ mfg Siegfried Schachinger http://www.tbschatz.at
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Lispabarbeitung ?
Schachinger am 26.08.2004 um 14:35 Uhr (0)
hab probeweise mal eine test.lsp auf c: erstellt Code: (defun c:del_me () (command shell del c: est.lsp ) ) hat sich damit einfach löschen lassen - selbst wenn sie im Visual-Lisp-Editor noch geöffnet ist!.... ------------------ mfg Siegfried Schachinger http://www.tbschatz.at [Diese Nachricht wurde von Schachinger am 26. Aug. 2004 editiert.]
|
| In das Form AutoLisp wechseln |
test.txt |
Lisp : TXT-Datei einlesen
Schachinger am 28.09.2018 um 08:35 Uhr (1)
Hallo Forum!Da mein aktuelles Problem eigentlich sehr gut dazu passt greif diesen älteren Thread nochmal auf.Ich muss einen TXT-File mit UTF-8-Kodierung einlesen. Da in dem TXT-File unter anderem cyrillische Schriftzeichen vorhanden sind bekomm ich bei der Konvertierung zur ANSI-Kodierung natürlich nur Kauderwelsch raus.Wie kann ich den UTF-8-Textfile mit Lisp einlesen sodass die cyrillischen Texte auch ankommen? Anbei ein Beispiel...Z.B. aus UTF-8-Kodierung "" wird in ANSCI-Kodierung "ИЗДÐÐИЕ"---- ...
|
| In das Form Lisp wechseln |
|
Lisp : TXT-Datei einlesen
Schachinger am 01.10.2018 um 08:51 Uhr (1)
Hallo Holger,Danke für deine Antwort. Sowas in der Art hab ich leider schon befürchtet - und das übersteigt dann meine laienhaften Programmierkentnisse .Wir werdens jetzt anders rum angehen:Bereits im einzulesenden Textfile werden die cyrillischen Schriftzeichen werden durch irgedwelche ANSI-Zeichen (z.B."Ï" anstelle von "") ersetzt. Somit brauch ich nicht mehr mit UTF-8-Codierung arbeiten.Beim Einlesen der TXT-Datei mit Lisp ersetzte ich die entsprechenden Zeichen wieder zurück auf cyrillische Zeichen.Ich ...
|
| In das Form Lisp wechseln |
