10 callnetbload("/software/basic/m-test/mw.bin",1)
20 callnetbload("/software/basic/m-test/r1/wav.dat")
30 defusr=&ha000:a=usr(0)