Best way to split up image into smaller pieces?

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.

Grisu

Thanks all!

This is the code I use now. Nothing seems to be faster / easier:

Graphics 800,600

Global PLATESIZE=68
Global PLATEMAX=340/PLATESIZE*340/PLATESIZE

Global img:TImage = LoadImage("media/1.jpg")
Global animg:TImage = LoadAnimImage(img.Lock(0, True, False), PLATESIZE, PLATESIZE, 0, PLATEMAX)

Global x:Int=0,y:Int=0
Global j:Int 
For Local i=0 To PLATEMAX-1
	DrawImage animg,x,y,i
	x=x+PLATESIZE+1
	j=j+1

    If j Mod (340/PLATESIZE) = 0 Then 
		x=0
		y=y+PLATESIZE+1
	EndIf  
Next 
Flip
WaitKey