Änderungen der "Schneiderei"-Dateien Modifications of the "Tailors" files gegenüber der ursprünglichen Version vom 13. April 2000 [original version: 13 April 2000] _____________________________________________________________________________________________________________________________________________________________ 2000 Juli 31 2000 July 31 Warnmeldung bei falscher Programmversion Warning in case of wrong program version nicht mehr im Dialogfeld, sondern in der Befehlszeile not in dialog box but in command line [Tailors.lsp Zeilen 18 - 25: [Tailors.lsp lines 18 - 25: (alert ...) durch (princ ...) ersetzt, \n eingefügt] (alert ...) replaced by (princ ...), \n inserted] Globale Variablen *lpolyfit*, *mpolyfit*, *npolyfit* Global variables *lpolyfit*, *mpolyfit*, *npolyfit* in Sterne eingeschlossen enclosed in asterisks [Tailors.lsp Zeilen 4875 bis 5609] [Tailors.lsp lines 4875 through 5609] Tailors.prv, .fas, .vlx neu erstellt Tailors.prv, .fas, .vlx newly built Vereinfachung von \Deutsch\Schneiderei.mnl und \English\Tailors.mnl \Deutsch\Schneiderei.mnl and \English\Tailors.mnl simplified (autoload) bei beliebiger Eingabe (autoload) for random input deutscher oder englischer Funktionsnamen in allen Versionen of German or English function names in all versions [(if ... (ver)...)-Verzweigung entfernt] [(if ... (ver)...)-bifurcation removed] Hinweis auf eine inoffizielle deutsche Übersetzung der GNU GPL Link to an unofficial German translation of the GNU GPL in \Deutsch\Hilfe\installieren.html in \Deutsch\Hilfe\installieren.html _____________________________________________________________________________________________________________________________________________________________ 2000 August 05 2000 August 05 Überzähliger Zeilenvorschub entfernt Surplus line feed removed bei "SCHNEIDEN"-Eingabeaufforderung [Option "Ansicht"] in "XSLICE" prompt ["view" option] [Tailors.lsp Zeile 1370] [Tailors.lsp line 1370] Aufruf des "Ursprung"-Befehls in "SCHNEIDEN" "explode" command call in "XSLICE" abhängig von der undokumentierten Systemvariable "qaflags" dependent on undocumented "qaflags" system variable [Tailors.lsp Zeilen 3643 - 3645] [Tailors.lsp lines 3643 - 3645] Hinweis auf GNU GPL License.txt, LiesMich.txt, installieren.html Reference to GNU GPL License.txt, ReadMe.txt, install.html sowie History.txt and History.txt am Beginn von Tailors.lsp in first lines of Tailors.lsp Tailors.prv, .fas, .vlx neu erstellt Tailors.prv, .fas, .vlx newly built _____________________________________________________________________________________________________________________________________________________________ 2000 Oktober 03 2000 October 03 Textbreite der Datei Tailors.lsp von 78 auf 72 Zeichen pro Zeile verringert Text width of Tailors.lsp file decreased from 78 to 72 characters per line Tippfehler korrigiert im Unterprogramm xsliceProcess, Typo corrected in xsliceProcess subroutine, examination of rays: Verarbeitung von Strahlen: (>= (- tol) d1) ersetzt durch (>= (- tol) d0) (>= (- tol) d1) replaced by (>= (- tol) d0) [Tailors.lsp Zeile 1865] [Tailors.lsp line 1865] Unterscheidung der deutschen / englischen Version Distinction between German version / English version [Zuweisung des Flags ger in Tailors.lsp] [assignment of the ger flag in Tailors.lsp] verlagert aus den Hauptroutinen in die initialisierenden Unterprogramme moved from main routines to initiating subroutines Funktionen "BÜGELN" und "POLYFIT" herausgelöst und separiert "IRON" and "POLYFIT" functions extracted and separated Funktion "ENTFALTEN" aufgenommen [aus unfold.lsp vom 15. August 2000]; Function "UNFOLD" added [unfold.lsp, released 15 August 2000]; dabei modifiziert: modifications: im Unterprogramm unfoldProcess auch die Scheitelpunkte in unfoldProcess subroutine des ursprünglichen Netzes nummeriert auf Layer "UNFOLDED-O" original mesh vertices numbered on layer "UNFOLDED-O" [Tailors.lsp Zeilen 4702 bis 4712 und 4740 bis 4777] [Tailors.lsp lines 4702 through 4712 and 4740 through 4777] im Unterprogramm unfoldProcess34: (abs ni) ersetzt durch ni in unfoldProcess34Number subroutine: (abs ni) replaced by ni [Tailors.lsp Zeile 5073; [Tailors.lsp line 5073; abs-Funktion bereits angewendet in Zeilen 4794 bis 4797] abs function already issued in lines 4794 through 4797] im Hauptprogramm und im Unterprogramm unfoldProcess in main routine and unfoldProcess subroutine Variable "am" [Gesamtfläche des Netzes] "am" variable [total mesh area] ersetzt durch globale Variable *mesharea* replaced by global variable *mesharea* zur weiteren Verarbeitung nach Beendigung der Funktion for further processing after function has finished Statusanzeige hinzugefügt [Anzahl der untersuchten Komponenten] status report added [number of examined components] [Tailors.lsp Zeilen 4743 bis 4748, 4777, 4902 bis 4919] [Tailors.lsp lines 4743 through 4748, 4777, 4902 through 4919] Programm für IntelliCAD 2000 tauglich gemacht; dazu Program made suitable for IntelliCAD 2000; therefore Unterprogramm icad_browser hinzugefügt, icad_browser subroutine added da der Befehl "browser" von IntelliCAD nicht unterstützt wird because the "browser" command is not supported by IntelliCAD [Tailors.lsp Zeilen 5180 bis 5263, [Tailors.lsp lines 5180 through 5263, Aufrufe in Zeilen 438 bis 441 und 5155 bis 5158] calls in lines 438 through 441 and 5155 through 5158] im terminierenden Unterprogramm (command "_.regen") eingefügt (command "_.regen") inserted in terminating subroutine [Tailors.lsp Zeilen 5407 bis 5409] [Tailors.lsp lines 5407 through 5409] im Unterprogramm sewProcess: in sewProcess subroutine: zur Warnung bei kritischer Höhe der Anzahl der Teilobjekte in case of critical number of components Befehlszeilen-Anfrage versionsabhängig gemacht command line prompt made dependent on version [Tailors.lsp Zeilen 111, 178, 462 bis 471 und 478 bis 488]; [Tailors.lsp lines 111, 178, 462 through 471 and 479 through 488]; findfile-Funktion eingefügt findfile function inserted zum Unterdrücken eines alert-Fensters bei unauffindbarer dcl-Datei to supress the alert window when the dcl file was not found [Tailors.lsp Zeilen 398 bis 403] [Tailors.lsp lines 398 through 403] in ssget-Filterlisten: in ssget filter lists: (-4 . "=") vor (39 . 0.0) entfernt removed (-4 . "=") preceding (39 . 0.0) [Objekthöhe] [Tailors.lsp Zeilen 236 und 1238] [thickness] [Tailors.lsp lines 236 and 1238] sowie Konstruktion (0 . "POLYLINE") (-4 . "&") (70 . 80) and construction (0 . "POLYLINE") (-4 . "&") (70 . 80) replaced ersetzt durch Aufzählung der Fälle by enumerating the cases [offene/geschlossene/geglättete Polygonnetze; Polyflächennetze] [open/closed/surface fit polygon meshes; polyface meshes] [Tailors.lsp Zeilen 226 bis 234 und 1228 bis 1236] [Tailors.lsp lines 226 through 234 and 1228 through 1236] zur Fallunterscheidung bei der Diagonal-Aufteilung von 3d-Flächen to distinguish versions concerning diagonal division of 3D faces in den Hauptroutinen von "SCHNEIDEN" und "ENTFALTEN" in main routines of "XSLICE" and "UNFOLD" Flag r// deklariert [Tailors.lsp Zeilen 1073, 1177, 4513, 4596]; flag r// declared [Tailors.lsp lines 1073, 1177, 4513, 4596]; im Unterprogramm xsliceProcess in xsliceProcess subroutine (setq r// (or r14 (equal (ver) "LISP Release 1.0"))) eingefügt (setq r// (or r14 (equal (ver) "LISP Release 1.0"))) added [Tailors.lsp Zeile 1818]; [Tailors.lsp line 1818]; im Unterprogramm xsliceProcessFace in xsliceProcessFace subroutine (if r14 ...) ersetzt durch (if r// ...) (if r14 ...) replaced by (if r// ...) [Tailors.lsp Zeile 2217]; [Tailors.lsp line 2217]; im Unterprogramm unfoldProcess in unfoldProcess subroutine r// zugewiesen [Tailors.lsp Zeile 4783]; r// assigned [Tailors.lsp line 4783]; (if (wcmatch (ver) "Visual LISP 2000*") ...) ersetzt (if (wcmatch (ver) "Visual LISP 2000*") ...) replaced by (if r// ...) durch (if r// ...) [Tailors.lsp Zeile 4822] [Tailors.lsp line 4822] [beschleunigt die Verarbeitung bei großer Anzahl von Flächen [this increases speed when processing a large number of faces und erleichtert wahrscheinlich die Verträglichkeit and probably improves compatibility to future releases] mit zukünftigen Releases] Am Beginn der Unterprogramme diejenigen jeweils verwendeten Variablen At the beginning of all subroutines: aufgezählt, welche in den Hauptprogrammen deklariert wurden enumeration of variables declared in main routines [aus Gründen der Geschwindigkeit und Übersicht] [for the sake of performance and clear structure] Tailors.prv, .fas, .vlx neu erstellt Tailors.prv, .fas, .vlx newly built Menüquelldateien Schneiderei.mnl, .mns, Tailors.mnl, .mns neu erstellt Menu source files Schneiderei.mnl, .mns, Tailors.mnl, .mns newly built unfold16.bmp, unfold24.bmp erstellt [Buttongrafik]; unfold16.bmp, unfold24.bmp created [button faces]; sew16.png, xslice16.png, unfold16.png, tailorshelp16.png, sew16.png, xslice16.png, unfold16.png, tailorshelp16.png, home16.png, installA16.png, installB16.png home16.png, installA16.png, installB16.png [für die Online-Hilfe-Dateien] [for the online help files] LiesMich.txt, ReadMe.txt und HTML-Hilfe-Dateien erstellt bzw. aktualisert LiesMich.txt, ReadMe.txt, HTML help files created or updated _____________________________________________________________________________________________________________________________________________________________ 2000 Oktober 22 2000 October 22 Unterprogramm icad_browser entfernt, icad_browser subroutine removed, stattdessen Befehl "url" für IntelliCAD eingesetzt IntelliCAD "url" command used instead [Tailors.lsp Zeilen 438 bis 444 und 5159 bis 5165] [Tailors.lsp lines 438 through 444 and 5159 through 5165] Tailors.prv, .fas, .vlx neu erstellt Tailors.prv, .fas, .vlx newly built LiesMich.txt, ReadMe.txt, installieren.html, install.html aktualisert LiesMich.txt, ReadMe.txt, installieren.html, install.html updated _____________________________________________________________________________________________________________________________________________________________ 2001 Februar 27 2001 February 27 Textbreite der Datei Tailors.lsp verringert Text width of Tailors.lsp file decreased von 72 auf 71 Zeichen pro Zeile [plus Zeilenvorschub] from 72 to 71 characters per line [plus carriage return] In ssget-Filterlisten für Polylinien [incl. Netze] In ssget filter lists for polylines [incl. meshes] 7. Bit [128] aufgenommen für evtl. zukünftige Linientyp-Generierung 7th bit [128] supported for future implementation of linetye generation [Tailors.lsp Zeilen 255 bis 281 und 1306 bis 1332] [Tailors.lsp lines 255 through 281 and 1306 through 1332] Bei Auswahl eines Polygonnetzes im Unterprogramm unfoldSelect: In case of the selection of a polygon mesh in the unfoldSelect subroutine: Hinweis auf die Möglichkeit der Umwandlung in ein Polyflächennetz message pointing to the SEW function [Tailors.lsp Zeilen 6478 bis 6494] offering conversion to a polyface mesh [Tailors.lsp lines 6478 through 6494] Funktionen WANDELN, WENDEN, RÜCKSEITE aufgenommen Functions LIFT, FLIP, BACKFACE added [Tailors.lsp Zeilen 4589 bis 6270]; [Tailors.lsp lines 4589 through 6270]; dazu allgemein verwendbare Unterprogramme str1+ und transpose general-purpose subroutines str1+ and transpose [Tailors.lsp Zeilen 7280 bis 7337] [Tailors.lsp lines 7280 through 7337] Tailors.prv, .fas, .vlx neu erstellt Tailors.prv, .fas, .vlx newly built Menüquelldateien Schneiderei.mnl, .mns, Tailors.mnl, .mns neu erstellt Menu source files Schneiderei.mnl, .mns, Tailors.mnl, .mns newly built Neue Pixelbilder: New raster images: lift16.bmp, flip16.bmp, backface16.bmp, lift16.bmp, flip16.bmp, backface16.bmp, lift24.bmp, flip24.bmp, backface24.bmp [Buttongrafik]; lift24.bmp, flip24.bmp, backface24.bmp [button faces]; lift16.png, flip16.png, backface16.png [für die Online-Hilfe-Dateien] lift16.png, flip16.png, backface16.png [for the online help files] LiesMich.txt, ReadMe.txt und HTML-Hilfe-Dateien erstellt bzw. aktualisert LiesMich.txt, ReadMe.txt, HTML help files created or updated _____________________________________________________________________________________________________________________________________________________________ 2001 März 25 2001 March 25 Unnötige (progn)-Funktion im Unterprogramm sewProcessSet entfernt Redundant (progn) function in sewProcessSet subroutine removed [Tailors.lsp Zeilen 877 bis 891] [Tailors.lsp lines 877 through 891] Polylinien in die Funktion WANDELN einbezogen Polylines admitted to LIFT function [Tailors.lsp Zeilen 4590 bis 5406] [Tailors.lsp lines 4590 through 5406] In der Funktion WANDELN: LIFT function: Objekte auf gesperrten Layern ausgefiltert; objects on locked layers filtered out; Originale gelöscht, wenn die Systemvariable "delobj" gleich 1 ist originals deleted depending on "delobj" system variable [Tailors.lsp Zeilen 4597 bis 5403] [Tailors.lsp lines 4597 through 5403] Polyflächennetze und geschlossene Polygonnetze Polyface meshes and closed polygon meshes in die Funktion WENDEN einbezogen admitted to FLIP function [Tailors.lsp Zeilen 5729 bis 6268] [Tailors.lsp lines 5729 through 6268] Offene Polygonnetze in die Funktion RÜCKSEITE einbezogen Open polygon meshes admitted to BACKFACE function [Tailors.lsp Zeilen 6301 bis 6482] [Tailors.lsp lines 6301 through 6482] Markieren der Flächen in RÜCKSEITE mittels (redraw) Objects highlighted in BACKFACE by means of (redraw) anstelle von (sssetfirst); Rückgängig machen mittels "regen"; instead of (sssetfirst); unhighlighted by means of "regen"; Unterprogramme xsliceInitiate, xsliceError umbenannt xsliceInitiate, xsliceError subroutines renamed in regenInitiate, regenError [Tailors.lsp Zeilen to regenInitiate, regenError [Tailors.lsp lines 1131, 1235, 6332, 6395, 6489, 6561, 8091, 8101, 8158] 1131, 1235, 6332, 6395, 6489, 6561, 8091, 8101, 8158] Funktion NORMALEN hinzugefügt; Function NORMALS added; Unterprogramme mit RÜCKSEITE gemeinsam genutzt subroutines shared with BACKFACE [Tailors.lsp Zeilen 6575 bis 7013] [Tailors.lsp lines 6575 through 7013] Erstellen von Gruppen mit eindeutigen Namen Group names made unique im Unterprogramm uniqueGroup; von IntelliCAD nicht unterstützt in uniqueGroup subroutine; not supported by IntelliCAD [Tailors.lsp Zeilen 4615, 4675, 5718, 7997 bis 8059] [Tailors.lsp lines 4615, 4675, 5718, 7997 through 8059] Tailors.fas, .vlx neu erstellt Tailors.fas, .vlx newly built Schneiderei.mnl, .mns, Tailors.mnl, .mns aktualisiert Schneiderei.mnl, .mns, Tailors.mnl, .mns updated Neue Pixelbilder: New raster images: normals16.bmp, normals24.bmp [Buttongrafik]; normals16.bmp, normals24.bmp [button faces]; unfold.png, lift.png, normals.png, normals16.png unfold.png, lift.png, normals.png, normals16.png [für die Online-Hilfe-Dateien] [for the online help files] Verzeichnis Images neu gegliedert [Unterverzeichnisse css, icons, examples] Images directory subdivided [css, icons, examples subdirectories] LiesMich.txt, ReadMe.txt, HTML-Hilfe-Dateien, Stylesheets und diagonal.js LiesMich.txt, ReadMe.txt, HTML help files, style sheets, and diagonal.js aktualisert updated _____________________________________________________________________________________________________________________________________________________________ 2001 März 31 2001 March 31 Im Unterprogramm xsliceInput In xsliceInput subroutine alle Namen der Schnittebenen [XY, YX, YZ, ZY, ZX, XZ] zugelassen all names of slicing planes admitted [XY, YX, YZ, ZY, ZX, XZ] [Tailors.lsp Zeilen 1368, 1369, 1371, 1595, 1631, 1667] [Tailors.lsp lines 1368, 1369, 1371, 1595, 1631, 1667] normals.png und normals.html verbessert, normals.png and normals.html improved, LiesMich.txt, ReadMe.txt, HTML-Hilfe-Dateien aktualisiert LiesMich.txt, ReadMe.txt, HTML Help files updated