from posts in text.scene-files - no lights in scene, just radiosity and
emitting media in the bolt.

--
"To stop children being afraid of the dark, try to fill their daylight hours
with as much terror as possible"
www.tomandlu.co.uk

Post a reply to this message

Attachments:
Download 'newboltcode2.jpg' (6 KB)

Preview of image 'newboltcode2.jpg'

> from posts in text.scene-files - no lights in scene, just radiosity and
> emitting media in the bolt.
Wow, couldn't you compress it a little bit more than this?

Nice image, btw :)

cu!
--
camera{location-z*3}#macro G(b,e)b+(e-b)*(C/50)#end#macro L(b,e,k,l)#local C=0
;#while(C<50)sphere{G(b,e),.1pigment{rgb G(k,l)}finish{ambient 1}}#local C=C+1
;#end#end L(y-x,y,x,x+y)L(y,-x-y,x+y,y)L(-x-y,-y,y,y+z)L(-y,y,y+z,x+y)L(0,x+y,
<.5,1,.5>,x)L(0,x-y,<.5,1,.5>,x)               // ZK http://www.povplace.be.tf

Post a reply to this message

"Zeger Knaepen" <zeg### [at] studentkuleuvenacbe> wrote :
>
> Wow, couldn't you compress it a little bit more than this?

    I agree, 8 kb is a bit much for a binary group. It took almost
0.00000238 hours to download.

Post a reply to this message

Bill DeWitt wrote in message <3af18bd5$1@news.povray.org>...
>
>"Zeger Knaepen" <zeg### [at] studentkuleuvenacbe> wrote :
>>
>> Wow, couldn't you compress it a little bit more than this?
>
>    I agree, 8 kb is a bit much for a binary group. It took almost
>0.00000238 hours to download.

enough already with the size of my uploads jokes...

Post a reply to this message

Very nice. Will you post the radiosity code as well. I don't know how to use
radiosity so this would be a help.

Nekar
--
#version unofficial MegaPov 0.7;#local Q=seed(7);#local S=<-2,2,5>;#local
E=<2
,-2,5>;#local B=S;#while(vlength(B-E)>.1)#local
B=(B+(<rand(Q),rand(Q),rand(Q)
>/20));#local B=B-(2*(B-S))*((vlength(B-E)>vlength(S-E)));#local
S=B;glow{//NX
location S size.1 radius.07}glow{location S size.1 radius.07 rotate
z*90}#end

Post a reply to this message

"Nekar Xenos" <j-p### [at] citywalkcoza> wrote in message
news:<3af247e6@news.povray.org>...
> Very nice. Will you post the radiosity code as well. I don't know how to
use
> radiosity so this would be a help.
>

Well, here the scene - I'm not sure if my radiosity settings are "correct" -
the brightness setting seems anti-intuitive. (and don't forget to render
with +qr)

#version unofficial MegaPov 0.6;
#declare doRad = true;
#if(doRad)
global_settings
{
  assumed_gamma 1.0
  ambient_light 0
  radiosity{
    pretrace_start 0.08
    pretrace_end 0.02
    count 150
    nearest_count 5
    recursion_limit 4
    error_bound 1
    low_error_factor .5
    gray_threshold 0.0
    minimum_reuse 0.015
    brightness 50
    media on
  }
}
#end

#include "colors.inc"
camera{location  <0, 0.5, -10.0> look_at   <2, 1.2,  0.0>}
sphere{0, 4.75 pigment{bozo scale 0.1 color_map {[0.0 color rgb <0.1, 0.2,
0.3>*.25] [1.0 color rgb <0.11, 0.3,0.4>*.25]}} scale<100,1,100> inverse
finish{ambient 1}}
plane { y, -1 pigment{ color rgb <0.7, 0.5, 0.3> }normal{bumps scale 3 }}
plane { y, 0 pigment{bozo color_map{[0.0 color rgbt <0,0,0,1>][1.0 color
rgbt <0.11, 0.3, 0.4,0>]} scale 0.1}normal{bumps scale<1,1,10>} rotate x*180
translate y*10}
fog{distance 50 color rgb 0}

#macro Make_Bolt(LArraySize, LSeed, LWidth, LHeight, LSpread, LBranch,
LCutoff, LSpike)
  #declare myArray = array[LArraySize]
  #declare checkCount = -1;
  #declare highCount = 0;
  #declare arrayCount = 0;
  #declare myArray[arrayCount] = <0,0,0>;
  #declare myRand = seed(LSeed);
  #declare Lightning_Bolt =
    merge{
    #while (checkCount < highCount)
      #declare checkCount = checkCount + 1;
      #declare segPosA = myArray[arrayCount];
      #declare arrayCount = arrayCount + 1;
      #declare xPlus = (rand(myRand)-0.5)*LSpread;
      #declare zPlus = (rand(myRand)-0.5)*LSpread;
      #while(segPosA.y < LHeight)
        #declare xShift = segPosA.x + ((rand(myRand)-0.5)*LSpike) + xPlus;
        #declare yShift = segPosA.y + (rand(myRand)/5);
        #declare zShift = segPosA.z + ((rand(myRand)-0.5)*LSpike) + zPlus;
        #if (yShift > LHeight)
          #declare yShift = LHeight;
        #end
        #declare segPosB = <xShift, yShift, zShift>;
        cylinder{segPosA, segPosB, LWidth}
        #declare segPosA = segPosB;
        #declare randNum = rand(myRand);
        #if (randNum < LBranch & segPosA.y > LCutoff)
          #declare highCount = highCount + 1;
          #declare myArray[highCount] = segPosA;
        #end
        #declare LWidth = (LWidth*0.995)   ;
      #end
      #declare LWidth = (LWidth*0.9)   ;
    #end
  }
#end

Make_Bolt(500, 11211, 0.03, 6, 0.003, 0.05, 0.5, 0.2)
object{
  Lightning_Bolt
  pigment{rgbt 1}
  interior{media{emission<3,3,5>*5}}
  hollow
  rotate x*180
  no_shadow
  translate y*5
}

Post a reply to this message

Zeger Knaepen wrote in message <3af18ae8@news.povray.org>...
>> from posts in text.scene-files - no lights in scene, just radiosity and
>> emitting media in the bolt.
>Wow, couldn't you compress it a little bit more than this?


I managed to get it down to 10KB with no significant loss of quality ;-)

--
Mark

Post a reply to this message