Вверх ↑
Ответов: 1535
Рейтинг: 176
#1: 2014-08-27 13:45:51 ЛС | профиль | цитата
hin4,
Add(MainForm,2953706,175,42)
{
Width=839
Height=614
link(onCreate,15210698:doLoad,[])
}
Add(Img_GetPoint,7856986,399,140)
{
PColor(Bitmap,16711935)
link(onGetPixel,643189:doCompare,[])
link(Bitmap,3474602:Var2,[])
link(X,11874871:Var2,[])
link(Y,10638099:Var2,[])
}
Add(Img_FloodFill,10008991,525,140)
{
Style=7
FillType=0
Point(X)
Point(Y)
PColor(Bitmap,16711935)
link(Bitmap,3474602:Var3,[(531,116)])
link(X,11874871:Var3,[(545,107)])
link(Y,10638099:Var3,[(552,98)])
}
Add(GetDataEx,11874871,406,102)
{
Angle=3
link(Data,6657261:MouseX,[(321,107)])
}
Add(GetDataEx,10638099,413,93)
{
Angle=3
link(Data,6657261:MouseY,[(328,98)])
}
Add(If_else,643189,441,140)
{
Type=5
link(onTrue,8568686:doCompare,[])
}
Add(PaintBox,6657261,308,56)
{
Left=5
Top=10
Width=810
Height=560
Point(MouseX)
Point(MouseY)
link(onBeforeDraw,7363981:doDraw,[(348,62)(348,146)])
}
Add(Img_Bmp,7363981,357,140)
{
PColor(Bitmap,16711935)
link(onDraw,7856986:doGetPixel,[])
link(Bitmap,2805706:Var2,[])
link(SourceBitmap,15210698:Bitmap,[(370,127)(230,127)])
}
Add(GetDataEx,2805706,357,111)
{
Angle=3
PColor(Data,16711935)
link(Data,6657261:Bitmap,[(314,116)])
}
Add(GetDataEx,3474602,399,111)
{
Angle=3
PColor(Data,16711935)
link(Data,2805706:Var3,[])
}
Add(If_else,8568686,483,140)
{
Type=5
Op2=Integer(16744448)
link(onTrue,10008991:doDraw,[])
}
Add(Img_Loader,15210698,224,56)
{
FileName="mapGame.bmp"
link(onLoad,1161993:doTimer,[])
}
Add(Timer,1161993,266,56)
{
Interval=50
Enable=1
link(onTimer,6657261:doRefresh,[])
}
Идентификацию территорий легко сделать по цветам.
карма: 1
Не так страшна ошибка, как опасность её не заметить.

1
Голосовали:halt