POV-Ray : Newsgroups : povray.general : $$$$$ MAKE MONEY FAST!!! $$$$$ Server Time
11 Aug 2024 05:19:13 EDT (-0400)
  $$$$$ MAKE MONEY FAST!!! $$$$$ (Message 1 to 8 of 8)  
From: Nieminen Juha
Subject: $$$$$ MAKE MONEY FAST!!! $$$$$
Date: 10 Sep 1999 09:36:50
Message: <37d90972@news.povray.org>
Do you want to earn easy money without risks and very fast?
  This is your lucky day! You can make any amount of money with this
sensational new method! No more hard work. No more risks spending your own
money. It's easy and fast!

  Just set the 'MoneyAmount' identifier to any number you want, and you will
earn that amount of money!

//------8<--------8<-----------8<----------8<-----------8<--------8<-----

#declare MoneyAmount=20;

#include "colors.inc"
#declare Coin=
  union
  { difference
    { cylinder
      { 0,y*.3,2
        pigment { Copper }
        normal
        { radial 1 slope_map { [0 <0,1>][.5 <1,0>][1 <0,-1>] }
          frequency 120
        }
        finish { specular .5 metallic reflection .1 }
      }
      cylinder { -y*.01,y*.05,1.9 }
      cylinder { y*.31,y*.25,1.9 }
    }
    union
    { difference
      { cylinder { <0,.2,.8><0,.35,.8>,1 }
        cylinder { <0,.2,.8><0,.36,.8>,.6 }
        box { <.001,.2,-.2><1,.36,.8> }
      }
      difference
      { cylinder { <0,.2,-.8><0,.35,-.8>,1 }
        cylinder { <0,.2,-.8><0,.36,-.8>,.6 }
        box { <0,.2,.2><-1,.36,-.8> }
      }
      scale <1,1,.8>
    }
    box { <-.08,.2,-1.7><.08,.35,1.7> translate -x*.25 }
    box { <-.08,.2,-1.7><.08,.35,1.7> translate x*.25 }
    pigment { Copper }
    normal { bumps .1 scale .1 }
    finish { specular .5 metallic reflection .1 }
    scale .5
  }

camera { location <0,1,-1>*(sqrt(MoneyAmount)*2+5) look_at 0 angle 35 }
light_source { <50,200,-100> 1 }
plane { y,0 pigment { granite scale 5 } }

#declare Loc=array[MoneyAmount]
#declare R=seed(0);
#declare Ind=0;
#while(Ind<MoneyAmount)
  #declare Dist=sqrt(Ind)*2;
  #declare Loc[Ind]=<rand(R)*Dist-Dist/2,0,rand(R)*Dist-Dist/2>;
  #declare Ind2=0;
  #while(Ind2<Ind)
    #declare cx=Loc[Ind2].x-Loc[Ind].x;
    #declare cz=Loc[Ind2].z-Loc[Ind].z;
    #if(cx*cx+cz*cz<4 & Loc[Ind2].y=Loc[Ind].y)
      #declare Loc[Ind]=Loc[Ind]+y*.15;
      #declare Ind2=0;
    #else
      #declare Ind2=Ind2+1;
    #end
  #end
  object { Coin rotate y*rand(R)*360 translate Loc[Ind] }
  #declare Ind=Ind+1;
#end

//------8<--------8<-----------8<----------8<-----------8<--------8<-----

-- 
main(i,_){for(_?--i,main(i+2,"FhhQHFIJD|FQTITFN]zRFHhhTBFHhhTBFysdB"[i]
):5;i&&_>1;printf("%s",_-70?_&1?"[]":" ":(_=0,"\n")),_/=2);} /*- Warp -*/


Post a reply to this message

From: Jerome M  BERGER
Subject: Re: $$$$$ MAKE MONEY FAST!!! $$$$$
Date: 10 Sep 1999 13:06:02
Message: <37D93A77.4E6EA605@enst.fr>
Nieminen Juha wrote:
> 
>   Do you want to earn easy money without risks and very fast?
>   This is your lucky day! You can make any amount of money with this
> sensational new method! No more hard work. No more risks spending your own
> money. It's easy and fast!
> 
>   Just set the 'MoneyAmount' identifier to any number you want, and you will
> earn that amount of money!
> 
	Aaargh I just got spammed from the povray newsgroups! :)

		Jerome

-- 
*******************************

* they'll tell you what can't * mailto:ber### [at] inamecom
* be done and why...          * http://www.enst.fr/~jberger
* Then do it.                 *
*******************************


Post a reply to this message

From: Mr  Art
Subject: Re: $$$$$ MAKE MONEY FAST!!! $$$$$
Date: 10 Sep 1999 15:55:49
Message: <37D96212.ADEF3C06@gci.net>
Didn't stay around to see the rest of the text?
Is a neat bit of code.

"Jerome M. BERGER" wrote:

> Nieminen Juha wrote:
> >
> >   Do you want to earn easy money without risks and very fast?
> >   This is your lucky day! You can make any amount of money with this
> > sensational new method! No more hard work. No more risks spending your own
> > money. It's easy and fast!
> >
> >   Just set the 'MoneyAmount' identifier to any number you want, and you will
> > earn that amount of money!
> >
>         Aaargh I just got spammed from the povray newsgroups! :)
>
>                 Jerome
>
> --
> *******************************

> * they'll tell you what can't * mailto:ber### [at] inamecom
> * be done and why...          * http://www.enst.fr/~jberger
> * Then do it.                 *
> *******************************


Post a reply to this message

From: Jerome M  BERGER
Subject: Re: $$$$$ MAKE MONEY FAST!!! $$$$$
Date: 10 Sep 1999 16:09:02
Message: <37D96563.8A280D4D@enst.fr>
"Mr. Art" wrote:
> 
> Didn't stay around to see the rest of the text?
> Is a neat bit of code.
> 
	Didn't notice the smiley? :)))) Of course I looked at the code and
tried it and I agree it's pretty neat.

		Jerome

-- 
*******************************

* they'll tell you what can't * mailto:ber### [at] inamecom
* be done and why...          * http://www.enst.fr/~jberger
* Then do it.                 *
*******************************


Post a reply to this message

From: plexiglass
Subject: LEARN THE SECRET OF INVISIBILITY!!!!
Date: 10 Sep 1999 16:35:55
Message: <37d96bab@news.povray.org>
Ever dreamed about all the things you could do IF YOU WERE INVISIBLE?! DREAM
NO MORE! Now, you too can possess the ancient secret of INVISIBILITY passed
down by Japanese PoV masters of the art of clouding men's minds (and
sky_spheres)! Simply add THESE WORDS

$$$$$ MAKE MONEY FAST!!! $$$$$

to the subject line of your news-group message and you will INSTANTLY
DISAPPEAR  from the ken of mortal man ("full power to filters, Lt. Chekov!")

%D %D %D


Post a reply to this message

From: Margus Ramst
Subject: Re: $$$$$ MAKE MONEY FAST!!! $$$$$
Date: 10 Sep 1999 21:51:53
Message: <37D9B59F.551CDC2F@peak.edu.ee>
Incredible! It works!
Dammit, I always thought such schemes were scams...
Oh, the missed possibilities :(

Margus

Nieminen Juha wrote:
> 
>   Do you want to earn easy money without risks and very fast?
>   This is your lucky day! You can make any amount of money with this
> sensational new method! No more hard work. No more risks spending your own
> money. It's easy and fast!
> 
>   Just set the 'MoneyAmount' identifier to any number you want, and you will
> earn that amount of money!
> 
> //------8<--------8<-----------8<----------8<-----------8<--------8<-----
> 
> #declare MoneyAmount=20;
> 
> #include "colors.inc"
> #declare Coin=
>   union
>   { difference
>     { cylinder
>       { 0,y*.3,2
>         pigment { Copper }
>         normal
>         { radial 1 slope_map { [0 <0,1>][.5 <1,0>][1 <0,-1>] }
>           frequency 120
>         }
>         finish { specular .5 metallic reflection .1 }
>       }
>       cylinder { -y*.01,y*.05,1.9 }
>       cylinder { y*.31,y*.25,1.9 }
>     }
>     union
>     { difference
>       { cylinder { <0,.2,.8><0,.35,.8>,1 }
>         cylinder { <0,.2,.8><0,.36,.8>,.6 }
>         box { <.001,.2,-.2><1,.36,.8> }
>       }
>       difference
>       { cylinder { <0,.2,-.8><0,.35,-.8>,1 }
>         cylinder { <0,.2,-.8><0,.36,-.8>,.6 }
>         box { <0,.2,.2><-1,.36,-.8> }
>       }
>       scale <1,1,.8>
>     }
>     box { <-.08,.2,-1.7><.08,.35,1.7> translate -x*.25 }
>     box { <-.08,.2,-1.7><.08,.35,1.7> translate x*.25 }
>     pigment { Copper }
>     normal { bumps .1 scale .1 }
>     finish { specular .5 metallic reflection .1 }
>     scale .5
>   }
> 
> camera { location <0,1,-1>*(sqrt(MoneyAmount)*2+5) look_at 0 angle 35 }
> light_source { <50,200,-100> 1 }
> plane { y,0 pigment { granite scale 5 } }
> 
> #declare Loc=array[MoneyAmount]
> #declare R=seed(0);
> #declare Ind=0;
> #while(Ind<MoneyAmount)
>   #declare Dist=sqrt(Ind)*2;
>   #declare Loc[Ind]=<rand(R)*Dist-Dist/2,0,rand(R)*Dist-Dist/2>;
>   #declare Ind2=0;
>   #while(Ind2<Ind)
>     #declare cx=Loc[Ind2].x-Loc[Ind].x;
>     #declare cz=Loc[Ind2].z-Loc[Ind].z;
>     #if(cx*cx+cz*cz<4 & Loc[Ind2].y=Loc[Ind].y)
>       #declare Loc[Ind]=Loc[Ind]+y*.15;
>       #declare Ind2=0;
>     #else
>       #declare Ind2=Ind2+1;
>     #end
>   #end
>   object { Coin rotate y*rand(R)*360 translate Loc[Ind] }
>   #declare Ind=Ind+1;
> #end
> 
> //------8<--------8<-----------8<----------8<-----------8<--------8<-----
> 
> --
> main(i,_){for(_?--i,main(i+2,"FhhQHFIJD|FQTITFN]zRFHhhTBFHhhTBFysdB"[i]
> ):5;i&&_>1;printf("%s",_-70?_&1?"[]":" ":(_=0,"\n")),_/=2);} /*- Warp -*/


Post a reply to this message

From: Mark Wagner
Subject: Re: $$$$$ A BETTER WAY TO MAKE MONEY FAST!!! $$$$$
Date: 11 Sep 1999 02:29:29
Message: <37d9f6c9@news.povray.org>
Nieminen Juha wrote in message <37d90972@news.povray.org>...
>  Do you want to earn easy money without risks and very fast?
>  This is your lucky day! You can make any amount of money with this
>sensational new method! No more hard work. No more risks spending your own
>money. It's easy and fast!
>
>  Just set the 'MoneyAmount' identifier to any number you want, and you
will
>earn that amount of money!
>

I have discovered a better way to make money:
-----------------------------------------------------------------


#declare MoneyAmount=20;

#include "colors.inc"
#declare Coin=
  union
  { difference
    { cylinder
      { 0,y*.3,2
        pigment { Copper }
        normal
        { radial 1 slope_map { [0 <0,1>][.5 <1,0>][1 <0,-1>] }
          frequency 120
        }
        finish { specular .5 metallic reflection .1 }
      }
      cylinder { -y*.01,y*.05,1.9 }
      cylinder { y*.31,y*.25,1.9 }
    }
    union
    { difference
      { cylinder { <0,.2,.8><0,.35,.8>,1 }
        cylinder { <0,.2,.8><0,.36,.8>,.6 }
        box { <.001,.2,-.2><1,.36,.8> }
      }
      difference
      { cylinder { <0,.2,-.8><0,.35,-.8>,1 }
        cylinder { <0,.2,-.8><0,.36,-.8>,.6 }
        box { <0,.2,.2><-1,.36,-.8> }
      }
      scale <1,1,.8>
    }
    box { <-.08,.2,-1.7><.08,.35,1.7> translate -x*.25 }
    box { <-.08,.2,-1.7><.08,.35,1.7> translate x*.25 }
    union{ /*MWW*/
//      cylinder{<-.8,-.05,.8>,<-.8,.1,.8>,.4}
//      cylinder{<.8,-.05,.8>,<.8,.1,.8>,.4}
      sphere{<-.8,.2,.8>,.4
clipped_by{ box{<-1.1,-.05,-1.1>,<-.5,.1,-.5>} } }
      sphere{<.8,.2,.8>,.4 clipped_by{ box{<1.1,-.05,1.1>,<.5,.1,.5>} } }
      difference{
        cylinder{y*-.05, y*.1, 1.5}
        cylinder{y*-.052, y*.12, 1.2}
        box{<-1.6,-.051,-.3>,<1.6,.11,1.6>}
      }
    }
    pigment { Copper }
    normal { bumps .2 scale .1 }
    finish { specular 1 roughness .002 metallic reflection .1 }
    scale .5

  }


/*MWW*/
#macro RandGauss(sd)
 ((rand(sd)+rand(sd)+rand(sd)+rand(sd))/4)
#end

camera { location <0,1,-1>*(sqrt(MoneyAmount)*2+5) look_at 0 angle 35 }
light_source { <50,200,-100> 1 }
plane { y,0 pigment { granite scale 5 } }

#declare Loc=array[MoneyAmount]
#declare R=seed(1);
#declare Ind=0;
#while(Ind<MoneyAmount)
  #declare Dist=RandGauss(R)*sqrt(Ind)*1.5;
  #declare Ang = rand(R)*pi*2; /*MWW*/
  #declare Loc[Ind] = <Dist*sin(Ang),0,Dist*cos(Ang)>; /*MWW*/
  #declare Ind2=0;
  #while(Ind2<Ind)
    #declare cx=Loc[Ind2].x-Loc[Ind].x;
    #declare cz=Loc[Ind2].z-Loc[Ind].z;
    #if(cx*cx+cz*cz<4 & Loc[Ind2].y=Loc[Ind].y)
      #declare Loc[Ind]=Loc[Ind]+y*.15;
      #declare Ind2=0;
    #else
      #declare Ind2=Ind2+1;
    #end
  #end
  object {
    Coin
    #if(rand(R) > .5)
      scale <1,-1,1>
      translate y*.15
    #end
    rotate y*rand(R)*360
    translate Loc[Ind]
  }
  #declare Ind=Ind+1;
#end

-----------
Mark


Post a reply to this message

From: Nieminen Juha
Subject: Re: $$$$$ A BETTER WAY TO MAKE MONEY FAST!!! $$$$$
Date: 13 Sep 1999 03:29:58
Message: <37dca7f6@news.povray.org>
Yes, the placement of the coins look a bit better this way.

-- 
main(i,_){for(_?--i,main(i+2,"FhhQHFIJD|FQTITFN]zRFHhhTBFHhhTBFysdB"[i]
):5;i&&_>1;printf("%s",_-70?_&1?"[]":" ":(_=0,"\n")),_/=2);} /*- Warp -*/


Post a reply to this message

Copyright 2003-2023 Persistence of Vision Raytracer Pty. Ltd.