Canvas + Menu o.o?

Invalide Menu Handle?
Any idea whats wrong with my code ?

window=CreateWindow( "Window",10,30,640,480,window,15)

canvas=CreateCanvas( 0,0,ClientWidth(window),ClientHeight(window),window )

SetGadgetLayout canvas, 1, 1, 1, 1
;------------------- MENU
game=CreateMenu( "File",0,window )
CreateMenu "New Game",1,game
CreateMenu "Load Game",2,game
CreateMenu "Save Game",3,game
CreateMenu "",0,game
CreateMenu "Exit",4,game
;------------------- IMAGES
ship=LoadImage("img\ship3.bmp")

SetBuffer CanvasBuffer(canvas)

timer=CreateTimer(60) ;for 60 FPS

While WaitEvent()

   Select EventID()

	

		Case $803
			
			End

		Case $4001
		
		;main() ** HERE YOU PUT YOUR MAIN LOOP **
		
		Cls
		DrawImage ship,300,200
		FlipCanvas canvas

	End Select

Wend

See the docs for CreateMenu:

So, the line should be like this:

game=CreateMenu( "File",0,WindowMenu(window) )

Thanks!
it didnt work at first but i added
UpdateWindowMenu window
now it works ^^

how do I made it so that if they
click New Game... something happens

in the case thing

example:
if new_game
{ this happen }

You need to add a menu event handler in your loop (see docs for WaitEvent)

Ok I looked at the manuel and ended up with this:

WaitEvent($1001)
If EventID()=1 Then
	; New Game is clicked?
	Endif

I don't think this is it but Im checking with u, is it?

That's it, but it looks neater if you write it like this :

Select EventID()
Case 1
      ; New Game is Clicked
Case 2
      ; Load Games is Clicked
Case 3
      ; Save Game is clicked

; AND SO ON

End Select

I would also use constants for the menu id's as suggested earlier so that you can make the code easier to read when you haven't looked at it for a few days/weeks.

Sybixsus, I was wondering in my code below you can see that theres already a Select EventID(), so if i add "Case 1" It will work right?

What do you mean by using constants for the menu ID?
(sorry me still stupid)

window=CreateWindow( "Window",10,30,750,550,window,15)

canvas=CreateCanvas( 0,0,ClientWidth(window),ClientHeight(window),window )

SetGadgetLayout canvas, 1, 1, 1, 1
;------ MENU -------
file=CreateMenu( "File",0,WindowMenu(window) )
CreateMenu "New Game",1,file
CreateMenu "",0,file
CreateMenu "     Exit",2,file
;-------------------
UpdateWindowMenu window
;-------------------

ship=LoadImage("img\ship3.bmp")

SetBuffer CanvasBuffer(canvas)

timer=CreateTimer(60) ;for 60 FPS

While WaitEvent()

   Select EventID()

	
		Case $803
			
			End

		Case $4001
		
		;main() ** HERE YOU PUT YOUR MAIN LOOP **
		
		Cls
		DrawImage ship,300,200
		FlipCanvas canvas

	End Select

Wend

Edited:
I tested it added:
Case 1
Notify "New Game"

Case 2
Notify "End"
It doesnt work :(