Print Page | Close Window

Water Tempertatures

Printed From: CAD Forum
Category: EN
Forum Name: 3ds Max, Maya
Forum Description: Discussion about Autodesk rendering and multimedia software, Max, Maya, Softimage
URL: https://www.cadforum.cz/forum_en/forum_posts.asp?TID=5303
Printed Date: 22.Apr.2026 at 06:13


Topic: Water Tempertatures
Posted By: Jkirch
Subject: Water Tempertatures
Date Posted: 12.Feb.2011 at 06:15
Hi, 

I'm working on a project using Realflow and 3Ds max and I need some help.

I am trying to show the temperature change of water through a treatment pond.

The water coming in the inlet is hot and as it exits it is cooler.

It would be great if I could show the hot water as red then transition to blue as the water cools. 

Is there any way to show this with Realflow and 3ds max or some way to make the particles change color over time?

Thanks for all the help.


Replies:
Posted By: derockere
Date Posted: 09.Mar.2011 at 19:36
The indication for cold or hot water needs of different segments are connected.
The line items labeled as "GROUP" consecutive numbers.
It is possible to work with a lisp-routine.
 
;;This lisp change the color of a group, this group have numbers
;;Is only type st as command!!
(defun c:st (/ getbestand nummer bestand read1 lijst wie waar)
 (setq getbestand (getstring "\nName of text file plus extension..."))
 (setq nummer 1)
 (repeat 10
  (setq nummer (+ nummer 1))
  (setq bestand (findfile getbestand))
  (if (null bestand)
   (print "File not found....")
   (progn
    (setq bestand (open getbestand "r"))
    (setq read1 (read-line bestand))
    (if (null read1)
     (print "File has no content...")
     (while read1
      (setq lijst (read (strcat "(" read1 ")")))
      (if (= (car lijst) nummer)
       (setq read1 nil)
       (progn
        (setq read1 (read-line bestand))
        (setq lijst nil)
       )
      )
     )
    )
    (close bestand)
    (if (null lijst)
     (print "File this value has not...")
     (progn
      (setq gr-r (cadr list))
      (command "change" "g" gr-r "" "p" "ltscale" "0.01" "")
      (command "change" "g" gr-r "" "p" "la" "kabelbanen" "")
     )
    )
   )
  )
 )
)
Note: "kabelbanen" = the name of a layer!! Thus, you should change the name
         "bestand"     = file
         "nummer"      = number


-------------
Better well ask, then signed too.

Posted By: Cad64
Date Posted: 09.Mar.2011 at 21:24
You can't run lisp routines in 3DS Max.

-------------
Online Portfolio: http://www.rdeweese.com/" rel="nofollow - http://www.rdeweese.com/

Posted By: derockere
Date Posted: 10.Mar.2011 at 07:40
Sorry!!!

-------------
Better well ask, then signed too.


Print Page | Close Window