diff --git a/data/gfx/flyer.bmp b/data/gfx/flyer.bmp
new file mode 100644
index 0000000..7afc360
Binary files /dev/null and b/data/gfx/flyer.bmp differ
diff --git a/data/gfx/tilemap01.bmp b/data/gfx/tilemap01.bmp
deleted file mode 100644
index 0ee909e..0000000
Binary files a/data/gfx/tilemap01.bmp and /dev/null differ
diff --git a/data/gfx/tileset01.bmp b/data/gfx/tileset01.bmp
new file mode 100644
index 0000000..99f8196
Binary files /dev/null and b/data/gfx/tileset01.bmp differ
diff --git a/data/gfx/tilemap01.psd b/data/gfx/tileset01.psd
similarity index 100%
rename from data/gfx/tilemap01.psd
rename to data/gfx/tileset01.psd
diff --git a/src/Functions.pbi b/src/Functions.pbi
index ac27194..ecff12c 100644
--- a/src/Functions.pbi
+++ b/src/Functions.pbi
@@ -1 +1 @@
-; This file holds all the functions If it gets too big,
; we can split it in categories

; *****************************************************************************
; * Tileset

Procedure InitTileset()
  LoadImage
EndProcedure

; *****************************************************************************


; *****************************************************************************
; * Menu

Procedure Menu_GotoCurrent()
  If *ActiveMenu\Entries()\Selected <> #True
    FirstElement(*ActiveMenu\Entries());
    
    ForEach *ActiveMenu\Entries()
      If *ActiveMenu\Entries()\Selected = #True
        Break
      EndIf
    Next
  EndIf
EndProcedure

; *****************************************************************************
\ No newline at end of file
+; This file holds all the functions If it gets too big,
; we can split it in categories

; *****************************************************************************
; * Tileset

Procedure InitTileset()
	CatchSprite(#Tile01, ?Gfx_Tileset)
	;ClipSprite(0, 0, 0, 16, 16)
	
	; test the sprite
	;DisplaySprite(0, 20, 20)
EndProcedure

; *****************************************************************************


; *****************************************************************************
; * Menu

Procedure Menu_GotoCurrent()
  If *ActiveMenu\Entries()\Selected <> #True
    FirstElement(*ActiveMenu\Entries());
    
    ForEach *ActiveMenu\Entries()
      If *ActiveMenu\Entries()\Selected = #True
        Break
      EndIf
    Next
  EndIf
EndProcedure

; *****************************************************************************
\ No newline at end of file
diff --git a/src/Globals.pbi b/src/Globals.pbi
index 3392bfe..247bda4 100644
--- a/src/Globals.pbi
+++ b/src/Globals.pbi
@@ -12,4 +12,14 @@ Global *ActiveMenu.GameMenu
 
 ; Fonts
 Global Font_H1 = LoadFont(1, "Courier", 40, #PB_Font_Bold)
-Global Font_H2 = LoadFont(2, "Verdana", 18)
\ No newline at end of file
+Global Font_H2 = LoadFont(2, "Verdana", 18)
+
+; Graphics
+Enumeration 500
+	#Tile01
+	#Tile02
+	#Tile03
+	#Tile04
+	#Tile05
+	#Tile06
+EndEnumeration
\ No newline at end of file
diff --git a/src/Main.pb b/src/Main.pb
index f1fed6a..875f1bc 100644
--- a/src/Main.pb
+++ b/src/Main.pb
@@ -47,8 +47,6 @@ If ReadFile(0, "../data/menu.data")
   CloseFile(0)
 EndIf
 
-InitTileset()
-
 Menus("MAIN_MENU")\Title = "ESCape"
 
 Define Item.GameMenuItem
@@ -73,6 +71,8 @@ If InitSprite() = 0 Or InitKeyboard() = 0
   End
 EndIf
 
+InitTileset()
+
 ; Start the main loop which will create the window, wait for events and draw things
 ; on the screen. To escape from this loop, press ESC or close the window.
 If OpenWindow(0, 0, 0, Screen\Width, Screen\Height, title, #PB_Window_ScreenCentered)
@@ -112,4 +112,8 @@ If OpenWindow(0, 0, 0, Screen\Width, Screen\Height, title, #PB_Window_ScreenCent
   Until KeyboardPushed(#PB_Key_Escape)
 EndIf
 
-End
\ No newline at end of file
+End
+
+DataSection
+	Gfx_Tileset:
+		IncludeBinary "../data/gfx/tileset01.bmp"
\ No newline at end of file