arg/ld21-ESCape
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

fix the image bug

Browse source
This commit is contained in:
Ruben Müller 2011-08-20 19:09:23 +02:00
parent f6ab4d9452
commit e07c64c6c7
4 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

BIN
data/gfx/tileset01.bmp
View file

Binary file not shown.
Side by side Swipe Overlay

Before

Width:  |  Height:  |  Size: 32 KiB

After

Width:  |  Height:  |  Size: 48 KiB

2
src/Draw.pbi
View file

@ -33,5 +33,5 @@ EndProcedure
Procedure DrawRunningGame()
;Box(0, 0, 200, 200, RGB(0, 255, 0))
DisplaySprite(#Tile01, 20, 20)
DrawImage(ImageID(#Tile01), 20, 20)
EndProcedure

4
src/Functions.pbi
View file

@ -3,10 +3,8 @@
; *****************************************************************************
; * Tileset
UsePNGImageDecoder()
Procedure InitTileset()
LoadSprite(#Tile01, #DATA_PATH+"gfx/tileset01.png")
;ClipSprite(#Tile01, 0, 0, 16, 16)
EndProcedure

4
src/Globals.pbi
View file

@ -30,3 +30,7 @@ EndEnumeration
Global Dim Sounds.i(2)
Sounds(0) = LoadSound(0, #DATA_PATH + "sound/menu_change.wav")
Sounds(1) = LoadSound(1, #DATA_PATH + "sound/menu_select.wav")
UseJPEGImageDecoder()
Debug LoadImage(#Tile01, #DATA_PATH+"gfx/tileset01.jp")