Mi nuevo script: crear camino para vehículos

[Miguel-Arte-3D-1990]

Hola a todos, estoy tratando de hacer un camino para vehículos. Pero, no encuentro la manera como activar los splineops. Startattach y splineops. Attachmultiple. Ok.

La idea de este script va creando líneas en 100 en 100 por ejemplo.

Cuando le doy click al botón crear Dist, su primer línea aparece su distancia a 100 y.

Luego le pongo 200 y aparase el siguiente línea a partir del 100 hasta 200 y a si sucesivamente.

Y espero su ayuda como activar splineops. Startattach o splineops, attachmultiple para crear una sola línea.

Etc. Y luego estaré explicando sobre este nuevo script : crear camino para vehículos. Ok-d. Saludos a todos y espero su ayuda gracias. -.d.

Les dejo este ut b.

Rollout pru crear camino.

Groupbox a pos:[10,10] width:180 height:145 tspinner Dist distancia range:[0,999,100] pos:[32,32] tbutton crd crear ton crd pressed do t(t p1 = point () p2 = point () p1.name = p1 p2.name = p2 t p1 = $p1 p2 = $p2 -p1, pues = [0,0,0] p2, pues = [dist, value,0,0] t PA = point() pa, cross = of pa, box = on pa, name = a t pb = point() pb, cross = of pb, box = on pb, name = b t pa, pivot = p1.pos alignobject PA centerobject PA t pb, pivot = p2.pos alignobject pb centerobject pb t pc = point() PC, name = c PC, pues = [dist, value,0,0] t Fn lineaentredospuntos pointa pointb =
(tlinea = splineshape pos: pointa taddnewspline línea taddknot línea 1 #corner #line pointa taddknot línea 1 #corner #line pointb tupdateshape línea tlinea).

Linea = lineaentredospuntos pa, pues pb, pos.

P1.pivot = PC, pos.

Alignobject p1.

Centerobject p1).
).

Createdialog pru 200 400.

[Miguel-Arte-3D-1990]

Les dejo este Rollout Attach_splines() -.

Rollout por fín OK ^.^d -.
(.

Button por fín por fin --- descubrí que era con Attach_splines() -.
---- pero, toda vía no está funcionando correctamente según yo-.
---- era a si como lo ven este Rollout Attach_Splines() ok-.

On por fín pressed do.
(tSelect $Shape*.

SetWaitCursor().

Try (.

If selection, count > 1 then attach_splines()else \.
(sel = selection[1]; if sel, category.= #shape then converttosplineshape sel).

Create_vertex_array().

Closest_vertex().

Check_vértices().

Fuse_vértices().
) catch (enableSceneRedraw(); redrawViews()).
).
).

CreateDialog por fín ---- --.

OK, espero que uno de ustedes, sabrán como activar el Attach_splines().

La verdad no eh podido activar el Attach_splines correcta mente, y espero su ayuda gracias. Saludos de Chapolín.-.

[Miguel-Arte-3D-1990]

Hola a todos por fin me salió como crear un camino.

Pero, ahora me falta juntar todas las líneas.

Para poder crear una animación del vehículo.

Bueno les dejo esta imagen demuestra, y.

Espero su ayuda como activar Attach_splines(), más sencillo.

Bueno seguiré explicando sobre este script. Saludos de Chapolín.

-- IMÁGENES ADJUNTAS --

[javierXgamer]

Muy chulo, no me he parado ha repasar el código, pero viendo la imagen me pregunto una cosa se pueden hacer recorridos con curvas suavizadas o solo hay líneas rectasí.

Otra cosa tienes pinta de entender mucho de 3ds Max, podrías pasarte por mi hilo y resolverme la duda qué tengo? El hilo es el siguiente: http://www.foro3d.com/f16/3ds-max-3d...tml#post885594.

[Miguel-Arte-3D-1990]

Hola javierXgamer.

Claro que sí se puede hacer curvas, por medio de los Splines.

Lo primero lo que hago es copiar líneas y luego me voy al primer.

Linea line001 y su contenido de la línea tiene un botón que dice Attach y.

Luego mencionar a cada una de las líneas.

Hasta terminar adjuntar todas las líneas.

Y luego seleccionar todos los vértices.

Y te vas al botón weld que contiene la Line001 y le aumentas el valor.

Necesario para qué todo los vértices se pegan.

Ya qué tienes todos los vértices pegados, ahora.

Te vas al botón que contiene la line001 que dice Fillet y.

Le aumentas el valor necesario para darle las curvas necesarias etc.

Ok Saludos de Chapolín,.-.

-- IMÁGENES ADJUNTAS --

[Miguel-Arte-3D-1990]

Hola tengo otro experimento ^.^d.

Les dejo este ut.

Rollout pru.
(.

Button cr ton cr pressed do t(t sp = splineshape() t addnewSpline sp t addknot sp 1 #corner #curve [0,0,0] t addknot sp 1 #corner #curve [10,0,0] t addknot sp 1 #corner #curve [10,10,0] t upDateShape sp t select sp t subobjectlevel = 1 t setknotSelection $ 1 #(2,2) t $Shape001.fillet = 10 t).
).

Createdialog pru --- alguien sabe cómo activar el Fillet --.

Trato de hacer curvas, pero no me sale y espero su ayuda gracias.

Le dejo una imagen de muestra ok ^.^9.

-- IMÁGENES ADJUNTAS --

[Miguel-Arte-3D-1990]

Hola a todos y gracias que está bien chulo este script.

Bueno seguiré hablando de este nuevo script.

Este script lo estoy creando para complementar el script CTRLs de Carros.

Los voy a juntar los 2 script para qué quede un solo concepto para seguir.

Mejorando mi script CTRls de Carros y creando caminos para Vehículos.

O más adelante servirá para vehículos de barcos, aviones, helicópteros, motos.

Personajes, animales y muchas cosa más.

Ok lo más importante es aprender hacer script y sacar nuevas ideas.

Y a lo mejor estará terminado en plugins.

Bueno, por ahora a qué seguir batallando y disfrutar los programas.

Maravillosos en 3D, ah otra cosa este script crear Camino para vehículos.

Lo voy a dejar tal como está en proceso y seguir haciendo manualmente, me refiero a.

Los opciones splinesops. StartAttach, splinesops. AttachMultiple.

Splinesops.weld, splinesops. Startfillet. Por medio de Shapes, yo sé que si se puede.

En una manera para llamarlos en un script, la idea es, no estar manejando manualmente.

Si no que quede todo en un script. OK Saludos de Chapolín.

Y luego estaré adornando con Iconos para qué sea un script bien chulo y gracias. ^.^9.

[Miguel-Arte-3D-1990]

Hola chicos, les dejo otro avance de este Script.

Si alguien de ustedes, pueden resolver este scritpt.

Vaya se los agradezco mucho.

Les dejo este Código.

Rollout pru Crear Camino.
( tgroup Crear 1 punto de referencia t(tbutton cr Finializar ton cr pressed do t(t extra0 = point () t extra0.box = of t extra0.cross = on t extra0.name = extra0 t Select extra0 t .
-- extra00 = point ().
-- extra00.pues = [20,20,0].
-- extra00.box = of.
-- extra00.cross = on.
-- extra00.name = extra00 t t).
) tgroup Crear nombre p1 Ad p2 De p3 Iz t(t label m Seleccinar el punto creado pos:[60,80] t label a p1 pos:[12,100] t label v p2 pos:[54,100] tedittext newname width:32 pos:[22,72] tbutton cr1 pos:[30,100] ton cr1 pressed do t(t $.name = newname, text t cr1.text = p1 t ---$.pues = [0,0,0] t) tbutton cr2 Pos:[72,100] ton cr2 pressed do t(t $.name = newname, text t cr2.text = p2 t).
).

Label de p3 pos:[100,100] tbutton cr3 Pos:[120,100] ton cr3 pressed do t(t $.name = newname, text t cr3.text = p3 t).

Group.
(tspinner dist Dist Ad range:[0,999,100] width:100 pos:[62,150] tbutton crad Crear p1 Ad ton crad pressed do t(t p1 = $p1 t p2 = point() t p2.name = p2 t p2.pues = [dist, value,0,0] t Select p2 t t pa = point() t pa, cross = of t pa, box = on t pa, name = a t t pb = point() t pb, cross = of t pb, box = on t pb, name = b t t pa, pivot = p1.pos t alignobject pa t centerobject pa t t pb, pivot = p2.pos t alignobject pb t centerobject pb t t pc = point() t pc, name = c t pc, pues = [dist, value,0,0] t Fn LineaEntreDosPuntos pointA pointB =.
(tlinea = SplineShape pos: pointA taddNewSpline línea taddknot línea 1 #corner #line pointA taddknot línea 1 #corner #line pointB tupDateShape línea tlinea.
).

Linea = LineaEntreDosPuntos pa, pues pb, pos.

P1.pivot = PC, pos.

Alignobject p1.

Centerobject p1.
).
).

Group.
(tspinner dista Dist De range:[0,999,100] tbutton crde Crear p1 De ton crde pressed do t(t p1 = $p2 t p3 = point() t p3.name = p3 t p3.pues = [dist, value,-dista, value,0] t Select p3 t t pa = point() t pa, cross = of t pa, box = on t pa, name = a1 t t pb = point() t pb, cross = of t pb, box = on t pb, name = b1 t t pa, pivot = p1.pos t alignobject pa t centerobject pa t pb, pivot = p3.pos t alignobject pb t centerobject pb t t pc = point() t pc, name = c1 t pc, pues = [dist, value,-dist, value,0] t t Fn LineaEntreDosPuntos pointA pointB =.
(tlinea = SplineShape pos: pointA taddNewSpline línea taddknot línea 1 #corner #line pointA taddknot línea 1 #corner #line pointB tupDateShape línea tlinea.
).

Linea = LineaEntreDosPuntos pa, pues pb, pos.

P1.pivot = PC, pos.

Alignobject p1.

Centerobject p1.
).
).

Group.
(.

Spinner distb range:[0,999,200].

Button c ton c pressed do t(t p1 = $p3 t p4 = point() t p4.name = p4 t p4.pues = [distb, value,-dista, value,0] t Select p4 t t t pa = point() t pa, cross = of t pa, box = on t pa, name = a2 t t t pb = point() t pb, cross = of t pb, box = on t pb, name = b2 t).
).
).

Createdialog pru 200 400 --- un Saludo de Chapolín.^d.

Estos Códigos que estado subiendo son avances como fue creando este script hasta llegar.

Arriba qué dice : Hola a todos por fin me salió como crear un camino,.

Y les dejo 2 Códigos más ahora en Archivo, ms ok.^d, vvque.

-- IMÁGENES ADJUNTAS --

[Miguel-Arte-3D-1990]

Hola a todos, les hablo para decirles, que ya tengo por terminar este script, pero, ahora lo estoy creando en otra manera, en lugar que viaje el vehículo
sobre una línea, ahora, se va a crear una carretera.

Para qué mi script Crear CTRLs de Carros, viaje en una carretera ya creada, a si podre manejar un vehículo perfecto, si alguien de ustedes podrán modificar
estos códigos que eh estado experimentando wow se los agradezco mucho.

Ah otra cosa nunca se sabe para cuando se termina un script, hay tantas ideas que se puede lograr hacer con los script, pero, mi mensaje se caduco donde tengo mi Script Crear CTRL Lider, también estoy
experimentando como crear CTRLs de Liders en otra manera de utilizarlo, por ejemplo, hacer que camine un personaje, que brinque, o que salte, o que camine en escaleras etc.
Este CTRL Lider se está basando en el famoso crash Bandicot.
Bueno, seguiré hablando de mis 5 script, que estado creando durante estos meses y mi etiqueta es 3DS Max 5 hasta 3dsmax12, bueno estos scripts se maneja en cualquier
versión de 3dsmax. No sé cómo le hacen para qué sus script sean exclusivo para esa versión de 3dsmax, Bueno hay que seguir disfrutando y seguir con estos 5 pasos que me a ayudado para hacer el siguiente script es Crear Carreteras para vehículos seria no 6 etc, OK Saludos de Chapolín ^.^d.

A qui mismo lo verán. ^.^d.

[Miguel-Arte-3D-1990]

Hola a todos, gracias por fin encontré que buscaba era este --- render_renderable = on -.

Para qué pudiera hacer imágenes. Y el render_displayRenderMesh:on es.

Para poligonar los Shape Les dejo este Código vvque.

Mi_fin1 = circle name:CTRL_Lider radius:2 thickness:0.5 sides:3 render_displayRenderMesh:on.

Mi_fin1.renderable = on.

Mi_fin, render_renderable = on --- b^,^d.

Render mi_fin1 --- Ahora si un gran Saludo de Chapolín vvque.

-- IMÁGENES ADJUNTAS --

[Miguel-Arte-3D-1990]

Hola a todos, por fin les dejo otra opción, ahora es crear carretera.

Les dejo nuevas imágenes, como va quedando la carretera.

Nunca se sabe para cuando se termina un script.

Hay tantas ideas que nos viene en la mente wow vvque. Saludos de Chapolín.-.

-- IMÁGENES ADJUNTAS --

[Miguel-Arte-3D-1990]

Hola a todos, por fin mi primer vídeo. Les dejo este vídeo, para que lo vean más chulo. Como se va creando una carretera y espero su opinión ok. Saludos de Chapolín.

A una duda ¿cómo podre hacer un vídeo?
Para que lo vean a qui mismo, b.

-- IMÁGENES ADJUNTAS --

[Miguel-Arte-3D-1990]

Tutorial Script : como crear una carretera ^.^d 2013.

Espero que lo vean a qui mismo en este foro3d.

Y espero su opinión, vque Gracias.

Pero tengo una duda qué formato de vídeo
es para qué se vea a qui en este foro3d. Saludos.

[ciberspace]

Pero tengo una duda qué formato de vídeo
es para qué se vea a qui en este foro3d. Saludos.

[Miguel-Arte-3D-1990]

Whuao, me alegro mucho, ver a qui mismo, mi vídeo.

En este Foro3d Whuao. Gracias.ciberspace.-.

[Miguel-Arte-3D-1990]

Hola, amigo, a todos, les hablo para seguir hablando
sobre este script.

Bueno, ahora trato de hacer una modificación, sobre este script, la idea es, en lugar de seguir poniendo 100 y luego poner 200 a si sucesivamente, para estar creando una línea en la posición X. Ahora, la idea es, cuando yo quiera seguir clonando, que me respete, donde se quedó la copia, y seguir clonando.

Bueno, espero su ayuda, y en estos momentos estoy viendo sobre el comando Array, no sé si en verdad, con este Array, me sirva de ayuda, lo que quiero hacer ahora con este script. Saludos de Chapolín,.

Les dejo este ejemplo : Código --- ahora en changed -.

Rollout pru Clonar Objetos
(
spinner dist dist range:[-100,9999,0]
spinner x Clon range:[-100,9999,0]
---button crear
on x changed val do
(
for i in 1 to x.value do
(
point pos:[i*dist, value,0,0]
)
)
)
CreateDialog pru 200 200 --- no sé cómo, podre asignar, un array, en este código --- :3.

[Miguel-Arte-3D-1990]

Hola, nueva mente, encontré lo que yo quería.

Era que, que continuara la clonación.

A partir de dónde se quedó la clonación sin (Array). Okey.

Ahí vamos bien, pero, lo que veo, sigue siendo el mismo procedimiento.

En lugar de estar poniendo 100 y luego 200 a si sucesivamente.

Lo está haciendo con spinner clout Clon.

Ahora, la idea qué fuera por medio de un botton count, me refería, en lugar de un spinner count.

A si sería genial, de un solo button, para seguir clonando objetos.

Bueno, estaré investigando, la manera qué yo esperaba, por clonar, en un solo button.

Y pues a seguir luchando, y aprendiendo hacer script.
--- Si alguien de ustedes, podrán encontrar la manera, que yo esperaba.
--- que fuera por un solo botón Whuao sería genial etc. --- vque.
--- A qui tienen un pequeño ejemplo -.

Código:
Rollout pru.
(tlocal obj = #() tspinner count type:#integer range:[1,100,10] tspinner growth range:[1,100,10] tbutton cr tbutton del ton cr pressed do t obj = for i in 1 to count, value collect t point pos:[i*growth, value,0,0] wircolor:black t t t on del pressed do deleete obj t t on growth changed val do t t for i in 1 to obj, count do t (t obj[i].pues = [i*val,0,0] t ) t on count changed val do t (t deleete obj t cr, pressed() t ).
).

Createdialog pru --- Saludos de Chapolín.-.

[Miguel-Arte-3D-1990]

Hola, nueva mente, les dejo otro ejemplo, lo que yo esperaba, hace tiempo, con este
experimento, por fin, hay mil maneras de hacer
las cosas, y algo más sencillo, lo que yo esperaba, lograr el mismo objetivo.
nunca se sabe hasta dónde puede lograr, hacer las
cosa tan sencillas, que uno se imagina, pero, gracias a eso, me hace pensar, encontrar la lógica, para poder hacerlo más sencillo, y lograr, hacer el mismo ejemplo.
A demás eh visto formulas muy complicadas, pero, sigue siendo lo mismo.

Les dejo esta página scriptspot, com ahí encontraras el famoso Arrytol.

Bueno, les dejo este Código tan sencillo, como yo lo esperaba.

Rollout pru Clonar Objetos
(
spinner dist dist range:[-100,9999,0]
spinner x Clon range:[-100,9999,0].

On x changed val do
(
Delete $* --- Tan sencillo, como yo lo esperaba, ---
--- lo tenía en mis narises, lo que logre ---
--- hacerlo. ----
--- Estuve experimentando, ---
--- hace tiempo, de tratar de lograr, ---
--- como crear un camino en forma en líneas, ---
--- para que, para qué cualquier vehículo, ---
--- siguiera la línea, bueno, ahora lo cambie por crear ---
--- una Carretera,.- ---
--- Entonces, todo los ejemplos que hecho, sigue ---
--- siendo lo mismo, ahora con más sencillo que hice ---
--- le agregue un Delete $* y listo ---
--- esperemos encontrar, ahora con un solo butón, --- para que, para qué siga clonando objetos, --- en lugar de en un, spinner count . Saludos -.^d ---
for i in 1 to x.value do
(
point pos:[i*dist, value,0,0] wirecolor:white
)
)
on dist changed val do
(
$*.pos=[dist, value,0,0]
)
)
CreateDialog pru 200 200 --- por Chapolín -.

Y espero su opinión o ideas, si hay, más, maneras de
hacerlo, en estos experimentos, que eh estado haciendo.

Y mil gracias. Saludos de Chapolín ^.d.

[Miguel-Arte-3D-1990]

Hola, chicos, va de nuez, acabo de poner un butón, --- button cr ---
--- on cr pressed do ---
(
) --- etc.
Pero, todo sigue igual, toda vía no, clona al siguiente número.

A que me refiero, cuando deje de clonar, y quiero seguir clonando, pero, que empiece
a partir del número 5, y que no clone desde cero.
quiere decir, que todo esto sigue copiando desde el cero.

Ejemplo :
cuando le doy la dist:100
cuando le doy clon:5
lo que hace este scirpt, tiene un pequeño truco, que te hace parecer, que estas clonado, desde el 5 y luego el 6, a si sucesivamente, pero no, lo está haciendo, che calo bien, donde está el truco, el truco está en el (Delete $*).

Y listo la ilusión óptica. Bueno espero su ayuda y mil gracias. Saludos de Chapolín.-.

[Miguel-Arte-3D-1990]

Hola chicos, les dejo otra demostración con imágenes.

Y sigue la ilusión óptica. :o vque. Saludos de Chapolín vque.

-- IMÁGENES ADJUNTAS --

[Miguel-Arte-3D-1990]

Hola, les dejo otro ejemplo como está quedando el camino. Saludos.-.

-- IMÁGENES ADJUNTAS --

[Miguel-Arte-3D-1990]

Hola, Mortal Kombat a todos, ya casi les tengo este script.

Ya lo verán con arreglos, y muchas cosas más, bueno, en esta semana, estaré subiendo nuevas imágenes, sobre este script Crear Camino para vehículos.

Ahora mucho mejor, que vieron, mi vídeo tutorial, script Crear Camino para vehículos.

Muy pronto lo verán y gracias a 3Dpoder, por traer nuevos enlaces de 3dsmax. Gracias b^,^d. Saludos a todos de Chapolín .

[Miguel-Arte-3D-1990]

Hola, colegas, gracias por visitarme a este estema se ve interesante verdad que sí, bueno, espero terminarlo, muy pronto.

Y gracias por ser más grande que la vida .

[Miguel-Arte-3D-1990]

Hola, amigo, madrugados, bueno les dejo un pequeño avance, de este tema .

Bueno, por mientras lo voy a seguir haciendo las líneas en polígonos, porque toda vía no sé cómo aplicarle con texturas de carretera, pues la verdad si que cuesta mucho trabajo ok, y que la pasen bonito este 24 de dic 2014 ok,.

Y espero que no se me caduquen estos temas, porque hay mucho que hacer ok,.-.

-- IMÁGENES ADJUNTAS --

[Miguel-Arte-3D-1990]

Hola, Mortal Kombat colegas, gracias por estar en mis temas.-
Y les dejo otra demostración ahora en Plugins.

Bueno, seguiré batallando con max, y estaré haciendo en 2 formas en script o en plugins, y a ver qué tal funcionan, eso espero ok,.

Y esperó que no se me caduquen mis temas anteriores, porque razón, porque sigo trabajando, en ellos, nunca se sabe para cuando se termina un script, un macroscript, o en un plugins.

Y el nuevo tema : crear caracteres y modelado sigue en marcha, estoy experimentando haciendo un bipero en forma de guide, para tratar de hacer una animación de un perrito cúbico que estado
hablando durante estos años, y espero en este año nuevo 2015, ya estaré subiendo vídeos en los 2 temas de crear Camino para vehículos y crear caracteres y modelado.
ah por cierto, también estoy dando unos pequeños arreglos de Crear CTRLs de Carros, Ok, muchas gracias por estar en mí temas .

Y Feliz Navidad a todos, y prospero año nuevo 2015 -.^d.

-- IMÁGENES ADJUNTAS --

[Miguel-Arte-3D-1990]

Hola, colegas les dejo otra demostración, ahora está creado en plugin.

Ok, b^, y prospero año nuevo 2015 .

-- IMÁGENES ADJUNTAS --

[Miguel-Arte-3D-1990]

Hola, les dejo más demostraciones de cómo está quedando este tema . Saludos, a todos.-.

-- IMÁGENES ADJUNTAS --

[Miguel-Arte-3D-1990]

Hol, Mortal Kombat, tengo una duda ¿Cómo podre tener varias funciones en un plugins?
como ejemplo : standard Primitives.

Espero su ayuda.

-- IMÁGENES ADJUNTAS --