Помогите с кодом

[Atomikc]

Подскажите плиз где тут ашибки.

вроде всё правильно, а тормозит ничего не грузит и вообще, такое построение кода логично в блице???

Graphics 800,600,32,2
SetBuffer BackBuffer() 
SeedRnd MilliSecs() 

Type t_MaunMenu 
 Field Buttons
End Type 

Type t_Players 
 Field Image_t 
 Field Hp, Amp, Frags 
 Field PosX, PosY 
End Type 

Type t_Map 
 Field level, Space, Window, Cursor, Font 
End Type 

Type t_Amor 
 Field Image_t1, Image_t2 
End Type 

;========================================== 
Global Amor.t_Amor 
Global Map.t_Map 
Global Vrag.t_Players 
Global Player.t_Players 
Global Manu.t_MaunMenu 
;========================================== 

Function CreateWorld() 
 ;Amor.t_Amor = New t_Amor 
 Map.t_Map = New t_Map 
 ;Vrag.t_Players = New t_Players 
 ;Player.t_Players = New t_Players 

 ;Amor\Image_t1  = LoadImage("data/data/galaxi_2.jpg") 
 ;Amor\Image_t2 = LoadImage("data/data/galaxi_2.jpg") 
 ;Map\Space   = LoadImage("data/data/galaxi_2.jpg") 
 ;Map\Window  = LoadImage("data/data/galaxi_2.jpg") 
 Map\Cursor   = LoadImage("data/menu/cursor.bmp")

 HidePointer; Курсор невидим 
 ;MidHandle Map\Cursor; Посередине картинки

 Map\Font=LoadFont("Arial Cyr",30,1) 
End Function 


Function l_Menu() 
 

 Cls()
 DrawImage(Map\Cursor, MouseX(), MouseY());
 SetFont Map\Font:Color 0,170,255:Text 399,219,MouseX(),1,1 
End Function 



Function l_Game() 
 
End Function 
;========================================== 

CreateWorld() 
Repeat 
     l_Menu() 
Forever

[alcoSHoLiK]

Если не считать отсутствие Flip'a, должно работать.

[HolyDel]

отсутствие flip'a и возможности выйти из программы