| Function SetBlend( blend ) |
| Graphics 640,480 SetBlend SOLIDBLEND Repeat Cls SetColor 255,0,0 DrawRect 100,100,100,100 SetColor 0,255,0 DrawRect MouseX(),MouseY(),100,100 Flip Until KeyHit(key_escape) Or AppTerminate() End |
| SetBlend LIGHTBLEND |
![]() |
![]() |
| Graphics 640,480 SetBlend ALPHABLEND Local A:Float=1.0 Repeat Cls SetColor 255,0,0 SetAlpha 1.0 DrawText "Alpha="+a,10,10 DrawRect 100,100,100,100 SetColor 0,255,0 SetAlpha A DrawRect MouseX(),MouseY(),100,100 If KeyDown(KEY_A) a :+ .25 If a>1 Then a=0 EndIf FlushKeys Flip Until KeyHit(key_escape) Or AppTerminate() End |
![]() |
![]() |
| Graphics 640,480 Local image:TImage=CreateImage(100,100,1) SetColor 255,0,0 DrawRect 0,0,100,100 SetColor 255,255,0 DrawOval 25,25,50,50 GrabImage Image,0,0 SetBlend MASKBLEND Repeat Cls SetColor 0,255,255 DrawRect 100,100,200,200 SetColor 255,255,255 DrawImage Image,MouseX(),MouseY() Flip Until KeyHit(key_escape) Or AppTerminate() End |
| Graphics 640,480 SetMaskColor 255,255,0 Local image:TImage=CreateImage(100,100,1) |
![]() |
![]() |
| Graphics 640,480 Local Rocket:TImage=LoadImage(BlitzMaxPath()+"\samples\hitoro\gfx\boing.png") SetBlend MASKBLEND Repeat Cls DrawRect 100,100,100,100 DrawImage Rocket,MouseX(),MouseY() Flip Until KeyHit(key_escape) Or AppTerminate() End |
| Graphics 640,480 SetMaskColor 255,0,255 Local Rocket:TImage=LoadImage(BlitzMaxPath()+"\samples\hitoro\gfx\boing.png") |
![]() |
![]() |
| AutoMidHandle True Local Player:TImage=LoadImage(LoadBank("http::www.w3.org/Graphics/PNG/alphatest.png")) SetBlend ALPHABLEND SetClsColor 255,255,255 Repeat Cls SetColor 0,255,255 DrawRect 50,50,100,100 SetColor 255,0,0 DrawRect 200,200,100,100 SetColor 0,0,255 DrawRect 400,300,100,100 DrawImage Image,MouseX(),MouseY() Flip Until KeyHit(key_escape) Or AppTerminate() End |
![]() |
![]() |
![]() |
| Graphics 640,480 Local URL:String="http::www.2dgamecreators.com/tutorials/gameprogramming/images/" Local Rocket:TImage=LoadImage(LoadBank(URL+"alphaboing.png")) SetBlend MASKBLEND Repeat Cls DrawRect 100,100,100,100 DrawImage Rocket,MouseX(),MouseY() Flip Until KeyHit(key_escape) Or AppTerminate() End |
| Graphics 640,480 Local URL:String="http::www.2dgamecreators.com/tutorials/gameprogramming/images/" Local Rocket:TImage=LoadImage(LoadBank(URL+"alphaboing.png")) SetBlend ALPHABLEND Repeat Cls SetColor 255,255,255 DrawImage Rocket,MouseX(),MouseY() SetColor 255,0,0 DrawImage Rocket,MouseX()+150,MouseY() SetColor 0,0,255 DrawImage Rocket,MouseX()+300,MouseY() Flip Until KeyHit(key_escape) Or AppTerminate() End |
![]() |
| Graphics 640,480 Local Rocket:TImage=LoadImage(BlitzMaxPath()+"\samples\hitoro\gfx\boing.png") SetBlend ALPHABLEND Repeat Cls SetAlpha 1.0 DrawRect 100,100,100,100 SetAlpha 0.45 DrawImage Rocket,MouseX(),MouseY() Flip Until KeyHit(key_escape) Or AppTerminate() End |
![]() |
![]() |