что это за ужасы????
;************************************************************************
Function UpdateButton(x,y,Name$,idb)
MX#=MouseX()
MY#=MouseY()
Color 10,128,255
For b.Button=Each Button
b\Name=Name$
DrawImage b\file1,x,y
If(ImageRectOverlap (b\file1,x,y,MX#,MY#,0,0))
DrawImage b\file2,x,y
Text 20,20,"ID - "+idb,1,1
Color 255,128,0
If Clik=1 Then DrawImage b\file3,x,y Color 255,0,0 ID=idb
EndIf
Text x+50,y+10,b\name,1,1
Next
End Function
я просто в шоке...
я даже незнаю как это назвать.... "Черезжопность" или "огригинальный ход мыслей"
ЗЫ. 20 ФПС чисто на 5 кнопок... это поражает