More Light! More Light! :: Howto turn a disposable camera into a projector

{ 2006 02 21 }

Howto turn a disposable camera into a projector

FLASHPOINT
This is a great way to turn trash into something useful. Would be great to make a couple of these with faces for a party and just leave them running.
Note to self-turn Sol onto this.

Tags:

Post a Comment

Bad Behavior has blocked 206 access attempts in the last 7 days.

startshape scale

rule scale{
  SEED1 { s .03 y -1}
}
 
rule SEED1 {
 SQUARE{}
 SEED1 {y 1.2 s 0.99 rotate 1.5 brightness 0.03}
}
 
rule SEED1 0.05 {SEED1 {flip 90}}
 
rule SEED1 0.05 {
 SQUARE{}
 SEED1 {y 1.2 s 0.99 r 1.5 b -0.5 flip 90}
 SEED1 {y 1.2 x 1.2 s 0.6 r -60 b -0.5}
 SEED1 {y 1.2 x -1.2 s 0.5 r 60 b -0.5 flip 90}
}

startshape c

rule c{
  CIRCLE{ s 3 }
  c{ s .5 b .5 r 10 x 1}
}

rule c{
  c { s .5}
  c { s .5 flip 100 }
}

startshape scale

rule scale{ 
	SPIKES{ s .03 }
}

rule SPIKES {
	SPIKE {}
	SPIKE { r 90 }
	SPIKE { r 180 }
	SPIKE { r 270 }
}

rule SPIKE {
	LSPIKE {}
}
rule SPIKE {
	LSPIKE { flip 90 }
}

rule LSPIKE {
	SQUARE {}
	LSPIKE { y 0.98 s 0.99 r 1}
}
rule LSPIKE 0.005 {
	SPIKE { r 90 }
	SPIKE { r -90 }
	LSPIKE { y 0.98 s 0.99  r 1}
}

  startshape scale
  background { hue 400 sat 0.2 b -1 }

  rule MOUSECLICK{ START{ s .001 } }
  rule MOUSECLICK{ START{ s .005 } }  
  rule MOUSECLICK{ START{ s .01 } }
  rule MOUSECLICK{ START{ s .003 r 5} }

  rule scale{
    START{ s .01 }
	START{ s .01 }
	START{ s .02 r 5}
  }

  rule START {
      SCENE { h 900 sat 1 b .5 }
      FUXIA {h 400 sat 1 b .5}
      START {y 100 r 90  s 0.29}
  }

  rule FUXIA{
      CIRCLE { s 10 x -10  }
      CIRCLE { x 50 s 5  }
      CIRCLE { x 15 y 15  size 5 }
      FUXIA {y 50 r 88  s 0.59 alpha -0.15}
  }
  rule FUXIA 0.45 {
      FUXIA{flip -50}
      FUXIA {flip -10}
  }
  rule SCENE {
      CIRCLE {  size 20 }
      CIRCLE {  size 30 alpha -0.7 }
      CIRCLE {  size 40 alpha -0.7 }
      FLOW { }
      FLOW { }
      FLOW { flip -50 }
      FLOW { flip -50 }
      FLOW { flip -10 }
      FLOW { flip -10 }
  }
  rule FLOW 0.008 {
      SQUARE { }
      CIRCLE { s 5 alpha -0.7 }
      FLOW { x 1 s 0.995 r 2}
  }
  rule FLOW 0.0001 {
      FLOW { flip 2 }
  }

startshape D

rule D
{
  C {r 15}
  C {r 45}
}

rule C
{
  B {}
  B {f -90}
}

rule B
{
  A {}
  A {r 60}
  A { r 120 }
  A { r 180 }
  A { r 240 }
  A { r 300 }
}

rule A
{
  CIRCLE {s 1 .0006}
  A {x .9 r 120.21 s .99 b .0005 }
}

startshape scale

rule scale{
	PLANT { s .08 y -1.2 }
}

rule PLANT {
	EITHER {x -2}
	EITHER {x 2}
}

rule BOTH {
	BL {rotate 30}
	BL {rotate -30 flip 90}
}

rule EITHER {BL{}}
rule EITHER {BL{flip 90}}

rule BL {
	CIRCLE {}
	WL {s 0.95 y 1.6}
}

rule WL {BL {rotate 3}}
rule WL {BL {rotate 4}}
rule WL {BL {rotate 5}}
rule WL {BL {rotate 6}}
rule WL {BL {rotate 7}}
rule WL {BL {rotate 3}}
rule WL {BL {rotate 4}}
rule WL {BL {rotate 5}}
rule WL {BL {rotate 6}}
rule WL {BL {rotate 7}}
rule WL {BOTH {}}
rule WL {BL {rotate -10 flip 90}}

  startshape start
  
  rule start {
	EDERA { s .007 y 1.2 x -2 } 
	EDERA { s .011 y 1.2 x 1 } 
	EDERA { s .006 y 1.2 x -1 } 
  }

  rule EDERA{
      CIGLIO {x 0}		CIRCLE { x 0 s 5 hue 200 sat 0.5}
      CIGLIO {x 5}		CIRCLE { x 5 s 5 hue 200 sat 0.5}
      CIGLIO {x 10}		CIRCLE { x 10 s 5 hue 200 sat 0.5}
      CIGLIO {x 15}		CIRCLE { x 15 s 5 hue 200 sat 0.5}
      CIGLIO {x 20}		CIRCLE { x 20 s 5 hue 200 sat 0.5}
      CIGLIO {x 25}		CIRCLE { x 25 s 5 hue 200 sat 0.5}
      CIGLIO {x 30}		CIRCLE { x 30 s 5 hue 200 sat 0.5}
      CIGLIO {x 35}		CIRCLE { x 35 s 5 hue 200 sat 0.5}
      CIGLIO {x 40}		CIRCLE { x 40 s 5 hue 200 sat 0.5}
      CIGLIO {x 45}		CIRCLE { x 45 s 5 hue 200 sat 0.5}
  }

  rule CIGLIO 100 {
      SQUARE	{hue 200 sat 0.5}
      CIGLIO		{y -1 s 0.998 b 0.005}
  }

  rule CIGLIO {
      SQUARE	{hue 200 sat 0.5}
      CIRCLE	{hue 200 sat 0.5 alpha -0.4 s 10 y -10 }
      CIGLIO		{y -1 r 1 s 0.998 b 0.005}
  }

  rule CIGLIO 0.0005 {
      SQUARE	{hue 200 sat 0.5}
      CIRCLE	{hue 200 sat 0.5 alpha -0.8 s -20 x 20 y -10 }
      CIGLIO		{y -1  s 0.998 b 0.005 }
  }

  rule CIGLIO {
      SQUARE	{hue 200 sat 0.5}
      CIRCLE	{hue 200 sat 0.5 alpha -0.4 s 5 y -10 }
      FIORE 		{}
   	FIORE		{ x -1 flip 90}
      CIGLIO		{y -1  s 0.998 b 0.005 }
  }

  rule FIORE {
     CIRCLE {hue 200 sat 0.5}
     FIORE {y -1 r 4 s 0.998 b 0.005}
  }

  rule FIORE 0.005 {
     CIRCLE {s 5 hue 200 sat 0.5}
     FIORE {y -1 r 4 s 0.998 b 0.005 flip 90}
  }

More Light! More Light!

Howto turn a disposable camera into a projector

Post a Comment

Home

Recent Comments

Updates

Categories

What I've Just Read

Blogroll

Pals

Old Posts

Meta

Spam Blocked