Autor
|
Thema: Code- und Smilie-Test (425 mal gelesen)
|
Heiko Engel Moderator
Beiträge: 3239 Registriert: 11.06.2001 Herr, stärke mich in Geduld, aber ZACK ZACK!!
|
erstellt am: 27. Sep. 2006 20:53 <-- editieren / zitieren --> Unities abgeben:
|
Heiko Engel Moderator
Beiträge: 3239 Registriert: 11.06.2001 Herr, stärke mich in Geduld, aber ZACK ZACK!!
|
erstellt am: 27. Sep. 2006 20:54 <-- editieren / zitieren --> Unities abgeben:
|
Heiko Engel Moderator
Beiträge: 3239 Registriert: 11.06.2001 Herr, stärke mich in Geduld, aber ZACK ZACK!!
|
erstellt am: 27. Sep. 2006 21:01 <-- editieren / zitieren --> Unities abgeben:
Frisch ans Werk: Code: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Einfuehrung der Variablen nomi-dia; pitch1 und TPI1 vom Typ string ;; da proposals nur vom Typ string sein koennen!!! ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (nomi-dia :title "Nenn-D." :value-type :string roposals '("6" "8" "10" "12") ) (pitch1 :title "Steigung" :value-type :string roposals '("1" "1.25" "1.5" "1.75") ) ("inch") (nomi-dia-inch :title "Nenn-D." :value-type :string roposals '("#12" "1/4" "3/8" "1" "1 1/2") ) (TPI1 :title "Steigung" :value-type :string :initial-value "" roposals '("28" "24" "20" "18" "14") ) ("-") (core-dia :title "Kern-D." :toggle-type :indicator-toggle-data :value-type ositive-length ) (profile :toggle-type :indicator-toggle-data :title "Gew.-art" :range (:BSW :BSF :BSP :UNC :UNF :NPT :M :MF :TR :S :R :E) ) (thread-type :title "Typ" :range ( :Aussen :Innen) ) (chamfer :title "vorh. Fase einbeziehen" :value-type :boolean :toggle-type :wide-toggle :initial-value T ) (thread-name :title "Name" :value-type :string :initial-value "" ) (a-dir-reverse :title "Umkehren" :value-type :boolean :toggle-type :wide-toggle :after-input (progn (dolist (a-fb t-feedbacks) (sd-end-point-feedback a-fb)) (setf axis (make-gpnt3d :x (* -1 (gpnt3d_x axis)) :y (* -1 (gpnt3d_y axis)) :z (* -1 (gpnt3d_z axis)))) (push ;; center of cylinder (sd-start-direction-feedback oint center :direction axis :disc t :color 0,0,1) t-feedbacks) );;progn
------------------ DIE inoffizielle Hilfeseite zum OneSpace Designer "Es hängt alles irgendwo zusammen. Sie können sich am Hintern ein Haar ausreißen, dann tränt das Auge." Dettmar Cramer Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Heiko Engel Moderator
Beiträge: 3239 Registriert: 11.06.2001 Herr, stärke mich in Geduld, aber ZACK ZACK!!
|
erstellt am: 27. Sep. 2006 21:03 <-- editieren / zitieren --> Unities abgeben:
Und nun mit der Option Smilies deaktivieren 1. ohne Code und 1. mit Code ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Einfuehrung der Variablen nomi-dia; pitch1 und TPI1 vom Typ string ;; da proposals nur vom Typ string sein koennen!!! ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (nomi-dia :title "Nenn-D." :value-type :string roposals '("6" "8" "10" "12") ) (pitch1 :title "Steigung" :value-type :string roposals '("1" "1.25" "1.5" "1.75") ) ("inch") (nomi-dia-inch :title "Nenn-D." :value-type :string roposals '("#12" "1/4" "3/8" "1" "1 1/2") ) (TPI1 :title "Steigung" :value-type :string :initial-value "" roposals '("28" "24" "20" "18" "14") ) ("-") (core-dia :title "Kern-D." :toggle-type :indicator-toggle-data :value-type ositive-length ) (profile :toggle-type :indicator-toggle-data :title "Gew.-art" :range (:BSW :BSF :BSP :UNC :UNF :NPT :M :MF :TR :S :R :E) ) (thread-type :title "Typ" :range ( :Aussen :Innen) ) (chamfer :title "vorh. Fase einbeziehen" :value-type :boolean :toggle-type :wide-toggle :initial-value T ) (thread-name :title "Name" :value-type :string :initial-value "" ) (a-dir-reverse :title "Umkehren" :value-type :boolean :toggle-type :wide-toggle :after-input (progn (dolist (a-fb t-feedbacks) (sd-end-point-feedback a-fb)) (setf axis (make-gpnt3d :x (* -1 (gpnt3d_x axis)) :y (* -1 (gpnt3d_y axis)) :z (* -1 (gpnt3d_z axis)))) (push ;; center of cylinder (sd-start-direction-feedback oint center :direction axis :disc t :color 0,0,1) t-feedbacks) );;progn
Code: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Einfuehrung der Variablen nomi-dia; pitch1 und TPI1 vom Typ string ;; da proposals nur vom Typ string sein koennen!!! ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (nomi-dia :title "Nenn-D." :value-type :string roposals '("6" "8" "10" "12") ) (pitch1 :title "Steigung" :value-type :string roposals '("1" "1.25" "1.5" "1.75") ) ("inch") (nomi-dia-inch :title "Nenn-D." :value-type :string roposals '("#12" "1/4" "3/8" "1" "1 1/2") ) (TPI1 :title "Steigung" :value-type :string :initial-value "" roposals '("28" "24" "20" "18" "14") ) ("-") (core-dia :title "Kern-D." :toggle-type :indicator-toggle-data :value-type ositive-length ) (profile :toggle-type :indicator-toggle-data :title "Gew.-art" :range (:BSW :BSF :BSP :UNC :UNF :NPT :M :MF :TR :S :R :E) ) (thread-type :title "Typ" :range ( :Aussen :Innen) ) (chamfer :title "vorh. Fase einbeziehen" :value-type :boolean :toggle-type :wide-toggle :initial-value T ) (thread-name :title "Name" :value-type :string :initial-value "" ) (a-dir-reverse :title "Umkehren" :value-type :boolean :toggle-type :wide-toggle :after-input (progn (dolist (a-fb t-feedbacks) (sd-end-point-feedback a-fb)) (setf axis (make-gpnt3d :x (* -1 (gpnt3d_x axis)) :y (* -1 (gpnt3d_y axis)) :z (* -1 (gpnt3d_z axis)))) (push ;; center of cylinder (sd-start-direction-feedback oint center :direction axis :disc t :color 0,0,1) t-feedbacks) );;progn
------------------ DIE inoffizielle Hilfeseite zum OneSpace Designer "Es hängt alles irgendwo zusammen. Sie können sich am Hintern ein Haar ausreißen, dann tränt das Auge." Dettmar Cramer Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Heiko Engel Moderator
Beiträge: 3239 Registriert: 11.06.2001 Herr, stärke mich in Geduld, aber ZACK ZACK!!
|
erstellt am: 27. Sep. 2006 21:04 <-- editieren / zitieren --> Unities abgeben:
|
| SPS Techniker Mechatronik (m/w/d) | Technologien auf das nächste Level zu heben, sich Herausforderungen zu stellen und an den Innovationen von morgen zu arbeiten - dafür benötigen wir bei FERCHAU SPS Techniker:innen Mechatronik wie dich: als ambitionierte Kolleg:innen, die wie wir Technologien auf die nächste Stufe bringen möchten. Wir realisieren spannende Projekte für namhafte Kunden in den Technologiebereichen Elektro- und Automatisierungstechnik und übernehmen Verantwortung für komplexe Entwicklungsprojekte.... | Anzeige ansehen | Mechatronik |
|
Heiko Engel Moderator
Beiträge: 3239 Registriert: 11.06.2001 Herr, stärke mich in Geduld, aber ZACK ZACK!!
|
erstellt am: 27. Sep. 2006 21:06 <-- editieren / zitieren --> Unities abgeben:
|