спс Добавлено (15.07.2011, 12:29)
---------------------------------------------
У меня ещё вопрос не легче вставлять этот код
Code
Graphics 600,400,32,2
Local btnLogin:Enter=LoadImage("images\buttons\small.bmp")
Repeat
DrawImage(Enter,200,200)
If MouseX()>200 And MouseX<400 And MouseY()>200 And MouseY<250 And MouseHit( 1 ) Then
Print "Вы нажали на кнопку"
WaitKey
EndIf
Forever
Чем ставить код
Code
Color 118,118,118
Text main_x+9,main_y+43,"YA VIPOLNIL PROSBY"
If (MouseY()>main_y+40 And MouseY()<main_y+70 And MouseX()>main_x And MouseX()<main_x+230) Then
If MouseDown(1) Then selected_item=2: PlaySound (resource) : exit_menu=1: edit_mode=0
Move_Mouse=2
EndIf
If (MouseY()>main_y+40 And MouseY()<main_y+70 And MouseX()>main_x And MouseX()<main_x+230) Or selected_item=2 Then
If Move_Mouse=0 Or move_mouse=2 Then
Color 71,71,71:Rect main_x,main_y+40,230,35: Color 255,255,255: Text main_x+9,main_y+43,"YA VIPOLNIL PROSBY"
EndIf
EndIf