TGC Codebase Backup



Bitmap Tiling by Richard Davey

14th Sep 2003 9:44
Summary

This will take a small bitmap and fill the screen with it. Just like the HTML background attribute.



Description



Code
                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    `	------------------------------------------------------------------------
`	Bitmap Tiling                               DarkForge Snippet (6/6/2000)
`	------------------------------------------------------------------------
`
`	This will take a small bitmap and fill the screen with it.
`	Just like the HTML "background" command.

sync rate 0
sync on
hide mouse

load bitmap "bg_grape.bmp",1
get image 1,0,0,bitmap width(1),bitmap height(1)

set current bitmap 0

tx=screen width()/bitmap width(1)
ty=screen height()/bitmap height(1)

for a=0 to ty

	for b=0 to tx
		paste image 1,x,y
		inc x,bitmap width(1)
	next b

	x=0
	inc y,bitmap height(1)

next a

sync

wait key
end