Background color - GameCreators Forum

Author

Message

cryptojoe

11

Years of Service

User Offline

Joined: 27th Sep 2012

Location: Michigan U.S.A

Posted: 21st May 2013 07:46 Edited at: 21st May 2013 07:57

Link

dose anyone know an easy way to change the background color from black to white?

red,green and blue would be nice to... I'm making a test environment that I can put sprites in to see how they look...

I'm sorry what I'm asking is... is there a command that lets you change the background color? I have not be abele to find one...

Back to top

Profile PM

cryptojoe

11

Years of Service

User Offline

Joined: 27th Sep 2012

Location: Michigan U.S.A

Posted: 21st May 2013 08:49 Edited at: 21st May 2013 08:50

Link

I came up with something that works...

+ Code Snippet

rem
rem AGK Application
rem

SetVirtualResolution(640,480)
SetSyncRate(30,0)

rem backgrounds
    //backdrop = CreateSprite ( LoadImage ( "WhiteBackPlate640x480.png" ) )
    //backdrop = CreateSprite ( LoadImage ( "RedBackPlate640x480.png" ) )
    backdrop = CreateSprite ( LoadImage ( "GreenBackPlate640x480.png" ) )
    //backdrop = CreateSprite ( LoadImage ( "BlueBackPlate640x480.png" ) )
    //backdrop = CreateSprite ( LoadImage ( "BlackBackPlate640x480.png" ) )

CreateSprite ( 1, 0 ) // create a sprite with ID that has no image

Do
    rem show debug statistics for X and Y
    print("   X position  = " + str ( GetSpriteX(1)))
    print("   Y position  = " + str ( getspritey(1)))

rem get input and move sprite
 Dirx# = GetDirectionX()
 Diry# = GetDirectionY()
    if Dirx# > 0.5 then x# = x# + 1.0
    if Dirx# < -0.5 then x# = x# - 1.0
    if Diry# > 0.5 then y# = y# + 1.0
    if Diry# < -0.5 then y# = y# - 1.0
 setspriteposition(1,x#,y#) // update sprite position

    Sync()
Loop

Back to top

Profile PM

easter bunny

11

Years of Service

User Offline

Joined: 20th Nov 2012

Playing: Dota 2

Posted: 21st May 2013 08:57 Edited at: 21st May 2013 08:59

Link

You could create a sprite using tmp=CreateSprite(0) and use SetSpriteDepth(tmp,9999) then SetSpriteColor(tmp,r,g,b,a)
this'll put it behind all other sprites, just make sure you don't ever delete it and it'll be fine.
But I thought there was a command to set the default draw colour anyway??

edit: here you go:
SetClearColor( red, green, blue )

+ Code Snippet

SetClearColor
Description

Sets the clear color to use when clearing the back buffer.
Definition

SetClearColor( red, green, blue )
Parameters

    red - The red component of the clear color
    green - The green component of the clear color
    blue - The blue component of the clear color

&&
SetBorderColor( red, green, blue )

+ Code Snippet

SetBorderColor
Description

Sets the color or any borders used when the display does not fit the aspect ratio exactly. If this color is different from the clear color than an additional clear operation is performed and may affect performance if fill rate is an issue.
Definition

SetBorderColor( red, green, blue )
Parameters

    red - The red component of the border color
    green - The green component of the border color
    blue - The blue component of the border color

Dodge those Balls, awesomest app on the Play Store

Back to top

Profile PM Email

cryptojoe

11

Years of Service

User Offline

Joined: 27th Sep 2012

Location: Michigan U.S.A

Posted: 21st May 2013 09:42

Link

Thanks... after some thought I came up with this:

rem
rem AGK Application
rem

SetVirtualResolution(640,480)
SetSyncRate(30,0)

rem backgrounds
    //backdrop = CreateSprite ( LoadImage ( "WhiteBackPlate640x480.png" ) )
    //backdrop = CreateSprite ( LoadImage ( "RedBackPlate640x480.png" ) )
    backdrop = CreateSprite ( LoadImage ( "GreenBackPlate640x480.png" ) )
    //backdrop = CreateSprite ( LoadImage ( "BlueBackPlate640x480.png" ) )
    //backdrop = CreateSprite ( LoadImage ( "BlackBackPlate640x480.png" ) )
rem Set Sprite1 variables X&Y
 X#=100.00
 Y#=344.9
rem Set Sprite2 variables X&Y
 X2#=309.00
 Y2#=221.00

CreateSprite ( 1, 0 ) // set sprite imagefile
SetSpritePosition ( 1, x#, y# )

CreateSprite ( 2, 0 ) // set sprite  imagefile
SetSpritePosition ( 2, x2#, y2# )

Do
    rem show debug statistics for X and Y
    print("   X position  = " + str ( GetSpriteX(1)))
    print("   Y position  = " + str ( getspritey(1)))
    If GetSpriteCollision(1,2) = 1
        Print("Collision")
    EndIf

rem get input and move sprite
 Dirx# = GetDirectionX()
 Diry# = GetDirectionY()
    if Dirx# > 0.5 then x# = x# + 1.0
    if Dirx# < -0.5 then x# = x# - 1.0
    if Diry# > 0.5 then y# = y# + 1.0
    if Diry# < -0.5 then y# = y# - 1.0
 setspriteposition(1,x#,y#) // update sprite position

Sync()
Loop

+ Code Snippet

rem
rem AGK Application
rem

SetVirtualResolution(640,480)
SetSyncRate(30,0)

rem backgrounds
    //backdrop = CreateSprite ( LoadImage ( "WhiteBackPlate640x480.png" ) )
    //backdrop = CreateSprite ( LoadImage ( "RedBackPlate640x480.png" ) )
    backdrop = CreateSprite ( LoadImage ( "GreenBackPlate640x480.png" ) )
    //backdrop = CreateSprite ( LoadImage ( "BlueBackPlate640x480.png" ) )
    //backdrop = CreateSprite ( LoadImage ( "BlackBackPlate640x480.png" ) )
rem Set Sprite1 variables X&Y
 X#=100.00
 Y#=344.9
rem Set Sprite2 variables X&Y
 X2#=309.00
 Y2#=221.00

CreateSprite ( 1, 0 ) // set sprite imagefile
SetSpritePosition ( 1, x#, y# )

CreateSprite ( 2, 0 ) // set sprite  imagefile
SetSpritePosition ( 2, x2#, y2# )

Do
    rem show debug statistics for X and Y
    print("   X position  = " + str ( GetSpriteX(1)))
    print("   Y position  = " + str ( getspritey(1)))
    If GetSpriteCollision(1,2) = 1
        Print("Collision")
    EndIf

rem get input and move sprite
 Dirx# = GetDirectionX()
 Diry# = GetDirectionY()
    if Dirx# > 0.5 then x# = x# + 1.0
    if Dirx# < -0.5 then x# = x# - 1.0
    if Diry# > 0.5 then y# = y# + 1.0
    if Diry# < -0.5 then y# = y# - 1.0
 setspriteposition(1,x#,y#) // update sprite position

    Sync()
Loop

its meant to test 2 sprites against a background and each other... But I may do a rewrite using your code snippets....

Back to top

Profile PM

Sorry your browser is not supported!

AppGameKit Classic Chat / Background color