Heightmap Generator - GameCreators Forum

developer forums

DarkBASIC Professional Discussion / Heightmap Generator

Author

Message

CumQuaT

AGK Master

Years of Service

User Offline

Joined: 28th Apr 2010

Location: Tasmania, Australia

Posted: 25th Dec 2011 12:34

Link

Hi all,

I didn't manage to get much help with my Blitzterrain problem, so, me being me, I came up with my own solution :-P

I thought that others might like it, too. I couldn't find anything as simple as this on the forum, so I thought I'd post it here for others to use.

This will let you pass a heightmap image to a matrix to generate it into a usable terrain for your games

+ Code Snippet

FUNCTION Set_Heightmap(MatrixNum, ImageNum, Multiplier#)
    CREATE BITMAP 1, 100, 100
    SET CURRENT BITMAP 1
    
    PASTE IMAGE ImageNum, 0, 0
    
    FOR hmY = 1 to 100
        FOR hmX = 1 to 100
            TempH# = INT(RGBR(POINT(hmX,hmY)) * Multiplier#)
            SET MATRIX HEIGHT MatrixNum, hmX, hmY, INT(TempH#)
        NEXT
    NEXT
    
    UPDATE MATRIX MatrixNum
    
    SET CURRENT BITMAP 0
    DELETE BITMAP 1
ENDFUNCTION 0