Такая картинка? https://i.mcgl.ru/xgmCsUa6LW
(4096х4096 из 256 квадратиков 256х256, G и B в каждом квадратике от 0 до 255, а R постоянен в каждом. считая слева направо и вниз от 0 до 255)
4К
Add(MainForm,6761149,315,49)
{
Width=434
Height=497
link(onCreate,7363090:doWork1,[])
}
Add(Image,7263032,434,63)
{
Left=5
Top=5
Width=411
Height=411
link(Bitmap,7363090:Var1,[(440,54)(425,54)(425,107)(377,107)])
}
Add(Button,1170084,315,91)
{
Left=15
Top=420
Caption="Draw"
link(onClick,7363090:doWork2,[(354,97)(354,76)])
}
Add(Button,9052704,315,133)
{
Left=330
Top=425
Caption="Save"
link(onClick,15119280:doExecute,[])
}
Add(SDialog,15119280,371,133)
{
Filter="All|*.bmp"
FileName="4K"
link(onExecute,11008050:doSave,[])
}
Add(PictureStream,11008050,427,126)
{
link(Bitmap,7263032:ImageBitmap,[])
}
Add(MultiElement,7363090,371,63)
{
link(onEvent1,7263032:doLoad,[])
link(onEvent2,6761149:doCaption,[(410,76)(410,41)(305,41)(305,55)])
}
BEGIN_SDK
Add(EditMulti,14106174,21,21)
{
EventCount=2
WorkCount=2
VarCount=1
Width=321
Height=193
link(doWork1,3008794:doCreate,[(44,27)(44,55)])
link(doWork2,3442377:doFor,[(32,34)(32,76)])
link(Var1,16679407:Var2,[(27,201)(307,201)])
}
Add(Bitmap,3008794,301,35)
{
HWidth=4096
HHeight=4096
Point(doCreate)
}
Add(GetDataEx,16679407,301,77)
{
link(Data,3008794:Bitmap,[])
}
Add(Img_Point,12978254,252,140)
{
Color=16777215
Size=5
Point(X)
Point(Y)
Point(Color)
link(Bitmap,16679407:Var1,[(258,82)])
link(X,16335670:Result,[(265,131)(244,131)(244,187)(153,187)])
link(Y,1353876:Result,[(272,124)(237,124)(237,180)(202,180)])
link(Color,14523125:Result,[(279,131)(244,131)(244,194)(55,194)])
}
Add(For,3442377,49,70)
{
End=255
link(onEvent,16239273:doEvent1,[(88,76)(88,69)])
link(onStop,14106174:onEvent1,[(100,83)(100,27)])
}
Add(For,14025779,147,70)
{
End=255
link(onEvent,1976536:doFor,[])
}
Add(For,1976536,196,70)
{
End=255
link(onEvent,14523125:doCalc,[(235,76)(235,62)(39,62)(39,146)])
}
Add(MathParse,14523125,49,140)
{
DataCount=3
MathStr="%1 + %2*256 + %3*65536"
link(onResult,16335670:doCalc,[])
link(X1,15450140:Var2,[])
link(X2,4443606:Var1,[(62,110)])
link(X3,10681213:Var1,[(69,117)])
}
Add(MathParse,16335670,147,140)
{
MathStr="%1 + (%2 mod 16)*256"
link(onResult,1353876:doCalc,[])
link(X1,4443606:Var2,[])
link(X2,4183281:Var2,[])
}
Add(GetDataEx,4443606,147,105)
{
link(Data,14025779:Position,[])
}
Add(GetDataEx,15450140,49,119)
{
link(Data,3442377:Position,[])
}
Add(MathParse,1353876,196,140)
{
MathStr="%1 + (%2 div 16)*256"
link(onResult,12978254:doDraw,[])
link(X1,10681213:Var2,[])
link(X2,4183281:Var3,[(209,124)])
}
Add(GetDataEx,10681213,196,112)
{
link(Data,1976536:Position,[])
}
Add(GetDataEx,4183281,154,119)
{
Angle=3
link(Data,15450140:Var3,[])
}
Add(Hub,16239273,112,63)
{
link(onEvent1,14106174:onEvent2,[(137,69)(137,34)])
link(onEvent2,14025779:doFor,[])
}
END_SDK