5 lines
206 B
Text
5 lines
206 B
Text
load'viewmat'
|
|
NB. size=. 2{.".wd'qm' NB. J6
|
|
NB. size=. getscreenwh_jgtk_ '' NB. J7
|
|
size=. 3{".wd'qscreen' NB. J8
|
|
'rgb'viewmat- (4<.@%~{:size)# ({.size) $&> 1 2 3 4#&.> <0 1
|