Just a question

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

Agamer

ok this is how far i got but the mask image thing only mask the wrong bit i programed to be masked seems to be black well here's the code

AppTitle"calander maker"
Graphics 800,600

cal=LoadImage("calander1.bmp")

;save screen shot
Function SaveScreenshot()

    iFileNumber% = 0
    Repeat
        iFileNumber = iFileNumber + 1
        sFileName$ = "output/Screenshot" + String$("0", 3 - Len(Str$(iFileNumber))) + iFileNumber + ".bmp"
    Until Not(FileType(sFileName))
    
    SaveBuffer FrontBuffer(), sFileName

End Function
;end of save screen shot

Print"welcome to the calander maker!"
Print
Print"Please now put you calander"
Print"image into the Input folder"
Print"It must be 800*600 pixels wide"
Print
	;input of image name!
	Print"Please type in the file name"
	Print"remember it must be a .bmp"
	image$=Input()
	pic=LoadImage("input/" + image$ + ".bmp")
	
	Cls
	
	DrawBlock pic,0,0
	DrawImage cal,498,296
	MaskImage cal,255,225,255 ;white
	
	savescreenshot()
Locate 0,0
Print
Print"Thankyou the calander is now"
Print"waiting For you in the output folder!"
Delay 500
Print"I would like to thank Leigh Bowers for help with the code!"
Print"Please press any key to end this program"
WaitKey
End