Global test
If ImageRectOverlap (cursor,mx,my,384,595,257,47) Then
DrawImage knopka,384,595,1
Text 460,595,"Credits"
DrawImage cursor,mx,my
If md1 Then test = 1
End If
Цикл:
If Test = 1
DrawImage credits,200,100
DrawImage knopka,200,300,0
End if
Вроде...