ｶｴﾚ

#uselib "winmm.dll"
#cfunc timeGetTime "timeGetTime"
dim map,256,256
begin_t = timeGetTime()

repeat 256
map(cnt,0) = 333 ; 任意
loop
repeat 256
memcpy map(0,cnt),map(0,0),256*4
loop

end_t = timeGetTime()
mes "処理時間 " + (end_t - begin_t) + "msec"