Results 1 to 6 of 6

Thread: sweet fractal

  1. Jun 8th, 2000, 07:39 AM #1
    kedaman
    kedaman is offline

    Thread Starter
    transcendental analytic kedaman's Avatar
    Join Date
    Mar 2000
    Location
    0x002F2EA8
    Posts
    7,221

    Cool

    What do you guy's think?
    http://www.geocities.com/kedasu/ked2.jpg
    Wan't to try play around with my version of the mandlebrot fractal?
    Use
    writing software in C++ is like driving rivets into steel beam with a toothpick.
    writing haskell makes your life easier:
    reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
    To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
    Reply With Quote Reply With Quote
  2. Jun 8th, 2000, 08:24 AM #2
    Guv
    Guv is offline
    Frenzied Member
    Join Date
    Jul 1999
    Location
    Huntingdon Valley, PA 19006
    Posts
    1,151

    Your Fractals are cool

    You picked one of the more interesting areas of the Mandelbrot set. I liked it, allthough the colors seemed pastel on my monitor.

    I prefer brighter, more intense colors. Is it my monitor and/or my brightness/contrast settings? I do not think so, because everything else seems normal on my monitor. Perhaps I should be set to 24 or 32 bit color (I use 16 bit).

    Live long & prosper.

    The Dinosaur from prehistoric era prior to computers.

    Eschew obfuscation!
    If a billion people believe a foolish idea, it is still a foolish idea!
    VB.net 2010 Express
    64Bit & 32Bit Windows 7 & Windows XP. I run 4 operating systems on a single PC.
    Reply With Quote Reply With Quote
  3. Jun 8th, 2000, 08:40 AM #3
    GRAHAM
    GRAHAM is offline
    Addicted Member
    Join Date
    Feb 2000
    Location
    CWMBRAN,WALES,UK
    Posts
    146
    Every time a try to draw a Mandelbrot set, I get an error
    "Your monitor does not support pallettes"
    I can set it to 32 bit, but I can't get around it, and RGB Triplets are a definite no-no.

    Any suggestions?

    GRAHAM
    Reply With Quote Reply With Quote
  4. Jun 8th, 2000, 01:24 PM #4
    Paul282
    Paul282 is offline
    Fanatic Member
    Join Date
    Feb 2000
    Location
    Japan
    Posts
    840
    I get that pallet too. I haven't read the code though (just saw the error playing with the examples)

    It's not the RGB tripplets though, I use them for other things and they work well.

    Everyone got the Graphics programming in VB book do they? I haven't read much of the fractals section although it looks interesting. spent too much time in the matrices bit
    Paul Dwyer
    Network Engineer
    Aussie In Tokyo

    Using Powerbasic 6 & VB6 SP4 (Please also add your VB Version to your signature!)
    Reply With Quote Reply With Quote
  6. Jun 8th, 2000, 05:12 PM #5
    kedaman
    kedaman is offline

    Thread Starter
    transcendental analytic kedaman's Avatar
    Join Date
    Mar 2000
    Location
    0x002F2EA8
    Posts
    7,221
    Palettes? I don't use palettes, i got this code from Sam, but he couldn't make more than 16 colors, with qbcolor, well i played around with it, and now i operate with 256. This is very deep zoom, about 40000 i remember, anyone want to have my app?
    Use
    writing software in C++ is like driving rivets into steel beam with a toothpick.
    writing haskell makes your life easier:
    reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
    To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
    Reply With Quote Reply With Quote
  7. Jun 9th, 2000, 12:16 AM #6
    kedaman
    kedaman is offline

    Thread Starter
    transcendental analytic kedaman's Avatar
    Join Date
    Mar 2000
    Location
    0x002F2EA8
    Posts
    7,221
    You could use one of these, the uncommented one is which i use now
    'SetPixelV Target.hdc, i, j, Colors(MandleBrot(CoordsToComplex(i, j, Trg), NewComplex(0, 0), 255) Mod 256)
    'Trg.PSet (i, j), QBColor(MandleBrot(CoordsToComplex(i, j, Trg), NewComplex(0, 0), lngMaxIts) Mod 16)
    'Trg.PSet (i, j), largemod(12345 + Log((MandleBrot(CoordsToComplex(i, j, Trg), NewComplex(0, 0), 1023) Mod 1024) ^ -2) ^ 5, 16777216)
    SetPixelV Target.hdc, i, j, largemod(12345 + Log((MandleBrot(CoordsToComplex(i, j, Trg), NewComplex(0, 0), 255) Mod 256) ^ -2) ^ 5, 16777216)
    'Trg.PSet (i, j), largemod(12345 + Log((MandleBrot(CoordsToComplex(i, j, Trg), NewComplex(0, 0), 255) Mod 256) ^ -2) ^ 5, 16777216)
    'Trg.PSet (i, j), largemod(12345 + (MandleBrot(CoordsToComplex(i, j, Trg), NewComplex(0, 0), 255) Mod 256) ^ 4, 16777216)
    'Trg.PSet (i, j), largemod((MandleBrot(CoordsToComplex(i, j, Trg), NewComplex(0, 0), 255) Mod 256) ^ 6.21, 16777216)
    ' Trg.PSet (i, j), (16777216@ - (MandleBrot(CoordsToComplex(i, j, Trg), NewComplex(0, 0), 255) Mod 256) ^ 3) Mod 16777216
    Use
    writing software in C++ is like driving rivets into steel beam with a toothpick.
    writing haskell makes your life easier:
    reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
    To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
    Reply With Quote Reply With Quote
« Previous Thread | Next Thread »

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Forum Rules


Click Here to Expand Forum to Full Width