Hello!
I am trying to show a 2D array on the screen. My goal is to make this
picture scalable, so I can zoom in/out by changing the window size.
Next step is to make something similar to the infoline from waveform.m
example. Now the speed is to slow for a 2000x2000 array is just
unbearable. Here is how I am doing it using canvas and doublebuffer
(if I do not use doublebuffer it is still too slow but also the
drawing process is visible).
I add to the canvas draw method
^ draw-slice
and to the methods section:
: draw-slice
canvas with
Xywh steps 2drop $8F $8F $8F rgb> backcolor clear
subdim 0 do
subdim 0 do
Xywh min -rot 2drop subdim /
i over * swap j * home!
graynorm slice1 j i }} w@ n->gray fillcolor
Xywh min -rot 2drop subdim /
path 0 over to dup 0 to 0
over negate to negate 0 to fill
loop
loop
endwith
;
where slice1 is my array, n->gray is a function that transforms longint
values to gray values.
Well all that is now unusably slow. What is the standard (or fastest)
way to solve my task in MINOS?
It seems using icon object and saving array in xpm format can make it
load on the screen faster, but then how do I make infolines and
scaling?
Thank you!
--
Sergey
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
