SA . thejahn's Profile

Your web browser has javascript disabled, which may stop you from using some of SheezyArt's features.
Please check your browser's options or help, and turn Javascript on.

thejahnArtist: Fucktard.

Gallery

Journal

Report

Profile

Information

Statistics

Shout

Featured Artwork

Art

Journal

Kyo smells

Make your own damned brushes! (splatter, galaxy) posted Mar 27th 2009, 1:52AM

Mood: Bored

Music: None.

You want splatter brushes, you say? Well download Context Free. If you don't know what, or where that is, Google will be your best friend.

Here's the script for scatter, that I wrote. Not as realistic as REAL splatter, vectored, but it's effective.

startshape start

rule splat{
CIRCLE{s 0.25 0.5}
splat{s 0.9 r 15}
}

rule splat{
CIRCLE{s 0.5 0.5}
splat{s 0.9 r 15}
}

rule splat{
CIRCLE{s 0.25 0.25}
splat{s 0.9 r 15}
}

rule splat{
CIRCLE{s 0.25 0.25}
splat{s 0.9 r 15}
}

rule splat{
CIRCLE{s 0.75 0.5}
splat{s 0.9 r 15}
}

rule splat{
CIRCLE{s 0.5 0.75}
splat{s 0.9 r 15}
}

rule splat{}

rule start{
splat{}
start{x 0.1 r 15}
}

rule start{
splat{}
start{x 0.1 r 30}
}

rule start{
splat{}
start{x 0.1 r -15}
}

rule start{
splat{}
start{x 0.1 r -30}
}

rule start{
splat{s 0.25 y 1}
start{x 0.5 r -15}
}

rule start 0.5{
splat{s 5 y 1}
start{x 1 r 15}
}

rule start 0.05{
}

And now on to the Galaxy brushes. Like it or not, Apophysis pumps out some cool shit if you treat it well. I coded a script for galaxies. It's not a guaranteed galaxy, every time, but keep trying, and you get one eventually. Here's the script:

Clear
For i:=0 To 9 Do
Begin
AddTransform
If i=0 Then
begin
Rotate(10)
Scale(0.75)
Transform.Weight := 1
end
else begin
Rotate(Random*360)
Translate(-1+(Random*2)/2, -1+(Random*2)/2)
Scale(Random)
end
Transform.Color := 1/10*i
Transform.Variation[V_LINEAR] :=1
End
ResetLocation:=1

Enjoy. No need to credit me, but it would be appreciated if you did.

Comments (4)