LoadAnimImage missing?

[EdzUpParticipant]

Coming from mojo1 I cannot seem to find the LoadAnimImage command to load in sprite sheets.

Is this a oversight or is there a new way of doing it in MonkeyX2?

[JesseParticipant]

It’s not programed in to mojo. you will have to implement it yourself.

[EdzUpParticipant]

Hmm is there any way to scale images or grab sections of them as I can’t see that either, or do I have to write the OpenGL code for that?

[JesseParticipant]

to scale:

Monkey

[crayon-5cb9dfd26f288804833313 inline="true" ] canvas.Scale = new Vec2f(x,y)

1 2 3

[crayon-5cb9dfd26f288804833313 inline="true" ] canvas.Scale = new Vec2f(x,y)

[/crayon]

or

Monkey

[crayon-5cb9dfd26f28e561960392 inline="true" ] image.Scale = New Vec2f(x,y)

1 2 3

[crayon-5cb9dfd26f28e561960392 inline="true" ]   image.Scale = New Vec2f(x,y)

[/crayon]

to grab a section of an image:

Monkey

[crayon-5cb9dfd26f293434826617 inline="true" ] local img:Image = new Image(image,x,y,width,height)

1 2 3

[crayon-5cb9dfd26f293434826617 inline="true" ] local img:Image = new Image(image,x,y,width,height)

[/crayon]

[EdzUpParticipant]

Ah brilliant thanks for that I will use that in my conversions

[nerobotParticipant]

Also u can write “sprite” class that contains reference to the source image and drawing rect. With that + some addon code you can change source image on the fly and so that change all sprites.

[EdzUpParticipant]

@nerobot that sounds interesting Will look into it more and see what I can do with MonkeyX2

[EthernautParticipant]

Here ya go:

Monkey

Function LoadSpriteSheet:Image[] ( path:String, numFrames:Int, cellWidth:Int, cellHeight:Int, filter:Bool = True, preScale:Float = 1.0, padding:Int = 0, border:Int = 0 ) Local atlasTexture := Texture.Load( path, Null ) Assert( atlasTexture, " ~n ~nGameGraphics: Image " + path + " not found.~n ~n" ) Local imgs := New Image[ numFrames ] Local atlasImg := New Image( atlasTexture ) If Not filter Then atlasImg.TextureFilter = TextureFilter.Nearest Local paddedWidth:= cellWidth + ( padding * 2 ) Local paddedHeight:= cellHeight + ( padding * 2 ) Local columns:Int = ( atlasImg.Width - border - border ) / paddedWidth For Local i:= 0 Until numFrames Local col := i Mod columns Local x := ( col * paddedWidth ) + padding + border Local y := ( ( i / columns ) * paddedHeight ) + padding + border imgs[i] = New Image( atlasImg, New Recti( x , y, x + cellWidth, y + cellHeight ) ) imgs[i].Scale = New Vec2f( preScale, preScale ) Next atlasImg = Null Return imgs End

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

Function LoadSpriteSheet:Image[] ( path:String, numFrames:Int, cellWidth:Int, cellHeight:Int, filter:Bool = True, preScale:Float = 1.0, padding:Int = 0, border:Int = 0 )   Local atlasTexture := Texture.Load( path, Null ) Assert( atlasTexture, " ~n ~nGameGraphics: Image " + path + " not found.~n ~n" )   Local imgs := New Image[ numFrames ] Local atlasImg := New Image( atlasTexture ) If Not filter Then atlasImg.TextureFilter = TextureFilter.Nearest   Local paddedWidth:= cellWidth + ( padding * 2 ) Local paddedHeight:= cellHeight + ( padding * 2 ) Local columns:Int = ( atlasImg.Width - border - border ) / paddedWidth   For Local i:= 0 Until numFrames Local col := i Mod columns Local x := ( col * paddedWidth ) + padding + border Local y := ( ( i / columns ) * paddedHeight ) + padding + border imgs[i] = New Image( atlasImg, New Recti( x , y, x + cellWidth, y + cellHeight ) ) imgs[i].Scale = New Vec2f( preScale, preScale ) Next   atlasImg = Null Return imgs End

 

The “padding” and “border” arguments are designed to work with the way Aseprite exports sprite sheets. I haven’t tested this out of my framework, but it looks like it should work. Let me know.

I think I based this on some code someone posted on the Monkey-X forum. It’s been too long, can’t remember now…

[EdzUpParticipant]

@ethernaut thank you very much will test it once I get the latest build and recompile

[EthernautParticipant]

Tested, works here. Here’s a sample usage with a 5 frame 32×32 sprite (160×32 sprite sheet, no border or padding):
(requires previously posted LoadSpriteSheet function)

Monkey

[crayon-5cb9dfd28152a276286991 inline="true" ]#Import "<mojo>" #Import "<std>" #Import "images/testSprite.png" Using mojo.. Using std.. Class SpriteSheet Extends Window Field sprite:Image[] Method New() Super.New( "Test", 256, 256 ) sprite = LoadSpriteSheet( "asset::testSprite.png", 5, 32, 32 ) End Method OnRender( canvas:Canvas ) Override App.RequestRender() canvas.Clear( Color.Black ) For Local n := 0 To 4 canvas.DrawImage( sprite[n], n * 32, n * 32 ) Next End End Function Main() New AppInstance New SpriteSheet() App.Run() End

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32

[crayon-5cb9dfd28152a276286991 inline="true" ]#Import "<mojo>" #Import "<std>"   #Import "images/testSprite.png"   Using mojo.. Using std..   Class SpriteSheet Extends Window   Field sprite:Image[]   Method New() Super.New( "Test", 256, 256 ) sprite = LoadSpriteSheet( "asset::testSprite.png", 5, 32, 32 ) End Method OnRender( canvas:Canvas ) Override App.RequestRender() canvas.Clear( Color.Black ) For Local n := 0 To 4 canvas.DrawImage( sprite[n], n * 32, n * 32 ) Next End   End   Function Main() New AppInstance New SpriteSheet() App.Run() End

[/crayon]

[EdzUpParticipant]

Amazing stuff haven’t even downloaded the latest build yet lol

[AmonParticipant]

@ethernaut

That’s what I needed, thank you.

[Author]

Posts